Mercurial > urweb

annotate src/c/fastcgi.c @ 1001:1d456a06ea4e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add tuple pattern-matching at the constructor level
author Adam Chlipala <adamc@hcoop.net>
date Tue, 20 Oct 2009 10:19:00 -0400
parents 6304f5e8fbb4
children c2317cfb99ec
rev   line source
adamc@859 1 #define _GNU_SOURCE
adamc@859 2
adamc@859 3 #include <stdio.h>
adamc@859 4 #include <string.h>
adamc@859 5 #include <stdlib.h>
adamc@859 6 #include <sys/types.h>
adamc@859 7 #include <sys/socket.h>
adamc@859 8 #include <netdb.h>
adamc@859 9 #include <netinet/in.h>
adamc@859 10 #include <unistd.h>
adamc@859 11 #include <signal.h>
adamc@859 12 #include <stdarg.h>
adamc@859 13
adamc@859 14 #include <pthread.h>
adamc@859 15
adamc@859 16 #include "urweb.h"
adamc@859 17 #include "request.h"
adamc@859 18 #include "queue.h"
adamc@859 19
adamc@859 20 #include "fastcgi.h"
adamc@859 21
adamc@859 22 typedef struct {
adamc@859 23 unsigned char version;
adamc@859 24 unsigned char type;
adamc@859 25 unsigned char requestIdB1;
adamc@859 26 unsigned char requestIdB0;
adamc@859 27 unsigned char contentLengthB1;
adamc@859 28 unsigned char contentLengthB0;
adamc@859 29 unsigned char paddingLength;
adamc@859 30 unsigned char reserved;
adamc@859 31 unsigned char contentData[65535];
adamc@859 32 } FCGI_Record;
adamc@859 33
adamc@859 34 typedef struct {
adamc@859 35 FCGI_Record r;
adamc@859 36 int sock;
adamc@859 37 } FCGI_Output;
adamc@859 38
adamc@859 39 typedef struct {
adamc@859 40 char buf[sizeof(FCGI_Record) + 255];
adamc@859 41 int available, used, sock;
adamc@859 42 } FCGI_Input;
adamc@859 43
adamc@859 44 static FCGI_Output *fastcgi_output() {
adamc@859 45 FCGI_Output *o = malloc(sizeof(FCGI_Output));
adamc@859 46
adamc@859 47 o->r.version = FCGI_VERSION_1;
adamc@859 48 o->r.paddingLength = 0;
adamc@859 49 o->r.reserved = 0;
adamc@859 50
adamc@859 51 return o;
adamc@859 52 }
adamc@859 53
adamc@859 54 static FCGI_Input *fastcgi_input() {
adamc@859 55 FCGI_Input *i = malloc(sizeof(FCGI_Input));
adamc@859 56
adamc@859 57 i->available = i->used = 0;
adamc@859 58
adamc@859 59 return i;
adamc@859 60 }
adamc@859 61
adamc@859 62 static void fastcgi_input_reset(FCGI_Input *i) {
adamc@859 63 i->available = i->used = 0;
adamc@859 64 }
adamc@859 65
adamc@859 66 static int fastcgi_send(FCGI_Output *o,
adamc@859 67 unsigned char type,
adamc@859 68 unsigned short contentLength) {
adamc@859 69 o->r.type = type;
adamc@860 70 o->r.requestIdB1 = o->r.requestIdB0 = 0;
adamc@859 71 o->r.contentLengthB1 = contentLength >> 8;
adamc@859 72 o->r.contentLengthB0 = contentLength & 255;
adamc@861 73 return uw_really_send(o->sock, &o->r, sizeof(o->r) - 65535 + contentLength);
adamc@859 74 }
adamc@859 75
adamc@859 76 #define LATEST(i) ((FCGI_Record *)(i->buf + i->used))
adamc@859 77
adamc@859 78 static FCGI_Record *fastcgi_recv(FCGI_Input *i) {
adamc@859 79 while (1) {
adamc@859 80 ssize_t n;
adamc@859 81
adamc@859 82 if (i->available >= i->used + sizeof(FCGI_Record) - 65535
adamc@859 83 && i->available >= i->used + sizeof(FCGI_Record) - 65535
adamc@860 84 + ((LATEST(i)->contentLengthB1 << 8) | LATEST(i)->contentLengthB0)
adamc@859 85 + LATEST(i)->paddingLength) {
adamc@859 86 FCGI_Record *r = LATEST(i);
adamc@859 87
adamc@859 88 i->used += sizeof(FCGI_Record) - 65535
adamc@860 89 + ((LATEST(i)->contentLengthB1 << 8) | LATEST(i)->contentLengthB0)
adamc@859 90 + LATEST(i)->paddingLength;
adamc@859 91
adamc@859 92 return r;
adamc@859 93 }
adamc@859 94
adamc@859 95 if (i->used > 0) {
adamc@859 96 memmove(i->buf, i->buf + i->used, i->available - i->used);
adamc@859 97 i->available -= i->used;
adamc@859 98 i->used = 0;
adamc@859 99 }
adamc@859 100
adamc@859 101 n = recv(i->sock, i->buf + i->available, sizeof(i->buf) - i->available, 0);
adamc@859 102
adamc@859 103 if (n <= 0)
adamc@859 104 return NULL;
adamc@859 105
adamc@859 106 i->available += n;
adamc@859 107 }
adamc@859 108 }
adamc@859 109
adamc@859 110 static void on_success(uw_context ctx) { }
adamc@859 111
adamc@859 112 static void on_failure(uw_context ctx) {
adamc@859 113 uw_write_header(ctx, "Status: 500 Internal Server Error\r\n");
adamc@859 114 }
adamc@859 115
adamc@863 116 static int write_stdout(void *data, const char *buf, size_t len) {
adamc@860 117 FCGI_Output *o = (FCGI_Output *)data;
adamc@860 118 while (len > 0) {
adamc@860 119 size_t len2 = len;
adamc@860 120 if (len2 > 65535)
adamc@860 121 len2 = 65535;
adamc@860 122 memcpy(o->r.contentData, buf, len2);
adamc@860 123 if (fastcgi_send(o, FCGI_STDOUT, len2)) {
adamc@860 124 fprintf(stderr, "fastcgi_send() failed in write_stdout().\n");
adamc@860 125 return -1;
adamc@860 126 }
adamc@860 127 buf += len2;
adamc@860 128 len -= len2;
adamc@860 129 }
adamc@860 130
adamc@860 131 return 0;
adamc@860 132 }
adamc@860 133
adamc@859 134 static void write_stderr(FCGI_Output *o, const char *fmt, ...) {
adamc@859 135 int len;
adamc@859 136 va_list ap;
adamc@859 137 va_start(ap, fmt);
adamc@859 138
adamc@859 139 len = vsnprintf(o->r.contentData, 65535, fmt, ap);
adamc@859 140 if (len < 0)
adamc@860 141 fprintf(stderr, "vsnprintf() failed in write_stderr().\n");
adamc@860 142 else if (fastcgi_send(o, FCGI_STDERR, len))
adamc@860 143 fprintf(stderr, "fastcgi_send() failed in write_stderr().\n");
adamc@860 144 }
adamc@860 145
adamc@860 146 static void close_stream(FCGI_Output *o, unsigned char type) {
adamc@860 147 if (fastcgi_send(o, type, 0))
adamc@860 148 fprintf(stderr, "fastcgi_send() failed in close_stream().\n");
adamc@859 149 }
adamc@859 150
adamc@859 151 static void log_error(void *data, const char *fmt, ...) {
adamc@859 152 FCGI_Output *o = (FCGI_Output *)data;
adamc@859 153 va_list ap;
adamc@859 154 va_start(ap, fmt);
adamc@859 155
adamc@859 156 if (o) {
adamc@859 157 int len = vsnprintf(o->r.contentData, 65535, fmt, ap);
adamc@859 158 if (len < 0)
adamc@859 159 fprintf(stderr, "vsnprintf() failed in log_error().\n");
adamc@860 160 else if (fastcgi_send(o, FCGI_STDERR, len))
adamc@859 161 fprintf(stderr, "fastcgi_send() failed in log_error().\n");
adamc@859 162 } else
adamc@859 163 vfprintf(stderr, fmt, ap);
adamc@859 164 }
adamc@859 165
adamc@859 166 static void log_debug(void *data, const char *fmt, ...) {
adamc@859 167 }
adamc@859 168
adamc@860 169 typedef struct {
adamc@860 170 char *name, *value;
adamc@860 171 unsigned name_len, value_len;
adamc@860 172 } nvp;
adamc@860 173
adamc@860 174 static char *search_nvps(nvp *nvps, const char *h) {
adamc@862 175 for (; nvps->name[0]; ++nvps)
adamc@860 176 if (!strcmp(h, nvps->name))
adamc@860 177 return nvps->value;
adamc@860 178
adamc@860 179 return NULL;
adamc@860 180 }
adamc@860 181
adamc@860 182 typedef struct {
adamc@860 183 nvp *nvps;
adamc@860 184 char *uppercased;
adamc@860 185 int n_nvps, uppercased_len;
adamc@860 186 } headers;
adamc@860 187
adamc@860 188 static char *get_header(void *data, const char *h) {
adamc@860 189 headers *hs = (headers *)data;
adamc@860 190 size_t len = strlen(h);
adamc@860 191 char *s, *r;
adamc@860 192 const char *saved_h = h;
adamc@860 193
adamc@860 194 if (len > hs->uppercased_len) {
adamc@860 195 hs->uppercased_len = len;
adamc@860 196 hs->uppercased = realloc(hs->uppercased, len + 6);
adamc@860 197 }
adamc@860 198
adamc@860 199 strcpy(hs->uppercased, "HTTP_");
adamc@860 200 for (s = hs->uppercased+5; *h; ++h)
adamc@860 201 *s++ = *h == '-' ? '_' : toupper(*h);
adamc@860 202 *s = 0;
adamc@860 203
adamc@860 204 if (!strcasecmp(saved_h, "Content-length")
adamc@864 205 || !strcasecmp(saved_h, "Content-type")) {
adamc@864 206 if (s = search_nvps(hs->nvps, hs->uppercased + 5))
adamc@864 207 return s;
adamc@864 208 }
adamc@864 209
adamc@864 210 return search_nvps(hs->nvps, hs->uppercased);
adamc@860 211 }
adamc@860 212
adamc@864 213 static int read_funny_len(unsigned char **buf, int *len) {
adamc@861 214 if (*len <= 0)
adamc@861 215 return -1;
adamc@861 216
adamc@861 217 if ((*buf)[0] >> 7 == 0) {
adamc@861 218 int r = (*buf)[0];
adamc@861 219 ++*buf;
adamc@861 220 --*len;
adamc@861 221 return r;
adamc@861 222 }
adamc@861 223 else if (*len < 4)
adamc@861 224 return -1;
adamc@861 225 else {
adamc@861 226 int r = (((*buf)[3] & 0x7f) << 24) + ((*buf)[2] << 16) + ((*buf)[1] << 8) + (*buf)[0];
adamc@861 227 *buf += 4;
adamc@861 228 *len -= 4;
adamc@861 229 return r;
adamc@861 230 }
adamc@861 231 }
adamc@861 232
adamc@864 233 static int read_nvp(unsigned char **buf, int len, nvp *nv) {
adamc@860 234 int nameLength, valueLength;
adamc@860 235
adamc@864 236 if ((nameLength = read_funny_len(buf, &len)) < 0)
adamc@860 237 return -1;
adamc@864 238 if ((valueLength = read_funny_len(buf, &len)) < 0)
adamc@860 239 return -1;
adamc@860 240 if (len < nameLength + valueLength)
adamc@860 241 return -1;
adamc@860 242
adamc@862 243 if (nameLength+1 > nv->name_len) {
adamc@860 244 nv->name_len = nameLength+1;
adamc@862 245 nv->name = realloc(nv->name, nv->name_len);
adamc@860 246 }
adamc@862 247 if (valueLength+1 > nv->value_len) {
adamc@860 248 nv->value_len = valueLength+1;
adamc@862 249 nv->value = realloc(nv->value, nv->value_len);
adamc@860 250 }
adamc@860 251
adamc@864 252 memcpy(nv->name, *buf, nameLength);
adamc@860 253 nv->name[nameLength] = 0;
adamc@860 254
adamc@864 255 memcpy(nv->value, *buf + nameLength, valueLength);
adamc@860 256 nv->value[valueLength] = 0;
adamc@860 257
adamc@864 258 *buf += nameLength + valueLength;
adamc@864 259
adamc@860 260 return 0;
adamc@860 261 }
adamc@860 262
adamc@863 263 static int fastcgi_close_with(FCGI_Output *out, request_result rr) {
adamc@863 264 FCGI_EndRequestBody *erb = (FCGI_EndRequestBody *)out->r.contentData;
adamc@863 265
adamc@863 266 close_stream(out, FCGI_STDOUT);
adamc@863 267 close_stream(out, FCGI_STDERR);
adamc@863 268
adamc@863 269 if (rr == SERVED)
adamc@863 270 erb->appStatusB3 = erb->appStatusB2 = erb->appStatusB1 = erb->appStatusB0 = 0;
adamc@863 271 else
adamc@863 272 erb->appStatusB3 = erb->appStatusB2 = erb->appStatusB1 = erb->appStatusB0 = 0xFF;
adamc@863 273
adamc@863 274 erb->protocolStatus = FCGI_REQUEST_COMPLETE;
adamc@863 275 fastcgi_send(out, FCGI_END_REQUEST, sizeof(FCGI_EndRequestBody));
adamc@863 276 return close(out->sock);
adamc@863 277 }
adamc@863 278
adamc@863 279 static int fastcgi_close(int sock) {
adamc@863 280 FCGI_Output out;
adamc@863 281 out.sock = sock;
adamc@863 282 out.r.version = FCGI_VERSION_1;
adamc@863 283 out.r.paddingLength = 0;
adamc@863 284 out.r.reserved = 0;
adamc@863 285
adamc@863 286 return fastcgi_close_with(&out, SERVED);
adamc@863 287 }
adamc@863 288
adamc@863 289 int fastcgi_send_normal(int sock, const void *buf, ssize_t len) {
adamc@863 290 FCGI_Output out;
adamc@863 291 out.sock = sock;
adamc@863 292 out.r.version = FCGI_VERSION_1;
adamc@863 293 out.r.paddingLength = 0;
adamc@863 294 out.r.reserved = 0;
adamc@863 295
adamc@863 296 return write_stdout(&out, buf, len);
adamc@863 297 }
adamc@863 298
adamc@859 299 static void *worker(void *data) {
adamc@859 300 int me = *(int *)data;
adamc@859 301 FCGI_Input *in = fastcgi_input();
adamc@859 302 FCGI_Output *out = fastcgi_output();
adamc@859 303 uw_context ctx = uw_request_new_context(out, log_error, log_debug);
adamc@859 304 uw_request_context rc = uw_new_request_context();
adamc@860 305 headers hs;
adamc@860 306 size_t body_size = 0;
adamc@860 307 char *body = malloc(0);
adamc@860 308 size_t path_size = 0;
adamc@860 309 char *path_buf = malloc(0);
adamc@861 310 int tries = 0;
adamc@860 311
adamc@860 312 hs.uppercased = malloc(0);
adamc@860 313 hs.uppercased_len = 0;
adamc@860 314 hs.nvps = malloc(sizeof(nvp));
adamc@860 315 hs.n_nvps = 1;
adamc@862 316 hs.nvps[0].name = malloc(1);
adamc@862 317 hs.nvps[0].name_len = 1;
adamc@862 318 hs.nvps[0].value = malloc(0);
adamc@862 319 hs.nvps[0].value_len = 0;
adamc@859 320
adamc@859 321 while (1) {
adamc@859 322 FCGI_Record *r;
adamc@860 323 size_t used_nvps = 0;
adamc@860 324 int body_len, body_read;
adamc@860 325 char *s;
adamc@860 326 char *method, *path, *path_info, *query_string;
adamc@859 327
adamc@859 328 in->sock = out->sock = uw_dequeue();
adamc@859 329
adamc@859 330 if (!(r = fastcgi_recv(in))) {
adamc@859 331 fprintf(stderr, "Error receiving initial message\n");
adamc@860 332 goto done;
adamc@859 333 }
adamc@861 334
adamc@859 335 if (r->type != FCGI_BEGIN_REQUEST) {
adamc@859 336 write_stderr(out, "First message is not BEGIN_REQUEST\n");
adamc@859 337 goto done;
adamc@859 338 } else if (((FCGI_BeginRequestBody *)&r->contentData)->roleB0 != FCGI_RESPONDER) {
adamc@859 339 write_stderr(out, "First message is not BEGIN_REQUEST\n");
adamc@859 340 goto done;
adamc@859 341 }
adamc@859 342
adamc@860 343 while (1) {
adamc@864 344 unsigned char *buf;
adamc@864 345 int len;
adamc@860 346
adamc@860 347 if (!(r = fastcgi_recv(in))) {
adamc@860 348 write_stderr(out, "Error receiving environment variables\n");
adamc@860 349 goto done;
adamc@860 350 }
adamc@860 351
adamc@860 352 if (r->type != FCGI_PARAMS) {
adamc@860 353 write_stderr(out, "Expected FCGI_PARAMS but got %d\n", r->type);
adamc@860 354 goto done;
adamc@860 355 }
adamc@860 356
adamc@860 357 if (r->contentLengthB1 == 0 && r->contentLengthB0 == 0)
adamc@860 358 break;
adamc@860 359
adamc@864 360 len = (r->contentLengthB1 << 8) | r->contentLengthB0;
adamc@864 361
adamc@864 362 for (buf = r->contentData; buf < r->contentData + len; ) {
adamc@864 363 if (used_nvps == hs.n_nvps-1) {
adamc@864 364 ++hs.n_nvps;
adamc@864 365 hs.nvps = realloc(hs.nvps, hs.n_nvps * sizeof(nvp));
adamc@864 366 hs.nvps[hs.n_nvps-1].name = malloc(1);
adamc@864 367 hs.nvps[hs.n_nvps-1].value = malloc(0);
adamc@864 368 hs.nvps[hs.n_nvps-1].name_len = 1;
adamc@864 369 hs.nvps[hs.n_nvps-1].value_len = 0;
adamc@864 370 }
adamc@864 371
adamc@864 372 if (read_nvp(&buf, len - (buf - r->contentData), &hs.nvps[used_nvps]) < 0) {
adamc@864 373 write_stderr(out, "Error reading FCGI_PARAMS name-value pair\n");
adamc@864 374 goto done;
adamc@864 375 }
adamc@864 376
adamc@864 377 write_stderr(out, "PARAM: %s -> %s\n", hs.nvps[used_nvps].name, hs.nvps[used_nvps].value);
adamc@864 378
adamc@864 379 ++used_nvps;
adamc@860 380 }
adamc@859 381 }
adamc@860 382
adamc@862 383 hs.nvps[used_nvps].name[0] = 0;
adamc@860 384
adamc@860 385 if (s = get_header(&hs, "Content-Length")) {
adamc@860 386 body_len = atoi(s);
adamc@860 387 if (body_len < 0) {
adamc@860 388 write_stderr(out, "Invalid Content-Length\n");
adamc@860 389 goto done;
adamc@860 390 }
adamc@860 391 } else
adamc@860 392 body_len = 0;
adamc@860 393
adamc@861 394 if (body_len+1 > body_size) {
adamc@861 395 body_size = body_len+1;
adamc@860 396 body = realloc(body, body_size);
adamc@860 397 }
adamc@860 398
adamc@860 399 for (body_read = 0; body_read < body_len; ) {
adamc@860 400 char *buf;
adamc@860 401 int this_len;
adamc@860 402
adamc@860 403 if (!(r = fastcgi_recv(in))) {
adamc@860 404 write_stderr(out, "Error receiving STDIN\n");
adamc@860 405 goto done;
adamc@860 406 }
adamc@860 407
adamc@860 408 if (r->type != FCGI_STDIN) {
adamc@860 409 write_stderr(out, "Expected FCGI_STDIN but got %d\n", r->type);
adamc@860 410 goto done;
adamc@860 411 }
adamc@860 412
adamc@860 413 if (r->contentLengthB1 == 0 && r->contentLengthB0 == 0) {
adamc@860 414 write_stderr(out, "End of STDIN\n");
adamc@860 415 break;
adamc@860 416 }
adamc@860 417
adamc@860 418 this_len = (r->contentLengthB1 << 8) | r->contentLengthB0;
adamc@860 419
adamc@860 420 if (body_read + this_len > body_len) {
adamc@860 421 write_stderr(out, "Too much STDIN\n");
adamc@860 422 goto done;
adamc@860 423 }
adamc@860 424
adamc@860 425 memcpy(&body[body_read], r->contentData, this_len);
adamc@860 426 body_read += this_len;
adamc@860 427 }
adamc@860 428
adamc@861 429 body[body_read] = 0;
adamc@861 430
adamc@860 431 if (!(method = search_nvps(hs.nvps, "REQUEST_METHOD"))) {
adamc@860 432 write_stderr(out, "REQUEST_METHOD not set\n");
adamc@860 433 goto done;
adamc@860 434 }
adamc@860 435
adamc@860 436 if (!(path = search_nvps(hs.nvps, "SCRIPT_NAME"))) {
adamc@860 437 write_stderr(out, "SCRIPT_NAME not set\n");
adamc@860 438 goto done;
adamc@860 439 }
adamc@861 440
adamc@860 441 if (path_info = search_nvps(hs.nvps, "PATH_INFO")) {
adamc@860 442 int len1 = strlen(path), len2 = strlen(path_info);
adamc@860 443 int len = len1 + len2 + 1;
adamc@860 444
adamc@860 445 if (len > path_size) {
adamc@860 446 path_size = len;
adamc@860 447 path_buf = realloc(path_buf, path_size);
adamc@860 448 }
adamc@860 449
adamc@860 450 sprintf(path_buf, "%s%s", path, path_info);
adamc@860 451 path = path_buf;
adamc@860 452 }
adamc@860 453
adamc@860 454 if (!(query_string = search_nvps(hs.nvps, "QUERY_STRING")))
adamc@860 455 query_string = "";
adamc@860 456
adamc@860 457 uw_set_headers(ctx, get_header, &hs);
adamc@861 458
adamc@860 459 {
adamc@860 460 request_result rr;
adamc@860 461
adamc@860 462 rr = uw_request(rc, ctx, method, path, query_string, body, body_read,
adamc@860 463 on_success, on_failure,
adamc@860 464 out, log_error, log_debug,
adamc@863 465 in->sock, fastcgi_send_normal, fastcgi_close);
adamc@860 466
adamc@860 467 if (rr == KEEP_OPEN)
adamc@860 468 goto done2;
adamc@860 469
adamc@860 470 uw_output(ctx, write_stdout, out);
adamc@863 471 fastcgi_close_with(out, rr);
adamc@863 472 goto done2;
adamc@860 473 }
adamc@859 474
adamc@859 475 done:
adamc@859 476 close(in->sock);
adamc@860 477 done2:
adamc@859 478 fastcgi_input_reset(in);
adamc@859 479 uw_reset(ctx);
adamc@859 480 }
adamc@859 481 }
adamc@859 482
adamc@859 483 static void help(char *cmd) {
adamc@859 484 printf("Usage: %s [-t <thread-count>]\n", cmd);
adamc@859 485 }
adamc@859 486
adamc@859 487 static void sigint(int signum) {
adamc@859 488 printf("Exiting....\n");
adamc@859 489 exit(0);
adamc@859 490 }
adamc@859 491
adamc@859 492 static loggers ls = {NULL, log_error, log_debug};
adamc@859 493
adamc@859 494 int main(int argc, char *argv[]) {
adamc@859 495 // The skeleton for this function comes from Beej's sockets tutorial.
adamc@859 496 struct sockaddr_in their_addr; // connector's address information
adamc@859 497 int sin_size, yes = 1;
adamc@859 498 int nthreads = 1, i, *names, opt;
adamc@859 499 char *fwsa = getenv("FCGI_WEB_SERVER_ADDRS"), *nthreads_s = getenv("URWEB_NUM_THREADS");
adamc@859 500
adamc@859 501 if (nthreads_s) {
adamc@859 502 nthreads = atoi(nthreads_s);
adamc@859 503 if (nthreads <= 0) {
adamc@859 504 fprintf(stderr, "Bad URWEB_NUM_THREADS value\n");
adamc@859 505 return 1;
adamc@859 506 }
adamc@859 507 }
adamc@859 508
adamc@859 509 signal(SIGINT, sigint);
adamc@859 510 signal(SIGPIPE, SIG_IGN);
adamc@859 511 signal(SIGUSR1, sigint);
adamc@859 512 signal(SIGTERM, sigint);
adamc@859 513
adamc@859 514 while ((opt = getopt(argc, argv, "ht:")) != -1) {
adamc@859 515 switch (opt) {
adamc@859 516 case '?':
adamc@859 517 fprintf(stderr, "Unknown command-line option");
adamc@859 518 help(argv[0]);
adamc@859 519 return 1;
adamc@859 520
adamc@859 521 case 'h':
adamc@859 522 help(argv[0]);
adamc@859 523 return 0;
adamc@859 524
adamc@859 525 case 't':
adamc@859 526 nthreads = atoi(optarg);
adamc@859 527 if (nthreads <= 0) {
adamc@859 528 fprintf(stderr, "Invalid thread count\n");
adamc@859 529 help(argv[0]);
adamc@859 530 return 1;
adamc@859 531 }
adamc@859 532 break;
adamc@859 533
adamc@859 534 default:
adamc@859 535 fprintf(stderr, "Unexpected getopt() behavior\n");
adamc@859 536 return 1;
adamc@859 537 }
adamc@859 538 }
adamc@859 539
adamc@860 540 uw_set_on_success("");
adamc@859 541 uw_request_init(NULL, log_error, log_debug);
adamc@859 542
adamc@859 543 names = calloc(nthreads, sizeof(int));
adamc@859 544
adamc@859 545 sin_size = sizeof their_addr;
adamc@859 546
adamc@859 547 {
adamc@859 548 pthread_t thread;
adamc@859 549 int name;
adamc@859 550
adamc@859 551 if (pthread_create(&thread, NULL, client_pruner, &ls)) {
adamc@859 552 fprintf(stderr, "Error creating pruner thread\n");
adamc@859 553 return 1;
adamc@859 554 }
adamc@859 555 }
adamc@859 556
adamc@859 557 for (i = 0; i < nthreads; ++i) {
adamc@859 558 pthread_t thread;
adamc@859 559 names[i] = i;
adamc@859 560 if (pthread_create(&thread, NULL, worker, &names[i])) {
adamc@859 561 fprintf(stderr, "Error creating worker thread #%d\n", i);
adamc@859 562 return 1;
adamc@859 563 }
adamc@859 564 }
adamc@859 565
adamc@859 566 while (1) {
adamc@859 567 int new_fd = accept(FCGI_LISTENSOCK_FILENO, (struct sockaddr *)&their_addr, &sin_size);
adamc@859 568
adamc@859 569 if (new_fd < 0) {
adamc@859 570 fprintf(stderr, "Socket accept failed\n");
adamc@859 571 return 1;
adamc@859 572 }
adamc@859 573
adamc@859 574 if (fwsa) {
adamc@859 575 char host[100], matched = 0;
adamc@859 576 char *ips, *sep;
adamc@859 577
adamc@859 578 if (getnameinfo((struct sockaddr *)&their_addr, sin_size, host, sizeof host, NULL, 0, NI_NUMERICHOST)) {
adamc@859 579 fprintf(stderr, "Remote IP determination failed\n");
adamc@859 580 return 1;
adamc@859 581 }
adamc@859 582
adamc@859 583 for (ips = fwsa; sep = strchr(ips, ','); ips = sep+1) {
adamc@859 584 if (!strncmp(ips, host, sep - ips)) {
adamc@859 585 matched = 1;
adamc@859 586 break;
adamc@859 587 }
adamc@859 588 }
adamc@859 589
adamc@859 590 if (!matched && strcmp(ips, host)) {
adamc@859 591 fprintf(stderr, "Remote address is not in FCGI_WEB_SERVER_ADDRS");
adamc@859 592 return 1;
adamc@859 593 }
adamc@859 594 }
adamc@859 595
adamc@859 596 uw_enqueue(new_fd);
adamc@859 597 }
adamc@859 598 }