mirror of
https://github.com/Ardour/ardour.git
synced 2025-12-11 00:56:33 +01:00
Fix potential vulnerable cloned functions: Save stack space while handling errors
This commit is contained in:
parent
5f1bea0b6b
commit
edf2ce7cfe
2 changed files with 8 additions and 3 deletions
|
|
@ -657,8 +657,11 @@ l_noret luaG_runerror (lua_State *L, const char *fmt, ...) {
|
||||||
va_start(argp, fmt);
|
va_start(argp, fmt);
|
||||||
msg = luaO_pushvfstring(L, fmt, argp); /* format message */
|
msg = luaO_pushvfstring(L, fmt, argp); /* format message */
|
||||||
va_end(argp);
|
va_end(argp);
|
||||||
if (isLua(ci)) /* if Lua function, add source:line information */
|
if (isLua(ci)) { /* if Lua function, add source:line information */
|
||||||
luaG_addinfo(L, msg, ci_func(ci)->p->source, currentline(ci));
|
luaG_addinfo(L, msg, ci_func(ci)->p->source, currentline(ci));
|
||||||
|
setobjs2s(L, L->top - 2, L->top - 1); /* remove 'msg' from the stack */
|
||||||
|
L->top--;
|
||||||
|
}
|
||||||
luaG_errormsg(L);
|
luaG_errormsg(L);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -490,8 +490,10 @@ void luaV_concat (lua_State *L, int total) {
|
||||||
/* collect total length and number of strings */
|
/* collect total length and number of strings */
|
||||||
for (n = 1; n < total && tostring(L, top - n - 1); n++) {
|
for (n = 1; n < total && tostring(L, top - n - 1); n++) {
|
||||||
size_t l = vslen(top - n - 1);
|
size_t l = vslen(top - n - 1);
|
||||||
if (l >= (MAX_SIZE/sizeof(char)) - tl)
|
if (l >= (MAX_SIZE/sizeof(char)) - tl) {
|
||||||
|
L->top = top - total; /* pop strings to avoid wasting stack */
|
||||||
luaG_runerror(L, "string length overflow");
|
luaG_runerror(L, "string length overflow");
|
||||||
|
}
|
||||||
tl += l;
|
tl += l;
|
||||||
}
|
}
|
||||||
if (tl <= LUAI_MAXSHORTLEN) { /* is result a short string? */
|
if (tl <= LUAI_MAXSHORTLEN) { /* is result a short string? */
|
||||||
|
|
@ -506,7 +508,7 @@ void luaV_concat (lua_State *L, int total) {
|
||||||
setsvalue2s(L, top - n, ts); /* create result */
|
setsvalue2s(L, top - n, ts); /* create result */
|
||||||
}
|
}
|
||||||
total -= n-1; /* got 'n' strings to create 1 new */
|
total -= n-1; /* got 'n' strings to create 1 new */
|
||||||
L->top -= n-1; /* popped 'n' strings and pushed one */
|
L->top = top - (n - 1); /* popped 'n' strings and pushed one */
|
||||||
} while (total > 1); /* repeat until only 1 result left */
|
} while (total > 1); /* repeat until only 1 result left */
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue