www/apache
1
0
Fork 0
mirror of https://github.com/apache/httpd.git synced 2025-08-05 16:55:50 +03:00
Code Activity

Added new function r:htpassword() to mod_lua.

Browse Source 
git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/trunk@1488773 13f79535-47bb-0310-9956-ffa450edef68
This commit is contained in:
Guenter Knauf
2013-06-02 19:31:16 +00:00
parent 288ff9e014
commit 5dbd3677fd
5 changed files with 307 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
modules/lua/lua_request.c
View File

@@ -18,6 +18,7 @@
#include "mod_lua.h"
#include "lua_apr.h"
#include "lua_dbd.h"
#include "lua_passwd.h"
#include "scoreboard.h"
#include "util_md5.h"
#include "util_script.h"
@@ -842,6 +843,32 @@ static int lua_apr_sha1(lua_State *L)
return 1;
}
/*
* lua_apr_htpassword; r:htpassword(string [, algorithm [, cost]]) - Creates
* a htpassword hash from a string
*/
static int lua_apr_htpassword(lua_State *L)
{
passwd_ctx ctx = { 0 };
request_rec *r;
r = ap_lua_check_request_rec(L, 1);
luaL_checktype(L, 2, LUA_TSTRING);
ctx.passwd = apr_pstrdup(r->pool, lua_tostring(L, 2));
ctx.alg = luaL_optinteger(L, 3, ALG_APMD5);
ctx.cost = luaL_optinteger(L, 4, 0);
ctx.pool = r->pool;
ctx.out = apr_pcalloc(r->pool, MAX_PASSWD_LEN);
ctx.out_len = MAX_PASSWD_LEN;
if (mk_password_hash(&ctx)) {
lua_pushboolean(L, 0);
lua_pushstring(L, ctx.errstr);
return 2;
} else {
lua_pushstring(L, ctx.out);
}
return 1;
}
/*
* lua_ap_mpm_query; r:mpm_query(info) - Queries for MPM info
@@ -2050,6 +2077,8 @@ void ap_lua_load_request_lmodule(lua_State *L, apr_pool_t *p)
makefun(&lua_apr_md5, APL_REQ_FUNTYPE_LUACFUN, p));
apr_hash_set(dispatch, "sha1", APR_HASH_KEY_STRING,
makefun(&lua_apr_sha1, APL_REQ_FUNTYPE_LUACFUN, p));
apr_hash_set(dispatch, "htpassword", APR_HASH_KEY_STRING,
makefun(&lua_apr_htpassword, APL_REQ_FUNTYPE_LUACFUN, p));
apr_hash_set(dispatch, "escape", APR_HASH_KEY_STRING,
makefun(&lua_ap_escape, APL_REQ_FUNTYPE_LUACFUN, p));
apr_hash_set(dispatch, "unescape", APR_HASH_KEY_STRING,