2 * Copyright (C) 2018 NetDEF, Inc.
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the Free
7 * Software Foundation; either version 2 of the License, or (at your option)
10 * This program is distributed in the hope that it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
15 * You should have received a copy of the GNU General Public License along
16 * with this program; see the file COPYING; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
24 #include "lib_errors.h"
27 #include "northbound.h"
28 #include "northbound_cli.h"
29 #include "northbound_db.h"
31 DEFINE_MTYPE_STATIC(LIB
, NB_NODE
, "Northbound Node")
32 DEFINE_MTYPE_STATIC(LIB
, NB_CONFIG
, "Northbound Configuration")
34 /* Running configuration - shouldn't be modified directly. */
35 struct nb_config
*running_config
;
38 * Global lock used to prevent multiple configuration transactions from
39 * happening concurrently.
41 static bool transaction_in_progress
;
43 static int nb_configuration_callback(const enum nb_event event
,
44 struct nb_config_change
*change
);
45 static struct nb_transaction
*nb_transaction_new(struct nb_config
*config
,
46 struct nb_config_cbs
*changes
,
47 enum nb_client client
,
49 static void nb_transaction_free(struct nb_transaction
*transaction
);
50 static int nb_transaction_process(enum nb_event event
,
51 struct nb_transaction
*transaction
);
52 static void nb_transaction_apply_finish(struct nb_transaction
*transaction
);
53 static int nb_oper_data_iter_node(const struct lys_node
*snode
,
54 const char *xpath
, const void *list_entry
,
55 const struct yang_list_keys
*list_keys
,
56 struct yang_translator
*translator
,
57 bool first
, uint32_t flags
,
58 nb_oper_data_cb cb
, void *arg
);
60 static int nb_node_check_config_only(const struct lys_node
*snode
, void *arg
)
62 bool *config_only
= arg
;
64 if (CHECK_FLAG(snode
->flags
, LYS_CONFIG_R
)) {
66 return YANG_ITER_STOP
;
69 return YANG_ITER_CONTINUE
;
72 static int nb_node_new_cb(const struct lys_node
*snode
, void *arg
)
74 struct nb_node
*nb_node
;
75 struct lys_node
*sparent
, *sparent_list
;
77 nb_node
= XCALLOC(MTYPE_NB_NODE
, sizeof(*nb_node
));
78 yang_snode_get_path(snode
, YANG_PATH_DATA
, nb_node
->xpath
,
79 sizeof(nb_node
->xpath
));
80 nb_node
->priority
= NB_DFLT_PRIORITY
;
81 sparent
= yang_snode_real_parent(snode
);
83 nb_node
->parent
= sparent
->priv
;
84 sparent_list
= yang_snode_parent_list(snode
);
86 nb_node
->parent_list
= sparent_list
->priv
;
89 if (CHECK_FLAG(snode
->nodetype
, LYS_CONTAINER
| LYS_LIST
)) {
90 bool config_only
= true;
92 yang_snodes_iterate_subtree(snode
, nb_node_check_config_only
,
93 YANG_ITER_ALLOW_AUGMENTATIONS
,
96 SET_FLAG(nb_node
->flags
, F_NB_NODE_CONFIG_ONLY
);
98 if (CHECK_FLAG(snode
->nodetype
, LYS_LIST
)) {
99 struct lys_node_list
*slist
;
101 slist
= (struct lys_node_list
*)snode
;
102 if (slist
->keys_size
== 0)
103 SET_FLAG(nb_node
->flags
, F_NB_NODE_KEYLESS_LIST
);
107 * Link the northbound node and the libyang schema node with one
110 nb_node
->snode
= snode
;
111 lys_set_private(snode
, nb_node
);
113 return YANG_ITER_CONTINUE
;
116 static int nb_node_del_cb(const struct lys_node
*snode
, void *arg
)
118 struct nb_node
*nb_node
;
120 nb_node
= snode
->priv
;
121 lys_set_private(snode
, NULL
);
122 XFREE(MTYPE_NB_NODE
, nb_node
);
124 return YANG_ITER_CONTINUE
;
127 void nb_nodes_create(void)
129 yang_snodes_iterate_all(nb_node_new_cb
, 0, NULL
);
132 void nb_nodes_delete(void)
134 yang_snodes_iterate_all(nb_node_del_cb
, 0, NULL
);
137 struct nb_node
*nb_node_find(const char *xpath
)
139 const struct lys_node
*snode
;
142 * Use libyang to find the schema node associated to the xpath and get
143 * the northbound node from there (snode private pointer).
145 snode
= ly_ctx_get_node(ly_native_ctx
, NULL
, xpath
, 0);
152 static int nb_node_validate_cb(const struct nb_node
*nb_node
,
153 enum nb_operation operation
,
154 int callback_implemented
, bool optional
)
158 valid
= nb_operation_is_valid(operation
, nb_node
->snode
);
160 if (!valid
&& callback_implemented
)
161 flog_warn(EC_LIB_NB_CB_UNNEEDED
,
162 "unneeded '%s' callback for '%s'",
163 nb_operation_name(operation
), nb_node
->xpath
);
165 if (!optional
&& valid
&& !callback_implemented
) {
166 flog_err(EC_LIB_NB_CB_MISSING
, "missing '%s' callback for '%s'",
167 nb_operation_name(operation
), nb_node
->xpath
);
175 * Check if the required callbacks were implemented for the given northbound
178 static unsigned int nb_node_validate_cbs(const struct nb_node
*nb_node
)
181 unsigned int error
= 0;
183 error
+= nb_node_validate_cb(nb_node
, NB_OP_CREATE
,
184 !!nb_node
->cbs
.create
, false);
185 error
+= nb_node_validate_cb(nb_node
, NB_OP_MODIFY
,
186 !!nb_node
->cbs
.modify
, false);
187 error
+= nb_node_validate_cb(nb_node
, NB_OP_DESTROY
,
188 !!nb_node
->cbs
.destroy
, false);
189 error
+= nb_node_validate_cb(nb_node
, NB_OP_MOVE
, !!nb_node
->cbs
.move
,
191 error
+= nb_node_validate_cb(nb_node
, NB_OP_APPLY_FINISH
,
192 !!nb_node
->cbs
.apply_finish
, true);
193 error
+= nb_node_validate_cb(nb_node
, NB_OP_GET_ELEM
,
194 !!nb_node
->cbs
.get_elem
, false);
195 error
+= nb_node_validate_cb(nb_node
, NB_OP_GET_NEXT
,
196 !!nb_node
->cbs
.get_next
, false);
197 error
+= nb_node_validate_cb(nb_node
, NB_OP_GET_KEYS
,
198 !!nb_node
->cbs
.get_keys
, false);
199 error
+= nb_node_validate_cb(nb_node
, NB_OP_LOOKUP_ENTRY
,
200 !!nb_node
->cbs
.lookup_entry
, false);
201 error
+= nb_node_validate_cb(nb_node
, NB_OP_RPC
, !!nb_node
->cbs
.rpc
,
207 static unsigned int nb_node_validate_priority(const struct nb_node
*nb_node
)
209 /* Top-level nodes can have any priority. */
210 if (!nb_node
->parent
)
213 if (nb_node
->priority
< nb_node
->parent
->priority
) {
214 flog_err(EC_LIB_NB_CB_INVALID_PRIO
,
215 "node has higher priority than its parent [xpath %s]",
223 static int nb_node_validate(const struct lys_node
*snode
, void *arg
)
225 struct nb_node
*nb_node
= snode
->priv
;
226 unsigned int *errors
= arg
;
228 /* Validate callbacks and priority. */
229 *errors
+= nb_node_validate_cbs(nb_node
);
230 *errors
+= nb_node_validate_priority(nb_node
);
232 return YANG_ITER_CONTINUE
;
235 struct nb_config
*nb_config_new(struct lyd_node
*dnode
)
237 struct nb_config
*config
;
239 config
= XCALLOC(MTYPE_NB_CONFIG
, sizeof(*config
));
241 config
->dnode
= dnode
;
243 config
->dnode
= yang_dnode_new(ly_native_ctx
, true);
249 void nb_config_free(struct nb_config
*config
)
252 yang_dnode_free(config
->dnode
);
253 XFREE(MTYPE_NB_CONFIG
, config
);
256 struct nb_config
*nb_config_dup(const struct nb_config
*config
)
258 struct nb_config
*dup
;
260 dup
= XCALLOC(MTYPE_NB_CONFIG
, sizeof(*dup
));
261 dup
->dnode
= yang_dnode_dup(config
->dnode
);
262 dup
->version
= config
->version
;
267 int nb_config_merge(struct nb_config
*config_dst
, struct nb_config
*config_src
,
268 bool preserve_source
)
272 ret
= lyd_merge(config_dst
->dnode
, config_src
->dnode
, LYD_OPT_EXPLICIT
);
274 flog_warn(EC_LIB_LIBYANG
, "%s: lyd_merge() failed", __func__
);
276 if (!preserve_source
)
277 nb_config_free(config_src
);
279 return (ret
== 0) ? NB_OK
: NB_ERR
;
282 void nb_config_replace(struct nb_config
*config_dst
,
283 struct nb_config
*config_src
, bool preserve_source
)
285 /* Update version. */
286 if (config_src
->version
!= 0)
287 config_dst
->version
= config_src
->version
;
290 if (config_dst
->dnode
)
291 yang_dnode_free(config_dst
->dnode
);
292 if (preserve_source
) {
293 config_dst
->dnode
= yang_dnode_dup(config_src
->dnode
);
295 config_dst
->dnode
= config_src
->dnode
;
296 config_src
->dnode
= NULL
;
297 nb_config_free(config_src
);
301 /* Generate the nb_config_cbs tree. */
302 static inline int nb_config_cb_compare(const struct nb_config_cb
*a
,
303 const struct nb_config_cb
*b
)
305 /* Sort by priority first. */
306 if (a
->nb_node
->priority
< b
->nb_node
->priority
)
308 if (a
->nb_node
->priority
> b
->nb_node
->priority
)
312 * Use XPath as a tie-breaker. This will naturally sort parent nodes
313 * before their children.
315 return strcmp(a
->xpath
, b
->xpath
);
317 RB_GENERATE(nb_config_cbs
, nb_config_cb
, entry
, nb_config_cb_compare
);
319 static void nb_config_diff_add_change(struct nb_config_cbs
*changes
,
320 enum nb_operation operation
,
321 const struct lyd_node
*dnode
)
323 struct nb_config_change
*change
;
325 change
= XCALLOC(MTYPE_TMP
, sizeof(*change
));
326 change
->cb
.operation
= operation
;
327 change
->cb
.nb_node
= dnode
->schema
->priv
;
328 yang_dnode_get_path(dnode
, change
->cb
.xpath
, sizeof(change
->cb
.xpath
));
329 change
->cb
.dnode
= dnode
;
331 RB_INSERT(nb_config_cbs
, changes
, &change
->cb
);
334 static void nb_config_diff_del_changes(struct nb_config_cbs
*changes
)
336 while (!RB_EMPTY(nb_config_cbs
, changes
)) {
337 struct nb_config_change
*change
;
339 change
= (struct nb_config_change
*)RB_ROOT(nb_config_cbs
,
341 RB_REMOVE(nb_config_cbs
, changes
, &change
->cb
);
342 XFREE(MTYPE_TMP
, change
);
347 * Helper function used when calculating the delta between two different
348 * configurations. Given a new subtree, calculate all new YANG data nodes,
349 * excluding default leafs and leaf-lists. This is a recursive function.
351 static void nb_config_diff_created(const struct lyd_node
*dnode
,
352 struct nb_config_cbs
*changes
)
354 enum nb_operation operation
;
355 struct lyd_node
*child
;
357 switch (dnode
->schema
->nodetype
) {
360 if (lyd_wd_default((struct lyd_node_leaf_list
*)dnode
))
363 if (nb_operation_is_valid(NB_OP_CREATE
, dnode
->schema
))
364 operation
= NB_OP_CREATE
;
365 else if (nb_operation_is_valid(NB_OP_MODIFY
, dnode
->schema
))
366 operation
= NB_OP_MODIFY
;
370 nb_config_diff_add_change(changes
, operation
, dnode
);
374 if (nb_operation_is_valid(NB_OP_CREATE
, dnode
->schema
))
375 nb_config_diff_add_change(changes
, NB_OP_CREATE
, dnode
);
377 /* Process child nodes recursively. */
378 LY_TREE_FOR (dnode
->child
, child
) {
379 nb_config_diff_created(child
, changes
);
387 /* Calculate the delta between two different configurations. */
388 static void nb_config_diff(const struct nb_config
*config1
,
389 const struct nb_config
*config2
,
390 struct nb_config_cbs
*changes
)
392 struct lyd_difflist
*diff
;
394 diff
= lyd_diff(config1
->dnode
, config2
->dnode
,
395 LYD_DIFFOPT_WITHDEFAULTS
);
398 for (int i
= 0; diff
->type
[i
] != LYD_DIFF_END
; i
++) {
400 struct lyd_node
*dnode
;
402 type
= diff
->type
[i
];
405 case LYD_DIFF_CREATED
:
406 dnode
= diff
->second
[i
];
407 nb_config_diff_created(dnode
, changes
);
409 case LYD_DIFF_DELETED
:
410 dnode
= diff
->first
[i
];
411 nb_config_diff_add_change(changes
, NB_OP_DESTROY
,
414 case LYD_DIFF_CHANGED
:
415 dnode
= diff
->second
[i
];
416 nb_config_diff_add_change(changes
, NB_OP_MODIFY
, dnode
);
418 case LYD_DIFF_MOVEDAFTER1
:
419 case LYD_DIFF_MOVEDAFTER2
:
428 int nb_candidate_edit(struct nb_config
*candidate
,
429 const struct nb_node
*nb_node
,
430 enum nb_operation operation
, const char *xpath
,
431 const struct yang_data
*previous
,
432 const struct yang_data
*data
)
434 struct lyd_node
*dnode
;
435 char xpath_edit
[XPATH_MAXLEN
];
437 if (!nb_operation_is_valid(operation
, nb_node
->snode
)) {
438 flog_warn(EC_LIB_NB_CANDIDATE_EDIT_ERROR
,
439 "%s: %s operation not valid for %s", __func__
,
440 nb_operation_name(operation
), xpath
);
444 /* Use special notation for leaf-lists (RFC 6020, section 9.13.5). */
445 if (nb_node
->snode
->nodetype
== LYS_LEAFLIST
)
446 snprintf(xpath_edit
, sizeof(xpath_edit
), "%s[.='%s']", xpath
,
449 strlcpy(xpath_edit
, xpath
, sizeof(xpath_edit
));
455 dnode
= lyd_new_path(candidate
->dnode
, ly_native_ctx
,
456 xpath_edit
, (void *)data
->value
, 0,
457 LYD_PATH_OPT_UPDATE
);
458 if (!dnode
&& ly_errno
) {
459 flog_warn(EC_LIB_LIBYANG
, "%s: lyd_new_path() failed",
465 * If a new node was created, call lyd_validate() only to create
466 * default child nodes.
469 lyd_schema_sort(dnode
, 0);
470 lyd_validate(&dnode
, LYD_OPT_CONFIG
, ly_native_ctx
);
474 dnode
= yang_dnode_get(candidate
->dnode
, xpath_edit
);
477 * Return a special error code so the caller can choose
478 * whether to ignore it or not.
480 return NB_ERR_NOT_FOUND
;
484 /* TODO: update configuration. */
487 flog_warn(EC_LIB_DEVELOPMENT
,
488 "%s: unknown operation (%u) [xpath %s]", __func__
,
489 operation
, xpath_edit
);
496 bool nb_candidate_needs_update(const struct nb_config
*candidate
)
498 if (candidate
->version
< running_config
->version
)
504 int nb_candidate_update(struct nb_config
*candidate
)
506 struct nb_config
*updated_config
;
508 updated_config
= nb_config_dup(running_config
);
509 if (nb_config_merge(updated_config
, candidate
, true) != NB_OK
)
512 nb_config_replace(candidate
, updated_config
, false);
518 * The northbound configuration callbacks use the 'priv' pointer present in the
519 * libyang lyd_node structure to store pointers to FRR internal variables
520 * associated to YANG lists and presence containers. Before commiting a
521 * candidate configuration, we must restore the 'priv' pointers stored in the
522 * running configuration since they might be lost while editing the candidate.
524 static void nb_candidate_restore_priv_pointers(struct nb_config
*candidate
)
526 struct lyd_node
*root
, *next
, *dnode_iter
;
528 LY_TREE_FOR (running_config
->dnode
, root
) {
529 LY_TREE_DFS_BEGIN (root
, next
, dnode_iter
) {
530 struct lyd_node
*dnode_candidate
;
531 char xpath
[XPATH_MAXLEN
];
533 if (!dnode_iter
->priv
)
536 yang_dnode_get_path(dnode_iter
, xpath
, sizeof(xpath
));
538 yang_dnode_get(candidate
->dnode
, xpath
);
540 yang_dnode_set_entry(dnode_candidate
,
544 LY_TREE_DFS_END(root
, next
, dnode_iter
);
550 * Perform YANG syntactic and semantic validation.
552 * WARNING: lyd_validate() can change the configuration as part of the
553 * validation process.
555 static int nb_candidate_validate_yang(struct nb_config
*candidate
)
557 if (lyd_validate(&candidate
->dnode
, LYD_OPT_STRICT
| LYD_OPT_CONFIG
,
560 return NB_ERR_VALIDATION
;
565 /* Perform code-level validation using the northbound callbacks. */
566 static int nb_candidate_validate_changes(struct nb_config
*candidate
,
567 struct nb_config_cbs
*changes
)
569 struct nb_config_cb
*cb
;
571 nb_candidate_restore_priv_pointers(candidate
);
572 RB_FOREACH (cb
, nb_config_cbs
, changes
) {
573 struct nb_config_change
*change
= (struct nb_config_change
*)cb
;
576 ret
= nb_configuration_callback(NB_EV_VALIDATE
, change
);
578 return NB_ERR_VALIDATION
;
584 int nb_candidate_validate(struct nb_config
*candidate
)
586 struct nb_config_cbs changes
;
589 if (nb_candidate_validate_yang(candidate
) != NB_OK
)
590 return NB_ERR_VALIDATION
;
592 RB_INIT(nb_config_cbs
, &changes
);
593 nb_config_diff(running_config
, candidate
, &changes
);
594 ret
= nb_candidate_validate_changes(candidate
, &changes
);
595 nb_config_diff_del_changes(&changes
);
600 int nb_candidate_commit_prepare(struct nb_config
*candidate
,
601 enum nb_client client
, const char *comment
,
602 struct nb_transaction
**transaction
)
604 struct nb_config_cbs changes
;
606 if (nb_candidate_validate_yang(candidate
) != NB_OK
) {
607 flog_warn(EC_LIB_NB_CANDIDATE_INVALID
,
608 "%s: failed to validate candidate configuration",
610 return NB_ERR_VALIDATION
;
613 RB_INIT(nb_config_cbs
, &changes
);
614 nb_config_diff(running_config
, candidate
, &changes
);
615 if (RB_EMPTY(nb_config_cbs
, &changes
))
616 return NB_ERR_NO_CHANGES
;
618 if (nb_candidate_validate_changes(candidate
, &changes
) != NB_OK
) {
619 flog_warn(EC_LIB_NB_CANDIDATE_INVALID
,
620 "%s: failed to validate candidate configuration",
622 nb_config_diff_del_changes(&changes
);
623 return NB_ERR_VALIDATION
;
626 *transaction
= nb_transaction_new(candidate
, &changes
, client
, comment
);
627 if (*transaction
== NULL
) {
628 flog_warn(EC_LIB_NB_TRANSACTION_CREATION_FAILED
,
629 "%s: failed to create transaction", __func__
);
630 nb_config_diff_del_changes(&changes
);
631 return NB_ERR_LOCKED
;
634 return nb_transaction_process(NB_EV_PREPARE
, *transaction
);
637 void nb_candidate_commit_abort(struct nb_transaction
*transaction
)
639 (void)nb_transaction_process(NB_EV_ABORT
, transaction
);
640 nb_transaction_free(transaction
);
643 void nb_candidate_commit_apply(struct nb_transaction
*transaction
,
644 bool save_transaction
, uint32_t *transaction_id
)
646 (void)nb_transaction_process(NB_EV_APPLY
, transaction
);
647 nb_transaction_apply_finish(transaction
);
649 /* Replace running by candidate. */
650 transaction
->config
->version
++;
651 nb_config_replace(running_config
, transaction
->config
, true);
653 /* Record transaction. */
655 && nb_db_transaction_save(transaction
, transaction_id
) != NB_OK
)
656 flog_warn(EC_LIB_NB_TRANSACTION_RECORD_FAILED
,
657 "%s: failed to record transaction", __func__
);
659 nb_transaction_free(transaction
);
662 int nb_candidate_commit(struct nb_config
*candidate
, enum nb_client client
,
663 bool save_transaction
, const char *comment
,
664 uint32_t *transaction_id
)
666 struct nb_transaction
*transaction
= NULL
;
669 ret
= nb_candidate_commit_prepare(candidate
, client
, comment
,
672 * Apply the changes if the preparation phase succeeded. Otherwise abort
676 nb_candidate_commit_apply(transaction
, save_transaction
,
678 else if (transaction
!= NULL
)
679 nb_candidate_commit_abort(transaction
);
684 static void nb_log_callback(const enum nb_event event
,
685 enum nb_operation operation
, const char *xpath
,
689 "northbound callback: event [%s] op [%s] xpath [%s] value [%s]",
690 nb_event_name(event
), nb_operation_name(operation
), xpath
,
695 * Call the northbound configuration callback associated to a given
696 * configuration change.
698 static int nb_configuration_callback(const enum nb_event event
,
699 struct nb_config_change
*change
)
701 enum nb_operation operation
= change
->cb
.operation
;
702 const char *xpath
= change
->cb
.xpath
;
703 const struct nb_node
*nb_node
= change
->cb
.nb_node
;
704 const struct lyd_node
*dnode
= change
->cb
.dnode
;
705 union nb_resource
*resource
;
708 if (debug_northbound
) {
709 const char *value
= "(none)";
711 if (dnode
&& !yang_snode_is_typeless_data(dnode
->schema
))
712 value
= yang_dnode_get_string(dnode
, NULL
);
714 nb_log_callback(event
, operation
, xpath
, value
);
717 if (event
== NB_EV_VALIDATE
)
720 resource
= &change
->resource
;
724 ret
= (*nb_node
->cbs
.create
)(event
, dnode
, resource
);
727 ret
= (*nb_node
->cbs
.modify
)(event
, dnode
, resource
);
730 ret
= (*nb_node
->cbs
.destroy
)(event
, dnode
);
733 ret
= (*nb_node
->cbs
.move
)(event
, dnode
);
740 enum lib_log_refs ref
= 0;
744 ref
= EC_LIB_NB_CB_CONFIG_VALIDATE
;
747 ref
= EC_LIB_NB_CB_CONFIG_PREPARE
;
750 ref
= EC_LIB_NB_CB_CONFIG_ABORT
;
753 ref
= EC_LIB_NB_CB_CONFIG_APPLY
;
756 if (event
== NB_EV_VALIDATE
|| event
== NB_EV_PREPARE
)
759 "%s: error processing configuration change: error [%s] event [%s] operation [%s] xpath [%s]",
760 __func__
, nb_err_name(ret
),
761 nb_event_name(event
),
762 nb_operation_name(operation
), xpath
);
766 "%s: error processing configuration change: error [%s] event [%s] operation [%s] xpath [%s]",
767 __func__
, nb_err_name(ret
),
768 nb_event_name(event
),
769 nb_operation_name(operation
), xpath
);
775 static struct nb_transaction
*nb_transaction_new(struct nb_config
*config
,
776 struct nb_config_cbs
*changes
,
777 enum nb_client client
,
780 struct nb_transaction
*transaction
;
782 if (transaction_in_progress
) {
784 EC_LIB_NB_TRANSACTION_CREATION_FAILED
,
785 "%s: error - there's already another transaction in progress",
789 transaction_in_progress
= true;
791 transaction
= XCALLOC(MTYPE_TMP
, sizeof(*transaction
));
792 transaction
->client
= client
;
794 strlcpy(transaction
->comment
, comment
,
795 sizeof(transaction
->comment
));
796 transaction
->config
= config
;
797 transaction
->changes
= *changes
;
802 static void nb_transaction_free(struct nb_transaction
*transaction
)
804 nb_config_diff_del_changes(&transaction
->changes
);
805 XFREE(MTYPE_TMP
, transaction
);
806 transaction_in_progress
= false;
809 /* Process all configuration changes associated to a transaction. */
810 static int nb_transaction_process(enum nb_event event
,
811 struct nb_transaction
*transaction
)
813 struct nb_config_cb
*cb
;
815 RB_FOREACH (cb
, nb_config_cbs
, &transaction
->changes
) {
816 struct nb_config_change
*change
= (struct nb_config_change
*)cb
;
820 * Only try to release resources that were allocated
823 if (event
== NB_EV_ABORT
&& change
->prepare_ok
== false)
826 /* Call the appropriate callback. */
827 ret
= nb_configuration_callback(event
, change
);
832 change
->prepare_ok
= true;
837 * At this point it's not possible to reject the
838 * transaction anymore, so any failure here can lead to
839 * inconsistencies and should be treated as a bug.
840 * Operations prone to errors, like validations and
841 * resource allocations, should be performed during the
853 static struct nb_config_cb
*
854 nb_apply_finish_cb_new(struct nb_config_cbs
*cbs
, const char *xpath
,
855 const struct nb_node
*nb_node
,
856 const struct lyd_node
*dnode
)
858 struct nb_config_cb
*cb
;
860 cb
= XCALLOC(MTYPE_TMP
, sizeof(*cb
));
861 strlcpy(cb
->xpath
, xpath
, sizeof(cb
->xpath
));
862 cb
->nb_node
= nb_node
;
864 RB_INSERT(nb_config_cbs
, cbs
, cb
);
869 static struct nb_config_cb
*
870 nb_apply_finish_cb_find(struct nb_config_cbs
*cbs
, const char *xpath
,
871 const struct nb_node
*nb_node
)
873 struct nb_config_cb s
;
875 strlcpy(s
.xpath
, xpath
, sizeof(s
.xpath
));
877 return RB_FIND(nb_config_cbs
, cbs
, &s
);
880 /* Call the 'apply_finish' callbacks. */
881 static void nb_transaction_apply_finish(struct nb_transaction
*transaction
)
883 struct nb_config_cbs cbs
;
884 struct nb_config_cb
*cb
;
886 /* Initialize tree of 'apply_finish' callbacks. */
887 RB_INIT(nb_config_cbs
, &cbs
);
889 /* Identify the 'apply_finish' callbacks that need to be called. */
890 RB_FOREACH (cb
, nb_config_cbs
, &transaction
->changes
) {
891 struct nb_config_change
*change
= (struct nb_config_change
*)cb
;
892 const struct lyd_node
*dnode
= change
->cb
.dnode
;
895 * Iterate up to the root of the data tree. When a node is being
896 * deleted, skip its 'apply_finish' callback if one is defined
897 * (the 'apply_finish' callbacks from the node ancestors should
900 if (change
->cb
.operation
== NB_OP_DESTROY
) {
901 char xpath
[XPATH_MAXLEN
];
903 dnode
= dnode
->parent
;
908 * The dnode from 'delete' callbacks point to elements
909 * from the running configuration. Use yang_dnode_get()
910 * to get the corresponding dnode from the candidate
911 * configuration that is being committed.
913 yang_dnode_get_path(dnode
, xpath
, sizeof(xpath
));
914 dnode
= yang_dnode_get(transaction
->config
->dnode
,
918 char xpath
[XPATH_MAXLEN
];
919 struct nb_node
*nb_node
;
921 nb_node
= dnode
->schema
->priv
;
922 if (!nb_node
->cbs
.apply_finish
)
926 * Don't call the callback more than once for the same
929 yang_dnode_get_path(dnode
, xpath
, sizeof(xpath
));
930 if (nb_apply_finish_cb_find(&cbs
, xpath
, nb_node
))
933 nb_apply_finish_cb_new(&cbs
, xpath
, nb_node
, dnode
);
936 dnode
= dnode
->parent
;
940 /* Call the 'apply_finish' callbacks, sorted by their priorities. */
941 RB_FOREACH (cb
, nb_config_cbs
, &cbs
) {
942 if (debug_northbound
)
943 nb_log_callback(NB_EV_APPLY
, NB_OP_APPLY_FINISH
,
946 (*cb
->nb_node
->cbs
.apply_finish
)(cb
->dnode
);
949 /* Release memory. */
950 while (!RB_EMPTY(nb_config_cbs
, &cbs
)) {
951 cb
= RB_ROOT(nb_config_cbs
, &cbs
);
952 RB_REMOVE(nb_config_cbs
, &cbs
, cb
);
953 XFREE(MTYPE_TMP
, cb
);
957 static int nb_oper_data_iter_children(const struct lys_node
*snode
,
958 const char *xpath
, const void *list_entry
,
959 const struct yang_list_keys
*list_keys
,
960 struct yang_translator
*translator
,
961 bool first
, uint32_t flags
,
962 nb_oper_data_cb cb
, void *arg
)
964 struct lys_node
*child
;
966 LY_TREE_FOR (snode
->child
, child
) {
969 ret
= nb_oper_data_iter_node(child
, xpath
, list_entry
,
970 list_keys
, translator
, false,
979 static int nb_oper_data_iter_leaf(const struct nb_node
*nb_node
,
980 const char *xpath
, const void *list_entry
,
981 const struct yang_list_keys
*list_keys
,
982 struct yang_translator
*translator
,
983 uint32_t flags
, nb_oper_data_cb cb
, void *arg
)
985 struct yang_data
*data
;
987 if (CHECK_FLAG(nb_node
->snode
->flags
, LYS_CONFIG_W
))
990 /* Ignore list keys. */
991 if (lys_is_key((struct lys_node_leaf
*)nb_node
->snode
, NULL
))
994 data
= nb_node
->cbs
.get_elem(xpath
, list_entry
);
996 /* Leaf of type "empty" is not present. */
999 return (*cb
)(nb_node
->snode
, translator
, data
, arg
);
1002 static int nb_oper_data_iter_container(const struct nb_node
*nb_node
,
1004 const void *list_entry
,
1005 const struct yang_list_keys
*list_keys
,
1006 struct yang_translator
*translator
,
1007 uint32_t flags
, nb_oper_data_cb cb
,
1010 if (CHECK_FLAG(nb_node
->flags
, F_NB_NODE_CONFIG_ONLY
))
1013 /* Presence containers. */
1014 if (nb_node
->cbs
.get_elem
) {
1015 struct yang_data
*data
;
1018 data
= nb_node
->cbs
.get_elem(xpath
, list_entry
);
1020 /* Presence container is not present. */
1023 ret
= (*cb
)(nb_node
->snode
, translator
, data
, arg
);
1028 /* Iterate over the child nodes. */
1029 return nb_oper_data_iter_children(nb_node
->snode
, xpath
, list_entry
,
1030 list_keys
, translator
, false, flags
,
1035 nb_oper_data_iter_leaflist(const struct nb_node
*nb_node
, const char *xpath
,
1036 const void *parent_list_entry
,
1037 const struct yang_list_keys
*parent_list_keys
,
1038 struct yang_translator
*translator
, uint32_t flags
,
1039 nb_oper_data_cb cb
, void *arg
)
1041 const void *list_entry
= NULL
;
1043 if (CHECK_FLAG(nb_node
->snode
->flags
, LYS_CONFIG_W
))
1047 struct yang_data
*data
;
1051 nb_node
->cbs
.get_next(parent_list_entry
, list_entry
);
1053 /* End of the list. */
1056 data
= nb_node
->cbs
.get_elem(xpath
, list_entry
);
1060 ret
= (*cb
)(nb_node
->snode
, translator
, data
, arg
);
1063 } while (list_entry
);
1068 static int nb_oper_data_iter_list(const struct nb_node
*nb_node
,
1069 const char *xpath_list
,
1070 const void *parent_list_entry
,
1071 const struct yang_list_keys
*parent_list_keys
,
1072 struct yang_translator
*translator
,
1073 uint32_t flags
, nb_oper_data_cb cb
, void *arg
)
1075 struct lys_node_list
*slist
= (struct lys_node_list
*)nb_node
->snode
;
1076 const void *list_entry
= NULL
;
1077 uint32_t position
= 1;
1079 if (CHECK_FLAG(nb_node
->flags
, F_NB_NODE_CONFIG_ONLY
))
1082 /* Iterate over all list entries. */
1084 struct yang_list_keys list_keys
;
1085 char xpath
[XPATH_MAXLEN
* 2];
1088 /* Obtain list entry. */
1090 nb_node
->cbs
.get_next(parent_list_entry
, list_entry
);
1092 /* End of the list. */
1095 if (!CHECK_FLAG(nb_node
->flags
, F_NB_NODE_KEYLESS_LIST
)) {
1096 /* Obtain the list entry keys. */
1097 if (nb_node
->cbs
.get_keys(list_entry
, &list_keys
)
1099 flog_warn(EC_LIB_NB_CB_STATE
,
1100 "%s: failed to get list keys",
1105 /* Build XPath of the list entry. */
1106 strlcpy(xpath
, xpath_list
, sizeof(xpath
));
1107 for (unsigned int i
= 0; i
< list_keys
.num
; i
++) {
1108 snprintf(xpath
+ strlen(xpath
),
1109 sizeof(xpath
) - strlen(xpath
),
1110 "[%s='%s']", slist
->keys
[i
]->name
,
1115 * Keyless list - build XPath using a positional index.
1117 snprintf(xpath
, sizeof(xpath
), "%s[%u]", xpath_list
,
1122 /* Iterate over the child nodes. */
1123 ret
= nb_oper_data_iter_children(
1124 nb_node
->snode
, xpath
, list_entry
, &list_keys
,
1125 translator
, false, flags
, cb
, arg
);
1128 } while (list_entry
);
1133 static int nb_oper_data_iter_node(const struct lys_node
*snode
,
1134 const char *xpath_parent
,
1135 const void *list_entry
,
1136 const struct yang_list_keys
*list_keys
,
1137 struct yang_translator
*translator
,
1138 bool first
, uint32_t flags
,
1139 nb_oper_data_cb cb
, void *arg
)
1141 struct nb_node
*nb_node
;
1142 char xpath
[XPATH_MAXLEN
];
1145 if (!first
&& CHECK_FLAG(flags
, NB_OPER_DATA_ITER_NORECURSE
)
1146 && CHECK_FLAG(snode
->nodetype
, LYS_CONTAINER
| LYS_LIST
))
1150 strlcpy(xpath
, xpath_parent
, sizeof(xpath
));
1151 if (!first
&& snode
->nodetype
!= LYS_USES
)
1152 snprintf(xpath
+ strlen(xpath
), sizeof(xpath
) - strlen(xpath
),
1153 "/%s", snode
->name
);
1155 nb_node
= snode
->priv
;
1156 switch (snode
->nodetype
) {
1158 ret
= nb_oper_data_iter_container(nb_node
, xpath
, list_entry
,
1159 list_keys
, translator
, flags
,
1163 ret
= nb_oper_data_iter_leaf(nb_node
, xpath
, list_entry
,
1164 list_keys
, translator
, flags
, cb
,
1168 ret
= nb_oper_data_iter_leaflist(nb_node
, xpath
, list_entry
,
1169 list_keys
, translator
, flags
,
1173 ret
= nb_oper_data_iter_list(nb_node
, xpath
, list_entry
,
1174 list_keys
, translator
, flags
, cb
,
1178 ret
= nb_oper_data_iter_children(snode
, xpath
, list_entry
,
1179 list_keys
, translator
, false,
1189 int nb_oper_data_iterate(const char *xpath
, struct yang_translator
*translator
,
1190 uint32_t flags
, nb_oper_data_cb cb
, void *arg
)
1192 struct nb_node
*nb_node
;
1193 const void *list_entry
= NULL
;
1194 struct yang_list_keys list_keys
;
1195 struct list
*list_dnodes
;
1196 struct lyd_node
*dnode
, *dn
;
1197 struct listnode
*ln
;
1200 nb_node
= nb_node_find(xpath
);
1202 flog_warn(EC_LIB_YANG_UNKNOWN_DATA_PATH
,
1203 "%s: unknown data path: %s", __func__
, xpath
);
1207 /* For now this function works only with containers and lists. */
1208 if (!CHECK_FLAG(nb_node
->snode
->nodetype
, LYS_CONTAINER
| LYS_LIST
)) {
1210 EC_LIB_NB_OPERATIONAL_DATA
,
1211 "%s: can't iterate over YANG leaf or leaf-list [xpath %s]",
1217 * Create a data tree from the XPath so that we can parse the keys of
1218 * all YANG lists (if any).
1221 dnode
= lyd_new_path(NULL
, ly_native_ctx
, xpath
, NULL
, 0,
1222 LYD_PATH_OPT_UPDATE
);
1223 if (!dnode
&& ly_errno
) {
1224 flog_warn(EC_LIB_LIBYANG
, "%s: lyd_new_path() failed",
1229 * We can remove the following two lines once we depend on
1230 * libyang-v0.16-r2, which has the LYD_PATH_OPT_NOPARENTRET flag for
1233 dnode
= yang_dnode_get(dnode
, xpath
);
1237 * Create a linked list to sort the data nodes starting from the root.
1239 list_dnodes
= list_new();
1240 for (dn
= dnode
; dn
; dn
= dn
->parent
) {
1241 if (dn
->schema
->nodetype
!= LYS_LIST
|| !dn
->child
)
1243 listnode_add_head(list_dnodes
, dn
);
1246 * Use the northbound callbacks to find list entry pointer corresponding
1247 * to the given XPath.
1249 for (ALL_LIST_ELEMENTS_RO(list_dnodes
, ln
, dn
)) {
1250 struct lyd_node
*child
;
1254 /* Obtain the list entry keys. */
1255 memset(&list_keys
, 0, sizeof(list_keys
));
1256 LY_TREE_FOR (dn
->child
, child
) {
1257 if (!lys_is_key((struct lys_node_leaf
*)child
->schema
,
1260 strlcpy(list_keys
.key
[n
],
1261 yang_dnode_get_string(child
, NULL
),
1262 sizeof(list_keys
.key
[n
]));
1267 != ((struct lys_node_list
*)dn
->schema
)->keys_size
) {
1268 list_delete(&list_dnodes
);
1269 yang_dnode_free(dnode
);
1270 return NB_ERR_NOT_FOUND
;
1273 /* Find the list entry pointer. */
1274 nn
= dn
->schema
->priv
;
1275 list_entry
= nn
->cbs
.lookup_entry(list_entry
, &list_keys
);
1276 if (list_entry
== NULL
) {
1277 list_delete(&list_dnodes
);
1278 yang_dnode_free(dnode
);
1279 return NB_ERR_NOT_FOUND
;
1283 /* If a list entry was given, iterate over that list entry only. */
1284 if (dnode
->schema
->nodetype
== LYS_LIST
&& dnode
->child
)
1285 ret
= nb_oper_data_iter_children(
1286 nb_node
->snode
, xpath
, list_entry
, &list_keys
,
1287 translator
, true, flags
, cb
, arg
);
1289 ret
= nb_oper_data_iter_node(nb_node
->snode
, xpath
, list_entry
,
1290 &list_keys
, translator
, true,
1293 list_delete(&list_dnodes
);
1294 yang_dnode_free(dnode
);
1299 bool nb_operation_is_valid(enum nb_operation operation
,
1300 const struct lys_node
*snode
)
1302 struct nb_node
*nb_node
= snode
->priv
;
1303 struct lys_node_container
*scontainer
;
1304 struct lys_node_leaf
*sleaf
;
1306 switch (operation
) {
1308 if (!CHECK_FLAG(snode
->flags
, LYS_CONFIG_W
))
1311 switch (snode
->nodetype
) {
1313 sleaf
= (struct lys_node_leaf
*)snode
;
1314 if (sleaf
->type
.base
!= LY_TYPE_EMPTY
)
1318 scontainer
= (struct lys_node_container
*)snode
;
1319 if (!scontainer
->presence
)
1330 if (!CHECK_FLAG(snode
->flags
, LYS_CONFIG_W
))
1333 switch (snode
->nodetype
) {
1335 sleaf
= (struct lys_node_leaf
*)snode
;
1336 if (sleaf
->type
.base
== LY_TYPE_EMPTY
)
1339 /* List keys can't be modified. */
1340 if (lys_is_key(sleaf
, NULL
))
1348 if (!CHECK_FLAG(snode
->flags
, LYS_CONFIG_W
))
1351 switch (snode
->nodetype
) {
1353 sleaf
= (struct lys_node_leaf
*)snode
;
1355 /* List keys can't be deleted. */
1356 if (lys_is_key(sleaf
, NULL
))
1360 * Only optional leafs can be deleted, or leafs whose
1361 * parent is a case statement.
1363 if (snode
->parent
->nodetype
== LYS_CASE
)
1367 if (CHECK_FLAG(sleaf
->flags
, LYS_MAND_TRUE
)
1372 scontainer
= (struct lys_node_container
*)snode
;
1373 if (!scontainer
->presence
)
1384 if (!CHECK_FLAG(snode
->flags
, LYS_CONFIG_W
))
1387 switch (snode
->nodetype
) {
1390 if (!CHECK_FLAG(snode
->flags
, LYS_USERORDERED
))
1397 case NB_OP_APPLY_FINISH
:
1398 if (!CHECK_FLAG(snode
->flags
, LYS_CONFIG_W
))
1401 case NB_OP_GET_ELEM
:
1402 if (!CHECK_FLAG(snode
->flags
, LYS_CONFIG_R
))
1405 switch (snode
->nodetype
) {
1410 scontainer
= (struct lys_node_container
*)snode
;
1411 if (!scontainer
->presence
)
1418 case NB_OP_GET_NEXT
:
1419 switch (snode
->nodetype
) {
1421 if (CHECK_FLAG(nb_node
->flags
, F_NB_NODE_CONFIG_ONLY
))
1425 if (CHECK_FLAG(snode
->flags
, LYS_CONFIG_W
))
1432 case NB_OP_GET_KEYS
:
1433 case NB_OP_LOOKUP_ENTRY
:
1434 switch (snode
->nodetype
) {
1436 if (CHECK_FLAG(nb_node
->flags
, F_NB_NODE_CONFIG_ONLY
))
1438 if (CHECK_FLAG(nb_node
->flags
, F_NB_NODE_KEYLESS_LIST
))
1446 if (CHECK_FLAG(snode
->flags
, LYS_CONFIG_W
| LYS_CONFIG_R
))
1449 switch (snode
->nodetype
) {
1462 DEFINE_HOOK(nb_notification_send
, (const char *xpath
, struct list
*arguments
),
1463 (xpath
, arguments
));
1465 int nb_notification_send(const char *xpath
, struct list
*arguments
)
1469 ret
= hook_call(nb_notification_send
, xpath
, arguments
);
1471 list_delete(&arguments
);
1476 const char *nb_event_name(enum nb_event event
)
1479 case NB_EV_VALIDATE
:
1492 const char *nb_operation_name(enum nb_operation operation
)
1494 switch (operation
) {
1503 case NB_OP_APPLY_FINISH
:
1504 return "apply_finish";
1505 case NB_OP_GET_ELEM
:
1507 case NB_OP_GET_NEXT
:
1509 case NB_OP_GET_KEYS
:
1511 case NB_OP_LOOKUP_ENTRY
:
1512 return "lookup_entry";
1520 const char *nb_err_name(enum nb_error error
)
1526 return "generic error";
1527 case NB_ERR_NO_CHANGES
:
1528 return "no changes";
1529 case NB_ERR_NOT_FOUND
:
1530 return "element not found";
1532 return "resource is locked";
1533 case NB_ERR_VALIDATION
:
1534 return "validation error";
1535 case NB_ERR_RESOURCE
:
1536 return "failed to allocate resource";
1537 case NB_ERR_INCONSISTENCY
:
1538 return "internal inconsistency";
1544 const char *nb_client_name(enum nb_client client
)
1549 case NB_CLIENT_CONFD
:
1551 case NB_CLIENT_SYSREPO
:
1558 static void nb_load_callbacks(const struct frr_yang_module_info
*module
)
1560 for (size_t i
= 0; module
->nodes
[i
].xpath
; i
++) {
1561 struct nb_node
*nb_node
;
1564 nb_node
= nb_node_find(module
->nodes
[i
].xpath
);
1566 flog_warn(EC_LIB_YANG_UNKNOWN_DATA_PATH
,
1567 "%s: unknown data path: %s", __func__
,
1568 module
->nodes
[i
].xpath
);
1572 nb_node
->cbs
= module
->nodes
[i
].cbs
;
1573 priority
= module
->nodes
[i
].priority
;
1575 nb_node
->priority
= priority
;
1579 void nb_init(struct thread_master
*tm
,
1580 const struct frr_yang_module_info
*modules
[], size_t nmodules
)
1582 unsigned int errors
= 0;
1584 /* Load YANG modules. */
1585 for (size_t i
= 0; i
< nmodules
; i
++)
1586 yang_module_load(modules
[i
]->name
);
1588 /* Create a nb_node for all YANG schema nodes. */
1591 /* Load northbound callbacks. */
1592 for (size_t i
= 0; i
< nmodules
; i
++)
1593 nb_load_callbacks(modules
[i
]);
1595 /* Validate northbound callbacks. */
1596 yang_snodes_iterate_all(nb_node_validate
, 0, &errors
);
1599 EC_LIB_NB_CBS_VALIDATION
,
1600 "%s: failed to validate northbound callbacks: %u error(s)",
1605 /* Initialize the northbound database (used for the rollback log). */
1606 if (nb_db_init() != NB_OK
)
1607 flog_warn(EC_LIB_NB_DATABASE
,
1608 "%s: failed to initialize northbound database",
1611 /* Create an empty running configuration. */
1612 running_config
= nb_config_new(NULL
);
1614 /* Initialize the northbound CLI. */
1618 void nb_terminate(void)
1620 /* Terminate the northbound CLI. */
1623 /* Delete all nb_node's from all YANG modules. */
1626 /* Delete the running configuration. */
1627 nb_config_free(running_config
);