shell_startup.c 8.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290
  1. /*
  2. * shell_startup.c
  3. */
  4. #include "private.h"
  5. #include <assert.h>
  6. #include "lub/string.h"
  7. /* Default hooks */
  8. const char* clish_plugin_default_hook[] = {
  9. NULL,
  10. "clish_script@clish",
  11. "clish_hook_access@clish",
  12. "clish_hook_config@clish",
  13. "clish_hook_log@clish"
  14. };
  15. /*----------------------------------------------------------- */
  16. int clish_shell_startup(clish_shell_t *this)
  17. {
  18. const char *banner;
  19. clish_context_t context;
  20. if (!this->startup) {
  21. fprintf(stderr, "Error: Can't get valid STARTUP tag.\n");
  22. return -1;
  23. }
  24. /* Prepare context */
  25. clish_context_init(&context, this);
  26. clish_context__set_cmd(&context, this->startup);
  27. clish_context__set_action(&context,
  28. clish_command__get_action(this->startup));
  29. banner = clish_command__get_detail(this->startup);
  30. if (banner)
  31. tinyrl_printf(this->tinyrl, "%s\n", banner);
  32. /* Call log initialize */
  33. if (clish_shell__get_log(this))
  34. clish_shell_exec_log(&context, NULL, 0);
  35. /* Call startup script */
  36. return clish_shell_execute(&context, NULL);
  37. }
  38. /*----------------------------------------------------------- */
  39. void clish_shell__set_startup_view(clish_shell_t *this, const char *viewname)
  40. {
  41. clish_view_t *view;
  42. assert(this);
  43. assert(this->startup);
  44. /* Search for the view */
  45. view = clish_shell_find_view(this, viewname);
  46. assert(view);
  47. clish_command__force_viewname(this->startup, viewname);
  48. }
  49. /*----------------------------------------------------------- */
  50. void clish_shell__set_startup_viewid(clish_shell_t *this, const char *viewid)
  51. {
  52. assert(this);
  53. assert(this->startup);
  54. clish_command__force_viewid(this->startup, viewid);
  55. }
  56. /*----------------------------------------------------------- */
  57. void clish_shell__set_default_shebang(clish_shell_t *this, const char *shebang)
  58. {
  59. assert(this);
  60. lub_string_free(this->default_shebang);
  61. this->default_shebang = lub_string_dup(shebang);
  62. }
  63. /*----------------------------------------------------------- */
  64. const char * clish_shell__get_default_shebang(const clish_shell_t *this)
  65. {
  66. assert(this);
  67. return this->default_shebang;
  68. }
  69. /*-------------------------------------------------------- */
  70. /* Static recursive function to iterate parameters. Logically it's the
  71. * part of clish_shell_prepare() function.
  72. */
  73. static int iterate_paramv(clish_shell_t *this, clish_paramv_t *paramv,
  74. clish_hook_access_fn_t *access_fn)
  75. {
  76. int i = 0;
  77. clish_param_t *param;
  78. while((param = clish_paramv__get_param(paramv, i))) {
  79. clish_paramv_t *nested_paramv;
  80. clish_ptype_t *ptype = NULL;
  81. /* Resolve PARAM's PTYPE */
  82. ptype = clish_shell_find_ptype(this, clish_param__get_ptype_name(param));
  83. if (!ptype) {
  84. fprintf(stderr, "Error: Unresolved PTYPE \"%s\" in PARAM \"%s\"\n",
  85. clish_param__get_ptype_name(param),
  86. clish_param__get_name(param));
  87. return -1;
  88. }
  89. clish_param__set_ptype(param, ptype);
  90. clish_param__set_ptype_name(param, NULL); /* Free some memory */
  91. /* Check access for PARAM */
  92. if (access_fn && clish_param__get_access(param) &&
  93. access_fn(this, clish_param__get_access(param))) {
  94. #ifdef DEBUG
  95. fprintf(stderr, "Warning: Access denied. Remove PARAM \"%s\"\n",
  96. clish_param__get_name(param));
  97. #endif
  98. if (clish_paramv_remove(paramv, i) < 0) {
  99. fprintf(stderr, "Error: Some system problem\n");
  100. return -1;
  101. }
  102. clish_param_delete(param);
  103. continue; /* Don't increment index */
  104. }
  105. /* Recursive iterate nested PARAMs */
  106. nested_paramv = clish_param__get_paramv(param);
  107. if (iterate_paramv(this, nested_paramv, access_fn) < 0)
  108. return -1;
  109. i++;
  110. }
  111. return 0;
  112. }
  113. /*-------------------------------------------------------- */
  114. /* This function prepares schema for execution. It loads
  115. * plugins, link unresolved symbols, then iterates all the
  116. * objects and link them to each other, check access
  117. * permissions. Don't execute clish_shell_startup() without this
  118. * function.
  119. */
  120. int clish_shell_prepare(clish_shell_t *this)
  121. {
  122. clish_command_t *cmd;
  123. clish_view_t *view;
  124. clish_nspace_t *nspace;
  125. lub_bintree_t *view_tree, *cmd_tree;
  126. lub_list_t *nspace_tree;
  127. lub_bintree_iterator_t cmd_iter, view_iter;
  128. lub_list_node_t *nspace_iter;
  129. clish_hook_access_fn_t *access_fn = NULL;
  130. clish_paramv_t *paramv;
  131. int i;
  132. /* Add default plugin to the list of plugins */
  133. if (this->default_plugin) {
  134. clish_plugin_t *plugin;
  135. plugin = clish_plugin_new("clish");
  136. lub_list_add(this->plugins, plugin);
  137. /* Default hooks */
  138. for (i = 0; i < CLISH_SYM_TYPE_MAX; i++) {
  139. if (this->hooks_use[i])
  140. continue;
  141. if (!clish_plugin_default_hook[i])
  142. continue;
  143. clish_sym__set_name(this->hooks[i],
  144. clish_plugin_default_hook[i]);
  145. }
  146. }
  147. /* Add default syms to unresolved table */
  148. for (i = 0; i < CLISH_SYM_TYPE_MAX; i++) {
  149. if (clish_sym__get_name(this->hooks[i]))
  150. lub_list_add(this->syms, this->hooks[i]);
  151. }
  152. /* Load plugins and link symbols */
  153. if (clish_shell_load_plugins(this) < 0)
  154. return -1;
  155. if (clish_shell_link_plugins(this) < 0)
  156. return -1;
  157. access_fn = clish_sym__get_func(clish_shell_get_hook(this, CLISH_SYM_TYPE_ACCESS));
  158. /* Iterate the VIEWs */
  159. view_tree = &this->view_tree;
  160. view = lub_bintree_findfirst(view_tree);
  161. for (lub_bintree_iterator_init(&view_iter, view_tree, view);
  162. view; view = lub_bintree_iterator_next(&view_iter)) {
  163. /* Check access rights for the VIEW */
  164. if (access_fn && clish_view__get_access(view) &&
  165. access_fn(this, clish_view__get_access(view))) {
  166. #ifdef DEBUG
  167. fprintf(stderr, "Warning: Access denied. Remove VIEW \"%s\"\n",
  168. clish_view__get_name(view));
  169. #endif
  170. lub_bintree_remove(view_tree, view);
  171. clish_view_delete(view);
  172. continue;
  173. }
  174. /* Iterate the NAMESPACEs */
  175. nspace_tree = clish_view__get_nspace_tree(view);
  176. nspace_iter = lub_list__get_head(nspace_tree);
  177. while(nspace_iter) {
  178. clish_view_t *ref_view;
  179. lub_list_node_t *old_nspace_iter;
  180. nspace = (clish_nspace_t *)lub_list_node__get_data(nspace_iter);
  181. old_nspace_iter = nspace_iter;
  182. nspace_iter = lub_list_node__get_next(nspace_iter);
  183. /* Resolve NAMESPACEs and remove unresolved ones */
  184. ref_view = clish_shell_find_view(this, clish_nspace__get_view_name(nspace));
  185. if (!ref_view) {
  186. #ifdef DEBUG
  187. fprintf(stderr, "Warning: Remove unresolved NAMESPACE \"%s\" from \"%s\" VIEW\n",
  188. clish_nspace__get_view_name(nspace), clish_view__get_name(view));
  189. #endif
  190. lub_list_del(nspace_tree, old_nspace_iter);
  191. lub_list_node_free(old_nspace_iter);
  192. clish_nspace_delete(nspace);
  193. continue;
  194. }
  195. clish_nspace__set_view(nspace, ref_view);
  196. clish_nspace__set_view_name(nspace, NULL); /* Free some memory */
  197. /* Check access rights for the NAMESPACE */
  198. if (access_fn && clish_nspace__get_access(nspace) &&
  199. access_fn(this, clish_nspace__get_access(nspace))) {
  200. #ifdef DEBUG
  201. fprintf(stderr, "Warning: Access denied. Remove NAMESPACE \"%s\" from \"%s\" VIEW\n",
  202. clish_nspace__get_view_name(nspace), clish_view__get_name(view));
  203. #endif
  204. lub_list_del(nspace_tree, old_nspace_iter);
  205. lub_list_node_free(old_nspace_iter);
  206. clish_nspace_delete(nspace);
  207. continue;
  208. }
  209. }
  210. /* Iterate the COMMANDs */
  211. cmd_tree = clish_view__get_command_tree(view);
  212. cmd = lub_bintree_findfirst(cmd_tree);
  213. for (lub_bintree_iterator_init(&cmd_iter, cmd_tree, cmd);
  214. cmd; cmd = lub_bintree_iterator_next(&cmd_iter)) {
  215. int cmd_is_alias = clish_command__get_alias(cmd)?1:0;
  216. /* Resolve command aliases */
  217. if (cmd_is_alias) {
  218. clish_view_t *aview;
  219. clish_command_t *cmdref;
  220. const char *alias_view = clish_command__get_alias_view(cmd);
  221. if (!alias_view)
  222. aview = clish_command__get_pview(cmd);
  223. else
  224. aview = clish_shell_find_view(this, alias_view);
  225. if (!aview) {
  226. fprintf(stderr, CLISH_XML_ERROR_STR"Broken VIEW for alias \"%s\"\n",
  227. clish_command__get_name(cmd));
  228. return -1;
  229. }
  230. cmdref = clish_view_find_command(aview,
  231. clish_command__get_alias(cmd), BOOL_FALSE);
  232. if (!cmdref) {
  233. fprintf(stderr, CLISH_XML_ERROR_STR"Broken alias \"%s\"\n",
  234. clish_command__get_name(cmd));
  235. return -1;
  236. }
  237. if (!clish_command_alias_to_link(cmd, cmdref)) {
  238. fprintf(stderr, CLISH_XML_ERROR_STR"Something wrong with alias \"%s\"\n",
  239. clish_command__get_name(cmd));
  240. return -1;
  241. }
  242. }
  243. /* Check access rights for the COMMAND */
  244. if (access_fn && clish_command__get_access(cmd) &&
  245. access_fn(this, clish_command__get_access(cmd))) {
  246. #ifdef DEBUG
  247. fprintf(stderr, "Warning: Access denied. Remove COMMAND \"%s\" from VIEW \"%s\"\n",
  248. clish_command__get_name(cmd), clish_view__get_name(view));
  249. #endif
  250. lub_bintree_remove(cmd_tree, cmd);
  251. clish_command_delete(cmd);
  252. continue;
  253. }
  254. if (cmd_is_alias) /* Don't duplicate paramv processing for aliases */
  255. continue;
  256. paramv = clish_command__get_paramv(cmd);
  257. if (iterate_paramv(this, paramv, access_fn) < 0)
  258. return -1;
  259. }
  260. }
  261. return 0;
  262. }
  263. /*----------------------------------------------------------- */