mirrors/cosmopolitan
1
0
Fork 0
mirror of https://github.com/jart/cosmopolitan.git synced 2025-08-06 09:50:28 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Update redbean Fetch to accept table with parameters (#97).

Browse source
This commit is contained in:
Paul Kulchenko 2021-07-24 00:22:26 -07:00
parent ea83cc0ad0
commit bb7f9c6270
1 changed files with 10 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

14
tool/net/redbean.c
View file

@ -3702,15 +3702,21 @@ static int LuaFetch(lua_State *L) {
.ai_flags = AI_NUMERICSERV}; .ai_flags = AI_NUMERICSERV};
/* /*
* Get args. * Get args: url [, body | {method = "PUT", body = "..."}]
*/ */
urlarg = luaL_checklstring(L, 1, &urlarglen); urlarg = luaL_checklstring(L, 1, &urlarglen);
if (lua_isnoneornil(L, 2)) { if (lua_istable(L, 2)) {
lua_settop(L, 2); // discard any extra arguments
lua_getfield(L, 2, "body");
body = luaL_optstring(L, -1, "");
lua_getfield(L, 2, "method");
method = GetHttpMethod(luaL_optstring(L, -1, ""), lua_rawlen(L, -1));
lua_settop(L, 2); // drop all added elements to keep the stack balanced
} else if (lua_isnoneornil(L, 2)) {
body = ""; body = "";
method = kHttpGet; method = kHttpGet;
} else { } else {
size_t bodylen; body = luaL_checkstring(L, 2);
body = luaL_checklstring(L, 2, &bodylen);
method = kHttpPost; method = kHttpPost;
} }