param_struct.c

Go to the documentation of this file.

// Copyright (c) 2026 The YAC Authors
//
// SPDX-License-Identifier: BSD-3-Clause
 
#include "param_struct.h"
#include "param_internal.h"
#include "utils_common.h"
#include <stdlib.h>
#include <string.h>
 
struct yac_param_struct {
  const struct yac_param_vtable *vtable;
  char *name;
  struct yac_param **subparams;
  size_t subparam_count;
};
 
static enum yac_param_type
yac_param_struct_get_type(
  const struct yac_param *param) {
  UNUSED(param);
  return YAC_PARAM_TYPE_STRUCT;
}
 
static int yac_param_struct_is_default(
  const struct yac_param *param) {
  const struct yac_param_struct *self =
    (const struct yac_param_struct *)param;
  int ret = 1;
  for (size_t i = 0; (i < self->subparam_count) && ret; ++i) {
    ret = yac_param_is_default(self->subparams[i]);
  }
  return ret;
}
 
static const char *yac_param_struct_get_name(
  const struct yac_param *param) {
  const struct yac_param_struct *self =
    (const struct yac_param_struct *)param;
  return self->name;
}
 
static int yac_param_struct_get_sub_count(
  const struct yac_param *param, size_t *count) {
  const struct yac_param_struct *self =
    (const struct yac_param_struct *)param;
  YAC_ASSERT(count, "count is NULL");
  *count = self->subparam_count;
  return 0;
}
 
static int yac_param_struct_get_sub_by_name(
  const struct yac_param *param, const char *name,
  struct yac_param **sub_param) {
  const struct yac_param_struct *self =
    (const struct yac_param_struct *)param;
  YAC_ASSERT(name, "name is NULL");
  YAC_ASSERT(sub_param, "sub_param is NULL");
  int ret = 1;
  for (size_t i = 0; (i < self->subparam_count) && ret; ++i) {
    const char *subname =
      yac_param_get_name(self->subparams[i]);
    if (subname && strcmp(subname, name) == 0) {
      ret = 0;
      *sub_param = self->subparams[i];
    }
  }
  YAC_PARAM_ASSERT(
    ret == 0, "subparam '%s' not found in param '%s'", name, self->name);
  return ret;
}
 
static int yac_param_struct_get_sub_by_index(
  struct yac_param *param, size_t idx,
  struct yac_param **sub_param) {
  struct yac_param_struct *self =
    (struct yac_param_struct *)param;
  YAC_ASSERT(sub_param, "sub_param is NULL");
  YAC_PARAM_ASSERT(
    idx < self->subparam_count,
    "idx %zu exceeds subparameter count (%zu) for parameter '%s'",
    idx, self->subparam_count, self->name);
  *sub_param = self->subparams[idx];
  return 0;
}
 
static void yac_param_struct_delete(
  struct yac_param *param) {
  struct yac_param_struct *self =
    (struct yac_param_struct *)param;
  for (size_t i = 0; i < self->subparam_count; ++i) {
    yac_param_delete(self->subparams[i]);
  }
  free(self->subparams);
  free(self->name);
  free(param);
}
 
static const struct yac_param_vtable
  yac_param_struct_vtable = {
  .get_type = yac_param_struct_get_type,
  .is_default = yac_param_struct_is_default,
  .get_name = yac_param_struct_get_name,
  .delete = yac_param_struct_delete,
  .get_sub_count = yac_param_struct_get_sub_count,
  .get_sub_by_name = yac_param_struct_get_sub_by_name,
  .get_sub_by_index = yac_param_struct_get_sub_by_index,
  .append = NULL,
  .set_scalar = NULL,
  .get_scalar = NULL,
  .get_scalar_kind = NULL,
  .set_scalar_int = NULL,
  .set_scalar_dble = NULL,
  .get_scalar_int = NULL,
  .get_scalar_dble = NULL
};
 
struct yac_param *yac_param_struct_new(
  const char *name,
  struct yac_param **subparams,
  size_t subparam_count) {
  YAC_ASSERT(name, "name is NULL");
  YAC_ASSERT(name[0] != '\0', "name is empty string");
  YAC_ASSERT((subparam_count == 0) || (subparams != NULL), "subparams is NULL");
  struct yac_param_struct *self = xmalloc(1 * sizeof(*self));
  self->vtable = &yac_param_struct_vtable;
  self->name = xstrdup(name);
  self->subparam_count = subparam_count;
  self->subparams =
    (subparam_count > 0)
      ? xmalloc(subparam_count * sizeof(*self->subparams))
      : NULL;
  for (size_t i = 0; i < subparam_count; ++i)
    self->subparams[i] = subparams[i];
  return (struct yac_param *)self;
}