shell_new.c 6.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234
  1. /*
  2. * shell_new.c
  3. */
  4. #include "private.h"
  5. #include <assert.h>
  6. #include <stdlib.h>
  7. #include <sys/types.h>
  8. #include <unistd.h>
  9. #include "lub/string.h"
  10. #include "lub/db.h"
  11. #include "lub/list.h"
  12. #include "clish/plugin.h"
  13. /*-------------------------------------------------------- */
  14. static void clish_shell_init(clish_shell_t * this,
  15. const clish_shell_hooks_t * hooks,
  16. void *cookie, FILE * istream,
  17. FILE * ostream,
  18. bool_t stop_on_error)
  19. {
  20. clish_ptype_t *tmp_ptype = NULL;
  21. clish_plugin_t *plugin = NULL;
  22. clish_sym_t *sym = NULL;
  23. /* initialise the tree of views */
  24. lub_bintree_init(&this->view_tree,
  25. clish_view_bt_offset(),
  26. clish_view_bt_compare, clish_view_bt_getkey);
  27. /* initialise the tree of ptypes */
  28. lub_bintree_init(&this->ptype_tree,
  29. clish_ptype_bt_offset(),
  30. clish_ptype_bt_compare, clish_ptype_bt_getkey);
  31. /* initialise the tree of vars */
  32. lub_bintree_init(&this->var_tree,
  33. clish_var_bt_offset(),
  34. clish_var_bt_compare, clish_var_bt_getkey);
  35. /* Initialize plugin list */
  36. this->plugins = lub_list_new(NULL);
  37. /* Create internal plugin "clish" */
  38. plugin = clish_plugin_new("clish", NULL);
  39. lub_list_add(this->plugins, plugin);
  40. /* Initialise the list of unresolved (yet) symbols */
  41. this->syms = lub_list_new(clish_sym_compare);
  42. /* Add default sym and save it to shell structure */
  43. sym = clish_shell_add_unresolved_sym(this,
  44. CLISH_DEFAULT_SYM, CLISH_SYM_TYPE_FN);
  45. this->default_sym = sym;
  46. assert(NULL != hooks);
  47. /* set up defaults */
  48. this->hooks = hooks;
  49. this->client_cookie = cookie;
  50. this->global = NULL;
  51. this->startup = NULL;
  52. this->idle_timeout = 0; /* No idle timeout by default */
  53. this->wdog = NULL;
  54. this->wdog_timeout = 0; /* No watchdog timeout by default */
  55. this->wdog_active = BOOL_FALSE;
  56. this->state = SHELL_STATE_INITIALISING;
  57. this->overview = NULL;
  58. this->tinyrl = clish_shell_tinyrl_new(istream, ostream, 0);
  59. this->current_file = NULL;
  60. this->pwdv = NULL;
  61. this->pwdc = 0;
  62. this->depth = -1; /* Current depth is undefined */
  63. this->client = NULL;
  64. this->lockfile = lub_string_dup(CLISH_LOCK_PATH);
  65. this->default_shebang = lub_string_dup("/bin/sh");
  66. this->fifo_name = NULL;
  67. this->interactive = BOOL_TRUE; /* The interactive shell by default. */
  68. this->log = BOOL_FALSE; /* Disable logging by default */
  69. this->dryrun = BOOL_FALSE; /* Disable dry-run by default */
  70. this->user = lub_db_getpwuid(getuid()); /* Get user information */
  71. /* Create internal ptypes and params */
  72. /* Current depth */
  73. tmp_ptype = clish_shell_find_create_ptype(this,
  74. "__DEPTH", "Depth", "[0-9]+",
  75. CLISH_PTYPE_REGEXP, CLISH_PTYPE_NONE);
  76. assert(tmp_ptype);
  77. this->param_depth = clish_param_new("_cur_depth",
  78. "Current depth", tmp_ptype);
  79. clish_param__set_hidden(this->param_depth, BOOL_TRUE);
  80. /* Current pwd */
  81. tmp_ptype = clish_shell_find_create_ptype(this,
  82. "__PWD", "Path", ".+",
  83. CLISH_PTYPE_REGEXP, CLISH_PTYPE_NONE);
  84. assert(tmp_ptype);
  85. this->param_pwd = clish_param_new("_cur_pwd",
  86. "Current path", tmp_ptype);
  87. clish_param__set_hidden(this->param_pwd, BOOL_TRUE);
  88. /* Args */
  89. tmp_ptype = clish_shell_find_create_ptype(this,
  90. "internal_ARGS",
  91. "Arguments", "[^\\\\]+",
  92. CLISH_PTYPE_REGEXP,
  93. CLISH_PTYPE_NONE);
  94. assert(tmp_ptype);
  95. /* Push non-NULL istream */
  96. if (istream)
  97. clish_shell_push_fd(this, istream, stop_on_error);
  98. }
  99. /*--------------------------------------------------------- */
  100. static void clish_shell_fini(clish_shell_t * this)
  101. {
  102. clish_view_t *view;
  103. clish_ptype_t *ptype;
  104. clish_var_t *var;
  105. unsigned i;
  106. lub_list_node_t *iter;
  107. /* delete each VIEW held */
  108. while ((view = lub_bintree_findfirst(&this->view_tree))) {
  109. lub_bintree_remove(&this->view_tree, view);
  110. clish_view_delete(view);
  111. }
  112. /* delete each PTYPE held */
  113. while ((ptype = lub_bintree_findfirst(&this->ptype_tree))) {
  114. lub_bintree_remove(&this->ptype_tree, ptype);
  115. clish_ptype_delete(ptype);
  116. }
  117. /* delete each VAR held */
  118. while ((var = lub_bintree_findfirst(&this->var_tree))) {
  119. lub_bintree_remove(&this->var_tree, var);
  120. clish_var_delete(var);
  121. }
  122. /* Free all loaded plugins */
  123. while ((iter = lub_list__get_head(this->plugins))) {
  124. /* Remove the symbol from the list */
  125. lub_list_del(this->plugins, iter);
  126. /* Free the instance */
  127. clish_plugin_free((clish_plugin_t *)lub_list_node__get_data(iter));
  128. lub_list_node_free(iter);
  129. }
  130. lub_list_free(this->plugins);
  131. /* Free symbol list */
  132. while ((iter = lub_list__get_head(this->syms))) {
  133. /* Remove the symbol from the list */
  134. lub_list_del(this->syms, iter);
  135. /* Free the instance */
  136. clish_sym_free((clish_sym_t *)lub_list_node__get_data(iter));
  137. lub_list_node_free(iter);
  138. }
  139. lub_list_free(this->syms);
  140. /* free the textual details */
  141. lub_string_free(this->overview);
  142. /* Remove the startup command */
  143. if (this->startup)
  144. clish_command_delete(this->startup);
  145. /* Remove the watchdog command */
  146. if (this->wdog)
  147. clish_command_delete(this->wdog);
  148. /* clean up the file stack */
  149. while (!clish_shell_pop_file(this));
  150. /* delete the tinyrl object */
  151. clish_shell_tinyrl_delete(this->tinyrl);
  152. /* finalize each of the pwd strings */
  153. for (i = 0; i < this->pwdc; i++) {
  154. clish_shell__fini_pwd(this->pwdv[i]);
  155. free(this->pwdv[i]);
  156. }
  157. /* free the pwd vector */
  158. free(this->pwdv);
  159. konf_client_free(this->client);
  160. /* Free internal params */
  161. clish_param_delete(this->param_depth);
  162. clish_param_delete(this->param_pwd);
  163. lub_string_free(this->lockfile);
  164. lub_string_free(this->default_shebang);
  165. free(this->user);
  166. if (this->fifo_name) {
  167. unlink(this->fifo_name);
  168. lub_string_free(this->fifo_name);
  169. }
  170. }
  171. /*-------------------------------------------------------- */
  172. clish_shell_t *clish_shell_new(const clish_shell_hooks_t * hooks,
  173. void *cookie,
  174. FILE * istream,
  175. FILE * ostream,
  176. bool_t stop_on_error)
  177. {
  178. clish_shell_t *this = malloc(sizeof(clish_shell_t));
  179. if (this) {
  180. clish_shell_init(this, hooks, cookie,
  181. istream, ostream, stop_on_error);
  182. if (hooks->init_fn) {
  183. /* now call the client initialisation */
  184. if (BOOL_TRUE != hooks->init_fn(this))
  185. this->state = SHELL_STATE_CLOSING;
  186. }
  187. }
  188. return this;
  189. }
  190. /*--------------------------------------------------------- */
  191. void clish_shell_delete(clish_shell_t * this)
  192. {
  193. /* now call the client finalisation */
  194. if (this->hooks->fini_fn)
  195. this->hooks->fini_fn(this);
  196. clish_shell_fini(this);
  197. free(this);
  198. }
  199. /*--------------------------------------------------------- */
  200. struct passwd *clish_shell__get_user(clish_shell_t * this)
  201. {
  202. return this->user;
  203. }
  204. /*-------------------------------------------------------- */