shell_xml.c 35 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315
  1. /*
  2. * ------------------------------------------------------
  3. * shell_xml.c
  4. *
  5. * This file implements the means to read an XML encoded file and populate the
  6. * CLI tree based on the contents.
  7. * ------------------------------------------------------
  8. */
  9. #include "private.h"
  10. #include "xmlapi.h"
  11. #include "lub/string.h"
  12. #include "lub/ctype.h"
  13. #include "lub/system.h"
  14. #include "lub/conv.h"
  15. #include <stdlib.h>
  16. #include <string.h>
  17. #include <assert.h>
  18. #include <errno.h>
  19. #include <sys/types.h>
  20. #include <dirent.h>
  21. typedef int (PROCESS_FN) (clish_shell_t *instance,
  22. clish_xmlnode_t *element, void *parent);
  23. /* Define a control block for handling the decode of an XML file */
  24. typedef struct clish_xml_cb_s clish_xml_cb_t;
  25. struct clish_xml_cb_s {
  26. const char *element;
  27. PROCESS_FN *handler;
  28. };
  29. /* forward declare the handler functions */
  30. static PROCESS_FN
  31. process_clish_module,
  32. process_startup,
  33. process_view,
  34. process_command,
  35. process_param,
  36. process_action,
  37. process_ptype,
  38. process_overview,
  39. process_detail,
  40. process_namespace,
  41. process_config,
  42. process_var,
  43. process_wdog,
  44. process_hotkey,
  45. process_plugin,
  46. process_hook;
  47. static clish_xml_cb_t xml_elements[] = {
  48. {"CLISH_MODULE", process_clish_module},
  49. {"STARTUP", process_startup},
  50. {"VIEW", process_view},
  51. {"COMMAND", process_command},
  52. {"PARAM", process_param},
  53. {"ACTION", process_action},
  54. {"PTYPE", process_ptype},
  55. {"OVERVIEW", process_overview},
  56. {"DETAIL", process_detail},
  57. {"NAMESPACE", process_namespace},
  58. {"CONFIG", process_config},
  59. {"VAR", process_var},
  60. {"WATCHDOG", process_wdog},
  61. {"HOTKEY", process_hotkey},
  62. {"PLUGIN", process_plugin},
  63. {"HOOK", process_hook},
  64. {NULL, NULL}
  65. };
  66. /*
  67. * if CLISH_PATH is unset in the environment then this is the value used.
  68. */
  69. const char *default_path = "/etc/clish;~/.clish";
  70. static int process_node(clish_shell_t *shell, clish_xmlnode_t *node,
  71. void *parent);
  72. /*-------------------------------------------------------- */
  73. int clish_shell_load_scheme(clish_shell_t *this, const char *xml_path, const char *xslt_path)
  74. {
  75. const char *path = xml_path;
  76. char *buffer;
  77. char *dirname;
  78. char *saveptr = NULL;
  79. int res = -1;
  80. clish_xmldoc_t *doc = NULL;
  81. DIR *dir;
  82. #ifdef HAVE_LIB_LIBXSLT
  83. clish_xslt_t *xslt = NULL;
  84. /* Load global XSLT stylesheet */
  85. if (xslt_path) {
  86. xslt = clish_xslt_read(xslt_path);
  87. if (!clish_xslt_is_valid(xslt)) {
  88. fprintf(stderr, CLISH_XML_ERROR_STR"Can't load XSLT file %s\n",
  89. xslt_path);
  90. return -1;
  91. }
  92. }
  93. #else
  94. xslt_path = xslt_path; /* Happy compiler */
  95. #endif
  96. /* Use the default path */
  97. if (!path)
  98. path = default_path;
  99. buffer = lub_system_tilde_expand(path);
  100. /* Loop though each directory */
  101. for (dirname = strtok_r(buffer, ";", &saveptr);
  102. dirname; dirname = strtok_r(NULL, ";", &saveptr)) {
  103. struct dirent *entry;
  104. /* Search this directory for any XML files */
  105. dir = opendir(dirname);
  106. if (NULL == dir) {
  107. #ifdef DEBUG
  108. tinyrl_printf(this->tinyrl,
  109. "*** Failed to open '%s' directory\n",
  110. dirname);
  111. #endif
  112. continue;
  113. }
  114. for (entry = readdir(dir); entry; entry = readdir(dir)) {
  115. const char *extension = strrchr(entry->d_name, '.');
  116. char *filename = NULL;
  117. clish_xmlnode_t *root;
  118. int r;
  119. /* Check the filename */
  120. if (!extension || strcmp(".xml", extension))
  121. continue;
  122. /* Build the filename */
  123. lub_string_cat(&filename, dirname);
  124. lub_string_cat(&filename, "/");
  125. lub_string_cat(&filename, entry->d_name);
  126. #ifdef DEBUG
  127. fprintf(stderr, "Parse XML-file: %s\n", filename);
  128. #endif
  129. /* Load current XML file */
  130. doc = clish_xmldoc_read(filename);
  131. if (!clish_xmldoc_is_valid(doc)) {
  132. int errcaps = clish_xmldoc_error_caps(doc);
  133. printf("Unable to open file '%s'", filename);
  134. if ((errcaps & CLISH_XMLERR_LINE) == CLISH_XMLERR_LINE)
  135. printf(", at line %d", clish_xmldoc_get_err_line(doc));
  136. if ((errcaps & CLISH_XMLERR_COL) == CLISH_XMLERR_COL)
  137. printf(", at column %d", clish_xmldoc_get_err_col(doc));
  138. if ((errcaps & CLISH_XMLERR_DESC) == CLISH_XMLERR_DESC)
  139. printf(", message is %s", clish_xmldoc_get_err_msg(doc));
  140. printf("\n");
  141. goto error;
  142. }
  143. #ifdef HAVE_LIB_LIBXSLT
  144. /* Use embedded stylesheet if stylesheet
  145. * filename is not specified.
  146. */
  147. if (!xslt_path)
  148. xslt = clish_xslt_read_embedded(doc);
  149. if (clish_xslt_is_valid(xslt)) {
  150. clish_xmldoc_t *tmp = NULL;
  151. tmp = clish_xslt_apply(doc, xslt);
  152. if (!clish_xmldoc_is_valid(tmp)) {
  153. fprintf(stderr, CLISH_XML_ERROR_STR"Can't load XSLT file %s\n", xslt_path);
  154. goto error;
  155. }
  156. clish_xmldoc_release(doc);
  157. doc = tmp;
  158. }
  159. if (!xslt_path && clish_xslt_is_valid(xslt))
  160. clish_xslt_release(xslt);
  161. #endif
  162. root = clish_xmldoc_get_root(doc);
  163. r = process_node(this, root, NULL);
  164. clish_xmldoc_release(doc);
  165. /* Error message */
  166. if (r) {
  167. fprintf(stderr, CLISH_XML_ERROR_STR"File %s\n",
  168. filename);
  169. lub_string_free(filename);
  170. goto error;
  171. }
  172. lub_string_free(filename);
  173. }
  174. closedir(dir);
  175. }
  176. /* To don't free memory twice on cleanup */
  177. #ifdef HAVE_LIB_LIBXSLT
  178. if (!xslt_path)
  179. xslt = NULL;
  180. #endif
  181. doc = NULL;
  182. dir = NULL;
  183. res = 0; /* Success */
  184. error:
  185. lub_string_free(buffer);
  186. if (dir)
  187. closedir(dir);
  188. if (clish_xmldoc_is_valid(doc))
  189. clish_xmldoc_release(doc);
  190. #ifdef HAVE_LIB_LIBXSLT
  191. if (clish_xslt_is_valid(xslt))
  192. clish_xslt_release(xslt);
  193. #endif
  194. return res;
  195. }
  196. /*
  197. * ------------------------------------------------------
  198. * This function reads an element from the XML stream and processes it.
  199. * ------------------------------------------------------
  200. */
  201. static int process_node(clish_shell_t *shell, clish_xmlnode_t *node,
  202. void *parent)
  203. {
  204. int res = 0;
  205. switch (clish_xmlnode_get_type(node)) {
  206. case CLISH_XMLNODE_ELM: {
  207. clish_xml_cb_t * cb;
  208. char name[128];
  209. unsigned int namelen = sizeof(name);
  210. if (clish_xmlnode_get_name(node, name, &namelen) == 0) {
  211. for (cb = &xml_elements[0]; cb->element; cb++) {
  212. if (0 == strcmp(name, cb->element)) {
  213. #ifdef DEBUG
  214. fprintf(stderr, "NODE:");
  215. clish_xmlnode_print(node, stderr);
  216. fprintf(stderr, "\n");
  217. #endif
  218. /* process the elements at this level */
  219. res = cb->handler(shell, node, parent);
  220. /* Error message */
  221. if (res) {
  222. char *ename = clish_xmlnode_fetch_attr(node, "name");
  223. char *eref = clish_xmlnode_fetch_attr(node, "ref");
  224. char *ekey = clish_xmlnode_fetch_attr(node, "key");
  225. char *efile = clish_xmlnode_fetch_attr(node, "file");
  226. fprintf(stderr, CLISH_XML_ERROR_STR"Node %s", name);
  227. if (ename)
  228. fprintf(stderr, ", name=\"%s\"", ename);
  229. if (eref)
  230. fprintf(stderr, ", ref=\"%s\"", eref);
  231. if (ekey)
  232. fprintf(stderr, ", key=\"%s\"", ekey);
  233. if (efile)
  234. fprintf(stderr, ", file=\"%s\"", efile);
  235. fprintf(stderr, "\n");
  236. clish_xml_release(ename);
  237. clish_xml_release(eref);
  238. clish_xml_release(ekey);
  239. clish_xml_release(efile);
  240. }
  241. break;
  242. }
  243. }
  244. }
  245. break;
  246. }
  247. case CLISH_XMLNODE_DOC:
  248. case CLISH_XMLNODE_TEXT:
  249. case CLISH_XMLNODE_ATTR:
  250. case CLISH_XMLNODE_PI:
  251. case CLISH_XMLNODE_COMMENT:
  252. case CLISH_XMLNODE_DECL:
  253. case CLISH_XMLNODE_UNKNOWN:
  254. default:
  255. break;
  256. }
  257. return res;
  258. }
  259. /* ------------------------------------------------------ */
  260. static int process_children(clish_shell_t *shell,
  261. clish_xmlnode_t *element, void *parent)
  262. {
  263. clish_xmlnode_t *node = NULL;
  264. int res;
  265. while ((node = clish_xmlnode_next_child(element, node)) != NULL) {
  266. /* Now deal with all the contained elements */
  267. res = process_node(shell, node, parent);
  268. if (res)
  269. return res;
  270. }
  271. return 0;
  272. }
  273. /* ------------------------------------------------------ */
  274. static int process_clish_module(clish_shell_t *shell, clish_xmlnode_t *element,
  275. void *parent)
  276. {
  277. /* Create the global view */
  278. if (!shell->global)
  279. shell->global = clish_shell_find_create_view(shell,
  280. "__view_global", "");
  281. parent = parent; /* Happy compiler */
  282. return process_children(shell, element, shell->global);
  283. }
  284. /* ------------------------------------------------------ */
  285. static int process_view(clish_shell_t *shell, clish_xmlnode_t *element,
  286. void *parent)
  287. {
  288. clish_view_t *view;
  289. int res = -1;
  290. char *name = clish_xmlnode_fetch_attr(element, "name");
  291. char *prompt = clish_xmlnode_fetch_attr(element, "prompt");
  292. char *depth = clish_xmlnode_fetch_attr(element, "depth");
  293. char *restore = clish_xmlnode_fetch_attr(element, "restore");
  294. char *access = clish_xmlnode_fetch_attr(element, "access");
  295. /* Check syntax */
  296. if (!name) {
  297. fprintf(stderr, CLISH_XML_ERROR_ATTR("name"));
  298. goto error;
  299. }
  300. /* re-use a view if it already exists */
  301. view = clish_shell_find_create_view(shell, name, prompt);
  302. if (depth && (lub_ctype_isdigit(*depth))) {
  303. unsigned int res = 0;
  304. lub_conv_atoui(depth, &res, 0);
  305. clish_view__set_depth(view, res);
  306. }
  307. if (restore) {
  308. if (!lub_string_nocasecmp(restore, "depth"))
  309. clish_view__set_restore(view, CLISH_RESTORE_DEPTH);
  310. else if (!lub_string_nocasecmp(restore, "view"))
  311. clish_view__set_restore(view, CLISH_RESTORE_VIEW);
  312. else
  313. clish_view__set_restore(view, CLISH_RESTORE_NONE);
  314. }
  315. if (access)
  316. clish_view__set_access(view, access);
  317. //process_view_end:
  318. res = process_children(shell, element, view);
  319. error:
  320. clish_xml_release(name);
  321. clish_xml_release(prompt);
  322. clish_xml_release(depth);
  323. clish_xml_release(restore);
  324. clish_xml_release(access);
  325. parent = parent; /* Happy compiler */
  326. return res;
  327. }
  328. /* ------------------------------------------------------ */
  329. static int process_ptype(clish_shell_t *shell, clish_xmlnode_t *element,
  330. void *parent)
  331. {
  332. clish_ptype_method_e method;
  333. clish_ptype_preprocess_e preprocess;
  334. int res = -1;
  335. clish_ptype_t *ptype;
  336. char *name = clish_xmlnode_fetch_attr(element, "name");
  337. char *help = clish_xmlnode_fetch_attr(element, "help");
  338. char *pattern = clish_xmlnode_fetch_attr(element, "pattern");
  339. char *method_name = clish_xmlnode_fetch_attr(element, "method");
  340. char *preprocess_name = clish_xmlnode_fetch_attr(element, "preprocess");
  341. /* Check syntax */
  342. if (!name) {
  343. fprintf(stderr, CLISH_XML_ERROR_ATTR("name"));
  344. goto error;
  345. }
  346. method = clish_ptype_method_resolve(method_name);
  347. if (CLISH_PTYPE_METHOD_MAX == method) {
  348. fprintf(stderr, CLISH_XML_ERROR_ATTR("method"));
  349. goto error;
  350. }
  351. if ((method != CLISH_PTYPE_METHOD_CODE) && !pattern) {
  352. fprintf(stderr, CLISH_XML_ERROR_ATTR("pattern"));
  353. goto error;
  354. }
  355. preprocess = clish_ptype_preprocess_resolve(preprocess_name);
  356. ptype = clish_shell_find_create_ptype(shell,
  357. name, help, pattern, method, preprocess);
  358. res = process_children(shell, element, ptype);
  359. error:
  360. clish_xml_release(name);
  361. clish_xml_release(help);
  362. clish_xml_release(pattern);
  363. clish_xml_release(method_name);
  364. clish_xml_release(preprocess_name);
  365. parent = parent; /* Happy compiler */
  366. return res;
  367. }
  368. /* ------------------------------------------------------ */
  369. static int process_overview(clish_shell_t *shell, clish_xmlnode_t *element,
  370. void *parent)
  371. {
  372. char *content = NULL;
  373. unsigned int content_len = 2048;
  374. int result;
  375. /*
  376. * the code below faithfully assume that we'll be able fully store
  377. * the content of the node. If it's really, really big, we may have
  378. * an issue (but then, if it's that big, how the hell does it
  379. * already fits in allocated memory?)
  380. * Ergo, it -should- be safe.
  381. */
  382. do {
  383. char *new = (char*)realloc(content, content_len);
  384. if (!new) {
  385. if (content)
  386. free(content);
  387. return -1;
  388. }
  389. content = new;
  390. result = clish_xmlnode_get_content(element, content,
  391. &content_len);
  392. } while (result == -E2BIG);
  393. if (result == 0 && content) {
  394. /* set the overview text for this view */
  395. assert(NULL == shell->overview);
  396. /* store the overview */
  397. shell->overview = lub_string_dup(content);
  398. }
  399. if (content)
  400. free(content);
  401. parent = parent; /* Happy compiler */
  402. return 0;
  403. }
  404. /* ------------------------------------------------------ */
  405. static int process_command(clish_shell_t *shell, clish_xmlnode_t *element,
  406. void *parent)
  407. {
  408. clish_view_t *v = (clish_view_t *) parent;
  409. clish_command_t *cmd = NULL;
  410. clish_command_t *old;
  411. int res = -1;
  412. char *access = clish_xmlnode_fetch_attr(element, "access");
  413. char *name = clish_xmlnode_fetch_attr(element, "name");
  414. char *help = clish_xmlnode_fetch_attr(element, "help");
  415. char *view = clish_xmlnode_fetch_attr(element, "view");
  416. char *viewid = clish_xmlnode_fetch_attr(element, "viewid");
  417. char *escape_chars = clish_xmlnode_fetch_attr(element, "escape_chars");
  418. char *args_name = clish_xmlnode_fetch_attr(element, "args");
  419. char *args_help = clish_xmlnode_fetch_attr(element, "args_help");
  420. char *ref = clish_xmlnode_fetch_attr(element, "ref");
  421. #ifdef LEGACY
  422. char *lock = clish_xmlnode_fetch_attr(element, "lock");
  423. char *interrupt = clish_xmlnode_fetch_attr(element, "interrupt");
  424. clish_action_t *action;
  425. #endif
  426. /* Check syntax */
  427. if (!name) {
  428. fprintf(stderr, CLISH_XML_ERROR_ATTR("name"));
  429. goto error;
  430. }
  431. if (!help) {
  432. fprintf(stderr, CLISH_XML_ERROR_ATTR("help"));
  433. goto error;
  434. }
  435. /* check this command doesn't already exist */
  436. old = clish_view_find_command(v, name, BOOL_FALSE);
  437. if (old) {
  438. fprintf(stderr, CLISH_XML_ERROR_STR"Duplicate COMMAND name=\"%s\".\n", name);
  439. goto error;
  440. }
  441. /* create a command */
  442. cmd = clish_view_new_command(v, name, help);
  443. clish_command__set_pview(cmd, v);
  444. /* Reference 'ref' field */
  445. if (ref) {
  446. char *saveptr = NULL;
  447. const char *delim = "@";
  448. char *view_name = NULL;
  449. char *cmdn = NULL;
  450. char *str = lub_string_dup(ref);
  451. cmdn = strtok_r(str, delim, &saveptr);
  452. if (!cmdn) {
  453. fprintf(stderr, CLISH_XML_ERROR_STR"Invalid \"ref\" attribute value.\n");
  454. lub_string_free(str);
  455. goto error;
  456. }
  457. clish_command__set_alias(cmd, cmdn); /* alias name */
  458. view_name = strtok_r(NULL, delim, &saveptr);
  459. clish_command__set_alias_view(cmd, view_name);
  460. lub_string_free(str);
  461. }
  462. /* define some specialist escape characters */
  463. if (escape_chars)
  464. clish_command__set_escape_chars(cmd, escape_chars);
  465. if (args_name) {
  466. /* define a "rest of line" argument */
  467. clish_param_t *param;
  468. /* Check syntax */
  469. if (!args_help) {
  470. fprintf(stderr, CLISH_XML_ERROR_ATTR("args_help"));
  471. goto error;
  472. }
  473. param = clish_param_new(args_name, args_help, "__ptype_ARGS");
  474. clish_command__set_args(cmd, param);
  475. }
  476. /* define the view which this command changes to */
  477. if (view) {
  478. /* reference the next view */
  479. clish_command__set_viewname(cmd, view);
  480. }
  481. /* define the view id which this command changes to */
  482. if (viewid)
  483. clish_command__set_viewid(cmd, viewid);
  484. #ifdef LEGACY
  485. action = clish_command__get_action(cmd);
  486. /* lock */
  487. if (lock) { // Don't change anything if lock is not specified
  488. if (lub_string_nocasecmp(lock, "false") == 0)
  489. clish_action__set_lock(action, BOOL_FALSE);
  490. else
  491. clish_action__set_lock(action, BOOL_TRUE);
  492. }
  493. /* interrupt */
  494. if (interrupt) { // Don't change anything if lock is not specified
  495. if (lub_string_nocasecmp(interrupt, "true") == 0)
  496. clish_action__set_interrupt(action, BOOL_TRUE);
  497. else
  498. clish_action__set_interrupt(action, BOOL_FALSE);
  499. }
  500. #endif
  501. if (access)
  502. clish_command__set_access(cmd, access);
  503. //process_command_end:
  504. res = process_children(shell, element, cmd);
  505. error:
  506. clish_xml_release(access);
  507. clish_xml_release(name);
  508. clish_xml_release(help);
  509. clish_xml_release(view);
  510. clish_xml_release(viewid);
  511. clish_xml_release(escape_chars);
  512. clish_xml_release(args_name);
  513. clish_xml_release(args_help);
  514. clish_xml_release(ref);
  515. #ifdef LEGACY
  516. clish_xml_release(lock);
  517. clish_xml_release(interrupt);
  518. #endif
  519. return res;
  520. }
  521. /* ------------------------------------------------------ */
  522. static int process_startup(clish_shell_t *shell, clish_xmlnode_t *element,
  523. void *parent)
  524. {
  525. clish_view_t *v = (clish_view_t *) parent;
  526. clish_command_t *cmd = NULL;
  527. int res = -1;
  528. char *view = clish_xmlnode_fetch_attr(element, "view");
  529. char *viewid = clish_xmlnode_fetch_attr(element, "viewid");
  530. char *default_shebang =
  531. clish_xmlnode_fetch_attr(element, "default_shebang");
  532. char *timeout = clish_xmlnode_fetch_attr(element, "timeout");
  533. char *default_plugin = clish_xmlnode_fetch_attr(element,
  534. "default_plugin");
  535. #ifdef LEGACY
  536. char *lock = clish_xmlnode_fetch_attr(element, "lock");
  537. char *interrupt = clish_xmlnode_fetch_attr(element, "interrupt");
  538. clish_action_t *action;
  539. #endif
  540. /* Check syntax */
  541. if (!view) {
  542. fprintf(stderr, CLISH_XML_ERROR_ATTR("view"));
  543. goto error;
  544. }
  545. if (shell->startup) {
  546. fprintf(stderr, CLISH_XML_ERROR_STR"STARTUP tag duplication.\n");
  547. goto error;
  548. }
  549. /* create a command with NULL help */
  550. cmd = clish_view_new_command(v, "startup", NULL);
  551. clish_command__set_internal(cmd, BOOL_TRUE);
  552. /* reference the next view */
  553. clish_command__set_viewname(cmd, view);
  554. /* define the view id which this command changes to */
  555. if (viewid)
  556. clish_command__set_viewid(cmd, viewid);
  557. if (default_shebang)
  558. clish_shell__set_default_shebang(shell, default_shebang);
  559. if (timeout) {
  560. unsigned int to = 0;
  561. lub_conv_atoui(timeout, &to, 0);
  562. clish_shell__set_idle_timeout(shell, to);
  563. }
  564. #ifdef LEGACY
  565. action = clish_command__get_action(cmd);
  566. /* lock */
  567. if (lock) { // Don't change anything if lock is not specified
  568. if (lub_string_nocasecmp(lock, "false") == 0)
  569. clish_action__set_lock(action, BOOL_FALSE);
  570. else
  571. clish_action__set_lock(action, BOOL_TRUE);
  572. }
  573. /* interrupt */
  574. if (interrupt) { // Don't change anything if lock is not specified
  575. if (lub_string_nocasecmp(interrupt, "true") == 0)
  576. clish_action__set_interrupt(action, BOOL_TRUE);
  577. else
  578. clish_action__set_interrupt(action, BOOL_FALSE);
  579. }
  580. #endif
  581. /* If we need the default plugin */
  582. if (default_plugin && (0 == strcmp(default_plugin, "false")))
  583. shell->default_plugin = BOOL_FALSE;
  584. /* remember this command */
  585. shell->startup = cmd;
  586. res = process_children(shell, element, cmd);
  587. error:
  588. clish_xml_release(view);
  589. clish_xml_release(viewid);
  590. clish_xml_release(default_shebang);
  591. clish_xml_release(timeout);
  592. #ifdef LEGACY
  593. clish_xml_release(lock);
  594. clish_xml_release(interrupt);
  595. #endif
  596. return res;
  597. }
  598. /* ------------------------------------------------------ */
  599. static int process_param(clish_shell_t *shell, clish_xmlnode_t *element,
  600. void *parent)
  601. {
  602. clish_command_t *cmd = NULL;
  603. clish_param_t *p_param = NULL;
  604. clish_xmlnode_t *pelement;
  605. clish_param_t *param;
  606. char *pname;
  607. int res = -1;
  608. char *name = clish_xmlnode_fetch_attr(element, "name");
  609. char *help = clish_xmlnode_fetch_attr(element, "help");
  610. char *ptype = clish_xmlnode_fetch_attr(element, "ptype");
  611. char *prefix = clish_xmlnode_fetch_attr(element, "prefix");
  612. char *defval = clish_xmlnode_fetch_attr(element, "default");
  613. char *mode = clish_xmlnode_fetch_attr(element, "mode");
  614. char *optional = clish_xmlnode_fetch_attr(element, "optional");
  615. char *order = clish_xmlnode_fetch_attr(element, "order");
  616. char *value = clish_xmlnode_fetch_attr(element, "value");
  617. char *hidden = clish_xmlnode_fetch_attr(element, "hidden");
  618. char *test = clish_xmlnode_fetch_attr(element, "test");
  619. char *completion = clish_xmlnode_fetch_attr(element, "completion");
  620. char *access = clish_xmlnode_fetch_attr(element, "access");
  621. /* The PARAM can be child of COMMAND or another PARAM */
  622. pelement = clish_xmlnode_parent(element);
  623. pname = clish_xmlnode_get_all_name(pelement);
  624. if (pname && lub_string_nocasecmp(pname, "PARAM") == 0)
  625. p_param = (clish_param_t *)parent;
  626. else
  627. cmd = (clish_command_t *)parent;
  628. if (pname)
  629. free(pname);
  630. if (!cmd && !p_param)
  631. goto error;
  632. /* Check syntax */
  633. if (cmd && (cmd == shell->startup)) {
  634. fprintf(stderr, CLISH_XML_ERROR_STR"STARTUP can't contain PARAMs.\n");
  635. goto error;
  636. }
  637. if (!name) {
  638. fprintf(stderr, CLISH_XML_ERROR_ATTR("name"));
  639. goto error;
  640. }
  641. if (!help) {
  642. fprintf(stderr, CLISH_XML_ERROR_ATTR("help"));
  643. goto error;
  644. }
  645. if (!ptype) {
  646. fprintf(stderr, CLISH_XML_ERROR_ATTR("ptype"));
  647. goto error;
  648. }
  649. param = clish_param_new(name, help, ptype);
  650. /* If prefix is set clish will emulate old optional
  651. * command syntax over newer optional command mechanism.
  652. * It will create nested PARAM.
  653. */
  654. if (prefix) {
  655. const char *ptype_name = "__ptype_SUBCOMMAND";
  656. clish_param_t *opt_param = NULL;
  657. char *str = NULL;
  658. clish_ptype_t *tmp;
  659. /* Create a ptype for prefix-named subcommand that
  660. * will contain the nested optional parameter. The
  661. * name of ptype is hardcoded. It's not good but
  662. * it's only the service ptype.
  663. */
  664. tmp = clish_shell_find_create_ptype(shell,
  665. ptype_name, "Option", "[^\\\\]+",
  666. CLISH_PTYPE_METHOD_REGEXP, CLISH_PTYPE_PRE_NONE);
  667. assert(tmp);
  668. lub_string_cat(&str, "_prefix_");
  669. lub_string_cat(&str, name);
  670. opt_param = clish_param_new(str, help, ptype_name);
  671. lub_string_free(str);
  672. clish_param__set_mode(opt_param,
  673. CLISH_PARAM_SUBCOMMAND);
  674. clish_param__set_value(opt_param, prefix);
  675. clish_param__set_optional(opt_param, BOOL_TRUE);
  676. if (test)
  677. clish_param__set_test(opt_param, test);
  678. /* Add the parameter to the command */
  679. if (cmd)
  680. clish_command_insert_param(cmd, opt_param);
  681. /* Add the parameter to the param */
  682. if (p_param)
  683. clish_param_insert_param(p_param, opt_param);
  684. /* Unset cmd and set parent param to opt_param */
  685. cmd = NULL;
  686. p_param = opt_param;
  687. }
  688. if (defval)
  689. clish_param__set_defval(param, defval);
  690. if (hidden && lub_string_nocasecmp(hidden, "true") == 0)
  691. clish_param__set_hidden(param, BOOL_TRUE);
  692. else
  693. clish_param__set_hidden(param, BOOL_FALSE);
  694. if (mode) {
  695. if (lub_string_nocasecmp(mode, "switch") == 0) {
  696. clish_param__set_mode(param,
  697. CLISH_PARAM_SWITCH);
  698. /* Force hidden attribute */
  699. clish_param__set_hidden(param, BOOL_TRUE);
  700. } else if (lub_string_nocasecmp(mode, "subcommand") == 0)
  701. clish_param__set_mode(param,
  702. CLISH_PARAM_SUBCOMMAND);
  703. else
  704. clish_param__set_mode(param,
  705. CLISH_PARAM_COMMON);
  706. }
  707. if (optional && lub_string_nocasecmp(optional, "true") == 0)
  708. clish_param__set_optional(param, BOOL_TRUE);
  709. else
  710. clish_param__set_optional(param, BOOL_FALSE);
  711. if (order && lub_string_nocasecmp(order, "true") == 0)
  712. clish_param__set_order(param, BOOL_TRUE);
  713. else
  714. clish_param__set_order(param, BOOL_FALSE);
  715. if (value) {
  716. clish_param__set_value(param, value);
  717. /* Force mode to subcommand */
  718. clish_param__set_mode(param,
  719. CLISH_PARAM_SUBCOMMAND);
  720. }
  721. if (test && !prefix)
  722. clish_param__set_test(param, test);
  723. if (completion)
  724. clish_param__set_completion(param, completion);
  725. if (access)
  726. clish_param__set_access(param, access);
  727. /* Add the parameter to the command */
  728. if (cmd)
  729. clish_command_insert_param(cmd, param);
  730. /* Add the parameter to the param */
  731. if (p_param)
  732. clish_param_insert_param(p_param, param);
  733. res = process_children(shell, element, param);
  734. error:
  735. clish_xml_release(name);
  736. clish_xml_release(help);
  737. clish_xml_release(ptype);
  738. clish_xml_release(prefix);
  739. clish_xml_release(defval);
  740. clish_xml_release(mode);
  741. clish_xml_release(optional);
  742. clish_xml_release(order);
  743. clish_xml_release(value);
  744. clish_xml_release(hidden);
  745. clish_xml_release(test);
  746. clish_xml_release(completion);
  747. clish_xml_release(access);
  748. return res;
  749. }
  750. /* ------------------------------------------------------ */
  751. static int process_action(clish_shell_t *shell, clish_xmlnode_t *element,
  752. void *parent)
  753. {
  754. clish_action_t *action = NULL;
  755. char *builtin = clish_xmlnode_fetch_attr(element, "builtin");
  756. char *shebang = clish_xmlnode_fetch_attr(element, "shebang");
  757. char *lock = clish_xmlnode_fetch_attr(element, "lock");
  758. char *interrupt = clish_xmlnode_fetch_attr(element, "interrupt");
  759. char *interactive = clish_xmlnode_fetch_attr(element, "interactive");
  760. clish_xmlnode_t *pelement = clish_xmlnode_parent(element);
  761. char *pname = clish_xmlnode_get_all_name(pelement);
  762. char *text;
  763. clish_sym_t *sym = NULL;
  764. if (pname && lub_string_nocasecmp(pname, "VAR") == 0)
  765. action = clish_var__get_action((clish_var_t *)parent);
  766. else if (pname && lub_string_nocasecmp(pname, "PTYPE") == 0)
  767. action = clish_ptype__get_action((clish_ptype_t *)parent);
  768. else
  769. action = clish_command__get_action((clish_command_t *)parent);
  770. if (pname)
  771. free(pname);
  772. text = clish_xmlnode_get_all_content(element);
  773. if (text && *text) {
  774. /* store the action */
  775. clish_action__set_script(action, text);
  776. }
  777. if (text)
  778. free(text);
  779. if (builtin)
  780. sym = clish_shell_add_unresolved_sym(shell, builtin,
  781. CLISH_SYM_TYPE_ACTION);
  782. else
  783. sym = shell->hooks[CLISH_SYM_TYPE_ACTION];
  784. clish_action__set_builtin(action, sym);
  785. if (shebang)
  786. clish_action__set_shebang(action, shebang);
  787. /* lock */
  788. if (lock && lub_string_nocasecmp(lock, "false") == 0)
  789. clish_action__set_lock(action, BOOL_FALSE);
  790. /* interrupt */
  791. if (interrupt && lub_string_nocasecmp(interrupt, "true") == 0)
  792. clish_action__set_interrupt(action, BOOL_TRUE);
  793. clish_xml_release(builtin);
  794. clish_xml_release(shebang);
  795. clish_xml_release(lock);
  796. clish_xml_release(interrupt);
  797. clish_xml_release(interactive);
  798. return 0;
  799. }
  800. /* ------------------------------------------------------ */
  801. static int process_detail(clish_shell_t *shell, clish_xmlnode_t *element,
  802. void *parent)
  803. {
  804. clish_command_t *cmd = (clish_command_t *) parent;
  805. /* read the following text element */
  806. char *text = clish_xmlnode_get_all_content(element);
  807. if (text && *text) {
  808. /* store the action */
  809. clish_command__set_detail(cmd, text);
  810. }
  811. if (text)
  812. free(text);
  813. shell = shell; /* Happy compiler */
  814. return 0;
  815. }
  816. /* ------------------------------------------------------ */
  817. static int process_namespace(clish_shell_t *shell, clish_xmlnode_t *element,
  818. void *parent)
  819. {
  820. clish_view_t *v = (clish_view_t *)parent;
  821. clish_nspace_t *nspace = NULL;
  822. int res = -1;
  823. char *view = clish_xmlnode_fetch_attr(element, "ref");
  824. char *prefix = clish_xmlnode_fetch_attr(element, "prefix");
  825. char *prefix_help = clish_xmlnode_fetch_attr(element, "prefix_help");
  826. char *help = clish_xmlnode_fetch_attr(element, "help");
  827. char *completion = clish_xmlnode_fetch_attr(element, "completion");
  828. char *context_help = clish_xmlnode_fetch_attr(element, "context_help");
  829. char *inherit = clish_xmlnode_fetch_attr(element, "inherit");
  830. char *access = clish_xmlnode_fetch_attr(element, "access");
  831. /* Check syntax */
  832. if (!view) {
  833. fprintf(stderr, CLISH_XML_ERROR_ATTR("ref"));
  834. goto error;
  835. }
  836. clish_view_t *ref_view = clish_shell_find_view(shell, view);
  837. /* Don't include itself without prefix */
  838. if ((ref_view == v) && !prefix)
  839. goto process_namespace_end;
  840. nspace = clish_nspace_new(view);
  841. clish_view_insert_nspace(v, nspace);
  842. if (prefix) {
  843. clish_nspace__set_prefix(nspace, prefix);
  844. if (prefix_help)
  845. clish_nspace_create_prefix_cmd(nspace,
  846. "prefix",
  847. prefix_help);
  848. else
  849. clish_nspace_create_prefix_cmd(nspace,
  850. "prefix",
  851. "Prefix for the imported commands.");
  852. }
  853. if (help && lub_string_nocasecmp(help, "true") == 0)
  854. clish_nspace__set_help(nspace, BOOL_TRUE);
  855. else
  856. clish_nspace__set_help(nspace, BOOL_FALSE);
  857. if (completion && lub_string_nocasecmp(completion, "false") == 0)
  858. clish_nspace__set_completion(nspace, BOOL_FALSE);
  859. else
  860. clish_nspace__set_completion(nspace, BOOL_TRUE);
  861. if (context_help && lub_string_nocasecmp(context_help, "true") == 0)
  862. clish_nspace__set_context_help(nspace, BOOL_TRUE);
  863. else
  864. clish_nspace__set_context_help(nspace, BOOL_FALSE);
  865. if (inherit && lub_string_nocasecmp(inherit, "false") == 0)
  866. clish_nspace__set_inherit(nspace, BOOL_FALSE);
  867. else
  868. clish_nspace__set_inherit(nspace, BOOL_TRUE);
  869. if (access)
  870. clish_nspace__set_access(nspace, access);
  871. process_namespace_end:
  872. res = 0;
  873. error:
  874. clish_xml_release(view);
  875. clish_xml_release(prefix);
  876. clish_xml_release(prefix_help);
  877. clish_xml_release(help);
  878. clish_xml_release(completion);
  879. clish_xml_release(context_help);
  880. clish_xml_release(inherit);
  881. clish_xml_release(access);
  882. return res;
  883. }
  884. /* ------------------------------------------------------ */
  885. static int process_config(clish_shell_t *shell, clish_xmlnode_t *element,
  886. void *parent)
  887. {
  888. clish_command_t *cmd = (clish_command_t *)parent;
  889. clish_config_t *config;
  890. if (!cmd)
  891. return 0;
  892. config = clish_command__get_config(cmd);
  893. /* read the following text element */
  894. char *operation = clish_xmlnode_fetch_attr(element, "operation");
  895. char *priority = clish_xmlnode_fetch_attr(element, "priority");
  896. char *pattern = clish_xmlnode_fetch_attr(element, "pattern");
  897. char *file = clish_xmlnode_fetch_attr(element, "file");
  898. char *splitter = clish_xmlnode_fetch_attr(element, "splitter");
  899. char *seq = clish_xmlnode_fetch_attr(element, "sequence");
  900. char *unique = clish_xmlnode_fetch_attr(element, "unique");
  901. char *depth = clish_xmlnode_fetch_attr(element, "depth");
  902. if (operation && !lub_string_nocasecmp(operation, "unset"))
  903. clish_config__set_op(config, CLISH_CONFIG_UNSET);
  904. else if (operation && !lub_string_nocasecmp(operation, "none"))
  905. clish_config__set_op(config, CLISH_CONFIG_NONE);
  906. else if (operation && !lub_string_nocasecmp(operation, "dump"))
  907. clish_config__set_op(config, CLISH_CONFIG_DUMP);
  908. else {
  909. clish_config__set_op(config, CLISH_CONFIG_SET);
  910. /* The priority if no clearly specified */
  911. clish_config__set_priority(config, 0x7f00);
  912. }
  913. if (priority) {
  914. unsigned short pri = 0;
  915. lub_conv_atous(priority, &pri, 0);
  916. clish_config__set_priority(config, pri);
  917. }
  918. if (pattern)
  919. clish_config__set_pattern(config, pattern);
  920. else
  921. clish_config__set_pattern(config, "^${__cmd}");
  922. if (file)
  923. clish_config__set_file(config, file);
  924. if (splitter && lub_string_nocasecmp(splitter, "false") == 0)
  925. clish_config__set_splitter(config, BOOL_FALSE);
  926. else
  927. clish_config__set_splitter(config, BOOL_TRUE);
  928. if (unique && lub_string_nocasecmp(unique, "false") == 0)
  929. clish_config__set_unique(config, BOOL_FALSE);
  930. else
  931. clish_config__set_unique(config, BOOL_TRUE);
  932. if (seq)
  933. clish_config__set_seq(config, seq);
  934. else
  935. /* The entries without sequence cannot be non-unique */
  936. clish_config__set_unique(config, BOOL_TRUE);
  937. if (depth)
  938. clish_config__set_depth(config, depth);
  939. clish_xml_release(operation);
  940. clish_xml_release(priority);
  941. clish_xml_release(pattern);
  942. clish_xml_release(file);
  943. clish_xml_release(splitter);
  944. clish_xml_release(seq);
  945. clish_xml_release(unique);
  946. clish_xml_release(depth);
  947. shell = shell; /* Happy compiler */
  948. return 0;
  949. }
  950. /* ------------------------------------------------------ */
  951. static int process_var(clish_shell_t *shell, clish_xmlnode_t *element,
  952. void *parent)
  953. {
  954. clish_var_t *var = NULL;
  955. int res = -1;
  956. char *name = clish_xmlnode_fetch_attr(element, "name");
  957. char *dynamic = clish_xmlnode_fetch_attr(element, "dynamic");
  958. char *value = clish_xmlnode_fetch_attr(element, "value");
  959. /* Check syntax */
  960. if (!name) {
  961. fprintf(stderr, CLISH_XML_ERROR_ATTR("name"));
  962. goto error;
  963. }
  964. /* Check if this var doesn't already exist */
  965. var = (clish_var_t *)lub_bintree_find(&shell->var_tree, name);
  966. if (var) {
  967. fprintf(stderr, CLISH_XML_ERROR_STR"Duplicate VAR name=\"%s\".\n", name);
  968. goto error;
  969. }
  970. /* Create var instance */
  971. var = clish_var_new(name);
  972. lub_bintree_insert(&shell->var_tree, var);
  973. if (dynamic && lub_string_nocasecmp(dynamic, "true") == 0)
  974. clish_var__set_dynamic(var, BOOL_TRUE);
  975. if (value)
  976. clish_var__set_value(var, value);
  977. res = process_children(shell, element, var);
  978. error:
  979. clish_xml_release(name);
  980. clish_xml_release(dynamic);
  981. clish_xml_release(value);
  982. parent = parent; /* Happy compiler */
  983. return res;
  984. }
  985. /* ------------------------------------------------------ */
  986. static int process_wdog(clish_shell_t *shell,
  987. clish_xmlnode_t *element, void *parent)
  988. {
  989. clish_view_t *v = (clish_view_t *)parent;
  990. clish_command_t *cmd = NULL;
  991. int res = -1;
  992. /* Check syntax */
  993. if (shell->wdog) {
  994. fprintf(stderr, CLISH_XML_ERROR_STR"WATCHDOG tag duplication.\n");
  995. goto error;
  996. }
  997. /* Create a command with NULL help */
  998. cmd = clish_view_new_command(v, "watchdog", NULL);
  999. #ifdef LEGACY
  1000. // Legacy watchdog has lockless ACTION
  1001. clish_action__set_lock(clish_command__get_action(cmd), BOOL_FALSE);
  1002. #endif
  1003. /* Remember this command */
  1004. shell->wdog = cmd;
  1005. res = process_children(shell, element, cmd);
  1006. error:
  1007. return res;
  1008. }
  1009. /* ------------------------------------------------------ */
  1010. static int process_hotkey(clish_shell_t *shell, clish_xmlnode_t *element,
  1011. void *parent)
  1012. {
  1013. clish_view_t *v = (clish_view_t *)parent;
  1014. int res = -1;
  1015. char *key = clish_xmlnode_fetch_attr(element, "key");
  1016. char *cmd = clish_xmlnode_fetch_attr(element, "cmd");
  1017. /* Check syntax */
  1018. if (!key) {
  1019. fprintf(stderr, CLISH_XML_ERROR_ATTR("key"));
  1020. goto error;
  1021. }
  1022. if (!cmd) {
  1023. fprintf(stderr, CLISH_XML_ERROR_ATTR("cmd"));
  1024. goto error;
  1025. }
  1026. clish_view_insert_hotkey(v, key, cmd);
  1027. res = 0;
  1028. error:
  1029. clish_xml_release(key);
  1030. clish_xml_release(cmd);
  1031. shell = shell; /* Happy compiler */
  1032. return res;
  1033. }
  1034. /* ------------------------------------------------------ */
  1035. static int process_plugin(clish_shell_t *shell, clish_xmlnode_t *element,
  1036. void *parent)
  1037. {
  1038. clish_plugin_t *plugin;
  1039. char *file = clish_xmlnode_fetch_attr(element, "file");
  1040. char *name = clish_xmlnode_fetch_attr(element, "name");
  1041. char *alias = clish_xmlnode_fetch_attr(element, "alias");
  1042. char *rtld_global = clish_xmlnode_fetch_attr(element, "rtld_global");
  1043. int res = -1;
  1044. char *text;
  1045. /* Check syntax */
  1046. if (!name) {
  1047. fprintf(stderr, CLISH_XML_ERROR_ATTR("name"));
  1048. goto error;
  1049. }
  1050. plugin = clish_shell_find_plugin(shell, name);
  1051. if (plugin) {
  1052. fprintf(stderr,
  1053. CLISH_XML_ERROR_STR"PLUGIN %s duplication.\n", name);
  1054. goto error;
  1055. }
  1056. plugin = clish_shell_create_plugin(shell, name);
  1057. if (alias && *alias)
  1058. clish_plugin__set_alias(plugin, alias);
  1059. if (file && *file)
  1060. clish_plugin__set_file(plugin, file);
  1061. if (rtld_global && lub_string_nocasecmp(rtld_global, "true") == 0)
  1062. clish_plugin__set_rtld_global(plugin, BOOL_TRUE);
  1063. /* Get PLUGIN body content */
  1064. text = clish_xmlnode_get_all_content(element);
  1065. if (text && *text)
  1066. clish_plugin__set_conf(plugin, text);
  1067. if (text)
  1068. free(text);
  1069. res = 0;
  1070. error:
  1071. clish_xml_release(file);
  1072. clish_xml_release(name);
  1073. clish_xml_release(alias);
  1074. clish_xml_release(rtld_global);
  1075. parent = parent; /* Happy compiler */
  1076. return res;
  1077. }
  1078. /* ------------------------------------------------------ */
  1079. static int process_hook(clish_shell_t *shell, clish_xmlnode_t *element,
  1080. void *parent)
  1081. {
  1082. char *name = clish_xmlnode_fetch_attr(element, "name");
  1083. char *builtin = clish_xmlnode_fetch_attr(element, "builtin");
  1084. int res = -1;
  1085. int type = CLISH_SYM_TYPE_NONE;
  1086. /* Check syntax */
  1087. if (!name) {
  1088. fprintf(stderr, CLISH_XML_ERROR_ATTR("name"));
  1089. goto error;
  1090. }
  1091. /* Find out HOOK type */
  1092. if (!strcmp(name, "action"))
  1093. type = CLISH_SYM_TYPE_ACTION;
  1094. else if (!strcmp(name, "access"))
  1095. type = CLISH_SYM_TYPE_ACCESS;
  1096. else if (!strcmp(name, "config"))
  1097. type = CLISH_SYM_TYPE_CONFIG;
  1098. else if (!strcmp(name, "log"))
  1099. type = CLISH_SYM_TYPE_LOG;
  1100. if (CLISH_SYM_TYPE_NONE == type) {
  1101. fprintf(stderr, CLISH_XML_ERROR_STR"Unknown HOOK name %s.\n", name);
  1102. goto error;
  1103. }
  1104. /* Check duplicate HOOK tag */
  1105. if (shell->hooks_use[type]) {
  1106. fprintf(stderr,
  1107. CLISH_XML_ERROR_STR"HOOK %s duplication.\n", name);
  1108. goto error;
  1109. }
  1110. shell->hooks_use[type] = BOOL_TRUE;
  1111. clish_sym__set_name(shell->hooks[type], builtin);
  1112. res = 0;
  1113. error:
  1114. clish_xml_release(name);
  1115. clish_xml_release(builtin);
  1116. parent = parent; /* Happy compiler */
  1117. return res;
  1118. }
  1119. /* ------------------------------------------------------ */