开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > SNMP编程 > 查看源码
default_store.xs
资源名称：net-snmp-5.2.2.rar　[点击查看]
上传用户：wxp200602
上传日期：2007-10-30
资源大小：4028k
文件大小：19k
源码类别：

SNMP编程

开发平台：

Unix_Linux

default_store.xs：源码内容
  1. #include "EXTERN.h"
  2. #include "perl.h"
  3. #include "XSUB.h"
  5. #include <net-snmp/library/default_store.h>
  7. static int
  8. not_here(char *s)
  9. {
  10.     croak("%s not implemented on this architecture", s);
  11.     return -1;
  12. }
  14. static double
  15. constant_NETSNMP_DS_S(char *name, int len, int arg)
  16. {
  17.     if (12 + 12 >= len ) {
  18. errno = EINVAL;
  19. return 0;
  20.     }
  21.     switch (name[12 + 12]) {
  22.     case '1':
  23. if (strEQ(name + 12, "NMP_VERSION_1")) { /* NETSNMP_DS_S removed */
  24. #ifdef NETSNMP_DS_SNMP_VERSION_1
  25.     return NETSNMP_DS_SNMP_VERSION_1;
  26. #else
  27.     goto not_there;
  28. #endif
  29. }
  30.     case '2':
  31. if (strEQ(name + 12, "NMP_VERSION_2c")) { /* NETSNMP_DS_S removed */
  32. #ifdef NETSNMP_DS_SNMP_VERSION_2c
  33.     return NETSNMP_DS_SNMP_VERSION_2c;
  34. #else
  35.     goto not_there;
  36. #endif
  37. }
  38.     case '3':
  39. if (strEQ(name + 12, "NMP_VERSION_3")) { /* NETSNMP_DS_S removed */
  40. #ifdef NETSNMP_DS_SNMP_VERSION_3
  41.     return NETSNMP_DS_SNMP_VERSION_3;
  42. #else
  43.     goto not_there;
  44. #endif
  45. }
  46.     }
  47.     errno = EINVAL;
  48.     return 0;
  50. not_there:
  51.     errno = ENOENT;
  52.     return 0;
  53. }
  55. static double
  56. constant_NETSNMP_DS_LIB_N(char *name, int len, int arg)
  57. {
  58.     switch (name[16 + 0]) {
  59.     case 'O':
  60. if (strEQ(name + 16, "O_TOKEN_WARNINGS")) { /* NETSNMP_DS_LIB_N removed */
  61. #ifdef NETSNMP_DS_LIB_NO_TOKEN_WARNINGS
  62.     return NETSNMP_DS_LIB_NO_TOKEN_WARNINGS;
  63. #else
  64.     goto not_there;
  65. #endif
  66. }
  67.     case 'U':
  68. if (strEQ(name + 16, "UMERIC_TIMETICKS")) { /* NETSNMP_DS_LIB_N removed */
  69. #ifdef NETSNMP_DS_LIB_NUMERIC_TIMETICKS
  70.     return NETSNMP_DS_LIB_NUMERIC_TIMETICKS;
  71. #else
  72.     goto not_there;
  73. #endif
  74. }
  75.     }
  76.     errno = EINVAL;
  77.     return 0;
  79. not_there:
  80.     errno = ENOENT;
  81.     return 0;
  82. }
  84. static double
  85. constant_NETSNMP_DS_LIB_O(char *name, int len, int arg)
  86. {
  87.     switch (name[16 + 0]) {
  88.     case 'I':
  89. if (strEQ(name + 16, "ID_OUTPUT_FORMAT")) { /* NETSNMP_DS_LIB_O removed */
  90. #ifdef NETSNMP_DS_LIB_OID_OUTPUT_FORMAT
  91.     return NETSNMP_DS_LIB_OID_OUTPUT_FORMAT;
  92. #else
  93.     goto not_there;
  94. #endif
  95. }
  96.     case 'P':
  97. if (strEQ(name + 16, "PTIONALCONFIG")) { /* NETSNMP_DS_LIB_O removed */
  98. #ifdef NETSNMP_DS_LIB_OPTIONALCONFIG
  99.     return NETSNMP_DS_LIB_OPTIONALCONFIG;
  100. #else
  101.     goto not_there;
  102. #endif
  103. }
  104.     }
  105.     errno = EINVAL;
  106.     return 0;
  108. not_there:
  109.     errno = ENOENT;
  110.     return 0;
  111. }
  113. static double
  114. constant_NETSNMP_DS_LIB_PRINT_N(char *name, int len, int arg)
  115. {
  116.     if (22 + 7 >= len ) {
  117. errno = EINVAL;
  118. return 0;
  119.     }
  120.     switch (name[22 + 7]) {
  121.     case 'E':
  122. if (strEQ(name + 22, "UMERIC_ENUM")) { /* NETSNMP_DS_LIB_PRINT_N removed */
  123. #ifdef NETSNMP_DS_LIB_PRINT_NUMERIC_ENUM
  124.     return NETSNMP_DS_LIB_PRINT_NUMERIC_ENUM;
  125. #else
  126.     goto not_there;
  127. #endif
  128. }
  129.     case 'O':
  130. if (strEQ(name + 22, "UMERIC_OIDS")) { /* NETSNMP_DS_LIB_PRINT_N removed */
  131. #ifdef NETSNMP_DS_LIB_PRINT_NUMERIC_OIDS
  132.     return NETSNMP_DS_LIB_PRINT_NUMERIC_OIDS;
  133. #else
  134.     goto not_there;
  135. #endif
  136. }
  137.     }
  138.     errno = EINVAL;
  139.     return 0;
  141. not_there:
  142.     errno = ENOENT;
  143.     return 0;
  144. }
  146. static double
  147. constant_NETSNMP_DS_LIB_PRIN(char *name, int len, int arg)
  148. {
  149.     if (19 + 2 >= len ) {
  150. errno = EINVAL;
  151. return 0;
  152.     }
  153.     switch (name[19 + 2]) {
  154.     case 'B':
  155. if (strEQ(name + 19, "T_BARE_VALUE")) { /* NETSNMP_DS_LIB_PRIN removed */
  156. #ifdef NETSNMP_DS_LIB_PRINT_BARE_VALUE
  157.     return NETSNMP_DS_LIB_PRINT_BARE_VALUE;
  158. #else
  159.     goto not_there;
  160. #endif
  161. }
  162.     case 'F':
  163. if (strEQ(name + 19, "T_FULL_OID")) { /* NETSNMP_DS_LIB_PRIN removed */
  164. #ifdef NETSNMP_DS_LIB_PRINT_FULL_OID
  165.     return NETSNMP_DS_LIB_PRINT_FULL_OID;
  166. #else
  167.     goto not_there;
  168. #endif
  169. }
  170.     case 'H':
  171. if (strEQ(name + 19, "T_HEX_TEXT")) { /* NETSNMP_DS_LIB_PRIN removed */
  172. #ifdef NETSNMP_DS_LIB_PRINT_HEX_TEXT
  173.     return NETSNMP_DS_LIB_PRINT_HEX_TEXT;
  174. #else
  175.     goto not_there;
  176. #endif
  177. }
  178.     case 'N':
  179. if (!strnEQ(name + 19,"T_", 2))
  180.     break;
  181. return constant_NETSNMP_DS_LIB_PRINT_N(name, len, arg);
  182.     case 'S':
  183. if (strEQ(name + 19, "T_SUFFIX_ONLY")) { /* NETSNMP_DS_LIB_PRIN removed */
  184. #ifdef NETSNMP_DS_LIB_PRINT_SUFFIX_ONLY
  185.     return NETSNMP_DS_LIB_PRINT_SUFFIX_ONLY;
  186. #else
  187.     goto not_there;
  188. #endif
  189. }
  190.     case 'U':
  191. if (strEQ(name + 19, "T_UCD_STYLE_OID")) { /* NETSNMP_DS_LIB_PRIN removed */
  192. #ifdef NETSNMP_DS_LIB_PRINT_UCD_STYLE_OID
  193.     return NETSNMP_DS_LIB_PRINT_UCD_STYLE_OID;
  194. #else
  195.     goto not_there;
  196. #endif
  197. }
  198.     }
  199.     errno = EINVAL;
  200.     return 0;
  202. not_there:
  203.     errno = ENOENT;
  204.     return 0;
  205. }
  207. static double
  208. constant_NETSNMP_DS_LIB_PR(char *name, int len, int arg)
  209. {
  210.     if (17 + 1 >= len ) {
  211. errno = EINVAL;
  212. return 0;
  213.     }
  214.     switch (name[17 + 1]) {
  215.     case 'N':
  216. if (!strnEQ(name + 17,"I", 1))
  217.     break;
  218. return constant_NETSNMP_DS_LIB_PRIN(name, len, arg);
  219.     case 'V':
  220. if (strEQ(name + 17, "IVPASSPHRASE")) { /* NETSNMP_DS_LIB_PR removed */
  221. #ifdef NETSNMP_DS_LIB_PRIVPASSPHRASE
  222.     return NETSNMP_DS_LIB_PRIVPASSPHRASE;
  223. #else
  224.     goto not_there;
  225. #endif
  226. }
  227.     }
  228.     errno = EINVAL;
  229.     return 0;
  231. not_there:
  232.     errno = ENOENT;
  233.     return 0;
  234. }
  236. static double
  237. constant_NETSNMP_DS_LIB_P(char *name, int len, int arg)
  238. {
  239.     switch (name[16 + 0]) {
  240.     case 'A':
  241. if (strEQ(name + 16, "ASSPHRASE")) { /* NETSNMP_DS_LIB_P removed */
  242. #ifdef NETSNMP_DS_LIB_PASSPHRASE
  243.     return NETSNMP_DS_LIB_PASSPHRASE;
  244. #else
  245.     goto not_there;
  246. #endif
  247. }
  248.     case 'E':
  249. if (strEQ(name + 16, "ERSISTENT_DIR")) { /* NETSNMP_DS_LIB_P removed */
  250. #ifdef NETSNMP_DS_LIB_PERSISTENT_DIR
  251.     return NETSNMP_DS_LIB_PERSISTENT_DIR;
  252. #else
  253.     goto not_there;
  254. #endif
  255. }
  256.     case 'R':
  257. return constant_NETSNMP_DS_LIB_PR(name, len, arg);
  258.     }
  259.     errno = EINVAL;
  260.     return 0;
  262. not_there:
  263.     errno = ENOENT;
  264.     return 0;
  265. }
  267. static double
  268. constant_NETSNMP_DS_LIB_Q(char *name, int len, int arg)
  269. {
  270.     if (16 + 4 >= len ) {
  271. errno = EINVAL;
  272. return 0;
  273.     }
  274.     switch (name[16 + 4]) {
  275.     case 'E':
  276. if (strEQ(name + 16, "UICKE_PRINT")) { /* NETSNMP_DS_LIB_Q removed */
  277. #ifdef NETSNMP_DS_LIB_QUICKE_PRINT
  278.     return NETSNMP_DS_LIB_QUICKE_PRINT;
  279. #else
  280.     goto not_there;
  281. #endif
  282. }
  283.     case '_':
  284. if (strEQ(name + 16, "UICK_PRINT")) { /* NETSNMP_DS_LIB_Q removed */
  285. #ifdef NETSNMP_DS_LIB_QUICK_PRINT
  286.     return NETSNMP_DS_LIB_QUICK_PRINT;
  287. #else
  288.     goto not_there;
  289. #endif
  290. }
  291.     }
  292.     errno = EINVAL;
  293.     return 0;
  295. not_there:
  296.     errno = ENOENT;
  297.     return 0;
  298. }
  300. static double
  301. constant_NETSNMP_DS_LIB_A(char *name, int len, int arg)
  302. {
  303.     switch (name[16 + 0]) {
  304.     case 'L':
  305. if (strEQ(name + 16, "LARM_DONT_USE_SIG")) { /* NETSNMP_DS_LIB_A removed */
  306. #ifdef NETSNMP_DS_LIB_ALARM_DONT_USE_SIG
  307.     return NETSNMP_DS_LIB_ALARM_DONT_USE_SIG;
  308. #else
  309.     goto not_there;
  310. #endif
  311. }
  312.     case 'P':
  313. if (strEQ(name + 16, "PPTYPE")) { /* NETSNMP_DS_LIB_A removed */
  314. #ifdef NETSNMP_DS_LIB_APPTYPE
  315.     return NETSNMP_DS_LIB_APPTYPE;
  316. #else
  317.     goto not_there;
  318. #endif
  319. }
  320.     case 'U':
  321. if (strEQ(name + 16, "UTHPASSPHRASE")) { /* NETSNMP_DS_LIB_A removed */
  322. #ifdef NETSNMP_DS_LIB_AUTHPASSPHRASE
  323.     return NETSNMP_DS_LIB_AUTHPASSPHRASE;
  324. #else
  325.     goto not_there;
  326. #endif
  327. }
  328.     }
  329.     errno = EINVAL;
  330.     return 0;
  332. not_there:
  333.     errno = ENOENT;
  334.     return 0;
  335. }
  337. static double
  338. constant_NETSNMP_DS_LIB_RE(char *name, int len, int arg)
  339. {
  340.     switch (name[17 + 0]) {
  341.     case 'A':
  342. if (strEQ(name + 17, "AD_UCD_STYLE_OID")) { /* NETSNMP_DS_LIB_RE removed */
  343. #ifdef NETSNMP_DS_LIB_READ_UCD_STYLE_OID
  344.     return NETSNMP_DS_LIB_READ_UCD_STYLE_OID;
  345. #else
  346.     goto not_there;
  347. #endif
  348. }
  349.     case 'G':
  350. if (strEQ(name + 17, "GEX_ACCESS")) { /* NETSNMP_DS_LIB_RE removed */
  351. #ifdef NETSNMP_DS_LIB_REGEX_ACCESS
  352.     return NETSNMP_DS_LIB_REGEX_ACCESS;
  353. #else
  354.     goto not_there;
  355. #endif
  356. }
  357.     case 'V':
  358. if (strEQ(name + 17, "VERSE_ENCODE")) { /* NETSNMP_DS_LIB_RE removed */
  359. #ifdef NETSNMP_DS_LIB_REVERSE_ENCODE
  360.     return NETSNMP_DS_LIB_REVERSE_ENCODE;
  361. #else
  362.     goto not_there;
  363. #endif
  364. }
  365.     }
  366.     errno = EINVAL;
  367.     return 0;
  369. not_there:
  370.     errno = ENOENT;
  371.     return 0;
  372. }
  374. static double
  375. constant_NETSNMP_DS_LIB_R(char *name, int len, int arg)
  376. {
  377.     switch (name[16 + 0]) {
  378.     case 'A':
  379. if (strEQ(name + 16, "ANDOM_ACCESS")) { /* NETSNMP_DS_LIB_R removed */
  380. #ifdef NETSNMP_DS_LIB_RANDOM_ACCESS
  381.     return NETSNMP_DS_LIB_RANDOM_ACCESS;
  382. #else
  383.     goto not_there;
  384. #endif
  385. }
  386.     case 'E':
  387. return constant_NETSNMP_DS_LIB_RE(name, len, arg);
  388.     }
  389.     errno = EINVAL;
  390.     return 0;
  392. not_there:
  393.     errno = ENOENT;
  394.     return 0;
  395. }
  397. static double
  398. constant_NETSNMP_DS_LIB_SE(char *name, int len, int arg)
  399. {
  400.     if (17 + 1 >= len ) {
  401. errno = EINVAL;
  402. return 0;
  403.     }
  404.     switch (name[17 + 1]) {
  405.     case 'L':
  406. if (strEQ(name + 17, "CLEVEL")) { /* NETSNMP_DS_LIB_SE removed */
  407. #ifdef NETSNMP_DS_LIB_SECLEVEL
  408.     return NETSNMP_DS_LIB_SECLEVEL;
  409. #else
  410.     goto not_there;
  411. #endif
  412. }
  413.     case 'M':
  414. if (strEQ(name + 17, "CMODEL")) { /* NETSNMP_DS_LIB_SE removed */
  415. #ifdef NETSNMP_DS_LIB_SECMODEL
  416.     return NETSNMP_DS_LIB_SECMODEL;
  417. #else
  418.     goto not_there;
  419. #endif
  420. }
  421.     case 'N':
  422. if (strEQ(name + 17, "CNAME")) { /* NETSNMP_DS_LIB_SE removed */
  423. #ifdef NETSNMP_DS_LIB_SECNAME
  424.     return NETSNMP_DS_LIB_SECNAME;
  425. #else
  426.     goto not_there;
  427. #endif
  428. }
  429.     }
  430.     errno = EINVAL;
  431.     return 0;
  433. not_there:
  434.     errno = ENOENT;
  435.     return 0;
  436. }
  438. static double
  439. constant_NETSNMP_DS_LIB_S(char *name, int len, int arg)
  440. {
  441.     switch (name[16 + 0]) {
  442.     case 'A':
  443. if (strEQ(name + 16, "AVE_MIB_DESCRS")) { /* NETSNMP_DS_LIB_S removed */
  444. #ifdef NETSNMP_DS_LIB_SAVE_MIB_DESCRS
  445.     return NETSNMP_DS_LIB_SAVE_MIB_DESCRS;
  446. #else
  447.     goto not_there;
  448. #endif
  449. }
  450.     case 'E':
  451. return constant_NETSNMP_DS_LIB_SE(name, len, arg);
  452.     case 'N':
  453. if (strEQ(name + 16, "NMPVERSION")) { /* NETSNMP_DS_LIB_S removed */
  454. #ifdef NETSNMP_DS_LIB_SNMPVERSION
  455.     return NETSNMP_DS_LIB_SNMPVERSION;
  456. #else
  457.     goto not_there;
  458. #endif
  459. }
  460.     }
  461.     errno = EINVAL;
  462.     return 0;
  464. not_there:
  465.     errno = ENOENT;
  466.     return 0;
  467. }
  469. static double
  470. constant_NETSNMP_DS_LIB_CON(char *name, int len, int arg)
  471. {
  472.     switch (name[18 + 0]) {
  473.     case 'F':
  474. if (strEQ(name + 18, "FIGURATION_DIR")) { /* NETSNMP_DS_LIB_CON removed */
  475. #ifdef NETSNMP_DS_LIB_CONFIGURATION_DIR
  476.     return NETSNMP_DS_LIB_CONFIGURATION_DIR;
  477. #else
  478.     goto not_there;
  479. #endif
  480. }
  481.     case 'T':
  482. if (strEQ(name + 18, "TEXT")) { /* NETSNMP_DS_LIB_CON removed */
  483. #ifdef NETSNMP_DS_LIB_CONTEXT
  484.     return NETSNMP_DS_LIB_CONTEXT;
  485. #else
  486.     goto not_there;
  487. #endif
  488. }
  489.     }
  490.     errno = EINVAL;
  491.     return 0;
  493. not_there:
  494.     errno = ENOENT;
  495.     return 0;
  496. }
  498. static double
  499. constant_NETSNMP_DS_LIB_C(char *name, int len, int arg)
  500. {
  501.     if (16 + 1 >= len ) {
  502. errno = EINVAL;
  503. return 0;
  504.     }
  505.     switch (name[16 + 1]) {
  506.     case 'M':
  507. if (strEQ(name + 16, "OMMUNITY")) { /* NETSNMP_DS_LIB_C removed */
  508. #ifdef NETSNMP_DS_LIB_COMMUNITY
  509.     return NETSNMP_DS_LIB_COMMUNITY;
  510. #else
  511.     goto not_there;
  512. #endif
  513. }
  514.     case 'N':
  515. if (!strnEQ(name + 16,"O", 1))
  516.     break;
  517. return constant_NETSNMP_DS_LIB_CON(name, len, arg);
  518.     }
  519.     errno = EINVAL;
  520.     return 0;
  522. not_there:
  523.     errno = ENOENT;
  524.     return 0;
  525. }
  527. static double
  528. constant_NETSNMP_DS_LIB_DO(char *name, int len, int arg)
  529. {
  530.     if (17 + 3 >= len ) {
  531. errno = EINVAL;
  532. return 0;
  533.     }
  534.     switch (name[17 + 3]) {
  535.     case 'B':
  536. if (strEQ(name + 17, "NT_BREAKDOWN_OIDS")) { /* NETSNMP_DS_LIB_DO removed */
  537. #ifdef NETSNMP_DS_LIB_DONT_BREAKDOWN_OIDS
  538.     return NETSNMP_DS_LIB_DONT_BREAKDOWN_OIDS;
  539. #else
  540.     goto not_there;
  541. #endif
  542. }
  543.     case 'C':
  544. if (strEQ(name + 17, "NT_CHECK_RANGE")) { /* NETSNMP_DS_LIB_DO removed */
  545. #ifdef NETSNMP_DS_LIB_DONT_CHECK_RANGE
  546.     return NETSNMP_DS_LIB_DONT_CHECK_RANGE;
  547. #else
  548.     goto not_there;
  549. #endif
  550. }
  551.     case 'R':
  552. if (strEQ(name + 17, "NT_READ_CONFIGS")) { /* NETSNMP_DS_LIB_DO removed */
  553. #ifdef NETSNMP_DS_LIB_DONT_READ_CONFIGS
  554.     return NETSNMP_DS_LIB_DONT_READ_CONFIGS;
  555. #else
  556.     goto not_there;
  557. #endif
  558. }
  559.     }
  560.     errno = EINVAL;
  561.     return 0;
  563. not_there:
  564.     errno = ENOENT;
  565.     return 0;
  566. }
  568. static double
  569. constant_NETSNMP_DS_LIB_D(char *name, int len, int arg)
  570. {
  571.     switch (name[16 + 0]) {
  572.     case 'E':
  573. if (strEQ(name + 16, "EFAULT_PORT")) { /* NETSNMP_DS_LIB_D removed */
  574. #ifdef NETSNMP_DS_LIB_DEFAULT_PORT
  575.     return NETSNMP_DS_LIB_DEFAULT_PORT;
  576. #else
  577.     goto not_there;
  578. #endif
  579. }
  580.     case 'O':
  581. return constant_NETSNMP_DS_LIB_DO(name, len, arg);
  582.     case 'U':
  583. if (strEQ(name + 16, "UMP_PACKET")) { /* NETSNMP_DS_LIB_D removed */
  584. #ifdef NETSNMP_DS_LIB_DUMP_PACKET
  585.     return NETSNMP_DS_LIB_DUMP_PACKET;
  586. #else
  587.     goto not_there;
  588. #endif
  589. }
  590.     }
  591.     errno = EINVAL;
  592.     return 0;
  594. not_there:
  595.     errno = ENOENT;
  596.     return 0;
  597. }
  599. static double
  600. constant_NETSNMP_DS_LIB_E(char *name, int len, int arg)
  601. {
  602.     switch (name[16 + 0]) {
  603.     case 'S':
  604. if (strEQ(name + 16, "SCAPE_QUOTES")) { /* NETSNMP_DS_LIB_E removed */
  605. #ifdef NETSNMP_DS_LIB_ESCAPE_QUOTES
  606.     return NETSNMP_DS_LIB_ESCAPE_QUOTES;
  607. #else
  608.     goto not_there;
  609. #endif
  610. }
  611.     case 'X':
  612. if (strEQ(name + 16, "XTENDED_INDEX")) { /* NETSNMP_DS_LIB_E removed */
  613. #ifdef NETSNMP_DS_LIB_EXTENDED_INDEX
  614.     return NETSNMP_DS_LIB_EXTENDED_INDEX;
  615. #else
  616.     goto not_there;
  617. #endif
  618. }
  619.     }
  620.     errno = EINVAL;
  621.     return 0;
  623. not_there:
  624.     errno = ENOENT;
  625.     return 0;
  626. }
  628. static double
  629. constant_NETSNMP_DS_LIB_H(char *name, int len, int arg)
  630. {
  631.     if (16 + 9 >= len ) {
  632. errno = EINVAL;
  633. return 0;
  634.     }
  635.     switch (name[16 + 9]) {
  636.     case 'C':
  637. if (strEQ(name + 16, "AVE_READ_CONFIG")) { /* NETSNMP_DS_LIB_H removed */
  638. #ifdef NETSNMP_DS_LIB_HAVE_READ_CONFIG
  639.     return NETSNMP_DS_LIB_HAVE_READ_CONFIG;
  640. #else
  641.     goto not_there;
  642. #endif
  643. }
  644.     case 'P':
  645. if (strEQ(name + 16, "AVE_READ_PREMIB_CONFIG")) { /* NETSNMP_DS_LIB_H removed */
  646. #ifdef NETSNMP_DS_LIB_HAVE_READ_PREMIB_CONFIG
  647.     return NETSNMP_DS_LIB_HAVE_READ_PREMIB_CONFIG;
  648. #else
  649.     goto not_there;
  650. #endif
  651. }
  652.     }
  653.     errno = EINVAL;
  654.     return 0;
  656. not_there:
  657.     errno = ENOENT;
  658.     return 0;
  659. }
  661. static double
  662. constant_NETSNMP_DS_LIB_MIB_(char *name, int len, int arg)
  663. {
  664.     switch (name[19 + 0]) {
  665.     case 'C':
  666. if (strEQ(name + 19, "COMMENT_TERM")) { /* NETSNMP_DS_LIB_MIB_ removed */
  667. #ifdef NETSNMP_DS_LIB_MIB_COMMENT_TERM
  668.     return NETSNMP_DS_LIB_MIB_COMMENT_TERM;
  669. #else
  670.     goto not_there;
  671. #endif
  672. }
  673.     case 'E':
  674. if (strEQ(name + 19, "ERRORS")) { /* NETSNMP_DS_LIB_MIB_ removed */
  675. #ifdef NETSNMP_DS_LIB_MIB_ERRORS
  676.     return NETSNMP_DS_LIB_MIB_ERRORS;
  677. #else
  678.     goto not_there;
  679. #endif
  680. }
  681.     case 'P':
  682. if (strEQ(name + 19, "PARSE_LABEL")) { /* NETSNMP_DS_LIB_MIB_ removed */
  683. #ifdef NETSNMP_DS_LIB_MIB_PARSE_LABEL
  684.     return NETSNMP_DS_LIB_MIB_PARSE_LABEL;
  685. #else
  686.     goto not_there;
  687. #endif
  688. }
  689.     case 'R':
  690. if (strEQ(name + 19, "REPLACE")) { /* NETSNMP_DS_LIB_MIB_ removed */
  691. #ifdef NETSNMP_DS_LIB_MIB_REPLACE
  692.     return NETSNMP_DS_LIB_MIB_REPLACE;
  693. #else
  694.     goto not_there;
  695. #endif
  696. }
  697.     case 'W':
  698. if (strEQ(name + 19, "WARNINGS")) { /* NETSNMP_DS_LIB_MIB_ removed */
  699. #ifdef NETSNMP_DS_LIB_MIB_WARNINGS
  700.     return NETSNMP_DS_LIB_MIB_WARNINGS;
  701. #else
  702.     goto not_there;
  703. #endif
  704. }
  705.     }
  706.     errno = EINVAL;
  707.     return 0;
  709. not_there:
  710.     errno = ENOENT;
  711.     return 0;
  712. }
  714. static double
  715. constant_NETSNMP_DS_LIB_M(char *name, int len, int arg)
  716. {
  717.     if (16 + 2 >= len ) {
  718. errno = EINVAL;
  719. return 0;
  720.     }
  721.     switch (name[16 + 2]) {
  722.     case 'D':
  723. if (strEQ(name + 16, "IBDIRS")) { /* NETSNMP_DS_LIB_M removed */
  724. #ifdef NETSNMP_DS_LIB_MIBDIRS
  725.     return NETSNMP_DS_LIB_MIBDIRS;
  726. #else
  727.     goto not_there;
  728. #endif
  729. }
  730.     case '_':
  731. if (!strnEQ(name + 16,"IB", 2))
  732.     break;
  733. return constant_NETSNMP_DS_LIB_MIB_(name, len, arg);
  734.     }
  735.     errno = EINVAL;
  736.     return 0;
  738. not_there:
  739.     errno = ENOENT;
  740.     return 0;
  741. }
  743. static double
  744. constant_NETSNMP_DS_LIB_(char *name, int len, int arg)
  745. {
  746.     switch (name[15 + 0]) {
  747.     case 'A':
  748. return constant_NETSNMP_DS_LIB_A(name, len, arg);
  749.     case 'C':
  750. return constant_NETSNMP_DS_LIB_C(name, len, arg);
  751.     case 'D':
  752. return constant_NETSNMP_DS_LIB_D(name, len, arg);
  753.     case 'E':
  754. return constant_NETSNMP_DS_LIB_E(name, len, arg);
  755.     case 'H':
  756. return constant_NETSNMP_DS_LIB_H(name, len, arg);
  757.     case 'L':
  758. if (strEQ(name + 15, "LOG_TIMESTAMP")) { /* NETSNMP_DS_LIB_ removed */
  759. #ifdef NETSNMP_DS_LIB_LOG_TIMESTAMP
  760.     return NETSNMP_DS_LIB_LOG_TIMESTAMP;
  761. #else
  762.     goto not_there;
  763. #endif
  764. }
  765.     case 'M':
  766. return constant_NETSNMP_DS_LIB_M(name, len, arg);
  767.     case 'N':
  768. return constant_NETSNMP_DS_LIB_N(name, len, arg);
  769.     case 'O':
  770. return constant_NETSNMP_DS_LIB_O(name, len, arg);
  771.     case 'P':
  772. return constant_NETSNMP_DS_LIB_P(name, len, arg);
  773.     case 'Q':
  774. return constant_NETSNMP_DS_LIB_Q(name, len, arg);
  775.     case 'R':
  776. return constant_NETSNMP_DS_LIB_R(name, len, arg);
  777.     case 'S':
  778. return constant_NETSNMP_DS_LIB_S(name, len, arg);
  779.     }
  780.     errno = EINVAL;
  781.     return 0;
  783. not_there:
  784.     errno = ENOENT;
  785.     return 0;
  786. }
  788. static double
  789. constant_NETSNMP_DS_L(char *name, int len, int arg)
  790. {
  791.     if (12 + 2 >= len ) {
  792. errno = EINVAL;
  793. return 0;
  794.     }
  795.     switch (name[12 + 2]) {
  796.     case 'R':
  797. if (strEQ(name + 12, "IBRARY_ID")) { /* NETSNMP_DS_L removed */
  798. #ifdef NETSNMP_DS_LIBRARY_ID
  799.     return NETSNMP_DS_LIBRARY_ID;
  800. #else
  801.     goto not_there;
  802. #endif
  803. }
  804.     case '_':
  805. if (!strnEQ(name + 12,"IB", 2))
  806.     break;
  807. return constant_NETSNMP_DS_LIB_(name, len, arg);
  808.     }
  809.     errno = EINVAL;
  810.     return 0;
  812. not_there:
  813.     errno = ENOENT;
  814.     return 0;
  815. }
  817. static double
  818. constant_NETSNMP_DS_M(char *name, int len, int arg)
  819. {
  820.     if (12 + 3 >= len ) {
  821. errno = EINVAL;
  822. return 0;
  823.     }
  824.     switch (name[12 + 3]) {
  825.     case 'I':
  826. if (strEQ(name + 12, "AX_IDS")) { /* NETSNMP_DS_M removed */
  827. #ifdef NETSNMP_DS_MAX_IDS
  828.     return NETSNMP_DS_MAX_IDS;
  829. #else
  830.     goto not_there;
  831. #endif
  832. }
  833.     case 'S':
  834. if (strEQ(name + 12, "AX_SUBIDS")) { /* NETSNMP_DS_M removed */
  835. #ifdef NETSNMP_DS_MAX_SUBIDS
  836.     return NETSNMP_DS_MAX_SUBIDS;
  837. #else
  838.     goto not_there;
  839. #endif
  840. }
  841.     }
  842.     errno = EINVAL;
  843.     return 0;
  845. not_there:
  846.     errno = ENOENT;
  847.     return 0;
  848. }
  850. static double
  851. constant(char *name, int len, int arg)
  852. {
  853.     errno = 0;
  854.     if (0 + 11 >= len ) {
  855. errno = EINVAL;
  856. return 0;
  857.     }
  858.     switch (name[0 + 11]) {
  859.     case 'A':
  860. if (strEQ(name + 0, "NETSNMP_DS_APPLICATION_ID")) { /*  removed */
  861. #ifdef NETSNMP_DS_APPLICATION_ID
  862.     return NETSNMP_DS_APPLICATION_ID;
  863. #else
  864.     goto not_there;
  865. #endif
  866. }
  867.     case 'L':
  868. if (!strnEQ(name + 0,"NETSNMP_DS_", 11))
  869.     break;
  870. return constant_NETSNMP_DS_L(name, len, arg);
  871.     case 'M':
  872. if (!strnEQ(name + 0,"NETSNMP_DS_", 11))
  873.     break;
  874. return constant_NETSNMP_DS_M(name, len, arg);
  875.     case 'S':
  876. if (!strnEQ(name + 0,"NETSNMP_DS_", 11))
  877.     break;
  878. return constant_NETSNMP_DS_S(name, len, arg);
  879.     case 'T':
  880. if (strEQ(name + 0, "NETSNMP_DS_TOKEN_ID")) { /*  removed */
  881. #ifdef NETSNMP_DS_TOKEN_ID
  882.     return NETSNMP_DS_TOKEN_ID;
  883. #else
  884.     goto not_there;
  885. #endif
  886. }
  887.     }
  888.     errno = EINVAL;
  889.     return 0;
  891. not_there:
  892.     errno = ENOENT;
  893.     return 0;
  894. }
  897. MODULE = NetSNMP::default_store PACKAGE = NetSNMP::default_store
  900. double
  901. constant(sv,arg)
  902.     PREINIT:
  903. STRLEN len;
  904.     INPUT:
  905. SV * sv
  906. char * s = SvPV(sv, len);
  907. int arg
  908.     CODE:
  909. RETVAL = constant(s,len,arg);
  910.     OUTPUT:
  911. RETVAL
  913. int
  914. netsnmp_ds_get_boolean(storeid, which)
  915. int storeid
  916. int which
  918. int
  919. netsnmp_ds_get_int(storeid, which)
  920. int storeid
  921. int which
  923. char *
  924. netsnmp_ds_get_string(storeid, which)
  925. int storeid
  926. int which
  928. void *
  929. netsnmp_ds_get_void(storeid, which)
  930. int storeid
  931. int which
  933. int
  934. netsnmp_ds_register_config(type, ftype, token, storeid, which)
  935. unsigned char type
  936. const char * ftype
  937. const char * token
  938. int storeid
  939. int which
  941. int
  942. netsnmp_ds_register_premib(type, ftype, token, storeid, which)
  943. unsigned char type
  944. const char * ftype
  945. const char * token
  946. int storeid
  947. int which
  949. int
  950. netsnmp_ds_set_boolean(storeid, which, value)
  951. int storeid
  952. int which
  953. int value
  955. int
  956. netsnmp_ds_set_int(storeid, which, value)
  957. int storeid
  958. int which
  959. int value
  961. int
  962. netsnmp_ds_set_string(storeid, which, value)
  963. int storeid
  964. int which
  965. const char * value
  967. int
  968. netsnmp_ds_set_void(storeid, which, value)
  969. int storeid
  970. int which
  971. void * value
  973. void
  974. netsnmp_ds_shutdown()
  976. int
  977. netsnmp_ds_toggle_boolean(storeid, which)
  978. int storeid
  979. int which