summaryrefslogtreecommitdiffhomepage
path: root/libs/lucittpd/src/lib
diff options
context:
space:
mode:
authorJo-Philipp Wich <jow@openwrt.org>2009-06-16 19:30:22 +0000
committerJo-Philipp Wich <jow@openwrt.org>2009-06-16 19:30:22 +0000
commit65cde286cc146be7dea165c2cb34732cb8953a57 (patch)
tree9fc9a7629afb9789a29c0def6266a19b86f7a426 /libs/lucittpd/src/lib
parent8c359115f9d515d358403897f34c69757adf7af6 (diff)
drop obsoleted lucittpd packages
Diffstat (limited to 'libs/lucittpd/src/lib')
-rw-r--r--libs/lucittpd/src/lib/log.c45
-rw-r--r--libs/lucittpd/src/lib/luaplugin.c383
-rw-r--r--libs/lucittpd/src/lib/signal.c52
-rw-r--r--libs/lucittpd/src/lib/uci.c206
4 files changed, 0 insertions, 686 deletions
diff --git a/libs/lucittpd/src/lib/log.c b/libs/lucittpd/src/lib/log.c
deleted file mode 100644
index 001bad473d..0000000000
--- a/libs/lucittpd/src/lib/log.c
+++ /dev/null
@@ -1,45 +0,0 @@
-/*
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
- *
- * Provided by fon.com
- * Copyright (C) 2008 John Crispin <blogic@openwrt.org>
- */
-
-#include <stdio.h>
-#include <syslog.h>
-#include <stdarg.h>
-
-static int daemonize = 0;
-
-void log_start(int daemon)
-{
- daemonize = daemon;
- openlog("lucittpd", 0, 0);
-}
-
-void log_printf(char *fmt, ...)
-{
- char p[256];
- va_list ap;
-
- va_start(ap, fmt);
- vsnprintf(p, 256, fmt, ap);
- va_end(ap);
-
- if(daemonize)
- syslog(10, "%s", p);
- else
- printf("%s", p);
-}
diff --git a/libs/lucittpd/src/lib/luaplugin.c b/libs/lucittpd/src/lib/luaplugin.c
deleted file mode 100644
index 0b2e33122b..0000000000
--- a/libs/lucittpd/src/lib/luaplugin.c
+++ /dev/null
@@ -1,383 +0,0 @@
-/*
- * luaplugin - fast lua plugin indexing
- * Copyright (C) 2008 Felix Fietkau <nbd@openwrt.org>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License version 2
- * as published by the Free Software Foundation
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- */
-
-#include <sys/types.h>
-#include <sys/time.h>
-#include <sys/cdefs.h>
-
-#ifndef _POSIX_C_SOURCE
-#define _POSIX_C_SOURCE /* XXX: portability hack for timestamp */
-#endif
-
-#include <sys/stat.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <errno.h>
-#include <limits.h>
-#include <glob.h>
-
-#include <lualib.h>
-#include <lauxlib.h>
-#include <lib/list.h>
-#include <lib/luaplugin.h>
-
-//#define DEBUG 1
-#ifdef DEBUG
-#define DPRINTF(...) fprintf(stderr, __VA_ARGS__)
-#else
-#define DPRINTF(...) do {} while (0)
-#endif
-
-/**
- * list_for_each_offset - iterate over a list, start with the provided pointer
- * @pos: the &struct list_head to use as a loop cursor.
- * @head: the head for your list.
- */
-#define list_for_each_offset(pos, head, offset) \
- for (pos = (offset)->next; pos != (offset); \
- pos = ((pos->next == (head)) && ((offset) != (head)) ? (head)->next : pos->next))
-
-static char pbuf[PATH_MAX];
-static void load_module(struct luaplugin_ctx *ctx, struct luaplugin_entry *e);
-
-static struct luaplugin_entry *
-find_entry(struct luaplugin_ctx *ctx, const char *name, bool modname)
-{
- struct list_head *p;
-
- if (!ctx->last)
- ctx->last = &ctx->entries;
-
- list_for_each_offset(p, &ctx->entries, ctx->last) {
- struct luaplugin_entry *e;
- const char *cmp;
-
- e = container_of(p, struct luaplugin_entry, list);
- if (modname)
- cmp = e->module;
- else
- cmp = e->name;
-
- if (!strcmp(cmp, name))
- return e;
- }
- return NULL;
-}
-
-static struct luaplugin_entry *
-new_entry(struct luaplugin_ctx *ctx, const char *name, const char *modname)
-{
- struct luaplugin_entry *e;
- char *c;
-
- e = malloc(sizeof(struct luaplugin_entry));
- if (!e)
- goto error;
-
- memset(e, 0, sizeof(struct luaplugin_entry));
- INIT_LIST_HEAD(&e->list);
- e->ctx = ctx;
- e->loaded = false;
-
- e->name = strdup(name);
- if (!e->name)
- goto error1;
-
- e->module = strdup(modname);
- if (!e->module)
- goto error2;
-
- /* strip filename extension */
- c = strrchr(e->module, '.');
- if (c)
- *c = 0;
-
- /* lua namespace: replace / with . */
- c = e->module;
- while ((c = strchr(c, '/')) != NULL) {
- *c = '.';
- }
- return e;
-
-error2:
- free(e->name);
-error1:
- free(e);
-error:
- return NULL;
-}
-
-static const char *module_loader =
-"loader = function (newgt, filename)\n"
-" setmetatable(newgt, { __index = _G })\n"
-" local f = loadfile(filename)\n"
-" if (type(f) == \"function\") then\n"
-" setfenv(f, newgt)\n"
-" f()\n"
-" else\n"
-" error(f)\n"
-" end\n"
-"end\n";
-
-static void
-access_plugin_table (lua_State *L, const char *modname, bool set)
-{
- const char *e;
-
- lua_pushvalue(L, LUA_GLOBALSINDEX);
- do {
- bool _set = true;
-
- e = strchr(modname, '.');
- if (e == NULL) {
- e = modname + strlen(modname);
- _set = set;
- }
-
- lua_pushlstring(L, modname, e - modname);
- lua_rawget(L, -2);
- if (lua_isnil(L, -1) ||
- /* no such field or last field */
- (lua_istable(L, -1) && (*e != '.'))) {
- lua_pop(L, 1); /* remove this result */
-
- if (_set) {
- if (*e != '.')
- lua_pushvalue(L, -2); /* use table from given index */
- else
- lua_createtable(L, 0, 1); /* new table for field */
- }
-
- lua_pushlstring(L, modname, e - modname);
-
- if (_set) {
- lua_pushvalue(L, -2);
- lua_settable(L, -4); /* set new table into field */
- } else {
- lua_gettable(L, -2);
- }
- }
- else if (!lua_istable(L, -1)) { /* field has a non-table value? */
- lua_pop(L, 2 + !!set); /* remove table and values */
- return;
- }
- lua_remove(L, -2); /* remove previous table */
- modname = e + 1;
- } while (*e == '.');
- if (set)
- lua_pop(L, 2);
-}
-
-
-static void
-load_module(struct luaplugin_ctx *ctx, struct luaplugin_entry *e)
-{
- lua_State *L = ctx->L;
- int ret;
-
- /* grab the loader wrapper function */
- ret = luaL_dostring(L, module_loader);
- if (ret)
- return;
-
- lua_getglobal(L, "loader");
- lua_pushnil(L);
- lua_setglobal(L, "loader");
-
- e->loaded = true;
- e->reload = false;
-
- /* new environment table for function call */
- lua_newtable(L);
-
- /* register the table globally */
- lua_pushvalue(L, -1);
- access_plugin_table(L, e->module, true);
-
- lua_pushstring(L, e->name);
-
- if (lua_pcall(L, 2, 0, 0) != 0) {
- const char *err = "unknown error";
-
- if (lua_isstring(L, -1))
- err = lua_tostring(L, -1);
-
- fprintf(stderr, "%s", err);
- }
-}
-
-static void
-free_entry(struct luaplugin_ctx *ctx, struct luaplugin_entry *e)
-{
- lua_State *L = ctx->L;
-
- if (e->loaded && L) {
- /* allow the gc to free the module */
- lua_pushnil(L);
- access_plugin_table(L, e->module, true);
- }
- list_del(&e->list);
- free(e->name);
- free(e->module);
- free(e);
-}
-
-static void
-__luaplugin_scan(struct luaplugin_ctx *ctx, int base_len, int rec)
-{
- int gl_flags = GLOB_NOESCAPE | GLOB_NOSORT | GLOB_MARK;
- glob_t gl;
- int i;
-
- strncpy(pbuf + base_len, "*.lua", PATH_MAX - base_len);
- if (glob(pbuf, gl_flags, NULL, &gl) < 0) {
- globfree(&gl);
- return;
- }
-
- for (i = 0; i < gl.gl_pathc; i++) {
- const char *entry = gl.gl_pathv[i];
- struct luaplugin_entry *e;
- struct stat st;
- int elen;
-
- elen = strlen(entry);
-
- /* should not happen */
- if ((elen <= base_len) || (strncmp(entry, pbuf, base_len) != 0)) {
- fprintf(stderr, "[%s] sanity check failed in %s(%d)!\n", __FILE__, __func__, __LINE__);
- continue;
- }
-
- /* descend into subdirectories */
- if (entry[elen - 1] == '/') {
- strncpy(pbuf + base_len, entry + base_len, PATH_MAX - base_len);
- __luaplugin_scan(ctx, base_len, rec + 1);
- pbuf[base_len] = '\0';
- continue;
- }
-
- if (stat(gl.gl_pathv[i], &st))
- continue;
-
- if ((st.st_mode & S_IFMT) != S_IFREG)
- continue;
-
- e = find_entry(ctx, entry + base_len, false);
- if (!e) {
- e = new_entry(ctx, entry, entry + base_len);
- list_add_tail(&e->list, &ctx->entries);
- }
- if (!e)
- continue;
-
- e->checked = ctx->checked;
- e->reload = (e->timestamp < st.st_mtime);
- e->timestamp = st.st_mtime;
- }
- globfree(&gl);
-}
-
-int
-luaplugin_call(struct luaplugin_entry *e, int narg)
-{
- struct luaplugin_ctx *ctx = e->ctx;
- lua_State *L = ctx->L;
- const char *func;
- int ret;
-
- func = luaL_checkstring(L, -1 - narg);
-
- /* grab a reference to the plugin's table */
- access_plugin_table(L, e->module, false);
- lua_getfield(L, -1, func);
- if (!lua_isfunction(L, -1)) {
- lua_pop(L, narg + 1);
- ret = -ENOENT;
- goto done;
- }
-
- /* replace function name with a ref to the function */
- lua_replace(L, -3 - narg);
-
- /* pop the table */
- lua_pop(L, 1);
- ret = lua_pcall(L, narg, 0, 0);
-
- if (ret != 0) {
- fprintf(stderr, "%s", lua_tostring(L, -1));
- }
-
-done:
- return ret;
-}
-
-void
-luaplugin_scan(struct luaplugin_ctx *ctx)
-{
- struct list_head *tmp, *p;
-
- sprintf(pbuf, "%s/", ctx->path);
-
- ctx->checked++;
- __luaplugin_scan(ctx, strlen(pbuf), 0);
-
- /* expire old entries */
- list_for_each_safe(p, tmp, &ctx->entries) {
- struct luaplugin_entry *e = container_of(p, struct luaplugin_entry, list);
- if (e->checked < ctx->checked)
- free_entry(ctx, e);
- else if (e->reload)
- load_module(ctx, e);
- }
-}
-
-int
-luaplugin_init(struct luaplugin_ctx *ctx, const char *path)
-{
- memset(ctx, 0, sizeof(struct luaplugin_ctx));
- INIT_LIST_HEAD(&ctx->entries);
- ctx->path = path;
-
- ctx->L = luaL_newstate();
- if (!ctx->L)
- return -ENOMEM;
-
- luaL_openlibs(ctx->L);
-
- /* disable the module functionality, a plugin is restricted to its own environment */
- /*
- lua_pushcfunction(ctx->L, luaplugin_module);
- lua_setfield(ctx->L, LUA_GLOBALSINDEX, "module");
- */
-
- return 0;
-}
-
-void
-luaplugin_done(struct luaplugin_ctx *ctx)
-{
- struct list_head *p, *tmp;
-
- lua_close(ctx->L);
- ctx->L = NULL;
-
- list_for_each_safe(p, tmp, &ctx->entries) {
- struct luaplugin_entry *e;
- e = container_of(p, struct luaplugin_entry, list);
- free_entry(ctx, e);
- }
-}
diff --git a/libs/lucittpd/src/lib/signal.c b/libs/lucittpd/src/lib/signal.c
deleted file mode 100644
index 2b11f47cbb..0000000000
--- a/libs/lucittpd/src/lib/signal.c
+++ /dev/null
@@ -1,52 +0,0 @@
-/*
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
- *
- * Provided by fon.com
- * Copyright (C) 2008 John Crispin <blogic@openwrt.org>
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <signal.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-
-#include <lib/log.h>
-
-void handler_INT(int signo)
-{
- log_printf("away we go\n");
- exit(0);
-}
-
-void handler_CHLD(int signo)
-{
- while(waitpid(-1, NULL, WNOHANG) > 0);
-}
-
-void setup_signals(void)
-{
- struct sigaction s1, s2, s3;
- s1.sa_handler = handler_INT;
- s1.sa_flags = 0;
- sigaction(SIGINT, &s1, NULL);
- s2.sa_handler = handler_INT;
- s2.sa_flags = 0;
- sigaction(SIGTERM, &s2, NULL);
- s3.sa_handler = handler_CHLD;
- s3.sa_flags = SA_RESTART;
- sigaction(SIGCHLD, &s3, NULL);
-}
diff --git a/libs/lucittpd/src/lib/uci.c b/libs/lucittpd/src/lib/uci.c
deleted file mode 100644
index 33254ee5e2..0000000000
--- a/libs/lucittpd/src/lib/uci.c
+++ /dev/null
@@ -1,206 +0,0 @@
-/*
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
- *
- * Copyright (C) 2008 John Crispin <blogic@openwrt.org>
- */
-
-#include <string.h>
-#include <stdlib.h>
-
-#include <uci.h>
-#include <lib/list.h>
-#include <lib/log.h>
-#include <lib/uci.h>
-
-static struct uci_ptr ptr;
-static struct uci_package *p = NULL;
-
-static inline int ucix_get_ptr(struct uci_context *ctx, const char *p, const char *s, const char *o, const char *t)
-{
- memset(&ptr, 0, sizeof(ptr));
- ptr.package = p;
- ptr.section = s;
- ptr.option = o;
- ptr.value = t;
- return uci_lookup_ptr(ctx, &ptr, NULL, true);
-}
-
-struct uci_context* ucix_init(const char *config_file)
-{
- struct uci_context *ctx = uci_alloc_context();
- uci_add_history_path(ctx, "/var/state");
- uci_set_savedir(ctx, "/var/state/");
- if(uci_load(ctx, config_file, &p) != UCI_OK)
- {
- log_printf("%s/%s is missing or corrupt\n", ctx->savedir, config_file);
- return NULL;
- }
- return ctx;
-}
-
-struct uci_context* ucix_init_path(const char *path, const char *config_file)
-{
- struct uci_context *ctx = uci_alloc_context();
- if(path)
- uci_set_confdir(ctx, path);
- if(uci_load(ctx, config_file, NULL) != UCI_OK)
- {
- log_printf("%s/%s is missing or corrupt\n", ctx->savedir, config_file);
- return NULL;
- }
- return ctx;
-}
-
-void ucix_cleanup(struct uci_context *ctx)
-{
- uci_free_context(ctx);
-}
-
-void ucix_save(struct uci_context *ctx)
-{
- uci_set_savedir(ctx, "/tmp/.uci");
- uci_save(ctx, p);
-}
-
-void ucix_save_state(struct uci_context *ctx)
-{
- uci_save(ctx, p);
-}
-
-int ucix_get_option_list(struct uci_context *ctx, const char *p,
- const char *s, const char *o, struct list_head *l)
-{
- struct uci_element *e = NULL;
- if(ucix_get_ptr(ctx, p, s, o, NULL))
- return 1;
- if (!(ptr.flags & UCI_LOOKUP_COMPLETE))
- return 1;
- e = ptr.last;
- switch (e->type)
- {
- case UCI_TYPE_OPTION:
- switch(ptr.o->type) {
- case UCI_TYPE_LIST:
- uci_foreach_element(&ptr.o->v.list, e)
- {
- struct ucilist *ul = malloc(sizeof(struct ucilist));
- ul->val = strdup((e->name)?(e->name):(""));
- INIT_LIST_HEAD(&ul->list);
- list_add(&ul->list, l);
- }
- break;
- default:
- break;
- }
- break;
- default:
- return 1;
- }
-
- return 0;
-}
-
-const char* ucix_get_option(struct uci_context *ctx, const char *p, const char *s, const char *o)
-{
- struct uci_element *e = NULL;
- const char *value = NULL;
- if(ucix_get_ptr(ctx, p, s, o, NULL))
- return NULL;
- if (!(ptr.flags & UCI_LOOKUP_COMPLETE))
- return NULL;
- e = ptr.last;
- switch (e->type)
- {
- case UCI_TYPE_SECTION:
- value = uci_to_section(e)->type;
- break;
- case UCI_TYPE_OPTION:
- switch(ptr.o->type) {
- case UCI_TYPE_STRING:
- value = ptr.o->v.string;
- break;
- default:
- value = NULL;
- break;
- }
- break;
- default:
- return 0;
- }
-
- return value;
-}
-
-int ucix_get_option_int(struct uci_context *ctx, const char *p, const char *s, const char *o, int def)
-{
- const char *tmp = ucix_get_option(ctx, p, s, o);
- int ret = def;
-
- if (tmp)
- ret = atoi(tmp);
- return ret;
-}
-
-void ucix_add_section(struct uci_context *ctx, const char *p, const char *s, const char *t)
-{
- if(ucix_get_ptr(ctx, p, s, NULL, t))
- return;
- uci_set(ctx, &ptr);
-}
-
-void ucix_add_option(struct uci_context *ctx, const char *p, const char *s, const char *o, const char *t)
-{
- if(ucix_get_ptr(ctx, p, s, o, (t)?(t):("")))
- return;
- uci_set(ctx, &ptr);
-}
-
-void ucix_add_option_int(struct uci_context *ctx, const char *p, const char *s, const char *o, int t)
-{
- char tmp[64];
- snprintf(tmp, 64, "%d", t);
- ucix_add_option(ctx, p, s, o, tmp);
-}
-
-void ucix_del(struct uci_context *ctx, const char *p, const char *s, const char *o)
-{
- if(!ucix_get_ptr(ctx, p, s, o, NULL))
- uci_delete(ctx, &ptr);
-}
-
-void ucix_revert(struct uci_context *ctx, const char *p, const char *s, const char *o)
-{
- if(!ucix_get_ptr(ctx, p, s, o, NULL))
- uci_revert(ctx, &ptr);
-}
-
-void ucix_for_each_section_type(struct uci_context *ctx,
- const char *p, const char *t,
- void (*cb)(const char*, void*), void *priv)
-{
- struct uci_element *e;
- if(ucix_get_ptr(ctx, p, NULL, NULL, NULL))
- return;
- uci_foreach_element(&ptr.p->sections, e)
- if (!strcmp(t, uci_to_section(e)->type))
- cb(e->name, priv);
-}
-
-int ucix_commit(struct uci_context *ctx, const char *p)
-{
- if(ucix_get_ptr(ctx, p, NULL, NULL, NULL))
- return 1;
- return uci_commit(ctx, &ptr.p, false);
-}