blob: 6753dd1aba73e30cfe2683bede6a83e170068f3d [file]
/*****************************************************************************\
* parsers.c - Slurm data parsers
*****************************************************************************
* Copyright (C) 2022 SchedMD LLC.
* Written by Nathan Rini <nate@schedmd.com>
*
* This file is part of Slurm, a resource management program.
* For details, see <https://slurm.schedmd.com/>.
* Please also read the included file: DISCLAIMER.
*
* Slurm is free software; you can redistribute it and/or modify it under
* the terms of the GNU General Public License as published by the Free
* Software Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* In addition, as a special exception, the copyright holders give permission
* to link the code of portions of this program with the OpenSSL library under
* certain conditions as described in each individual source file, and
* distribute linked combinations including the two. You must obey the GNU
* General Public License in all respects for all of the code used other than
* OpenSSL. If you modify file(s) with this exception, you may extend this
* exception to your version of the file(s), but you are not obligated to do
* so. If you do not wish to do so, delete this exception statement from your
* version. If you delete this exception statement from all source files in
* the program, then also delete it here.
*
* Slurm is distributed in the hope that it will be useful, but WITHOUT ANY
* WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
* details.
*
* You should have received a copy of the GNU General Public License along
* with Slurm; if not, write to the Free Software Foundation, Inc.,
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
\*****************************************************************************/
#include <limits.h>
#include <math.h>
#include <signal.h>
#include <stdint.h>
#include <unistd.h>
#include "slurm/slurm.h"
#include "src/common/cpu_frequency.h"
#include "src/common/data.h"
#include "src/common/log.h"
#include "src/common/net.h"
#include "src/common/proc_args.h"
#include "src/common/read_config.h"
#include "src/common/ref.h"
#include "src/common/slurm_protocol_api.h"
#include "src/common/slurmdbd_defs.h"
#include "src/common/uid.h"
#include "src/common/xassert.h"
#include "src/common/xmalloc.h"
#include "src/common/xstring.h"
#include "src/interfaces/data_parser.h"
#include "src/interfaces/select.h"
#include "alloc.h"
#include "api.h"
#include "events.h"
#include "openapi.h"
#include "parsers.h"
#include "parsing.h"
#include "slurmdb_helpers.h"
#include "src/sinfo/sinfo.h" /* provides sinfo_data_t */
#define CPU_FREQ_FLAGS_BUF_SIZE 64
#define MAGIC_FOREACH_CSV_STRING 0xb891be2b
#define MAGIC_FOREACH_LIST 0xaefa2af3
#define MAGIC_FOREACH_LIST_FLAG 0xa1d4acd2
#define MAGIC_FOREACH_POPULATE_GLOBAL_TRES_LIST 0x31b8aad2
#define MAGIC_FOREACH_STEP 0x7e2eaef1
#define MAGIC_FOREACH_STRING_ID 0x2ea1be2b
#define MAGIC_FOREACH_STRING_ARRAY 0xaea1be2b
#define MAGIC_FOREACH_HOSTLIST 0xae71b92b
#define MAGIC_LIST_PER_TRES_TYPE_NCT 0xb1d8acd2
#define PARSER_ARRAY(type) _v39_parser_array_##type
#define PARSER_FLAG_ARRAY(type) _v39_parser_flag_array_##type
#define PARSE_FUNC(type) _v39_parse_##type
#define DUMP_FUNC(type) _v39_dump_##type
#define SPEC_FUNC(type) _v39_openapi_spec_##type
#define PARSE_DISABLED(type) \
static int PARSE_FUNC(type)(const parser_t *const parser, void *src, \
data_t *dst, args_t *args, \
data_t *parent_path) \
{ \
fatal_abort("parsing of DATA_PARSER_%s is not implemented", \
XSTRINGIFY(type)); \
}
/*
* Modify request for QOS will ignore an empty List. This allows slurmdbd to
* know we want this field to be empty.
*/
#define EMPTY_QOS_ID_ENTRY "\'\'"
/* based on slurmdb_tres_rec_t but includes node and task */
typedef struct {
uint64_t count;
char *node;
uint64_t task;
uint32_t id;
char *name;
char *type;
} slurmdb_tres_nct_rec_t;
typedef enum {
TRES_EXPLODE_COUNT = 1,
TRES_EXPLODE_NODE,
TRES_EXPLODE_TASK,
} tres_explode_type_t;
typedef struct {
int magic; /* MAGIC_LIST_PER_TRES_TYPE_NCT */
tres_explode_type_t type;
slurmdb_tres_nct_rec_t *tres_nct;
int tres_nct_count;
hostlist_t *host_list;
args_t *args;
const parser_t *const parser;
} foreach_list_per_tres_type_nct_t;
typedef struct {
int magic; /* MAGIC_FOREACH_POPULATE_GLOBAL_TRES_LIST */
slurmdb_tres_nct_rec_t *tres_nct;
int tres_nct_count;
int offset;
} foreach_populate_g_tres_list;
typedef struct {
int magic; /* MAGIC_FOREACH_STRING_ID */
const parser_t *const parser;
data_t *ddst;
data_t *parent_path;
const char *caller;
ssize_t index;
List qos_list;
args_t *args;
} foreach_qos_string_id_t;
typedef struct {
int magic; /* MAGIC_FOREACH_STRING_ARRAY */
char **array;
int i;
const parser_t *const parser;
args_t *args;
} foreach_string_array_t;
typedef struct {
int magic; /* MAGIC_FOREACH_HOSTLIST */
const parser_t *const parser;
args_t *args;
hostlist_t *host_list;
data_t *parent_path;
} foreach_hostlist_parse_t;
static int PARSE_FUNC(UINT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *str, args_t *args,
data_t *parent_path);
static void SPEC_FUNC(UINT64_NO_VAL)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst);
static int PARSE_FUNC(UINT64)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path);
static int DUMP_FUNC(UINT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args);
#ifndef NDEBUG
static void _check_flag_bit(int8_t i, const flag_bit_t *bit, bool *found_bit)
{
xassert(bit->magic == MAGIC_FLAG_BIT);
xassert(bit->type > FLAG_BIT_TYPE_INVALID);
xassert(bit->type < FLAG_BIT_TYPE_MAX);
xassert(bit->name && bit->name[0]);
/* mask must be set */
xassert(bit->mask);
xassert(bit->flag_size <= sizeof(bit->value));
xassert(bit->flag_size > 0);
xassert(bit->flag_name && bit->flag_name[0]);
xassert(bit->mask_size <= sizeof(bit->value));
xassert(bit->mask_size > 0);
xassert(bit->mask_name && bit->mask_name[0]);
if (bit->type == FLAG_BIT_TYPE_BIT) {
/* atleast one bit must be set */
xassert(bit->value);
/* mask must include all value bits */
xassert((bit->mask & bit->value) == bit->value);
*found_bit = true;
} else if (bit->type == FLAG_BIT_TYPE_EQUAL) {
/*
* bit->mask must include all value bits
* (if there are any)
*/
xassert(!bit->value ||
((bit->mask & bit->value) == bit->value));
/*
* All equal type flags should come before any bit
* type flags to avoid issues with masks overlapping
*/
xassert(!*found_bit);
}
}
extern void check_parser_funcname(const parser_t *const parser,
const char *func_name)
{
xassert(parser->magic == MAGIC_PARSER);
xassert(parser->model > PARSER_MODEL_INVALID);
xassert(parser->model < PARSER_MODEL_MAX);
xassert(parser->size > 0);
xassert(parser->obj_type_string && parser->obj_type_string[0]);
if (parser->model == PARSER_MODEL_ARRAY_SKIP_FIELD) {
/* field is only a place holder so most assert()s dont apply */
xassert(parser->field_name && parser->field_name[0]);
xassert(parser->type == DATA_PARSER_TYPE_INVALID);
xassert(!parser->flag_bit_array_count);
xassert(parser->needs == NEED_NONE);
xassert(!parser->field_name_overloads);
xassert(!parser->key);
xassert(!parser->type_string);
xassert(!parser->required);
xassert((parser->ptr_offset < NO_VAL) ||
(parser->ptr_offset >= 0));
return;
}
xassert(parser->type > DATA_PARSER_TYPE_INVALID);
xassert(parser->type < DATA_PARSER_TYPE_MAX);
xassert(parser->type_string && parser->type_string[0]);
if (parser->model == PARSER_MODEL_FLAG_ARRAY) {
bool found_bit_type = false;
/* parser of a specific flag field list */
xassert(parser->flag_bit_array);
xassert(parser->flag_bit_array_count < NO_VAL8);
for (int8_t i = 0; i < parser->flag_bit_array_count; i++) {
_check_flag_bit(i, &parser->flag_bit_array[i],
&found_bit_type);
/* check for duplicate flag names */
for (int8_t j = 0; j < parser->flag_bit_array_count;
j++) {
xassert((i == j) ||
xstrcasecmp(parser->flag_bit_array[i]
.name,
parser->flag_bit_array[j]
.name));
}
}
/* make sure this is not a list or array type */
xassert(parser->list_type == DATA_PARSER_TYPE_INVALID);
xassert(!parser->fields);
xassert(!parser->field_count);
xassert(!parser->parse);
xassert(!parser->dump);
xassert(parser->ptr_offset == NO_VAL);
xassert(!parser->pointer_type);
xassert(!parser->array_type);
xassert(!parser->obj_openapi);
} else if (parser->model == PARSER_MODEL_LIST) {
/* parser of a List */
xassert(parser->list_type > DATA_PARSER_TYPE_INVALID);
xassert(parser->list_type < DATA_PARSER_TYPE_MAX);
xassert(!parser->flag_bit_array_count);
xassert(!parser->fields);
xassert(!parser->field_count);
xassert(!parser->parse);
xassert(!parser->dump);
xassert(parser->size == sizeof(list_t *));
xassert(parser->ptr_offset == NO_VAL);
xassert(!parser->pointer_type);
xassert(!parser->array_type);
xassert(!parser->obj_openapi);
} else if (parser->model == PARSER_MODEL_ARRAY) {
/* parser of a parser Array */
xassert(parser->field_count > 0);
xassert(parser->ptr_offset == NO_VAL);
xassert(!parser->flag_bit_array_count);
xassert(!parser->parse);
xassert(!parser->dump);
xassert(parser->list_type == DATA_PARSER_TYPE_INVALID);
xassert(parser->fields);
xassert(!parser->pointer_type);
xassert(!parser->array_type);
xassert(!parser->obj_openapi);
for (int i = 0; i < parser->field_count; i++) {
/* recursively check the child parsers */
check_parser(&parser->fields[i]);
/*
* Verify each field_name is unique while ignoring
* complex parsers.
*/
if (parser->fields[i].field_name) {
int matches = 0;
for (int j = 0; j < parser->field_count; j++) {
if (i == j)
continue;
if (!xstrcasecmp(
parser->fields[i].field_name,
parser->fields[j].field_name))
matches++;
}
xassert(matches ==
parser->fields[i].field_name_overloads);
}
/*
* Verify each key path is unique while ignoring skipped
* parsers
*/
if (parser->fields[i].key)
for (int j = 0; j < parser->field_count; j++)
xassert((i == j) ||
xstrcasecmp(parser->fields[i]
.key,
parser->fields[j]
.key));
}
} else if (parser->model == PARSER_MODEL_ARRAY_LINKED_FIELD) {
/* parser array link to a another parser */
const parser_t *const linked =
find_parser_by_type(parser->type);
xassert(parser->key && parser->key[0]);
xassert(!parser->flag_bit_array_count);
xassert(!parser->fields);
xassert(!parser->field_count);
xassert(!parser->parse);
xassert(!parser->dump);
xassert(parser->list_type == DATA_PARSER_TYPE_INVALID);
xassert(!parser->pointer_type);
xassert(!parser->array_type);
xassert(!parser->obj_openapi);
switch (linked->model) {
case PARSER_MODEL_ARRAY:
case PARSER_MODEL_SIMPLE:
case PARSER_MODEL_FLAG_ARRAY:
case PARSER_MODEL_LIST:
case PARSER_MODEL_PTR:
case PARSER_MODEL_NT_ARRAY:
case PARSER_MODEL_NT_PTR_ARRAY:
xassert(parser->field_name && parser->field_name[0]);
/* linked parsers must always be the same size */
xassert(parser->size ==
find_parser_by_type(parser->type)->size);
xassert((parser->ptr_offset < NO_VAL) ||
(parser->ptr_offset >= 0));
break;
case PARSER_MODEL_COMPLEX:
xassert(!parser->field_name);
/*
* complex uses the size of the struct which we don't
* know here
*/
xassert(parser->size > 0);
xassert(parser->size <= NO_VAL);
xassert(parser->ptr_offset == NO_VAL);
break;
case PARSER_MODEL_ARRAY_LINKED_FIELD:
fatal_abort("linked parsers must not link to other linked parsers");
case PARSER_MODEL_ARRAY_SKIP_FIELD:
fatal_abort("linked parsers must not link to a skip parsers");
case PARSER_MODEL_INVALID:
case PARSER_MODEL_MAX:
fatal_abort("invalid model");
}
} else if ((parser->model == PARSER_MODEL_SIMPLE) ||
(parser->model == PARSER_MODEL_COMPLEX)) {
xassert(parser->ptr_offset == NO_VAL);
xassert(!parser->key);
xassert(!parser->field_name);
xassert(!parser->flag_bit_array_count);
xassert(!parser->fields);
xassert(!parser->field_count);
xassert(parser->parse);
xassert(parser->dump);
xassert(parser->list_type == DATA_PARSER_TYPE_INVALID);
if ((parser->obj_openapi == OPENAPI_FORMAT_ARRAY) ||
(parser->obj_openapi == OPENAPI_FORMAT_OBJECT) ||
(parser->obj_openapi == OPENAPI_FORMAT_INVALID)) {
/*
* Only one of the overrides is allowed but one must be
* set
*/
if (parser->array_type) {
xassert(!parser->pointer_type);
xassert(!parser->openapi_spec);
} else if (parser->pointer_type) {
xassert(!parser->array_type);
xassert(!parser->openapi_spec);
} else if (parser->openapi_spec) {
xassert(!parser->array_type);
xassert(!parser->pointer_type);
xassert(parser->obj_openapi >
OPENAPI_FORMAT_INVALID);
xassert(parser->obj_openapi <
OPENAPI_FORMAT_MAX);
} else {
fatal_abort("invalid openapi override");
}
} else {
xassert(parser->obj_openapi > OPENAPI_FORMAT_INVALID);
xassert(parser->obj_openapi < OPENAPI_FORMAT_MAX);
xassert(!parser->pointer_type);
xassert(!parser->array_type);
xassert(!parser->openapi_spec);
}
} else if (parser->model == PARSER_MODEL_PTR) {
xassert(parser->pointer_type > DATA_PARSER_TYPE_INVALID);
xassert(parser->pointer_type < DATA_PARSER_TYPE_MAX);
xassert(parser->size == sizeof(void *));
xassert(parser->ptr_offset == NO_VAL);
xassert(!parser->field_name);
xassert(!parser->key);
xassert(!parser->field_name);
xassert(!parser->flag_bit_array_count);
xassert(!parser->fields);
xassert(!parser->field_count);
xassert(!parser->parse);
xassert(!parser->dump);
xassert(parser->list_type == DATA_PARSER_TYPE_INVALID);
xassert(!parser->array_type);
xassert(!parser->obj_openapi);
} else if ((parser->model == PARSER_MODEL_NT_ARRAY) ||
(parser->model == PARSER_MODEL_NT_PTR_ARRAY)) {
xassert(!parser->pointer_type);
xassert(parser->array_type > DATA_PARSER_TYPE_INVALID);
xassert(parser->array_type < DATA_PARSER_TYPE_MAX);
xassert(parser->size == sizeof(void *));
xassert(parser->ptr_offset == NO_VAL);
xassert(!parser->field_name);
xassert(!parser->key);
xassert(!parser->field_name);
xassert(!parser->flag_bit_array_count);
xassert(!parser->fields);
xassert(!parser->field_count);
xassert(!parser->parse);
xassert(!parser->dump);
xassert(parser->list_type == DATA_PARSER_TYPE_INVALID);
xassert(!parser->obj_openapi);
} else {
fatal_abort("invalid parser model %u", parser->model);
}
}
#endif /* !NDEBUG */
static int PARSE_FUNC(QOS_ID)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
int rc;
slurmdb_qos_rec_t *qos = NULL;
uint32_t *qos_id = obj;
xassert(args->magic == MAGIC_ARGS);
if ((rc = resolve_qos(PARSING, parser, &qos, src, args, parent_path,
__func__, false)))
return rc;
if (qos)
*qos_id = qos->id;
else
*qos_id = INFINITE;
return rc;
}
static int PARSE_FUNC(QOS_NAME)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
int rc;
slurmdb_qos_rec_t *qos = NULL;
char **qos_name = obj;
xassert(args->magic == MAGIC_ARGS);
if (!(rc = resolve_qos(PARSING, parser, &qos, src, args, parent_path,
__func__, true))) {
*qos_name = xstrdup(qos->name);
return rc;
}
/*
* QOS names may not always be resolvable to a known QOS such as in the
* case of creating a new QOS which references a new QOS in the same QOS
* list. To ignore this chicken and the egg problem, we just blindly
* send the QOS name to slurmdbd if we can stringifiy it.
*/
if (data_get_type(src) == DATA_TYPE_DICT) {
data_t *n = data_key_get(src, "name");
if (n && !data_get_string_converted(n, qos_name))
return SLURM_SUCCESS;
rc = ESLURM_REST_FAIL_PARSING;
} else if (!data_get_string_converted(src, qos_name))
return SLURM_SUCCESS;
if (rc) {
char *name = NULL, *path = NULL;
if (data_get_string_converted(src, &name))
name = xstrdup_printf("of type %s",
data_get_type_string(src));
on_error(PARSING, parser->type, args, rc,
set_source_path(&path, parent_path),
__func__, "Unable to resolve QOS %s", name);
xfree(name);
xfree(path);
}
return rc;
}
static int DUMP_FUNC(QOS_NAME)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
char **name = obj;
xassert(args->magic == MAGIC_ARGS);
(void) data_set_string(dst, *name);
return SLURM_SUCCESS;
}
static int DUMP_FUNC(QOS_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *qos_id = obj;
slurmdb_qos_rec_t *qos = NULL;
xassert(args->magic == MAGIC_ARGS);
if (*qos_id == 0) {
data_set_string(dst, "");
return SLURM_SUCCESS;
}
/* find qos by id from global list */
xassert(args->qos_list);
if (!args->qos_list || list_is_empty(args->qos_list)) {
/* no known QOS to search */
return SLURM_SUCCESS;
}
qos = list_find_first(args->qos_list, slurmdb_find_qos_in_list, qos_id);
if (!qos) {
(void) data_set_string(dst, "Unknown");
/*
* The QOS is either invalid or unknown.
* Since this is coming from Slurm internally, issue a warning
* instead of erroring out to allow graceful dumping of the
* data.
*/
on_warn(DUMPING, parser->type, args, NULL, __func__,
"Unknown QOS with id#%u. Unable to dump QOS.", *qos_id);
return SLURM_SUCCESS;
}
/*
* Client is only ever provided the QOS name and not the ID as the is a
* Slurm internal that no user should have to track.
*/
(void) data_set_string(dst, qos->name);
return SLURM_SUCCESS;
}
static int _foreach_dump_qos_string_id(void *x, void *arg)
{
char *string_id = x;
foreach_qos_string_id_t *argstruct = arg;
const parser_t *const parser = argstruct->parser;
data_t *dst = argstruct->ddst;
args_t *args = argstruct->args;
data_t *dstring_id = data_set_string(data_new(), string_id);
data_t *parent_path = data_set_list(data_new());
slurmdb_qos_rec_t *qos = NULL;
data_set_string_fmt(data_list_append(parent_path), "QOS[%s]",
string_id);
xassert(argstruct->magic == MAGIC_FOREACH_STRING_ID);
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_LIST);
if (resolve_qos(DUMPING, parser, &qos, dstring_id, args, dstring_id,
__func__, false)) {
FREE_NULL_DATA(dstring_id);
FREE_NULL_DATA(parent_path);
return ESLURM_INVALID_QOS;
}
FREE_NULL_DATA(dstring_id);
FREE_NULL_DATA(parent_path);
(void) data_set_string(data_list_append(dst), qos->name);
return SLURM_SUCCESS;
}
static int DUMP_FUNC(QOS_STRING_ID_LIST)(const parser_t *const parser,
void *obj, data_t *dst, args_t *args)
{
/*
* QOS string ID list is special because the contents have dynamic sizes
* which must be accounted for while dumping and parsing
*/
List *qos_list_ptr = obj;
List qos_list = *qos_list_ptr;
foreach_qos_string_id_t argstruct = { .magic = MAGIC_FOREACH_STRING_ID,
.parser = parser,
.args = args,
.ddst = dst };
if (!qos_list)
return SLURM_SUCCESS;
xassert(list_count(qos_list) >= 0);
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(list_count(args->qos_list) >= 0);
data_set_list(dst);
if (list_for_each(qos_list, _foreach_dump_qos_string_id, &argstruct) <
0)
return SLURM_ERROR;
return SLURM_SUCCESS;
}
static data_for_each_cmd_t _foreach_parse_qos_string_id(data_t *src, void *arg)
{
foreach_qos_string_id_t *argstruct = arg;
const parser_t *const parser = argstruct->parser;
List qos_list = argstruct->qos_list;
data_t *parent_path = argstruct->parent_path;
args_t *args = argstruct->args;
const char *caller = argstruct->caller;
slurmdb_qos_rec_t *qos = NULL;
data_t *ppath = data_copy(NULL, parent_path);
data_t *ppath_last = data_get_list_last(ppath);
int rc;
if (argstruct->index < 0)
argstruct->index = 0;
/* Use jq style array zero based array notation */
data_set_string_fmt(ppath_last, "%s[%zu]", data_get_string(ppath_last),
argstruct->index);
if (!(rc = resolve_qos(PARSING, parser, &qos, src, args, parent_path,
caller, false)))
list_append(qos_list, xstrdup_printf("%u", qos->id));
FREE_NULL_DATA(ppath);
return (rc ? DATA_FOR_EACH_FAIL : DATA_FOR_EACH_CONT);
}
static int PARSE_FUNC(QOS_STRING_ID_LIST)(const parser_t *const parser,
void *obj, data_t *src, args_t *args,
data_t *parent_path)
{
List *qos_list_ptr = obj;
foreach_qos_string_id_t argstruct = {
.magic = MAGIC_FOREACH_STRING_ID,
.parser = parser,
.args = args,
.qos_list = list_create(xfree_ptr),
.parent_path = parent_path,
.caller = __func__,
.index = -1,
};
xassert(args->magic == MAGIC_ARGS);
if (data_list_for_each(src, _foreach_parse_qos_string_id, &argstruct) <
0) {
FREE_NULL_LIST(argstruct.qos_list);
return ESLURM_REST_FAIL_PARSING;
}
*qos_list_ptr = argstruct.qos_list;
return SLURM_SUCCESS;
}
static int PARSE_FUNC(QOS_PREEMPT_LIST)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
int rc;
slurmdb_qos_rec_t *qos = obj;
xassert(!qos->preempt_list);
if ((rc = PARSE(QOS_STRING_ID_LIST, qos->preempt_list, src, parent_path,
args)))
return rc;
if (list_is_empty(qos->preempt_list)) {
/*
* If the QOS list is empty, then we need to set this special
* entry to notify slurmdbd that this is explicilty empty and
* not a no change request
*/
list_append(qos->preempt_list, EMPTY_QOS_ID_ENTRY);
}
return SLURM_SUCCESS;
}
static int DUMP_FUNC(QOS_PREEMPT_LIST)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
slurmdb_qos_rec_t *qos = obj;
xassert(args->magic == MAGIC_ARGS);
check_parser(parser);
xassert(args->qos_list);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(!qos->preempt_list);
data_set_list(dst);
if (!args->qos_list)
return ESLURM_NOT_SUPPORTED;
/* skip empty lists */
if (!qos->preempt_bitstr || (bit_ffs(qos->preempt_bitstr) == -1))
return SLURM_SUCCESS;
/* based on get_qos_complete_str_bitstr() */
for (int i = 1; (i < bit_size(qos->preempt_bitstr)); i++) {
slurmdb_qos_rec_t *ptr_qos;
if (!bit_test(qos->preempt_bitstr, i))
continue;
if (!(ptr_qos =
list_find_first(args->qos_list,
slurmdb_find_qos_in_list, &i))) {
int rc;
char *bits = bit_fmt_full(qos->preempt_bitstr);
/*
* There is a race condition here where the global
* QOS list could have changed betwen the query of the
* list and the bitstrs. Just error and have the user
* try again if they want.
*/
rc = on_error(
DUMPING, parser->type, args, ESLURM_INVALID_QOS,
"list_find_first()->slurmdb_find_qos_in_list()",
__func__,
"Unable to resolve Preempt QOS (bit %u/%" PRId64 "[%s]) in QOS %s(%u)",
i, bit_size(qos->preempt_bitstr), bits,
qos->name, qos->id);
xfree(bits);
if (rc)
return rc;
} else {
data_set_string(data_list_append(dst), ptr_qos->name);
}
}
return SLURM_SUCCESS;
}
static int PARSE_FUNC(JOB_ASSOC_ID)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
int rc = SLURM_SUCCESS;
slurmdb_job_rec_t *job = obj;
slurmdb_assoc_rec_t *assoc = xmalloc(sizeof(*assoc));
slurmdb_init_assoc_rec(assoc, false);
xassert(args->magic == MAGIC_ARGS);
check_parser(parser);
rc = PARSE(ASSOC_SHORT, assoc, src, parent_path, args);
if (!rc) {
slurmdb_assoc_rec_t *match =
list_find_first(args->assoc_list,
(ListFindF) compare_assoc, assoc);
if (match)
job->associd = match->id;
else
rc = ESLURM_REST_EMPTY_RESULT;
}
slurmdb_destroy_assoc_rec(assoc);
return rc;
}
static int DUMP_FUNC(JOB_ASSOC_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
slurmdb_job_rec_t *job = obj;
slurmdb_assoc_rec_t *assoc = NULL;
slurmdb_assoc_rec_t assoc_key = {
.cluster = job->cluster, .id = job->associd
};
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->assoc_list);
if (!job->associd || (job->associd == NO_VAL) ||
!(assoc = list_find_first(args->assoc_list,
(ListFindF) compare_assoc,
&assoc_key))) {
/*
* The association is either invalid or unknown or deleted.
* Since this is coming from Slurm internally, issue a warning
* instead of erroring out to allow graceful dumping of the
* data.
*/
on_warn(DUMPING, parser->type, args, NULL, __func__,
"Unknown association with id#%u. Unable to dump association.",
job->associd);
data_set_dict(dst);
return SLURM_SUCCESS;
} else {
return DUMP(ASSOC_SHORT_PTR, assoc, dst, args);
}
}
static int _foreach_resolve_tres_id(void *x, void *arg)
{
slurmdb_tres_rec_t *tres = (slurmdb_tres_rec_t *) x;
args_t *args = arg;
slurmdb_tres_rec_t *ftres;
xassert(args->magic == MAGIC_ARGS);
if (!tres->type && tres->id) {
/* resolve type/name if only id provided */
slurmdb_tres_rec_t *c =
list_find_first_ro(args->tres_list,
slurmdb_find_tres_in_list,
&tres->id);
if (c) {
tres->type = xstrdup(c->type);
tres->name = xstrdup(c->name);
}
}
/*
* This may be a new TRES being created so there won't be an
* existing TRES to compare against.
*/
if (!(ftres = list_find_first_ro(args->tres_list,
(ListFindF) fuzzy_match_tres, tres)))
return SLURM_SUCCESS;
/* verify ID if possible */
if ((tres->id > 0) && (tres->id != ftres->id))
return ESLURM_INVALID_TRES;
if (!tres->id)
tres->id = ftres->id;
return SLURM_SUCCESS;
}
static int PARSE_FUNC(TRES_STR)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
char **tres = obj;
int rc = SLURM_SUCCESS;
List tres_list = NULL;
char *path = NULL;
xassert(!*tres);
xassert(args->magic == MAGIC_ARGS);
if (!args->tres_list) {
/* should not happen */
xassert(args->tres_list);
rc = ESLURM_NOT_SUPPORTED;
goto cleanup;
}
if (data_get_type(src) != DATA_TYPE_LIST) {
rc = on_error(PARSING, parser->type, args,
ESLURM_REST_FAIL_PARSING,
set_source_path(&path, parent_path), __func__,
"TRES should be LIST but is type %s",
data_get_type_string(src));
goto cleanup;
}
if (!data_get_list_length(src)) {
/* Ignore empty list used as workaround for OpenAPI clients */
goto cleanup;
}
if ((rc = PARSE(TRES_LIST, tres_list, src, parent_path, args)))
goto cleanup;
list_for_each(tres_list, _foreach_resolve_tres_id, args);
if ((*tres = slurmdb_make_tres_string(tres_list,
TRES_STR_FLAG_SIMPLE))) {
rc = SLURM_SUCCESS;
} else {
rc = on_error(PARSING, parser->type, args,
ESLURM_REST_FAIL_PARSING,
set_source_path(&path, parent_path), __func__,
"Unable to convert TRES to string");
xassert(!rc); /* should not have failed */
}
cleanup:
xfree(path);
FREE_NULL_LIST(tres_list);
return rc;
}
static int DUMP_FUNC(TRES_STR)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int rc;
char **tres = obj;
List tres_list = NULL;
xassert(args->magic == MAGIC_ARGS);
xassert(args->tres_list && (list_count(args->tres_list) >= 0));
if (!args->tres_list) {
xassert(false);
return on_error(DUMPING, parser->type, args,
ESLURM_NOT_SUPPORTED, "TRES list not available",
__func__, "TRES conversion requires TRES list");
}
if (!*tres || !*tres[0]) {
/*
* Ignore empty TRES strings but set result as List for OpenAPI
* clients.
*/
data_set_list(dst);
return SLURM_SUCCESS;
}
slurmdb_tres_list_from_string(&tres_list, *tres, TRES_STR_FLAG_BYTES);
if (!tres_list) {
rc = on_error(DUMPING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
"slurmdb_tres_list_from_string", __func__,
"Unable to convert TRES from string");
}
if (list_is_empty(tres_list))
goto cleanup;
list_for_each(tres_list, _foreach_resolve_tres_id, args);
if ((rc = DUMP(TRES_LIST, tres_list, dst, args)))
return rc;
cleanup:
FREE_NULL_LIST(tres_list);
return SLURM_SUCCESS;
}
static int _foreach_list_per_tres_type_nct(void *x, void *arg)
{
slurmdb_tres_rec_t *tres = (slurmdb_tres_rec_t *) x;
foreach_list_per_tres_type_nct_t *args = arg;
slurmdb_tres_nct_rec_t *tres_nct = NULL;
xassert(args->magic == MAGIC_LIST_PER_TRES_TYPE_NCT);
for (int i = 0; i < args->tres_nct_count; i++)
if (args->tres_nct[i].id == tres->id)
tres_nct = args->tres_nct + i;
xassert(tres_nct);
if (!tres_nct)
/* out of sync?? */
return -1;
switch (args->type) {
case TRES_EXPLODE_NODE:
xassert(!tres_nct->node);
free(tres_nct->node);
/* based on find_hostname() */
tres_nct->node = hostlist_nth(args->host_list, tres->count);
return 1;
case TRES_EXPLODE_TASK:
xassert(!tres_nct->task);
tres_nct->task = tres->count;
return 1;
case TRES_EXPLODE_COUNT:
xassert(!tres_nct->count);
tres_nct->count = tres->count;
return 1;
default :
fatal("%s: unexpected type", __func__);
}
}
static int _foreach_populate_g_tres_list(void *x, void *arg)
{
slurmdb_tres_rec_t *tres = x;
foreach_populate_g_tres_list *args = arg;
slurmdb_tres_nct_rec_t *tres_nct = args->tres_nct + args->offset;
xassert(args->magic == MAGIC_FOREACH_POPULATE_GLOBAL_TRES_LIST);
tres_nct->id = tres->id;
tres_nct->name = tres->name;
tres_nct->type = tres->type;
xassert(args->offset < args->tres_nct_count);
args->offset += 1;
return 0;
}
static int _dump_tres_nct(const parser_t *const parser, data_t *dst,
char *tres_count, char *tres_node, char *tres_task,
char *nodes, args_t *args)
{
int rc = SLURM_SUCCESS;
foreach_list_per_tres_type_nct_t fargs = {
.magic = MAGIC_LIST_PER_TRES_TYPE_NCT,
.args = args,
.parser = parser,
};
foreach_populate_g_tres_list gtres_args = {
.magic = MAGIC_FOREACH_POPULATE_GLOBAL_TRES_LIST,
};
slurmdb_tres_nct_rec_t *tres_nct = NULL;
int tres_nct_count = 0;
List tres_count_list = NULL;
List tres_node_list = NULL;
List tres_task_list = NULL;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
xassert(args->tres_list);
if (!args->tres_list)
goto cleanup;
if (!tres_count && !tres_node && !tres_task)
/* ignore empty TRES strings */
goto cleanup;
fargs.tres_nct_count = gtres_args.tres_nct_count = tres_nct_count =
list_count(args->tres_list);
fargs.tres_nct = gtres_args.tres_nct = tres_nct =
xcalloc(list_count(args->tres_list), sizeof(*tres_nct));
if (list_for_each_ro(args->tres_list, _foreach_populate_g_tres_list,
&gtres_args) < 0)
goto cleanup;
fargs.host_list = hostlist_create(nodes);
slurmdb_tres_list_from_string(&tres_count_list, tres_count,
TRES_STR_FLAG_BYTES);
slurmdb_tres_list_from_string(&tres_node_list, tres_node,
TRES_STR_FLAG_BYTES);
slurmdb_tres_list_from_string(&tres_task_list, tres_task,
TRES_STR_FLAG_BYTES);
fargs.type = TRES_EXPLODE_COUNT;
if (tres_count_list &&
(list_for_each(tres_count_list, _foreach_list_per_tres_type_nct,
&fargs) < 0))
goto cleanup;
fargs.type = TRES_EXPLODE_NODE;
if (tres_node_list &&
(list_for_each(tres_node_list, _foreach_list_per_tres_type_nct,
&fargs) < 0))
goto cleanup;
fargs.type = TRES_EXPLODE_TASK;
if (tres_task_list &&
(list_for_each(tres_task_list, _foreach_list_per_tres_type_nct,
&fargs) < 0))
goto cleanup;
/* clear type to catch unintended reuse */
fargs.type = 0;
for (int i = 0; !rc && (i < tres_nct_count); i++)
if (tres_nct[i].count || tres_nct[i].node || tres_nct[i].task)
rc = DUMP(TRES_NCT, tres_nct[i],
data_set_dict(data_list_append(dst)), args);
cleanup:
FREE_NULL_LIST(tres_count_list);
FREE_NULL_LIST(tres_node_list);
FREE_NULL_LIST(tres_task_list);
FREE_NULL_HOSTLIST(fargs.host_list);
for (int i = 0; i < tres_nct_count; i++)
/* hostlist_nth doesn't use xfree() */
free(tres_nct[i].node);
xfree(tres_nct);
return rc;
}
PARSE_DISABLED(JOB_EXIT_CODE)
static int DUMP_FUNC(JOB_EXIT_CODE)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *ec = obj;
data_t *drc, *dsc;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
(void) data_set_dict(dst);
dsc = data_key_set(dst, "status");
drc = data_key_set(dst, "return_code");
if (*ec == NO_VAL) {
data_set_string(dsc, "PENDING");
data_set_int(drc, 0);
} else if (WIFEXITED(*ec)) {
data_set_string(dsc, "SUCCESS");
data_set_int(drc, 0);
} else if (WIFSIGNALED(*ec)) {
data_t *sig = data_set_dict(data_key_set(dst, "signal"));
data_set_string(dsc, "SIGNALED");
data_set_int(data_key_set(sig, "signal_id"), WTERMSIG(*ec));
data_set_string(data_key_set(sig, "name"),
strsignal(WTERMSIG(*ec)));
data_set_int(drc, -127);
} else if (WCOREDUMP(*ec)) {
data_set_string(dsc, "CORE_DUMPED");
data_set_int(drc, -127);
} else {
data_set_string(dsc, "ERROR");
data_set_int(drc, WEXITSTATUS(*ec));
}
return SLURM_SUCCESS;
}
void SPEC_FUNC(JOB_EXIT_CODE)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
data_t *props, *sig;
props = set_openapi_props(dst, OPENAPI_FORMAT_OBJECT,
"job exit details");
set_openapi_props(data_key_set(props, "status"), OPENAPI_FORMAT_STRING,
"exit status");
set_openapi_props(data_key_set(props, "return_code"),
OPENAPI_FORMAT_INT32, "return code (numeric)");
sig = set_openapi_props(data_key_set(props, "signal"),
OPENAPI_FORMAT_OBJECT,
"Job exited due to signal");
set_openapi_props(data_key_set(sig, "signal_id"), OPENAPI_FORMAT_INT32,
"signal numeric ID");
set_openapi_props(data_key_set(sig, "name"), OPENAPI_FORMAT_STRING,
"signal name");
}
PARSE_DISABLED(JOB_USER)
static int DUMP_FUNC(JOB_USER)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
char *user;
slurmdb_job_rec_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
/* job user may be set but fail back to resolving the uid */
if (job->user && job->user[0]) {
data_set_string(dst, job->user);
return SLURM_SUCCESS;
}
user = uid_to_string_or_null(job->uid);
if (user && user[0]) {
data_set_string_own(dst, user);
return SLURM_SUCCESS;
}
data_set_null(dst);
xfree(user);
return SLURM_SUCCESS;
}
PARSE_DISABLED(ROLLUP_STATS)
static int DUMP_FUNC(ROLLUP_STATS)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
slurmdb_rollup_stats_t *rollup_stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!rollup_stats) {
return on_error(DUMPING, parser->type, args,
ESLURM_DATA_CONV_FAILED, "slurmctld", __func__,
"rollup stats not provided by controller");
}
for (int i = 0; i < DBD_ROLLUP_COUNT; i++) {
data_t *d;
uint64_t roll_ave;
if (rollup_stats->time_total[i] == 0)
continue;
d = data_set_dict(data_list_append(dst));
if (i == 0)
data_set_string(data_key_set(d, "type"), "internal");
else if (i == 1)
data_set_string(data_key_set(d, "type"), "user");
else
data_set_string(data_key_set(d, "type"), "unknown");
data_set_int(data_key_set(d, "last_run"),
rollup_stats->timestamp[i]);
roll_ave = rollup_stats->time_total[i];
if (rollup_stats->count[i] > 1)
roll_ave /= rollup_stats->count[i];
data_set_int(data_key_set(d, "last_cycle"),
rollup_stats->time_last[i]);
data_set_int(data_key_set(d, "max_cycle"),
rollup_stats->time_max[i]);
data_set_int(data_key_set(d, "total_time"),
rollup_stats->time_total[i]);
data_set_int(data_key_set(d, "total_cycles"),
rollup_stats->count[i]);
data_set_int(data_key_set(d, "mean_cycles"), roll_ave);
}
return SLURM_SUCCESS;
}
void SPEC_FUNC(ROLLUP_STATS)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
data_t *items, *rec, *type, *types;
items = set_openapi_props(dst, OPENAPI_FORMAT_ARRAY,
"list of recorded rollup statistics");
rec = set_openapi_props(items, OPENAPI_FORMAT_OBJECT,
"recorded rollup statistics");
type = data_key_set(rec, "type");
set_openapi_props(type, OPENAPI_FORMAT_STRING, "type");
types = data_set_list(data_key_set(type, "enum"));
data_set_string(data_list_append(types), "internal");
data_set_string(data_list_append(types), "user");
data_set_string(data_list_append(types), "unknown");
set_openapi_props(data_key_set(rec, "last run"), OPENAPI_FORMAT_INT32,
"Last time rollup ran (UNIX timestamp)");
set_openapi_props(data_key_set(rec, "max_cycle"), OPENAPI_FORMAT_INT64,
"longest rollup time (seconds)");
set_openapi_props(data_key_set(rec, "total_time"), OPENAPI_FORMAT_INT64,
"total time spent doing rollups (seconds)");
set_openapi_props(data_key_set(rec, "total_cycles"),
OPENAPI_FORMAT_INT64,
"number of rollups since last_run");
set_openapi_props(data_key_set(rec, "mean_cycles"),
OPENAPI_FORMAT_INT64,
"average time for rollup (seconds)");
}
PARSE_DISABLED(RPC_ID)
static int DUMP_FUNC(RPC_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
slurmdbd_msg_type_t *id = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_string(dst, slurmdbd_msg_type_2_str(*id, 1));
return SLURM_SUCCESS;
}
static int PARSE_FUNC(SELECT_PLUGIN_ID)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
int *id = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL)
return ESLURM_REST_FAIL_PARSING;
else if (data_convert_type(src, DATA_TYPE_STRING) == DATA_TYPE_STRING &&
(*id = select_string_to_plugin_id(data_get_string(src)) > 0))
return SLURM_SUCCESS;
return ESLURM_REST_FAIL_PARSING;
}
static int DUMP_FUNC(SELECT_PLUGIN_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int *id = obj;
char *s = select_plugin_id_to_string(*id);
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (s) {
data_set_string(dst, s);
} else
data_set_string(dst, "");
return SLURM_SUCCESS;
}
PARSE_DISABLED(TASK_DISTRIBUTION)
static int DUMP_FUNC(TASK_DISTRIBUTION)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *dist = obj;
char *d = slurm_step_layout_type_name(*dist);
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_string_own(dst, d);
return SLURM_SUCCESS;
}
PARSE_DISABLED(SLURM_STEP_ID)
static int DUMP_FUNC(SLURM_STEP_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int rc = SLURM_SUCCESS;
slurm_step_id_t *id = obj;
xassert(args->magic == MAGIC_ARGS);
data_set_dict(dst);
if (id->job_id != NO_VAL)
data_set_int(data_key_set(dst, "job_id"), id->job_id);
if (id->step_het_comp != NO_VAL)
data_set_int(data_key_set(dst, "step_het_component"),
id->step_het_comp);
if (id->step_id != NO_VAL)
rc = DUMP(STEP_ID, id->step_id, data_key_set(dst, "step_id"),
args);
return rc;
}
void SPEC_FUNC(SLURM_STEP_ID)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
data_t *props =
set_openapi_props(dst, OPENAPI_FORMAT_OBJECT, "step details");
set_openapi_props(data_key_set(props, "job_id"), OPENAPI_FORMAT_INT32,
"JobID");
set_openapi_props(data_key_set(props, "step_het_component"),
OPENAPI_FORMAT_INT32, "HetStep");
set_openapi_parse_ref(data_key_set(props, "step_id"),
find_parser_by_type(DATA_PARSER_STEP_ID), spec,
args);
}
PARSE_DISABLED(STEP_ID)
static int DUMP_FUNC(STEP_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *id = obj;
xassert(args->magic == MAGIC_ARGS);
// TODO rewrite after bug#9622 resolved
switch (*id) {
case SLURM_EXTERN_CONT :
data_set_string(dst, "extern");
break;
case SLURM_BATCH_SCRIPT :
data_set_string(dst, "batch");
break;
case SLURM_PENDING_STEP :
data_set_string(dst, "pending");
break;
case SLURM_INTERACTIVE_STEP :
data_set_string(dst, "interactive");
break;
default :
data_set_string_fmt(dst, "%u", *id);
}
return SLURM_SUCCESS;
}
PARSE_DISABLED(WCKEY_TAG)
static int DUMP_FUNC(WCKEY_TAG)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
char **src = obj;
data_t *flags, *key;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!*src) {
data_set_null(dst);
return SLURM_SUCCESS;
}
key = data_key_set(data_set_dict(dst), "wckey");
flags = data_set_list(data_key_set(dst, "flags"));
if (*src[0] == '*') {
data_set_string(data_list_append(flags), "ASSIGNED_DEFAULT");
data_set_string(key, (*src + 1));
} else
data_set_string(key, *src);
return SLURM_SUCCESS;
}
void SPEC_FUNC(WCKEY_TAG)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
data_t *flags, *fenum;
data_t *props =
set_openapi_props(dst, OPENAPI_FORMAT_OBJECT, "wckey details");
set_openapi_props(data_key_set(props, "wckey"), OPENAPI_FORMAT_STRING,
"wckey");
flags = set_openapi_props(data_key_set(props, "flags"),
OPENAPI_FORMAT_ARRAY, "active flags");
set_openapi_props(flags, OPENAPI_FORMAT_STRING, "flag");
fenum = data_set_list(data_key_set(flags, "enum"));
data_set_string(data_list_append(fenum), "ASSIGNED_DEFAULT");
}
static int DUMP_FUNC(USER_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uid_t *uid = obj;
char *u;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((u = uid_to_string_or_null(*uid)))
data_set_string_own(dst, u);
else
data_set_string(dst, "");
return SLURM_SUCCESS;
}
static int PARSE_FUNC(USER_ID)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
uid_t *uid = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL)
return ESLURM_REST_FAIL_PARSING;
else if (data_convert_type(src, DATA_TYPE_STRING) == DATA_TYPE_STRING &&
!uid_from_string(data_get_string(src), uid))
return SLURM_SUCCESS;
return ESLURM_REST_FAIL_PARSING;
}
PARSE_DISABLED(GROUP_ID)
static int DUMP_FUNC(GROUP_ID)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
gid_t *gid = obj;
char *g;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((g = gid_to_string_or_null(*gid)))
data_set_string_own(dst, g);
else
data_set_null(dst);
return SLURM_SUCCESS;
}
PARSE_DISABLED(JOB_REASON)
static int DUMP_FUNC(JOB_REASON)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *state = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_string(dst, job_reason_string(*state));
return SLURM_SUCCESS;
}
PARSE_DISABLED(JOB_STATE)
static int DUMP_FUNC(JOB_STATE)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *state = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_string(dst, job_state_string(*state));
return SLURM_SUCCESS;
}
static int PARSE_FUNC(STRING)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
int rc = SLURM_SUCCESS;
char **dst = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL) {
xfree(*dst);
} else if (data_convert_type(str, DATA_TYPE_STRING) ==
DATA_TYPE_STRING) {
xfree(*dst);
*dst = xstrdup(data_get_string(str));
} else {
rc = ESLURM_DATA_CONV_FAILED;
}
debug5("%s: string %s rc[%d]=%s", __func__, *dst, rc,
slurm_strerror(rc));
return rc;
}
static int DUMP_FUNC(STRING)(const parser_t *const parser, void *obj,
data_t *data, args_t *args)
{
int rc = SLURM_SUCCESS;
char **src = obj;
xassert(args->magic == MAGIC_ARGS);
if (*src)
data_set_string(data, *src);
else
data_set_string(data, "");
return rc;
}
static int PARSE_FUNC(FLOAT128)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
long double *dst = obj;
int rc = SLURM_SUCCESS;
xassert(sizeof(long double) * 8 == 128);
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL)
*dst = (double) NO_VAL;
else if (data_convert_type(str, DATA_TYPE_FLOAT) == DATA_TYPE_FLOAT)
*dst = data_get_float(str);
else
rc = ESLURM_DATA_CONV_FAILED;
log_flag(DATA, "%s: string %Lf rc[%d]=%s", __func__, *dst, rc,
slurm_strerror(rc));
return rc;
}
static int DUMP_FUNC(FLOAT128)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
long double *src = obj;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
/* see bug#9674 */
if (((uint32_t) *src == INFINITE) || ((uint32_t) *src == NO_VAL))
data_set_null(dst);
else
(void) data_set_float(dst, *src);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(FLOAT64)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
double *dst = obj;
int rc = SLURM_SUCCESS;
xassert(sizeof(double) * 8 == 64);
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL)
*dst = 0;
else if (data_convert_type(str, DATA_TYPE_FLOAT) == DATA_TYPE_FLOAT)
*dst = data_get_float(str);
else
rc = ESLURM_DATA_CONV_FAILED;
log_flag(DATA, "%s: string %f rc[%d]=%s", __func__, *dst, rc,
slurm_strerror(rc));
return rc;
}
static int DUMP_FUNC(FLOAT64)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
double *src = obj;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
(void) data_set_float(dst, *src);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(FLOAT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *str, args_t *args,
data_t *parent_path)
{
double *dst = obj;
data_t *dset, *dinf, *dnum;
bool set = false, inf = false;
double num = NAN;
char *path = NULL;
int rc = SLURM_SUCCESS;
xassert(sizeof(double) * 8 == 64);
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL) {
*dst = (double) NO_VAL;
return SLURM_SUCCESS;
}
if (data_get_type(str) == DATA_TYPE_FLOAT)
return PARSE_FUNC(FLOAT64)(parser, obj, str, args, parent_path);
if (data_get_type(str) != DATA_TYPE_DICT) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_EXPECTED_DICT,
set_source_path(&path, parent_path),
__func__, "Expected dictionary but got %s",
data_get_type_string(str));
goto cleanup;
}
if ((dset = data_key_get(str, "set"))) {
if (data_convert_type(dset, DATA_TYPE_BOOL) != DATA_TYPE_BOOL) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__,
"Expected bool for \"set\" field but got %s",
data_get_type_string(str));
goto cleanup;
}
set = data_get_bool(dset);
}
if ((dinf = data_key_get(str, "infinite"))) {
if (data_convert_type(dinf, DATA_TYPE_BOOL) != DATA_TYPE_BOOL) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__,
"Expected bool for \"infinite\" field but got %s",
data_get_type_string(str));
goto cleanup;
}
inf = data_get_bool(dinf);
}
if ((dnum = data_key_get(str, "number"))) {
if (data_convert_type(dnum, DATA_TYPE_FLOAT) !=
DATA_TYPE_FLOAT) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__,
"Expected floating point number for \"number\" field but got %s",
data_get_type_string(str));
goto cleanup;
}
num = data_get_float(dnum);
}
if (inf)
*dst = (double) INFINITE;
else if (!set)
*dst = (double) NO_VAL;
else if (set && dnum)
*dst = num;
else if (set && !dnum)
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path), __func__,
"Expected \"number\" field when \"set\"=True but field not present");
cleanup:
xfree(path);
return rc;
}
static int DUMP_FUNC(FLOAT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
double *src = obj;
data_t *set, *inf, *num;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
data_set_dict(dst);
set = data_key_set(dst, "set");
inf = data_key_set(dst, "infinite");
num = data_key_set(dst, "number");
if ((uint32_t) *src == INFINITE) {
data_set_bool(set, false);
data_set_bool(inf, true);
data_set_float(num, 0);
} else if ((uint32_t) *src == NO_VAL) {
data_set_bool(set, false);
data_set_bool(inf, false);
data_set_float(num, 0);
} else {
data_set_bool(set, true);
data_set_bool(inf, false);
data_set_float(num, *src);
}
return SLURM_SUCCESS;
}
static void SPEC_FUNC(FLOAT64_NO_VAL)(const parser_t *const parser,
args_t *args, data_t *spec, data_t *dst)
{
data_t *props, *dset, *dinf, *dnum;
props = set_openapi_props(dst, OPENAPI_FORMAT_OBJECT,
"64 bit floating point number with flags");
dset = data_set_dict(data_key_set(props, "set"));
dinf = data_set_dict(data_key_set(props, "infinite"));
dnum = data_set_dict(data_key_set(props, "number"));
set_openapi_props(dset, OPENAPI_FORMAT_BOOL,
"True if number has been set. False if number is unset");
data_set_bool(data_key_set(dset, "default"), false);
set_openapi_props(dinf, OPENAPI_FORMAT_BOOL,
"True if number has been set to infinite. \"set\" and \"number\" will be ignored.");
data_set_bool(data_key_set(dinf, "default"), false);
set_openapi_props(dnum, OPENAPI_FORMAT_DOUBLE,
"If set is True the number will be set with value. Otherwise ignore number contents.");
data_set_float(data_key_set(dinf, "default"), 0);
}
static int PARSE_FUNC(INT64)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
char *path = NULL;
int64_t *dst = obj;
int rc = SLURM_SUCCESS;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL)
*dst = 0;
else if (data_convert_type(str, DATA_TYPE_INT_64) == DATA_TYPE_INT_64)
*dst = data_get_int(str);
else
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__, "Expected integer but got %s",
data_get_type_string(str));
xfree(path);
return rc;
}
static int DUMP_FUNC(INT64)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int64_t *src = obj;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
data_set_int(dst, *src);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(INT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
int64_t *dst = obj;
int rc;
uint64_t num;
/* data_t already handles the parsing of signed */
rc = PARSE_FUNC(UINT64_NO_VAL)(parser, &num, str, args, parent_path);
if (!rc)
*dst = num;
return rc;
}
static int DUMP_FUNC(INT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int64_t *src = obj;
return DUMP_FUNC(UINT64_NO_VAL)(parser, src, dst, args);
}
static void SPEC_FUNC(INT64_NO_VAL)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
return SPEC_FUNC(UINT64_NO_VAL)(parser, args, spec, dst);
}
static int PARSE_FUNC(UINT16)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
uint16_t *dst = obj;
int rc = SLURM_SUCCESS;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL)
*dst = 0;
else if (data_convert_type(str, DATA_TYPE_INT_64) == DATA_TYPE_INT_64)
*dst = data_get_int(str);
else
rc = ESLURM_DATA_CONV_FAILED;
log_flag(DATA, "%s: string %hu rc[%d]=%s", __func__, *dst, rc,
slurm_strerror(rc));
return rc;
}
static int DUMP_FUNC(UINT16)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *src = obj;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
(void) data_set_int(dst, *src);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(UINT16_NO_VAL)(const parser_t *const parser, void *obj,
data_t *str, args_t *args,
data_t *parent_path)
{
int rc;
uint16_t *dst = obj;
uint64_t num;
xassert(args->magic == MAGIC_ARGS);
if ((rc = PARSE_FUNC(UINT64_NO_VAL)(parser, &num, str, args,
parent_path)))
; /* do nothing on error */
else if (num == NO_VAL64)
*dst = NO_VAL16;
else if (num >= NO_VAL16)
*dst = INFINITE16;
else
*dst = num;
return rc;
}
static int DUMP_FUNC(UINT16_NO_VAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *src = obj;
data_t *set, *inf, *num;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
data_set_dict(dst);
set = data_key_set(dst, "set");
inf = data_key_set(dst, "infinite");
num = data_key_set(dst, "number");
if (*src == INFINITE16) {
data_set_bool(set, false);
data_set_bool(inf, true);
data_set_int(num, 0);
} else if (*src == NO_VAL16) {
data_set_bool(set, false);
data_set_bool(inf, false);
data_set_int(num, 0);
} else {
data_set_bool(set, true);
data_set_bool(inf, false);
data_set_int(num, *src);
}
return SLURM_SUCCESS;
}
static void SPEC_FUNC(UINT16_NO_VAL)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
return SPEC_FUNC(UINT64_NO_VAL)(parser, args, spec, dst);
}
static int PARSE_FUNC(UINT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *str, args_t *args,
data_t *parent_path)
{
uint64_t *dst = obj;
data_t *dset, *dinf, *dnum;
bool set = false, inf = false;
uint64_t num = 0;
char *path = NULL;
int rc = SLURM_SUCCESS;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL) {
*dst = NO_VAL64;
return SLURM_SUCCESS;
}
if (data_get_type(str) == DATA_TYPE_INT_64)
return PARSE_FUNC(UINT64)(parser, obj, str, args, parent_path);
if (data_get_type(str) != DATA_TYPE_DICT) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_EXPECTED_DICT,
set_source_path(&path, parent_path),
__func__, "Expected dictionary but got %s",
data_get_type_string(str));
goto cleanup;
}
if ((dset = data_key_get(str, "set"))) {
if (data_convert_type(dset, DATA_TYPE_BOOL) != DATA_TYPE_BOOL) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__,
"Expected bool for \"set\" field but got %s",
data_get_type_string(str));
goto cleanup;
}
set = data_get_bool(dset);
}
if ((dinf = data_key_get(str, "infinite"))) {
if (data_convert_type(dinf, DATA_TYPE_BOOL) != DATA_TYPE_BOOL) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__,
"Expected bool for \"infinite\" field but got %s",
data_get_type_string(str));
goto cleanup;
}
inf = data_get_bool(dinf);
}
if ((dnum = data_key_get(str, "number"))) {
if (data_convert_type(dnum, DATA_TYPE_INT_64) !=
DATA_TYPE_INT_64) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__,
"Expected integer number for \"number\" field but got %s",
data_get_type_string(str));
goto cleanup;
}
num = data_get_int(dnum);
}
if (inf)
*dst = INFINITE64;
else if (!set)
*dst = NO_VAL64;
else if (set && dnum)
*dst = num;
else if (set && !dnum)
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path), __func__,
"Expected \"number\" field when \"set\"=True but field not present");
cleanup:
xfree(path);
return rc;
}
static int DUMP_FUNC(UINT64_NO_VAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint64_t *src = obj;
data_t *set, *inf, *num;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
data_set_dict(dst);
set = data_key_set(dst, "set");
inf = data_key_set(dst, "infinite");
num = data_key_set(dst, "number");
if (*src == INFINITE64) {
data_set_bool(set, false);
data_set_bool(inf, true);
data_set_int(num, 0);
} else if (*src == NO_VAL64) {
data_set_bool(set, false);
data_set_bool(inf, false);
data_set_int(num, 0);
} else {
data_set_bool(set, true);
data_set_bool(inf, false);
data_set_int(num, *src);
}
return SLURM_SUCCESS;
}
static void SPEC_FUNC(UINT64_NO_VAL)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
data_t *props, *dset, *dinf, *dnum;
props = set_openapi_props(dst, OPENAPI_FORMAT_OBJECT,
"Integer number with flags");
dset = data_set_dict(data_key_set(props, "set"));
dinf = data_set_dict(data_key_set(props, "infinite"));
dnum = data_set_dict(data_key_set(props, "number"));
set_openapi_props(dset, OPENAPI_FORMAT_BOOL,
"True if number has been set. False if number is unset");
data_set_bool(data_key_set(dset, "default"), false);
set_openapi_props(dinf, OPENAPI_FORMAT_BOOL,
"True if number has been set to infinite. \"set\" and \"number\" will be ignored.");
data_set_bool(data_key_set(dinf, "default"), false);
set_openapi_props(dnum, OPENAPI_FORMAT_INT64,
"If set is True the number will be set with value. Otherwise ignore number contents.");
data_set_int(data_key_set(dinf, "default"), 0);
}
static int PARSE_FUNC(UINT64)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
uint64_t *dst = obj;
int rc = SLURM_SUCCESS;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL)
*dst = 0;
else if (data_convert_type(str, DATA_TYPE_INT_64) == DATA_TYPE_INT_64)
*dst = data_get_int(str);
else
rc = ESLURM_DATA_CONV_FAILED;
log_flag(DATA, "%s: string %" PRIu64 " rc[%d]=%s", __func__, *dst, rc,
slurm_strerror(rc));
return rc;
}
static int DUMP_FUNC(UINT64)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint64_t *src = obj;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
/* Never set values of INF or NO_VAL */
if ((*src == NO_VAL64) || (*src == INFINITE64))
data_set_null(dst);
else
(void) data_set_int(dst, *src);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(UINT32)(const parser_t *const parser, void *obj,
data_t *str, args_t *args, data_t *parent_path)
{
uint32_t *dst = obj;
int rc = SLURM_SUCCESS;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(str) == DATA_TYPE_NULL) {
*dst = 0;
} else if (data_convert_type(str, DATA_TYPE_INT_64) ==
DATA_TYPE_INT_64) {
/* catch -1 and set to NO_VAL instead of rolling */
if (0xFFFFFFFF00000000 & data_get_int(str))
*dst = NO_VAL;
else
*dst = data_get_int(str);
} else
rc = ESLURM_DATA_CONV_FAILED;
log_flag(DATA, "%s: string %u rc[%d]=%s", __func__, *dst, rc,
slurm_strerror(rc));
return rc;
}
static int DUMP_FUNC(UINT32)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *src = obj;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
log_flag(DATA, "%s: uint32_t 0x%" PRIxPTR "=%u", __func__,
(uintptr_t) src, *src);
(void) data_set_int(dst, *src);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(UINT32_NO_VAL)(const parser_t *const parser, void *obj,
data_t *str, args_t *args,
data_t *parent_path)
{
int rc;
uint32_t *dst = obj;
uint64_t num;
xassert(args->magic == MAGIC_ARGS);
if ((rc = PARSE_FUNC(UINT64_NO_VAL)(parser, &num, str, args,
parent_path)))
; /* do nothing on error */
else if (num == NO_VAL64)
*dst = NO_VAL;
else if (num >= NO_VAL)
*dst = INFINITE;
else
*dst = num;
return rc;
}
static int DUMP_FUNC(UINT32_NO_VAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *src = obj;
data_t *set, *inf, *num;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
data_set_dict(dst);
set = data_key_set(dst, "set");
inf = data_key_set(dst, "infinite");
num = data_key_set(dst, "number");
if (*src == INFINITE) {
data_set_bool(set, false);
data_set_bool(inf, true);
data_set_int(num, 0);
} else if (*src == NO_VAL) {
data_set_bool(set, false);
data_set_bool(inf, false);
data_set_int(num, 0);
} else {
data_set_bool(set, true);
data_set_bool(inf, false);
data_set_int(num, *src);
}
return SLURM_SUCCESS;
}
static void SPEC_FUNC(UINT32_NO_VAL)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
return SPEC_FUNC(UINT64_NO_VAL)(parser, args, spec, dst);
}
PARSE_DISABLED(STEP_NODES)
static int DUMP_FUNC(STEP_NODES)(const parser_t *const parser, void *src,
data_t *dst, args_t *args)
{
int rc;
slurmdb_step_rec_t *step = src;
hostlist_t *host_list;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
check_parser(parser);
/* ignore empty node list */
if (!step->nodes)
return SLURM_SUCCESS;
if (!(host_list = hostlist_create(step->nodes)))
return errno;
xassert(hostlist_count(host_list) == step->nnodes);
rc = DUMP(HOSTLIST, host_list, dst, args);
FREE_NULL_HOSTLIST(host_list);
return rc;
}
PARSE_DISABLED(STEP_TRES_REQ_MAX)
static int DUMP_FUNC(STEP_TRES_REQ_MAX)(const parser_t *const parser, void *src,
data_t *dst, args_t *args)
{
slurmdb_step_rec_t *step = src;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
check_parser(parser);
return _dump_tres_nct(parser, dst, step->stats.tres_usage_in_max,
step->stats.tres_usage_in_max_nodeid,
step->stats.tres_usage_in_max_taskid, step->nodes,
args);
}
PARSE_DISABLED(STEP_TRES_REQ_MIN)
static int DUMP_FUNC(STEP_TRES_REQ_MIN)(const parser_t *const parser, void *src,
data_t *dst, args_t *args)
{
slurmdb_step_rec_t *step = src;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
check_parser(parser);
return _dump_tres_nct(parser, dst, step->stats.tres_usage_in_min,
step->stats.tres_usage_in_min_nodeid,
step->stats.tres_usage_in_min_taskid, step->nodes,
args);
}
PARSE_DISABLED(STEP_TRES_USAGE_MAX)
static int DUMP_FUNC(STEP_TRES_USAGE_MAX)(const parser_t *const parser,
void *src, data_t *dst, args_t *args)
{
slurmdb_step_rec_t *step = src;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
check_parser(parser);
return _dump_tres_nct(parser, dst, step->stats.tres_usage_out_max,
step->stats.tres_usage_out_max_nodeid,
step->stats.tres_usage_out_max_taskid,
step->nodes, args);
}
PARSE_DISABLED(STEP_TRES_USAGE_MIN)
static int DUMP_FUNC(STEP_TRES_USAGE_MIN)(const parser_t *const parser,
void *src, data_t *dst, args_t *args)
{
slurmdb_step_rec_t *step = src;
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(args->magic == MAGIC_ARGS);
check_parser(parser);
return _dump_tres_nct(parser, dst, step->stats.tres_usage_out_min,
step->stats.tres_usage_out_min_nodeid,
step->stats.tres_usage_out_min_taskid,
step->nodes, args);
}
static int PARSE_FUNC(BOOL)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
uint8_t *b = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_convert_type(src, DATA_TYPE_BOOL) == DATA_TYPE_BOOL) {
*b = data_get_bool(src);
return SLURM_SUCCESS;
}
return ESLURM_REST_FAIL_PARSING;
}
static int DUMP_FUNC(BOOL)(const parser_t *const parser, void *obj, data_t *dst,
args_t *args)
{
uint8_t *b = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_bool(dst, *b);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(BOOL16)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
uint16_t *b = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_convert_type(src, DATA_TYPE_BOOL) == DATA_TYPE_BOOL) {
*b = data_get_bool(src);
return SLURM_SUCCESS;
}
return ESLURM_REST_FAIL_PARSING;
}
static int DUMP_FUNC(BOOL16)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *b = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_bool(dst, *b);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(BOOL16_NO_VAL)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
uint16_t *b = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL) {
*b = NO_VAL16;
return SLURM_SUCCESS;
}
if ((data_get_type(src) == DATA_TYPE_INT_64) &&
(data_get_int(src) == -1)) {
*b = NO_VAL16;
return SLURM_SUCCESS;
}
return PARSE_FUNC(BOOL16)(parser, obj, src, args, parent_path);
}
static int DUMP_FUNC(BOOL16_NO_VAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *b = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (*b == NO_VAL16)
data_set_bool(dst, false);
else
data_set_bool(dst, *b);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_CYCLE_MEAN)
static int DUMP_FUNC(STATS_MSG_CYCLE_MEAN)(const parser_t *const parser,
void *obj, data_t *dst, args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (stats->schedule_cycle_counter)
data_set_int(dst, (stats->schedule_cycle_sum /
stats->schedule_cycle_counter));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_CYCLE_MEAN_DEPTH)
static int DUMP_FUNC(STATS_MSG_CYCLE_MEAN_DEPTH)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (stats->schedule_cycle_counter)
data_set_int(dst, (stats->schedule_cycle_depth /
stats->schedule_cycle_counter));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_CYCLE_PER_MIN)
static int DUMP_FUNC(STATS_MSG_CYCLE_PER_MIN)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((stats->req_time - stats->req_time_start) >= 60)
data_set_int(dst, (stats->schedule_cycle_counter /
((stats->req_time - stats->req_time_start) /
60)));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_BF_CYCLE_MEAN)
static int DUMP_FUNC(STATS_MSG_BF_CYCLE_MEAN)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (stats->bf_cycle_counter)
data_set_int(dst,
(stats->bf_cycle_sum / stats->bf_cycle_counter));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_BF_DEPTH_MEAN)
static int DUMP_FUNC(STATS_MSG_BF_DEPTH_MEAN)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (stats->bf_cycle_counter)
data_set_int(dst,
(stats->bf_depth_sum / stats->bf_cycle_counter));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_BF_DEPTH_MEAN_TRY)
static int DUMP_FUNC(STATS_MSG_BF_DEPTH_MEAN_TRY)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (stats->bf_cycle_counter)
data_set_int(dst, (stats->bf_depth_try_sum /
stats->bf_cycle_counter));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_BF_QUEUE_LEN_MEAN)
static int DUMP_FUNC(STATS_MSG_BF_QUEUE_LEN_MEAN)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (stats->bf_cycle_counter)
data_set_int(dst, (stats->bf_queue_len_sum /
stats->bf_cycle_counter));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_BF_TABLE_SIZE_MEAN)
static int DUMP_FUNC(STATS_MSG_BF_TABLE_SIZE_MEAN)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (stats->bf_cycle_counter)
data_set_int(dst, (stats->bf_table_size_sum /
stats->bf_cycle_counter));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_BF_ACTIVE)
static int DUMP_FUNC(STATS_MSG_BF_ACTIVE)(const parser_t *const parser,
void *obj, data_t *dst, args_t *args)
{
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_bool(dst, (stats->bf_active != 0));
return SLURM_SUCCESS;
}
PARSE_DISABLED(STATS_MSG_RPCS_BY_TYPE)
static int DUMP_FUNC(STATS_MSG_RPCS_BY_TYPE)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
uint32_t *rpc_type_ave_time;
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!stats->rpc_type_size)
return SLURM_SUCCESS;
rpc_type_ave_time =
xcalloc(stats->rpc_type_size, sizeof(*rpc_type_ave_time));
for (int i = 0; i < stats->rpc_type_size; i++) {
if ((stats->rpc_type_time[i] > 0) &&
(stats->rpc_type_cnt[i] > 0))
rpc_type_ave_time[i] = stats->rpc_type_time[i] /
stats->rpc_type_cnt[i];
else
rpc_type_ave_time[i] = 0;
}
for (int i = 0; i < stats->rpc_type_size; i++) {
data_t *r = data_set_dict(data_list_append(dst));
data_set_string(data_key_set(r, "message_type"),
rpc_num2string(stats->rpc_type_id[i]));
data_set_int(data_key_set(r, "type_id"), stats->rpc_type_id[i]);
data_set_int(data_key_set(r, "count"), stats->rpc_type_cnt[i]);
data_set_int(data_key_set(r, "average_time"),
rpc_type_ave_time[i]);
data_set_int(data_key_set(r, "total_time"),
stats->rpc_type_time[i]);
}
xfree(rpc_type_ave_time);
return SLURM_SUCCESS;
}
void SPEC_FUNC(STATS_MSG_RPCS_BY_TYPE)(const parser_t *const parser,
args_t *args, data_t *spec, data_t *dst)
{
data_t *items = set_openapi_props(dst, OPENAPI_FORMAT_ARRAY,
"RPCs by message type");
data_t *props = set_openapi_props(items, OPENAPI_FORMAT_OBJECT, "RPC");
set_openapi_props(data_key_set(props, "message_type"),
OPENAPI_FORMAT_STRING, "Message type as string");
set_openapi_props(data_key_set(props, "type_id"), OPENAPI_FORMAT_INT32,
"Message type as integer");
set_openapi_props(data_key_set(props, "count"), OPENAPI_FORMAT_INT64,
"Number of RPCs received");
set_openapi_props(data_key_set(props, "average_time"),
OPENAPI_FORMAT_INT64,
"Average time spent processing RPC in seconds");
set_openapi_props(data_key_set(props, "total_time"),
OPENAPI_FORMAT_INT64,
"Total time spent processing RPC in seconds");
}
PARSE_DISABLED(STATS_MSG_RPCS_BY_USER)
static int DUMP_FUNC(STATS_MSG_RPCS_BY_USER)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
uint32_t *rpc_user_ave_time;
stats_info_response_msg_t *stats = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!stats->rpc_user_size)
return SLURM_SUCCESS;
rpc_user_ave_time =
xcalloc(stats->rpc_user_size, sizeof(*rpc_user_ave_time));
for (int i = 0; i < stats->rpc_user_size; i++) {
if ((stats->rpc_user_time[i] > 0) &&
(stats->rpc_user_cnt[i] > 0))
rpc_user_ave_time[i] = stats->rpc_user_time[i] /
stats->rpc_user_cnt[i];
else
rpc_user_ave_time[i] = 0;
}
for (int i = 0; i < stats->rpc_user_size; i++) {
data_t *u = data_set_dict(data_list_append(dst));
data_t *un = data_key_set(u, "user");
char *user = uid_to_string_or_null(stats->rpc_user_id[i]);
data_set_int(data_key_set(u, "user_id"), stats->rpc_user_id[i]);
data_set_int(data_key_set(u, "count"), stats->rpc_user_cnt[i]);
data_set_int(data_key_set(u, "average_time"),
rpc_user_ave_time[i]);
data_set_int(data_key_set(u, "total_time"),
stats->rpc_user_time[i]);
if (!user)
data_set_string_fmt(un, "%u", stats->rpc_user_id[i]);
else
data_set_string_own(un, user);
}
xfree(rpc_user_ave_time);
return SLURM_SUCCESS;
}
void SPEC_FUNC(STATS_MSG_RPCS_BY_USER)(const parser_t *const parser,
args_t *args, data_t *spec, data_t *dst)
{
data_t *items =
set_openapi_props(dst, OPENAPI_FORMAT_ARRAY, "RPCs by user");
data_t *props = set_openapi_props(items, OPENAPI_FORMAT_OBJECT, "user");
set_openapi_props(data_key_set(props, "user"), OPENAPI_FORMAT_STRING,
"user name");
set_openapi_props(data_key_set(props, "user_id"), OPENAPI_FORMAT_INT32,
"user id (numeric)");
set_openapi_props(data_key_set(props, "count"), OPENAPI_FORMAT_INT64,
"Number of RPCs received");
set_openapi_props(data_key_set(props, "average_time"),
OPENAPI_FORMAT_INT64,
"Average time spent processing RPC in seconds");
set_openapi_props(data_key_set(props, "total_time"),
OPENAPI_FORMAT_INT64,
"Total time spent processing RPC in seconds");
}
typedef struct {
int magic; /* MAGIC_FOREACH_CSV_STRING */
int rc;
char *dst;
char *pos;
const parser_t *const parser;
args_t *args;
data_t *parent_path;
} parse_foreach_CSV_STRING_t;
static data_for_each_cmd_t _parse_foreach_CSV_STRING_list(data_t *data,
void *arg)
{
parse_foreach_CSV_STRING_t *args = arg;
if (data_convert_type(data, DATA_TYPE_STRING) != DATA_TYPE_STRING) {
args->rc = on_error(PARSING, args->parser->type, args->args,
ESLURM_DATA_CONV_FAILED, NULL, __func__,
"unable to convert csv entry %s to string",
data_get_type_string(data));
return DATA_FOR_EACH_FAIL;
}
xstrfmtcatat(args->dst, &args->pos, "%s%s", (args->dst ? "," : ""),
data_get_string(data));
return DATA_FOR_EACH_CONT;
}
static data_for_each_cmd_t _parse_foreach_CSV_STRING_dict(const char *key,
data_t *data,
void *arg)
{
parse_foreach_CSV_STRING_t *args = arg;
if (data_convert_type(data, DATA_TYPE_STRING) != DATA_TYPE_STRING) {
args->rc = on_error(PARSING, args->parser->type, args->args,
ESLURM_DATA_CONV_FAILED, NULL, __func__,
"unable to convert csv entry %s to string",
data_get_type_string(data));
return DATA_FOR_EACH_FAIL;
}
xstrfmtcatat(args->dst, &args->pos, "%s%s=%s", (args->dst ? "," : ""),
key, data_get_string(data));
return DATA_FOR_EACH_CONT;
}
static int PARSE_FUNC(CSV_STRING)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
char **dst = obj;
parse_foreach_CSV_STRING_t pargs = {
.magic = MAGIC_FOREACH_CSV_STRING,
.parser = parser,
.args = args,
.parent_path = parent_path,
};
xassert(args->magic == MAGIC_ARGS);
xassert(!*dst);
xfree(*dst);
if (data_get_type(src) == DATA_TYPE_LIST) {
(void) data_list_for_each(src, _parse_foreach_CSV_STRING_list,
&pargs);
} else if (data_get_type(src) == DATA_TYPE_DICT) {
(void) data_dict_for_each(src, _parse_foreach_CSV_STRING_dict,
&pargs);
} else if (data_convert_type(src, DATA_TYPE_STRING) ==
DATA_TYPE_STRING) {
*dst = xstrdup(data_get_string(src));
return SLURM_SUCCESS;
} else {
return on_error(PARSING, parser->type, args, ESLURM_DATA_CONV_FAILED,
NULL, __func__,
"Expected dictionary or list or string for comma delimited list but got %s",
data_get_type_string(src));
}
if (!pargs.rc)
*dst = pargs.dst;
else
xfree(pargs.dst);
return pargs.rc;
}
static int DUMP_FUNC(CSV_STRING)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
char **src_ptr = obj;
char *src = *src_ptr;
char *save_ptr = NULL;
char *token = NULL;
char *str;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!src || (src[0] == '\0'))
return SLURM_SUCCESS;
str = xstrdup(src);
token = strtok_r(str, ",", &save_ptr);
while (token) {
data_set_string(data_list_append(dst), token);
token = strtok_r(NULL, ",", &save_ptr);
}
xfree(str);
return SLURM_SUCCESS;
}
PARSE_DISABLED(NODE_SELECT_ALLOC_MEMORY)
static int DUMP_FUNC(NODE_SELECT_ALLOC_MEMORY)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
int rc;
node_info_t *node = obj;
uint64_t alloc_memory = 0;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((rc = slurm_get_select_nodeinfo(node->select_nodeinfo,
SELECT_NODEDATA_MEM_ALLOC,
NODE_STATE_ALLOCATED,
&alloc_memory))) {
return on_error(
DUMPING, parser->type, args, rc,
"slurm_get_select_nodeinfo", __func__,
"slurm_get_select_nodeinfo(%s, SELECT_NODEDATA_MEM_ALLOC) failed",
node->name);
}
data_set_int(dst, alloc_memory);
return SLURM_SUCCESS;
}
PARSE_DISABLED(NODE_SELECT_ALLOC_CPUS)
static int DUMP_FUNC(NODE_SELECT_ALLOC_CPUS)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
int rc;
node_info_t *node = obj;
uint16_t alloc_cpus = 0;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((rc = slurm_get_select_nodeinfo(node->select_nodeinfo,
SELECT_NODEDATA_SUBCNT,
NODE_STATE_ALLOCATED,
&alloc_cpus))) {
return on_error(DUMPING, parser->type, args, rc,
"slurm_get_select_nodeinfo", __func__,
"slurm_get_select_nodeinfo(%s, SELECT_NODEDATA_SUBCNT) failed",
node->name);
}
data_set_int(dst, alloc_cpus);
return SLURM_SUCCESS;
}
PARSE_DISABLED(NODE_SELECT_ALLOC_IDLE_CPUS)
static int DUMP_FUNC(NODE_SELECT_ALLOC_IDLE_CPUS)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
int rc;
node_info_t *node = obj;
uint16_t alloc_cpus = 0;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((rc = slurm_get_select_nodeinfo(node->select_nodeinfo,
SELECT_NODEDATA_SUBCNT,
NODE_STATE_ALLOCATED,
&alloc_cpus))) {
return on_error(DUMPING, parser->type, args, rc,
"slurm_get_select_nodeinfo", __func__,
"slurm_get_select_nodeinfo(%s, SELECT_NODEDATA_SUBCNT) failed",
node->name);
}
data_set_int(dst, (node->cpus - alloc_cpus));
return SLURM_SUCCESS;
}
PARSE_DISABLED(NODE_SELECT_TRES_USED)
static int DUMP_FUNC(NODE_SELECT_TRES_USED)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
int rc;
node_info_t *node = obj;
char *node_alloc_tres = NULL;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((rc = slurm_get_select_nodeinfo(node->select_nodeinfo,
SELECT_NODEDATA_TRES_ALLOC_FMT_STR,
NODE_STATE_ALLOCATED,
&node_alloc_tres))) {
return on_error(DUMPING, parser->type, args, rc,
"slurm_get_select_nodeinfo", __func__,
"slurm_get_select_nodeinfo(%s, SELECT_NODEDATA_TRES_ALLOC_FMT_STR) failed",
node->name);
}
if (node_alloc_tres)
data_set_string_own(dst, node_alloc_tres);
else
data_set_string(dst, "");
return SLURM_SUCCESS;
}
PARSE_DISABLED(NODE_SELECT_TRES_WEIGHTED)
static int DUMP_FUNC(NODE_SELECT_TRES_WEIGHTED)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
int rc;
node_info_t *node = obj;
double node_tres_weighted = 0;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((rc = slurm_get_select_nodeinfo(node->select_nodeinfo,
SELECT_NODEDATA_TRES_ALLOC_WEIGHTED,
NODE_STATE_ALLOCATED,
&node_tres_weighted))) {
return on_error(DUMPING, parser->type, args, rc,
"slurm_get_select_nodeinfo", __func__,
"slurm_get_select_nodeinfo(%s, SELECT_NODEDATA_TRES_ALLOC_WEIGHTED) failed",
node->name);
}
data_set_float(dst, node_tres_weighted);
return SLURM_SUCCESS;
}
PARSE_DISABLED(NODES)
static int DUMP_FUNC(NODES)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
node_info_msg_t *nodes = obj;
int rc = SLURM_SUCCESS;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!nodes || !nodes->record_count) {
on_warn(DUMPING, parser->type, args, NULL, __func__,
"No nodes to dump");
return SLURM_SUCCESS;
}
for (int i = 0; !rc && (i < nodes->record_count); i++) {
/* filter unassigned dynamic nodes */
if (nodes->node_array[i].name)
rc = DUMP(NODE, nodes->node_array[i],
data_list_append(dst), args);
}
return SLURM_SUCCESS;
}
PARSE_DISABLED(LICENSES)
static int DUMP_FUNC(LICENSES)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int rc = SLURM_SUCCESS;
license_info_msg_t *msg = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!msg->num_lic) {
on_warn(DUMPING, parser->type, args, NULL, __func__,
"Zero licenses to dump");
return SLURM_SUCCESS;
}
for (size_t i = 0; !rc && (i < msg->num_lic); i++)
rc = DUMP(LICENSE, msg->lic_array[i], data_list_append(dst),
args);
return rc;
}
static int PARSE_FUNC(CORE_SPEC)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
uint16_t *spec = obj;
if (data_convert_type(src, DATA_TYPE_INT_64) != DATA_TYPE_INT_64)
return on_error(PARSING, parser->type, args, ESLURM_DATA_CONV_FAILED,
NULL, __func__,
"Expected integer for core specification but got %s",
data_get_type_string(src));
if (data_get_int(src) >= CORE_SPEC_THREAD)
return on_error(PARSING, parser->type, args,
ESLURM_INVALID_CORE_CNT, NULL, __func__,
"Invalid core specification %"PRId64" >= %d",
data_get_int(src), CORE_SPEC_THREAD);
if (data_get_int(src) <= 0)
return on_error(PARSING, parser->type, args,
ESLURM_INVALID_CORE_CNT, NULL, __func__,
"Invalid core specification %"PRId64" <= 0",
data_get_int(src));
*spec = data_get_int(src);
return SLURM_SUCCESS;
}
static int DUMP_FUNC(CORE_SPEC)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *mem = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!(*mem & CORE_SPEC_THREAD))
data_set_int(dst, *mem);
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(THREAD_SPEC)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
uint16_t *spec = obj;
if (data_convert_type(src, DATA_TYPE_INT_64) != DATA_TYPE_INT_64)
return on_error(PARSING, parser->type, args, ESLURM_DATA_CONV_FAILED,
NULL, __func__,
"Expected integer for thread specification but got %s",
data_get_type_string(src));
if (data_get_int(src) >= CORE_SPEC_THREAD)
return on_error(PARSING, parser->type, args,
ESLURM_BAD_THREAD_PER_CORE, NULL, __func__,
"Invalid thread specification %"PRId64" >= %d",
data_get_int(src), CORE_SPEC_THREAD);
if (data_get_int(src) <= 0)
return on_error(PARSING, parser->type, args,
ESLURM_BAD_THREAD_PER_CORE, NULL, __func__,
"Invalid thread specification %"PRId64"<= 0",
data_get_int(src));
*spec = data_get_int(src);
*spec |= CORE_SPEC_THREAD;
return SLURM_SUCCESS;
}
static int DUMP_FUNC(THREAD_SPEC)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *mem = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((*mem & CORE_SPEC_THREAD))
data_set_int(dst, (*mem & ~CORE_SPEC_THREAD));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(JOB_INFO_GRES_DETAIL)
static int DUMP_FUNC(JOB_INFO_GRES_DETAIL)(const parser_t *const parser,
void *obj, data_t *dst, args_t *args)
{
slurm_job_info_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(job);
data_set_list(dst);
for (int i = 0; i < job->gres_detail_cnt; i++)
data_set_string(data_list_append(dst), job->gres_detail_str[i]);
return SLURM_SUCCESS;
}
PARSE_DISABLED(NICE)
static int DUMP_FUNC(NICE)(const parser_t *const parser, void *obj, data_t *dst,
args_t *args)
{
uint32_t *nice = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if ((*nice != NO_VAL) && (*nice != NICE_OFFSET))
data_set_int(dst, (*nice - NICE_OFFSET));
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(MEM_PER_CPUS)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
int rc;
uint64_t *mem = obj;
uint64_t cpu_mem = NO_VAL64;
if (data_get_type(src) == DATA_TYPE_NULL) {
*mem = NO_VAL64;
return SLURM_SUCCESS;
}
if ((data_get_type(src) == DATA_TYPE_INT_64) ||
(data_get_type(src) == DATA_TYPE_DICT)) {
if ((rc = PARSE(UINT64_NO_VAL, cpu_mem, src, parent_path,
args))) {
/* error already logged */
return rc;
}
} else {
char *str = NULL;
if ((rc = data_get_string_converted(src, &str))) {
char *path = NULL;
rc = on_error(PARSING, parser->type, args, rc,
set_source_path(&path, parent_path),
__func__, "string expected but got %s",
data_get_type_string(src));
xfree(path);
return rc;
}
if ((cpu_mem = str_to_mbytes(str)) == NO_VAL64) {
char *path = NULL;
rc = on_error(PARSING, parser->type, args, rc,
set_source_path(&path, parent_path),
__func__,
"Invalid formatted memory size: %s", str);
xfree(path);
xfree(str);
return rc;
}
xfree(str);
}
if (cpu_mem == NO_VAL64) {
*mem = NO_VAL64;
} else if (cpu_mem == INFINITE64) {
*mem = 0; /* 0 acts as infinity */
} else if (cpu_mem >= MEM_PER_CPU) {
/* memory size overflowed */
char *path = NULL;
rc = on_error(PARSING, parser->type, args,
ESLURM_INVALID_TASK_MEMORY,
set_source_path(&path, parent_path),
__func__,
"Memory value %"PRIu64" equal or larger than %"PRIu64,
cpu_mem, MEM_PER_CPU);
xfree(path);
return rc;
} else {
*mem = MEM_PER_CPU | cpu_mem;
}
return rc;
}
static int DUMP_FUNC(MEM_PER_CPUS)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint64_t *mem = obj;
uint64_t cpu_mem = NO_VAL64;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (*mem & MEM_PER_CPU)
cpu_mem = *mem & ~MEM_PER_CPU;
return DUMP(UINT64_NO_VAL, cpu_mem, dst, args);
}
static int PARSE_FUNC(MEM_PER_NODE)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
int rc;
uint64_t *mem = obj;
uint64_t node_mem = NO_VAL64;
if (data_get_type(src) == DATA_TYPE_NULL) {
*mem = NO_VAL64;
return SLURM_SUCCESS;
}
if ((data_get_type(src) == DATA_TYPE_INT_64) ||
(data_get_type(src) == DATA_TYPE_DICT)) {
if ((rc = PARSE(UINT64_NO_VAL, node_mem, src, parent_path,
args))) {
/* error already logged */
return rc;
}
} else {
char *str = NULL;
if ((rc = data_get_string_converted(src, &str))) {
char *path = NULL;
rc = on_error(PARSING, parser->type, args, rc,
set_source_path(&path, parent_path),
__func__, "string expected but got %s",
data_get_type_string(src));
xfree(path);
return rc;
}
if ((node_mem = str_to_mbytes(str)) == NO_VAL64) {
char *path = NULL;
rc = on_error(PARSING, parser->type, args, rc,
set_source_path(&path, parent_path),
__func__,
"Invalid formatted memory size: %s", str);
xfree(path);
xfree(str);
return rc;
}
xfree(str);
}
if (node_mem == NO_VAL64) {
*mem = NO_VAL64;
} else if (node_mem == INFINITE64) {
*mem = 0; /* 0 acts as infinity */
} else if (node_mem >= MEM_PER_CPU) {
/* memory size overflowed */
char *path = NULL;
rc = on_error(PARSING, parser->type, args,
ESLURM_INVALID_TASK_MEMORY,
set_source_path(&path, parent_path),
__func__,
"Memory value %"PRIu64" equal or larger than %"PRIu64,
node_mem, MEM_PER_CPU);
xfree(path);
return rc;
} else {
*mem = node_mem;
}
return rc;
}
static int DUMP_FUNC(MEM_PER_NODE)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint64_t *mem = obj;
uint64_t node_mem = NO_VAL64;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!(*mem & MEM_PER_CPU))
node_mem = *mem;
return DUMP(UINT64_NO_VAL, node_mem, dst, args);
}
PARSE_DISABLED(ALLOCATED_CORES)
static int DUMP_FUNC(ALLOCATED_CORES)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *cores = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (slurm_conf.select_type_param & (CR_CORE | CR_SOCKET))
data_set_int(dst, *cores);
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
PARSE_DISABLED(ALLOCATED_CPUS)
static int DUMP_FUNC(ALLOCATED_CPUS)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *cpus = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (slurm_conf.select_type_param & (CR_CPU))
data_set_int(dst, *cpus);
else
data_set_int(dst, 0);
return SLURM_SUCCESS;
}
static void _dump_node_res(data_t *dnodes, job_resources_t *j,
const size_t node_inx, const char *nodename,
const size_t sock_inx, size_t *bit_inx,
const size_t array_size)
{
size_t bit_reps, spn, cps;
data_t *dnode = data_set_dict(data_list_append(dnodes));
data_t *dsockets = data_set_dict(data_key_set(dnode, "sockets"));
data_t **sockets;
sockets = xcalloc(j->sockets_per_node[sock_inx], sizeof(*sockets));
/* per node */
data_set_string(data_key_set(dnode, "nodename"), nodename);
data_set_int(data_key_set(dnode, "cpus_used"), j->cpus_used[node_inx]);
data_set_int(data_key_set(dnode, "memory_used"),
j->memory_used[node_inx]);
data_set_int(data_key_set(dnode, "memory_allocated"),
j->memory_allocated[node_inx]);
/* set the used cores as found */
spn = j->sockets_per_node[sock_inx];
cps = j->cores_per_socket[sock_inx];
bit_reps = spn * cps;
for (size_t i = 0; i < bit_reps; i++) {
size_t socket_inx = i / j->cores_per_socket[sock_inx];
size_t core_inx = i % j->cores_per_socket[sock_inx];
xassert(*bit_inx < array_size);
if (*bit_inx >= array_size) {
error("%s: unexpected invalid bit index:%zu/%zu",
__func__, *bit_inx, array_size);
break;
}
if (bit_test(j->core_bitmap, *bit_inx)) {
data_t *dcores;
if (!sockets[socket_inx]) {
sockets[socket_inx] = data_set_dict(
data_key_set_int(dsockets, socket_inx));
dcores = data_set_dict(data_key_set(
sockets[socket_inx], "cores"));
} else {
dcores = data_key_get(sockets[socket_inx],
"cores");
}
if (bit_test(j->core_bitmap_used, *bit_inx)) {
data_set_string(data_key_set_int(dcores,
core_inx),
"allocated_and_in_use");
} else {
data_set_string(data_key_set_int(dcores,
core_inx),
"allocated");
}
}
(*bit_inx)++;
}
xfree(sockets);
}
PARSE_DISABLED(JOB_RES_NODES)
static int DUMP_FUNC(JOB_RES_NODES)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
job_resources_t *j = obj;
hostlist_t *hl = NULL;
size_t bit_inx = 0;
size_t array_size;
size_t sock_inx = 0, sock_reps = 0;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
xassert(j);
data_set_list(dst);
/* log_job_resources() used as an example */
if (!j->cores_per_socket || !j->nhosts) {
/* not enough info present */
return SLURM_SUCCESS;
}
hl = hostlist_create(j->nodes);
array_size = bit_size(j->core_bitmap);
for (size_t node_inx = 0; node_inx < j->nhosts; node_inx++) {
char *nodename = hostlist_nth(hl, node_inx);
if (sock_reps >= j->sock_core_rep_count[sock_inx]) {
sock_inx++;
sock_reps = 0;
}
sock_reps++;
_dump_node_res(dst, j, node_inx, nodename, sock_inx, &bit_inx,
array_size);
free(nodename);
}
FREE_NULL_HOSTLIST(hl);
return SLURM_SUCCESS;
}
void SPEC_FUNC(JOB_RES_NODES)(const parser_t *const parser, args_t *args,
data_t *spec, data_t *dst)
{
//FIXME: output of JOB_RES_NODES is not OpenAPI compliant
set_openapi_props(dst, OPENAPI_FORMAT_ARRAY, "job node resources");
}
PARSE_DISABLED(JOB_INFO_MSG)
static int DUMP_FUNC(JOB_INFO_MSG)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int rc = SLURM_SUCCESS;
job_info_msg_t *msg = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!msg || !msg->record_count) {
on_warn(DUMPING, parser->type, args, NULL, __func__,
"Zero jobs to dump");
return SLURM_SUCCESS;
}
for (size_t i = 0; !rc && (i < msg->record_count); ++i)
rc = DUMP(JOB_INFO, msg->job_array[i], data_list_append(dst),
args);
return rc;
}
PARSE_DISABLED(CONTROLLER_PING_MODE)
static int DUMP_FUNC(CONTROLLER_PING_MODE)(const parser_t *const parser,
void *obj, data_t *dst, args_t *args)
{
int *mode_ptr = obj;
int mode = *mode_ptr;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (mode == 0)
data_set_string(dst, "primary");
else if ((mode == 1) && (slurm_conf.control_cnt == 2))
data_set_string(dst, "backup");
else
data_set_string_fmt(dst, "backup%u", mode);
return SLURM_SUCCESS;
}
PARSE_DISABLED(CONTROLLER_PING_RESULT)
static int DUMP_FUNC(CONTROLLER_PING_RESULT)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
bool *ping_ptr = obj;
int ping = *ping_ptr;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (ping)
data_set_string(dst, "UP");
else
data_set_string(dst, "DOWN");
return SLURM_SUCCESS;
}
PARSE_DISABLED(STEP_INFO_MSG)
static int DUMP_FUNC(STEP_INFO_MSG)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int rc = SLURM_SUCCESS;
job_step_info_response_msg_t *msg = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!msg || !msg->job_step_count) {
on_warn(DUMPING, parser->type, args, NULL, __func__,
"Zero steps to dump");
return SLURM_SUCCESS;
}
for (size_t i = 0; !rc && (i < msg->job_step_count); ++i)
rc = DUMP(STEP_INFO, msg->job_steps[i], data_list_append(dst),
args);
return rc;
}
static int PARSE_FUNC(HOLD)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
uint32_t *priority = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL) {
/* ignore null as implied false */
return SLURM_SUCCESS;
}
if (data_convert_type(src, DATA_TYPE_BOOL) != DATA_TYPE_BOOL)
return ESLURM_DATA_CONV_FAILED;
if (data_get_bool(src))
*priority = 0;
else
*priority = INFINITE;
return SLURM_SUCCESS;
}
static int DUMP_FUNC(HOLD)(const parser_t *const parser, void *obj, data_t *dst,
args_t *args)
{
uint32_t *priority = obj;
if (*priority == 0)
data_set_bool(dst, true);
else
data_set_bool(dst, false);
return SLURM_SUCCESS;
}
static data_for_each_cmd_t _foreach_hostlist_parse(data_t *data, void *arg)
{
foreach_hostlist_parse_t *args = arg;
xassert(args->magic == MAGIC_FOREACH_HOSTLIST);
if (data_convert_type(data, DATA_TYPE_STRING) != DATA_TYPE_STRING) {
char *path = NULL;
on_error(PARSING, args->parser->type, args->args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, args->parent_path), __func__,
"string expected but got %s",
data_get_type_string(data));
xfree(path);
return DATA_FOR_EACH_FAIL;
}
if (!hostlist_push(args->host_list, data_get_string(data))) {
char *path = NULL;
on_error(PARSING, args->parser->type, args->args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, args->parent_path), __func__,
"Invalid host string: %s", data_get_string(data));
xfree(path);
return DATA_FOR_EACH_FAIL;
}
return DATA_FOR_EACH_CONT;
}
static int PARSE_FUNC(HOSTLIST)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
int rc = SLURM_SUCCESS;
hostlist_t **host_list_ptr = obj;
hostlist_t *host_list = NULL;
char *path = NULL;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL)
return SLURM_SUCCESS;
if (data_get_type(src) == DATA_TYPE_STRING) {
char *host_list_str = data_get_string(src);
if (!host_list_str || !host_list_str[0]) {
/* empty list -> no hostlist */
return SLURM_SUCCESS;
}
if (!(host_list = hostlist_create(host_list_str))) {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path),
__func__, "Invalid hostlist string: %s",
host_list_str);
goto cleanup;
}
} else if (data_get_type(src) == DATA_TYPE_LIST) {
foreach_hostlist_parse_t fargs = {
.magic = MAGIC_FOREACH_HOSTLIST,
.parser = parser,
.args = args,
.parent_path = parent_path,
};
fargs.host_list = host_list = hostlist_create(NULL);
if (data_list_for_each(src, _foreach_hostlist_parse, &fargs) <
0)
rc = ESLURM_DATA_CONV_FAILED;
} else {
rc = on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
set_source_path(&path, parent_path), __func__,
"string expected but got %s",
data_get_type_string(src));
goto cleanup;
}
if (!rc)
*host_list_ptr = host_list;
else if (host_list)
hostlist_destroy(host_list);
cleanup:
xfree(path);
return rc;
}
static int DUMP_FUNC(HOSTLIST)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int rc = SLURM_SUCCESS;
hostlist_t **host_list_ptr = obj;
hostlist_t *host_list = *host_list_ptr;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (hostlist_count(host_list)) {
char *host;
hostlist_iterator_t *itr = hostlist_iterator_create(host_list);
while ((host = hostlist_next(itr))) {
data_set_string(data_list_append(dst), host);
free(host);
}
hostlist_iterator_destroy(itr);
}
return rc;
}
static int PARSE_FUNC(HOSTLIST_STRING)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
int rc;
char **host_list_str = obj;
hostlist_t *host_list = NULL;
xassert(args->magic == MAGIC_ARGS);
if ((rc = PARSE_FUNC(HOSTLIST)(parser, &host_list, src, args,
parent_path)))
return rc;
if (host_list)
*host_list_str = hostlist_ranged_string_xmalloc(host_list);
hostlist_destroy(host_list);
return rc;
}
static int DUMP_FUNC(HOSTLIST_STRING)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
int rc;
char **host_list_ptr = obj;
char *host_list_str = *host_list_ptr;
hostlist_t *host_list;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!host_list_str || !host_list_str[0]) {
/* empty list */
data_set_list(dst);
return SLURM_SUCCESS;
}
if (!(host_list = hostlist_create(host_list_str))) {
return on_error(DUMPING, parser->type, args,
ESLURM_DATA_CONV_FAILED, "hostlist_create()",
__func__, "Invalid hostlist string: %s",
host_list_str);
}
rc = DUMP_FUNC(HOSTLIST)(parser, &host_list, dst, args);
hostlist_destroy(host_list);
return rc;
}
PARSE_DISABLED(CPU_FREQ_FLAGS)
static int DUMP_FUNC(CPU_FREQ_FLAGS)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *freq_ptr = obj;
char buf[CPU_FREQ_FLAGS_BUF_SIZE];
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
cpu_freq_to_string(buf, sizeof(buf), *freq_ptr);
data_set_string(dst, buf);
return SLURM_SUCCESS;
}
PARSE_DISABLED(PARTITION_INFO_MSG)
static int DUMP_FUNC(PARTITION_INFO_MSG)(const parser_t *const parser,
void *obj, data_t *dst, args_t *args)
{
int rc = SLURM_SUCCESS;
partition_info_msg_t *msg = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
if (!msg || !msg->record_count) {
on_warn(DUMPING, parser->type, args, NULL, __func__,
"No partitions to dump");
return SLURM_SUCCESS;
}
for (uint32_t i = 0; !rc && (i < msg->record_count); ++i)
rc = DUMP(PARTITION_INFO, msg->partition_array[i],
data_list_append(dst), args);
return rc;
}
PARSE_DISABLED(RESERVATION_INFO_MSG)
static int DUMP_FUNC(RESERVATION_INFO_MSG)(const parser_t *const parser,
void *obj, data_t *dst, args_t *args)
{
int rc = SLURM_SUCCESS;
reserve_info_msg_t *res = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
for (int i = 0; !rc && (i < res->record_count); i++)
rc = DUMP(RESERVATION_INFO, res->reservation_array[i],
data_list_append(dst), args);
return SLURM_SUCCESS;
}
PARSE_DISABLED(RESERVATION_INFO_CORE_SPEC)
static int DUMP_FUNC(RESERVATION_INFO_CORE_SPEC)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
int rc = SLURM_SUCCESS;
reserve_info_t *res = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
for (int i = 0; !rc && (i < res->core_spec_cnt); i++)
rc = DUMP(RESERVATION_CORE_SPEC, res->core_spec[i],
data_list_append(dst), args);
return SLURM_SUCCESS;
}
PARSE_DISABLED(JOB_ARRAY_RESPONSE_MSG)
static int DUMP_FUNC(JOB_ARRAY_RESPONSE_MSG)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
job_array_resp_msg_t *msg = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_list(dst);
for (int i = 0; i < msg->job_array_count; i++) {
data_t *j = data_set_dict(data_list_append(dst));
data_set_string(data_key_set(j, "job_id"),
msg->job_array_id[i]);
data_set_int(data_key_set(j, "error_code"), msg->error_code[i]);
data_set_string(data_key_set(j, "error"),
slurm_strerror(msg->error_code[i]));
data_set_string(data_key_set(j, "why"), msg->err_msg[i]);
}
return SLURM_SUCCESS;
}
void SPEC_FUNC(JOB_ARRAY_RESPONSE_MSG)(const parser_t *const parser,
args_t *args, data_t *spec, data_t *dst)
{
data_t *items = set_openapi_props(dst, OPENAPI_FORMAT_ARRAY,
"Result per ArrayJob");
data_t *props = set_openapi_props(items, OPENAPI_FORMAT_OBJECT,
"ArrayJob");
set_openapi_props(data_key_set(props, "job_id"), OPENAPI_FORMAT_INT32,
"JobId");
set_openapi_props(data_key_set(props, "error_code"),
OPENAPI_FORMAT_INT32, "numeric error code");
set_openapi_props(data_key_set(props, "error"), OPENAPI_FORMAT_STRING,
"error code description");
set_openapi_props(data_key_set(props, "why"), OPENAPI_FORMAT_STRING,
"error message");
}
PARSE_DISABLED(ERROR)
static int DUMP_FUNC(ERROR)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint32_t *rc = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
data_set_string(dst, slurm_strerror(*rc));
return SLURM_SUCCESS;
}
static int PARSE_FUNC(JOB_DESC_MSG_ARGV)(const parser_t *const parser,
void *obj, data_t *src, args_t *args,
data_t *parent_path)
{
int rc;
job_desc_msg_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL) {
xassert(!job->argv);
xassert(!job->argc);
return SLURM_SUCCESS;
}
rc = PARSE(STRING_ARRAY, job->argv, src, parent_path, args);
for (job->argc = 0; job->argv && job->argv[job->argc]; job->argc++)
; /* no-op */
return rc;
}
static int DUMP_FUNC(JOB_DESC_MSG_ARGV)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
job_desc_msg_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!job || !job->argv)
return SLURM_SUCCESS;
return DUMP(STRING_ARRAY, job->argv, dst, args);
}
static int PARSE_FUNC(JOB_DESC_MSG_CPU_FREQ)(const parser_t *const parser,
void *obj, data_t *src,
args_t *args, data_t *parent_path)
{
int rc;
job_desc_msg_t *job = obj;
char *str = NULL;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL) {
job->cpu_freq_min = NO_VAL;
job->cpu_freq_max = NO_VAL;
job->cpu_freq_gov = NO_VAL;
return SLURM_SUCCESS;
}
if ((rc = data_get_string_converted(src, &str)))
return on_error(PARSING, parser->type, args, rc,
"data_get_string_converted()", __func__,
"string expected but got %s",
data_get_type_string(src));
if ((rc = cpu_freq_verify_cmdline(str, &job->cpu_freq_min,
&job->cpu_freq_max,
&job->cpu_freq_gov))) {
xfree(str);
return on_error(PARSING, parser->type, args, rc,
"cpu_freq_verify_cmdline()", __func__,
"Invalid cpu_freuency");
}
xfree(str);
return rc;
}
static int DUMP_FUNC(JOB_DESC_MSG_CPU_FREQ)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
job_desc_msg_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (job->cpu_freq_min || job->cpu_freq_max || job->cpu_freq_gov) {
char *tmp = cpu_freq_to_cmdline(job->cpu_freq_min,
job->cpu_freq_max,
job->cpu_freq_gov);
if (tmp)
data_set_string_own(dst, tmp);
}
return SLURM_SUCCESS;
}
static int PARSE_FUNC(JOB_DESC_MSG_CRON_ENTRY)(const parser_t *const parser,
void *obj, data_t *src,
args_t *args,
data_t *parent_path)
{
char *path = NULL;
on_warn(PARSING, parser->type, args,
set_source_path(&path, parent_path), __func__,
"crontab submissions are not supported");
xfree(path);
return SLURM_SUCCESS;
}
static int DUMP_FUNC(JOB_DESC_MSG_CRON_ENTRY)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
cron_entry_t **cron_entry = obj;
return DUMP(CRON_ENTRY_PTR, *cron_entry, dst, args);
}
static int PARSE_FUNC(JOB_DESC_MSG_ENV)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
int rc;
job_desc_msg_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL) {
xassert(!job->environment);
xassert(!job->env_size);
return SLURM_SUCCESS;
}
rc = PARSE(STRING_ARRAY, job->environment, src, parent_path, args);
job->env_size = envcount(job->environment);
return rc;
}
static int DUMP_FUNC(JOB_DESC_MSG_ENV)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
job_desc_msg_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!job || !job->environment)
return SLURM_SUCCESS;
return DUMP(STRING_ARRAY, job->environment, dst, args);
}
static int PARSE_FUNC(JOB_DESC_MSG_SPANK_ENV)(const parser_t *const parser,
void *obj, data_t *src,
args_t *args, data_t *parent_path)
{
int rc;
job_desc_msg_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_NULL) {
xassert(!job->spank_job_env);
xassert(!job->spank_job_env_size);
return SLURM_SUCCESS;
}
rc = PARSE(STRING_ARRAY, job->spank_job_env, src, parent_path, args);
job->spank_job_env_size = envcount(job->spank_job_env);
return rc;
}
static int DUMP_FUNC(JOB_DESC_MSG_SPANK_ENV)(const parser_t *const parser,
void *obj, data_t *dst,
args_t *args)
{
job_desc_msg_t *job = obj;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!job || !job->spank_job_env)
return SLURM_SUCCESS;
return DUMP(STRING_ARRAY, job->spank_job_env, dst, args);
}
static data_for_each_cmd_t _foreach_string_array_list(const data_t *data,
void *arg)
{
foreach_string_array_t *args = arg;
char *str = NULL;
int rc;
xassert(args->magic == MAGIC_FOREACH_STRING_ARRAY);
if ((rc = data_get_string_converted(data, &str))) {
on_error(PARSING, args->parser->type, args->args, rc,
"data_get_string_converted()", __func__,
"expected string but got %s",
data_get_type_string(data));
return DATA_FOR_EACH_FAIL;
}
args->array[args->i] = str;
args->i++;
return DATA_FOR_EACH_CONT;
}
static data_for_each_cmd_t _foreach_string_array_dict(const char *key,
const data_t *data,
void *arg)
{
foreach_string_array_t *args = arg;
char *str = NULL, *keyvalue = NULL;
int rc;
xassert(args->magic == MAGIC_FOREACH_STRING_ARRAY);
if ((rc = data_get_string_converted(data, &str))) {
on_error(PARSING, args->parser->type, args->args, rc,
"data_get_string_converted()", __func__,
"expected string but got %s",
data_get_type_string(data));
return DATA_FOR_EACH_FAIL;
}
xstrfmtcat(keyvalue, "%s=%s", key, str);
args->array[args->i] = keyvalue;
args->i++;
xfree(str);
return DATA_FOR_EACH_CONT;
}
static int PARSE_FUNC(STRING_ARRAY)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
char ***array_ptr = obj;
foreach_string_array_t fargs = {
.magic = MAGIC_FOREACH_STRING_ARRAY,
.parser = parser,
.args = args,
};
xassert(args->magic == MAGIC_ARGS);
if (data_get_type(src) == DATA_TYPE_LIST) {
fargs.array = xcalloc(data_get_list_length(src) + 1,
sizeof(*fargs.array));
if (data_list_for_each_const(src, _foreach_string_array_list,
&fargs) < 0)
goto cleanup;
} else if (data_get_type(src) == DATA_TYPE_DICT) {
fargs.array = xcalloc(data_get_dict_length(src) + 1,
sizeof(*fargs.array));
if (data_dict_for_each_const(src, _foreach_string_array_dict,
&fargs) < 0)
goto cleanup;
} else {
on_error(PARSING, parser->type, args, ESLURM_DATA_EXPECTED_LIST,
NULL, __func__,
"expected a list of strings but got %s",
data_get_type_string(src));
goto cleanup;
}
xassert(!*array_ptr);
*array_ptr = fargs.array;
return SLURM_SUCCESS;
cleanup:
for (int i = 0; fargs.array[i]; i++)
xfree(fargs.array[i]);
xfree(fargs.array);
return ESLURM_DATA_CONV_FAILED;
}
static int DUMP_FUNC(STRING_ARRAY)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
char ***array_ptr = obj;
char **array;
xassert(args->magic == MAGIC_ARGS);
xassert(data_get_type(dst) == DATA_TYPE_NULL);
if (!(array = *array_ptr))
return SLURM_SUCCESS;
data_set_list(dst);
for (int i = 0; array[i]; i++)
data_set_string(data_list_append(dst), array[i]);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(SIGNAL)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
int rc;
uint16_t *sig = obj;
char *str = NULL;
if (data_convert_type(src, DATA_TYPE_INT_64) == DATA_TYPE_INT_64) {
*sig = data_get_int(src);
return SLURM_SUCCESS;
}
if ((rc = data_get_string_converted(src, &str))) {
return on_error(PARSING, parser->type, args, rc,
"data_get_string_converted()", __func__,
"expected string but got %s",
data_get_type_string(src));
}
if (!(*sig = sig_name2num(str))) {
xfree(str);
return on_error(PARSING, parser->type, args, rc,
"sig_name2num()", __func__, "Unknown signal %s",
str);
}
if ((*sig < 1) || (*sig >= SIGRTMAX)) {
on_warn(PARSING, parser->type, args, NULL, __func__,
"Non-standard signal number: %u", *sig);
}
xfree(str);
return rc;
}
static int DUMP_FUNC(SIGNAL)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *sig = obj;
char *str = sig_num2name(*sig);
data_set_string_own(dst, str);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(BITSTR)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
int rc;
bitstr_t *b = obj;
xassert(*b);
if (data_convert_type(src, DATA_TYPE_STRING) != DATA_TYPE_STRING)
return on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED, NULL, __func__,
"Expecting string but got %s",
data_get_type_string(src));
rc = bit_unfmt(b, data_get_string(src));
return rc;
}
static int DUMP_FUNC(BITSTR)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
bitstr_t *b = obj;
char *str;
if (!b)
return SLURM_SUCCESS;
str = bit_fmt_full(b);
data_set_string_own(dst, str);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(JOB_DESC_MSG_NODES)(const parser_t *const parser, void *obj,
data_t *src, args_t *args, data_t *parent_path)
{
job_desc_msg_t *job = obj;
if (data_get_type(src) == DATA_TYPE_LIST) {
data_t *min, *max;
if (!data_get_list_length(src) || (data_get_list_length(src) > 2)) {
return on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED, NULL, __func__,
"Node count in format of a list must have a cardinality of 2 or 1");
}
min = data_list_dequeue(src);
max = data_list_dequeue(src);
if (!max)
SWAP(min, max);
if (min && (data_convert_type(min, DATA_TYPE_INT_64) != DATA_TYPE_INT_64))
return on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED, NULL, __func__,
"Minimum nodes must be an integer instead of %s",
data_get_type_string(min));
if (max && (data_convert_type(max, DATA_TYPE_INT_64) != DATA_TYPE_INT_64))
return on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED, NULL, __func__,
"Maximum nodes must be an integer instead of %s",
data_get_type_string(max));
job->max_nodes = data_get_int(max);
if (min)
job->min_nodes = data_get_int(min);
} else {
int min, max;
char *job_size_str = NULL;
if (data_convert_type(src, DATA_TYPE_STRING) != DATA_TYPE_STRING)
return on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED, NULL, __func__,
"Expected string instead of %s for node counts",
data_get_type_string(src));
if (!verify_node_count(data_get_string(src), &min, &max,
&job_size_str)) {
xfree(job_size_str);
return on_error(PARSING, parser->type, args,
ESLURM_DATA_CONV_FAILED,
"verify_node_count()",
__func__, "Unknown format: %s",
data_get_string(src));
}
job->min_nodes = min;
job->max_nodes = max;
job->job_size_str = job_size_str;
}
if (job->min_nodes > job->max_nodes)
SWAP(job->min_nodes, job->max_nodes);
return SLURM_SUCCESS;
}
static int DUMP_FUNC(JOB_DESC_MSG_NODES)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
job_desc_msg_t *job = obj;
if (job->job_size_str) {
data_set_string(dst, job->job_size_str);
} else if (job->min_nodes != job->max_nodes)
data_set_string_fmt(dst, "%d-%d", job->min_nodes,
job->max_nodes);
else {
data_set_string_fmt(dst, "%d", job->min_nodes);
}
return SLURM_SUCCESS;
}
PARSE_DISABLED(JOB_INFO_STDIN)
static int DUMP_FUNC(JOB_INFO_STDIN)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
slurm_job_info_t *job = obj;
char path[PATH_MAX];
slurm_get_job_stdin(path, sizeof(path), job);
data_set_string(dst, path);
return SLURM_SUCCESS;
}
PARSE_DISABLED(JOB_INFO_STDOUT)
static int DUMP_FUNC(JOB_INFO_STDOUT)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
slurm_job_info_t *job = obj;
char path[PATH_MAX];
slurm_get_job_stdout(path, sizeof(path), job);
data_set_string(dst, path);
return SLURM_SUCCESS;
}
PARSE_DISABLED(JOB_INFO_STDERR)
static int DUMP_FUNC(JOB_INFO_STDERR)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
slurm_job_info_t *job = obj;
char path[PATH_MAX];
slurm_get_job_stderr(path, sizeof(path), job);
data_set_string(dst, path);
return SLURM_SUCCESS;
}
static int PARSE_FUNC(JOB_EXCLUSIVE)(const parser_t *const parser, void *obj,
data_t *src, args_t *args,
data_t *parent_path)
{
uint16_t *flag = obj;
if (data_get_type(src) == DATA_TYPE_NULL) {
*flag = JOB_SHARED_OK;
return SLURM_SUCCESS;
}
if (data_get_type(src) == DATA_TYPE_BOOL) {
if (data_get_bool(src)) {
*flag = JOB_SHARED_NONE;
} else {
*flag = JOB_SHARED_OK;
}
return SLURM_SUCCESS;
}
return PARSE(JOB_EXCLUSIVE_FLAGS, *flag, src, parent_path, args);
}
static int DUMP_FUNC(JOB_EXCLUSIVE)(const parser_t *const parser, void *obj,
data_t *dst, args_t *args)
{
uint16_t *flag = obj;
return DUMP(JOB_EXCLUSIVE_FLAGS, *flag, dst, args);
}
/*
* The following struct arrays are not following the normal Slurm style but are
* instead being treated as piles of data instead of code.
*/
// clang-format off
#define add_parser(stype, mtype, req, field, overload, path, desc) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_ARRAY_LINKED_FIELD, \
.ptr_offset = offsetof(stype, field), \
.field_name = XSTRINGIFY(field), \
.field_name_overloads = overload, \
.key = path, \
.required = req, \
.type = DATA_PARSER_ ## mtype, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## mtype), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(stype), \
.size = sizeof(((stype *) NULL)->field), \
.needs = NEED_NONE, \
}
#define add_parser_skip(stype, field) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_ARRAY_SKIP_FIELD, \
.ptr_offset = offsetof(stype, field), \
.field_name = XSTRINGIFY(field), \
.type = DATA_PARSER_TYPE_INVALID, \
.obj_type_string = XSTRINGIFY(stype), \
.size = sizeof(((stype *) NULL)->field), \
.needs = NEED_NONE, \
}
/*
* Parser that needs the location of struct as
* it will reference multiple fields at once.
*/
#define add_complex_parser(stype, mtype, req, path, desc) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_ARRAY_LINKED_FIELD, \
.ptr_offset = NO_VAL, \
.key = path, \
.required = req, \
.type = DATA_PARSER_ ## mtype, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## mtype), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(stype), \
.size = NO_VAL, \
.needs = NEED_NONE \
}
#define add_parse_bit_flag_array(stype, mtype, req, field, path, desc)\
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_ARRAY_LINKED_FIELD, \
.ptr_offset = offsetof(stype, field), \
.field_name = XSTRINGIFY(field), \
.key = path, \
.required = req, \
.type = DATA_PARSER_ ## mtype, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## mtype), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(stype), \
.size = sizeof(((stype *) NULL)->field), \
.needs = NEED_NONE, \
}
#define add_flag_bit(flag_value, flag_string) \
add_flag_masked_bit(flag_value, INFINITE64, flag_string)
#define add_flag_masked_bit(flag_value, flag_mask, flag_string) \
add_flag_bit_entry(FLAG_BIT_TYPE_BIT, #flag_value, flag_value,\
flag_mask, #flag_mask, flag_string)
#define add_flag_equal(flag_value, flag_mask, flag_string) \
add_flag_bit_entry(FLAG_BIT_TYPE_EQUAL, #flag_value, \
flag_value, flag_mask, #flag_mask, \
flag_string)
#define add_flag_bit_entry(flag_type, flag_value_string, flag_value, \
flag_mask, flag_mask_string, flag_string) \
{ \
.magic = MAGIC_FLAG_BIT, \
.type = flag_type, \
.value = flag_value, \
.mask = flag_mask, \
.mask_size = sizeof(flag_mask), \
.mask_name = flag_mask_string, \
.name = flag_string, \
.flag_name = flag_value_string, \
.flag_size = sizeof(flag_value), \
}
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_assoc_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_assoc_rec_t, mtype, true, field, 0, path, desc)
static const parser_t PARSER_ARRAY(ASSOC_SHORT)[] = {
/* Identifiers required for any given association */
add_parse(STRING, acct, "account", NULL),
add_parse(STRING, cluster, "cluster", NULL),
add_parse(STRING, partition, "partition", NULL),
add_parse_req(STRING, user, "user", NULL),
};
#undef add_parse
#undef add_parse_req
static const flag_bit_t PARSER_FLAG_ARRAY(ASSOC_FLAGS)[] = {
add_flag_bit(ASSOC_FLAG_DELETED, "DELETED"),
};
#define add_skip(field) \
add_parser_skip(slurmdb_assoc_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_assoc_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_assoc_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_assoc_rec_t */
static const parser_t PARSER_ARRAY(ASSOC)[] = {
add_skip(accounting_list),
add_parse(STRING, acct, "account", NULL),
add_skip(assoc_next),
add_skip(assoc_next_id),
add_skip(bf_usage),
add_parse(STRING, cluster, "cluster", NULL),
add_parse(QOS_ID, def_qos_id, "default/qos", NULL),
add_parse_bit_flag_array(slurmdb_assoc_rec_t, ASSOC_FLAGS, false, flags, "flags", NULL),
add_skip(lft),
add_parse(UINT32_NO_VAL, grp_jobs, "max/jobs/per/count", NULL),
add_parse(UINT32_NO_VAL, grp_jobs_accrue, "max/jobs/per/accruing", NULL),
add_parse(UINT32_NO_VAL, grp_submit_jobs, "max/jobs/per/submitted", NULL),
add_parse(TRES_STR, grp_tres, "max/tres/total", NULL),
add_parse(TRES_STR, max_tres_mins_pj, "max/tres/minutes/per/job", NULL),
add_parse(TRES_STR, grp_tres_mins, "max/tres/group/minutes", NULL),
add_skip(grp_tres_mins_ctld),
add_parse(TRES_STR, grp_tres_run_mins, "max/tres/group/active", NULL),
add_skip(id),
add_parse(BOOL16, is_def, "is_default", NULL),
add_parse(UINT32_NO_VAL, max_jobs, "max/jobs/active", NULL),
add_parse(UINT32_NO_VAL, max_jobs_accrue, "max/jobs/accruing", NULL),
add_parse(UINT32_NO_VAL, max_submit_jobs, "max/jobs/total", NULL),
add_skip(max_tres_mins_ctld),
add_parse(TRES_STR, max_tres_run_mins, "max/tres/minutes/total", NULL),
add_skip(grp_tres_run_mins_ctld),
add_parse(UINT32_NO_VAL, grp_wall, "max/per/account/wall_clock", NULL),
add_parse(TRES_STR, max_tres_pj, "max/tres/per/job", NULL),
add_skip(max_tres_ctld),
add_parse(TRES_STR, max_tres_pn, "max/tres/per/node", NULL),
add_skip(max_tres_pn_ctld),
add_parse(UINT32_NO_VAL, max_wall_pj, "max/jobs/per/wall_clock", NULL),
add_parse(UINT32_NO_VAL, min_prio_thresh, "min/priority_threshold", NULL),
add_parse(STRING, parent_acct, "parent_account", NULL),
add_skip(parent_id),
add_parse(STRING, partition, "partition", NULL),
add_parse(UINT32_NO_VAL, priority, "priority", NULL),
add_parse(QOS_STRING_ID_LIST, qos_list, "qos", NULL),
add_skip(rgt),
add_parse(UINT32, shares_raw, "shares_raw", NULL),
/* slurmdbd should never set uid - it should always be zero */
add_skip(uid),
add_parse(ASSOC_USAGE_PTR, usage, "usage", NULL),
add_parse_req(STRING, user, "user", NULL),
add_skip(user_rec ),
};
#undef add_parse
#undef add_parse_req
#undef add_skip
static const flag_bit_t PARSER_FLAG_ARRAY(ADMIN_LVL)[] = {
add_flag_equal(SLURMDB_ADMIN_NOTSET, INFINITE16, "Not Set"),
add_flag_equal(SLURMDB_ADMIN_NONE, INFINITE16, "None"),
add_flag_equal(SLURMDB_ADMIN_OPERATOR, INFINITE16, "Operator"),
add_flag_equal(SLURMDB_ADMIN_SUPER_USER, INFINITE16, "Administrator"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(USER_FLAGS)[] = {
add_flag_equal(SLURMDB_USER_FLAG_NONE, INFINITE64, "NONE"),
add_flag_bit(SLURMDB_USER_FLAG_DELETED, "DELETED"),
};
#define add_skip(field) \
add_parser_skip(slurmdb_user_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_user_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_user_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_user_rec_t */
static const parser_t PARSER_ARRAY(USER)[] = {
add_parse(ADMIN_LVL, admin_level, "administrator_level", NULL),
add_parse(ASSOC_SHORT_LIST, assoc_list, "associations", NULL),
add_parse(COORD_LIST, coord_accts, "coordinators", NULL),
add_parse(STRING, default_acct, "default/account", NULL),
add_parse(STRING, default_wckey, "default/wckey", NULL),
add_parse_bit_flag_array(slurmdb_user_rec_t, USER_FLAGS, false, flags, "flags", NULL),
add_parse_req(STRING, name, "name", NULL),
add_parse(STRING, old_name, "old_name", NULL),
/* uid should always be 0 */
add_skip(uid),
add_parse(WCKEY_LIST, wckey_list, "wckeys", NULL),
};
#undef add_parse
#undef add_parse_req
#undef add_skip
static const flag_bit_t PARSER_FLAG_ARRAY(SLURMDB_JOB_FLAGS)[] = {
add_flag_equal(SLURMDB_JOB_FLAG_NONE, INFINITE64, "NONE"),
add_flag_equal(SLURMDB_JOB_CLEAR_SCHED, INFINITE64, "CLEAR_SCHEDULING"),
add_flag_bit(SLURMDB_JOB_FLAG_NOTSET, "NOT_SET"),
add_flag_bit(SLURMDB_JOB_FLAG_SUBMIT, "STARTED_ON_SUBMIT"),
add_flag_bit(SLURMDB_JOB_FLAG_SCHED, "STARTED_ON_SCHEDULE"),
add_flag_bit(SLURMDB_JOB_FLAG_BACKFILL, "STARTED_ON_BACKFILL"),
add_flag_bit(SLURMDB_JOB_FLAG_START_R, "START_RECEIVED"),
};
#define add_skip(field) \
add_parser_skip(slurmdb_job_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_job_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_overload(mtype, field, overloads, path, desc) \
add_parser(slurmdb_job_rec_t, mtype, false, field, overloads, path, desc)
/* should mirror the structure of slurmdb_job_rec_t */
static const parser_t PARSER_ARRAY(JOB)[] = {
add_parse(STRING, account, "account", NULL),
add_parse(STRING, admin_comment, "comment/administrator", NULL),
add_parse(UINT32, alloc_nodes, "allocation_nodes", NULL),
add_parse(UINT32, array_job_id, "array/job_id", NULL),
add_parse(UINT32, array_max_tasks, "array/limits/max/running/tasks", NULL),
add_parse(UINT32_NO_VAL, array_task_id, "array/task_id", NULL),
add_parse(STRING, array_task_str, "array/task", NULL),
add_complex_parser(slurmdb_job_rec_t, JOB_ASSOC_ID, false, "association", NULL),
add_parse(STRING, blockid, "block", NULL),
add_parse(STRING, cluster, "cluster", NULL),
add_parse(STRING, constraints, "constraints", NULL),
add_parse(STRING, container, "container", NULL),
add_skip(db_index),
add_parse(JOB_EXIT_CODE, derived_ec, "derived_exit_code", NULL),
add_parse(STRING, derived_es, "comment/job", NULL),
add_parse(UINT32, elapsed, "time/elapsed", NULL),
add_parse(UINT64, eligible, "time/eligible", NULL),
add_parse(UINT64, end, "time/end", NULL),
add_skip(env),
add_parse(JOB_EXIT_CODE, exitcode, "exit_code", NULL),
add_parse(STRING, extra, "extra", NULL),
add_parse(STRING, failed_node, "failed_node", NULL),
add_parse_bit_flag_array(slurmdb_job_rec_t, SLURMDB_JOB_FLAGS, false, flags, "flags", NULL),
add_skip(first_step_ptr),
add_parse(GROUP_ID, gid, "group", NULL),
add_parse(UINT32, het_job_id, "het/job_id", NULL),
add_parse(UINT32_NO_VAL, het_job_offset, "het/job_offset", NULL),
add_parse(UINT32, jobid, "job_id", NULL),
add_parse(STRING, jobname, "name", NULL),
add_skip(lft),
add_parse(STRING, licenses, "licenses", NULL),
add_parse(STRING, mcs_label, "mcs/label", NULL),
add_parse(STRING, nodes, "nodes", NULL),
add_parse(STRING, partition, "partition", NULL),
add_parse_overload(HOLD, priority, 1, "hold", "Hold (true) or release (false) job"),
add_parse_overload(UINT32_NO_VAL, priority, 1, "priority", "Request specific job priority"),
add_parse(QOS_ID, qosid, "qos", NULL),
add_parse(UINT32, req_cpus, "required/CPUs", NULL),
add_parse_overload(MEM_PER_CPUS, req_mem, 2, "required/memory_per_cpu", NULL),
add_parse_overload(MEM_PER_NODE, req_mem, 2, "required/memory_per_node", NULL),
/*
* This will give a large negative value instead of the slurm.conf
* DefMemPerCPU. It will be removed in v40.
*/
add_parse_overload(UINT64, req_mem, 2, "required/memory", NULL),
add_parse(USER_ID, requid, "kill_request_user", NULL),
add_parse(UINT32, resvid, "reservation/id", NULL),
add_parse(STRING, resv_name, "reservation/name", NULL),
add_parse(STRING, script, "script", NULL),
add_skip(show_full),
add_parse(UINT64, start, "time/start", NULL),
add_parse(JOB_STATE, state, "state/current", NULL),
add_parse(JOB_REASON, state_reason_prev, "state/reason", NULL),
add_parse(STEP_LIST, steps, "steps", NULL),
add_parse(UINT64, submit, "time/submission", NULL),
add_parse(STRING, submit_line, "submit_line", NULL),
add_parse(UINT32, suspended, "time/suspended", NULL),
add_parse(STRING, system_comment, "comment/system", NULL),
add_parse(UINT64, sys_cpu_sec, "time/system/seconds", NULL),
add_parse(UINT64, sys_cpu_usec, "time/system/microseconds", NULL),
add_parse(UINT32_NO_VAL, timelimit, "time/limit", NULL),
add_parse(UINT64, tot_cpu_sec, "time/total/seconds", NULL),
add_parse(UINT64, tot_cpu_usec, "time/total/microseconds", NULL),
add_parse(TRES_STR, tres_alloc_str, "tres/allocated", NULL),
add_parse(TRES_STR, tres_req_str, "tres/requested", NULL),
add_skip(uid), /* dup with complex parser JOB_USER below */
add_parse(STRING, used_gres, "used_gres", NULL),
add_skip(user), /* dup with complex parser JOB_USER below */
/* parse uid or user depending on which is available */
add_complex_parser(slurmdb_job_rec_t, JOB_USER, false, "user", NULL),
add_parse(UINT64, user_cpu_sec, "time/user/seconds", NULL),
add_parse(UINT64, user_cpu_usec, "time/user/microseconds", NULL),
add_parse(WCKEY_TAG, wckey, "wckey", NULL),
add_skip(wckeyid),
add_parse(STRING, work_dir, "working_directory", NULL),
};
#undef add_parse
#undef add_skip
#undef add_parse_overload
static const flag_bit_t PARSER_FLAG_ARRAY(ACCOUNT_FLAGS)[] = {
add_flag_bit(SLURMDB_ACCT_FLAG_DELETED, "DELETED"),
};
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_account_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_account_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_account_rec_t */
static const parser_t PARSER_ARRAY(ACCOUNT)[] = {
add_parse(ASSOC_SHORT_LIST, assoc_list, "associations", NULL),
add_parse(COORD_LIST, coordinators, "coordinators", NULL),
add_parse_req(STRING, description, "description", NULL),
add_parse_req(STRING, name, "name", NULL),
add_parse_req(STRING, organization, "organization", NULL),
add_parse_bit_flag_array(slurmdb_account_rec_t, ACCOUNT_FLAGS, false, flags, "flags", NULL),
};
#undef add_parse
#undef add_parse_req
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_accounting_rec_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_accounting_rec_t */
static const parser_t PARSER_ARRAY(ACCOUNTING)[] = {
add_parse(UINT64, alloc_secs, "allocated/seconds", NULL),
add_parse(UINT32, id, "id", NULL),
add_parse(UINT64, period_start, "start", NULL),
add_parse(TRES, tres_rec, "TRES", NULL),
};
#undef add_parse
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_coord_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_coord_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_coord_rec_t */
static const parser_t PARSER_ARRAY(COORD)[] = {
add_parse_req(STRING, name, "name", NULL),
add_parse(BOOL16, direct, "direct", NULL),
};
#undef add_parse
#undef add_parse_req
static const flag_bit_t PARSER_FLAG_ARRAY(WCKEY_FLAGS)[] = {
add_flag_bit(SLURMDB_WCKEY_FLAG_DELETED, "DELETED"),
};
#define add_skip(field) \
add_parser_skip(slurmdb_wckey_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_wckey_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_wckey_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_wckey_rec_t */
static const parser_t PARSER_ARRAY(WCKEY)[] = {
add_parse(ACCOUNTING_LIST, accounting_list, "accounting", NULL),
add_parse_req(STRING, cluster, "cluster", NULL),
add_parse(UINT32, id, "id", NULL),
add_parse_req(STRING, name, "name", NULL),
add_parse_req(STRING, user, "user", NULL),
add_skip(uid),
add_parse_bit_flag_array(slurmdb_wckey_rec_t, WCKEY_FLAGS, false, flags, "flags", NULL),
};
#undef add_parse
#undef add_parse_req
#undef add_skip
#define add_skip(field) \
add_parser_skip(slurmdb_tres_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_tres_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_tres_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_tres_rec_t */
static const parser_t PARSER_ARRAY(TRES)[] = {
add_skip(alloc_secs), /* sreport func */
add_skip(rec_count), /* not packed */
add_parse_req(STRING, type, "type", NULL),
add_parse(STRING, name, "name", NULL),
add_parse(UINT32, id, "id", NULL),
add_parse(INT64, count, "count", NULL),
};
#undef add_parse
#undef add_parse_req
#undef add_skip
static const flag_bit_t PARSER_FLAG_ARRAY(QOS_FLAGS)[] = {
add_flag_masked_bit(QOS_FLAG_NOTSET, ~QOS_FLAG_BASE, "NOT_SET"),
add_flag_masked_bit(QOS_FLAG_ADD, ~QOS_FLAG_BASE, "ADD"),
add_flag_masked_bit(QOS_FLAG_REMOVE, ~QOS_FLAG_BASE, "REMOVE"),
add_flag_masked_bit(QOS_FLAG_PART_MIN_NODE, QOS_FLAG_BASE, "PARTITION_MINIMUM_NODE"),
add_flag_masked_bit(QOS_FLAG_PART_MAX_NODE, QOS_FLAG_BASE, "PARTITION_MAXIMUM_NODE"),
add_flag_masked_bit(QOS_FLAG_PART_TIME_LIMIT, QOS_FLAG_BASE, "PARTITION_TIME_LIMIT"),
add_flag_masked_bit(QOS_FLAG_ENFORCE_USAGE_THRES, QOS_FLAG_BASE, "ENFORCE_USAGE_THRESHOLD"),
add_flag_masked_bit(QOS_FLAG_NO_RESERVE, QOS_FLAG_BASE, "NO_RESERVE"),
add_flag_masked_bit(QOS_FLAG_REQ_RESV, QOS_FLAG_BASE, "REQUIRED_RESERVATION"),
add_flag_masked_bit(QOS_FLAG_DENY_LIMIT, QOS_FLAG_BASE, "DENY_LIMIT"),
add_flag_masked_bit(QOS_FLAG_OVER_PART_QOS, QOS_FLAG_BASE, "OVERRIDE_PARTITION_QOS"),
add_flag_masked_bit(QOS_FLAG_NO_DECAY, QOS_FLAG_BASE, "NO_DECAY"),
add_flag_masked_bit(QOS_FLAG_USAGE_FACTOR_SAFE, QOS_FLAG_BASE, "USAGE_FACTOR_SAFE"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(QOS_PREEMPT_MODES)[] = {
add_flag_equal(PREEMPT_MODE_OFF, INFINITE64, "DISABLED"),
add_flag_bit(PREEMPT_MODE_SUSPEND, "SUSPEND"),
add_flag_bit(PREEMPT_MODE_REQUEUE, "REQUEUE"),
add_flag_bit(PREEMPT_MODE_CANCEL, "CANCEL"),
add_flag_bit(PREEMPT_MODE_GANG, "GANG"),
};
#define add_skip(field) \
add_parser_skip(slurmdb_qos_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_qos_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_qos_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_qos_rec_t */
static const parser_t PARSER_ARRAY(QOS)[] = {
add_parse(STRING, description, "description", NULL),
add_parse_bit_flag_array(slurmdb_qos_rec_t, QOS_FLAGS, false, flags, "flags", NULL),
add_parse(UINT32, id, "id", NULL),
add_parse(UINT32_NO_VAL, grace_time, "limits/grace_time", NULL),
add_parse(UINT32_NO_VAL, grp_jobs_accrue, "limits/max/active_jobs/accruing", NULL),
add_parse(UINT32_NO_VAL, grp_jobs, "limits/max/active_jobs/count", NULL),
add_parse(TRES_STR, grp_tres, "limits/max/tres/total", NULL),
add_skip(grp_tres_ctld), /* not packed */
add_parse(TRES_STR, grp_tres_run_mins, "limits/max/tres/minutes/per/qos", NULL),
add_skip(grp_tres_run_mins_ctld), /* not packed */
add_parse(STRING, name, "name", NULL),
add_parse(UINT32_NO_VAL, grp_wall, "limits/max/wall_clock/per/qos", NULL),
add_parse(FLOAT64, limit_factor, "limits/factor", NULL),
add_parse(UINT32_NO_VAL, max_jobs_pa, "limits/max/jobs/active_jobs/per/account", NULL),
add_parse(UINT32_NO_VAL, max_jobs_pu, "limits/max/jobs/active_jobs/per/user", NULL),
add_parse(UINT32_NO_VAL, max_jobs_accrue_pa, "limits/max/accruing/per/account", NULL),
add_parse(UINT32_NO_VAL, max_jobs_accrue_pu, "limits/max/accruing/per/user", NULL),
add_parse(UINT32_NO_VAL, max_submit_jobs_pa, "limits/max/jobs/per/account", NULL),
add_parse(UINT32_NO_VAL, max_submit_jobs_pu, "limits/max/jobs/per/user", NULL),
add_parse(TRES_STR, max_tres_mins_pj, "limits/max/tres/minutes/per/job", NULL),
add_skip(max_tres_mins_pj_ctld), /* not packed */
add_parse(TRES_STR, max_tres_pa, "limits/max/tres/per/account", NULL),
add_skip(max_tres_pa_ctld), /* not packed */
add_parse(TRES_STR, max_tres_pj, "limits/max/tres/per/job", NULL),
add_skip(max_tres_pj_ctld), /* not packed */
add_parse(TRES_STR, max_tres_pn, "limits/max/tres/per/node", NULL),
add_skip(max_tres_pn_ctld), /* not packed */
add_parse(TRES_STR, max_tres_pu, "limits/max/tres/per/user", NULL),
add_skip(max_tres_pu_ctld), /* not packed */
add_parse(TRES_STR, max_tres_run_mins_pa, "limits/max/tres/minutes/per/account", NULL),
add_skip(max_tres_run_mins_pa_ctld), /* not packed */
add_parse(TRES_STR, max_tres_run_mins_pu, "limits/max/tres/minutes/per/user", NULL),
add_skip(max_tres_run_mins_pu_ctld), /* not packed */
add_parse(UINT32_NO_VAL, max_wall_pj, "limits/max/wall_clock/per/job", NULL),
add_parse(UINT32_NO_VAL, min_prio_thresh, "limits/min/priority_threshold", NULL),
add_parse(TRES_STR, min_tres_pj, "limits/min/tres/per/job", NULL),
add_skip(min_tres_pj_ctld), /* not packed */
add_complex_parser(slurmdb_qos_rec_t, QOS_PREEMPT_LIST, false, "preempt/list", NULL),
add_parse_bit_flag_array(slurmdb_qos_rec_t, QOS_PREEMPT_MODES, false, preempt_mode, "preempt/mode", NULL),
add_parse(UINT32_NO_VAL, preempt_exempt_time, "preempt/exempt_time", NULL),
add_parse(UINT32_NO_VAL, priority, "priority", NULL),
add_skip(usage), /* not packed */
add_parse(FLOAT64_NO_VAL, usage_factor, "usage_factor", NULL),
add_parse(FLOAT64_NO_VAL, usage_thres, "usage_threshold", NULL),
add_skip(blocked_until), /* not packed */
};
#undef add_parse
#undef add_parse_req
#undef add_skip
#undef add_skip_flag
#define add_skip(field) \
add_parser_skip(slurmdb_step_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_step_rec_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_step_rec_t */
static const parser_t PARSER_ARRAY(STEP)[] = {
add_parse(UINT32, elapsed, "time/elapsed", NULL),
add_parse(UINT64, end, "time/end", NULL),
add_parse(JOB_EXIT_CODE, exitcode, "exit_code", NULL),
add_skip(job_ptr), /* redundant here */
add_parse(UINT32, nnodes, "nodes/count", NULL),
add_parse(STRING, nodes, "nodes/range", NULL),
add_parse(UINT32, ntasks, "tasks/count", NULL),
add_parse(STRING, pid_str, "pid", NULL),
add_parse(UINT32_NO_VAL, req_cpufreq_min, "CPU/requested_frequency/min", NULL),
add_parse(UINT32_NO_VAL, req_cpufreq_max, "CPU/requested_frequency/max", NULL),
add_parse(CPU_FREQ_FLAGS, req_cpufreq_gov, "CPU/governor", NULL),
add_parse(USER_ID, requid, "kill_request_user", NULL),
add_parse(UINT64, start, "time/start", NULL),
add_parse(JOB_STATE, state, "state", NULL),
add_parse(UINT64, stats.act_cpufreq, "statistics/CPU/actual_frequency", NULL),
add_parse(UINT64_NO_VAL, stats.consumed_energy, "statistics/energy/consumed", NULL),
add_parse(SLURM_STEP_ID, step_id, "step/id", NULL),
add_parse(STRING, stepname, "step/name", NULL),
add_parse(UINT32, suspended, "time/suspended", NULL),
add_parse(UINT64, sys_cpu_sec, "time/system/seconds", NULL),
add_parse(UINT32, sys_cpu_usec, "time/system/microseconds", NULL),
add_parse(TASK_DISTRIBUTION, task_dist, "task/distribution", NULL),
add_parse(UINT64, tot_cpu_sec, "time/total/seconds", NULL),
add_parse(UINT32, tot_cpu_usec, "time/total/microseconds", NULL),
add_parse(UINT64, user_cpu_sec, "time/user/seconds", NULL),
add_parse(UINT32, user_cpu_usec, "time/user/microseconds", NULL),
add_complex_parser(slurmdb_step_rec_t, STEP_NODES, false, "nodes/list", NULL),
add_complex_parser(slurmdb_step_rec_t, STEP_TRES_REQ_MAX, false, "tres/requested/max", NULL),
add_complex_parser(slurmdb_step_rec_t, STEP_TRES_REQ_MIN, false, "tres/requested/min", NULL),
add_complex_parser(slurmdb_step_rec_t, STEP_TRES_USAGE_MAX, false, "tres/consumed/max", NULL),
add_complex_parser(slurmdb_step_rec_t, STEP_TRES_USAGE_MIN, false, "tres/consumed/min", NULL),
add_parse(TRES_STR, stats.tres_usage_in_ave, "tres/requested/average", NULL),
add_parse(TRES_STR, stats.tres_usage_in_tot, "tres/requested/total", NULL),
add_parse(TRES_STR, stats.tres_usage_out_ave, "tres/consumed/average", NULL),
add_parse(TRES_STR, stats.tres_usage_out_tot, "tres/consumed/total", NULL),
add_parse(TRES_STR, tres_alloc_str, "tres/allocated", NULL),
};
#undef add_parse
#undef add_skip
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_stats_rec_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_stats_rec_t */
static const parser_t PARSER_ARRAY(STATS_REC)[] = {
add_parse(UINT64, time_start, "time_start", NULL),
add_parse(ROLLUP_STATS_PTR, dbd_rollup_stats, "rollups", NULL),
add_parse(STATS_RPC_LIST, rpc_list, "RPCs", NULL),
add_parse(STATS_USER_LIST, user_list, "users", NULL),
};
#undef add_parse
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_rpc_obj_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_rpc_obj_t */
static const parser_t PARSER_ARRAY(STATS_USER)[] = {
add_parse(USER_ID, id, "user", NULL),
add_parse(UINT32, cnt, "count", NULL),
add_parse(UINT64, time_ave, "time/average", NULL),
add_parse(UINT64, time, "time/total", NULL),
};
#undef add_parse
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_rpc_obj_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_rpc_obj_t */
static const parser_t PARSER_ARRAY(STATS_RPC)[] = {
add_parse(RPC_ID, id, "rpc", NULL),
add_parse(UINT32, cnt, "count", NULL),
add_parse(UINT64, time_ave, "time/average", NULL),
add_parse(UINT64, time, "time/total", NULL),
};
#undef add_parse
static const flag_bit_t PARSER_FLAG_ARRAY(CLUSTER_REC_FLAGS)[] = {
add_flag_bit(CLUSTER_FLAG_REGISTER, "REGISTERING"),
add_flag_bit(CLUSTER_FLAG_MULTSD, "MULTIPLE_SLURMD"),
add_flag_bit(CLUSTER_FLAG_FE, "FRONT_END"),
add_flag_bit(CLUSTER_FLAG_CRAY, "CRAY_NATIVE"),
add_flag_bit(CLUSTER_FLAG_FED, "FEDERATION"),
add_flag_bit(CLUSTER_FLAG_EXT, "EXTERNAL"),
};
#define add_skip(field) \
add_parser_skip(slurmdb_cluster_rec_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_cluster_rec_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_cluster_rec_t */
static const parser_t PARSER_ARRAY(CLUSTER_REC)[] = {
add_skip(classification), /* to be deprecated */
add_skip(comm_fail_time), /* not packed */
add_skip(control_addr), /* not packed */
add_parse(STRING, control_host, "controller/host", NULL),
add_parse(UINT32, control_port, "controller/port", NULL),
add_skip(dim_size), /* BG deprecated */
add_skip(fed), /* federation not supportted */
add_parse_bit_flag_array(slurmdb_cluster_rec_t, CLUSTER_REC_FLAGS, false, flags, "flags", NULL),
add_skip(lock), /* not packed */
add_parse(STRING, name, "name", NULL),
add_parse(STRING, nodes, "nodes", NULL),
add_parse(SELECT_PLUGIN_ID, plugin_id_select, "select_plugin", NULL),
add_parse(ASSOC_SHORT_PTR, root_assoc, "associations/root", NULL),
add_parse(UINT16, rpc_version, "rpc_version", NULL),
add_skip(send_rpc), /* not packed */
add_parse(TRES_STR, tres_str, "tres", NULL),
};
#undef add_parse
#undef add_skip
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_cluster_accounting_rec_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_cluster_accounting_rec_t */
static const parser_t PARSER_ARRAY(CLUSTER_ACCT_REC)[] = {
add_parse(UINT64, alloc_secs, "time/allocated", NULL),
add_parse(UINT64, down_secs, "time/down", NULL),
add_parse(UINT64, idle_secs, "time/idle", NULL),
add_parse(UINT64, over_secs, "time/overcommitted", NULL),
add_parse(UINT64, pdown_secs, "time/planned_down", NULL),
add_parse(UINT64, period_start, "time/start", NULL),
add_parse(STRING, tres_rec.name, "tres/name", NULL),
add_parse(STRING, tres_rec.type, "tres/type", NULL),
add_parse(UINT32, tres_rec.id, "tres/id", NULL),
add_parse(UINT64, tres_rec.count, "tres/count", NULL),
};
#undef add_parse
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_tres_nct_rec_t, mtype, false, field, 0, path, desc)
#define add_parse_req(mtype, field, path, desc) \
add_parser(slurmdb_tres_nct_rec_t, mtype, true, field, 0, path, desc)
/* should mirror the structure of slurmdb_tres_nct_rec_t */
static const parser_t PARSER_ARRAY(TRES_NCT)[] = {
add_parse_req(STRING, type, "type", NULL),
add_parse(STRING, name, "name", NULL),
add_parse(UINT32, id, "id", NULL),
add_parse(INT64, count, "count", NULL),
add_parse(INT64, task, "task", NULL),
add_parse(STRING, node, "node", NULL),
};
#undef add_parse
#undef add_parse_req
#define add_skip(field) \
add_parser_skip(slurmdb_assoc_usage_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurmdb_assoc_usage_t, mtype, false, field, 0, path, desc)
/* should mirror the structure of slurmdb_assoc_usage_t */
static const parser_t PARSER_ARRAY(ASSOC_USAGE)[] = {
add_parse(UINT32, accrue_cnt, "accrue_job_count", NULL),
add_skip(children_list), /* not packed */
add_skip(grp_node_bitmap), /* not packed */
add_skip(grp_node_job_cnt), /* not packed */
add_skip(grp_used_tres), /* not packed */
add_skip(grp_used_tres_run_secs), /* not packed */
add_parse(FLOAT64, grp_used_wall, "group_used_wallclock", NULL),
add_parse(FLOAT64, fs_factor, "fairshare_factor", NULL),
add_parse(UINT32, level_shares, "fairshare_shares", NULL),
add_skip(parent_assoc_ptr), /* not packed */
add_parse(FLOAT64, priority_norm, "normalized_priority", NULL),
add_skip(fs_assoc_ptr), /* not packed */
add_parse(FLOAT64, shares_norm, "normalized_shares", NULL),
add_parse(FLOAT128, usage_efctv, "effective_normalized_usage", NULL),
add_parse(FLOAT128, usage_norm, "normalized_usage", NULL),
add_parse(FLOAT128, usage_raw, "raw_usage", NULL),
add_parse(UINT32, used_jobs, "active_jobs", NULL),
add_parse(UINT32, used_submit_jobs, "job_count", NULL),
add_parse(FLOAT128, level_fs, "fairshare_level", NULL),
add_skip(valid_qos),
};
#undef add_parse
#undef add_skip
#define add_skip(field) \
add_parser_skip(stats_info_response_msg_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(stats_info_response_msg_t, mtype, false, field, 0, path, desc)
#define add_cparse(mtype, path, desc) \
add_complex_parser(stats_info_response_msg_t, mtype, false, path, desc)
static const parser_t PARSER_ARRAY(STATS_MSG)[] = {
add_parse(UINT32, parts_packed, "parts_packed", NULL),
add_parse(INT64, req_time, "req_time", NULL),
add_parse(INT64, req_time_start, "req_time_start", NULL),
add_parse(UINT32, server_thread_count, "server_thread_count", NULL),
add_parse(UINT32, agent_queue_size, "agent_queue_size", NULL),
add_parse(UINT32, agent_count, "agent_count", NULL),
add_parse(UINT32, agent_thread_count, "agent_thread_count", NULL),
add_parse(UINT32, dbd_agent_queue_size, "dbd_agent_queue_size", NULL),
add_parse(UINT32, gettimeofday_latency, "gettimeofday_latency", NULL),
add_parse(UINT32, schedule_cycle_max, "schedule_cycle_max", NULL),
add_parse(UINT32, schedule_cycle_last, "schedule_cycle_last", NULL),
add_skip(schedule_cycle_sum),
add_parse(UINT32, schedule_cycle_counter, "schedule_cycle_total", NULL),
add_cparse(STATS_MSG_CYCLE_MEAN, "schedule_cycle_mean", NULL),
add_cparse(STATS_MSG_CYCLE_MEAN_DEPTH, "schedule_cycle_mean_depth", NULL),
add_cparse(STATS_MSG_CYCLE_PER_MIN, "schedule_cycle_per_minute", NULL),
add_skip(schedule_cycle_depth),
add_parse(UINT32, schedule_queue_len, "schedule_queue_length", NULL),
add_parse(UINT32, jobs_submitted, "jobs_submitted", NULL),
add_parse(UINT32, jobs_started, "jobs_started", NULL),
add_parse(UINT32, jobs_completed, "jobs_completed", NULL),
add_parse(UINT32, jobs_canceled, "jobs_canceled", NULL),
add_parse(UINT32, jobs_failed, "jobs_failed", NULL),
add_parse(UINT32, jobs_pending, "jobs_pending", NULL),
add_parse(UINT32, jobs_running, "jobs_running", NULL),
add_parse(INT64, job_states_ts, "job_states_ts", NULL),
add_parse(UINT32, bf_backfilled_jobs, "bf_backfilled_jobs", NULL),
add_parse(UINT32, bf_last_backfilled_jobs, "bf_last_backfilled_jobs", NULL),
add_parse(UINT32, bf_backfilled_het_jobs, "bf_backfilled_het_jobs", NULL),
add_parse(UINT32, bf_cycle_counter, "bf_cycle_counter", NULL),
add_cparse(STATS_MSG_BF_CYCLE_MEAN, "bf_cycle_mean", NULL),
add_cparse(STATS_MSG_BF_DEPTH_MEAN, "bf_depth_mean", NULL),
add_cparse(STATS_MSG_BF_DEPTH_MEAN_TRY, "bf_depth_mean_try", NULL),
add_parse(UINT64, bf_cycle_sum, "bf_cycle_sum", NULL),
add_parse(UINT32, bf_cycle_last, "bf_cycle_last", NULL),
add_parse(UINT32, bf_last_depth, "bf_last_depth", NULL),
add_parse(UINT32, bf_last_depth_try, "bf_last_depth_try", NULL),
add_parse(UINT32, bf_depth_sum, "bf_depth_sum", NULL),
add_parse(UINT32, bf_depth_try_sum, "bf_depth_try_sum", NULL),
add_parse(UINT32, bf_queue_len, "bf_queue_len", NULL),
add_cparse(STATS_MSG_BF_QUEUE_LEN_MEAN, "bf_queue_len_mean", NULL),
add_parse(UINT32, bf_queue_len_sum, "bf_queue_len_sum", NULL),
add_parse(UINT32, bf_table_size, "bf_table_size", NULL),
add_skip(bf_table_size_sum),
add_cparse(STATS_MSG_BF_QUEUE_LEN_MEAN, "bf_table_size_mean", NULL),
add_parse(INT64, bf_when_last_cycle, "bf_when_last_cycle", NULL),
add_cparse(STATS_MSG_BF_ACTIVE, "bf_active", NULL),
add_skip(rpc_type_size),
add_cparse(STATS_MSG_RPCS_BY_TYPE, "rpcs_by_message_type", NULL),
add_skip(rpc_type_id), /* handled by STATS_MSG_RPCS_BY_TYPE */
add_skip(rpc_type_cnt), /* handled by STATS_MSG_RPCS_BY_TYPE */
add_skip(rpc_type_time), /* handled by STATS_MSG_RPCS_BY_TYPE */
add_cparse(STATS_MSG_RPCS_BY_USER, "rpcs_by_user", NULL),
add_skip(rpc_user_size), /* handled by STATS_MSG_RPCS_BY_TYPE */
add_skip(rpc_user_id), /* handled by STATS_MSG_RPCS_BY_TYPE */
add_skip(rpc_user_cnt), /* handled by STATS_MSG_RPCS_BY_TYPE */
add_skip(rpc_user_time), /* handled by STATS_MSG_RPCS_BY_TYPE */
add_skip(rpc_queue_type_count), /* TODO: implement */
add_skip(rpc_queue_type_id ), /* TODO: implement */
add_skip(rpc_queue_count), /* TODO: implement */
add_skip(rpc_dump_count), /* TODO: implement */
add_skip(rpc_dump_types), /* TODO: implement */
add_skip(rpc_dump_hostlist), /* TODO: implement */
};
#undef add_parse
#undef add_cparse
#undef add_skip
static const flag_bit_t PARSER_FLAG_ARRAY(NODE_STATES)[] = {
add_flag_equal(NO_VAL, INFINITE, "INVALID"),
add_flag_equal(NODE_STATE_UNKNOWN, NODE_STATE_BASE, "UNKNOWN"),
add_flag_equal(NODE_STATE_DOWN, NODE_STATE_BASE, "DOWN"),
add_flag_equal(NODE_STATE_IDLE, NODE_STATE_BASE, "IDLE"),
add_flag_equal(NODE_STATE_ALLOCATED, NODE_STATE_BASE, "ALLOCATED"),
add_flag_equal(NODE_STATE_ERROR, NODE_STATE_BASE, "ERROR"),
add_flag_equal(NODE_STATE_MIXED, NODE_STATE_BASE, "MIXED"),
add_flag_equal(NODE_STATE_FUTURE, NODE_STATE_BASE, "FUTURE"),
add_flag_masked_bit(NODE_STATE_NET, NODE_STATE_FLAGS, "PERFCTRS"),
add_flag_masked_bit(NODE_STATE_RES, NODE_STATE_FLAGS, "RESERVED"),
add_flag_masked_bit(NODE_STATE_UNDRAIN, NODE_STATE_FLAGS, "UNDRAIN"),
add_flag_masked_bit(NODE_STATE_CLOUD, NODE_STATE_FLAGS, "CLOUD"),
add_flag_masked_bit(NODE_RESUME, NODE_STATE_FLAGS, "RESUME"),
add_flag_masked_bit(NODE_STATE_DRAIN, NODE_STATE_FLAGS, "DRAIN"),
add_flag_masked_bit(NODE_STATE_COMPLETING, NODE_STATE_FLAGS, "COMPLETING"),
add_flag_masked_bit(NODE_STATE_NO_RESPOND, NODE_STATE_FLAGS, "NOT_RESPONDING"),
add_flag_masked_bit(NODE_STATE_POWERED_DOWN, NODE_STATE_FLAGS, "POWERED_DOWN"),
add_flag_masked_bit(NODE_STATE_FAIL, NODE_STATE_FLAGS, "FAIL"),
add_flag_masked_bit(NODE_STATE_POWERING_UP, NODE_STATE_FLAGS, "POWERING_UP"),
add_flag_masked_bit(NODE_STATE_MAINT, NODE_STATE_FLAGS, "MAINTENANCE"),
add_flag_masked_bit(NODE_STATE_REBOOT_REQUESTED, NODE_STATE_FLAGS, "REBOOT_REQUESTED"),
add_flag_masked_bit(NODE_STATE_REBOOT_CANCEL, NODE_STATE_FLAGS, "REBOOT_CANCELED"),
add_flag_masked_bit(NODE_STATE_POWERING_DOWN, NODE_STATE_FLAGS, "POWERING_DOWN"),
add_flag_masked_bit(NODE_STATE_DYNAMIC_FUTURE, NODE_STATE_FLAGS, "DYNAMIC_FUTURE"),
add_flag_masked_bit(NODE_STATE_REBOOT_ISSUED, NODE_STATE_FLAGS, "REBOOT_ISSUED"),
add_flag_masked_bit(NODE_STATE_PLANNED, NODE_STATE_FLAGS, "PLANNED"),
add_flag_masked_bit(NODE_STATE_INVALID_REG, NODE_STATE_FLAGS, "INVALID_REG"),
add_flag_masked_bit(NODE_STATE_POWER_DOWN, NODE_STATE_FLAGS, "POWER_DOWN"),
add_flag_masked_bit(NODE_STATE_POWER_UP, NODE_STATE_FLAGS, "POWER_UP"),
add_flag_masked_bit(NODE_STATE_POWER_DRAIN, NODE_STATE_FLAGS, "POWER_DRAIN"),
add_flag_masked_bit(NODE_STATE_DYNAMIC_NORM, NODE_STATE_FLAGS, "DYNAMIC_NORM"),
};
#define add_parse(mtype, field, path, desc) \
add_parser(node_info_t, mtype, false, field, 0, path, desc)
#define add_cparse(mtype, path, desc) \
add_complex_parser(node_info_t, mtype, false, path, desc)
static const parser_t PARSER_ARRAY(NODE)[] = {
add_parse(STRING, arch, "architecture", NULL),
add_parse(STRING, bcast_address, "burstbuffer_network_address", NULL),
add_parse(UINT16, boards, "boards", NULL),
add_parse(UINT64, boot_time, "boot_time", NULL),
add_parse(STRING, cluster_name, "cluster_name", NULL),
add_parse(UINT16, cores, "cores", NULL),
add_parse(UINT16, core_spec_cnt, "specialized_cores", NULL),
add_parse(UINT32, cpu_bind, "cpu_binding", NULL),
add_parse(UINT32_NO_VAL, cpu_load, "cpu_load", NULL),
add_parse(UINT64_NO_VAL, free_mem, "free_mem", NULL),
add_parse(UINT16, cpus, "cpus", NULL),
add_parse(UINT16, cpus_efctv, "effective_cpus", NULL),
add_parse(STRING, cpu_spec_list, "specialized_cpus", NULL),
add_parse(ACCT_GATHER_ENERGY_PTR, energy, "energy", NULL),
add_parse(EXT_SENSORS_DATA_PTR, ext_sensors, "external_sensors", NULL),
add_parse(STRING, extra, "extra", NULL),
add_parse(POWER_MGMT_DATA_PTR, power, "power", NULL),
add_parse(CSV_STRING, features, "features", NULL),
add_parse(CSV_STRING, features_act, "active_features", NULL),
add_parse(STRING, gres, "gres", NULL),
add_parse(STRING, gres_drain, "gres_drained", NULL),
add_parse(STRING, gres_used, "gres_used", NULL),
add_parse(UINT64, last_busy, "last_busy", NULL),
add_parse(STRING, mcs_label, "mcs_label", NULL),
add_parse(UINT64, mem_spec_limit, "specialized_memory", NULL),
add_parse(STRING, name, "name", NULL),
add_parse(NODE_STATES, next_state, "next_state_after_reboot", NULL),
add_parse(STRING, node_addr, "address", NULL),
add_parse(STRING, node_hostname, "hostname", NULL),
add_parse_bit_flag_array(node_info_t, NODE_STATES, false, node_state, "state", NULL),
add_parse(STRING, os, "operating_system", NULL),
add_parse(USER_ID, owner, "owner", NULL),
add_parse(CSV_STRING, partitions, "partitions", NULL),
add_parse(UINT16, port, "port", NULL),
add_parse(UINT64, real_memory, "real_memory", NULL),
add_parse(STRING, comment, "comment", NULL),
add_parse(STRING, reason, "reason", NULL),
add_parse(UINT64, reason_time, "reason_changed_at", NULL),
add_parse(USER_ID, reason_uid, "reason_set_by_user", NULL),
add_parse(UINT64_NO_VAL, resume_after, "resume_after", NULL),
add_parse(STRING, resv_name, "reservation", NULL),
add_cparse(NODE_SELECT_ALLOC_MEMORY, "alloc_memory", NULL),
add_cparse(NODE_SELECT_ALLOC_CPUS, "alloc_cpus", NULL),
add_cparse(NODE_SELECT_ALLOC_IDLE_CPUS, "alloc_idle_cpus", NULL),
add_cparse(NODE_SELECT_TRES_USED, "tres_used", NULL),
add_cparse(NODE_SELECT_TRES_WEIGHTED, "tres_weighted", NULL),
add_parse(UINT64, slurmd_start_time, "slurmd_start_time", NULL),
add_parse(UINT16, sockets, "sockets", NULL),
add_parse(UINT16, threads, "threads", NULL),
add_parse(UINT32, tmp_disk, "temporary_disk", NULL),
add_parse(UINT32, weight, "weight", NULL),
add_parse(STRING, tres_fmt_str, "tres", NULL),
add_parse(STRING, version, "version", NULL),
};
#undef add_parse
#undef add_cparse
#define add_parse(mtype, field, path, desc) \
add_parser(slurm_license_info_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(LICENSE)[] = {
add_parse(STRING, name, "LicenseName", NULL),
add_parse(UINT32, total, "Total", NULL),
add_parse(UINT32, in_use, "Used", NULL),
add_parse(UINT32, available, "Free", NULL),
add_parse(BOOL, remote, "Remote", NULL),
add_parse(UINT32, reserved, "Reserved", NULL),
add_parse(UINT32, last_consumed, "LastConsumed", NULL),
add_parse(UINT32, last_deficit, "LastDeficit", NULL),
add_parse(UINT64, last_update, "LastUpdate", NULL),
};
#undef add_parse
static const flag_bit_t PARSER_FLAG_ARRAY(JOB_FLAGS)[] = {
add_flag_bit(KILL_INV_DEP, "KILL_INVALID_DEPENDENCY"),
add_flag_bit(NO_KILL_INV_DEP, "NO_KILL_INVALID_DEPENDENCY"),
add_flag_bit(HAS_STATE_DIR, "HAS_STATE_DIRECTORY"),
add_flag_bit(BACKFILL_TEST, "TESTING_BACKFILL"),
add_flag_bit(GRES_ENFORCE_BIND, "GRES_BINDING_ENFORCED"),
add_flag_bit(TEST_NOW_ONLY, "TEST_NOW_ONLY"),
add_flag_bit(JOB_SEND_ENV, "SEND_JOB_ENVIRONMENT"),
add_flag_bit(SPREAD_JOB, "SPREAD_JOB"),
add_flag_bit(USE_MIN_NODES, "PREFER_MINIMUM_NODE_COUNT"),
add_flag_bit(JOB_KILL_HURRY, "JOB_KILL_HURRY"),
add_flag_bit(TRES_STR_CALC, "SKIP_TRES_STRING_ACCOUNTING"),
add_flag_bit(SIB_JOB_FLUSH, "SIBLING_CLUSTER_UPDATE_ONLY"),
add_flag_bit(HET_JOB_FLAG, "HETEROGENEOUS_JOB"),
add_flag_bit(JOB_NTASKS_SET, "EXACT_TASK_COUNT_REQUESTED"),
add_flag_bit(JOB_CPUS_SET, "EXACT_CPU_COUNT_REQUESTED"),
add_flag_bit(BF_WHOLE_NODE_TEST, "TESTING_WHOLE_NODE_BACKFILL"),
add_flag_bit(TOP_PRIO_TMP, "TOP_PRIORITY_JOB"),
add_flag_bit(JOB_ACCRUE_OVER, "ACCRUE_COUNT_CLEARED"),
add_flag_bit(GRES_DISABLE_BIND, "GRED_BINDING_DISABLED"),
add_flag_bit(JOB_WAS_RUNNING, "JOB_WAS_RUNNING"),
add_flag_bit(RESET_ACCRUE_TIME, "JOB_ACCRUE_TIME_RESET"),
add_flag_bit(CRON_JOB, "CRON_JOB"),
add_flag_bit(JOB_MEM_SET, "EXACT_MEMORY_REQUESTED"),
add_flag_bit(USE_DEFAULT_ACCT, "USING_DEFAULT_ACCOUNT"),
add_flag_bit(USE_DEFAULT_PART, "USING_DEFAULT_PARTITION"),
add_flag_bit(USE_DEFAULT_QOS, "USING_DEFAULT_QOS"),
add_flag_bit(USE_DEFAULT_WCKEY, "USING_DEFAULT_WCKEY"),
add_flag_bit(JOB_DEPENDENT, "DEPENDENT"),
add_flag_bit(JOB_MAGNETIC, "MAGNETIC"),
add_flag_bit(JOB_PART_ASSIGNED, "PARTITION_ASSIGNED"),
add_flag_bit(BACKFILL_SCHED, "BACKFILL_ATTEMPTED"),
add_flag_bit(BACKFILL_LAST, "SCHEDULING_ATTEMPTED"),
add_flag_bit(JOB_SEND_SCRIPT, "SAVE_BATCH_SCRIPT"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(JOB_SHOW_FLAGS)[] = {
add_flag_bit(SHOW_ALL, "ALL"),
add_flag_bit(SHOW_DETAIL, "DETAIL"),
add_flag_bit(SHOW_MIXED, "MIXED"),
add_flag_bit(SHOW_LOCAL, "LOCAL"),
add_flag_bit(SHOW_SIBLING, "SIBLING"),
add_flag_bit(SHOW_FEDERATION, "FEDERATION"),
add_flag_bit(SHOW_FUTURE, "FUTURE"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(POWER_FLAGS)[] = {
add_flag_bit(SLURM_POWER_FLAGS_LEVEL, "EQUAL_POWER"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(JOB_MAIL_FLAGS)[] = {
add_flag_bit(MAIL_JOB_BEGIN, "BEGIN"),
add_flag_bit(MAIL_JOB_END, "END"),
add_flag_bit(MAIL_JOB_FAIL, "FAIL"),
add_flag_bit(MAIL_JOB_REQUEUE, "REQUEUE"),
add_flag_bit(MAIL_JOB_TIME100, "TIME=100%"),
add_flag_bit(MAIL_JOB_TIME90, "TIME=90%"),
add_flag_bit(MAIL_JOB_TIME80, "TIME=80%"),
add_flag_bit(MAIL_JOB_TIME50, "TIME=50%"),
add_flag_bit(MAIL_JOB_STAGE_OUT, "STAGE_OUT"),
add_flag_bit(MAIL_ARRAY_TASKS, "ARRAY_TASKS"),
add_flag_bit(MAIL_INVALID_DEPEND, "INVALID_DEPENDENCY"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(ACCT_GATHER_PROFILE)[] = {
add_flag_equal(ACCT_GATHER_PROFILE_NOT_SET, INFINITE, "NOT_SET"),
add_flag_equal(ACCT_GATHER_PROFILE_NONE, INFINITE, "NONE"),
add_flag_bit(ACCT_GATHER_PROFILE_ENERGY, "ENERGY"),
add_flag_bit(ACCT_GATHER_PROFILE_LUSTRE, "LUSTRE"),
add_flag_bit(ACCT_GATHER_PROFILE_NETWORK, "NETWORK"),
add_flag_bit(ACCT_GATHER_PROFILE_TASK, "TASK"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(JOB_SHARED)[] = {
add_flag_equal(JOB_SHARED_NONE, INFINITE16, "none"),
add_flag_equal(JOB_SHARED_OK, INFINITE16, "oversubscribe"),
add_flag_equal(JOB_SHARED_USER, INFINITE16, "user"),
add_flag_equal(JOB_SHARED_MCS, INFINITE16, "mcs"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(JOB_EXCLUSIVE_FLAGS)[] = {
add_flag_equal(JOB_SHARED_NONE, INFINITE16, "true"),
add_flag_equal(JOB_SHARED_OK, INFINITE16, "false"),
add_flag_equal(JOB_SHARED_USER, INFINITE16, "user"),
add_flag_equal(JOB_SHARED_MCS, INFINITE16, "mcs"),
};
#define add_skip(field) \
add_parser_skip(slurm_job_info_t, field)
#define add_parse(mtype, field, path, desc) \
add_parser(slurm_job_info_t, mtype, false, field, 0, path, desc)
#define add_parse_overload(mtype, field, overloads, path, desc) \
add_parser(slurm_job_info_t, mtype, false, field, overloads, path, desc)
#define add_cparse(mtype, path, desc) \
add_complex_parser(slurm_job_info_t, mtype, false, path, desc)
static const parser_t PARSER_ARRAY(JOB_INFO)[] = {
add_parse(STRING, account, "account", NULL),
add_parse(UINT64, accrue_time, "accrue_time", NULL),
add_parse(STRING, admin_comment, "admin_comment", NULL),
add_parse(STRING, alloc_node, "allocating_node", NULL),
add_skip(alloc_sid),
add_skip(array_bitmap),
add_parse(UINT32_NO_VAL, array_job_id, "array_job_id", NULL),
add_parse(UINT32_NO_VAL, array_task_id, "array_task_id", NULL),
add_parse(UINT32_NO_VAL, array_max_tasks, "array_max_tasks", NULL),
add_parse(STRING, array_task_str, "array_task_string", NULL),
add_parse(UINT32, assoc_id, "association_id", NULL),
add_parse(STRING, batch_features, "batch_features", NULL),
add_parse(BOOL16, batch_flag, "batch_flag", NULL),
add_parse(STRING, batch_host, "batch_host", NULL),
add_parse_bit_flag_array(slurm_job_info_t, JOB_FLAGS, false, bitflags, "flags", NULL),
add_skip(boards_per_node),
add_parse(STRING, burst_buffer, "burst_buffer", NULL),
add_parse(STRING, burst_buffer_state, "burst_buffer_state", NULL),
add_parse(STRING, cluster, "cluster", NULL),
add_parse(STRING, cluster_features, "cluster_features", NULL),
add_parse(STRING, command, "command", NULL),
add_parse(STRING, comment, "comment", NULL),
add_parse(STRING, container, "container", NULL),
add_parse(STRING, container_id, "container_id", NULL),
add_parse(BOOL16_NO_VAL, contiguous, "contiguous", NULL),
add_parse_overload(CORE_SPEC, core_spec, 1, "core_spec", NULL),
add_parse_overload(THREAD_SPEC, core_spec, 1, "thread_spec", NULL),
add_parse(UINT16_NO_VAL, cores_per_socket, "cores_per_socket", NULL),
add_parse(FLOAT64_NO_VAL, billable_tres, "billable_tres", NULL),
add_parse(UINT16_NO_VAL, cpus_per_task, "cpus_per_task", NULL),
add_parse(UINT32_NO_VAL, cpu_freq_min, "cpu_frequency_minimum", NULL),
add_parse(UINT32_NO_VAL, cpu_freq_max, "cpu_frequency_maximum", NULL),
add_parse(UINT32_NO_VAL, cpu_freq_gov, "cpu_frequency_governor", NULL),
add_parse(STRING, cpus_per_tres, "cpus_per_tres", NULL),
add_parse(STRING, cronspec, "cron", NULL),
add_parse(UINT64, deadline, "deadline", NULL),
add_parse(UINT32_NO_VAL, delay_boot, "delay_boot", NULL),
add_parse(STRING, dependency, "dependency", NULL),
add_parse(UINT32_NO_VAL, derived_ec, "derived_exit_code", NULL),
add_parse(UINT64, eligible_time, "eligible_time", NULL),
add_parse(UINT64, end_time, "end_time", NULL),
add_parse(STRING, exc_nodes, "excluded_nodes", NULL),
add_skip(exc_node_inx),
add_parse(UINT32_NO_VAL, exit_code, "exit_code", NULL),
add_parse(STRING, extra, "extra", NULL),
add_parse(STRING, failed_node, "failed_node", NULL),
add_parse(STRING, features, "features", NULL),
add_parse(STRING, fed_origin_str, "federation_origin", NULL),
add_skip(fed_siblings_active),
add_parse(STRING, fed_siblings_active_str, "federation_siblings_active", NULL),
add_skip(fed_siblings_viable),
add_parse(STRING, fed_siblings_viable_str, "federation_siblings_viable", NULL),
add_skip(gres_detail_cnt),
add_skip(gres_detail_str), /* handled by JOB_INFO_GRES_DETAIL */
add_cparse(JOB_INFO_GRES_DETAIL, "gres_detail", NULL),
add_parse_overload(UINT32, group_id, 1, "group_id", NULL),
add_parse_overload(GROUP_ID, group_id, 1, "group_name", NULL),
add_parse(UINT32_NO_VAL, het_job_id, "het_job_id", NULL),
add_parse(STRING, het_job_id_set, "het_job_id_set", NULL),
add_parse(UINT32_NO_VAL, het_job_offset, "het_job_offset", NULL),
add_parse(UINT32, job_id, "job_id", NULL),
add_parse(JOB_RES_PTR, job_resrcs, "job_resources", NULL),
add_parse(CSV_STRING, job_size_str, "job_size_str", NULL),
add_parse(JOB_STATE, job_state, "job_state", NULL),
add_parse(UINT64, last_sched_eval, "last_sched_evaluation", NULL),
add_parse(STRING, licenses, "licenses", NULL),
add_parse_bit_flag_array(slurm_job_info_t, JOB_MAIL_FLAGS, false, mail_type, "mail_type", NULL),
add_parse(STRING, mail_user, "mail_user", NULL),
add_parse(UINT32_NO_VAL, max_cpus, "max_cpus", NULL),
add_parse(UINT32_NO_VAL, max_nodes, "max_nodes", NULL),
add_parse(STRING, mcs_label, "mcs_label", NULL),
add_parse(STRING, mem_per_tres, "memory_per_tres", NULL),
add_parse(STRING, name, "name", NULL),
add_parse(STRING, network, "network", NULL),
add_parse(STRING, nodes, "nodes", NULL),
add_parse(NICE, nice, "nice", NULL),
add_parse(UINT16_NO_VAL, ntasks_per_core, "tasks_per_core", NULL),
add_parse(UINT16_NO_VAL, ntasks_per_tres, "tasks_per_tres", NULL),
add_parse(UINT16_NO_VAL, ntasks_per_node, "tasks_per_node", NULL),
add_parse(UINT16_NO_VAL, ntasks_per_socket, "tasks_per_socket", NULL),
add_parse(UINT16_NO_VAL, ntasks_per_board, "tasks_per_board", NULL),
add_parse(UINT32_NO_VAL, num_cpus, "cpus", NULL),
add_parse(UINT32_NO_VAL, num_nodes, "node_count", NULL),
add_parse(UINT32_NO_VAL, num_tasks, "tasks", NULL),
add_parse(STRING, partition, "partition", NULL),
add_parse(STRING, prefer, "prefer", NULL),
add_parse_overload(MEM_PER_CPUS, pn_min_memory, 1, "memory_per_cpu", NULL),
add_parse_overload(MEM_PER_NODE, pn_min_memory, 1, "memory_per_node", NULL),
add_parse(UINT16_NO_VAL, pn_min_cpus, "minimum_cpus_per_node", NULL),
add_parse(UINT32_NO_VAL, pn_min_tmp_disk, "minimum_tmp_disk_per_node", NULL),
add_parse_bit_flag_array(slurm_job_info_t, POWER_FLAGS, false, power_flags, "power/flags", NULL),
add_parse(UINT64, preempt_time, "preempt_time", NULL),
add_parse(UINT64, preemptable_time, "preemptable_time", NULL),
add_parse(UINT64, pre_sus_time, "pre_sus_time", NULL),
add_parse_overload(HOLD, priority, 1, "hold", "Hold (true) or release (false) job"),
add_parse_overload(UINT32_NO_VAL, priority, 1, "priority", "Request specific job priority"),
add_parse(ACCT_GATHER_PROFILE, profile, "profile", NULL),
add_parse(QOS_NAME, qos, "qos", NULL),
add_parse(BOOL, reboot, "reboot", NULL),
add_parse(STRING, req_nodes, "required_nodes", NULL),
add_skip(req_node_inx),
add_parse(UINT32, req_switch, "minimum_switches", NULL),
add_parse(BOOL16, requeue, "requeue", NULL),
add_parse(UINT64, resize_time, "resize_time", NULL),
add_parse(UINT16, restart_cnt, "restart_cnt", NULL),
add_parse(STRING, resv_name, "resv_name", NULL),
add_parse(STRING, sched_nodes, "scheduled_nodes", NULL),
add_parse(STRING, selinux_context, "selinux_context", NULL),
add_parse_overload(JOB_SHARED, shared, 2, "shared", NULL),
add_parse_overload(JOB_EXCLUSIVE, shared, 2, "exclusive", NULL),
add_parse_overload(BOOL16, shared, 2, "oversubscribe", NULL),
add_parse_bit_flag_array(slurm_job_info_t, JOB_SHOW_FLAGS, false, show_flags, "show_flags", NULL),
add_parse(UINT16, sockets_per_board, "sockets_per_board", NULL),
add_parse(UINT16_NO_VAL, sockets_per_node, "sockets_per_node", NULL),
add_parse(UINT64, start_time, "start_time", NULL),
add_skip(start_protocol_ver),
add_parse(STRING, state_desc, "state_description", NULL),
add_parse(JOB_REASON, state_reason, "state_reason", NULL),
add_skip(std_err),
add_skip(std_in),
add_skip(std_out),
add_cparse(JOB_INFO_STDERR, "standard_error", NULL),
add_cparse(JOB_INFO_STDIN, "standard_input", NULL),
add_cparse(JOB_INFO_STDOUT, "standard_output", NULL),
add_parse(UINT64, submit_time, "submit_time", NULL),
add_parse(UINT64, suspend_time, "suspend_time", NULL),
add_parse(STRING, system_comment, "system_comment", NULL),
add_parse(UINT32_NO_VAL, time_limit, "time_limit", NULL),
add_parse(UINT32_NO_VAL, time_min, "time_minimum", NULL),
add_parse(UINT16_NO_VAL, threads_per_core, "threads_per_core", NULL),
add_parse(STRING, tres_bind, "tres_bind", NULL),
add_parse(STRING, tres_freq, "tres_freq", NULL),
add_parse(STRING, tres_per_job, "tres_per_job", NULL),
add_parse(STRING, tres_per_node, "tres_per_node", NULL),
add_parse(STRING, tres_per_socket, "tres_per_socket", NULL),
add_parse(STRING, tres_per_task, "tres_per_task", NULL),
add_parse(STRING, tres_req_str, "tres_req_str", NULL),
add_parse(STRING, tres_alloc_str, "tres_alloc_str", NULL),
add_parse_overload(UINT32, user_id, 1, "user_id", NULL),
add_parse_overload(USER_ID, user_id, 1, "user_name", NULL),
add_parse(UINT32, wait4switch, "maximum_switch_wait_time", NULL),
add_parse(STRING, wckey, "wckey", NULL),
add_parse(STRING, work_dir, "current_working_directory", NULL),
};
#undef add_parse
#undef add_parse_overload
#undef add_cparse
#undef add_skip
#define add_parse(mtype, field, path, desc) \
add_parser(job_resources_t, mtype, false, field, 0, path, desc)
#define add_parse_overload(mtype, field, overloads, path, desc) \
add_parser(job_resources_t, mtype, false, field, overloads, path, desc)
#define add_cparse(mtype, path, desc) \
add_complex_parser(job_resources_t, mtype, false, path, desc)
static const parser_t PARSER_ARRAY(JOB_RES)[] = {
add_parse(STRING, nodes, "nodes", NULL),
add_parse_overload(ALLOCATED_CORES, ncpus, 1, "allocated_cores", NULL),
add_parse_overload(ALLOCATED_CPUS, ncpus, 1, "allocated_cpus", NULL),
add_parse(UINT32, nhosts, "allocated_hosts", NULL),
add_cparse(JOB_RES_NODES, "allocated_nodes", NULL),
};
#undef add_parse
#undef add_parse_overload
#undef add_cparse
#define add_parse(mtype, field, path, desc) \
add_parser(controller_ping_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(CONTROLLER_PING)[] = {
add_parse(STRING, hostname, "hostname", NULL),
add_parse(CONTROLLER_PING_RESULT, pinged, "pinged", NULL),
add_parse(UINT64, latency, "latency", NULL),
add_parse(CONTROLLER_PING_MODE, offset, "mode", NULL),
};
#undef add_parse
#define add_parse(mtype, field, path, desc) \
add_parser(job_step_info_t, mtype, false, field, 0, path, desc)
#define add_skip(field) \
add_parser_skip(job_step_info_t, field)
static const parser_t PARSER_ARRAY(STEP_INFO)[] = {
add_parse(UINT32, array_job_id, "array/job_id", NULL),
add_parse(UINT32, array_task_id, "array/task_id", NULL),
add_parse(STRING, cluster, "cluster", NULL),
add_parse(STRING, container, "container", NULL),
add_parse(STRING, container_id, "container_id", NULL),
add_parse(UINT32_NO_VAL, cpu_freq_min, "cpu/frequency/min", NULL),
add_parse(UINT32_NO_VAL, cpu_freq_max, "cpu/frequency/max", NULL),
add_parse(UINT32_NO_VAL, cpu_freq_gov, "cpu/frequency/governor", NULL),
add_parse(STRING, cpus_per_tres, "tres/per/cpu", NULL),
add_parse(STRING, mem_per_tres, "tres/per/memory", NULL),
add_parse(STRING, name, "name", NULL),
add_parse(STRING, network, "network", NULL),
add_parse(STRING, nodes, "nodes", NULL),
add_skip(node_inx),
add_parse(UINT32, num_cpus, "number_cpus", NULL),
add_parse(UINT32, num_tasks, "number_tasks", NULL),
add_parse(STRING, partition, "partition", NULL),
add_parse(STRING, resv_ports, "reserved_ports", NULL),
add_parse(UINT64, run_time, "time/running", NULL),
add_parse(STRING, srun_host, "srun/host", NULL),
add_parse(UINT32, srun_pid, "srun/pid", NULL),
add_parse(UINT64, start_time, "time/start", NULL),
add_skip(start_protocol_ver),
add_parse(JOB_STATE, state, "state", NULL),
add_parse(SLURM_STEP_ID, step_id, "id", NULL),
add_parse(STRING, submit_line, "submit_line", NULL),
add_parse(TASK_DISTRIBUTION, task_dist, "task/distribution", NULL),
add_parse(UINT32_NO_VAL, time_limit, "time/limit", NULL),
add_parse(STRING, tres_alloc_str, "tres/allocation", NULL),
add_parse(STRING, tres_bind, "tres/binding", NULL),
add_parse(STRING, tres_freq, "tres/frequency", NULL),
add_parse(STRING, tres_per_step, "tres/per/step", NULL),
add_parse(STRING, tres_per_node, "tres/per/node", NULL),
add_parse(STRING, tres_per_socket, "tres/per/socket", NULL),
add_parse(STRING, tres_per_task, "tres/per/task", NULL),
add_parse(USER_ID, user_id, "user", NULL),
};
#undef add_parse
#undef add_skip
#define add_parse(mtype, field, path, desc) \
add_parser(partition_info_t, mtype, false, field, 0, path, desc)
#define add_skip(field) \
add_parser_skip(partition_info_t, field)
static const parser_t PARSER_ARRAY(PARTITION_INFO)[] = {
add_parse(STRING, allow_alloc_nodes, "nodes/allowed_allocation", NULL),
add_parse(STRING, allow_accounts, "accounts/allowed", NULL),
add_parse(STRING, allow_groups, "groups/allowed", NULL),
add_parse(STRING, allow_qos, "qos/allowed", NULL),
add_parse(STRING, alternate, "alternate", NULL),
add_parse(STRING, billing_weights_str, "tres/billing_weights", NULL),
add_parse(STRING, cluster_name, "cluster", NULL),
add_skip(cr_type), //TODO: add parsing for consumable resource type
add_parse(UINT32, cpu_bind, "cpus/task_binding", NULL),
add_parse(UINT64, def_mem_per_cpu, "defaults/memory_per_cpu", NULL),
add_parse(UINT32_NO_VAL, default_time, "defaults/time", NULL),
add_parse(STRING, deny_accounts, "accounts/deny", NULL),
add_parse(STRING, deny_qos, "qos/deny", NULL),
add_skip(flags), //FIXME
add_parse(UINT32, grace_time, "grace_time", NULL),
add_skip(job_defaults_list), //FIXME - is this even packed?
add_parse(STRING, job_defaults_str, "defaults/job", NULL),
add_parse(UINT32_NO_VAL, max_cpus_per_node, "maximums/cpus_per_node", NULL),
add_parse(UINT32_NO_VAL, max_cpus_per_socket, "maximums/cpus_per_socket", NULL),
add_parse(UINT64, max_mem_per_cpu, "maximums/memory_per_cpu", NULL),
add_parse(UINT32_NO_VAL, max_nodes, "maximums/nodes", NULL),
add_parse(UINT16, max_share, "maximums/shares", NULL),
add_parse(UINT32_NO_VAL, max_time, "maximums/time", NULL),
add_parse(UINT32, min_nodes, "minimums/nodes", NULL),
add_parse(STRING, name, "name", NULL),
add_skip(node_inx),
add_parse(STRING, nodes, "nodes/configured", NULL),
add_parse(STRING, nodesets, "node_sets", NULL),
add_parse(UINT16_NO_VAL, over_time_limit, "maximums/over_time_limit", NULL),
add_skip(preempt_mode), // FIXME
add_parse(UINT16, priority_job_factor, "priority/job_factor", NULL),
add_parse(UINT16, priority_tier, "priority/tier", NULL),
add_parse(STRING, qos_char, "qos/assigned", NULL),
add_parse(UINT16_NO_VAL, resume_timeout, "timeouts/resume", NULL),
add_skip(state_up), //FIXME
add_parse(UINT32_NO_VAL, suspend_time, "suspend_time", NULL),
add_parse(UINT16_NO_VAL, suspend_timeout, "timeouts/suspend", NULL),
add_parse(UINT32, total_cpus, "cpus/total", NULL),
add_parse(UINT32, total_nodes, "nodes/total", NULL),
add_parse(STRING, tres_fmt_str, "tres/configured", NULL),
};
#undef add_parse
#undef add_skip
#define add_parse(mtype, field, path, desc) \
add_parser(sinfo_data_t, mtype, false, field, 0, path, desc)
#define add_skip(field) \
add_parser_skip(sinfo_data_t, field)
static const parser_t PARSER_ARRAY(SINFO_DATA)[] = {
add_parse(UINT16, port, "port", NULL),
add_parse_bit_flag_array(sinfo_data_t, NODE_STATES, false, node_state, "node/state", NULL),
add_parse(UINT32, nodes_alloc, "nodes/allocated", NULL),
add_parse(UINT32, nodes_idle, "nodes/idle", NULL),
add_parse(UINT32, nodes_other, "nodes/other", NULL),
add_parse(UINT32, nodes_total, "nodes/total", NULL),
add_parse(UINT32, cpus_alloc, "cpus/allocated", NULL),
add_parse(UINT32, cpus_idle, "cpus/idle", NULL),
add_parse(UINT32, cpus_other, "cpus/other", NULL),
add_parse(UINT32, cpus_total, "cpus/total", NULL),
add_parse(UINT32, min_cpus, "cpus/minimum", NULL),
add_parse(UINT32, max_cpus, "cpus/maximum", NULL),
add_parse(UINT32, min_sockets, "sockets/minimum", NULL),
add_parse(UINT32, max_sockets, "sockets/maximum", NULL),
add_parse(UINT32, min_cores, "cores/minimum", NULL),
add_parse(UINT32, max_cores, "cores/maximum", NULL),
add_parse(UINT32, min_threads, "threads/minimum", NULL),
add_parse(UINT32, max_threads, "threads/maximum", NULL),
add_parse(UINT32, min_disk, "disk/minimum", NULL),
add_parse(UINT32, max_disk, "disk/maximum", NULL),
add_parse(UINT64, min_mem, "memory/minimum", NULL),
add_parse(UINT64, max_mem, "memory/maximum", NULL),
add_parse(UINT32, min_weight, "weight/minimum", NULL),
add_parse(UINT32, max_weight, "weight/maximum", NULL),
add_parse(UINT32, min_cpu_load, "cpus/load/minimum", NULL),
add_parse(UINT32, max_cpu_load, "cpus/load/maximum", NULL),
add_parse(UINT64_NO_VAL, min_free_mem, "memory/free/minimum", NULL),
add_parse(UINT64_NO_VAL, max_free_mem, "memory/free/maximum", NULL),
add_parse(UINT32_NO_VAL, max_cpus_per_node, "cpus/per_node/max", NULL),
add_parse(UINT64, alloc_memory, "memory/allocated", NULL),
add_parse(STRING, features, "features/total", NULL),
add_parse(STRING, features_act, "features/active", NULL),
add_parse(STRING, gres, "gres/total", NULL),
add_parse(STRING, gres_used, "gres/used", NULL),
add_parse(STRING, cluster_name, "cluster", NULL),
add_parse(STRING, comment, "comment", NULL),
add_parse(STRING, extra, "extra", NULL),
add_parse(STRING, reason, "reason/description", NULL),
add_parse(UINT64, reason_time, "reason/time", NULL),
add_parse(STRING, resv_name, "reservation", NULL),
add_parse(USER_ID, reason_uid, "reason/user", NULL),
add_skip(version), /* already in meta */
add_parse(HOSTLIST, hostnames, "nodes/hostnames", NULL),
add_parse(HOSTLIST, node_addr, "nodes/addresses", NULL),
add_parse(HOSTLIST, nodes, "nodes/nodes", NULL),
add_parse(PARTITION_INFO_PTR, part_info, "partition", NULL),
add_skip(part_inx),
};
#undef add_parse
#undef add_skip
#define add_parse(mtype, field, path, desc) \
add_parser(acct_gather_energy_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(ACCT_GATHER_ENERGY)[] = {
add_parse(UINT32, ave_watts, "average_watts", NULL),
add_parse(UINT64, base_consumed_energy, "base_consumed_energy", NULL),
add_parse(UINT64, consumed_energy, "consumed_energy", NULL),
add_parse(UINT32_NO_VAL, current_watts, "current_watts", NULL),
add_parse(UINT64, previous_consumed_energy, "previous_consumed_energy", NULL),
add_parse(UINT64, poll_time, "last_collected", NULL),
};
#undef add_parse
#define add_parse(mtype, field, path, desc) \
add_parser(ext_sensors_data_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(EXT_SENSORS_DATA)[] = {
add_parse(UINT64_NO_VAL, consumed_energy, "consumed_energy", NULL),
add_parse(UINT32_NO_VAL, temperature, "temperature", NULL),
add_parse(UINT64, energy_update_time, "energy_update_time", NULL),
add_parse(UINT32, current_watts, "current_watts", NULL),
};
#undef add_parse
#define add_parse(mtype, field, path, desc) \
add_parser(power_mgmt_data_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(POWER_MGMT_DATA)[] = {
add_parse(UINT32_NO_VAL, cap_watts, "maximum_watts", NULL),
add_parse(UINT32, current_watts, "current_watts", NULL),
add_parse(UINT64, joule_counter, "total_energy", NULL),
add_parse(UINT32, new_cap_watts, "new_maximum_watts", NULL),
add_parse(UINT32, max_watts, "peak_watts", NULL),
add_parse(UINT32, min_watts, "lowest_watts", NULL),
add_parse(UINT64, new_job_time, "new_job_time", NULL),
add_parse(UINT16, state, "state", NULL),
add_parse(UINT64, time_usec, "time_start_day", NULL),
};
#undef add_parse
static const flag_bit_t PARSER_FLAG_ARRAY(RESERVATION_FLAGS)[] = {
add_flag_bit(RESERVE_FLAG_MAINT, "MAINT"),
add_flag_bit(RESERVE_FLAG_NO_MAINT, "NO_MAINT"),
add_flag_bit(RESERVE_FLAG_DAILY, "DAILY"),
add_flag_bit(RESERVE_FLAG_NO_DAILY, "NO_DAILY"),
add_flag_bit(RESERVE_FLAG_WEEKLY, "WEEKLY"),
add_flag_bit(RESERVE_FLAG_NO_WEEKLY, "NO_WEEKLY"),
add_flag_bit(RESERVE_FLAG_IGN_JOBS, "IGNORE_JOBS"),
add_flag_bit(RESERVE_FLAG_NO_IGN_JOB, "NO_IGNORE_JOBS"),
add_flag_bit(RESERVE_FLAG_ANY_NODES, "ANY_NODES"),
add_flag_bit(RESERVE_FLAG_STATIC, "STATIC"),
add_flag_bit(RESERVE_FLAG_NO_STATIC, "NO_STATIC"),
add_flag_bit(RESERVE_FLAG_PART_NODES, "PART_NODES"),
add_flag_bit(RESERVE_FLAG_NO_PART_NODES, "NO_PART_NODES"),
add_flag_bit(RESERVE_FLAG_OVERLAP, "OVERLAP"),
add_flag_bit(RESERVE_FLAG_SPEC_NODES, "SPEC_NODES"),
add_flag_bit(RESERVE_FLAG_TIME_FLOAT, "TIME_FLOAT"),
add_flag_bit(RESERVE_FLAG_REPLACE, "REPLACE"),
add_flag_bit(RESERVE_FLAG_ALL_NODES, "ALL_NODES"),
add_flag_bit(RESERVE_FLAG_PURGE_COMP, "PURGE_COMP"),
add_flag_bit(RESERVE_FLAG_WEEKDAY, "WEEKDAY"),
add_flag_bit(RESERVE_FLAG_NO_WEEKDAY, "NO_WEEKDAY"),
add_flag_bit(RESERVE_FLAG_WEEKEND, "WEEKEND"),
add_flag_bit(RESERVE_FLAG_NO_WEEKEND, "NO_WEEKEND"),
add_flag_bit(RESERVE_FLAG_FLEX, "FLEX"),
add_flag_bit(RESERVE_FLAG_NO_FLEX, "NO_FLEX"),
add_flag_bit(RESERVE_FLAG_DUR_PLUS, "DURATION_PLUS"),
add_flag_bit(RESERVE_FLAG_DUR_MINUS, "DURATION_MINUS"),
add_flag_bit(RESERVE_FLAG_NO_HOLD_JOBS, "NO_HOLD_JOBS_AFTER_END"),
add_flag_bit(RESERVE_FLAG_NO_PURGE_COMP, "NO_PURGE_COMP"),
add_flag_bit(RESERVE_FLAG_MAGNETIC, "MAGNETIC"),
add_flag_bit(RESERVE_FLAG_SKIP, "SKIP"),
add_flag_bit(RESERVE_FLAG_HOURLY, "HOURLY"),
add_flag_bit(RESERVE_FLAG_NO_HOURLY, "NO_HOURLY"),
add_flag_bit(RESERVE_REOCCURRING, "REOCCURRING"),
};
#define add_parse(mtype, field, path, desc) \
add_parser(resv_core_spec_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(RESERVATION_CORE_SPEC)[] = {
add_parse(STRING, node_name, "node", NULL),
add_parse(STRING, core_id, "core", NULL),
};
#undef add_parse
#define add_cparse(mtype, path, desc) \
add_complex_parser(reserve_info_t, mtype, false, path, desc)
#define add_parse(mtype, field, path, desc) \
add_parser(reserve_info_t, mtype, false, field, 0, path, desc)
#define add_skip(field) \
add_parser_skip(reserve_info_t, field)
static const parser_t PARSER_ARRAY(RESERVATION_INFO)[] = {
add_parse(STRING, accounts, "accounts", NULL),
add_parse(STRING, burst_buffer, "burst_buffer", NULL),
add_parse(UINT32, core_cnt, "core_count", NULL),
add_skip(core_spec_cnt), /* parsed by INFO_CORE_SPEC */
add_skip(core_spec), /* parsed by INFO_CORE_SPEC */
add_cparse(RESERVATION_INFO_CORE_SPEC, "core_specializations", NULL),
add_parse(UINT64, end_time, "end_time", NULL),
add_parse(STRING, features, "features", NULL),
add_parse_bit_flag_array(reserve_info_t, RESERVATION_FLAGS, false, flags, "flags", NULL),
add_parse(STRING, groups, "groups", NULL),
add_parse(STRING, licenses, "licenses", NULL),
add_parse(UINT32, max_start_delay, "max_start_delay", NULL),
add_parse(STRING, name, "name", NULL),
add_parse(UINT32, node_cnt, "node_count", NULL),
add_skip(node_inx),
add_parse(STRING, node_list, "node_list", NULL),
add_parse(STRING, partition, "partition", NULL),
add_parse(UINT32_NO_VAL, purge_comp_time, "purge_completed/time", NULL),
add_parse(UINT64, start_time, "start_time", NULL),
add_parse(UINT32_NO_VAL, resv_watts, "watts", NULL),
add_parse(STRING, tres_str, "tres", NULL),
add_parse(STRING, users, "users", NULL),
};
#undef add_parse
#undef add_cparse
#undef add_skip
#define add_parse(mtype, field, path, desc) \
add_parser(submit_response_msg_t, mtype, false, field, 0, path, desc)
#define add_parse_overload(mtype, field, overloads, path, desc) \
add_parser(submit_response_msg_t, mtype, false, field, overloads, path, desc)
static const parser_t PARSER_ARRAY(JOB_SUBMIT_RESPONSE_MSG)[] = {
add_parse(UINT32, job_id, "job_id", NULL),
add_parse(STEP_ID, step_id, "step_id", NULL),
add_parse_overload(UINT32, error_code, 1, "error_code", NULL),
add_parse_overload(ERROR, error_code, 1, "error", NULL),
add_parse(STRING, job_submit_user_msg, "job_submit_user_msg", NULL),
};
#undef add_parse_overload
#undef add_parse
/* flag values based on output of slurm_sprint_cpu_bind_type() */
static const flag_bit_t PARSER_FLAG_ARRAY(CPU_BINDING_FLAGS)[] = {
add_flag_equal(CPU_BIND_TO_THREADS, CPU_BIND_T_TO_MASK, "CPU_BIND_TO_THREADS"),
add_flag_equal(CPU_BIND_TO_CORES, CPU_BIND_T_TO_MASK, "CPU_BIND_TO_CORES"),
add_flag_equal(CPU_BIND_TO_SOCKETS, CPU_BIND_T_TO_MASK, "CPU_BIND_TO_SOCKETS"),
add_flag_equal(CPU_BIND_TO_LDOMS, CPU_BIND_T_TO_MASK, "CPU_BIND_TO_LDOMS"),
add_flag_equal(CPU_AUTO_BIND_TO_THREADS, CPU_BIND_T_AUTO_TO_MASK, "CPU_AUTO_BIND_TO_THREADS"),
add_flag_equal(CPU_AUTO_BIND_TO_CORES, CPU_BIND_T_AUTO_TO_MASK, "CPU_AUTO_BIND_TO_CORES"),
add_flag_equal(CPU_AUTO_BIND_TO_SOCKETS, CPU_BIND_T_AUTO_TO_MASK, "CPU_AUTO_BIND_TO_SOCKETS"),
add_flag_equal(CPU_BIND_NONE, CPU_BIND_T_MASK, "CPU_BIND_NONE"),
add_flag_equal(CPU_BIND_RANK, CPU_BIND_T_MASK, "CPU_BIND_RANK"),
add_flag_equal(CPU_BIND_MAP, CPU_BIND_T_MASK, "CPU_BIND_MAP"),
add_flag_equal(CPU_BIND_MASK, CPU_BIND_T_MASK, "CPU_BIND_MASK"),
add_flag_equal(CPU_BIND_LDRANK, CPU_BIND_T_MASK, "CPU_BIND_LDRANK"),
add_flag_equal(CPU_BIND_LDMAP, CPU_BIND_T_MASK, "CPU_BIND_LDMAP"),
add_flag_equal(CPU_BIND_LDMASK, CPU_BIND_T_MASK, "CPU_BIND_LDMASK"),
add_flag_masked_bit(CPU_BIND_VERBOSE, CPU_BIND_VERBOSE, "VERBOSE"),
add_flag_masked_bit(CPU_BIND_ONE_THREAD_PER_CORE, CPU_BIND_ONE_THREAD_PER_CORE, "CPU_BIND_ONE_THREAD_PER_CORE"),
add_flag_masked_bit(SLURMD_OFF_SPEC, CPU_BIND_T_TASK_PARAMS_MASK, "SLURMD_OFF_SPEC"),
add_flag_masked_bit(CPU_BIND_OFF, CPU_BIND_T_TASK_PARAMS_MASK, "CPU_BIND_OFF"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(CRON_ENTRY_FLAGS)[] = {
add_flag_bit(CRON_WILD_MINUTE, "WILD_MINUTE"),
add_flag_bit(CRON_WILD_HOUR, "WILD_HOUR"),
add_flag_bit(CRON_WILD_DOM, "WILD_DAY_OF_MONTH"),
add_flag_bit(CRON_WILD_MONTH, "WILD_MONTH"),
add_flag_bit(CRON_WILD_DOW, "WILD_DAY_OF_WEEK"),
};
#define add_parse(mtype, field, path, desc) \
add_parser(cron_entry_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(CRON_ENTRY)[] = {
add_parse_bit_flag_array(cron_entry_t, CRON_ENTRY_FLAGS, false, flags, "flags", NULL),
add_parse(BITSTR_PTR, minute, "minute", NULL),
add_parse(BITSTR_PTR, hour, "hour", NULL),
add_parse(BITSTR_PTR, day_of_month, "day_of_month", NULL),
add_parse(BITSTR_PTR, month, "month", NULL),
add_parse(BITSTR_PTR, day_of_week, "day_of_week", NULL),
add_parse(STRING, cronspec, "specification", NULL),
add_parse(STRING, command, "command", NULL),
add_parse(UINT32, line_start, "line/start", NULL),
add_parse(UINT32, line_end, "line/end", NULL),
};
#undef add_parse
static const flag_bit_t PARSER_FLAG_ARRAY(MEMORY_BINDING_TYPE)[] = {
add_flag_equal(MEM_BIND_NONE, MEM_BIND_TYPE_MASK, "NONE"),
add_flag_equal(MEM_BIND_RANK, MEM_BIND_TYPE_MASK, "RANK"),
add_flag_equal(MEM_BIND_MAP, MEM_BIND_TYPE_MASK, "MAP"),
add_flag_equal(MEM_BIND_MASK, MEM_BIND_TYPE_MASK, "MASK"),
add_flag_equal(MEM_BIND_LOCAL, MEM_BIND_TYPE_MASK, "LOCAL"),
add_flag_masked_bit(MEM_BIND_VERBOSE, MEM_BIND_VERBOSE, "VERBOSE"),
add_flag_masked_bit(MEM_BIND_SORT, MEM_BIND_TYPE_FLAGS_MASK, "SORT"),
add_flag_masked_bit(MEM_BIND_PREFER, MEM_BIND_TYPE_FLAGS_MASK, "PREFER"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(OPEN_MODE)[] = {
add_flag_bit(OPEN_MODE_APPEND, "APPEND"),
add_flag_bit(OPEN_MODE_TRUNCATE, "TRUNCATE"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(WARN_FLAGS)[] = {
add_flag_bit(KILL_JOB_BATCH, "BATCH_JOB"),
add_flag_bit(KILL_ARRAY_TASK, "ARRAY_TASK"),
add_flag_bit(KILL_STEPS_ONLY, "FULL_STEPS_ONLY"),
add_flag_bit(KILL_FULL_JOB, "FULL_JOB"),
add_flag_bit(KILL_FED_REQUEUE, "FEDERATION_REQUEUE"),
add_flag_bit(KILL_HURRY, "HURRY"),
add_flag_bit(KILL_OOM, "OUT_OF_MEMORY"),
add_flag_bit(KILL_NO_SIBS, "NO_SIBLING_JOBS"),
add_flag_bit(KILL_JOB_RESV, "RESERVATION_JOB"),
add_flag_bit(WARN_SENT, "WARNING_SENT"),
};
static const flag_bit_t PARSER_FLAG_ARRAY(X11_FLAGS)[] = {
add_flag_bit(X11_FORWARD_ALL, "FORWARD_ALL_NODES"),
add_flag_bit(X11_FORWARD_BATCH, "BATCH_NODE"),
add_flag_bit(X11_FORWARD_FIRST, "FIRST_NODE"),
add_flag_bit(X11_FORWARD_LAST, "LAST_NODE"),
};
#define add_cparse(mtype, path, desc) \
add_complex_parser(job_desc_msg_t, mtype, false, path, desc)
#define add_cparse_req(mtype, path, desc) \
add_complex_parser(job_desc_msg_t, mtype, true, path, desc)
#define add_parse(mtype, field, path, desc) \
add_parser(job_desc_msg_t, mtype, false, field, 0, path, desc)
#define add_parse_overload(mtype, field, overloads, path, desc) \
add_parser(job_desc_msg_t, mtype, false, field, overloads, path, desc)
#define add_skip(field) \
add_parser_skip(job_desc_msg_t, field)
#define add_flags(mtype, field, path, desc) \
add_parse_bit_flag_array(job_desc_msg_t, mtype, false, field, path, desc)
static const parser_t PARSER_ARRAY(JOB_DESC_MSG)[] = {
add_parse(STRING, account, "account", NULL),
add_parse(STRING, acctg_freq, "account_gather_frequency", NULL),
add_parse(STRING, admin_comment, "admin_comment", NULL),
add_parse(STRING, alloc_node, "allocation_node_list", NULL),
add_parse(UINT16, alloc_resp_port, "allocation_node_port", NULL),
add_skip(alloc_sid),
add_skip(argc),
add_skip(argv),
add_cparse(JOB_DESC_MSG_ARGV, "argv", NULL),
add_parse(STRING, array_inx, "array", NULL),
add_skip(array_bitmap),
add_parse(STRING, batch_features, "batch_features", NULL),
add_parse(UINT64, begin_time, "begin_time", NULL),
add_flags(JOB_FLAGS, bitflags, "flags", NULL),
add_parse(STRING, burst_buffer, "burst_buffer", NULL),
add_parse(STRING, clusters, "clusters", NULL),
add_parse(STRING, cluster_features, "cluster_constraint", NULL),
add_parse(STRING, comment, "comment", NULL),
add_parse(BOOL16, contiguous, "contiguous", NULL),
add_parse(STRING, container, "container", NULL),
add_parse(STRING, container_id, "container_id", NULL),
add_parse_overload(CORE_SPEC, core_spec, 1, "core_specification", NULL),
add_parse_overload(THREAD_SPEC, core_spec, 1, "thread_specification", NULL),
add_parse(STRING, cpu_bind, "cpu_binding", NULL),
add_flags(CPU_BINDING_FLAGS, cpu_bind_type, "cpu_binding_flags", NULL),
add_cparse(JOB_DESC_MSG_CPU_FREQ, "cpu_frequency", NULL),
add_skip(cpu_freq_min),
add_skip(cpu_freq_max),
add_skip(cpu_freq_gov),
add_parse(STRING, cpus_per_tres, "cpus_per_tres", NULL),
add_parse(JOB_DESC_MSG_CRON_ENTRY, crontab_entry, "crontab", NULL),
add_parse(UINT64, deadline, "deadline", NULL),
add_parse(UINT32, delay_boot, "delay_boot", NULL),
add_parse(STRING, dependency, "dependency", NULL),
add_parse(UINT64, end_time, "end_time", NULL),
add_cparse_req(JOB_DESC_MSG_ENV, "environment", NULL),
add_skip(environment),
add_skip(env_hash),
add_skip(env_size),
add_parse(CSV_STRING, exc_nodes, "excluded_nodes", NULL),
add_parse(STRING, extra, "extra", NULL),
add_parse(STRING, features, "constraints", NULL),
add_skip(fed_siblings_active),
add_skip(fed_siblings_viable),
add_parse(GROUP_ID, group_id, "group_id", NULL),
add_parse(UINT32, het_job_offset, "hetjob_group", NULL),
add_parse(BOOL16, immediate, "immediate", NULL),
add_parse(UINT32, job_id, "job_id", NULL),
add_skip(job_id_str),
add_parse(BOOL16, kill_on_node_fail, "kill_on_node_fail", NULL),
add_parse(STRING, licenses, "licenses", NULL),
add_skip(licenses_tot),
add_flags(JOB_MAIL_FLAGS, mail_type, "mail_type", NULL),
add_parse(STRING, mail_user, "mail_user", NULL),
add_parse(STRING, mcs_label, "mcs_label", NULL),
add_parse(STRING, mem_bind, "memory_binding", NULL),
add_flags(MEMORY_BINDING_TYPE, mem_bind_type, "memory_binding_type", NULL),
add_parse(STRING, mem_per_tres, "memory_per_tres", NULL),
add_parse(STRING, name, "name", NULL),
add_parse(STRING, network, "network", NULL),
add_parse(NICE, nice, "nice", NULL),
add_parse(UINT32, num_tasks, "tasks", NULL),
add_flags(OPEN_MODE, open_mode, "open_mode", NULL),
add_skip(origin_cluster),
add_parse(UINT16, other_port, "reserve_ports", NULL),
add_parse(BOOL, overcommit, "overcommit", NULL),
add_parse(STRING, partition, "partition", NULL),
add_parse(UINT16, plane_size, "distribution_plane_size", NULL),
add_flags(POWER_FLAGS, power_flags, "power_flags", NULL),
add_parse(STRING, prefer, "prefer", NULL),
add_parse_overload(HOLD, priority, 1, "hold", "Hold (true) or release (false) job"),
add_parse_overload(UINT32_NO_VAL, priority, 1, "priority", "Request specific job priority"),
add_parse(ACCT_GATHER_PROFILE, profile, "profile", NULL),
add_parse(STRING, qos, "qos", NULL),
add_parse(BOOL16, reboot, "reboot", NULL),
add_skip(resp_host),
add_skip(restart_cnt),
add_parse(CSV_STRING, req_nodes, "required_nodes", NULL),
add_parse(BOOL16, requeue, "requeue", NULL),
add_parse(STRING, reservation, "reservation", NULL),
add_parse(STRING, script, "script", NULL),
add_skip(script_buf),
add_skip(script_hash),
add_parse_overload(JOB_SHARED, shared, 2, "shared", NULL),
add_parse_overload(JOB_EXCLUSIVE, shared, 2, "exclusive", NULL),
add_parse_overload(BOOL16, shared, 2, "oversubscribe", NULL),
add_parse(UINT32, site_factor, "site_factor", NULL),
add_cparse(JOB_DESC_MSG_SPANK_ENV, "spank_environment", NULL),
add_skip(spank_job_env),
add_skip(spank_job_env_size),
add_skip(submit_line),
add_parse(TASK_DISTRIBUTION, task_dist, "distribution", NULL),
add_parse(UINT32_NO_VAL, time_limit, "time_limit", NULL),
add_parse(UINT32_NO_VAL, time_min, "time_minimum", NULL),
add_parse(STRING, tres_bind, "tres_bind", NULL),
add_parse(STRING, tres_freq, "tres_freq", NULL),
add_parse(STRING, tres_per_job, "tres_per_job", NULL),
add_parse(STRING, tres_per_node, "tres_per_node", NULL),
add_parse(STRING, tres_per_socket, "tres_per_socket", NULL),
add_parse(STRING, tres_per_task, "tres_per_task", NULL),
add_parse(USER_ID, user_id, "user_id", NULL),
add_parse(BOOL16_NO_VAL, wait_all_nodes, "wait_all_nodes", NULL),
add_flags(WARN_FLAGS, warn_flags, "kill_warning_flags", NULL),
add_parse(SIGNAL, warn_signal, "kill_warning_signal", NULL),
add_parse(UINT16_NO_VAL, warn_time, "kill_warning_delay", NULL),
add_parse(STRING, work_dir, "current_working_directory", NULL),
add_parse(UINT16, cpus_per_task, "cpus_per_task", NULL),
add_parse(UINT32, min_cpus, "minimum_cpus", NULL),
add_parse(UINT32, max_cpus, "maximum_cpus", NULL),
add_cparse(JOB_DESC_MSG_NODES, "nodes", NULL),
add_parse(UINT32, min_nodes, "minimum_nodes", NULL),
add_parse(UINT32, max_nodes, "maximum_nodes", NULL),
add_parse(UINT16, boards_per_node, "minimum_boards_per_node", NULL),
add_parse(UINT16, sockets_per_board, "minimum_sockets_per_board", NULL),
add_parse(UINT16, sockets_per_node, "sockets_per_node", NULL),
add_parse(UINT16, threads_per_core, "threads_per_core", NULL),
add_parse(UINT16, ntasks_per_node, "tasks_per_node", NULL),
add_parse(UINT16, ntasks_per_socket, "tasks_per_socket", NULL),
add_parse(UINT16, ntasks_per_core, "tasks_per_core", NULL),
add_parse(UINT16, ntasks_per_board, "tasks_per_board", NULL),
add_parse(UINT16, ntasks_per_tres, "ntasks_per_tres", NULL),
add_parse(UINT16, pn_min_cpus, "minimum_cpus_per_node", NULL),
add_parse_overload(MEM_PER_CPUS, pn_min_memory, 1, "memory_per_cpu", NULL),
add_parse_overload(MEM_PER_NODE, pn_min_memory, 1, "memory_per_node", NULL),
add_parse(UINT32, pn_min_tmp_disk, "temporary_disk_per_node", NULL),
add_parse(STRING, req_context, "selinux_context", NULL),
add_parse(UINT32_NO_VAL, req_switch, "required_switches", NULL),
add_skip(selinux_context),
add_parse(STRING, std_err, "standard_error", NULL),
add_parse(STRING, std_in, "standard_input", NULL),
add_parse(STRING, std_out, "standard_output", NULL),
add_skip(tres_req_cnt),
add_parse(UINT32, wait4switch, "wait_for_switch", NULL),
add_parse(STRING, wckey, "wckey", NULL),
add_flags(X11_FLAGS, x11, "x11", NULL),
add_parse(STRING, x11_magic_cookie, "x11_magic_cookie", NULL),
add_parse(STRING, x11_target, "x11_target_host", NULL),
add_parse(UINT16, x11_target_port, "x11_target_port", NULL),
};
#undef add_parse
#undef add_parse_overload
#undef add_cparse
#undef add_cparse_req
#undef add_skip
#undef add_flags
#define add_parse(mtype, field, path, desc) \
add_parser(update_node_msg_t, mtype, false, field, 0, path, desc)
static const parser_t PARSER_ARRAY(UPDATE_NODE_MSG)[] = {
add_parse(STRING, comment, "comment", "arbitrary comment"),
add_parse(UINT32, cpu_bind, "cpu_bind", "default CPU binding type"),
add_parse(STRING, extra, "extra", "arbitrary string"),
add_parse(CSV_STRING, features, "features", "new available feature for node"),
add_parse(CSV_STRING, features_act, "features_act", "new active feature for node"),
add_parse(STRING, gres, "gres", "new generic resources for node"),
add_parse(HOSTLIST_STRING, node_addr, "address", "communication name"),
add_parse(HOSTLIST_STRING, node_hostname, "hostname", "node's hostname"),
add_parse(HOSTLIST_STRING, node_names, "name", "node to update"),
add_parse(NODE_STATES, node_state, "state", "assign new node state"),
add_parse(STRING, reason, "reason", "reason for node being DOWN or DRAINING"),
add_parse(USER_ID, reason_uid, "reason_uid", "user ID of sending (needed if user root is sending message)"),
add_parse(UINT32_NO_VAL, resume_after, "resume_after", "automatically resume DOWN or DRAINED node after this amount of seconds"),
add_parse(UINT32_NO_VAL, weight, "weight", "new weight for node"),
};
#undef add_parse
#undef add_parser
#undef add_parser_skip
#undef add_complex_parser
#undef add_parse_bool
/* add parser array (for struct) */
#define addpa(typev, typet) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_ARRAY, \
.type = DATA_PARSER_##typev, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_type_string = XSTRINGIFY(typet), \
.size = sizeof(typet), \
.needs = NEED_NONE, \
.fields = PARSER_ARRAY(typev), \
.field_count = ARRAY_SIZE(PARSER_ARRAY(typev)), \
.ptr_offset = NO_VAL, \
}
/* add parser for a pointer */
#define addpp(typev, typet, typep) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_PTR, \
.type = DATA_PARSER_##typev, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_type_string = XSTRINGIFY(typet), \
.size = sizeof(typet), \
.needs = NEED_NONE, \
.ptr_offset = NO_VAL, \
.pointer_type = DATA_PARSER_##typep, \
}
/* add parser for NULL terminated array of (sequential) objects */
#define addnt(typev, typea) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_NT_ARRAY, \
.type = DATA_PARSER_##typev, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_type_string = "void **", \
.size = sizeof(void **), \
.needs = NEED_NONE, \
.ptr_offset = NO_VAL, \
.array_type = DATA_PARSER_##typea, \
}
/* add parser for NULL terminated array of pointers to objects */
#define addntp(typev, typea) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_NT_PTR_ARRAY, \
.type = DATA_PARSER_##typev, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_type_string = "void **", \
.size = sizeof(void **), \
.needs = NEED_NONE, \
.ptr_offset = NO_VAL, \
.array_type = DATA_PARSER_##typea, \
}
/* add parser for List */
#define addpl(typev, typel, need) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_LIST, \
.type = DATA_PARSER_##typev, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_type_string = XSTRINGIFY(List), \
.list_type = DATA_PARSER_##typel, \
.size = sizeof(List), \
.needs = need, \
.ptr_offset = NO_VAL, \
}
/* add parser for simple type */
#define addps(typev, stype, need, typeo, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.model = PARSER_MODEL_SIMPLE, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(stype), \
.obj_openapi = OPENAPI_FORMAT_ ## typeo, \
.size = sizeof(stype), \
.needs = need, \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
/* add parser for simple type which creates an array*/
#define addpsa(typev, typea, stype, need, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.array_type = DATA_PARSER_##typea, \
.model = PARSER_MODEL_SIMPLE, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(stype), \
.obj_openapi = OPENAPI_FORMAT_ARRAY, \
.size = sizeof(stype), \
.needs = need, \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
/* add parser for simple type which becomes another type */
#define addpsp(typev, typea, stype, need, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.pointer_type = DATA_PARSER_##typea, \
.model = PARSER_MODEL_SIMPLE, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(stype), \
.obj_openapi = OPENAPI_FORMAT_INVALID, \
.size = sizeof(stype), \
.needs = need, \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
/* add parser for simple type with spec generator */
#define addpss(typev, stype, need, typeo, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.model = PARSER_MODEL_SIMPLE, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(stype), \
.obj_openapi = OPENAPI_FORMAT_ ## typeo, \
.size = sizeof(stype), \
.needs = need, \
.openapi_spec = SPEC_FUNC(typev), \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
/* add parser for complex type */
#define addpc(typev, typet, need, typeo, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.model = PARSER_MODEL_COMPLEX, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(typet), \
.obj_openapi = OPENAPI_FORMAT_ ## typeo, \
.size = sizeof(typet), \
.needs = need, \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
/* add parser for complex type which creates an array*/
#define addpca(typev, typea, typet, need, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.array_type = DATA_PARSER_##typea, \
.model = PARSER_MODEL_COMPLEX, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(typet), \
.obj_openapi = OPENAPI_FORMAT_INVALID, \
.size = sizeof(typet), \
.needs = need, \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
/* add parser for complex type which becomes another type */
#define addpcp(typev, typea, typet, need, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.pointer_type = DATA_PARSER_##typea, \
.model = PARSER_MODEL_COMPLEX, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(typet), \
.obj_openapi = OPENAPI_FORMAT_INVALID, \
.size = sizeof(typet), \
.needs = need, \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
/* add parser for complex type with spec generator */
#define addpcs(typev, typet, need, typeo, desc) \
{ \
.magic = MAGIC_PARSER, \
.type = DATA_PARSER_##typev, \
.model = PARSER_MODEL_COMPLEX, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_desc = desc, \
.obj_type_string = XSTRINGIFY(typet), \
.obj_openapi = OPENAPI_FORMAT_ ## typeo, \
.size = sizeof(typet), \
.needs = need, \
.openapi_spec = SPEC_FUNC(typev), \
.parse = PARSE_FUNC(typev), \
.dump = DUMP_FUNC(typev), \
.ptr_offset = NO_VAL, \
}
#define addfa(typev, typet) \
{ \
.magic = MAGIC_PARSER, \
.model = PARSER_MODEL_FLAG_ARRAY, \
.type = DATA_PARSER_##typev, \
.type_string = XSTRINGIFY(DATA_PARSER_ ## typev), \
.obj_type_string = XSTRINGIFY(typet), \
.size = sizeof(typet), \
.needs = NEED_NONE, \
.flag_bit_array = PARSER_FLAG_ARRAY(typev), \
.flag_bit_array_count = ARRAY_SIZE(PARSER_FLAG_ARRAY(typev)), \
.ptr_offset = NO_VAL, \
}
static const parser_t parsers[] = {
/* Simple type parsers */
addps(STRING, char *, NEED_NONE, STRING, NULL),
addps(UINT32, uint32_t, NEED_NONE, INT32, NULL),
addpss(UINT32_NO_VAL, uint32_t, NEED_NONE, OBJECT, NULL),
addps(UINT64, uint64_t, NEED_NONE, INT64, NULL),
addpss(UINT64_NO_VAL, uint64_t, NEED_NONE, OBJECT, NULL),
addps(UINT16, uint16_t, NEED_NONE, INT32, NULL),
addpss(UINT16_NO_VAL, uint16_t, NEED_NONE, OBJECT, NULL),
addps(INT64, int64_t, NEED_NONE, INT64, NULL),
addpss(INT64_NO_VAL, int64_t, NEED_NONE, OBJECT, NULL),
addps(FLOAT128, long double, NEED_NONE, NUMBER, NULL),
addps(FLOAT64, double, NEED_NONE, DOUBLE, NULL),
addpss(FLOAT64_NO_VAL, double, NEED_NONE, OBJECT, NULL),
addps(BOOL, uint8_t, NEED_NONE, BOOL, NULL),
addps(BOOL16, uint16_t, NEED_NONE, BOOL, NULL),
addps(BOOL16_NO_VAL, uint16_t, NEED_NONE, BOOL, NULL),
addps(QOS_NAME, char *, NEED_QOS, STRING, NULL),
addps(QOS_ID, uint32_t, NEED_QOS, STRING, NULL),
addpsa(QOS_STRING_ID_LIST, STRING, List, NEED_QOS, "List of QOS names"),
addpss(JOB_EXIT_CODE, int32_t, NEED_NONE, OBJECT, NULL),
addps(RPC_ID, slurmdbd_msg_type_t, NEED_NONE, STRING, NULL),
addps(SELECT_PLUGIN_ID, int, NEED_NONE, STRING, NULL),
addps(TASK_DISTRIBUTION, uint32_t, NEED_NONE, STRING, NULL),
addpss(SLURM_STEP_ID, slurm_step_id_t, NEED_NONE, OBJECT, NULL),
addps(STEP_ID, uint32_t, NEED_NONE, STRING, NULL),
addpss(WCKEY_TAG, char *, NEED_NONE, OBJECT, NULL),
addps(GROUP_ID, gid_t, NEED_NONE, STRING, NULL),
addps(JOB_REASON, uint32_t, NEED_NONE, STRING, NULL),
addps(JOB_STATE, uint32_t, NEED_NONE, STRING, NULL),
addps(USER_ID, uid_t, NEED_NONE, STRING, NULL),
addpsp(TRES_STR, TRES_LIST, char *, NEED_TRES, NULL),
addpsa(CSV_STRING, STRING, char *, NEED_NONE, NULL),
addpsa(LICENSES, LICENSE, license_info_msg_t, NEED_NONE, NULL),
addps(CORE_SPEC, uint16_t, NEED_NONE, INT32, NULL),
addps(THREAD_SPEC, uint16_t, NEED_NONE, INT32, NULL),
addps(NICE, uint32_t, NEED_NONE, INT32, NULL),
addpsp(MEM_PER_CPUS, UINT64_NO_VAL, uint64_t, NEED_NONE, NULL),
addpsp(MEM_PER_NODE, UINT64_NO_VAL, uint64_t, NEED_NONE, NULL),
addps(ALLOCATED_CORES, uint32_t, NEED_NONE, INT32, NULL),
addps(ALLOCATED_CPUS, uint32_t, NEED_NONE, INT32, NULL),
addps(CONTROLLER_PING_MODE, int, NEED_NONE, STRING, NULL),
addps(CONTROLLER_PING_RESULT, bool, NEED_NONE, STRING, NULL),
addpsa(HOSTLIST, STRING, hostlist_t *, NEED_NONE, NULL),
addpsa(HOSTLIST_STRING, STRING, char *, NEED_NONE, NULL),
addps(CPU_FREQ_FLAGS, uint32_t, NEED_NONE, STRING, NULL),
addps(ERROR, int, NEED_NONE, STRING, NULL),
addpsa(JOB_INFO_MSG, JOB_INFO, job_info_msg_t, NEED_NONE, NULL),
addpsa(STRING_ARRAY, STRING, char **, NEED_NONE, NULL),
addps(SIGNAL, uint16_t, NEED_NONE, STRING, NULL),
addps(BITSTR, bitstr_t, NEED_NONE, STRING, NULL),
addpss(JOB_ARRAY_RESPONSE_MSG, job_array_resp_msg_t, NEED_NONE, ARRAY, NULL),
addpss(ROLLUP_STATS, slurmdb_rollup_stats_t, NEED_NONE, ARRAY, NULL),
addpsp(JOB_EXCLUSIVE, JOB_EXCLUSIVE_FLAGS, uint16_t, NEED_NONE, NULL),
addps(HOLD, uint32_t, NEED_NONE, BOOL, "Job held"),
addpsp(JOB_DESC_MSG_CRON_ENTRY, CRON_ENTRY_PTR, cron_entry_t *, NEED_NONE, "crontab entry"),
/* Complex type parsers */
addpcp(JOB_ASSOC_ID, ASSOC_SHORT_PTR, slurmdb_job_rec_t, NEED_ASSOC, NULL),
addpca(QOS_PREEMPT_LIST, STRING, slurmdb_qos_rec_t, NEED_QOS, NULL),
addpcp(STEP_NODES, HOSTLIST, slurmdb_step_rec_t, NEED_TRES, NULL),
addpca(STEP_TRES_REQ_MAX, TRES, slurmdb_step_rec_t, NEED_TRES, NULL),
addpca(STEP_TRES_REQ_MIN, TRES, slurmdb_step_rec_t, NEED_TRES, NULL),
addpca(STEP_TRES_USAGE_MAX, TRES, slurmdb_step_rec_t, NEED_TRES, NULL),
addpca(STEP_TRES_USAGE_MIN, TRES, slurmdb_step_rec_t, NEED_TRES, NULL),
addpc(STATS_MSG_CYCLE_MEAN, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_CYCLE_MEAN_DEPTH, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_CYCLE_PER_MIN, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_BF_CYCLE_MEAN, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_BF_DEPTH_MEAN, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_BF_DEPTH_MEAN_TRY, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_BF_QUEUE_LEN_MEAN, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_BF_TABLE_SIZE_MEAN, stats_info_response_msg_t, NEED_NONE, INT64, NULL),
addpc(STATS_MSG_BF_ACTIVE, stats_info_response_msg_t, NEED_NONE, BOOL, NULL),
addpcs(STATS_MSG_RPCS_BY_TYPE, stats_info_response_msg_t, NEED_NONE, ARRAY, NULL),
addpcs(STATS_MSG_RPCS_BY_USER, stats_info_response_msg_t, NEED_NONE, ARRAY, NULL),
addpc(NODE_SELECT_ALLOC_MEMORY, node_info_t, NEED_NONE, INT64, NULL),
addpc(NODE_SELECT_ALLOC_CPUS, node_info_t, NEED_NONE, INT32, NULL),
addpc(NODE_SELECT_ALLOC_IDLE_CPUS, node_info_t, NEED_NONE, INT32, NULL),
addpc(NODE_SELECT_TRES_USED, node_info_t, NEED_NONE, STRING, NULL),
addpc(NODE_SELECT_TRES_WEIGHTED, node_info_t, NEED_NONE, DOUBLE, NULL),
addpca(NODES, NODE, node_info_msg_t, NEED_NONE, NULL),
addpca(JOB_INFO_GRES_DETAIL, STRING, slurm_job_info_t, NEED_NONE, NULL),
addpcs(JOB_RES_NODES, job_resources_t, NEED_NONE, ARRAY, NULL),
addpca(STEP_INFO_MSG, STEP_INFO, job_step_info_response_msg_t, NEED_TRES, NULL),
addpca(PARTITION_INFO_MSG, PARTITION_INFO, partition_info_msg_t, NEED_TRES, NULL),
addpca(RESERVATION_INFO_MSG, RESERVATION_INFO, reserve_info_msg_t, NEED_NONE, NULL),
addpca(RESERVATION_INFO_CORE_SPEC, RESERVATION_CORE_SPEC, reserve_info_t, NEED_NONE, NULL),
addpcp(JOB_DESC_MSG_ARGV, STRING_ARRAY, job_desc_msg_t, NEED_NONE, NULL),
addpc(JOB_DESC_MSG_CPU_FREQ, job_desc_msg_t, NEED_NONE, STRING, NULL),
addpcp(JOB_DESC_MSG_ENV, STRING_ARRAY, job_desc_msg_t, NEED_NONE, NULL),
addpcp(JOB_DESC_MSG_SPANK_ENV, STRING_ARRAY, job_desc_msg_t, NEED_NONE, NULL),
addpc(JOB_DESC_MSG_NODES, job_desc_msg_t, NEED_NONE, STRING, NULL),
addpc(JOB_INFO_STDIN, slurm_job_info_t, NEED_NONE, STRING, NULL),
addpc(JOB_INFO_STDOUT, slurm_job_info_t, NEED_NONE, STRING, NULL),
addpc(JOB_INFO_STDERR, slurm_job_info_t, NEED_NONE, STRING, NULL),
addpc(JOB_USER, slurmdb_job_rec_t, NEED_NONE, STRING, NULL),
/* NULL terminated model parsers */
addnt(CONTROLLER_PING_ARRAY, CONTROLLER_PING),
addntp(NODE_ARRAY, NODE),
addntp(PARTITION_INFO_ARRAY, PARTITION_INFO),
addntp(STEP_INFO_ARRAY, STEP_INFO),
addntp(RESERVATION_INFO_ARRAY, RESERVATION_INFO),
/* Pointer model parsers */
addpp(STATS_REC_PTR, slurmdb_stats_rec_t *, STATS_REC),
addpp(ROLLUP_STATS_PTR, slurmdb_rollup_stats_t *, ROLLUP_STATS),
addpp(ASSOC_SHORT_PTR, slurmdb_assoc_rec_t *, ASSOC_SHORT),
addpp(ASSOC_USAGE_PTR, slurmdb_assoc_usage_t *, ASSOC_USAGE),
addpp(JOB_RES_PTR, job_resources_t *, JOB_RES),
addpp(PARTITION_INFO_PTR, partition_info_t *, PARTITION_INFO),
addpp(ACCT_GATHER_ENERGY_PTR, acct_gather_energy_t *, ACCT_GATHER_ENERGY),
addpp(EXT_SENSORS_DATA_PTR, ext_sensors_data_t *, EXT_SENSORS_DATA),
addpp(POWER_MGMT_DATA_PTR, power_mgmt_data_t *, POWER_MGMT_DATA),
addpp(JOB_DESC_MSG_PTR, job_desc_msg_t *, JOB_DESC_MSG),
addpp(CRON_ENTRY_PTR, cron_entry_t *, CRON_ENTRY),
addpp(JOB_ARRAY_RESPONSE_MSG_PTR, job_array_resp_msg_t *, JOB_ARRAY_RESPONSE_MSG),
addpp(NODES_PTR, node_info_msg_t *, NODES),
addpp(STEP_INFO_MSG_PTR, job_step_info_response_msg_t *, STEP_INFO_MSG),
addpp(BITSTR_PTR, bitstr_t *, BITSTR),
/* Array of parsers */
addpa(ASSOC_SHORT, slurmdb_assoc_rec_t),
addpa(ASSOC, slurmdb_assoc_rec_t),
addpa(USER, slurmdb_user_rec_t),
addpa(JOB, slurmdb_job_rec_t),
addpa(STEP, slurmdb_step_rec_t),
addpa(ACCOUNT, slurmdb_account_rec_t),
addpa(ACCOUNTING, slurmdb_accounting_rec_t),
addpa(COORD, slurmdb_coord_rec_t),
addpa(WCKEY, slurmdb_wckey_rec_t),
addpa(TRES, slurmdb_tres_rec_t),
addpa(TRES_NCT, slurmdb_tres_nct_rec_t),
addpa(QOS, slurmdb_qos_rec_t),
addpa(STATS_REC, slurmdb_stats_rec_t),
addpa(CLUSTER_REC, slurmdb_cluster_rec_t),
addpa(CLUSTER_ACCT_REC, slurmdb_cluster_accounting_rec_t),
addpa(ASSOC_USAGE, slurmdb_assoc_usage_t),
addpa(STATS_RPC, slurmdb_rpc_obj_t),
addpa(STATS_USER, slurmdb_rpc_obj_t),
addpa(STATS_MSG, stats_info_response_msg_t),
addpa(NODE, node_info_t),
addpa(LICENSE, slurm_license_info_t),
addpa(JOB_INFO, slurm_job_info_t),
addpa(JOB_RES, job_resources_t),
addpa(CONTROLLER_PING, controller_ping_t),
addpa(STEP_INFO, job_step_info_t),
addpa(PARTITION_INFO, partition_info_t),
addpa(SINFO_DATA, sinfo_data_t),
addpa(ACCT_GATHER_ENERGY, acct_gather_energy_t),
addpa(EXT_SENSORS_DATA, ext_sensors_data_t),
addpa(POWER_MGMT_DATA, power_mgmt_data_t),
addpa(RESERVATION_INFO, reserve_info_t),
addpa(RESERVATION_CORE_SPEC, resv_core_spec_t),
addpa(JOB_SUBMIT_RESPONSE_MSG, submit_response_msg_t),
addpa(JOB_DESC_MSG, job_desc_msg_t),
addpa(CRON_ENTRY, cron_entry_t),
addpa(UPDATE_NODE_MSG, update_node_msg_t),
/* Flag bit arrays */
addfa(ASSOC_FLAGS, uint16_t),
addfa(USER_FLAGS, uint32_t),
addfa(SLURMDB_JOB_FLAGS, uint32_t),
addfa(ACCOUNT_FLAGS, uint32_t),
addfa(WCKEY_FLAGS, uint32_t),
addfa(QOS_FLAGS, uint32_t),
addfa(QOS_PREEMPT_MODES, uint16_t),
addfa(CLUSTER_REC_FLAGS, uint32_t),
addfa(NODE_STATES, uint32_t),
addfa(JOB_FLAGS, uint64_t),
addfa(JOB_SHOW_FLAGS, uint16_t),
addfa(POWER_FLAGS, uint8_t),
addfa(JOB_MAIL_FLAGS, uint16_t),
addfa(RESERVATION_FLAGS, uint64_t),
addfa(CPU_BINDING_FLAGS, uint16_t), /* cpu_bind_type_t */
addfa(CRON_ENTRY_FLAGS, uint32_t),
addfa(MEMORY_BINDING_TYPE, uint16_t), /* mem_bind_type_t */
addfa(WARN_FLAGS, uint16_t),
addfa(X11_FLAGS, uint16_t),
addfa(OPEN_MODE, uint8_t),
addfa(ACCT_GATHER_PROFILE, uint32_t),
addfa(ADMIN_LVL, uint16_t), /* slurmdb_admin_level_t */
addfa(JOB_SHARED, uint16_t),
addfa(JOB_EXCLUSIVE_FLAGS, uint16_t),
/* List parsers */
addpl(QOS_LIST, QOS, NEED_QOS),
addpl(QOS_NAME_LIST, QOS_NAME, NEED_QOS),
addpl(QOS_ID_LIST, QOS_ID, NEED_QOS),
addpl(QOS_STRING_ID_LIST, STRING, NEED_QOS),
addpl(USER_LIST, USER, NEED_NONE),
addpl(WCKEY_LIST, WCKEY, NEED_NONE),
addpl(ACCOUNT_LIST, ACCOUNT, NEED_NONE),
addpl(ACCOUNTING_LIST, ACCOUNTING, NEED_NONE),
addpl(CLUSTER_REC_LIST, CLUSTER_REC, NEED_NONE),
addpl(ASSOC_LIST, ASSOC, NEED_NONE),
addpl(ASSOC_SHORT_LIST, ASSOC_SHORT, NEED_NONE),
addpl(COORD_LIST, COORD, NEED_NONE),
addpl(CLUSTER_ACCT_REC_LIST, CLUSTER_ACCT_REC, NEED_NONE),
addpl(JOB_LIST, JOB, NEED_NONE),
addpl(STEP_LIST, STEP, NEED_NONE),
addpl(STATS_RPC_LIST, STATS_RPC, NEED_NONE),
addpl(STATS_USER_LIST, STATS_USER, NEED_NONE),
addpl(TRES_LIST, TRES, NEED_NONE),
addpl(SINFO_DATA_LIST, SINFO_DATA, NEED_NONE),
addpl(JOB_DESC_MSG_LIST, JOB_DESC_MSG, NEED_NONE),
};
#undef addpl
#undef addps
#undef addpc
#undef addpa
// clang-format on
extern void get_parsers(const parser_t **parsers_ptr, int *count_ptr)
{
*count_ptr = ARRAY_SIZE(parsers);
*parsers_ptr = parsers;
}
extern const parser_t *const find_parser_by_type(type_t type)
{
for (int i = 0; i < ARRAY_SIZE(parsers); i++)
if (parsers[i].type == type)
return &parsers[i];
return NULL;
}
extern void parsers_init(void)
{
#ifndef NDEBUG
/* sanity check the parsers */
for (int i = 0; i < ARRAY_SIZE(parsers); i++)
check_parser(&parsers[i]);
#endif /* !NDEBUG */
}
#ifndef NDEBUG
extern void verify_parser_not_sliced_funcname(const parser_t *const parser,
const char *func,
const char *file, int line)
{
for (int i = 0; i < ARRAY_SIZE(parsers); i++) {
if (parsers[i].fields) {
const parser_t *const fparser = parsers[i].fields;
for (int j = 0; j < parsers[i].field_count; j++)
if (&fparser[j] == parser)
fatal_abort("%s: direct reference of linking parser %s(0x%" PRIxPTR ") inside of parser array %s(0x%" PRIxPTR ")[%d]=%s(0x%" PRIxPTR ") detected as %s:%d",
func, parser->type_string,
(uintptr_t) parser,
fparser->type_string,
(uintptr_t) fparser, j,
fparser[j].type_string,
(uintptr_t) &fparser[j], file,
line);
}
}
}
extern void verify_parser_sliced_funcname(const parser_t *const parser,
const char *func, const char *file,
int line)
{
for (int i = 0; i < ARRAY_SIZE(parsers); i++) {
if (&parsers[i] == parser) {
fatal_abort("%s: expected linking parser %s(0x%" PRIxPTR ") inside of parser array %s:%d",
func, parser->type_string,
(uintptr_t) parser, file, line);
}
if (parsers[i].fields) {
const parser_t *const fparser = parsers[i].fields;
for (int j = 0; j < parsers[i].field_count; j++)
if (&fparser[j] == parser)
return;
}
}
fatal_abort("%s: orphan parser %s(0x%" PRIxPTR ") detected", func,
parser->type_string, (uintptr_t) parser);
}
#endif /* !NDEBUG */