|
@@ -1,303 +0,0 @@
|
|
|
-/*
|
|
|
- * sym_navy.c
|
|
|
- */
|
|
|
-#include "private.h"
|
|
|
-#include "lub/ctype.h"
|
|
|
-#include "lub/string.h"
|
|
|
-#include "lub/argv.h"
|
|
|
-#include "lub/conv.h"
|
|
|
-
|
|
|
-#include <assert.h>
|
|
|
-#include <stdio.h>
|
|
|
-#include <unistd.h>
|
|
|
-#include <string.h>
|
|
|
-#include <stdlib.h>
|
|
|
-#include <errno.h>
|
|
|
-#include <sys/types.h>
|
|
|
-#include <sys/stat.h>
|
|
|
-#include <sys/file.h>
|
|
|
-#include <signal.h>
|
|
|
-#include <fcntl.h>
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/* Terminate the current shell session */
|
|
|
-CLISH_PLUGIN_SYM(clish_close)
|
|
|
-{
|
|
|
- clish_shell_t *this = clish_context__get_shell(clish_context);
|
|
|
- clish_shell__set_state(this, SHELL_STATE_CLOSING);
|
|
|
-
|
|
|
- script = script; /* Happy compiler */
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- Open a file and interpret it as a script in the context of a new
|
|
|
- thread. Whether the script continues after command, but not script,
|
|
|
- errors depends on the value of the stop_on_error flag.
|
|
|
-*/
|
|
|
-static int clish_source_internal(clish_context_t *context,
|
|
|
- const char *fn, int stop_on_error)
|
|
|
-{
|
|
|
- int result = -1;
|
|
|
- const char *filename = fn;
|
|
|
- struct stat fileStat;
|
|
|
-
|
|
|
- /* the exception proves the rule... */
|
|
|
- clish_shell_t *this = clish_context__get_shell(context);
|
|
|
-
|
|
|
- /*
|
|
|
- * Check file specified is not a directory
|
|
|
- */
|
|
|
- if ((0 == stat((char *)filename, &fileStat)) &&
|
|
|
- (!S_ISDIR(fileStat.st_mode))) {
|
|
|
- /*
|
|
|
- * push this file onto the file stack associated with this
|
|
|
- * session. This will be closed by clish_shell_pop_file()
|
|
|
- * when it is finished with.
|
|
|
- */
|
|
|
- result = clish_shell_push_file(this, filename,
|
|
|
- stop_on_error);
|
|
|
- }
|
|
|
-
|
|
|
- return result ? -1 : 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- Open a file and interpret it as a script in the context of a new
|
|
|
- thread. Invoking a script in this way will cause the script to
|
|
|
- stop on the first error
|
|
|
-*/
|
|
|
-CLISH_PLUGIN_SYM(clish_source)
|
|
|
-{
|
|
|
- clish_context_t *context = (clish_context_t *)clish_context;
|
|
|
-
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return (clish_source_internal(context, script, 1));
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- Open a file and interpret it as a script in the context of a new
|
|
|
- thread. Invoking a script in this way will cause the script to
|
|
|
- continue after command, but not script, errors.
|
|
|
-*/
|
|
|
-CLISH_PLUGIN_SYM(clish_source_nostop)
|
|
|
-{
|
|
|
- clish_context_t *context = (clish_context_t *)clish_context;
|
|
|
-
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return (clish_source_internal(context, script, 0));
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- Show the shell overview
|
|
|
-*/
|
|
|
-CLISH_PLUGIN_SYM(clish_overview)
|
|
|
-{
|
|
|
- clish_shell_t *this = clish_context__get_shell(clish_context);
|
|
|
- tinyrl_t *tinyrl = clish_shell__get_tinyrl(this);
|
|
|
- tinyrl_printf(tinyrl, "%s\n", clish_shell__get_overview(this));
|
|
|
-
|
|
|
- script = script; /* Happy compiler */
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-CLISH_PLUGIN_SYM(clish_history)
|
|
|
-{
|
|
|
- clish_shell_t *this = clish_context__get_shell(clish_context);
|
|
|
- tinyrl_t *tinyrl = clish_shell__get_tinyrl(this);
|
|
|
- tinyrl_history_t *history = tinyrl__get_history(tinyrl);
|
|
|
- tinyrl_history_iterator_t iter;
|
|
|
- const tinyrl_history_entry_t *entry;
|
|
|
- unsigned int limit = 0;
|
|
|
- const char *arg = script;
|
|
|
-
|
|
|
- if (arg && ('\0' != *arg)) {
|
|
|
- lub_conv_atoui(arg, &limit, 0);
|
|
|
- if (0 == limit) {
|
|
|
- /* unlimit the history list */
|
|
|
- (void)tinyrl_history_unstifle(history);
|
|
|
- } else {
|
|
|
- /* limit the scope of the history list */
|
|
|
- tinyrl_history_stifle(history, limit);
|
|
|
- }
|
|
|
- }
|
|
|
- for (entry = tinyrl_history_getfirst(history, &iter);
|
|
|
- entry; entry = tinyrl_history_getnext(&iter)) {
|
|
|
- /* dump the details of this entry */
|
|
|
- tinyrl_printf(tinyrl,
|
|
|
- "%5d %s\n",
|
|
|
- tinyrl_history_entry__get_index(entry),
|
|
|
- tinyrl_history_entry__get_line(entry));
|
|
|
- }
|
|
|
-
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- * Find out the previous view in the stack and go to it
|
|
|
- */
|
|
|
-CLISH_PLUGIN_SYM(clish_nested_up)
|
|
|
-{
|
|
|
- clish_shell_t *this = clish_context__get_shell(clish_context);
|
|
|
- unsigned int depth;
|
|
|
-
|
|
|
- if (!this)
|
|
|
- return -1;
|
|
|
- /* If depth=0 then exit */
|
|
|
- if (((depth = clish_shell__get_depth(this)) == 0) ||
|
|
|
- !clish_shell__set_depth(this, --depth)) {
|
|
|
- clish_shell__set_state(this, SHELL_STATE_CLOSING);
|
|
|
- return 0;
|
|
|
- }
|
|
|
-
|
|
|
- script = script; /* Happy compiler */
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- * Builtin: NOP function
|
|
|
- */
|
|
|
-CLISH_PLUGIN_SYM(clish_nop)
|
|
|
-{
|
|
|
- script = script; /* Happy compiler */
|
|
|
- out = out; /* Happy compiler */
|
|
|
- clish_context = clish_context; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- * Builtin: Set watchdog timeout. The "0" to turn watchdog off.
|
|
|
- */
|
|
|
-CLISH_PLUGIN_SYM(clish_wdog)
|
|
|
-{
|
|
|
- const char *arg = script;
|
|
|
- clish_shell_t *this = clish_context__get_shell(clish_context);
|
|
|
- unsigned int wdto = 0;
|
|
|
-
|
|
|
- /* Turn off watchdog if no args */
|
|
|
- if (!arg || ('\0' == *arg)) {
|
|
|
- clish_shell__set_wdog_timeout(this, 0);
|
|
|
- return 0;
|
|
|
- }
|
|
|
-
|
|
|
- lub_conv_atoui(arg, &wdto, 0);
|
|
|
- clish_shell__set_wdog_timeout(this, wdto);
|
|
|
-
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*--------------------------------------------------------- */
|
|
|
-/*
|
|
|
- * Get the ACTION context as a macros
|
|
|
- */
|
|
|
-CLISH_PLUGIN_SYM(clish_macros)
|
|
|
-{
|
|
|
- if (!script) /* Nothing to do */
|
|
|
- return 0;
|
|
|
- *out = lub_string_dup(script);
|
|
|
-
|
|
|
- clish_context = clish_context; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-CLISH_PLUGIN_SYM(clish_machine_interface)
|
|
|
-{
|
|
|
- clish_shell_t *this = clish_context__get_shell(clish_context);
|
|
|
- clish_shell_set_machine_interface(this);
|
|
|
-
|
|
|
- script = script; /* Happy compiler */
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-CLISH_PLUGIN_SYM(clish_human_interface)
|
|
|
-{
|
|
|
- clish_shell_t *this = clish_context__get_shell(clish_context);
|
|
|
- clish_shell_set_human_interface(this);
|
|
|
-
|
|
|
- script = script; /* Happy compiler */
|
|
|
- out = out; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- * Builtin: Print script
|
|
|
- */
|
|
|
-CLISH_PLUGIN_SYM(clish_print_script)
|
|
|
-{
|
|
|
- if (!script)
|
|
|
- return 0;
|
|
|
- printf("%s\n", script);
|
|
|
-
|
|
|
- out = out; /* Happy compiler */
|
|
|
- clish_context = clish_context; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|
|
|
-/*
|
|
|
- * Builtin: Print param
|
|
|
- */
|
|
|
-CLISH_PLUGIN_SYM(clish_print_var)
|
|
|
-{
|
|
|
- char *str = NULL;
|
|
|
- char *copy = NULL;
|
|
|
- char *varname = NULL;
|
|
|
- char *t = NULL;
|
|
|
-
|
|
|
- // Script contains variable name
|
|
|
- if (!script)
|
|
|
- return 0;
|
|
|
-
|
|
|
- // Remove all spaces from var name
|
|
|
- copy = lub_string_dup(script);
|
|
|
- varname = copy;
|
|
|
- while (*varname && lub_ctype_isspace(*varname))
|
|
|
- varname++;
|
|
|
- t = varname;
|
|
|
- while (*t && !lub_ctype_isspace(*t))
|
|
|
- t++;
|
|
|
- *t = '\0';
|
|
|
-
|
|
|
- str = clish_shell_expand_var(varname, clish_context);
|
|
|
- lub_string_free(copy);
|
|
|
- if (!str)
|
|
|
- return 0;
|
|
|
- printf("%s\n", str);
|
|
|
- lub_string_free(str);
|
|
|
-
|
|
|
- out = out; /* Happy compiler */
|
|
|
- clish_context = clish_context; /* Happy compiler */
|
|
|
-
|
|
|
- return 0;
|
|
|
-}
|
|
|
-
|
|
|
-/*----------------------------------------------------------- */
|