2
0

Compare commits

..

No commits in common. "54d7b4677482942b0084bbb8c9bd91faf0798e97" and "b41e02860cecda6720eb93f30a2c429910c2515f" have entirely different histories.

44 changed files with 341 additions and 2431 deletions

View File

@ -32,5 +32,3 @@ From doc/bootstrap* (Apache License 2.0):
Licensed under http://www.apache.org/licenses/LICENSE-2.0
From doc/jquery-1.10.1.min.js (MIT License):
(c) 2005, 2013 jQuery Foundation, Inc. | jquery.org/license
Also include/lighttpd/hedley.h is licensed as CC0-1.0 by Evan Nemerson.

View File

@ -4,8 +4,6 @@
#include <lighttpd/base.h>
#include <lua.h>
LI_API void li_lua_init_action_mt(liServer *srv, lua_State *L);
LI_API liAction* li_lua_get_action(lua_State *L, int ndx);
LI_API int li_lua_push_action(liServer *srv, lua_State *L, liAction *a);

View File

@ -72,10 +72,10 @@ struct liLog {
LI_API void li_log_init(liServer *srv);
LI_API void li_log_clean(liServer *srv);
LI_API void li_log_write(liServer *srv, liLogLevel log_level, guint flags, const gchar *fmt, ...) HEDLEY_PRINTF_FORMAT(4, 5);
LI_API void li_log_write(liServer *srv, liLogLevel log_level, guint flags, const gchar *fmt, ...) G_GNUC_PRINTF(4, 5);
/* replaces '\r' and '\n' with '\0' */
LI_API void li_log_split_lines(liServer *srv, liLogLevel log_level, guint flags, gchar *txt, const gchar *prefix);
LI_API void li_log_split_lines_(liServer *srv, liLogLevel log_level, guint flags, gchar *txt, const gchar *fmt, ...) HEDLEY_PRINTF_FORMAT(5, 6);
LI_API void li_log_split_lines_(liServer *srv, liLogLevel log_level, guint flags, gchar *txt, const gchar *fmt, ...) G_GNUC_PRINTF(5, 6);
#endif

View File

@ -4,8 +4,6 @@
#include <lighttpd/base.h>
#include <lua.h>
LI_API void li_lua_init_condition_mt(liServer *srv, lua_State *L);
LI_API liCondition* li_lua_get_condition(lua_State *L, int ndx);
LI_API int li_lua_push_condition(liServer *srv, lua_State *L, liCondition *c);

View File

@ -2,7 +2,8 @@
#define _LIGHTTPD_CONFIG_LUA_H_
#include <lighttpd/base.h>
#include <lua.h>
#include <lualib.h>
LI_API gboolean li_config_lua_load(liLuaState *LL, liServer *srv, liWorker *wrk, const gchar *filename, liAction **pact, gboolean allow_setup, liValue *args);

View File

@ -3,7 +3,6 @@
#include <lighttpd/base.h>
#include <lua.h>
#include <lauxlib.h>
#define LI_LUA_REGISTRY_STATE "lighttpd.state"
#define LI_LUA_REGISTRY_SERVER "lighttpd.server"
@ -15,85 +14,65 @@ LI_API liLuaState *li_lua_state_get(lua_State *L);
INLINE void li_lua_lock(liLuaState *LL);
INLINE void li_lua_unlock(liLuaState *LL);
/* expect (meta)table at top of the stack */
INLINE void li_lua_protect_metatable(lua_State *L);
INLINE int li_lua_new_protected_metatable(lua_State *L, const char *tname);
/* chunk_lua.c */
LI_API void li_lua_init_chunk_mt(lua_State *L);
LI_API liChunk* li_lua_get_chunk(lua_State *L, int ndx);
LI_API int li_lua_push_chunk(lua_State *L, liChunk *c);
LI_API liChunkQueue* li_lua_get_chunkqueue(lua_State *L, int ndx);
LI_API int li_lua_push_chunkqueue(lua_State *L, liChunkQueue *cq);
/* environment_lua.c */
LI_API void li_lua_init_environment_mt(lua_State *L);
LI_API void li_lua_init_connection_mt(lua_State *L);
LI_API liConnection* li_lua_get_connection(lua_State *L, int ndx);
LI_API int li_lua_push_connection(lua_State *L, liConnection *con);
LI_API void li_lua_init_environment_mt(lua_State *L);
LI_API liEnvironment* li_lua_get_environment(lua_State *L, int ndx);
LI_API int li_lua_push_environment(lua_State *L, liEnvironment *env);
/* filters_lua.c */
LI_API void li_lua_init_filter_mt(lua_State *L);
/* create entries in `lighty.` table, which must be on top of the stack */
LI_API void li_lua_init_filters(lua_State *L, liServer* srv);
LI_API liFilter* li_lua_get_filter(lua_State *L, int ndx);
LI_API int li_lua_push_filter(lua_State *L, liFilter *f);
LI_API void li_lua_init_filters(lua_State *L, liServer* srv);
LI_API liFilter* li_lua_vrequest_add_filter_in(lua_State *L, liVRequest *vr, int state_ndx);
LI_API liFilter* li_lua_vrequest_add_filter_out(lua_State *L, liVRequest *vr, int state_ndx);
/* http_headers_lua.c */
LI_API void li_lua_init_http_headers_mt(lua_State *L);
LI_API liHttpHeaders* li_lua_get_http_headers(lua_State *L, int ndx);
LI_API int li_lua_push_http_headers(lua_State *L, liHttpHeaders *headers);
/* physical_lua.c */
LI_API void li_lua_init_physical_mt(lua_State *L);
LI_API liPhysical* li_lua_get_physical(lua_State *L, int ndx);
LI_API int li_lua_push_physical(lua_State *L, liPhysical *phys);
/* request_lua.c */
LI_API void li_lua_init_request_mt(lua_State *L);
LI_API liRequest* li_lua_get_request(lua_State *L, int ndx);
LI_API int li_lua_push_request(lua_State *L, liRequest *req);
LI_API liRequestUri* li_lua_get_requesturi(lua_State *L, int ndx);
LI_API int li_lua_push_requesturi(lua_State *L, liRequestUri *uri);
/* response_lua.c */
LI_API void li_lua_init_response_mt(lua_State *L);
LI_API liResponse* li_lua_get_response(lua_State *L, int ndx);
LI_API int li_lua_push_response(lua_State *L, liResponse *resp);
/* stat_lua.c */
LI_API void li_lua_init_stat_mt(lua_State *L);
LI_API struct stat* li_lua_get_stat(lua_State *L, int ndx);
LI_API int li_lua_push_stat(lua_State *L, struct stat *st);
/* subrequest_lua.c */
LI_API void li_lua_init_subrequest_mt(lua_State *L);
/* virtualrequest_lua.c */
LI_API void li_lua_init_virtualrequest_mt(lua_State *L);
LI_API void li_lua_init_vrequest_mt(lua_State *L);
LI_API liVRequest* li_lua_get_vrequest(lua_State *L, int ndx);
LI_API int li_lua_push_vrequest(lua_State *L, liVRequest *vr);
LI_API void li_lua_init_coninfo_mt(lua_State *L);
LI_API liConInfo* li_lua_get_coninfo(lua_State *L, int ndx);
LI_API int li_lua_push_coninfo(lua_State *L, liConInfo *vr);
/* everything else: core_lua.c */
LI_API int li_lua_fixindex(lua_State *L, int ndx);
/* return 1 if value is found in mt (on top of the stack), 0 if it is not found (stack balance = 0)
* table, key on stack at pos 0 and 1 (i.e. __index method)
* table, key on stack at pos 0 and 1 (i.e. __index metho)
*/
LI_API int li_lua_metatable_index(lua_State *L);
@ -142,18 +121,4 @@ INLINE void li_lua_unlock(liLuaState *LL) {
g_static_rec_mutex_unlock(&LL->lualock);
}
INLINE void li_lua_protect_metatable(lua_State *L) {
/* __metatable key prevents accessing metatable of objects/tables in normal lua code */
lua_pushboolean(L, FALSE);
lua_setfield(L, -2, "__metatable");
}
INLINE int li_lua_new_protected_metatable(lua_State *L, const char *tname) {
int r = luaL_newmetatable(L, tname);
if (r) {
li_lua_protect_metatable(L);
}
return r;
}
#endif

View File

@ -8,7 +8,7 @@ enum {
LI_EV_READ = 0x01,
LI_EV_WRITE = 0x02,
LI_EV_WAKEUP = 0x04
} HEDLEY_FLAGS;
};
typedef enum {
LI_EVT_NONE = 0,

File diff suppressed because it is too large Load Diff

View File

@ -156,11 +156,11 @@ LI_API void li_log_context_set(liLogContext *context, liLogMap *log_map);
LI_API gboolean li_log_write_direct(liServer *srv, liWorker *wrk, GString *path, GString *msg);
/* li_log_write is used to write to the errorlog */
LI_API gboolean li_log_write(liServer *srv, liWorker *wrk, liLogContext* context, liLogLevel log_level, guint flags, const gchar *fmt, ...) HEDLEY_PRINTF_FORMAT(6, 7);
LI_API gboolean li_log_write(liServer *srv, liWorker *wrk, liLogContext* context, liLogLevel log_level, guint flags, const gchar *fmt, ...) G_GNUC_PRINTF(6, 7);
/* replaces '\r' and '\n' with '\0' */
LI_API void li_log_split_lines(liServer *srv, liWorker *wrk, liLogContext* context, liLogLevel log_level, guint flags, gchar *txt, const gchar *prefix);
LI_API void li_log_split_lines_(liServer *srv, liWorker *wrk, liLogContext* context, liLogLevel log_level, guint flags, gchar *txt, const gchar *fmt, ...) HEDLEY_PRINTF_FORMAT(7, 8);
LI_API void li_log_split_lines_(liServer *srv, liWorker *wrk, liLogContext* context, liLogLevel log_level, guint flags, gchar *txt, const gchar *fmt, ...) G_GNUC_PRINTF(7, 8);
#endif

View File

@ -1,8 +1,6 @@
#ifndef _LIGHTTPD_SETTINGS_H_
#define _LIGHTTPD_SETTINGS_H_
#include <lighttpd/hedley.h>
/* check which OS we are compiling for */
#if defined(__BEOS__)
# define LIGHTY_OS_BEOS
@ -165,15 +163,57 @@
# define USE_WRITE
#endif
#ifdef LI_DECLARE_EXPORTS
# define LI_API HEDLEY_PUBLIC
/* Shared library support */
#ifdef _WIN32
#define LI_IMPORT __declspec(dllimport)
#define LI_EXPORT __declspec(dllexport)
#define LI_DLLLOCAL
#define LI_DLLPUBLIC
#else
# define LI_API HEDLEY_IMPORT
#define LI_IMPORT
#ifdef GCC_HASCLASSVISIBILITY
#define LI_EXPORT __attribute__ ((visibility("default")))
#define LI_DLLLOCAL __attribute__ ((visibility("hidden")))
#define LI_DLLPUBLIC __attribute__ ((visibility("default")))
#else
#define LI_EXPORT
#define LI_DLLLOCAL
#define LI_DLLPUBLIC
#endif
#endif
#ifdef LI_DECLARE_EXPORTS
#define LI_API LI_EXPORT
#else
#define LI_API LI_IMPORT
#endif
/* Throwable classes must always be visible on GCC in all binaries */
#ifdef _WIN32
#define LI_EXCEPTIONAPI(api) api
#elif defined(GCC_HASCLASSVISIBILITY)
#define LI_EXCEPTIONAPI(api) LI_EXPORT
#else
#define LI_EXCEPTIONAPI(api)
#endif
#ifdef UNUSED_PARAM
#elif defined(__GNUC__)
# define UNUSED_PARAM(x) UNUSED_ ## x __attribute__((unused))
#elif defined(__LCLINT__)
# define UNUSED_PARAM(x) /*@unused@*/ x
#else
# define UNUSED_PARAM(x) x
#endif
#define UNUSED(x) ( (void)(x) )
#define INLINE static HEDLEY_INLINE
#if __GNUC__
#define INLINE static inline
/* # define INLINE extern inline */
#else
# define INLINE static
#endif
#ifdef PACKAGE_NO_BUILD_DATE
# undef PACKAGE_BUILD_DATE

View File

@ -34,7 +34,7 @@
#define sockread( fd, buf, bytes ) recv( fd, buf, bytes, 0 )
LI_API const char * inet_ntop(int af, const void *src, char *dst, socklen_t cnt);
LI_EXPORT const char * inet_ntop(int af, const void *src, char *dst, socklen_t cnt);
int inet_aton(const char *cp, struct in_addr *inp);
#define HAVE_INET_ADDR
#undef HAVE_INET_ATON

View File

@ -10,11 +10,11 @@ typedef enum {
} liCounterType;
/* log message, print backtrace, and abort() (use LI_FATAL(msg) to call it) */
LI_API void li_fatal(const char *filename, unsigned int line, const char *function, const char *msg) HEDLEY_NO_RETURN;
LI_API void li_fatal(const char *filename, unsigned int line, const char *function, const char *msg) G_GNUC_NORETURN;
/* if libunwind is available this prints a backtrace to STDERR */
LI_API void li_print_backtrace_stderr(void);
/* LI_FORCE_ASSERT is *always* active - in debug and release builds */
#define LI_FORCE_ASSERT(x) do { if (HEDLEY_UNLIKELY(!(x))) li_fatal(__FILE__, __LINE__, G_STRFUNC, "Assertion `" #x "' failed."); } while(0)
#define LI_FORCE_ASSERT(x) do { if (G_UNLIKELY(!(x))) li_fatal(__FILE__, __LINE__, G_STRFUNC, "Assertion `" #x "' failed."); } while(0)
#define LI_FATAL(msg) li_fatal(__FILE__, __LINE__, G_STRFUNC, msg)
/* set O_NONBLOCK and FD_CLOEXEC */

View File

@ -4,8 +4,6 @@
#include <lighttpd/base.h>
#include <lua.h>
LI_API void li_lua_init_value_mt(lua_State *L);
/* converts the top of the stack into an value
* and pops the value
* returns NULL if it couldn't convert the value (still pops it)

View File

@ -72,7 +72,7 @@ struct liConfigTokenizerContext {
GHashTable *variables;
};
static liConfigToken tokenizer_error(liConfigTokenizerContext *ctx, GError **error, const char *fmt, ...) HEDLEY_PRINTF_FORMAT(3, 4);
static liConfigToken tokenizer_error(liConfigTokenizerContext *ctx, GError **error, const char *fmt, ...) G_GNUC_PRINTF(3, 4);
GQuark li_angel_config_parser_error_quark(void) {
return g_quark_from_string("li-angel-config-parser-error-quark");

View File

@ -158,7 +158,7 @@ static inline gsize mp_align_size(gsize size) {
}
gsize li_mempool_align_page_size(gsize size) {
if (HEDLEY_UNLIKELY(!mp_initialized)) {
if (G_UNLIKELY(!mp_initialized)) {
mempool_init();
}
return mp_align_size(size);
@ -167,17 +167,17 @@ gsize li_mempool_align_page_size(gsize size) {
static inline void* mp_alloc_page(gsize size) {
void *ptr;
# ifdef MAP_ANON
if (HEDLEY_UNLIKELY(MAP_FAILED == (ptr = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_PRIVATE|MAP_ANON, -1, 0)))) {
if (G_UNLIKELY(MAP_FAILED == (ptr = mmap(NULL, size, PROT_READ | PROT_WRITE, MAP_PRIVATE|MAP_ANON, -1, 0)))) {
g_error ("%s: failed to allocate %"G_GSIZE_FORMAT" bytes with mmap", G_STRLOC, size);
}
# else
if (HEDLEY_UNLIKELY(NULL == (ptr = g_malloc(size)))) {
if (G_UNLIKELY(NULL == (ptr = g_malloc(size)))) {
g_error ("%s: failed to allocate %"G_GSIZE_FORMAT" bytes", G_STRLOC, size);
}
# endif
#ifdef WITH_PROFILER
if (HEDLEY_UNLIKELY(li_profiler_enabled)) {
if (G_UNLIKELY(li_profiler_enabled)) {
li_profiler_hashtable_insert((gpointer)ptr, size);
}
#endif
@ -195,7 +195,7 @@ static inline void mp_free_page(const void *ptr, gsize size) {
# endif
#ifdef WITH_PROFILER
if (HEDLEY_UNLIKELY(li_profiler_enabled)) {
if (G_UNLIKELY(li_profiler_enabled)) {
li_profiler_hashtable_remove((gpointer)ptr);
}
#endif
@ -299,7 +299,7 @@ static inline void mp_mag_free(mp_magazine *mag, void *ptr) {
if (id == mag->next - 1) mag->next--; /* if chunk was just allocated, "undo" it */
# endif
if (HEDLEY_UNLIKELY(0 == mag->used)) {
if (G_UNLIKELY(0 == mag->used)) {
mp_free_page(mag->data, mag->count * mag->chunksize);
mag->data = NULL;
# ifndef MP_SEARCH_BITVECTOR
@ -363,16 +363,16 @@ static inline mp_pool* mp_pools_get(gsize size) {
mp_pool *pool;
pools = g_private_get(thread_pools);
if (HEDLEY_UNLIKELY(!pools)) {
if (G_UNLIKELY(!pools)) {
pools = g_slice_new0(mp_pools);
g_private_set(thread_pools, pools);
}
for (iter = pools->queue.head; iter; iter = iter->next) {
pool = iter->data;
if (HEDLEY_LIKELY(pool->chunksize == size)) {
if (G_LIKELY(pool->chunksize == size)) {
goto done;
} else if (HEDLEY_UNLIKELY(pool->chunksize > size)) {
} else if (G_UNLIKELY(pool->chunksize > size)) {
pool = mp_pool_new(size);
_queue_insert_before(&pools->queue, iter, &pool->pools_list);
goto done;
@ -392,15 +392,15 @@ liMempoolPtr li_mempool_alloc(gsize size) {
mp_magazine *mag;
guint i;
if (HEDLEY_UNLIKELY(!mp_initialized)) {
if (G_UNLIKELY(!mp_initialized)) {
mempool_init();
}
size = mp_align_size(size);
/* mp_alloc_page fallback */
if (HEDLEY_UNLIKELY(size > MP_MAX_ALLOC_SIZE/MP_MIN_ALLOC_COUNT)) {
if (HEDLEY_UNLIKELY(NULL == (ptr.data = mp_alloc_page(size)))) {
if (G_UNLIKELY(size > MP_MAX_ALLOC_SIZE/MP_MIN_ALLOC_COUNT)) {
if (G_UNLIKELY(NULL == (ptr.data = mp_alloc_page(size)))) {
g_error ("%s: failed to allocate %"G_GSIZE_FORMAT" bytes", G_STRLOC, size);
}
return ptr;
@ -411,12 +411,12 @@ liMempoolPtr li_mempool_alloc(gsize size) {
/* Try to lock a unlocked magazine if possible; creating new magazines is allowed
* (new ones can't be locked as only the current thread knows this magazine)
* Spinlock the first magazine if first strategy failed */
if (HEDLEY_LIKELY(pool->magazines[0])) {
if (G_LIKELY(pool->magazines[0])) {
/* at least one magazine available */
for (i = 0; i < MP_MAX_MAGAZINES; i++) {
mag = pool->magazines[i];
if (!mag) break;
if (HEDLEY_LIKELY(MP_TRYLOCK(mag->mutex))) {
if (G_LIKELY(MP_TRYLOCK(mag->mutex))) {
goto found_mag;
}
}
@ -436,9 +436,9 @@ found_mag:
mp_mag_acquire(mag); /* keep track of chunk count */
# ifndef MP_SEARCH_BITVECTOR
if (HEDLEY_UNLIKELY(mag->next == mag->count)) {
if (G_UNLIKELY(mag->next == mag->count)) {
# else
if (HEDLEY_UNLIKELY(mag->used == mag->count)) {
if (G_UNLIKELY(mag->used == mag->count)) {
# endif
/* full magazine; remove from pool */
guint j;
@ -468,7 +468,7 @@ void li_mempool_free(liMempoolPtr ptr, gsize size) {
size = mp_align_size(size);
/* mp_alloc_page fallback */
if (HEDLEY_UNLIKELY(size > MP_MAX_ALLOC_SIZE/MP_MIN_ALLOC_COUNT)) {
if (G_UNLIKELY(size > MP_MAX_ALLOC_SIZE/MP_MIN_ALLOC_COUNT)) {
mp_free_page(ptr.data, size);
return;
}
@ -486,7 +486,7 @@ void li_mempool_cleanup(void) {
/* "Force" thread-private cleanup */
mp_pools *pools;
if (HEDLEY_UNLIKELY(!mp_initialized)) {
if (G_UNLIKELY(!mp_initialized)) {
mempool_init();
}

View File

@ -34,7 +34,7 @@ void li_waitqueue_update(liWaitQueue *queue) {
li_tstamp repeat;
li_tstamp now = li_event_now(li_event_get_loop(&queue->timer));
if (HEDLEY_LIKELY(queue->head)) {
if (G_LIKELY(queue->head)) {
repeat = queue->head->ts + queue->delay - now;
if (repeat < 0.05) repeat = 0.05;
@ -85,7 +85,7 @@ void li_waitqueue_push(liWaitQueue *queue, liWaitQueueElem *elem) {
queue->tail = elem;
}
if (HEDLEY_UNLIKELY(!li_event_active(&queue->timer)))
if (G_UNLIKELY(!li_event_active(&queue->timer)))
li_event_timer_once(&queue->timer, queue->delay);
}
@ -150,7 +150,7 @@ void li_waitqueue_remove(liWaitQueue *queue, liWaitQueueElem *elem) {
elem->queued = FALSE;
queue->length--;
if (HEDLEY_UNLIKELY(!queue->head))
if (G_UNLIKELY(!queue->head))
li_event_stop(&queue->timer);
}

View File

@ -3,8 +3,23 @@
#include <lighttpd/config_lua.h>
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_ACTION "liAction*"
liAction* li_lua_get_action(lua_State *L, int ndx) {
if (!lua_isuserdata(L, ndx)) return NULL;
if (!lua_getmetatable(L, ndx)) return NULL;
luaL_getmetatable(L, LUA_ACTION);
if (lua_isnil(L, -1) || lua_isnil(L, -2) || !lua_equal(L, -1, -2)) {
lua_pop(L, 2);
return NULL;
}
lua_pop(L, 2);
return *(liAction**) lua_touserdata(L, ndx);
}
static int lua_action_gc(lua_State *L) {
liServer *srv;
liLuaState *LL = li_lua_state_get(L);
@ -20,35 +35,6 @@ static int lua_action_gc(lua_State *L) {
return 0;
}
static HEDLEY_NEVER_INLINE void init_action_mt(liServer *srv, lua_State *L) {
lua_pushlightuserdata(L, srv);
lua_pushcclosure(L, lua_action_gc, 1);
lua_setfield(L, -2, "__gc");
}
static void lua_push_action_metatable(liServer *srv, lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_ACTION)) {
init_action_mt(srv, L);
}
}
void li_lua_init_action_mt(liServer *srv, lua_State *L) {
lua_push_action_metatable(srv, L);
lua_pop(L, 1);
}
liAction* li_lua_get_action(lua_State *L, int ndx) {
if (!lua_isuserdata(L, ndx)) return NULL;
if (!lua_getmetatable(L, ndx)) return NULL;
luaL_getmetatable(L, LUA_ACTION);
if (lua_isnil(L, -1) || lua_isnil(L, -2) || !lua_equal(L, -1, -2)) {
lua_pop(L, 2);
return NULL;
}
lua_pop(L, 2);
return *(liAction**) lua_touserdata(L, ndx);
}
int li_lua_push_action(liServer *srv, lua_State *L, liAction *a) {
liAction **pa;
@ -60,7 +46,12 @@ int li_lua_push_action(liServer *srv, lua_State *L, liAction *a) {
pa = (liAction**) lua_newuserdata(L, sizeof(liAction*));
*pa = a;
lua_push_action_metatable(srv, L);
if (luaL_newmetatable(L, LUA_ACTION)) {
lua_pushlightuserdata(L, srv);
lua_pushcclosure(L, lua_action_gc, 1);
lua_setfield(L, -2, "__gc");
}
lua_setmetatable(L, -2);
return 1;
}
@ -185,7 +176,6 @@ liAction* li_lua_make_action(lua_State *L, int ndx) {
lua_newtable(L); /* +1 */
/* new mt */
lua_newtable(L); /* +1 */
/* TODO: protect metatable? */
lua_getfield(L, LUA_REGISTRYINDEX, LI_LUA_REGISTRY_GLOBALS); /* +1 */
lua_setfield(L, -2, "__index"); /* -1 */
lua_setmetatable(L, -2); /* -1 */

View File

@ -4,6 +4,7 @@
#ifdef HAVE_LUA_H
# include <lighttpd/core_lua.h>
# include <lualib.h>
# include <lauxlib.h>
#endif
#ifdef HAVE_LUA_H

View File

@ -1,20 +1,16 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#include <sys/stat.h>
#define LUA_CHUNK "liChunk*"
#define LUA_CHUNKQUEUE "liChunkQueue*"
static HEDLEY_NEVER_INLINE void init_chunk_mt(lua_State *L) {
static void init_chunk_mt(lua_State *L) {
/* TODO */
UNUSED(L);
}
static void lua_push_chunk_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_CHUNK)) {
init_chunk_mt(L);
}
}
typedef int (*lua_ChunkQueue_Attrib)(liChunkQueue *cq, lua_State *L);
@ -263,21 +259,19 @@ static const luaL_Reg chunkqueue_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_chunkqueue_mt(lua_State *L) {
static void init_chunkqueue_mt(lua_State *L) {
luaL_register(L, NULL, chunkqueue_mt);
}
static void lua_push_chunkqueue_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_CHUNKQUEUE)) {
init_chunkqueue_mt(L);
}
}
void li_lua_init_chunk_mt(lua_State *L) {
lua_push_chunk_metatable(L);
if (luaL_newmetatable(L, LUA_CHUNK)) {
init_chunk_mt(L);
}
lua_pop(L, 1);
lua_push_chunkqueue_metatable(L);
if (luaL_newmetatable(L, LUA_CHUNKQUEUE)) {
init_chunkqueue_mt(L);
}
lua_pop(L, 1);
}
@ -304,7 +298,10 @@ int li_lua_push_chunk(lua_State *L, liChunk *c) {
pc = (liChunk**) lua_newuserdata(L, sizeof(liChunk*));
*pc = c;
lua_push_chunk_metatable(L);
if (luaL_newmetatable(L, LUA_CHUNK)) {
init_chunk_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}
@ -332,7 +329,10 @@ int li_lua_push_chunkqueue(lua_State *L, liChunkQueue *cq) {
pcq = (liChunkQueue**) lua_newuserdata(L, sizeof(liChunkQueue*));
*pcq = cq;
lua_push_chunkqueue_metatable(L);
if (luaL_newmetatable(L, LUA_CHUNKQUEUE)) {
init_chunkqueue_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -1,8 +1,10 @@
#include <lighttpd/core_lua.h>
#include <lighttpd/condition_lua.h>
#include <lighttpd/value_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_CONDITION "liCondition*"
#define LUA_COND_LVALUE "liConditionLValue*"
#define LUA_COND_LVALUE_T "liCondLValue"
@ -111,13 +113,9 @@ static int lua_cond_lvalue_gc(lua_State *L) {
/* new metatables and push */
static HEDLEY_NEVER_INLINE void init_condition_mt(liServer *srv, lua_State *L) {
lua_mt_register_srv(srv, L, "__gc", lua_condition_gc);
}
static void lua_push_condition_metatable(liServer *srv, lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_CONDITION)) {
init_condition_mt(srv, L);
if (luaL_newmetatable(L, LUA_CONDITION)) {
lua_mt_register_srv(srv, L, "__gc", lua_condition_gc);
}
}
@ -133,6 +131,7 @@ int li_lua_push_condition(liServer *srv, lua_State *L, liCondition *c) {
*pc = c;
lua_push_condition_metatable(srv, L);
lua_setmetatable(L, -2);
return 1;
}
@ -194,35 +193,31 @@ static int lua_cond_lvalue_cmp(lua_State *L) {
return 0;
}
static HEDLEY_NEVER_INLINE void init_cond_lvalue_mt(liServer *srv, lua_State *L) {
lua_mt_register(L, "__gc", lua_cond_lvalue_gc);
lua_mt_register(L, "__tostring", lua_cond_lvalue_tostring);
lua_mt_register_cmp(srv, L, "eq", lua_cond_lvalue_cmp, LI_CONFIG_COND_EQ);
lua_mt_register_cmp(srv, L, "ne", lua_cond_lvalue_cmp, LI_CONFIG_COND_NE);
lua_mt_register_cmp(srv, L, "prefix", lua_cond_lvalue_cmp, LI_CONFIG_COND_PREFIX);
lua_mt_register_cmp(srv, L, "notprefix", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOPREFIX);
lua_mt_register_cmp(srv, L, "suffix", lua_cond_lvalue_cmp, LI_CONFIG_COND_SUFFIX);
lua_mt_register_cmp(srv, L, "notsuffix", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOSUFFIX);
lua_mt_register_cmp(srv, L, "match", lua_cond_lvalue_cmp, LI_CONFIG_COND_MATCH);
lua_mt_register_cmp(srv, L, "nomatch", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOMATCH);
lua_mt_register_cmp(srv, L, "ip", lua_cond_lvalue_cmp, LI_CONFIG_COND_IP);
lua_mt_register_cmp(srv, L, "notip", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOTIP);
lua_mt_register_cmp(srv, L, "gt", lua_cond_lvalue_cmp, LI_CONFIG_COND_GT);
lua_mt_register_cmp(srv, L, "ge", lua_cond_lvalue_cmp, LI_CONFIG_COND_GE);
lua_mt_register_cmp(srv, L, "lt", lua_cond_lvalue_cmp, LI_CONFIG_COND_LT);
lua_mt_register_cmp(srv, L, "le", lua_cond_lvalue_cmp, LI_CONFIG_COND_LE);
lua_mt_register_cmp(srv, L, "is", lua_cond_lvalue_bool, LI_CONFIG_COND_EQ);
lua_mt_register_cmp(srv, L, "isnot", lua_cond_lvalue_bool, LI_CONFIG_COND_NE);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
}
static void lua_push_cond_lvalue_metatable(liServer *srv, lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_COND_LVALUE)) {
init_cond_lvalue_mt(srv, L);
if (luaL_newmetatable(L, LUA_COND_LVALUE)) {
lua_mt_register(L, "__gc", lua_cond_lvalue_gc);
lua_mt_register(L, "__tostring", lua_cond_lvalue_tostring);
lua_mt_register_cmp(srv, L, "eq", lua_cond_lvalue_cmp, LI_CONFIG_COND_EQ);
lua_mt_register_cmp(srv, L, "ne", lua_cond_lvalue_cmp, LI_CONFIG_COND_NE);
lua_mt_register_cmp(srv, L, "prefix", lua_cond_lvalue_cmp, LI_CONFIG_COND_PREFIX);
lua_mt_register_cmp(srv, L, "notprefix", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOPREFIX);
lua_mt_register_cmp(srv, L, "suffix", lua_cond_lvalue_cmp, LI_CONFIG_COND_SUFFIX);
lua_mt_register_cmp(srv, L, "notsuffix", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOSUFFIX);
lua_mt_register_cmp(srv, L, "match", lua_cond_lvalue_cmp, LI_CONFIG_COND_MATCH);
lua_mt_register_cmp(srv, L, "nomatch", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOMATCH);
lua_mt_register_cmp(srv, L, "ip", lua_cond_lvalue_cmp, LI_CONFIG_COND_IP);
lua_mt_register_cmp(srv, L, "notip", lua_cond_lvalue_cmp, LI_CONFIG_COND_NOTIP);
lua_mt_register_cmp(srv, L, "gt", lua_cond_lvalue_cmp, LI_CONFIG_COND_GT);
lua_mt_register_cmp(srv, L, "ge", lua_cond_lvalue_cmp, LI_CONFIG_COND_GE);
lua_mt_register_cmp(srv, L, "lt", lua_cond_lvalue_cmp, LI_CONFIG_COND_LT);
lua_mt_register_cmp(srv, L, "le", lua_cond_lvalue_cmp, LI_CONFIG_COND_LE);
lua_mt_register_cmp(srv, L, "is", lua_cond_lvalue_bool, LI_CONFIG_COND_EQ);
lua_mt_register_cmp(srv, L, "isnot", lua_cond_lvalue_bool, LI_CONFIG_COND_NE);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
}
}
@ -233,6 +228,7 @@ static int lua_push_cond_lvalue(liServer *srv, lua_State *L, liConditionLValue *
*pv = lvalue;
lua_push_cond_lvalue_metatable(srv, L);
lua_setmetatable(L, -2);
return 1;
}
@ -256,28 +252,13 @@ static int lua_cond_lvalue_t_index(lua_State *L) {
return 1;
}
static HEDLEY_NEVER_INLINE void init_cond_lvalue_t_mt(liServer *srv, lua_State *L) {
lua_mt_register(L, "__tostring", lua_cond_lvalue_t_tostring);
lua_mt_register_srv(srv, L, "__index", lua_cond_lvalue_t_index);
}
static void lua_push_cond_lvalue_t_metatable(liServer *srv, lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_COND_LVALUE_T)) {
init_cond_lvalue_t_mt(srv, L);
if (luaL_newmetatable(L, LUA_COND_LVALUE_T)) {
lua_mt_register(L, "__tostring", lua_cond_lvalue_t_tostring);
lua_mt_register_srv(srv, L, "__index", lua_cond_lvalue_t_index);
}
}
void li_lua_init_condition_mt(liServer *srv, lua_State *L) {
lua_push_condition_metatable(srv, L);
lua_pop(L, 1);
lua_push_cond_lvalue_metatable(srv, L);
lua_pop(L, 1);
lua_push_cond_lvalue_t_metatable(srv, L);
lua_pop(L, 1);
}
/* cond_lvalue_t */
static int lua_push_cond_lvalue_t(liServer *srv, lua_State *L, liCondLValue t) {
@ -287,6 +268,7 @@ static int lua_push_cond_lvalue_t(liServer *srv, lua_State *L, liCondLValue t) {
*pt = t;
lua_push_cond_lvalue_t_metatable(srv, L);
lua_setmetatable(L, -2);
return 1;
}

View File

@ -6,6 +6,9 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
typedef int (*LuaWrapper)(liServer *srv, liWorker *wrk, lua_State *L, const char *key);
static liValue* lua_params_to_value(liServer *srv, lua_State *L) {
@ -46,30 +49,26 @@ static int _lua_dynamic_hash_index_call(lua_State *L) {
static int _lua_dynamic_hash_index(lua_State *L) {
int key_ndx;
/* upvalues: 1: srv, 2: wrk, 3: "wrapper", 4: key prefix */
/* concat key prefix and new sub key */
lua_pushvalue(L, lua_upvalueindex(4)); /* key prefix */
lua_pushvalue(L, lua_upvalueindex(4));
lua_pushvalue(L, 2);
lua_concat(L, 2);
key_ndx = lua_gettop(L);
lua_newuserdata(L, 0); /* result: zero-sized userdata object */
lua_newtable(L); /* result */
lua_newtable(L); /* meta table */
li_lua_protect_metatable(L);
/* call method */
lua_pushvalue(L, lua_upvalueindex(1)); /* srv */
lua_pushvalue(L, lua_upvalueindex(2)); /* wrk */
lua_pushvalue(L, lua_upvalueindex(3)); /* wrapper */
lua_pushvalue(L, lua_upvalueindex(1));
lua_pushvalue(L, lua_upvalueindex(2));
lua_pushvalue(L, lua_upvalueindex(3));
lua_pushvalue(L, key_ndx);
lua_pushcclosure(L, _lua_dynamic_hash_index_call, 4);
lua_setfield(L, -2, "__call");
/* index for "nested" keys */
lua_pushvalue(L, lua_upvalueindex(1)); /* srv */
lua_pushvalue(L, lua_upvalueindex(2)); /* wrk */
lua_pushvalue(L, lua_upvalueindex(3)); /* wrapper */
lua_pushvalue(L, lua_upvalueindex(1));
lua_pushvalue(L, lua_upvalueindex(2));
lua_pushvalue(L, lua_upvalueindex(3));
lua_pushvalue(L, key_ndx); /* append a "." to the current key for nesting */
lua_pushstring(L, ".");
lua_concat(L, 2);
@ -82,17 +81,14 @@ static int _lua_dynamic_hash_index(lua_State *L) {
}
static void lua_push_dynamic_hash(liServer *srv, liWorker *wrk, lua_State *L, LuaWrapper wrapper) {
lua_newuserdata(L, 0); /* result: zero-sized userdata object */
lua_newtable(L);
lua_newtable(L); /* meta table */
li_lua_protect_metatable(L);
lua_pushlightuserdata(L, srv);
lua_pushlightuserdata(L, wrk);
lua_pushlightuserdata(L, (void*)(intptr_t) wrapper);
lua_pushstring(L, ""); /* nesting starts at "root" with empty string */
lua_pushcclosure(L, _lua_dynamic_hash_index, 4);
lua_setfield(L, -2, "__index");
lua_setmetatable(L, -2);
}

View File

@ -120,7 +120,7 @@ struct liConditionTree {
liConditionTree *left, *right;
};
static liConfigToken tokenizer_error(liConfigTokenizerContext *ctx, GError **error, const char *fmt, ...) HEDLEY_PRINTF_FORMAT(3, 4);
static liConfigToken tokenizer_error(liConfigTokenizerContext *ctx, GError **error, const char *fmt, ...) G_GNUC_PRINTF(3, 4);
GQuark li_config_error_quark(void) {
return g_quark_from_string("li-config-error-quark");

View File

@ -1,8 +1,8 @@
#include <lighttpd/core_lua.h>
#include <lighttpd/actions_lua.h>
#include <lighttpd/condition_lua.h>
#include <lighttpd/value_lua.h>
#include <lualib.h>
#include <lauxlib.h>
liLuaState *li_lua_state_get(lua_State *L) {
liLuaState *LL;
@ -315,7 +315,7 @@ static int li_lua_kvl_to_table(lua_State *L) {
}
#endif
static void li_lua_push_lighty_constants(lua_State *L, int ndx) {
static void lua_push_constants(lua_State *L, int ndx) {
lua_pushinteger(L, LI_HANDLER_GO_ON);
lua_setfield(L, ndx, "HANDLER_GO_ON");
lua_pushinteger(L, LI_HANDLER_COMEBACK);
@ -330,22 +330,15 @@ void li_lua_init2(liLuaState *LL, liServer *srv, liWorker *wrk) {
lua_State *L = LL->L;
li_lua_init_chunk_mt(L);
li_lua_init_coninfo_mt(L);
li_lua_init_environment_mt(L);
li_lua_init_filter_mt(L);
li_lua_init_http_headers_mt(L);
li_lua_init_physical_mt(L);
li_lua_init_request_mt(L);
li_lua_init_response_mt(L);
li_lua_init_stat_mt(L);
li_lua_init_subrequest_mt(L);
li_lua_init_virtualrequest_mt(L);
li_lua_init_vrequest_mt(L);
if (NULL == wrk) {
/* these should only be used in the "main" lua context */
li_lua_init_action_mt(srv, L);
li_lua_init_condition_mt(srv, L);
li_lua_init_value_mt(L);
}
li_lua_init_stat_mt(L);
/* prefer closure, but just in case */
lua_pushlightuserdata(L, srv);
@ -355,16 +348,9 @@ void li_lua_init2(liLuaState *LL, liServer *srv, liWorker *wrk) {
lua_setfield(L, LUA_REGISTRYINDEX, LI_LUA_REGISTRY_WORKER);
}
/* create read-only lighty "table" (zero-sized userdata object) */
lua_newuserdata(L, 0); /* lighty. */
lua_newtable(L); /* metatable(lighty) */
/* prevent tampering with the metatable */
li_lua_protect_metatable(L);
lua_newtable(L); /* metatable(lighty).__index */
/* create lighty.filter_in and lighty.filter_out: */
lua_newtable(L); /* lighty. */
li_lua_init_filters(L, srv);
/* lighty.print (and lighty.error and global print) */
lua_pushlightuserdata(L, srv);
lua_pushlightuserdata(L, wrk);
lua_pushcclosure(L, li_lua_error, 2);
@ -374,25 +360,21 @@ void li_lua_init2(liLuaState *LL, liServer *srv, liWorker *wrk) {
lua_setfield(L, -3, "error");
lua_setfield(L, -2, "print");
/* lighty.warning */
lua_pushlightuserdata(L, srv);
lua_pushlightuserdata(L, wrk);
lua_pushcclosure(L, li_lua_warning, 2);
lua_setfield(L, -2, "warning");
/* lighty.info */
lua_pushlightuserdata(L, srv);
lua_pushlightuserdata(L, wrk);
lua_pushcclosure(L, li_lua_info, 2);
lua_setfield(L, -2, "info");
/* lighty.debug */
lua_pushlightuserdata(L, srv);
lua_pushlightuserdata(L, wrk);
lua_pushcclosure(L, li_lua_debug, 2);
lua_setfield(L, -2, "debug");
/* lighty.{md5,sha1,sha256} */
lua_pushcclosure(L, li_lua_md5, 0);
lua_setfield(L, -2, "md5");
lua_pushcclosure(L, li_lua_sha1, 0);
@ -400,17 +382,11 @@ void li_lua_init2(liLuaState *LL, liServer *srv, liWorker *wrk) {
lua_pushcclosure(L, li_lua_sha256, 0);
lua_setfield(L, -2, "sha256");
/* lighty.path_simplify */
lua_pushcclosure(L, li_lua_path_simplify, 0);
lua_setfield(L, -2, "path_simplify");
li_lua_push_lighty_constants(L, -2);
lua_push_constants(L, -2);
/* set __index for metatable(lighty) */
lua_setfield(L, -2, "__index");
/* associate metatable(lighty) */
lua_setmetatable(L, -2);
/* store "lighty" object in globals */
lua_setfield(L, LUA_GLOBALSINDEX, "lighty");
li_lua_store_globals(L);
@ -428,7 +404,6 @@ void li_lua_new_globals(lua_State *L) {
/* metatable for new global env, link old globals as readonly */
lua_newtable(L); /* +1 */
/* TODO: protect metatable? */
lua_pushvalue(L, LUA_GLOBALSINDEX); /* +1 */
lua_setfield(L, -2, "__index"); /* -1 */
lua_setmetatable(L, -2); /* -1 */

View File

@ -1,6 +1,9 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_ENVIRONMENT "liEnvironment*"
static int lua_environment_get(lua_State *L) {
@ -110,18 +113,14 @@ static const luaL_Reg environment_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_env_mt(lua_State *L) {
static void init_env_mt(lua_State *L) {
luaL_register(L, NULL, environment_mt);
}
static void lua_push_environment_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_ENVIRONMENT)) {
void li_lua_init_environment_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_ENVIRONMENT)) {
init_env_mt(L);
}
}
void li_lua_init_environment_mt(lua_State *L) {
lua_push_environment_metatable(L);
lua_pop(L, 1);
}
@ -148,7 +147,10 @@ int li_lua_push_environment(lua_State *L, liEnvironment *env) {
penv = (liEnvironment**) lua_newuserdata(L, sizeof(liEnvironment*));
*penv = env;
lua_push_environment_metatable(L);
if (luaL_newmetatable(L, LUA_ENVIRONMENT)) {
init_env_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -3,6 +3,9 @@
#include <lighttpd/core_lua.h>
#include <lighttpd/actions_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_FILTER "liFilter*"
typedef int (*lua_Filter_Attrib)(liFilter *f, lua_State *L);
@ -108,18 +111,14 @@ static const luaL_Reg filter_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_filter_mt(lua_State *L) {
static void init_filter_mt(lua_State *L) {
luaL_register(L, NULL, filter_mt);
}
static void lua_push_filter_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_FILTER)) {
void li_lua_init_filter_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_FILTER)) {
init_filter_mt(L);
}
}
void li_lua_init_filter_mt(lua_State *L) {
lua_push_filter_metatable(L);
lua_pop(L, 1);
}
@ -146,7 +145,10 @@ int li_lua_push_filter(lua_State *L, liFilter *f) {
pf = (liFilter**) lua_newuserdata(L, sizeof(liFilter*));
*pf = f;
lua_push_filter_metatable(L);
if (luaL_newmetatable(L, LUA_FILTER)) {
init_filter_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -267,7 +267,7 @@ gboolean li_http_header_tokenizer_next(liHttpHeaderTokenizer *tokenizer, GString
++pos;
if (pos >= len) return FALSE; /* no character after backslash */
/* append whatever comes */
HEDLEY_FALL_THROUGH;
/* fallthrough */
default:
g_string_append_c(token, str[pos]);
break;
@ -285,7 +285,7 @@ quoted:
++pos;
if (pos >= len) return FALSE; /* no character after backslash */
/* append whatever comes */
HEDLEY_FALL_THROUGH;
/* fallthrough */
default:
g_string_append_c(token, str[pos]);
break;

View File

@ -1,6 +1,9 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_HTTPHEADERS "liHttpHeaders*"
static int lua_http_headers_get(lua_State *L) {
@ -198,18 +201,14 @@ static const luaL_Reg http_headers_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_http_headers_mt(lua_State *L) {
static void init_http_headers_mt(lua_State *L) {
luaL_register(L, NULL, http_headers_mt);
}
static void lua_push_http_headers_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_HTTPHEADERS)) {
void li_lua_init_http_headers_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_HTTPHEADERS)) {
init_http_headers_mt(L);
}
}
void li_lua_init_http_headers_mt(lua_State *L) {
lua_push_http_headers_metatable(L);
lua_pop(L, 1);
}
@ -236,7 +235,10 @@ int li_lua_push_http_headers(lua_State *L, liHttpHeaders *headers) {
pheaders = (liHttpHeaders**) lua_newuserdata(L, sizeof(liHttpHeaders*));
*pheaders = headers;
lua_push_http_headers_metatable(L);
if (luaL_newmetatable(L, LUA_HTTPHEADERS)) {
init_http_headers_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -207,7 +207,7 @@ gboolean li_log_write_direct(liServer *srv, liWorker *wrk, GString *path, GStrin
log_entry->queue_link.next = NULL;
log_entry->queue_link.prev = NULL;
if (HEDLEY_LIKELY(wrk)) {
if (G_LIKELY(wrk)) {
/* push onto local worker log queue */
g_queue_push_tail_link(&wrk->logs.log_queue, &log_entry->queue_link);
} else {
@ -273,7 +273,7 @@ gboolean li_log_write(liServer *srv, liWorker *wrk, liLogContext *context, liLog
log_entry->queue_link.next = NULL;
log_entry->queue_link.prev = NULL;
if (HEDLEY_LIKELY(wrk)) {
if (G_LIKELY(wrk)) {
/* push onto local worker log queue */
g_queue_push_tail_link(&wrk->logs.log_queue, &log_entry->queue_link);
} else {

View File

@ -98,7 +98,7 @@ liNetworkStatus li_network_read(int fd, liChunkQueue *cq, goffset read_max, liBu
if (NULL != buffer) {
if (buf != NULL) {
/* use last buffer as *buffer; they should be the same anyway */
if (HEDLEY_UNLIKELY(buf != *buffer)) {
if (G_UNLIKELY(buf != *buffer)) {
li_buffer_acquire(buf);
li_buffer_release(*buffer);
*buffer = buf;

View File

@ -240,7 +240,7 @@ void li_pattern_free(liPattern *pattern) {
part = &g_array_index(arr, liPatternPart, i);
switch (part->type) {
case PATTERN_STRING: g_string_free(part->data.str, TRUE); break;
case PATTERN_VAR_ENCODED: HEDLEY_FALL_THROUGH;
case PATTERN_VAR_ENCODED: /* fall through */
case PATTERN_VAR: li_condition_lvalue_release(part->data.lvalue); break;
default: break;
}
@ -277,7 +277,7 @@ void li_pattern_eval(liVRequest *vr, GString *dest, liPattern *pattern, liPatter
break;
case PATTERN_VAR_ENCODED:
encoded = TRUE;
HEDLEY_FALL_THROUGH;
/* fall through */
case PATTERN_VAR:
if (vr == NULL) continue;
@ -305,7 +305,7 @@ void li_pattern_array_cb(GString *pattern_result, guint from, guint to, gpointer
if (NULL == a || 0 == a->len) return;
if (HEDLEY_LIKELY(from <= to)) {
if (G_LIKELY(from <= to)) {
to = MIN(to, a->len - 1);
for (i = from; i <= to; i++) {
GString *str = g_array_index(a, GString*, i);
@ -331,7 +331,7 @@ void li_pattern_regex_cb(GString *pattern_result, guint from, guint to, gpointer
if (NULL == match_info) return;
if (HEDLEY_LIKELY(from <= to)) {
if (G_LIKELY(from <= to)) {
to = MIN(to, G_MAXINT);
for (i = from; i <= to; i++) {
if (g_match_info_fetch_pos(match_info, (gint) i, &start_pos, &end_pos)) {

View File

@ -1,6 +1,9 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_PHYSICAL "liPhysical*"
typedef int (*lua_Physical_Attrib)(liPhysical *phys, lua_State *L);
@ -124,18 +127,14 @@ static const luaL_Reg physical_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_physical_mt(lua_State *L) {
static void init_physical_mt(lua_State *L) {
luaL_register(L, NULL, physical_mt);
}
static void lua_push_physical_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_PHYSICAL)) {
void li_lua_init_physical_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_PHYSICAL)) {
init_physical_mt(L);
}
}
void li_lua_init_physical_mt(lua_State *L) {
lua_push_physical_metatable(L);
lua_pop(L, 1);
}
@ -162,7 +161,10 @@ int li_lua_push_physical(lua_State *L, liPhysical *phys) {
pphys = (liPhysical**) lua_newuserdata(L, sizeof(liPhysical*));
*pphys = phys;
lua_push_physical_metatable(L);
if (luaL_newmetatable(L, LUA_PHYSICAL)) {
init_physical_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -1,6 +1,9 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_REQUEST "liRequest*"
#define LUA_REQUESTURI "liRequestUri*"
@ -140,16 +143,10 @@ static const luaL_Reg request_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_request_mt(lua_State *L) {
static void init_request_mt(lua_State *L) {
luaL_register(L, NULL, request_mt);
}
static void lua_push_request_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_REQUEST)) {
init_request_mt(L);
}
}
typedef int (*lua_RequestUri_Attrib)(liRequestUri *uri, lua_State *L);
#define DEF_LUA_MODIFY_GSTRING(attr) \
@ -281,21 +278,19 @@ static const luaL_Reg requesturi_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_requesturi_mt(lua_State *L) {
static void init_requesturi_mt(lua_State *L) {
luaL_register(L, NULL, requesturi_mt);
}
static void lua_push_requesturi_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_REQUESTURI)) {
init_requesturi_mt(L);
}
}
void li_lua_init_request_mt(lua_State *L) {
lua_push_request_metatable(L);
if (luaL_newmetatable(L, LUA_REQUEST)) {
init_request_mt(L);
}
lua_pop(L, 1);
lua_push_requesturi_metatable(L);
if (luaL_newmetatable(L, LUA_REQUESTURI)) {
init_requesturi_mt(L);
}
lua_pop(L, 1);
}
@ -322,7 +317,10 @@ int li_lua_push_request(lua_State *L, liRequest *req) {
preq = (liRequest**) lua_newuserdata(L, sizeof(liRequest*));
*preq = req;
lua_push_request_metatable(L);
if (luaL_newmetatable(L, LUA_REQUEST)) {
init_request_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}
@ -350,7 +348,10 @@ int li_lua_push_requesturi(lua_State *L, liRequestUri *uri) {
puri = (liRequestUri**) lua_newuserdata(L, sizeof(liRequestUri*));
*puri = uri;
lua_push_requesturi_metatable(L);
if (luaL_newmetatable(L, LUA_REQUESTURI)) {
init_requesturi_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -1,6 +1,9 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_RESPONSE "liResponse*"
typedef int (*lua_Response_Attrib)(liResponse *resp, lua_State *L);
@ -119,18 +122,14 @@ static const luaL_Reg response_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_response_mt(lua_State *L) {
static void init_response_mt(lua_State *L) {
luaL_register(L, NULL, response_mt);
}
static void lua_push_response_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_RESPONSE)) {
void li_lua_init_response_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_RESPONSE)) {
init_response_mt(L);
}
}
void li_lua_init_response_mt(lua_State *L) {
lua_push_response_metatable(L);
lua_pop(L, 1);
}
@ -157,7 +156,10 @@ int li_lua_push_response(lua_State *L, liResponse *resp) {
presp = (liResponse**) lua_newuserdata(L, sizeof(liResponse*));
*presp = resp;
lua_push_response_metatable(L);
if (luaL_newmetatable(L, LUA_RESPONSE)) {
init_response_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -1,6 +1,10 @@
#include <lighttpd/core_lua.h>
#include <lualib.h>
#include <lauxlib.h>
/* struct stat */
#define LUA_STAT "struct stat"
@ -202,18 +206,14 @@ static const luaL_Reg stat_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_stat_mt(lua_State *L) {
static void init_stat_mt(lua_State *L) {
luaL_register(L, NULL, stat_mt);
}
static void lua_push_stat_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_STAT)) {
void li_lua_init_stat_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_STAT)) {
init_stat_mt(L);
}
}
void li_lua_init_stat_mt(lua_State *L) {
lua_push_stat_metatable(L);
lua_pop(L, 1);
}
@ -228,7 +228,10 @@ int li_lua_push_stat(lua_State *L, struct stat *st) {
pst = (struct stat*) lua_newuserdata(L, sizeof(struct stat));
*pst = *st;
lua_push_stat_metatable(L);
if (luaL_newmetatable(L, LUA_STAT)) {
init_stat_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -2,6 +2,9 @@
#include <lighttpd/core_lua.h>
#include <lighttpd/actions_lua.h>
#include <lualib.h>
#include <lauxlib.h>
typedef struct liSubrequest liSubrequest;
struct liSubrequest {
liWorker *wrk;
@ -153,18 +156,14 @@ static const luaL_Reg subrequest_mt[] = {
};
static HEDLEY_NEVER_INLINE void init_subrequest_mt(lua_State *L) {
static void init_subrequest_mt(lua_State *L) {
luaL_register(L, NULL, subrequest_mt);
}
static void lua_push_subrequest_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_SUBREQUEST)) {
void li_lua_init_subrequest_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_SUBREQUEST)) {
init_subrequest_mt(L);
}
}
void li_lua_init_subrequest_mt(lua_State *L) {
lua_push_subrequest_metatable(L);
lua_pop(L, 1);
}
@ -191,7 +190,10 @@ static int li_lua_push_subrequest(lua_State *L, liSubrequest *sr) {
psr = (liSubrequest**) lua_newuserdata(L, sizeof(liSubrequest*));
*psr = sr;
lua_push_subrequest_metatable(L);
if (luaL_newmetatable(L, LUA_SUBREQUEST)) {
init_subrequest_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -103,19 +103,19 @@ static void throttle_pool_rearm(liWorker *wrk, liThrottlePool *pool, guint now)
guint last = g_atomic_int_get((gint*) &pool->last_rearm);
guint time_diff = now - last;
if (HEDLEY_UNLIKELY(time_diff >= LI_THROTTLE_GRANULARITY)) {
if (G_UNLIKELY(time_diff >= LI_THROTTLE_GRANULARITY)) {
g_mutex_lock(pool->rearm_mutex);
/* check again */
last = g_atomic_int_get((gint*) &pool->last_rearm);
time_diff = now - last;
if (HEDLEY_LIKELY(time_diff >= LI_THROTTLE_GRANULARITY)) {
if (G_LIKELY(time_diff >= LI_THROTTLE_GRANULARITY)) {
S_throttle_pool_rearm_workers(pool, wrk->srv->worker_count, time_diff);
g_atomic_int_set((gint*) &pool->last_rearm, now);
}
g_mutex_unlock(pool->rearm_mutex);
}
if (HEDLEY_UNLIKELY(wpool->last_rearm < last)) {
if (G_UNLIKELY(wpool->last_rearm < last)) {
/* distribute wpool->magazine */
GList *lnk;
guint connections = wpool->connections;

View File

@ -4,6 +4,8 @@
#include <lighttpd/actions_lua.h>
#include <lighttpd/core_lua.h>
#include <lauxlib.h>
#define LUA_KVLIST_VALUE "li KeyValue list (string, liValue*)"
static int lua_kvlist_index(lua_State *L) {
@ -55,21 +57,13 @@ fail:
return 1;
}
static HEDLEY_NEVER_INLINE void init_kvlist_mt(lua_State *L) {
lua_pushcclosure(L, lua_kvlist_index, 0);
lua_setfield(L, -2, "__index");
}
static void lua_push_kvlist_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_KVLIST_VALUE)) {
init_kvlist_mt(L);
if (luaL_newmetatable(L, LUA_KVLIST_VALUE)) {
lua_pushcclosure(L, lua_kvlist_index, 0);
lua_setfield(L, -2, "__index");
}
}
void li_lua_init_value_mt(lua_State *L) {
lua_push_kvlist_metatable(L);
lua_pop(L, 1);
}
static liValue* li_value_from_lua_table(liServer *srv, lua_State *L, int ndx) {
liValue *val, *entry;
@ -113,7 +107,7 @@ static liValue* li_value_from_lua_table(liServer *srv, lua_State *L, int ndx) {
break;
default:
ERROR(srv, "Unexpected key type in table: %s (%i) - skipping entry", lua_typename(L, lua_type(L, -1)), lua_type(L, -1));
ERROR(srv, "Unexpted key type in table: %s (%i) - skipping entry", lua_typename(L, lua_type(L, -1)), lua_type(L, -1));
lua_pop(L, 1);
break;
}

View File

@ -2,6 +2,9 @@
#include <lighttpd/core_lua.h>
#include <lighttpd/actions_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#define LUA_VREQUEST "liVRequest*"
typedef int (*lua_VRequest_Attrib)(liVRequest *vr, lua_State *L);
@ -337,14 +340,15 @@ static const luaL_Reg vrequest_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_vrequest_mt(lua_State *L) {
static void init_vrequest_mt(lua_State *L) {
luaL_register(L, NULL, vrequest_mt);
}
static void lua_push_vrequest_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_VREQUEST)) {
void li_lua_init_vrequest_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_VREQUEST)) {
init_vrequest_mt(L);
}
lua_pop(L, 1);
}
liVRequest* li_lua_get_vrequest(lua_State *L, int ndx) {
@ -370,7 +374,10 @@ int li_lua_push_vrequest(lua_State *L, liVRequest *vr) {
pvr = (liVRequest**) lua_newuserdata(L, sizeof(liVRequest*));
*pvr = vr;
lua_push_vrequest_metatable(L);
if (luaL_newmetatable(L, LUA_VREQUEST)) {
init_vrequest_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}
@ -485,21 +492,14 @@ static const luaL_Reg coninfo_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_coninfo_mt(lua_State *L) {
static void init_coninfo_mt(lua_State *L) {
luaL_register(L, NULL, coninfo_mt);
}
static void lua_push_coninfo_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_CONINFO)) {
void li_lua_init_coninfo_mt(lua_State *L) {
if (luaL_newmetatable(L, LUA_CONINFO)) {
init_coninfo_mt(L);
}
}
void li_lua_init_virtualrequest_mt(lua_State *L) {
lua_push_vrequest_metatable(L);
lua_pop(L, 1);
lua_push_coninfo_metatable(L);
lua_pop(L, 1);
}
@ -526,7 +526,10 @@ int li_lua_push_coninfo(lua_State *L, liConInfo *coninfo) {
pconinfo = (liConInfo**) lua_newuserdata(L, sizeof(liConInfo*));
*pconinfo = coninfo;
lua_push_coninfo_metatable(L);
if (luaL_newmetatable(L, LUA_CONINFO)) {
init_coninfo_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}

View File

@ -26,7 +26,7 @@ enum FCGI_Type {
enum FCGI_Flags {
FCGI_KEEP_CONN = 1
} HEDLEY_FLAGS;
};
enum FCGI_Role {
FCGI_RESPONDER = 1,

View File

@ -314,7 +314,7 @@ static void do_gnutls_read(liGnuTLSFilter *f) {
if (buf != NULL) {
/* use last buffer as raw_in_buffer; they should be the same anyway */
if (HEDLEY_UNLIKELY(buf != f->raw_in_buffer)) {
if (G_UNLIKELY(buf != f->raw_in_buffer)) {
li_buffer_acquire(buf);
li_buffer_release(f->raw_in_buffer);
f->raw_in_buffer = buf;
@ -427,7 +427,7 @@ static void do_gnutls_write(liGnuTLSFilter *f) {
_ERROR(f->srv, f->wrk, f->log_context, "Couldn't read data from chunkqueue: %s", err->message);
g_error_free(err);
}
HEDLEY_FALL_THROUGH;
/* fall through */
default:
f_abort_gnutls(f);
goto out;

View File

@ -18,6 +18,9 @@
#include <lighttpd/value_lua.h>
#include <lighttpd/actions_lua.h>
#include <lualib.h>
#include <lauxlib.h>
#ifndef DEFAULT_LUADIR
#define DEFAULT_LUADIR "/usr/local/share/lighttpd2/lua"
#endif
@ -183,9 +186,9 @@ static liAction* lua_handler_create(liServer *srv, liWorker *wrk, liPlugin* p, l
v_filename = val;
} else if (LI_VALUE_LIST == li_value_type(val)) {
switch (li_value_list_len(val)) {
case 3: v_args = li_value_list_at(val, 2); HEDLEY_FALL_THROUGH;
case 2: v_options = li_value_list_at(val, 1); HEDLEY_FALL_THROUGH;
case 1: v_filename = li_value_list_at(val, 0); HEDLEY_FALL_THROUGH;
case 3: v_args = li_value_list_at(val, 2); /* fall through */
case 2: v_options = li_value_list_at(val, 1); /* fall through */
case 1: v_filename = li_value_list_at(val, 0); /* fall through */
case 0: break;
default:
ERROR(srv, "%s", "lua.handler expects at most 3 arguments");
@ -522,9 +525,9 @@ static gboolean lua_plugin(liServer *srv, liPlugin *p, liValue *val, gpointer us
v_filename = val;
} else if (LI_VALUE_LIST == li_value_type(val)) {
switch (li_value_list_len(val)) {
case 3: v_args = li_value_list_at(val, 2); HEDLEY_FALL_THROUGH;
case 2: v_options = li_value_list_at(val, 1); HEDLEY_FALL_THROUGH;
case 1: v_filename = li_value_list_at(val, 0); HEDLEY_FALL_THROUGH;
case 3: v_args = li_value_list_at(val, 2); /* fall through */
case 2: v_options = li_value_list_at(val, 1); /* fall through */
case 1: v_filename = li_value_list_at(val, 0); /* fall through */
case 0: break;
default:
ERROR(srv, "%s", "lua.plugin expects at most 3 arguments");

View File

@ -16,6 +16,8 @@
#ifdef HAVE_LUA_H
# include <lighttpd/core_lua.h>
# include <lualib.h>
# include <lauxlib.h>
#endif
LI_API gboolean mod_memcached_init(liModules *mods, liModule *mod);
@ -911,18 +913,6 @@ static const luaL_Reg mc_con_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_mc_con_mt(lua_State *L) {
luaL_register(L, NULL, mc_con_mt);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
}
static void lua_push_mc_con_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_MEMCACHEDCON)) {
init_mc_con_mt(L);
}
}
typedef int (*lua_mc_req_Attrib)(mc_lua_request *req, lua_State *L);
static int lua_mc_req_attr_read_response(mc_lua_request *req, lua_State *L) {
@ -990,14 +980,14 @@ static const luaL_Reg mc_req_mt[] = {
{ NULL, NULL }
};
static HEDLEY_NEVER_INLINE void init_mc_req_mt(lua_State *L) {
luaL_register(L, NULL, mc_req_mt);
static void init_mc_con_mt(lua_State *L) {
luaL_register(L, NULL, mc_con_mt);
lua_pushvalue(L, -1);
lua_setfield(L, -2, "__index");
}
static void lua_push_mc_req_metatable(lua_State *L) {
if (li_lua_new_protected_metatable(L, LUA_MEMCACHEDREQUEST)) {
init_mc_req_mt(L);
}
static void init_mc_req_mt(lua_State *L) {
luaL_register(L, NULL, mc_req_mt);
}
static liMemcachedCon* li_lua_get_memcached_con(lua_State *L, int ndx) {
@ -1031,7 +1021,10 @@ static int li_lua_push_memcached_con(lua_State *L, liMemcachedCon *con) {
pcon = (liMemcachedCon**) lua_newuserdata(L, sizeof(liMemcachedCon*));
*pcon = con;
lua_push_mc_con_metatable(L);
if (luaL_newmetatable(L, LUA_MEMCACHEDCON)) {
init_mc_con_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}
@ -1079,7 +1072,10 @@ static int li_lua_push_memcached_req(lua_State *L, mc_lua_request *req) {
preq = (mc_lua_request**) lua_newuserdata(L, sizeof(mc_lua_request*));
*preq = req;
lua_push_mc_req_metatable(L);
if (luaL_newmetatable(L, LUA_MEMCACHEDREQUEST)) {
init_mc_req_mt(L);
}
lua_setmetatable(L, -2);
return 1;
}
@ -1125,10 +1121,8 @@ static void mod_memcached_lua_init(liLuaState *LL, liServer *srv, liWorker *wrk,
if (wrk) {
li_lua_lock(LL);
/* memcached global table */
lua_newtable(L); /* { } */
/* memcached.new */
lua_pushlightuserdata(L, wrk);
lua_pushcclosure(L, mc_lua_new, 1);
lua_setfield(L, -2, "new");

View File

@ -55,7 +55,7 @@ enum {
SE_CLIENT_CERT = 0x2,
SE_SERVER = 0x4,
SE_SERVER_CERT = 0x8
} HEDLEY_FLAGS;
};
static openssl_context* mod_openssl_context_new(void) {
openssl_context *ctx = g_slice_new0(openssl_context);

View File

@ -431,7 +431,7 @@ static void do_ssl_read(liOpenSSLFilter *f) {
if (buf != NULL) {
/* use last buffer as raw_in_buffer; they should be the same anyway */
if (HEDLEY_UNLIKELY(buf != f->raw_in_buffer)) {
if (G_UNLIKELY(buf != f->raw_in_buffer)) {
li_buffer_acquire(buf);
li_buffer_release(f->raw_in_buffer);
f->raw_in_buffer = buf;
@ -544,7 +544,7 @@ static void do_ssl_write(liOpenSSLFilter *f) {
_ERROR(f->srv, f->wrk, f->log_context, "Couldn't read data from chunkqueue: %s", err->message);
g_error_free(err);
}
HEDLEY_FALL_THROUGH;
/* fall through */
default:
f_abort_ssl(f);
goto out;