add awx (awk web extension) - experimental core for a new web interface framework
git-svn-id: svn://svn.openwrt.org/openwrt/trunk@6549 3c298f89-4303-0410-b956-a3cf2f4a3e73master
Felix Fietkau
parent
295cf5cf94
commit
8513483ed3
|
|
@ -19,6 +19,7 @@ PKG_MD5SUM:=5728403bce309cdabcffa414e2e64052
|
||||||
PKG_CAT:=bzcat
|
PKG_CAT:=bzcat
|
||||||
|
|
||||||
PKG_BUILD_DIR:=$(BUILD_DIR)/$(PKG_NAME)-$(PKG_VERSION)
|
PKG_BUILD_DIR:=$(BUILD_DIR)/$(PKG_NAME)-$(PKG_VERSION)
|
||||||
|
PKG_BUILDDEP:=libcgi
|
||||||
|
|
||||||
include $(INCLUDE_DIR)/package.mk
|
include $(INCLUDE_DIR)/package.mk
|
||||||
|
|
||||||
|
|
@ -61,9 +62,10 @@ define Build/Compile
|
||||||
$(MAKE) -C $(PKG_BUILD_DIR) \
|
$(MAKE) -C $(PKG_BUILD_DIR) \
|
||||||
CC="$(TARGET_CC)" \
|
CC="$(TARGET_CC)" \
|
||||||
CROSS_COMPILE="$(TARGET_CROSS)" \
|
CROSS_COMPILE="$(TARGET_CROSS)" \
|
||||||
EXTRA_CFLAGS="$(TARGET_CFLAGS)" \
|
EXTRA_CFLAGS="$(TARGET_CFLAGS) -I$(STAGING_DIR)/usr/include" \
|
||||||
ARCH="$(ARCH)" \
|
ARCH="$(ARCH)" \
|
||||||
IPKG_ARCH="$(ARCH)" \
|
IPKG_ARCH="$(ARCH)" \
|
||||||
|
EXTRA_LIBS="$(STAGING_DIR)/usr/lib/libcgi.a" \
|
||||||
all
|
all
|
||||||
endef
|
endef
|
||||||
|
|
||||||
|
|
@ -71,10 +73,11 @@ define Package/busybox/install
|
||||||
$(MAKE) -C $(PKG_BUILD_DIR) \
|
$(MAKE) -C $(PKG_BUILD_DIR) \
|
||||||
CC="$(TARGET_CC)" \
|
CC="$(TARGET_CC)" \
|
||||||
CROSS_COMPILE="$(TARGET_CROSS)" \
|
CROSS_COMPILE="$(TARGET_CROSS)" \
|
||||||
EXTRA_CFLAGS="$(TARGET_CFLAGS)" \
|
EXTRA_CFLAGS="$(TARGET_CFLAGS) -I$(STAGING_DIR)/usr/include" \
|
||||||
ARCH="$(ARCH)" \
|
ARCH="$(ARCH)" \
|
||||||
IPKG_ARCH="$(ARCH)" \
|
IPKG_ARCH="$(ARCH)" \
|
||||||
CONFIG_PREFIX="$(1)" \
|
CONFIG_PREFIX="$(1)" \
|
||||||
|
EXTRA_LIBS="$(STAGING_DIR)/usr/lib/libcgi.a" \
|
||||||
install
|
install
|
||||||
$(INSTALL_DIR) $(1)/etc/init.d
|
$(INSTALL_DIR) $(1)/etc/init.d
|
||||||
for tmp in $(init-y); do \
|
for tmp in $(init-y); do \
|
||||||
|
|
|
||||||
|
|
@ -12,6 +12,13 @@ config BUSYBOX_CONFIG_AWK
|
||||||
Awk is used as a pattern scanning and processing language. This is
|
Awk is used as a pattern scanning and processing language. This is
|
||||||
the BusyBox implementation of that programming language.
|
the BusyBox implementation of that programming language.
|
||||||
|
|
||||||
|
config BUSYBOX_CONFIG_AWX
|
||||||
|
bool "Enable awx (awk web extension)"
|
||||||
|
default y
|
||||||
|
depends on BUSYBOX_CONFIG_AWK
|
||||||
|
help
|
||||||
|
awx - awk web extension
|
||||||
|
|
||||||
config BUSYBOX_CONFIG_FEATURE_AWK_MATH
|
config BUSYBOX_CONFIG_FEATURE_AWK_MATH
|
||||||
bool "Enable math functions (requires libm)"
|
bool "Enable math functions (requires libm)"
|
||||||
default y
|
default y
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,662 @@
|
||||||
|
diff -purN bb.old/editors/awk.c bb.dev/editors/awk.c
|
||||||
|
--- bb.old/editors/awk.c 2007-03-06 19:38:07.278092000 +0100
|
||||||
|
+++ bb.dev/editors/awk.c 2007-03-11 05:14:11.776304544 +0100
|
||||||
|
@@ -30,6 +30,11 @@
|
||||||
|
/* these flags are static, don't change them when value is changed */
|
||||||
|
#define VF_DONTTOUCH (VF_ARRAY | VF_SPECIAL | VF_WALK | VF_CHILD | VF_DIRTY)
|
||||||
|
|
||||||
|
+#ifdef CONFIG_AWX
|
||||||
|
+#define fputs(s, stream) fputs_hook(s, stream)
|
||||||
|
+static inline int fputs_hook (__const char *__restrict __s, FILE *__restrict __stream);
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
/* Variable */
|
||||||
|
typedef struct var_s {
|
||||||
|
unsigned short type; /* flags */
|
||||||
|
@@ -50,10 +55,15 @@ typedef struct chain_s {
|
||||||
|
char *programname;
|
||||||
|
} chain;
|
||||||
|
|
||||||
|
+typedef var *(*awk_cfunc)(var *res, var *args, int nargs);
|
||||||
|
/* Function */
|
||||||
|
typedef struct func_s {
|
||||||
|
unsigned short nargs;
|
||||||
|
- struct chain_s body;
|
||||||
|
+ enum { AWKFUNC, CFUNC } type;
|
||||||
|
+ union {
|
||||||
|
+ awk_cfunc cfunc;
|
||||||
|
+ struct chain_s body;
|
||||||
|
+ } x;
|
||||||
|
} func;
|
||||||
|
|
||||||
|
/* I/O stream */
|
||||||
|
@@ -1312,7 +1322,8 @@ static void parse_program(char *p)
|
||||||
|
next_token(TC_FUNCTION);
|
||||||
|
pos++;
|
||||||
|
f = newfunc(t.string);
|
||||||
|
- f->body.first = NULL;
|
||||||
|
+ f->type = AWKFUNC;
|
||||||
|
+ f->x.body.first = NULL;
|
||||||
|
f->nargs = 0;
|
||||||
|
while (next_token(TC_VARIABLE | TC_SEQTERM) & TC_VARIABLE) {
|
||||||
|
v = findvar(ahash, t.string);
|
||||||
|
@@ -1321,7 +1332,7 @@ static void parse_program(char *p)
|
||||||
|
if (next_token(TC_COMMA | TC_SEQTERM) & TC_SEQTERM)
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
- seq = &(f->body);
|
||||||
|
+ seq = &(f->x.body);
|
||||||
|
chain_group();
|
||||||
|
clear_array(ahash);
|
||||||
|
|
||||||
|
@@ -2260,7 +2271,8 @@ static var *evaluate(node *op, var *res)
|
||||||
|
break;
|
||||||
|
|
||||||
|
case XC( OC_FUNC ):
|
||||||
|
- if (! op->r.f->body.first)
|
||||||
|
+ if ((op->r.f->type == AWKFUNC) &&
|
||||||
|
+ !op->r.f->x.body.first)
|
||||||
|
runtime_error(EMSG_UNDEF_FUNC);
|
||||||
|
|
||||||
|
X.v = R.v = nvalloc(op->r.f->nargs+1);
|
||||||
|
@@ -2277,7 +2289,11 @@ static var *evaluate(node *op, var *res)
|
||||||
|
fnargs = X.v;
|
||||||
|
|
||||||
|
L.s = programname;
|
||||||
|
- res = evaluate(op->r.f->body.first, res);
|
||||||
|
+ if (op->r.f->type == AWKFUNC)
|
||||||
|
+ res = evaluate(op->r.f->x.body.first, res);
|
||||||
|
+ else if (op->r.f->type == CFUNC)
|
||||||
|
+ res = op->r.f->x.cfunc(res, fnargs, op->r.f->nargs);
|
||||||
|
+
|
||||||
|
programname = L.s;
|
||||||
|
|
||||||
|
nvfree(fnargs);
|
||||||
|
@@ -2637,6 +2653,11 @@ static rstream *next_input_file(void)
|
||||||
|
return &rsm;
|
||||||
|
}
|
||||||
|
|
||||||
|
+#ifdef CONFIG_AWX
|
||||||
|
+static int is_awx = 0;
|
||||||
|
+#include "awx.c"
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
int awk_main(int argc, char **argv)
|
||||||
|
{
|
||||||
|
int i, j, flen;
|
||||||
|
@@ -2693,6 +2714,10 @@ int awk_main(int argc, char **argv)
|
||||||
|
free(s);
|
||||||
|
}
|
||||||
|
|
||||||
|
+#ifdef CONFIG_AWX
|
||||||
|
+ do_awx(argc, argv);
|
||||||
|
+#endif
|
||||||
|
+
|
||||||
|
programname = NULL;
|
||||||
|
while((c = getopt(argc, argv, "F:v:f:W:")) != EOF) {
|
||||||
|
switch (c) {
|
||||||
|
diff -purN bb.old/editors/awx.c bb.dev/editors/awx.c
|
||||||
|
--- bb.old/editors/awx.c 1970-01-01 01:00:00.000000000 +0100
|
||||||
|
+++ bb.dev/editors/awx.c 2007-03-11 06:25:48.552095336 +0100
|
||||||
|
@@ -0,0 +1,521 @@
|
||||||
|
+/*
|
||||||
|
+ * awk web extension
|
||||||
|
+ *
|
||||||
|
+ * Copyright (C) 2007 by Felix Fietkau <nbd@openwrt.org>
|
||||||
|
+ *
|
||||||
|
+ * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
|
||||||
|
+ */
|
||||||
|
+
|
||||||
|
+#include <cgi.h>
|
||||||
|
+#include <glob.h>
|
||||||
|
+
|
||||||
|
+#define LINE_BUF 2048
|
||||||
|
+#define HASH_MAX 1536
|
||||||
|
+#define TR_START "@TR<<"
|
||||||
|
+#define TR_END ">>"
|
||||||
|
+#define MAX_TR 32
|
||||||
|
+#define SSI_START "<%"
|
||||||
|
+#define SSI_END "%>"
|
||||||
|
+
|
||||||
|
+#undef fputs
|
||||||
|
+
|
||||||
|
+static xhash *lstr = NULL;
|
||||||
|
+static int lang_inuse = 0;
|
||||||
|
+
|
||||||
|
+/* look up a translation symbol from the hash */
|
||||||
|
+static inline char *translate_lookup(char *str)
|
||||||
|
+{
|
||||||
|
+ char *name, *def, *p;
|
||||||
|
+ hash_item *hi;
|
||||||
|
+ var *v;
|
||||||
|
+
|
||||||
|
+ def = name = str;
|
||||||
|
+ if (((p = strchr(str, '|')) != NULL)
|
||||||
|
+ || ((p = strchr(str, '#')) != NULL)) {
|
||||||
|
+ def = p + 1;
|
||||||
|
+ *p = 0;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ hi = hash_search(lstr, name);
|
||||||
|
+ if (!hi)
|
||||||
|
+ return def;
|
||||||
|
+
|
||||||
|
+ v = &hi->data.v;
|
||||||
|
+
|
||||||
|
+ return getvar_s(v);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* look for translation markers in the line and return the translated string */
|
||||||
|
+static char *translate_line(char *line)
|
||||||
|
+{
|
||||||
|
+ char *tok[MAX_TR * 3];
|
||||||
|
+ char *l, *p, *p2, *res;
|
||||||
|
+ int len = 0, _pos = 0, i;
|
||||||
|
+
|
||||||
|
+ l = line;
|
||||||
|
+ while (l != NULL) {
|
||||||
|
+ if ((p = strstr(l, TR_START)) == NULL) {
|
||||||
|
+ len += strlen((tok[_pos++] = l));
|
||||||
|
+ break;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ p2 = strstr(p, TR_END);
|
||||||
|
+ if (p2 == NULL)
|
||||||
|
+ break;
|
||||||
|
+
|
||||||
|
+ *p = 0;
|
||||||
|
+ *p2 = 0;
|
||||||
|
+ len += strlen((tok[_pos++] = l));
|
||||||
|
+ len += strlen((tok[_pos++] = translate_lookup(p + strlen(TR_START))));
|
||||||
|
+
|
||||||
|
+ l = p2;
|
||||||
|
+ l += strlen(TR_END);
|
||||||
|
+ }
|
||||||
|
+ len++;
|
||||||
|
+
|
||||||
|
+ p = xmalloc(len + 1);
|
||||||
|
+ *p = 0;
|
||||||
|
+ res = p;
|
||||||
|
+ for (i = 0; i < _pos; i++) {
|
||||||
|
+ strcat(p, tok[i]);
|
||||||
|
+ p += strlen(tok[i]);
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ return res;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* hook for intercepting awk's use of puts. used for running all printed strings
|
||||||
|
+ * through the translation system */
|
||||||
|
+static inline int fputs_hook (__const char *__restrict __s, FILE *__restrict __stream)
|
||||||
|
+{
|
||||||
|
+ if (lang_inuse && (__stream == stdout)) {
|
||||||
|
+ int ret;
|
||||||
|
+ char *str;
|
||||||
|
+
|
||||||
|
+ str = translate_line((char *) __s);
|
||||||
|
+ ret = fputs(str, __stream);
|
||||||
|
+ free(str);
|
||||||
|
+
|
||||||
|
+ return ret;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ return fputs(__s, __stream);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+static var *init_lang(var *res, var *args, int nargs)
|
||||||
|
+{
|
||||||
|
+ if (!lstr)
|
||||||
|
+ lstr = hash_init();
|
||||||
|
+
|
||||||
|
+ lang_inuse = 1;
|
||||||
|
+ return res;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+
|
||||||
|
+/* load and parse language file */
|
||||||
|
+static void load_lang_file(char *file)
|
||||||
|
+{
|
||||||
|
+ FILE *f;
|
||||||
|
+ char *b, *name, *value;
|
||||||
|
+ char buf1[LINE_BUF];
|
||||||
|
+
|
||||||
|
+ if ((f = fopen(file, "r")) == NULL)
|
||||||
|
+ return;
|
||||||
|
+
|
||||||
|
+ while (!feof(f) && (fgets(buf1, LINE_BUF - 1, f) != NULL)) {
|
||||||
|
+ b = buf1;
|
||||||
|
+ if (*b == '#')
|
||||||
|
+ continue; /* skip comments */
|
||||||
|
+
|
||||||
|
+ while (isspace(*b))
|
||||||
|
+ b++; /* skip leading spaces */
|
||||||
|
+ if (!*b)
|
||||||
|
+ continue;
|
||||||
|
+
|
||||||
|
+ name = b;
|
||||||
|
+ if ((b = strstr(name, "=>")) == NULL)
|
||||||
|
+ continue; /* separator not found */
|
||||||
|
+
|
||||||
|
+ value = b + 2;
|
||||||
|
+ if (!*value)
|
||||||
|
+ continue;
|
||||||
|
+
|
||||||
|
+ *b = 0;
|
||||||
|
+ for (b--; isspace(*b); b--)
|
||||||
|
+ *b = 0; /* remove trailing spaces */
|
||||||
|
+
|
||||||
|
+ while (isspace(*value))
|
||||||
|
+ value++; /* skip leading spaces */
|
||||||
|
+
|
||||||
|
+ for (b = value + strlen(value) - 1; isspace(*b); b--)
|
||||||
|
+ *b = 0; /* remove trailing spaces */
|
||||||
|
+
|
||||||
|
+ if (!*value)
|
||||||
|
+ continue;
|
||||||
|
+
|
||||||
|
+ setvar_s(findvar(lstr,name), value);
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ fclose(f);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+static var *load_lang(var *res, var *args, int nargs)
|
||||||
|
+{
|
||||||
|
+ const char *langfmt = "/usr/lib/webif/lang/%s.txt";
|
||||||
|
+ char lbuf[LINE_BUF];
|
||||||
|
+ char *lang;
|
||||||
|
+
|
||||||
|
+ if (!lang_inuse)
|
||||||
|
+ init_lang(res, args, nargs);
|
||||||
|
+
|
||||||
|
+ lang = getvar_s(args);
|
||||||
|
+ if (!lang || !strcmp(lang, ""))
|
||||||
|
+ return res;
|
||||||
|
+
|
||||||
|
+ sprintf(lbuf, langfmt, lang);
|
||||||
|
+ load_lang_file(lbuf);
|
||||||
|
+
|
||||||
|
+ return res;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* read the contents of an entire file */
|
||||||
|
+static char *get_file(char *fname)
|
||||||
|
+{
|
||||||
|
+ FILE *F;
|
||||||
|
+ char *s = NULL;
|
||||||
|
+ int i, j, flen;
|
||||||
|
+
|
||||||
|
+ F = fopen(fname, "r");
|
||||||
|
+ if (!F) {
|
||||||
|
+ return NULL;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ if (fseek(F, 0, SEEK_END) == 0) {
|
||||||
|
+ flen = ftell(F);
|
||||||
|
+ s = (char *)xmalloc(flen+4);
|
||||||
|
+ fseek(F, 0, SEEK_SET);
|
||||||
|
+ i = 1 + fread(s+1, 1, flen, F);
|
||||||
|
+ } else {
|
||||||
|
+ for (i=j=1; j>0; i+=j) {
|
||||||
|
+ s = (char *)xrealloc(s, i+4096);
|
||||||
|
+ j = fread(s+i, 1, 4094, F);
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ s[i] = '\0';
|
||||||
|
+ fclose(F);
|
||||||
|
+ return s;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+
|
||||||
|
+/* parse_include():
|
||||||
|
+ *
|
||||||
|
+ * taken from parse_program from awk.c
|
||||||
|
+ * END{} is not parsed here, and BEGIN{} is executed immediately
|
||||||
|
+ */
|
||||||
|
+static void parse_include(char *p)
|
||||||
|
+{
|
||||||
|
+ uint32_t tclass;
|
||||||
|
+ chain initseq;
|
||||||
|
+ func *f;
|
||||||
|
+ var *v, tv;
|
||||||
|
+ int has_init = 0;
|
||||||
|
+
|
||||||
|
+ pos = p;
|
||||||
|
+ t.lineno = 1;
|
||||||
|
+ memset(&initseq, 0, sizeof(initseq));
|
||||||
|
+ while ((tclass = next_token(TC_EOF | TC_OPSEQ |
|
||||||
|
+ TC_OPTERM | TC_BEGIN | TC_FUNCDECL)) != TC_EOF) {
|
||||||
|
+ if (tclass & TC_OPTERM)
|
||||||
|
+ continue;
|
||||||
|
+
|
||||||
|
+ seq = &initseq;
|
||||||
|
+ if (tclass & TC_BEGIN) {
|
||||||
|
+ has_init = 1;
|
||||||
|
+ chain_group();
|
||||||
|
+ } else if (tclass & TC_FUNCDECL) {
|
||||||
|
+ next_token(TC_FUNCTION);
|
||||||
|
+ pos++;
|
||||||
|
+ f = newfunc(t.string);
|
||||||
|
+ f->type = AWKFUNC;
|
||||||
|
+ f->x.body.first = NULL;
|
||||||
|
+ f->nargs = 0;
|
||||||
|
+ while (next_token(TC_VARIABLE | TC_SEQTERM) & TC_VARIABLE) {
|
||||||
|
+ v = findvar(ahash, t.string);
|
||||||
|
+ v->x.aidx = (f->nargs)++;
|
||||||
|
+
|
||||||
|
+ if (next_token(TC_COMMA | TC_SEQTERM) & TC_SEQTERM)
|
||||||
|
+ break;
|
||||||
|
+ }
|
||||||
|
+ seq = &(f->x.body);
|
||||||
|
+ chain_group();
|
||||||
|
+ clear_array(ahash);
|
||||||
|
+ }
|
||||||
|
+ }
|
||||||
|
+ if (has_init)
|
||||||
|
+ evaluate(initseq.first, &tv);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* include an awk file and run its BEGIN{} section */
|
||||||
|
+static var *include(var *res, var *args, int nargs)
|
||||||
|
+{
|
||||||
|
+ static xhash *includes = NULL;
|
||||||
|
+ char *s;
|
||||||
|
+ var *v;
|
||||||
|
+
|
||||||
|
+ s = getvar_s(args);
|
||||||
|
+ if (!s)
|
||||||
|
+ return res;
|
||||||
|
+
|
||||||
|
+ if (!includes)
|
||||||
|
+ includes = hash_init();
|
||||||
|
+
|
||||||
|
+ /* find out if the file has been included already */
|
||||||
|
+ v = findvar(includes, s);
|
||||||
|
+ if (istrue(v))
|
||||||
|
+ return res;
|
||||||
|
+ setvar_s(v, "1");
|
||||||
|
+
|
||||||
|
+ /* read include file */
|
||||||
|
+ s = get_file(s);
|
||||||
|
+ if (!s) {
|
||||||
|
+ fprintf(stderr, "Could not open file.\n");
|
||||||
|
+ return res;
|
||||||
|
+ }
|
||||||
|
+ parse_include(s+1);
|
||||||
|
+ free(s);
|
||||||
|
+
|
||||||
|
+ return res;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+
|
||||||
|
+/* parse and evaluate an awk expression and return the result as string */
|
||||||
|
+static char *render_lookup(char *fname, int lnr, char *str)
|
||||||
|
+{
|
||||||
|
+ chain body;
|
||||||
|
+ var tv;
|
||||||
|
+
|
||||||
|
+ memset(&body, 0, sizeof(body));
|
||||||
|
+ zero_out_var(&tv);
|
||||||
|
+ pos = str;
|
||||||
|
+ seq = &body;
|
||||||
|
+
|
||||||
|
+ /* end of expression, assume that there's going to be a free byte
|
||||||
|
+ * at the end of the string that can be used for the ')' */
|
||||||
|
+ strcat(str + strlen(str), ")");
|
||||||
|
+ return getvar_s(evaluate(parse_expr(TC_SEQTERM), &tv));
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+static inline void print_translate(char *s)
|
||||||
|
+{
|
||||||
|
+ char *str = s;
|
||||||
|
+ if (lang_inuse)
|
||||||
|
+ str = translate_line(s);
|
||||||
|
+ fputs(str, stdout);
|
||||||
|
+ fflush(stdout);
|
||||||
|
+ if (lang_inuse)
|
||||||
|
+ free(str);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* process awk calls in a template line and print the output to stdout */
|
||||||
|
+static void render_line(char *fname, int lnr, char *line)
|
||||||
|
+{
|
||||||
|
+ char *tok[MAX_TR * 3];
|
||||||
|
+ char *l, *p, *p2, *res;
|
||||||
|
+ int len = 0, _pos = 0, i;
|
||||||
|
+
|
||||||
|
+ l = line;
|
||||||
|
+ while (l != NULL) {
|
||||||
|
+ if ((p = strstr(l, SSI_START)) == NULL) {
|
||||||
|
+ len += strlen((tok[_pos++] = l));
|
||||||
|
+ break;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ p2 = strstr(p, SSI_END);
|
||||||
|
+ if (p2 == NULL) {
|
||||||
|
+ fprintf(stderr, "Parse error in '%s', line '%d', unmatched %s\n", fname, lnr, SSI_END);
|
||||||
|
+ break;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ *p = 0;
|
||||||
|
+ *p2 = 0;
|
||||||
|
+
|
||||||
|
+ len += strlen((tok[_pos++] = l));
|
||||||
|
+ len += strlen((tok[_pos++] = render_lookup(fname, lnr, p + strlen(SSI_START))));
|
||||||
|
+
|
||||||
|
+ l = p2;
|
||||||
|
+ l += strlen(SSI_END);
|
||||||
|
+ }
|
||||||
|
+ len++;
|
||||||
|
+
|
||||||
|
+ p = xmalloc(len + 1);
|
||||||
|
+ *p = 0;
|
||||||
|
+ res = p;
|
||||||
|
+ for (i = 0; i < _pos; i++) {
|
||||||
|
+ strcat(p, tok[i]);
|
||||||
|
+ p += strlen(tok[i]);
|
||||||
|
+ }
|
||||||
|
+ print_translate(res);
|
||||||
|
+ free(res);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* awk method render(), which opens a template file and processes all awk ssi calls */
|
||||||
|
+static var *render(var *res, var *args, int nargs)
|
||||||
|
+{
|
||||||
|
+ char *s;
|
||||||
|
+ int lnr = 0;
|
||||||
|
+ FILE *f;
|
||||||
|
+ char *buf1;
|
||||||
|
+
|
||||||
|
+ buf1 = xmalloc(LINE_BUF);
|
||||||
|
+ s = getvar_s(args);
|
||||||
|
+ if (!s)
|
||||||
|
+ goto done;
|
||||||
|
+
|
||||||
|
+ f = fopen(s, "r");
|
||||||
|
+ if (!f)
|
||||||
|
+ goto done;
|
||||||
|
+
|
||||||
|
+ while (!feof(f) && (fgets(buf1, LINE_BUF - 1, f) != NULL)) {
|
||||||
|
+ render_line(s, ++lnr, buf1);
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+done:
|
||||||
|
+ free(buf1);
|
||||||
|
+ return res;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* Call render, but only if this function hasn't been called already */
|
||||||
|
+static int layout_rendered = 0;
|
||||||
|
+static var *render_layout(var *res, var *args, int nargs)
|
||||||
|
+{
|
||||||
|
+ if (layout_rendered)
|
||||||
|
+ return res;
|
||||||
|
+ layout_rendered = 1;
|
||||||
|
+ return render(res, args, nargs);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* registers a global c function for the awk interpreter */
|
||||||
|
+static void register_cfunc(char *name, awk_cfunc cfunc, int nargs)
|
||||||
|
+{
|
||||||
|
+ func *f;
|
||||||
|
+
|
||||||
|
+ f = newfunc(name);
|
||||||
|
+ f->type = CFUNC;
|
||||||
|
+ f->x.cfunc = cfunc;
|
||||||
|
+ f->nargs = nargs;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* function call for accessing cgi form variables */
|
||||||
|
+static var *getvar(var *res, var *args, int nargs)
|
||||||
|
+{
|
||||||
|
+ char *s;
|
||||||
|
+
|
||||||
|
+ s = getvar_s(args);
|
||||||
|
+ if (s)
|
||||||
|
+ setvar_s(res, cgi_param(s) ?: "");
|
||||||
|
+
|
||||||
|
+ return res;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* call an awk function without arguments by string reference */
|
||||||
|
+static var *call(var *res, var *args, int nargs)
|
||||||
|
+{
|
||||||
|
+ char *s = getvar_s(args);
|
||||||
|
+ func *f;
|
||||||
|
+
|
||||||
|
+ if (!s)
|
||||||
|
+ goto done;
|
||||||
|
+
|
||||||
|
+ f = newfunc(s);
|
||||||
|
+ if (f && f->type == AWKFUNC && f->x.body.first)
|
||||||
|
+ return evaluate(f->x.body.first, res);
|
||||||
|
+
|
||||||
|
+done:
|
||||||
|
+ return res;
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+
|
||||||
|
+/* main awx processing function. called from awk_main() */
|
||||||
|
+static int do_awx(int argc, char **argv)
|
||||||
|
+{
|
||||||
|
+ int ret = -1;
|
||||||
|
+ var tv;
|
||||||
|
+ char *s = NULL;
|
||||||
|
+ var *layout;
|
||||||
|
+ var *action;
|
||||||
|
+ char *tmp;
|
||||||
|
+ int i;
|
||||||
|
+
|
||||||
|
+ zero_out_var(&tv);
|
||||||
|
+
|
||||||
|
+ /* register awk C callbacks */
|
||||||
|
+ register_cfunc("getvar", getvar, 1);
|
||||||
|
+ register_cfunc("render", render, 1);
|
||||||
|
+ register_cfunc("render_layout", render_layout, 1);
|
||||||
|
+ register_cfunc("call", call, 1);
|
||||||
|
+ register_cfunc("include", include, 1);
|
||||||
|
+ register_cfunc("init_lang", init_lang, 1);
|
||||||
|
+ register_cfunc("load_lang", load_lang, 1);
|
||||||
|
+
|
||||||
|
+ if (!is_awx)
|
||||||
|
+ return 0;
|
||||||
|
+
|
||||||
|
+ /* fill in ARGV array */
|
||||||
|
+ programname = argv[1];
|
||||||
|
+ setvar_i(V[ARGC], argc + 1);
|
||||||
|
+ setari_u(V[ARGV], 0, "awx");
|
||||||
|
+ i = 0;
|
||||||
|
+ while (*argv)
|
||||||
|
+ setari_u(V[ARGV], ++i, *argv++);
|
||||||
|
+
|
||||||
|
+ cgi_init();
|
||||||
|
+ if (argc < 2) {
|
||||||
|
+ fprintf(stderr, "Invalid argument.\n");
|
||||||
|
+ goto done;
|
||||||
|
+ }
|
||||||
|
+
|
||||||
|
+ /* read the main controller source */
|
||||||
|
+ s = get_file(programname);
|
||||||
|
+ if (!s) {
|
||||||
|
+ fprintf(stderr, "Could not open file\n");
|
||||||
|
+ goto done;
|
||||||
|
+ }
|
||||||
|
+ parse_program(s+1);
|
||||||
|
+ free(s);
|
||||||
|
+
|
||||||
|
+ /* set some defaults for ACTION and LAYOUT, which will have special meaning */
|
||||||
|
+ cgi_process_form();
|
||||||
|
+
|
||||||
|
+ action = newvar("ACTION");
|
||||||
|
+ setvar_s(action, cgi_param("action") ?: "default");
|
||||||
|
+ layout = newvar("LAYOUT");
|
||||||
|
+ setvar_s(layout, "views/layout.ahtml");
|
||||||
|
+
|
||||||
|
+ /* run the BEGIN {} block */
|
||||||
|
+ evaluate(beginseq.first, &tv);
|
||||||
|
+
|
||||||
|
+ /* call the action (precedence: begin block override > cgi parameter > "default") */
|
||||||
|
+ tmp = xmalloc(strlen(getvar_s(action)) + 7);
|
||||||
|
+ sprintf(tmp, "handle_%s", getvar_s(action));
|
||||||
|
+ setvar_s(action, tmp);
|
||||||
|
+ call(&tv, action, 1);
|
||||||
|
+ free(tmp);
|
||||||
|
+
|
||||||
|
+ /* render the selected layout, will do nothing if render_layout has been called from awk */
|
||||||
|
+ render_layout(&tv, layout, 1);
|
||||||
|
+
|
||||||
|
+ ret = 0;
|
||||||
|
+done:
|
||||||
|
+ cgi_end();
|
||||||
|
+
|
||||||
|
+ exit(0);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
+/* entry point for awx applet */
|
||||||
|
+int awx_main(int argc, char **argv)
|
||||||
|
+{
|
||||||
|
+ is_awx = 1;
|
||||||
|
+ return awk_main(argc, argv);
|
||||||
|
+}
|
||||||
|
+
|
||||||
|
diff -purN bb.old/editors/Config.in bb.dev/editors/Config.in
|
||||||
|
--- bb.old/editors/Config.in 2007-01-24 22:34:50.000000000 +0100
|
||||||
|
+++ bb.dev/editors/Config.in 2007-03-11 06:19:51.469380160 +0100
|
||||||
|
@@ -12,6 +12,13 @@ config AWK
|
||||||
|
Awk is used as a pattern scanning and processing language. This is
|
||||||
|
the BusyBox implementation of that programming language.
|
||||||
|
|
||||||
|
+config AWX
|
||||||
|
+ bool "Enable awx (awk web extension)"
|
||||||
|
+ default n
|
||||||
|
+ depends on AWK
|
||||||
|
+ help
|
||||||
|
+ awx - awk web extension
|
||||||
|
+
|
||||||
|
config FEATURE_AWK_MATH
|
||||||
|
bool "Enable math functions (requires libm)"
|
||||||
|
default y
|
||||||
|
diff -purN bb.old/include/applets.h bb.dev/include/applets.h
|
||||||
|
--- bb.old/include/applets.h 2007-03-06 19:38:07.355081000 +0100
|
||||||
|
+++ bb.dev/include/applets.h 2007-03-07 02:12:24.280681880 +0100
|
||||||
|
@@ -60,6 +60,7 @@ USE_ARP(APPLET(arp, _BB_DIR_SBIN, _BB_SU
|
||||||
|
USE_ARPING(APPLET(arping, _BB_DIR_USR_BIN, _BB_SUID_NEVER))
|
||||||
|
USE_ASH(APPLET_NOUSAGE(ash, ash, _BB_DIR_BIN, _BB_SUID_NEVER))
|
||||||
|
USE_AWK(APPLET(awk, _BB_DIR_USR_BIN, _BB_SUID_NEVER))
|
||||||
|
+USE_AWX(APPLET_NOUSAGE(awx, awx, _BB_DIR_USR_BIN, _BB_SUID_NEVER))
|
||||||
|
USE_BASENAME(APPLET(basename, _BB_DIR_USR_BIN, _BB_SUID_NEVER))
|
||||||
|
USE_BBCONFIG(APPLET(bbconfig, _BB_DIR_BIN, _BB_SUID_NEVER))
|
||||||
|
//USE_BBSH(APPLET(bbsh, _BB_DIR_BIN, _BB_SUID_NEVER))
|
||||||
|
diff -purN bb.old/Makefile bb.dev/Makefile
|
||||||
|
--- bb.old/Makefile 2007-03-06 19:38:07.358080000 +0100
|
||||||
|
+++ bb.dev/Makefile 2007-03-07 02:28:22.844957960 +0100
|
||||||
|
@@ -565,7 +565,7 @@ quiet_cmd_busybox__ ?= LINK $@
|
||||||
|
cmd_busybox__ ?= $(srctree)/scripts/trylink $(CC) $(LDFLAGS) \
|
||||||
|
-o $@ \
|
||||||
|
-Wl,--warn-common -Wl,--sort-common -Wl,--gc-sections \
|
||||||
|
- -Wl,--start-group $(busybox-all) -Wl,--end-group
|
||||||
|
+ -Wl,--start-group $(busybox-all) $(EXTRA_LIBS) -Wl,--end-group
|
||||||
|
|
||||||
|
# Generate System.map
|
||||||
|
quiet_cmd_sysmap = SYSMAP
|
||||||
Loading…
Reference in New Issue