102 lines
3.4 KiB
C
102 lines
3.4 KiB
C
############################################################# -*- c -*-
|
|
## Generic include for columns. Do not use directly.
|
|
##
|
|
########################################################################
|
|
@if $m2c_mark_boundary == 1@
|
|
/** START code generated by details-node.m2i */
|
|
@end@
|
|
########################################################################
|
|
/*---------------------------------------------------------------------
|
|
* $node.module::$node.parent.$node
|
|
* $node is subid $node.subid of $node.parent.
|
|
* Its status is $node.status, and its access level is $node.access.
|
|
* OID: $node.objectID
|
|
* Description:
|
|
$node.description
|
|
*
|
|
@if $m2c_node_detail == 1@
|
|
* node -- name $node
|
|
* node.parent -- label of the parent $node.parent
|
|
* node.objectID -- dotted full OID $node.objectID
|
|
* node.commaoid -- comma separated OID $node.commaoid
|
|
* node.subid -- last oid component $node.subid
|
|
* node.oidlength-- length of the oid $node.oidlength
|
|
* node.syntax -- node's syntax $node.syntax
|
|
* node.perltype -- node's perl type $node.perltype
|
|
* node.type -- node's ASN_XXX type $node.type
|
|
* node.decl -- C data type $m2c_decl ($node.decl)
|
|
* node.settable -- 1 if it's writable $node.settable
|
|
* node.noaccess -- 1 if not-accessible $node.noaccess
|
|
* node.access -- node's access type $node.access
|
|
* node.status -- node's status $node.status
|
|
* node.isscalar -- returns 1 if scalar $node.isscalar
|
|
* node.iscolumn -- returns 1 if column $node.iscolumn
|
|
* node.enums -- $node.enums
|
|
*
|
|
@end@
|
|
* Attributes:
|
|
* accessible $node.accessible isscalar $node.isscalar enums $node.enums hasdefval $node.hasdefval
|
|
* readable $node.readable iscolumn $node.iscolumn ranges $node.ranges hashint $node.hashint
|
|
* settable $node.settable
|
|
@if $node.hasdefval == 1@
|
|
* defval: $node.defval
|
|
@end@
|
|
@if $node.hashint == 1@
|
|
* hint: $node.hint
|
|
@end@
|
|
*
|
|
@if $node.enums == 1@
|
|
@ eval $m2c_evals = ""@
|
|
@ eval $m2c_first = 1@
|
|
@ foreach $e $v enum@
|
|
@ if $m2c_first == 1@
|
|
@ eval $m2c_first = 0@
|
|
@ else@
|
|
@ eval $m2c_evals = "$m2c_evals,"@
|
|
@ end@
|
|
@ eval $m2c_evals = "$m2c_evals $e($v)"@
|
|
@ end@
|
|
* Enum range: $node.enumrange. Values: $m2c_evals
|
|
@elsif $node.ranges == 1@
|
|
@ eval $m2c_range_max = 0@
|
|
@ eval $m2c_evals = ""@
|
|
@ eval $m2c_first = 1@
|
|
@ foreach $a $b range $node@
|
|
@ if $m2c_first == 1@
|
|
@ eval $m2c_first = 0@
|
|
@ else@
|
|
@ eval $m2c_evals = "$m2c_evals,"@
|
|
@ end@
|
|
@ if $a == $b@
|
|
@ eval $m2c_evals = "$m2c_evals $a"@
|
|
@ else@
|
|
@ eval $m2c_evals = "$m2c_evals $a - $b"@
|
|
@ end@
|
|
@ eval $m2c_range_max = max($m2c_range_max,$b)@
|
|
@ end@
|
|
* Ranges: $m2c_evals;
|
|
@end@ #ranges
|
|
*
|
|
* Its syntax is $node.syntax (based on perltype $node.perltype)
|
|
* The net-snmp type is $node.type. The C type decl is $node.decl ($m2c_decl)
|
|
@if $node.needlength == 1@
|
|
@ if $node.ranges == 1@
|
|
* This data type requires a length. (Max $m2c_range_max)
|
|
@ else@
|
|
* This data type requires a length.
|
|
@ end@
|
|
@end@
|
|
@if $node.noaccess@
|
|
*
|
|
*
|
|
*
|
|
* NOTE: NODE $node IS NOT ACCESSIBLE
|
|
*
|
|
*
|
|
@end@
|
|
*/
|
|
########################################################################
|
|
@if $m2c_mark_boundary == 1@
|
|
/** END code generated by details-node.m2i */
|
|
@end@
|