fix six defects and add an offline test suite
Four settings read from the environment (endpoint, model, reasoning, scratch dir) pointed straight at getenv() memory instead of a copy, and both setstr() and the cleanup at exit called free() on them. Changing one of them from inside the session therefore freed the environment block: "/endpoint http://x.example" with SOLO_ENDPOINT set died inside the handler, and SOLO_TMPDIR killed the process on the way out without a slash command at all. Reproduced on musl, both are copies now, and the two post-load env re-reads go through setstr() so they stop leaking the value create() already stored. The generic parameter handler typed every number with json_object_new_double, so "/max_tokens 4096" reached the endpoint as 4096.0 and "/seed 3" as 3.0. A number written without a decimal point or an exponent now stays an integer, which is what the OpenAI schema asks for; 0.7, .5 and 1e3 are still floats, and a word is still a string. The deadline for a command was time(0) + SOLO_TIMEOUT, and time() counts whole seconds, so the effective limit was the timeout minus whatever fraction of the second the command happened to start in. Measured with SOLO_TIMEOUT=3, commands died after 2.38s, 2.47s, 2.68s and 3.19s depending on the phase. rp() takes its deadline from clock_gettime(CLOCK_MONOTONIC) now, which is also immune to the clock being stepped underneath it. A SOLO_TIMEOUT below 1 gave rp() a deadline already in the past, so every command failed at once with "still running after 0s", and atoi on anything unparseable lands there too. Below 1 now means no limit. The API read, which passed time(0) + 1e9 to mean "never", passes no deadline at all. Only the child called setpgid(0,0), so a kill(-k, ...) issued before the child reached it found no process group and was dropped, leaving the command running as an orphan. A standalone harness confirms both halves: without the parent claim the signal is lost and the child runs to completion, with it the child dies. The parent claims the group too, which is the belt to the child's braces. hc() wrote the response envelope with one uncounted write(), so a signal arriving mid-write truncated the JSON and the parent reported "request failed" for a request that had in fact succeeded. Both link steps write to <name>.new and rename it. Overwriting a running executable fails with ETXTBSY, which is exactly what happens when the agent rebuilds the binary it is itself running from, and a failed link used to take the working binary with it. make clean now removes the temp names as well. test.sh holds 13 offline tests: no API key and no network, every line handed to the agent starting with / or !, each test in its own directory because the session file lives in the cwd. They cover the four crash paths, integer/float/string typing, a staggered-start sweep for the early timeout, SOLO_TIMEOUT=0 and a negative value, process group cleanup after a timeout, and the tool description quoting the real timeout. make test runs them. The README documents the timeout semantics, the integer typing and the new build step. Verified: 13 passed, 0 failed against the new binary, and 8 of the 13 fail against the previous one, which is what makes them regression tests rather than decoration. Still silent under -Wall -Wextra and under -Wshadow -Wformat=2 -Wcast-align -Wwrite-strings -Wstrict-prototypes -Wmissing-prototypes -Wredundant-decls -Wundef. Built and tested on Alpine gcc 15.2 (musl) with libcurl 8.22.0, json-c 0.19 and readline 8.3.
This commit is contained in:
@@ -54,13 +54,18 @@ static void ba(BUF *b, const char *s, size_t l) {
|
||||
}
|
||||
static size_t wcb(void *c, size_t s, size_t n, void *u) { ba((BUF *)u, c, s * n); return s * n; }
|
||||
|
||||
/* st: 0 ok, 1 interrupted, 2 deadline */
|
||||
/* Monotonic seconds, so a deadline is immune to clock steps and to the
|
||||
one-second granularity of time(), which made timeouts fire up to a second early. */
|
||||
static double now(void) { struct timespec ts; clock_gettime(CLOCK_MONOTONIC, &ts); return (double)ts.tv_sec + (double)ts.tv_nsec / 1e9; }
|
||||
|
||||
/* Reads until EOF, an interrupt, or the monotonic deadline dl (0 = no limit).
|
||||
st: 0 ok, 1 interrupted, 2 deadline */
|
||||
static int rp(int fd, char **out, double dl, int *st) {
|
||||
BUF b; struct timeval tv; fd_set fs; char buf[65536]; int r;
|
||||
bg(&b); *st = 0;
|
||||
for(;;) {
|
||||
if(IN) { *st = 1; break; }
|
||||
if(dl > 0 && (double)time(0) >= dl) { *st = 2; break; }
|
||||
if(dl > 0 && now() >= dl) { *st = 2; break; }
|
||||
FD_ZERO(&fs); FD_SET(fd, &fs); tv.tv_sec = 0; tv.tv_usec = 100000;
|
||||
r = select(fd + 1, &fs, 0, 0, &tv);
|
||||
if(r > 0 && FD_ISSET(fd, &fs)) { r = read(fd, buf, sizeof buf); if(r <= 0) break; ba(&b, buf, r); }
|
||||
@@ -95,7 +100,8 @@ static void hc(const char *m, const char *p, const char *body, int w) {
|
||||
A(r, "success", B(e == CURLE_OK && sc >= 200 && sc < 300));
|
||||
A(r, "content", S(e == CURLE_OK && b.p ? b.p : ""));
|
||||
j = json_object_to_json_string_ext(r, JSON_C_TO_STRING_PLAIN);
|
||||
write(w, j, strlen(j)); free(b.p); json_object_put(r);
|
||||
{ size_t l = strlen(j), o = 0; while(o < l) { ssize_t n = write(w, j + o, l - o); if(n > 0) o += (size_t)n; else if(n < 0 && errno == EINTR) continue; else break; } }
|
||||
free(b.p); json_object_put(r);
|
||||
if(c) curl_easy_cleanup(c);
|
||||
if(h) curl_slist_free_all(h);
|
||||
curl_global_cleanup(); _exit(0);
|
||||
@@ -106,7 +112,7 @@ static json_object *hq(const char *m, const char *p, const char *body) {
|
||||
if(pipe(f)) return 0;
|
||||
if((k = fork()) < 0) { close(f[0]); close(f[1]); return 0; }
|
||||
if(!k) { close(f[0]); dup2(f[1], 1); close(f[1]); hc(m, p, body, 1); _exit(1); }
|
||||
close(f[1]); n = rp(f[0], &buf, time(0) + 1e9, &st); close(f[0]);
|
||||
close(f[1]); n = rp(f[0], &buf, 0, &st); close(f[0]);
|
||||
if(st == 1 || IN) kill(k, SIGKILL);
|
||||
waitpid(k, 0, 0);
|
||||
r = n > 0 && buf ? json_tokener_parse(buf) : 0; free(buf);
|
||||
@@ -125,7 +131,9 @@ static void run(const char *cmd, char **out, int *rc) {
|
||||
if(pipe(f)) { *out = 0; *rc = 1; return; }
|
||||
if((k = fork()) < 0) { close(f[0]); close(f[1]); *out = 0; *rc = 1; return; }
|
||||
if(!k) { close(f[0]); setpgid(0, 0); dup2(f[1], 1); dup2(f[1], 2); close(f[1]); execl(SH, SH, "-c", cmd, (char *)0); _exit(127); }
|
||||
close(f[1]); rp(f[0], &buf, time(0) + TO, &st); close(f[0]);
|
||||
setpgid(k, k); /* claim the group here too: a kill(-k) issued before the child
|
||||
itself reaches setpgid(0,0) finds no group and is dropped. */
|
||||
close(f[1]); rp(f[0], &buf, TO > 0 ? now() + TO : 0, &st); close(f[0]);
|
||||
if(st == 1 || IN) { *rc = 130; }
|
||||
else if(st == 2) { kill(-k, SIGTERM); nanosleep(&ts, 0); kill(-k, SIGKILL); *rc = 124; }
|
||||
else { int ws; waitpid(k, &ws, 0); *rc = WIFEXITED(ws) ? WEXITSTATUS(ws) : WIFSIGNALED(ws) ? 128 + WTERMSIG(ws) : 1; }
|
||||
@@ -156,7 +164,7 @@ static void load(void) {
|
||||
}
|
||||
|
||||
static void create(void) {
|
||||
json_object *a, *o, *f, *p, *pr, *cp, *ms, *sy; char sb[8192];
|
||||
json_object *a, *o, *f, *p, *pr, *cp, *ms, *sy; char sb[8192], tb[512];
|
||||
if(SSN) json_object_put(SSN);
|
||||
SSN = json_object_new_object();
|
||||
A(SSN, "model", S(MOD));
|
||||
@@ -167,8 +175,9 @@ static void create(void) {
|
||||
a = json_object_new_array(); o = json_object_new_object(); f = json_object_new_object();
|
||||
p = json_object_new_object(); pr = json_object_new_object(); cp = json_object_new_object();
|
||||
A(cp, "type", S("string"));
|
||||
A(cp, "description", S("Run a shell command in the current working directory. Returns its combined stdout/stderr and the exit code. "
|
||||
"A command still running after 120s is killed and reports exit code 124: start long work in the background instead and poll it, e.g. \"nohup make >build.log 2>&1 &\"."));
|
||||
snprintf(tb, sizeof tb, "Run a shell command in the current working directory. Returns its combined stdout/stderr and the exit code. "
|
||||
"A command still running after %ds is killed and reports exit code 124: start long work in the background instead and poll it, e.g. \"nohup make >build.log 2>&1 &\".", TO);
|
||||
A(cp, "description", S(tb));
|
||||
A(pr, "command", cp);
|
||||
A(p, "type", S("object")); A(p, "properties", pr); A(p, "required", json_object_new_array());
|
||||
A(f, "name", S("bash")); A(f, "description", S("Run a shell command")); A(f, "parameters", p);
|
||||
@@ -332,9 +341,11 @@ static void dispatch(const char *l) {
|
||||
json_object_object_get_ex(SSN, k, &old); if(old) json_object_object_del(SSN, k);
|
||||
if(!strcmp(v, "true")) A(SSN, k, B(1));
|
||||
else if(!strcmp(v, "false")) A(SSN, k, B(0));
|
||||
else if(strcmp(v, "null") && (d = strtod(v, 0), 1)) {
|
||||
else if(strcmp(v, "null")) {
|
||||
char *e; d = strtod(v, &e);
|
||||
if(!*e && e != v) A(SSN, k, D(d)); else A(SSN, k, S(v));
|
||||
if(e == v || *e) A(SSN, k, S(v)); /* not a number at all */
|
||||
else if(strpbrk(v, ".eE")) A(SSN, k, D(d)); /* 0.7, 1e3, .5: a real */
|
||||
else A(SSN, k, N((int)strtol(v, 0, 10))); /* 4096 must stay an int */
|
||||
}
|
||||
}
|
||||
sv(); printf("%s = %s\n", k, v);
|
||||
@@ -355,12 +366,12 @@ int main(int argc, char **argv) {
|
||||
char cwd[4096], pb[64], *ln, *ac, *nx; const char *e; struct stat st;
|
||||
(void)argc; (void)argv;
|
||||
if(!(e = getenv("SOLO_TMPDIR"))) { e = getenv("TMPDIR"); e = e ? e : "/tmp"; TMP = malloc(strlen(e) + 8); sprintf(TMP, "%s/solo", e); }
|
||||
else TMP = (char *)e;
|
||||
if(!(e = getenv("SOLO_ENDPOINT"))) EP = strdup("https://api.kilo.ai/api/openrouter"); else EP = (char *)e;
|
||||
else TMP = strdup(e);
|
||||
if(!(e = getenv("SOLO_ENDPOINT"))) EP = strdup("https://api.kilo.ai/api/openrouter"); else EP = strdup(e);
|
||||
if((e = getenv("SOLO_TIMEOUT")) && *e) TO = atoi(e);
|
||||
if(!(e = getenv("SOLO_MODEL"))) MOD = strdup("kilo-auto/free"); else MOD = (char *)e;
|
||||
if(!(e = getenv("SOLO_MODEL"))) MOD = strdup("kilo-auto/free"); else MOD = strdup(e);
|
||||
if((e = getenv("SOLO_TEMP")) && *e) TEMP = atof(e);
|
||||
if(!(e = getenv("SOLO_REASON")) || !*e) RSN = strdup("high"); else RSN = (char *)e;
|
||||
if(!(e = getenv("SOLO_REASON")) || !*e) RSN = strdup("high"); else RSN = strdup(e);
|
||||
if((e = getenv("SOLO_API_KEY")) && *e) KEY = strdup(e);
|
||||
if(getcwd(cwd, sizeof cwd)) { SF = malloc(strlen(cwd) + 32); sprintf(SF, "%s/.solo_sess.json", cwd); }
|
||||
SYS = getenv("SOLO_SYSPROMPT");
|
||||
@@ -369,9 +380,9 @@ int main(int argc, char **argv) {
|
||||
snprintf(SH, sizeof SH, "%s", e);
|
||||
signal(SIGINT, onint); signal(SIGPIPE, SIG_IGN);
|
||||
create(); load();
|
||||
if((e = getenv("SOLO_MODEL")) && *e) { MOD = strdup(e); A(SSN, "model", S(e)); }
|
||||
if((e = getenv("SOLO_MODEL")) && *e) { setstr(&MOD, e); A(SSN, "model", S(e)); }
|
||||
if((e = getenv("SOLO_TEMP")) && *e) { TEMP = atof(e); A(SSN, "temperature", D(TEMP)); }
|
||||
if((e = getenv("SOLO_REASON")) && *e) { RSN = strdup(e); A(SSN, "reasoning_effort", S(e)); }
|
||||
if((e = getenv("SOLO_REASON")) && *e) { setstr(&RSN, e); A(SSN, "reasoning_effort", S(e)); }
|
||||
if(SYS && *SYS) { json_object *ms = G(SSN, "messages"); if(ms && json_object_array_length(ms)) A(json_object_array_get_idx(ms, 0), "content", S(SYS)); }
|
||||
A(SSN, "stream", B(0)); A(SSN, "tool_choice", S("auto")); sv();
|
||||
if(!isatty(1) || getenv("NO_COLOR")) CLR = 0;
|
||||
|
||||
Reference in New Issue
Block a user