mirrors/cosmopolitan
1
0
Fork 0
mirror of https://github.com/jart/cosmopolitan.git synced 2025-08-07 10:20:29 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Extend GetZipPaths to accept an optional prefix to filter based on

Browse source
This commit is contained in:
Paul Kulchenko 2021-11-06 17:44:40 -07:00
parent e5d1536256
commit 4460366884
2 changed files with 9 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

5
tool/net/help.txt
View file

@ -742,9 +742,10 @@ FUNCTIONS
minor (mm), and patch (pp) versions encoded. The version value 1.4 minor (mm), and patch (pp) versions encoded. The version value 1.4
would be represented as 0x010400. would be represented as 0x010400.
GetZipPaths() → {path:str,...} GetZipPaths([prefix:str]) → {path:str,...}
Returns paths of all assets in the zip central directory, prefixed Returns paths of all assets in the zip central directory, prefixed
by a slash. by a slash. If prefix parameter is provided, then only paths that
start with the prefix (case sensitive) are returned.
HasParam(name:str) → bool HasParam(name:str) → bool
Returns true if parameter with name was supplied in either the Returns true if parameter with name was supplied in either the

9
tool/net/redbean.c
View file

@ -4999,7 +4999,8 @@ static int LuaIsHiddenPath(lua_State *L) {
static int LuaGetZipPaths(lua_State *L) { static int LuaGetZipPaths(lua_State *L) {
char *path; char *path;
uint8_t *zcf; uint8_t *zcf;
size_t i, n, pathlen; size_t i, n, pathlen, prefixlen;
char *prefix = luaL_optlstring(L, 1, "", &prefixlen);
lua_newtable(L); lua_newtable(L);
i = 0; i = 0;
n = GetZipCdirRecords(zcdir); n = GetZipCdirRecords(zcdir);
@ -5007,8 +5008,10 @@ static int LuaGetZipPaths(lua_State *L) {
zcf += ZIP_CFILE_HDRSIZE(zcf)) { zcf += ZIP_CFILE_HDRSIZE(zcf)) {
CHECK_EQ(kZipCfileHdrMagic, ZIP_CFILE_MAGIC(zcf)); CHECK_EQ(kZipCfileHdrMagic, ZIP_CFILE_MAGIC(zcf));
path = GetAssetPath(zcf, &pathlen); path = GetAssetPath(zcf, &pathlen);
lua_pushlstring(L, path, pathlen); if (prefixlen == 0 || startswith(path, prefix)) {
lua_seti(L, -2, ++i); lua_pushlstring(L, path, pathlen);
lua_seti(L, -2, ++i);
}
free(path); free(path);
} }
return 1; return 1;