blob: 95dddd36549664e72e42be2029c009d016d2f696 [file] [log] [blame]
/**
* @file printer_yin.c
* @author Fred Gan <ganshaolong@vip.qq.com>
* @brief YIN printer
*
* Copyright (c) 2015 - 2019 CESNET, z.s.p.o.
*
* This source code is licensed under BSD 3-Clause License (the "License").
* You may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* https://opensource.org/licenses/BSD-3-Clause
*/
#include "common.h"
#include <inttypes.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "log.h"
#include "plugins_exts.h"
#include "printer_internal.h"
#include "tree.h"
#include "tree_schema.h"
#include "tree_schema_internal.h"
#include "plugins_types.h"
#include "xpath.h"
#include "xml.h"
/**
* @brief YIN printer context.
*/
struct ypr_ctx {
struct lyout *out; /**< output specification */
unsigned int level; /**< current indentation level: 0 - no formatting, >= 1 indentation levels */
const struct lys_module *module; /**< schema to print */
};
#define LEVEL ctx->level /**< current level */
#define INDENT (LEVEL)*2,"" /**< indentation parameters for printer functions */
static void yprp_extension_instances(struct ypr_ctx *ctx, LYEXT_SUBSTMT substmt, uint8_t substmt_index,
struct lysp_ext_instance *ext, int *flag, LY_ARRAY_SIZE_TYPE count);
static void
ypr_open(struct ypr_ctx *ctx, const char *elem_name, const char *attr_name, const char *attr_value, int flag)
{
ly_print(ctx->out, "%*s<%s", INDENT, elem_name);
if (attr_name) {
ly_print(ctx->out, " %s=\"", attr_name);
lyxml_dump_text(ctx->out, attr_value, 1);
ly_print(ctx->out, "\"%s", flag == -1 ? "/>\n" : flag == 1 ? ">\n" : "");
} else if (flag) {
ly_print(ctx->out, flag == -1 ? "/>\n" : ">\n");
}
}
static void
ypr_close(struct ypr_ctx *ctx, const char *elem_name, int flag)
{
if (flag) {
ly_print(ctx->out, "%*s</%s>\n", INDENT, elem_name);
} else {
ly_print(ctx->out, "/>\n");
}
}
/*
* par_close_flag
* 0 - parent not yet closed, printing >\n, setting flag to 1
* 1 or NULL - parent already closed, do nothing
*/
static void
ypr_close_parent(struct ypr_ctx *ctx, int *par_close_flag)
{
if (par_close_flag && !(*par_close_flag)) {
(*par_close_flag) = 1;
ly_print(ctx->out, ">\n");
}
}
static void
ypr_yin_arg(struct ypr_ctx *ctx, const char *arg, const char *text)
{
ly_print(ctx->out, "%*s<%s>", INDENT, arg);
lyxml_dump_text(ctx->out, text, 0);
ly_print(ctx->out, "</%s>\n", arg);
}
static void
ypr_substmt(struct ypr_ctx *ctx, LYEXT_SUBSTMT substmt, uint8_t substmt_index, const char *text, void *ext)
{
LY_ARRAY_SIZE_TYPE u;
int extflag = 0;
if (!text) {
/* nothing to print */
return;
}
if (ext_substmt_info[substmt].flags & SUBST_FLAG_YIN) {
extflag = 1;
ypr_open(ctx, ext_substmt_info[substmt].name, NULL, NULL, extflag);
} else {
ypr_open(ctx, ext_substmt_info[substmt].name, ext_substmt_info[substmt].arg, text, extflag);
}
LEVEL++;
LY_ARRAY_FOR(ext, u) {
if (((struct lysp_ext_instance*)ext)[u].insubstmt != substmt || ((struct lysp_ext_instance*)ext)[u].insubstmt_index != substmt_index) {
continue;
}
yprp_extension_instances(ctx, substmt, substmt_index, &((struct lysp_ext_instance*)ext)[u], &extflag, 1);
}
/* argument as yin-element */
if (ext_substmt_info[substmt].flags & SUBST_FLAG_YIN) {
ypr_yin_arg(ctx, ext_substmt_info[substmt].arg, text);
}
LEVEL--;
ypr_close(ctx, ext_substmt_info[substmt].name, extflag);
}
static void
ypr_unsigned(struct ypr_ctx *ctx, LYEXT_SUBSTMT substmt, uint8_t substmt_index, void *exts, unsigned int attr_value)
{
char *str;
if (asprintf(&str, "%u", attr_value) == -1) {
LOGMEM(ctx->module->ctx);
ctx->out->status = LY_EMEM;
return;
}
ypr_substmt(ctx, substmt, substmt_index, str, exts);
free(str);
}
static void
ypr_signed(struct ypr_ctx *ctx, LYEXT_SUBSTMT substmt, uint8_t substmt_index, void *exts, signed int attr_value)
{
char *str;
if (asprintf(&str, "%d", attr_value) == -1) {
LOGMEM(ctx->module->ctx);
ctx->out->status = LY_EMEM;
return;
}
ypr_substmt(ctx, substmt, substmt_index, str, exts);
free(str);
}
static void
yprp_revision(struct ypr_ctx *ctx, const struct lysp_revision *rev)
{
if (rev->dsc || rev->ref || rev->exts) {
ypr_open(ctx, "revision", "date", rev->date, 1);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, rev->exts, NULL, 0);
ypr_substmt(ctx, LYEXT_SUBSTMT_DESCRIPTION, 0, rev->dsc, rev->exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_REFERENCE, 0, rev->ref, rev->exts);
LEVEL--;
ypr_close(ctx, "revision", 1);
} else {
ypr_open(ctx, "revision", "date", rev->date, -1);
}
}
static void
ypr_mandatory(struct ypr_ctx *ctx, uint16_t flags, void *exts, int *flag)
{
if (flags & LYS_MAND_MASK) {
ypr_close_parent(ctx, flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_MANDATORY, 0, (flags & LYS_MAND_TRUE) ? "true" : "false", exts);
}
}
static void
ypr_config(struct ypr_ctx *ctx, uint16_t flags, void *exts, int *flag)
{
if (flags & LYS_CONFIG_MASK) {
ypr_close_parent(ctx, flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_CONFIG, 0, (flags & LYS_CONFIG_W) ? "true" : "false", exts);
}
}
static void
ypr_status(struct ypr_ctx *ctx, uint16_t flags, void *exts, int *flag)
{
const char *status = NULL;
if (flags & LYS_STATUS_CURR) {
ypr_close_parent(ctx, flag);
status = "current";
} else if (flags & LYS_STATUS_DEPRC) {
ypr_close_parent(ctx, flag);
status = "deprecated";
} else if (flags & LYS_STATUS_OBSLT) {
ypr_close_parent(ctx, flag);
status = "obsolete";
}
ypr_substmt(ctx, LYEXT_SUBSTMT_STATUS, 0, status, exts);
}
static void
ypr_description(struct ypr_ctx *ctx, const char *dsc, void *exts, int *flag)
{
if (dsc) {
ypr_close_parent(ctx, flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_DESCRIPTION, 0, dsc, exts);
}
}
static void
ypr_reference(struct ypr_ctx *ctx, const char *ref, void *exts, int *flag)
{
if (ref) {
ypr_close_parent(ctx, flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_REFERENCE, 0, ref, exts);
}
}
static void
yprp_iffeatures(struct ypr_ctx *ctx, const char **iff, struct lysp_ext_instance *exts, int *flag)
{
LY_ARRAY_SIZE_TYPE u;
int extflag;
LY_ARRAY_FOR(iff, u) {
ypr_close_parent(ctx, flag);
extflag = 0;
ly_print(ctx->out, "%*s<if-feature name=\"%s", INDENT, iff[u]);
/* extensions */
LEVEL++;
LY_ARRAY_FOR(exts, u) {
if (exts[u].insubstmt != LYEXT_SUBSTMT_IFFEATURE || exts[u].insubstmt_index != u) {
continue;
}
yprp_extension_instances(ctx, LYEXT_SUBSTMT_IFFEATURE, u, &exts[u], &extflag, 1);
}
LEVEL--;
ly_print(ctx->out, "\"/>\n");
}
}
static void
yprp_extension(struct ypr_ctx *ctx, const struct lysp_ext *ext)
{
int flag = 0, flag2 = 0;
LY_ARRAY_SIZE_TYPE u;
ypr_open(ctx, "extension", "name", ext->name, flag);
LEVEL++;
if (ext->exts) {
ypr_close_parent(ctx, &flag);
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, ext->exts, &flag, 0);
}
if (ext->argument) {
ypr_close_parent(ctx, &flag);
ypr_open(ctx, "argument", "name", ext->argument, flag2);
LEVEL++;
if (ext->exts) {
u = -1;
while ((u = lysp_ext_instance_iter(ext->exts, u + 1, LYEXT_SUBSTMT_ARGUMENT)) != LY_ARRAY_SIZE(ext->exts)) {
ypr_close_parent(ctx, &flag2);
yprp_extension_instances(ctx, LYEXT_SUBSTMT_ARGUMENT, 0, &ext->exts[u], &flag2, 1);
}
}
if ((ext->flags & LYS_YINELEM_MASK) ||
(ext->exts && lysp_ext_instance_iter(ext->exts, 0, LYEXT_SUBSTMT_YINELEM) != LY_ARRAY_SIZE(ext->exts))) {
ypr_close_parent(ctx, &flag2);
ypr_substmt(ctx, LYEXT_SUBSTMT_YINELEM, 0, (ext->flags & LYS_YINELEM_TRUE) ? "true" : "false", ext->exts);
}
LEVEL--;
ypr_close(ctx, "argument", flag2);
}
ypr_status(ctx, ext->flags, ext->exts, &flag);
ypr_description(ctx, ext->dsc, ext->exts, &flag);
ypr_reference(ctx, ext->ref, ext->exts, &flag);
LEVEL--;
ypr_close(ctx, "extension", flag);
}
static void
yprp_feature(struct ypr_ctx *ctx, const struct lysp_feature *feat)
{
int flag = 0;
ypr_open(ctx, "feature", "name", feat->name, flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, feat->exts, &flag, 0);
yprp_iffeatures(ctx, feat->iffeatures, feat->exts, &flag);
ypr_status(ctx, feat->flags, feat->exts, &flag);
ypr_description(ctx, feat->dsc, feat->exts, &flag);
ypr_reference(ctx, feat->ref, feat->exts, &flag);
LEVEL--;
ypr_close(ctx, "feature", flag);
}
static void
yprp_identity(struct ypr_ctx *ctx, const struct lysp_ident *ident)
{
int flag = 0;
LY_ARRAY_SIZE_TYPE u;
ypr_open(ctx, "identity", "name", ident->name, flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, ident->exts, &flag, 0);
yprp_iffeatures(ctx, ident->iffeatures, ident->exts, &flag);
LY_ARRAY_FOR(ident->bases, u) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_BASE, u, ident->bases[u], ident->exts);
}
ypr_status(ctx, ident->flags, ident->exts, &flag);
ypr_description(ctx, ident->dsc, ident->exts, &flag);
ypr_reference(ctx, ident->ref, ident->exts, &flag);
LEVEL--;
ypr_close(ctx, "identity", flag);
}
static void
yprp_restr(struct ypr_ctx *ctx, const struct lysp_restr *restr, const char *name, const char *attr, int *flag)
{
(void)flag;
int inner_flag = 0;
if (!restr) {
return;
}
ly_print(ctx->out, "%*s<%s %s=\"", INDENT, name, attr);
lyxml_dump_text(ctx->out, (restr->arg[0] != 0x15 && restr->arg[0] != 0x06) ? restr->arg : &restr->arg[1], 1);
ly_print(ctx->out, "\"");
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, restr->exts, &inner_flag, 0);
if (restr->arg[0] == 0x15) {
ypr_close_parent(ctx, &inner_flag);
/* special byte value in pattern's expression: 0x15 - invert-match, 0x06 - match */
ypr_substmt(ctx, LYEXT_SUBSTMT_MODIFIER, 0, "invert-match", restr->exts);
}
if (restr->emsg) {
ypr_close_parent(ctx, &inner_flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_ERRMSG, 0, restr->emsg, restr->exts);
}
if (restr->eapptag) {
ypr_close_parent(ctx, &inner_flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_ERRTAG, 0, restr->eapptag, restr->exts);
}
ypr_description(ctx, restr->dsc, restr->exts, &inner_flag);
ypr_reference(ctx, restr->ref, restr->exts, &inner_flag);
LEVEL--;
ypr_close(ctx, name, inner_flag);
}
static void
yprp_when(struct ypr_ctx *ctx, struct lysp_when *when, int *flag)
{
int inner_flag = 0;
(void)flag;
if (!when) {
return;
}
ly_print(ctx->out, "%*s<when condition=\"", INDENT);
lyxml_dump_text(ctx->out, when->cond, 1);
ly_print(ctx->out, "\"");
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, when->exts, &inner_flag, 0);
ypr_description(ctx, when->dsc, when->exts, &inner_flag);
ypr_reference(ctx, when->ref, when->exts, &inner_flag);
LEVEL--;
ypr_close(ctx, "when", inner_flag);
}
static void
yprp_enum(struct ypr_ctx *ctx, const struct lysp_type_enum *items, LY_DATA_TYPE type, int *flag)
{
LY_ARRAY_SIZE_TYPE u;
int inner_flag;
(void)flag;
LY_ARRAY_FOR(items, u) {
if (type == LY_TYPE_BITS) {
ly_print(ctx->out, "%*s<bit name=\"", INDENT);
lyxml_dump_text(ctx->out, items[u].name, 1);
ly_print(ctx->out, "\"");
} else { /* LY_TYPE_ENUM */
ly_print(ctx->out, "%*s<enum name=\"", INDENT);
lyxml_dump_text(ctx->out, items[u].name, 1);
ly_print(ctx->out, "\"");
}
inner_flag = 0;
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, items[u].exts, &inner_flag, 0);
yprp_iffeatures(ctx, items[u].iffeatures, items[u].exts, &inner_flag);
if (items[u].flags & LYS_SET_VALUE) {
if (type == LY_TYPE_BITS) {
ypr_close_parent(ctx, &inner_flag);
ypr_unsigned(ctx, LYEXT_SUBSTMT_POSITION, 0, items[u].exts, items[u].value);
} else { /* LY_TYPE_ENUM */
ypr_close_parent(ctx, &inner_flag);
ypr_signed(ctx, LYEXT_SUBSTMT_VALUE, 0, items[u].exts, items[u].value);
}
}
ypr_status(ctx, items[u].flags, items[u].exts, &inner_flag);
ypr_description(ctx, items[u].dsc, items[u].exts, &inner_flag);
ypr_reference(ctx, items[u].ref, items[u].exts, &inner_flag);
LEVEL--;
ypr_close(ctx, type == LY_TYPE_BITS ? "bit" : "enum", inner_flag);
}
}
static void
yprp_type(struct ypr_ctx *ctx, const struct lysp_type *type)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
if (!ctx || !type) {
return;
}
ypr_open(ctx, "type", "name", type->name, flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, type->exts, &flag, 0);
if (type->range || type->length || type->patterns || type->bits || type->enums) {
ypr_close_parent(ctx, &flag);
}
yprp_restr(ctx, type->range, "range", "value", &flag);
yprp_restr(ctx, type->length, "length", "value", &flag);
LY_ARRAY_FOR(type->patterns, u) {
yprp_restr(ctx, &type->patterns[u], "pattern", "value", &flag);
}
yprp_enum(ctx, type->bits, LY_TYPE_BITS, &flag);
yprp_enum(ctx, type->enums, LY_TYPE_ENUM, &flag);
if (type->path) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_PATH, 0, type->path, type->exts);
}
if (type->flags & LYS_SET_REQINST) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_REQINSTANCE, 0, type->require_instance ? "true" : "false", type->exts);
}
if (type->flags & LYS_SET_FRDIGITS) {
ypr_close_parent(ctx, &flag);
ypr_unsigned(ctx, LYEXT_SUBSTMT_FRACDIGITS, 0, type->exts, type->fraction_digits);
}
LY_ARRAY_FOR(type->bases, u) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_BASE, u, type->bases[u], type->exts);
}
LY_ARRAY_FOR(type->types, u) {
ypr_close_parent(ctx, &flag);
yprp_type(ctx, &type->types[u]);
}
LEVEL--;
ypr_close(ctx, "type", flag);
}
static void
yprp_typedef(struct ypr_ctx *ctx, const struct lysp_tpdf *tpdf)
{
LYOUT_CHECK(ctx->out);
ypr_open(ctx, "typedef", "name", tpdf->name, 1);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, tpdf->exts, NULL, 0);
yprp_type(ctx, &tpdf->type);
if (tpdf->units) {
ypr_substmt(ctx, LYEXT_SUBSTMT_UNITS, 0, tpdf->units, tpdf->exts);
}
if (tpdf->dflt) {
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, 0, tpdf->dflt, tpdf->exts);
}
ypr_status(ctx, tpdf->flags, tpdf->exts, NULL);
ypr_description(ctx, tpdf->dsc, tpdf->exts, NULL);
ypr_reference(ctx, tpdf->ref, tpdf->exts, NULL);
LEVEL--;
ypr_close(ctx, "typedef", 1);
}
static void yprp_node(struct ypr_ctx *ctx, const struct lysp_node *node);
static void yprp_action(struct ypr_ctx *ctx, const struct lysp_action *action);
static void
yprp_grouping(struct ypr_ctx *ctx, const struct lysp_grp *grp)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
struct lysp_node *data;
LYOUT_CHECK(ctx->out);
ypr_open(ctx, "grouping", "name", grp->name, flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, grp->exts, &flag, 0);
ypr_status(ctx, grp->flags, grp->exts, &flag);
ypr_description(ctx, grp->dsc, grp->exts, &flag);
ypr_reference(ctx, grp->ref, grp->exts, &flag);
LY_ARRAY_FOR(grp->typedefs, u) {
ypr_close_parent(ctx, &flag);
yprp_typedef(ctx, &grp->typedefs[u]);
}
LY_ARRAY_FOR(grp->groupings, u) {
ypr_close_parent(ctx, &flag);
yprp_grouping(ctx, &grp->groupings[u]);
}
LY_LIST_FOR(grp->data, data) {
ypr_close_parent(ctx, &flag);
yprp_node(ctx, data);
}
LY_ARRAY_FOR(grp->actions, u) {
ypr_close_parent(ctx, &flag);
yprp_action(ctx, &grp->actions[u]);
}
LEVEL--;
ypr_close(ctx, "grouping", flag);
}
static void
yprp_inout(struct ypr_ctx *ctx, const struct lysp_action_inout *inout, int *flag)
{
LY_ARRAY_SIZE_TYPE u;
struct lysp_node *data;
if (!inout->nodetype) {
/* nodetype not set -> input/output is empty */
return;
}
ypr_close_parent(ctx, flag);
ypr_open(ctx, (inout->nodetype == LYS_INPUT ? "input" : "output"), NULL, NULL, *flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, inout->exts, NULL, 0);
LY_ARRAY_FOR(inout->musts, u) {
yprp_restr(ctx, &inout->musts[u], "must", "condition", NULL);
}
LY_ARRAY_FOR(inout->typedefs, u) {
yprp_typedef(ctx, &inout->typedefs[u]);
}
LY_ARRAY_FOR(inout->groupings, u) {
yprp_grouping(ctx, &inout->groupings[u]);
}
LY_LIST_FOR(inout->data, data) {
yprp_node(ctx, data);
}
LEVEL--;
ypr_close(ctx, (inout->nodetype == LYS_INPUT ? "input" : "output"), 1);
}
static void
yprp_notification(struct ypr_ctx *ctx, const struct lysp_notif *notif)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
struct lysp_node *data;
LYOUT_CHECK(ctx->out);
ypr_open(ctx, "notification", "name", notif->name, flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, notif->exts, &flag, 0);
yprp_iffeatures(ctx, notif->iffeatures, notif->exts, &flag);
LY_ARRAY_FOR(notif->musts, u) {
ypr_close_parent(ctx, &flag);
yprp_restr(ctx, &notif->musts[u], "must", "condition", &flag);
}
ypr_status(ctx, notif->flags, notif->exts, &flag);
ypr_description(ctx, notif->dsc, notif->exts, &flag);
ypr_reference(ctx, notif->ref, notif->exts, &flag);
LY_ARRAY_FOR(notif->typedefs, u) {
ypr_close_parent(ctx, &flag);
yprp_typedef(ctx, &notif->typedefs[u]);
}
LY_ARRAY_FOR(notif->groupings, u) {
ypr_close_parent(ctx, &flag);
yprp_grouping(ctx, &notif->groupings[u]);
}
LY_LIST_FOR(notif->data, data) {
ypr_close_parent(ctx, &flag);
yprp_node(ctx, data);
}
LEVEL--;
ypr_close(ctx, "notification", flag);
}
static void
yprp_action(struct ypr_ctx *ctx, const struct lysp_action *action)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
LYOUT_CHECK(ctx->out);
ypr_open(ctx, action->parent ? "action" : "rpc", "name", action->name, flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, action->exts, &flag, 0);
yprp_iffeatures(ctx, action->iffeatures, action->exts, &flag);
ypr_status(ctx, action->flags, action->exts, &flag);
ypr_description(ctx, action->dsc, action->exts, &flag);
ypr_reference(ctx, action->ref, action->exts, &flag);
LY_ARRAY_FOR(action->typedefs, u) {
ypr_close_parent(ctx, &flag);
yprp_typedef(ctx, &action->typedefs[u]);
}
LY_ARRAY_FOR(action->groupings, u) {
ypr_close_parent(ctx, &flag);
yprp_grouping(ctx, &action->groupings[u]);
}
yprp_inout(ctx, &action->input, &flag);
yprp_inout(ctx, &action->output, &flag);
LEVEL--;
ypr_close(ctx, action->parent ? "action" : "rpc", flag);
}
static void
yprp_node_common1(struct ypr_ctx *ctx, const struct lysp_node *node, int *flag)
{
ypr_open(ctx, lys_nodetype2str(node->nodetype), "name", node->name, *flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, node->exts, flag, 0);
yprp_when(ctx, node->when, flag);
yprp_iffeatures(ctx, node->iffeatures, node->exts, flag);
}
static void
yprp_node_common2(struct ypr_ctx *ctx, const struct lysp_node *node, int *flag)
{
ypr_config(ctx, node->flags, node->exts, flag);
if (node->nodetype & (LYS_CHOICE | LYS_LEAF | LYS_ANYDATA)) {
ypr_mandatory(ctx, node->flags, node->exts, flag);
}
ypr_status(ctx, node->flags, node->exts, flag);
ypr_description(ctx, node->dsc, node->exts, flag);
ypr_reference(ctx, node->ref, node->exts, flag);
}
static void
yprp_container(struct ypr_ctx *ctx, const struct lysp_node *node)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
struct lysp_node *child;
struct lysp_node_container *cont = (struct lysp_node_container *)node;
yprp_node_common1(ctx, node, &flag);
LY_ARRAY_FOR(cont->musts, u) {
ypr_close_parent(ctx, &flag);
yprp_restr(ctx, &cont->musts[u], "must", "condition", &flag);
}
if (cont->presence) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_PRESENCE, 0, cont->presence, cont->exts);
}
yprp_node_common2(ctx, node, &flag);
LY_ARRAY_FOR(cont->typedefs, u) {
ypr_close_parent(ctx, &flag);
yprp_typedef(ctx, &cont->typedefs[u]);
}
LY_ARRAY_FOR(cont->groupings, u) {
ypr_close_parent(ctx, &flag);
yprp_grouping(ctx, &cont->groupings[u]);
}
LY_LIST_FOR(cont->child, child) {
ypr_close_parent(ctx, &flag);
yprp_node(ctx, child);
}
LY_ARRAY_FOR(cont->actions, u) {
ypr_close_parent(ctx, &flag);
yprp_action(ctx, &cont->actions[u]);
}
LY_ARRAY_FOR(cont->notifs, u) {
ypr_close_parent(ctx, &flag);
yprp_notification(ctx, &cont->notifs[u]);
}
LEVEL--;
ypr_close(ctx, "container", flag);
}
static void
yprp_case(struct ypr_ctx *ctx, const struct lysp_node *node)
{
int flag = 0;
struct lysp_node *child;
struct lysp_node_case *cas = (struct lysp_node_case *)node;
yprp_node_common1(ctx, node, &flag);
yprp_node_common2(ctx, node, &flag);
LY_LIST_FOR(cas->child, child) {
ypr_close_parent(ctx, &flag);
yprp_node(ctx, child);
}
LEVEL--;
ypr_close(ctx, "case", flag);
}
static void
yprp_choice(struct ypr_ctx *ctx, const struct lysp_node *node)
{
int flag = 0;
struct lysp_node *child;
struct lysp_node_choice *choice = (struct lysp_node_choice *)node;
yprp_node_common1(ctx, node, &flag);
if (choice->dflt) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, 0, choice->dflt, choice->exts);
}
yprp_node_common2(ctx, node, &flag);
LY_LIST_FOR(choice->child, child) {
ypr_close_parent(ctx, &flag);
yprp_node(ctx, child);
}
LEVEL--;
ypr_close(ctx, "choice", flag);
}
static void
yprp_leaf(struct ypr_ctx *ctx, const struct lysp_node *node)
{
LY_ARRAY_SIZE_TYPE u;
struct lysp_node_leaf *leaf = (struct lysp_node_leaf *)node;
int flag = 1;
yprp_node_common1(ctx, node, &flag);
yprp_type(ctx, &leaf->type);
ypr_substmt(ctx, LYEXT_SUBSTMT_UNITS, 0, leaf->units, leaf->exts);
LY_ARRAY_FOR(leaf->musts, u) {
yprp_restr(ctx, &leaf->musts[u], "must", "condition", &flag);
}
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, 0, leaf->dflt, leaf->exts);
yprp_node_common2(ctx, node, &flag);
LEVEL--;
ypr_close(ctx, "leaf", flag);
}
static void
yprp_leaflist(struct ypr_ctx *ctx, const struct lysp_node *node)
{
LY_ARRAY_SIZE_TYPE u;
struct lysp_node_leaflist *llist = (struct lysp_node_leaflist *)node;
int flag = 1;
yprp_node_common1(ctx, node, &flag);
yprp_type(ctx, &llist->type);
ypr_substmt(ctx, LYEXT_SUBSTMT_UNITS, 0, llist->units, llist->exts);
LY_ARRAY_FOR(llist->musts, u) {
yprp_restr(ctx, &llist->musts[u], "must", "condition", NULL);
}
LY_ARRAY_FOR(llist->dflts, u) {
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, u, llist->dflts[u], llist->exts);
}
ypr_config(ctx, node->flags, node->exts, NULL);
if (llist->flags & LYS_SET_MIN) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MIN, 0, llist->exts, llist->min);
}
if (llist->flags & LYS_SET_MAX) {
if (llist->max) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MAX, 0, llist->exts, llist->max);
} else {
ypr_substmt(ctx, LYEXT_SUBSTMT_MAX, 0, "unbounded", llist->exts);
}
}
if (llist->flags & LYS_ORDBY_MASK) {
ypr_substmt(ctx, LYEXT_SUBSTMT_ORDEREDBY, 0, (llist->flags & LYS_ORDBY_USER) ? "user" : "system", llist->exts);
}
ypr_status(ctx, node->flags, node->exts, &flag);
ypr_description(ctx, node->dsc, node->exts, &flag);
ypr_reference(ctx, node->ref, node->exts, &flag);
LEVEL--;
ypr_close(ctx, "leaf-list", flag);
}
static void
yprp_list(struct ypr_ctx *ctx, const struct lysp_node *node)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
struct lysp_node *child;
struct lysp_node_list *list = (struct lysp_node_list *)node;
yprp_node_common1(ctx, node, &flag);
LY_ARRAY_FOR(list->musts, u) {
ypr_close_parent(ctx, &flag);
yprp_restr(ctx, &list->musts[u], "must", "condition", &flag);
}
if (list->key) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_KEY, 0, list->key, list->exts);
}
LY_ARRAY_FOR(list->uniques, u) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_UNIQUE, u, list->uniques[u], list->exts);
}
ypr_config(ctx, node->flags, node->exts, NULL);
if (list->flags & LYS_SET_MIN) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MIN, 0, list->exts, list->min);
}
if (list->flags & LYS_SET_MAX) {
if (list->max) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MAX, 0, list->exts, list->max);
} else {
ypr_substmt(ctx, LYEXT_SUBSTMT_MAX, 0, "unbounded", list->exts);
}
}
if (list->flags & LYS_ORDBY_MASK) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_ORDEREDBY, 0, (list->flags & LYS_ORDBY_USER) ? "user" : "system", list->exts);
}
ypr_status(ctx, node->flags, node->exts, &flag);
ypr_description(ctx, node->dsc, node->exts, &flag);
ypr_reference(ctx, node->ref, node->exts, &flag);
LY_ARRAY_FOR(list->typedefs, u) {
ypr_close_parent(ctx, &flag);
yprp_typedef(ctx, &list->typedefs[u]);
}
LY_ARRAY_FOR(list->groupings, u) {
ypr_close_parent(ctx, &flag);
yprp_grouping(ctx, &list->groupings[u]);
}
LY_LIST_FOR(list->child, child) {
ypr_close_parent(ctx, &flag);
yprp_node(ctx, child);
}
LY_ARRAY_FOR(list->actions, u) {
ypr_close_parent(ctx, &flag);
yprp_action(ctx, &list->actions[u]);
}
LY_ARRAY_FOR(list->notifs, u) {
ypr_close_parent(ctx, &flag);
yprp_notification(ctx, &list->notifs[u]);
}
LEVEL--;
ypr_close(ctx, "list", flag);
}
static void
yprp_refine(struct ypr_ctx *ctx, struct lysp_refine *refine)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
ypr_open(ctx, "refine", "target-node", refine->nodeid, flag);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, refine->exts, &flag, 0);
yprp_iffeatures(ctx, refine->iffeatures, refine->exts, &flag);
LY_ARRAY_FOR(refine->musts, u) {
ypr_close_parent(ctx, &flag);
yprp_restr(ctx, &refine->musts[u], "must", "condition", &flag);
}
if (refine->presence) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_PRESENCE, 0, refine->presence, refine->exts);
}
LY_ARRAY_FOR(refine->dflts, u) {
ypr_close_parent(ctx, &flag);
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, u, refine->dflts[u], refine->exts);
}
ypr_config(ctx, refine->flags, refine->exts, &flag);
ypr_mandatory(ctx, refine->flags, refine->exts, &flag);
if (refine->flags & LYS_SET_MIN) {
ypr_close_parent(ctx, &flag);
ypr_unsigned(ctx, LYEXT_SUBSTMT_MIN, 0, refine->exts, refine->min);
}
if (refine->flags & LYS_SET_MAX) {
ypr_close_parent(ctx, &flag);
if (refine->max) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MAX, 0, refine->exts, refine->max);
} else {
ypr_substmt(ctx, LYEXT_SUBSTMT_MAX, 0, "unbounded", refine->exts);
}
}
ypr_description(ctx, refine->dsc, refine->exts, &flag);
ypr_reference(ctx, refine->ref, refine->exts, &flag);
LEVEL--;
ypr_close(ctx, "refine", flag);
}
static void
yprp_augment(struct ypr_ctx *ctx, const struct lysp_augment *aug)
{
LY_ARRAY_SIZE_TYPE u;
struct lysp_node *child;
ypr_open(ctx, "augment", "target-node", aug->nodeid, 1);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, aug->exts, NULL, 0);
yprp_when(ctx, aug->when, NULL);
yprp_iffeatures(ctx, aug->iffeatures, aug->exts, NULL);
ypr_status(ctx, aug->flags, aug->exts, NULL);
ypr_description(ctx, aug->dsc, aug->exts, NULL);
ypr_reference(ctx, aug->ref, aug->exts, NULL);
LY_LIST_FOR(aug->child, child) {
yprp_node(ctx, child);
}
LY_ARRAY_FOR(aug->actions, u) {
yprp_action(ctx, &aug->actions[u]);
}
LY_ARRAY_FOR(aug->notifs, u) {
yprp_notification(ctx, &aug->notifs[u]);
}
LEVEL--;
ypr_close(ctx, "augment", 1);
}
static void
yprp_uses(struct ypr_ctx *ctx, const struct lysp_node *node)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
struct lysp_node_uses *uses = (struct lysp_node_uses *)node;
yprp_node_common1(ctx, node, &flag);
yprp_node_common2(ctx, node, &flag);
LY_ARRAY_FOR(uses->refines, u) {
ypr_close_parent(ctx, &flag);
yprp_refine(ctx, &uses->refines[u]);
}
LY_ARRAY_FOR(uses->augments, u) {
ypr_close_parent(ctx, &flag);
yprp_augment(ctx, &uses->augments[u]);
}
LEVEL--;
ypr_close(ctx, "uses", flag);
}
static void
yprp_anydata(struct ypr_ctx *ctx, const struct lysp_node *node)
{
LY_ARRAY_SIZE_TYPE u;
int flag = 0;
struct lysp_node_anydata *any = (struct lysp_node_anydata *)node;
yprp_node_common1(ctx, node, &flag);
LY_ARRAY_FOR(any->musts, u) {
ypr_close_parent(ctx, &flag);
yprp_restr(ctx, &any->musts[u], "must", "condition", &flag);
}
yprp_node_common2(ctx, node, &flag);
LEVEL--;
ypr_close(ctx, lys_nodetype2str(node->nodetype), flag);
}
static void
yprp_node(struct ypr_ctx *ctx, const struct lysp_node *node)
{
LYOUT_CHECK(ctx->out);
switch (node->nodetype) {
case LYS_CONTAINER:
yprp_container(ctx, node);
break;
case LYS_CHOICE:
yprp_choice(ctx, node);
break;
case LYS_LEAF:
yprp_leaf(ctx, node);
break;
case LYS_LEAFLIST:
yprp_leaflist(ctx, node);
break;
case LYS_LIST:
yprp_list(ctx, node);
break;
case LYS_USES:
yprp_uses(ctx, node);
break;
case LYS_ANYXML:
case LYS_ANYDATA:
yprp_anydata(ctx, node);
break;
case LYS_CASE:
yprp_case(ctx, node);
break;
default:
break;
}
}
static void
yprp_deviation(struct ypr_ctx *ctx, const struct lysp_deviation *deviation)
{
LY_ARRAY_SIZE_TYPE u;
struct lysp_deviate_add *add;
struct lysp_deviate_rpl *rpl;
struct lysp_deviate_del *del;
struct lysp_deviate *elem;
ypr_open(ctx, "deviation", "target-node", deviation->nodeid, 1);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, deviation->exts, NULL, 0);
ypr_description(ctx, deviation->dsc, deviation->exts, NULL);
ypr_reference(ctx, deviation->ref, deviation->exts, NULL);
LY_LIST_FOR(deviation->deviates, elem) {
ly_print(ctx->out, "%*s<deviate value=\"", INDENT);
if (elem->mod == LYS_DEV_NOT_SUPPORTED) {
if (elem->exts) {
ly_print(ctx->out, "not-supported\"/>\n");
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, elem->exts, NULL, 0);
} else {
ly_print(ctx->out, "not-supported\"/>\n");
continue;
}
} else if (elem->mod == LYS_DEV_ADD) {
add = (struct lysp_deviate_add*)elem;
ly_print(ctx->out, "add\">\n");
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, add->exts, NULL, 0);
ypr_substmt(ctx, LYEXT_SUBSTMT_UNITS, 0, add->units, add->exts);
LY_ARRAY_FOR(add->musts, u) {
yprp_restr(ctx, &add->musts[u], "must", "condition", NULL);
}
LY_ARRAY_FOR(add->uniques, u) {
ypr_substmt(ctx, LYEXT_SUBSTMT_UNIQUE, u, add->uniques[u], add->exts);
}
LY_ARRAY_FOR(add->dflts, u) {
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, u, add->dflts[u], add->exts);
}
ypr_config(ctx, add->flags, add->exts, NULL);
ypr_mandatory(ctx, add->flags, add->exts, NULL);
if (add->flags & LYS_SET_MIN) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MIN, 0, add->exts, add->min);
}
if (add->flags & LYS_SET_MAX) {
if (add->max) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MAX, 0, add->exts, add->max);
} else {
ypr_substmt(ctx, LYEXT_SUBSTMT_MAX, 0, "unbounded", add->exts);
}
}
} else if (elem->mod == LYS_DEV_REPLACE) {
rpl = (struct lysp_deviate_rpl*)elem;
ly_print(ctx->out, "replace\">\n");
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, rpl->exts, NULL, 0);
if (rpl->type) {
yprp_type(ctx, rpl->type);
}
ypr_substmt(ctx, LYEXT_SUBSTMT_UNITS, 0, rpl->units, rpl->exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, 0, rpl->dflt, rpl->exts);
ypr_config(ctx, rpl->flags, rpl->exts, NULL);
ypr_mandatory(ctx, rpl->flags, rpl->exts, NULL);
if (rpl->flags & LYS_SET_MIN) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MIN, 0, rpl->exts, rpl->min);
}
if (rpl->flags & LYS_SET_MAX) {
if (rpl->max) {
ypr_unsigned(ctx, LYEXT_SUBSTMT_MAX, 0, rpl->exts, rpl->max);
} else {
ypr_substmt(ctx, LYEXT_SUBSTMT_MAX, 0, "unbounded", rpl->exts);
}
}
} else if (elem->mod == LYS_DEV_DELETE) {
del = (struct lysp_deviate_del*)elem;
ly_print(ctx->out, "delete\">\n");
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, del->exts, NULL, 0);
ypr_substmt(ctx, LYEXT_SUBSTMT_UNITS, 0, del->units, del->exts);
LY_ARRAY_FOR(del->musts, u) {
yprp_restr(ctx, &del->musts[u], "must", "condition", NULL);
}
LY_ARRAY_FOR(del->uniques, u) {
ypr_substmt(ctx, LYEXT_SUBSTMT_UNIQUE, u, del->uniques[u], del->exts);
}
LY_ARRAY_FOR(del->dflts, u) {
ypr_substmt(ctx, LYEXT_SUBSTMT_DEFAULT, u, del->dflts[u], del->exts);
}
}
LEVEL--;
ypr_close(ctx, "deviate", 1);
}
LEVEL--;
ypr_close(ctx, "deviation", 1);
}
/**
* @brief Minimal print of a schema.
*
* To print parsed schema when the parsed form was already removed
*/
static LY_ERR
ypr_missing_format(struct ypr_ctx *ctx, const struct lys_module *module)
{
/* module-header-stmts */
if (module->version) {
if (module->version) {
ypr_substmt(ctx, LYEXT_SUBSTMT_VERSION, 0, module->version == LYS_VERSION_1_1 ? "1.1" : "1", NULL);
}
}
ypr_substmt(ctx, LYEXT_SUBSTMT_NAMESPACE, 0, module->ns, NULL);
ypr_substmt(ctx, LYEXT_SUBSTMT_PREFIX, 0, module->prefix, NULL);
/* meta-stmts */
if (module->org || module->contact || module->dsc || module->ref) {
ly_print(ctx->out, "\n");
}
ypr_substmt(ctx, LYEXT_SUBSTMT_ORGANIZATION, 0, module->org, NULL);
ypr_substmt(ctx, LYEXT_SUBSTMT_CONTACT, 0, module->contact, NULL);
ypr_substmt(ctx, LYEXT_SUBSTMT_DESCRIPTION, 0, module->dsc, NULL);
ypr_substmt(ctx, LYEXT_SUBSTMT_REFERENCE, 0, module->ref, NULL);
/* revision-stmts */
if (module->revision) {
ypr_open(ctx, "revision", "date", module->revision, -1);
}
LEVEL--;
ypr_close(ctx, "module", 1);
ly_print_flush(ctx->out);
return LY_SUCCESS;
}
static void
ypr_xmlns(struct ypr_ctx *ctx, const struct lys_module *module, unsigned int indent)
{
LY_ARRAY_SIZE_TYPE u;
ly_print(ctx->out, "%*sxmlns=\"%s\"", indent + INDENT, YIN_NS_URI);
ly_print(ctx->out, "\n%*sxmlns:%s=\"%s\"", indent + INDENT, module->prefix, module->ns);
struct lysp_module *modp = module->parsed;
LY_ARRAY_FOR(modp->imports, u){
ly_print(ctx->out, "\n%*sxmlns:%s=\"%s\"", indent + INDENT, modp->imports[u].prefix, modp->imports[u].module->ns);
}
}
struct ext_substmt_info_s stmt_attr_info[] = {
{NULL, NULL, 0}, /**< LY_STMT_NONE*/
{"status", "value", SUBST_FLAG_ID}, /**< LY_STMT_STATUS */
{"config", "value", SUBST_FLAG_ID}, /**< LY_STMT_CONFIG */
{"mandatory", "value", SUBST_FLAG_ID}, /**< LY_STMT_MANDATORY */
{"units", "name", SUBST_FLAG_ID}, /**< LY_STMT_UNITS */
{"default", "value", SUBST_FLAG_ID}, /**< LY_STMT_DEFAULT */
{"type", "name", SUBST_FLAG_ID}, /**< LY_STMT_TYPE */
{"action", "name", SUBST_FLAG_ID}, /**< LY_STMT_ACTION */
{"anydata", "name", SUBST_FLAG_ID}, /**< LY_STMT_ANYDATA */
{"anyxml", "name", SUBST_FLAG_ID}, /**< LY_STMT_ANYXML */
{"argument", "name", SUBST_FLAG_ID}, /**< LY_STMT_ARGUMENT */
{"augment", "target-node", SUBST_FLAG_ID}, /**< LY_STMT_AUGMENT */
{"base", "name", SUBST_FLAG_ID}, /**< LY_STMT_BASE */
{"belongs-to", "module", SUBST_FLAG_ID}, /**< LY_STMT_BELONGS_TO */
{"bit", "name", SUBST_FLAG_ID}, /**< LY_STMT_BIT */
{"case", "name", SUBST_FLAG_ID}, /**< LY_STMT_CASE */
{"choice", "name", SUBST_FLAG_ID}, /**< LY_STMT_CHOICE */
{"contact", "text", SUBST_FLAG_YIN},/**< LY_STMT_CONTACT */
{"container", "name", SUBST_FLAG_ID}, /**< LY_STMT_CONTAINER */
{"description", "text", SUBST_FLAG_YIN},/**< LY_STMT_DESCRIPTION */
{"deviate", "value", SUBST_FLAG_ID}, /**< LY_STMT_DEVIATE */
{"deviation", "target-node", SUBST_FLAG_ID}, /**< LY_STMT_DEVIATION */
{"enum", "name", SUBST_FLAG_ID}, /**< LY_STMT_ENUM */
{"error-app-tag", "value", SUBST_FLAG_ID}, /**< LY_STMT_ERROR_APP_TAG */
{"error-message", "value", SUBST_FLAG_YIN},/**< LY_STMT_ERROR_MESSAGE */
{"extension", "name", SUBST_FLAG_ID}, /**< LY_STMT_EXTENSION */
{"feature", "name", SUBST_FLAG_ID}, /**< LY_STMT_FEATURE */
{"fraction-digits", "value", SUBST_FLAG_ID}, /**< LY_STMT_FRACTION_DIGITS */
{"grouping", "name", SUBST_FLAG_ID}, /**< LY_STMT_GROUPING */
{"identity", "name", SUBST_FLAG_ID}, /**< LY_STMT_IDENTITY */
{"if-feature", "name", SUBST_FLAG_ID}, /**< LY_STMT_IF_FEATURE */
{"import", "module", SUBST_FLAG_ID}, /**< LY_STMT_IMPORT */
{"include", "module", SUBST_FLAG_ID}, /**< LY_STMT_INCLUDE */
{"input", NULL, 0}, /**< LY_STMT_INPUT */
{"key", "value", SUBST_FLAG_ID}, /**< LY_STMT_KEY */
{"leaf", "name", SUBST_FLAG_ID}, /**< LY_STMT_LEAF */
{"leaf-list", "name", SUBST_FLAG_ID}, /**< LY_STMT_LEAF_LIST */
{"length", "value", SUBST_FLAG_ID}, /**< LY_STMT_LENGTH */
{"list", "name", SUBST_FLAG_ID}, /**< LY_STMT_LIST */
{"max-elements", "value", SUBST_FLAG_ID}, /**< LY_STMT_MAX_ELEMENTS */
{"min-elements", "value", SUBST_FLAG_ID}, /**< LY_STMT_MIN_ELEMENTS */
{"modifier", "value", SUBST_FLAG_ID}, /**< LY_STMT_MODIFIER */
{"module", "name", SUBST_FLAG_ID}, /**< LY_STMT_MODULE */
{"must", "condition", SUBST_FLAG_ID}, /**< LY_STMT_MUST */
{"namespace", "uri", SUBST_FLAG_ID}, /**< LY_STMT_NAMESPACE */
{"notification", "name", SUBST_FLAG_ID}, /**< LY_STMT_NOTIFICATION */
{"ordered-by", "value", SUBST_FLAG_ID}, /**< LY_STMT_ORDERED_BY */
{"organization", "text", SUBST_FLAG_YIN},/**< LY_STMT_ORGANIZATION */
{"output", NULL, 0}, /**< LY_STMT_OUTPUT */
{"path", "value", SUBST_FLAG_ID}, /**< LY_STMT_PATH */
{"pattern", "value", SUBST_FLAG_ID}, /**< LY_STMT_PATTERN */
{"position", "value", SUBST_FLAG_ID}, /**< LY_STMT_POSITION */
{"prefix", "value", SUBST_FLAG_ID}, /**< LY_STMT_PREFIX */
{"presence", "value", SUBST_FLAG_ID}, /**< LY_STMT_PRESENCE */
{"range", "value", SUBST_FLAG_ID}, /**< LY_STMT_RANGE */
{"reference", "text", SUBST_FLAG_YIN},/**< LY_STMT_REFERENCE */
{"refine", "target-node", SUBST_FLAG_ID}, /**< LY_STMT_REFINE */
{"require-instance", "value", SUBST_FLAG_ID}, /**< LY_STMT_REQUIRE_INSTANCE */
{"revision", "date", SUBST_FLAG_ID}, /**< LY_STMT_REVISION */
{"revision-date", "date", SUBST_FLAG_ID}, /**< LY_STMT_REVISION_DATE */
{"rpc", "name", SUBST_FLAG_ID}, /**< LY_STMT_RPC */
{"submodule", "name", SUBST_FLAG_ID}, /**< LY_STMT_SUBMODULE */
{"typedef", "name", SUBST_FLAG_ID}, /**< LY_STMT_TYPEDEF */
{"unique", "tag", SUBST_FLAG_ID}, /**< LY_STMT_UNIQUE */
{"uses", "name", SUBST_FLAG_ID}, /**< LY_STMT_USES */
{"value", "value", SUBST_FLAG_ID}, /**< LY_STMT_VALUE */
{"when", "condition", SUBST_FLAG_ID}, /**< LY_STMT_WHEN */
{"yang-version", "value", SUBST_FLAG_ID}, /**< LY_STMT_YANG_VERSION */
{"yin-element", "value", SUBST_FLAG_ID}, /**< LY_STMT_YIN_ELEMENT */
{NULL, NULL, 0}, /**< LY_STMT_EXTENSION_INSTANCE */
{NULL, NULL, 0}, /**< LY_STMT_SYNTAX_SEMICOLON */
{NULL, NULL, 0}, /**< LY_STMT_SYNTAX_LEFT_BRACE */
{NULL, NULL, 0}, /**< LY_STMT_SYNTAX_RIGHT_BRACE */
{NULL, NULL, 0}, /**< LY_STMT_ARG_TEXT */
{NULL, NULL, 0}, /**< LY_STMT_ARG_VALUE */
};
static void
yprp_stmt(struct ypr_ctx *ctx, struct lysp_stmt *stmt)
{
struct lysp_stmt *childstmt;
int flag = stmt->child ? 1 : -1;
/* TODO:
the extension instance substatements in extension instances (LY_STMT_EXTENSION_INSTANCE)
cannot find the compiled information, so it is needed to be done,
currently it is ignored */
if(stmt_attr_info[stmt->kw].name) {
if(stmt_attr_info[stmt->kw].flags & SUBST_FLAG_YIN) {
ypr_open(ctx, stmt->stmt, NULL, NULL, flag);
ypr_yin_arg(ctx, stmt_attr_info[stmt->kw].arg, stmt->arg);
}
else {
ypr_open(ctx, stmt->stmt, stmt_attr_info[stmt->kw].arg, stmt->arg, flag);
}
}
if (stmt->child) {
LEVEL++;
LY_LIST_FOR(stmt->child, childstmt) {
yprp_stmt(ctx, childstmt);
}
LEVEL--;
ypr_close(ctx, stmt->stmt, flag);
}
}
/**
* @param[in] count Number of extensions to print, 0 to print them all.
*/
static void
yprp_extension_instances(struct ypr_ctx *ctx, LYEXT_SUBSTMT substmt, uint8_t substmt_index,
struct lysp_ext_instance *ext, int *flag, LY_ARRAY_SIZE_TYPE count)
{
LY_ARRAY_SIZE_TYPE u;
char *str;
struct lysp_stmt *stmt;
const char *argument;
const char *ext_argument;
if (!count && ext) {
count = LY_ARRAY_SIZE(ext);
}
LY_ARRAY_FOR(ext, u) {
if (!count) {
break;
}
count--;
if (ext->insubstmt != substmt || ext->insubstmt_index != substmt_index) {
continue;
}
if (!ext->compiled && ext->yin) {
ly_print(ctx->out, "%*s<%s/> <!-- Model comes from different input format, extensions must be resolved first. -->\n", INDENT, ext[u].name);
continue;
}
ypr_close_parent(ctx, flag);
int inner_flag = 0;
argument = NULL;
ext_argument = NULL;
if (ext[u].compiled) {
argument = ext[u].compiled->argument;
ext_argument = ext[u].compiled->def->argument;
} else {
argument = ext[u].argument;
}
if (ext->yin) {
ypr_open(ctx, ext[u].name, NULL, NULL, 1);
if (asprintf(&str, "%s:%s", ext[u].compiled->def->module->prefix, ext_argument) == -1) {
LOGMEM(ctx->module->ctx);
ctx->out->status = LY_EMEM;
return;
}
LEVEL++;
inner_flag = 1;
ypr_yin_arg(ctx, str, argument);
free(str);
str = NULL;
LEVEL--;
} else {
ypr_open(ctx, ext[u].name, ext_argument, argument, inner_flag);
}
LEVEL++;
LY_LIST_FOR(ext[u].child, stmt) {
ypr_close_parent(ctx, &inner_flag);
yprp_stmt(ctx, stmt);
}
LEVEL--;
ypr_close(ctx, ext[u].name, inner_flag);
}
}
LY_ERR
yin_print_parsed(struct lyout *out, const struct lys_module *module)
{
unsigned int u;
struct lysp_node *data;
struct lysp_module *modp = module->parsed;
struct ypr_ctx ctx_ = {.out = out, .level = 0, .module = module}, *ctx = &ctx_;
ly_print(ctx->out, "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n");
ly_print(ctx->out, "%*s<module name=\"%s\"\n", INDENT, module->name);
ypr_xmlns(ctx, module, 8);
ly_print(ctx->out, ">\n");
LEVEL++;
if (!modp) {
ly_print(ctx->out, "%*s<!-- PARSED INFORMATION ARE NOT FULLY PRESENT -->\n", INDENT);
return ypr_missing_format(ctx, module);
}
/* module-header-stmts */
if (module->version) {
if (module->version) {
ypr_substmt(ctx, LYEXT_SUBSTMT_VERSION, 0, module->version == LYS_VERSION_1_1 ? "1.1" : "1", modp->exts);
}
}
ypr_substmt(ctx, LYEXT_SUBSTMT_NAMESPACE, 0, module->ns, modp->exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_PREFIX, 0, module->prefix, modp->exts);
/* linkage-stmts */
LY_ARRAY_FOR(modp->imports, u) {
ypr_open(ctx, "import", "module", modp->imports[u].module->name, 1);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, modp->imports[u].exts, NULL, 0);
ypr_substmt(ctx, LYEXT_SUBSTMT_PREFIX, 0, modp->imports[u].prefix, modp->imports[u].exts);
if (modp->imports[u].rev[0]) {
ypr_substmt(ctx, LYEXT_SUBSTMT_REVISIONDATE, 0, modp->imports[u].rev, modp->imports[u].exts);
}
ypr_substmt(ctx, LYEXT_SUBSTMT_DESCRIPTION, 0, modp->imports[u].dsc, modp->imports[u].exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_REFERENCE, 0, modp->imports[u].ref, modp->imports[u].exts);
LEVEL--;
ypr_close(ctx, "import", 1);
}
LY_ARRAY_FOR(modp->includes, u) {
if (modp->includes[u].rev[0] || modp->includes[u].dsc || modp->includes[u].ref || modp->includes[u].exts) {
ypr_open(ctx, "include", "module", modp->includes[u].submodule->name, 1);
LEVEL++;
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, modp->includes[u].exts, NULL, 0);
if (modp->includes[u].rev[0]) {
ypr_substmt(ctx, LYEXT_SUBSTMT_REVISIONDATE, 0, modp->includes[u].rev, modp->includes[u].exts);
}
ypr_substmt(ctx, LYEXT_SUBSTMT_DESCRIPTION, 0, modp->includes[u].dsc, modp->includes[u].exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_REFERENCE, 0, modp->includes[u].ref, modp->includes[u].exts);
LEVEL--;
ly_print(out, "%*s}\n", INDENT);
} else {
ypr_open(ctx, "include", "module", modp->includes[u].submodule->name, -1);
}
}
/* meta-stmts */
if (module->org || module->contact || module->dsc || module->ref) {
ly_print(out, "\n");
}
ypr_substmt(ctx, LYEXT_SUBSTMT_ORGANIZATION, 0, module->org, modp->exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_CONTACT, 0, module->contact, modp->exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_DESCRIPTION, 0, module->dsc, modp->exts);
ypr_substmt(ctx, LYEXT_SUBSTMT_REFERENCE, 0, module->ref, modp->exts);
/* revision-stmts */
if (modp->revs) {
ly_print(out, "\n");
}
LY_ARRAY_FOR(modp->revs, u) {
yprp_revision(ctx, &modp->revs[u]);
}
/* body-stmts */
LY_ARRAY_FOR(modp->extensions, u) {
ly_print(out, "\n");
yprp_extension(ctx, &modp->extensions[u]);
}
if (modp->exts) {
ly_print(out, "\n");
yprp_extension_instances(ctx, LYEXT_SUBSTMT_SELF, 0, module->parsed->exts, NULL, 0);
}
LY_ARRAY_FOR(modp->features, u) {
yprp_feature(ctx, &modp->features[u]);
}
LY_ARRAY_FOR(modp->identities, u) {
yprp_identity(ctx, &modp->identities[u]);
}
LY_ARRAY_FOR(modp->typedefs, u) {
yprp_typedef(ctx, &modp->typedefs[u]);
}
LY_ARRAY_FOR(modp->groupings, u) {
yprp_grouping(ctx, &modp->groupings[u]);
}
LY_LIST_FOR(modp->data, data) {
yprp_node(ctx, data);
}
LY_ARRAY_FOR(modp->augments, u) {
yprp_augment(ctx, &modp->augments[u]);
}
LY_ARRAY_FOR(modp->rpcs, u) {
yprp_action(ctx, &modp->rpcs[u]);
}
LY_ARRAY_FOR(modp->notifs, u) {
yprp_notification(ctx, &modp->notifs[u]);
}
LY_ARRAY_FOR(modp->deviations, u) {
yprp_deviation(ctx, &modp->deviations[u]);
}
LEVEL--;
ly_print(out, "%*s</module>\n", INDENT);
ly_print_flush(out);
return LY_SUCCESS;
}