7322d143a906034e924412494088c2751ae442d2
[oweals/busybox.git] / networking / httpd.c
1 /*
2  * httpd implementation for busybox
3  *
4  * Copyright (C) 2002,2003 Glenn Engel <glenne@engel.org>
5  * Copyright (C) 2003 Vladimir Oleynik <dzo@simtreas.ru>
6  *
7  * simplify patch stolen from libbb without using strdup
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17  * General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22  *
23  *****************************************************************************
24  *
25  * Typical usage:
26  *   for non root user
27  * httpd -p 8080 -h $HOME/public_html
28  *   or for daemon start from rc script with uid=0:
29  * httpd -u www
30  * This is equivalent if www user have uid=80 to
31  * httpd -p 80 -u 80 -h /www -c /etc/httpd.conf -r "Web Server Authentication"
32  *
33  *
34  * When a url contains "cgi-bin" it is assumed to be a cgi script.  The
35  * server changes directory to the location of the script and executes it
36  * after setting QUERY_STRING and other environment variables.
37  *
38  * The server can also be invoked as a url arg decoder and html text encoder
39  * as follows:
40  *  foo=`httpd -d $foo`           # decode "Hello%20World" as "Hello World"
41  *  bar=`httpd -e "<Hello World>"`  # encode as "&#60Hello&#32World&#62"
42  * Note that url encoding for arguments is not the same as html encoding for
43  * presentation.  -d decodes a url-encoded argument while -e encodes in html
44  * for page display.
45  *
46  * httpd.conf has the following format:
47  *
48  * A:172.20.         # Allow address from 172.20.0.0/16
49  * A:10.0.0.0/25     # Allow any address from 10.0.0.0-10.0.0.127
50  * A:10.0.0.0/255.255.255.128  # Allow any address that previous set
51  * A:127.0.0.1       # Allow local loopback connections
52  * D:*               # Deny from other IP connections
53  * /cgi-bin:foo:bar  # Require user foo, pwd bar on urls starting with /cgi-bin/
54  * /adm:admin:setup  # Require user admin, pwd setup on urls starting with /adm/
55  * /adm:toor:PaSsWd  # or user toor, pwd PaSsWd on urls starting with /adm/
56  * .au:audio/basic   # additional mime type for audio.au files
57  *
58  * A/D may be as a/d or allow/deny - first char case insensitive
59  * Deny IP rules take precedence over allow rules.
60  *
61  *
62  * The Deny/Allow IP logic:
63  *
64  *  - Default is to allow all.  No addresses are denied unless
65  *         denied with a D: rule.
66  *  - Order of Deny/Allow rules is significant
67  *  - Deny rules take precedence over allow rules.
68  *  - If a deny all rule (D:*) is used it acts as a catch-all for unmatched
69  *       addresses.
70  *  - Specification of Allow all (A:*) is a no-op
71  *
72  * Example:
73  *   1. Allow only specified addresses
74  *     A:172.20          # Allow any address that begins with 172.20.
75  *     A:10.10.          # Allow any address that begins with 10.10.
76  *     A:127.0.0.1       # Allow local loopback connections
77  *     D:*               # Deny from other IP connections
78  *
79  *   2. Only deny specified addresses
80  *     D:1.2.3.        # deny from 1.2.3.0 - 1.2.3.255
81  *     D:2.3.4.        # deny from 2.3.4.0 - 2.3.4.255
82  *     A:*             # (optional line added for clarity)
83  *
84  * If a sub directory contains a config file it is parsed and merged with
85  * any existing settings as if it was appended to the original configuration.
86  *
87  * subdir paths are relative to the containing subdir and thus cannot
88  * affect the parent rules.
89  *
90  * Note that since the sub dir is parsed in the forked thread servicing the
91  * subdir http request, any merge is discarded when the process exits.  As a
92  * result, the subdir settings only have a lifetime of a single request.
93  *
94  *
95  * If -c is not set, an attempt will be made to open the default
96  * root configuration file.  If -c is set and the file is not found, the
97  * server exits with an error.
98  *
99 */
100
101
102 #include <stdio.h>
103 #include <ctype.h>         /* for isspace           */
104 #include <string.h>
105 #include <stdlib.h>        /* for malloc            */
106 #include <time.h>
107 #include <unistd.h>        /* for close             */
108 #include <signal.h>
109 #include <sys/types.h>
110 #include <sys/socket.h>    /* for connect and socket*/
111 #include <netinet/in.h>    /* for sockaddr_in       */
112 #include <sys/time.h>
113 #include <sys/stat.h>
114 #include <sys/wait.h>
115 #include <fcntl.h>         /* for open modes        */
116 #include "busybox.h"
117
118
119 static const char httpdVersion[] = "busybox httpd/1.34 2-Oct-2003";
120 static const char default_path_httpd_conf[] = "/etc";
121 static const char httpd_conf[] = "httpd.conf";
122 static const char home[] = "./";
123
124 #ifdef CONFIG_LFS
125 # define cont_l_fmt "%lld"
126 #else
127 # define cont_l_fmt "%ld"
128 #endif
129
130 // Note: busybox xfuncs are not used because we want the server to keep running
131 //       if something bad happens due to a malformed user request.
132 //       As a result, all memory allocation after daemonize
133 //       is checked rigorously
134
135 //#define DEBUG 1
136
137 /* Configure options, disabled by default as custom httpd feature */
138
139 /* disabled as optional features */
140 //#define CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
141 //#define CONFIG_FEATURE_HTTPD_SET_REMOTE_PORT_TO_ENV
142 //#define CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
143 //#define CONFIG_FEATURE_HTTPD_SETUID
144 //#define CONFIG_FEATURE_HTTPD_RELOAD_CONFIG_SIGHUP
145
146 /* If set, use this server from internet superserver only */
147 //#define CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
148
149 /* You can use this server as standalone, require libbb.a for linking */
150 //#define HTTPD_STANDALONE
151
152 /* Config options, disable this for do very small module */
153 //#define CONFIG_FEATURE_HTTPD_CGI
154 //#define CONFIG_FEATURE_HTTPD_BASIC_AUTH
155 //#define CONFIG_FEATURE_HTTPD_AUTH_MD5
156
157 #ifdef HTTPD_STANDALONE
158 /* standalone, enable all features */
159 #undef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
160 /* unset config option for remove warning as redefined */
161 #undef CONFIG_FEATURE_HTTPD_BASIC_AUTH
162 #undef CONFIG_FEATURE_HTTPD_AUTH_MD5
163 #undef CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
164 #undef CONFIG_FEATURE_HTTPD_SET_REMOTE_PORT_TO_ENV
165 #undef CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
166 #undef CONFIG_FEATURE_HTTPD_CGI
167 #undef CONFIG_FEATURE_HTTPD_SETUID
168 #undef CONFIG_FEATURE_HTTPD_RELOAD_CONFIG_SIGHUP
169 /* enable all features now */
170 #define CONFIG_FEATURE_HTTPD_BASIC_AUTH
171 #define CONFIG_FEATURE_HTTPD_AUTH_MD5
172 #define CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
173 #define CONFIG_FEATURE_HTTPD_SET_REMOTE_PORT_TO_ENV
174 #define CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
175 #define CONFIG_FEATURE_HTTPD_CGI
176 #define CONFIG_FEATURE_HTTPD_SETUID
177 #define CONFIG_FEATURE_HTTPD_RELOAD_CONFIG_SIGHUP
178
179 /* require from libbb.a for linking */
180 const char *bb_applet_name = "httpd";
181
182 void bb_show_usage(void)
183 {
184   fprintf(stderr, "Usage: %s [-p <port>] [-c configFile] [-d/-e <string>] "
185                   "[-r realm] [-u user] [-h homedir]\n", bb_applet_name);
186   exit(1);
187 }
188 #endif
189
190 #ifdef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
191 #undef CONFIG_FEATURE_HTTPD_SETUID  /* use inetd user.group config settings */
192 #undef CONFIG_FEATURE_HTTPD_RELOAD_CONFIG_SIGHUP    /* so is not daemon */
193 /* inetd set stderr to accepted socket and we can`t true see debug messages */
194 #undef DEBUG
195 #endif
196
197 #define MAX_MEMORY_BUFF 8192    /* IO buffer */
198
199 typedef struct HT_ACCESS {
200         char *after_colon;
201         struct HT_ACCESS *next;
202         char before_colon[1];         /* really bigger, must last */
203 } Htaccess;
204
205 typedef struct HT_ACCESS_IP {
206         unsigned int ip;
207         unsigned int mask;
208         int allow_deny;
209         struct HT_ACCESS_IP *next;
210 } Htaccess_IP;
211
212 typedef struct
213 {
214   char buf[MAX_MEMORY_BUFF];
215
216 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
217   const char *realm;
218   char *remoteuser;
219 #endif
220
221 #ifdef CONFIG_FEATURE_HTTPD_CGI
222   char *referer;
223 #endif
224
225   const char *configFile;
226
227   unsigned int rmt_ip;
228 #if defined(CONFIG_FEATURE_HTTPD_CGI) || defined(DEBUG)
229   char rmt_ip_str[16];     /* for set env REMOTE_ADDR */
230 #endif
231   unsigned port;           /* server initial port and for
232                               set env REMOTE_PORT */
233
234   const char *found_mime_type;
235   off_t ContentLength;          /* -1 - unknown */
236   time_t last_mod;
237
238   Htaccess_IP *ip_a_d;          /* config allow/deny lines */
239   int flg_deny_all;
240 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
241   Htaccess *auth;               /* config user:password lines */
242 #endif
243 #ifdef CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
244   Htaccess *mime_a;             /* config mime types */
245 #endif
246
247 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
248   int accepted_socket;
249 #define a_c_r config->accepted_socket
250 #define a_c_w config->accepted_socket
251   int debugHttpd;          /* if seted, don`t stay daemon */
252 #else
253 #define a_c_r 0
254 #define a_c_w 1
255 #endif
256 } HttpdConfig;
257
258 static HttpdConfig *config;
259
260 static const char request_GET[] = "GET";    /* size algorithic optimize */
261
262 static const char* const suffixTable [] = {
263 /* Warning: shorted equivalent suffix in one line must be first */
264   ".htm.html", "text/html",
265   ".jpg.jpeg", "image/jpeg",
266   ".gif", "image/gif",
267   ".png", "image/png",
268   ".txt.h.c.cc.cpp", "text/plain",
269   ".css", "text/css",
270   ".wav", "audio/wav",
271   ".avi", "video/x-msvideo",
272   ".qt.mov", "video/quicktime",
273   ".mpe.mpeg", "video/mpeg",
274   ".mid.midi", "audio/midi",
275   ".mp3", "audio/mpeg",
276 #if 0                        /* unpopular */
277   ".au", "audio/basic",
278   ".pac", "application/x-ns-proxy-autoconfig",
279   ".vrml.wrl", "model/vrml",
280 #endif
281   0, "application/octet-stream" /* default */
282   };
283
284 typedef enum
285 {
286   HTTP_OK = 200,
287   HTTP_UNAUTHORIZED = 401, /* authentication needed, respond with auth hdr */
288   HTTP_NOT_FOUND = 404,
289   HTTP_NOT_IMPLEMENTED = 501,   /* used for unrecognized requests */
290   HTTP_BAD_REQUEST = 400,       /* malformed syntax */
291   HTTP_FORBIDDEN = 403,
292   HTTP_INTERNAL_SERVER_ERROR = 500,
293 #if 0 /* future use */
294   HTTP_CONTINUE = 100,
295   HTTP_SWITCHING_PROTOCOLS = 101,
296   HTTP_CREATED = 201,
297   HTTP_ACCEPTED = 202,
298   HTTP_NON_AUTHORITATIVE_INFO = 203,
299   HTTP_NO_CONTENT = 204,
300   HTTP_MULTIPLE_CHOICES = 300,
301   HTTP_MOVED_PERMANENTLY = 301,
302   HTTP_MOVED_TEMPORARILY = 302,
303   HTTP_NOT_MODIFIED = 304,
304   HTTP_PAYMENT_REQUIRED = 402,
305   HTTP_BAD_GATEWAY = 502,
306   HTTP_SERVICE_UNAVAILABLE = 503, /* overload, maintenance */
307   HTTP_RESPONSE_SETSIZE=0xffffffff
308 #endif
309 } HttpResponseNum;
310
311 typedef struct
312 {
313   HttpResponseNum type;
314   const char *name;
315   const char *info;
316 } HttpEnumString;
317
318 static const HttpEnumString httpResponseNames[] = {
319   { HTTP_OK, "OK" },
320   { HTTP_NOT_IMPLEMENTED, "Not Implemented",
321     "The requested method is not recognized by this server." },
322 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
323   { HTTP_UNAUTHORIZED, "Unauthorized", "" },
324 #endif
325   { HTTP_NOT_FOUND, "Not Found",
326     "The requested URL was not found on this server." },
327   { HTTP_BAD_REQUEST, "Bad Request", "Unsupported method." },
328   { HTTP_FORBIDDEN, "Forbidden", "" },
329   { HTTP_INTERNAL_SERVER_ERROR, "Internal Server Error",
330     "Internal Server Error" },
331 #if 0                               /* not implemented */
332   { HTTP_CREATED, "Created" },
333   { HTTP_ACCEPTED, "Accepted" },
334   { HTTP_NO_CONTENT, "No Content" },
335   { HTTP_MULTIPLE_CHOICES, "Multiple Choices" },
336   { HTTP_MOVED_PERMANENTLY, "Moved Permanently" },
337   { HTTP_MOVED_TEMPORARILY, "Moved Temporarily" },
338   { HTTP_NOT_MODIFIED, "Not Modified" },
339   { HTTP_BAD_GATEWAY, "Bad Gateway", "" },
340   { HTTP_SERVICE_UNAVAILABLE, "Service Unavailable", "" },
341 #endif
342 };
343
344
345 static const char RFC1123FMT[] = "%a, %d %b %Y %H:%M:%S GMT";
346 static const char Content_length[] = "Content-length:";
347
348
349 static int
350 scan_ip (const char **ep, unsigned int *ip, unsigned char endc)
351 {
352   const char *p = *ep;
353   int auto_mask = 8;
354   int j;
355
356   *ip = 0;
357   for (j = 0; j < 4; j++) {
358         unsigned int octet;
359
360         if ((*p < '0' || *p > '9') && (*p != '/' || j == 0) && *p != 0)
361           return -auto_mask;
362         octet = 0;
363         while (*p >= '0' && *p <= '9') {
364           octet *= 10;
365           octet += *p - '0';
366           if (octet > 255)
367                 return -auto_mask;
368           p++;
369         }
370         if (*p == '.')
371           p++;
372         if (*p != '/' && *p != 0)
373           auto_mask += 8;
374         *ip = ((*ip) << 8) | octet;
375   }
376   if (*p != 0) {
377         if (*p != endc)
378                 return -auto_mask;
379         p++;
380         if(*p == 0)
381                 return -auto_mask;
382   }
383   *ep = p;
384   return auto_mask;
385 }
386
387 static int
388 scan_ip_mask (const char *ipm, unsigned int *ip, unsigned int *mask)
389 {
390   int i;
391   unsigned int msk;
392
393   i = scan_ip(&ipm, ip, '/');
394   if(i < 0)
395         return i;
396   if(*ipm) {
397         const char *p = ipm;
398
399         i = 0;
400         while (*p) {
401                 if (*p < '0' || *p > '9') {
402                         if (*p == '.') {
403                                 i = scan_ip (&ipm, mask, 0);
404                                 return i != 32;
405                         }
406                         return -1;
407                 }
408                 i *= 10;
409                 i += *p - '0';
410                 p++;
411         }
412   }
413   if (i > 32 || i < 0)
414           return -1;
415   msk = 0x80000000;
416   *mask = 0;
417   while (i > 0) {
418         *mask |= msk;
419         msk >>= 1;
420         i--;
421   }
422   return 0;
423 }
424
425 #if defined(CONFIG_FEATURE_HTTPD_BASIC_AUTH) || defined(CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES)
426 static void free_config_lines(Htaccess **pprev)
427 {
428     Htaccess *prev = *pprev;
429
430     while( prev ) {
431         Htaccess *cur = prev;
432
433         prev = cur->next;
434         free(cur);
435     }
436     *pprev = NULL;
437 }
438 #endif
439
440 /* flag */
441 #define FIRST_PARSE          0
442 #define SUBDIR_PARSE         1
443 #define SIGNALED_PARSE       2
444 #define FIND_FROM_HTTPD_ROOT 3
445 /****************************************************************************
446  *
447  > $Function: parse_conf()
448  *
449  * $Description: parse configuration file into in-memory linked list.
450  *
451  * The first non-white character is examined to determine if the config line
452  * is one of the following:
453  *    .ext:mime/type   # new mime type not compiled into httpd
454  *    [adAD]:from      # ip address allow/deny, * for wildcard
455  *    /path:user:pass  # username/password
456  *
457  * Any previous IP rules are discarded.
458  * If the flag argument is not SUBDIR_PARSE then all /path and mime rules
459  * are also discarded.  That is, previous settings are retained if flag is
460  * SUBDIR_PARSE.
461  *
462  * $Parameters:
463  *      (const char *) path . . null for ip address checks, path for password
464  *                              checks.
465  *      (int) flag  . . . . . . the source of the parse request.
466  *
467  * $Return: (None)
468  *
469  ****************************************************************************/
470 static void parse_conf(const char *path, int flag)
471 {
472     FILE *f;
473 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
474     Htaccess *prev, *cur;
475 #elif CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
476     Htaccess *cur;
477 #endif
478
479     const char *cf = config->configFile;
480     char buf[160];
481     char *p0 = NULL;
482     char *c, *p;
483
484     /* free previous ip setup if present */
485     Htaccess_IP *pip = config->ip_a_d;
486
487     while( pip ) {
488         Htaccess_IP *cur_ipl = pip;
489
490         pip = cur_ipl->next;
491         free(cur_ipl);
492     }
493     config->ip_a_d = NULL;
494
495     config->flg_deny_all = 0;
496
497 #if defined(CONFIG_FEATURE_HTTPD_BASIC_AUTH) || defined(CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES)
498     /* retain previous auth and mime config only for subdir parse */
499     if(flag != SUBDIR_PARSE) {
500 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
501         free_config_lines(&config->auth);
502 #endif
503 #ifdef CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
504         free_config_lines(&config->mime_a);
505 #endif
506     }
507 #endif
508
509     if(flag == SUBDIR_PARSE || cf == NULL) {
510         cf = alloca(strlen(path) + sizeof(httpd_conf) + 2);
511         if(cf == NULL) {
512             if(flag == FIRST_PARSE)
513                 bb_error_msg_and_die(bb_msg_memory_exhausted);
514             return;
515         }
516         sprintf((char *)cf, "%s/%s", path, httpd_conf);
517     }
518
519     while((f = fopen(cf, "r")) == NULL) {
520         if(flag == SUBDIR_PARSE || flag == FIND_FROM_HTTPD_ROOT) {
521             /* config file not found, no changes to config */
522             return;
523         }
524         if(config->configFile && flag == FIRST_PARSE) /* if -c option given */
525             bb_perror_msg_and_die("%s", cf);
526         flag = FIND_FROM_HTTPD_ROOT;
527         cf = httpd_conf;
528     }
529
530 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
531     prev = config->auth;
532 #endif
533     /* This could stand some work */
534     while ( (p0 = fgets(buf, sizeof(buf), f)) != NULL) {
535         c = NULL;
536         for(p = p0; *p0 != 0 && *p0 != '#'; p0++) {
537                 if(!isspace(*p0)) {
538                     *p++ = *p0;
539                     if(*p0 == ':' && c == NULL)
540                         c = p;
541                 }
542         }
543         *p = 0;
544
545         /* test for empty or strange line */
546         if (c == NULL || *c == 0)
547             continue;
548         p0 = buf;
549         if(*p0 == 'd')
550             *p0 = 'D';
551         if(*c == '*') {
552             if(*p0 == 'D') {
553                 /* memorize deny all */
554                 config->flg_deny_all++;
555             }
556             /* skip default other "word:*" config lines */
557             continue;
558         }
559
560         if(*p0 == 'a')
561             *p0 = 'A';
562         else if(*p0 != 'D' && *p0 != 'A'
563 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
564            && *p0 != '/'
565 #endif
566 #ifdef CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
567            && *p0 != '.'
568 #endif
569           )
570                continue;
571         if(*p0 == 'A' || *p0 == 'D') {
572                 /* storing current config IP line */
573                 pip = calloc(1, sizeof(Htaccess_IP));
574                 if(pip) {
575                     if(scan_ip_mask (c, &(pip->ip), &(pip->mask))) {
576                         /* syntax IP{/mask} error detected, protect all */
577                         *p0 = 'D';
578                         pip->mask = 0;
579                     }
580                     pip->allow_deny = *p0;
581                     if(*p0 == 'D') {
582                         /* Deny:form_IP move top */
583                         pip->next = config->ip_a_d;
584                         config->ip_a_d = pip;
585                     } else {
586                         /* add to bottom A:form_IP config line */
587                         Htaccess_IP *prev_IP = config->ip_a_d;
588
589                         if(prev_IP == NULL) {
590                                 config->ip_a_d = pip;
591                         } else {
592                                 while(prev_IP->next)
593                                         prev_IP = prev_IP->next;
594                                 prev_IP->next = pip;
595                         }
596                     }
597                 }
598                 continue;
599         }
600 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
601         if(*p0 == '/') {
602             /* make full path from httpd root / curent_path / config_line_path */
603             cf = flag == SUBDIR_PARSE ? path : "";
604             p0 = malloc(strlen(cf) + (c - buf) + 2 + strlen(c));
605             if(p0 == NULL)
606                 continue;
607             c[-1] = 0;
608             sprintf(p0, "/%s%s", cf, buf);
609
610             /* another call bb_simplify_path */
611             cf = p = p0;
612
613             do {
614                     if (*p == '/') {
615                         if (*cf == '/') {    /* skip duplicate (or initial) slash */
616                             continue;
617                         } else if (*cf == '.') {
618                             if (cf[1] == '/' || cf[1] == 0) { /* remove extra '.' */
619                                 continue;
620                             } else if ((cf[1] == '.') && (cf[2] == '/' || cf[2] == 0)) {
621                                 ++cf;
622                                 if (p > p0) {
623                                     while (*--p != '/');    /* omit previous dir */
624                                 }
625                                 continue;
626                             }
627                         }
628                     }
629                     *++p = *cf;
630             } while (*++cf);
631
632             if ((p == p0) || (*p != '/')) {      /* not a trailing slash */
633                 ++p;                             /* so keep last character */
634             }
635             *p = 0;
636             sprintf(p0, "%s:%s", p0, c);
637         }
638 #endif
639
640 #if defined(CONFIG_FEATURE_HTTPD_BASIC_AUTH) || defined(CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES)
641         /* storing current config line */
642         cur = calloc(1, sizeof(Htaccess) + strlen(p0));
643         if(cur) {
644             cf = strcpy(cur->before_colon, p0);
645             c = strchr(cf, ':');
646             *c++ = 0;
647             cur->after_colon = c;
648 #ifdef CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
649             if(*cf == '.') {
650                 /* config .mime line move top for overwrite previous */
651                 cur->next = config->mime_a;
652                 config->mime_a = cur;
653                 continue;
654             }
655 #endif
656 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
657             free(p0);
658             if(prev == NULL) {
659                 /* first line */
660                 config->auth = prev = cur;
661             } else {
662                 /* sort path, if current lenght eq or bigger then move up */
663                 Htaccess *prev_hti = config->auth;
664                 int l = strlen(cf);
665                 Htaccess *hti;
666
667                 for(hti = prev_hti; hti; hti = hti->next) {
668                     if(l >= strlen(hti->before_colon)) {
669                         /* insert before hti */
670                         cur->next = hti;
671                         if(prev_hti != hti) {
672                             prev_hti->next = cur;
673                         } else {
674                             /* insert as top */
675                             config->auth = cur;
676                         }
677                         break;
678                     }
679                     if(prev_hti != hti)
680                             prev_hti = prev_hti->next;
681                 }
682                 if(!hti)  {       /* not inserted, add to bottom */
683                     prev->next = cur;
684                     prev = cur;
685                 }
686             }
687 #endif
688         }
689 #endif
690    }
691    fclose(f);
692 }
693
694 #ifdef CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
695 /****************************************************************************
696  *
697  > $Function: encodeString()
698  *
699  * $Description: Given a string, html encode special characters.
700  *   This is used for the -e command line option to provide an easy way
701  *   for scripts to encode result data without confusing browsers.  The
702  *   returned string pointer is memory allocated by malloc().
703  *
704  * $Parameters:
705  *      (const char *) string . . The first string to encode.
706  *
707  * $Return: (char *) . . . .. . . A pointer to the encoded string.
708  *
709  * $Errors: Returns a null string ("") if memory is not available.
710  *
711  ****************************************************************************/
712 static char *encodeString(const char *string)
713 {
714   /* take the simple route and encode everything */
715   /* could possibly scan once to get length.     */
716   int len = strlen(string);
717   char *out = malloc(len*5 +1);
718   char *p=out;
719   char ch;
720
721   if (!out) return "";
722   while ((ch = *string++)) {
723     // very simple check for what to encode
724     if (isalnum(ch)) *p++ = ch;
725     else p += sprintf(p, "&#%d", (unsigned char) ch);
726   }
727   *p=0;
728   return out;
729 }
730 #endif          /* CONFIG_FEATURE_HTTPD_ENCODE_URL_STR */
731
732 /****************************************************************************
733  *
734  > $Function: decodeString()
735  *
736  * $Description: Given a URL encoded string, convert it to plain ascii.
737  *   Since decoding always makes strings smaller, the decode is done in-place.
738  *   Thus, callers should strdup() the argument if they do not want the
739  *   argument modified.  The return is the original pointer, allowing this
740  *   function to be easily used as arguments to other functions.
741  *
742  * $Parameters:
743  *      (char *) string . . . The first string to decode.
744  *      (int)    flag   . . . 1 if require decode '+' as ' ' for CGI
745  *
746  * $Return: (char *)  . . . . A pointer to the decoded string (same as input).
747  *
748  * $Errors: None
749  *
750  ****************************************************************************/
751 static char *decodeString(char *orig, int flag_plus_to_space)
752 {
753   /* note that decoded string is always shorter than original */
754   char *string = orig;
755   char *ptr = string;
756
757   while (*ptr)
758   {
759     if (*ptr == '+' && flag_plus_to_space)    { *string++ = ' '; ptr++; }
760     else if (*ptr != '%') *string++ = *ptr++;
761     else  {
762       unsigned int value;
763       sscanf(ptr+1, "%2X", &value);
764       *string++ = value;
765       ptr += 3;
766     }
767   }
768   *string = '\0';
769   return orig;
770 }
771
772
773 #ifdef CONFIG_FEATURE_HTTPD_CGI
774 /****************************************************************************
775  *
776  > $Function: addEnv()
777  *
778  * $Description: Add an environment variable setting to the global list.
779  *    A NAME=VALUE string is allocated, filled, and added to the list of
780  *    environment settings passed to the cgi execution script.
781  *
782  * $Parameters:
783  *  (char *) name_before_underline - The first part environment variable name.
784  *  (char *) name_after_underline  - The second part environment variable name.
785  *  (char *) value  . . The value to which the env variable is set.
786  *
787  * $Return: (void)
788  *
789  * $Errors: Silently returns if the env runs out of space to hold the new item
790  *
791  ****************************************************************************/
792 static void addEnv(const char *name_before_underline,
793                         const char *name_after_underline, const char *value)
794 {
795   char *s = NULL;
796   const char *underline;
797
798   if (!value)
799         value = "";
800   underline = *name_after_underline ? "_" : "";
801   asprintf(&s, "%s%s%s=%s", name_before_underline, underline,
802                                         name_after_underline, value);
803   if(s) {
804     putenv(s);
805   }
806 }
807
808 #if defined(CONFIG_FEATURE_HTTPD_SET_REMOTE_PORT_TO_ENV) || !defined(CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY)
809 /* set environs SERVER_PORT and REMOTE_PORT */
810 static void addEnvPort(const char *port_name)
811 {
812       char buf[16];
813
814       sprintf(buf, "%u", config->port);
815       addEnv(port_name, "PORT", buf);
816 }
817 #endif
818 #endif          /* CONFIG_FEATURE_HTTPD_CGI */
819
820
821 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
822 /****************************************************************************
823  *
824  > $Function: decodeBase64()
825  *
826  > $Description: Decode a base 64 data stream as per rfc1521.
827  *    Note that the rfc states that none base64 chars are to be ignored.
828  *    Since the decode always results in a shorter size than the input, it is
829  *    OK to pass the input arg as an output arg.
830  *
831  * $Parameter:
832  *      (char *) Data . . . . A pointer to a base64 encoded string.
833  *                            Where to place the decoded data.
834  *
835  * $Return: void
836  *
837  * $Errors: None
838  *
839  ****************************************************************************/
840 static void decodeBase64(char *Data)
841 {
842
843   const unsigned char *in = Data;
844   // The decoded size will be at most 3/4 the size of the encoded
845   unsigned long ch = 0;
846   int i = 0;
847
848   while (*in) {
849     int t = *in++;
850
851     if(t >= '0' && t <= '9')
852         t = t - '0' + 52;
853     else if(t >= 'A' && t <= 'Z')
854         t = t - 'A';
855     else if(t >= 'a' && t <= 'z')
856         t = t - 'a' + 26;
857     else if(t == '+')
858         t = 62;
859     else if(t == '/')
860         t = 63;
861     else if(t == '=')
862         t = 0;
863     else
864         continue;
865
866     ch = (ch << 6) | t;
867     i++;
868     if (i == 4) {
869         *Data++ = (char) (ch >> 16);
870         *Data++ = (char) (ch >> 8);
871         *Data++ = (char) ch;
872         i = 0;
873     }
874   }
875   *Data = 0;
876 }
877 #endif
878
879
880 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
881 /****************************************************************************
882  *
883  > $Function: openServer()
884  *
885  * $Description: create a listen server socket on the designated port.
886  *
887  * $Return: (int)  . . . A connection socket. -1 for errors.
888  *
889  * $Errors: None
890  *
891  ****************************************************************************/
892 static int openServer(void)
893 {
894   struct sockaddr_in lsocket;
895   int fd;
896
897   /* create the socket right now */
898   /* inet_addr() returns a value that is already in network order */
899   memset(&lsocket, 0, sizeof(lsocket));
900   lsocket.sin_family = AF_INET;
901   lsocket.sin_addr.s_addr = INADDR_ANY;
902   lsocket.sin_port = htons(config->port) ;
903   fd = socket(AF_INET, SOCK_STREAM, 0);
904   if (fd >= 0) {
905     /* tell the OS it's OK to reuse a previous address even though */
906     /* it may still be in a close down state.  Allows bind to succeed. */
907     int on = 1;
908 #ifdef SO_REUSEPORT
909     setsockopt(fd, SOL_SOCKET, SO_REUSEPORT, (void *)&on, sizeof(on)) ;
910 #else
911     setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, (void *)&on, sizeof(on)) ;
912 #endif
913     if (bind(fd, (struct sockaddr *)&lsocket, sizeof(lsocket)) == 0) {
914       listen(fd, 9);
915       signal(SIGCHLD, SIG_IGN);   /* prevent zombie (defunct) processes */
916     } else {
917         bb_perror_msg_and_die("bind");
918     }
919   } else {
920         bb_perror_msg_and_die("create socket");
921   }
922   return fd;
923 }
924 #endif  /* CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY */
925
926 /****************************************************************************
927  *
928  > $Function: sendHeaders()
929  *
930  * $Description: Create and send HTTP response headers.
931  *   The arguments are combined and sent as one write operation.  Note that
932  *   IE will puke big-time if the headers are not sent in one packet and the
933  *   second packet is delayed for any reason.
934  *
935  * $Parameter:
936  *      (HttpResponseNum) responseNum . . . The result code to send.
937  *
938  * $Return: (int)  . . . . writing errors
939  *
940  ****************************************************************************/
941 static int sendHeaders(HttpResponseNum responseNum)
942 {
943   char *buf = config->buf;
944   const char *responseString = "";
945   const char *infoString = 0;
946   unsigned int i;
947   time_t timer = time(0);
948   char timeStr[80];
949   int len;
950
951   for (i = 0;
952         i < (sizeof(httpResponseNames)/sizeof(httpResponseNames[0])); i++) {
953                 if (httpResponseNames[i].type == responseNum) {
954                         responseString = httpResponseNames[i].name;
955                         infoString = httpResponseNames[i].info;
956                         break;
957                 }
958   }
959   if (responseNum != HTTP_OK) {
960         config->found_mime_type = "text/html";  // error message is HTML
961   }
962
963   /* emit the current date */
964   strftime(timeStr, sizeof(timeStr), RFC1123FMT, gmtime(&timer));
965   len = sprintf(buf,
966         "HTTP/1.0 %d %s\nContent-type: %s\r\n"
967         "Date: %s\r\nConnection: close\r\n",
968           responseNum, responseString, config->found_mime_type, timeStr);
969
970 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
971   if (responseNum == HTTP_UNAUTHORIZED) {
972     len += sprintf(buf+len, "WWW-Authenticate: Basic realm=\"%s\"\r\n",
973                                                             config->realm);
974   }
975 #endif
976   if (config->ContentLength != -1) {    /* file */
977     strftime(timeStr, sizeof(timeStr), RFC1123FMT, gmtime(&config->last_mod));
978     len += sprintf(buf+len, "Last-Modified: %s\r\n%s " cont_l_fmt "\r\n",
979                               timeStr, Content_length, config->ContentLength);
980   }
981   strcat(buf, "\r\n");
982   len += 2;
983   if (infoString) {
984     len += sprintf(buf+len,
985             "<HEAD><TITLE>%d %s</TITLE></HEAD>\n"
986             "<BODY><H1>%d %s</H1>\n%s\n</BODY>\n",
987             responseNum, responseString,
988             responseNum, responseString, infoString);
989   }
990 #ifdef DEBUG
991   if (config->debugHttpd) fprintf(stderr, "Headers: '%s'", buf);
992 #endif
993   return bb_full_write(a_c_w, buf, len);
994 }
995
996 /****************************************************************************
997  *
998  > $Function: getLine()
999  *
1000  * $Description: Read from the socket until an end of line char found.
1001  *
1002  *   Characters are read one at a time until an eol sequence is found.
1003  *
1004  * $Return: (int) . . . . number of characters read.  -1 if error.
1005  *
1006  ****************************************************************************/
1007 static int getLine(void)
1008 {
1009   int  count = 0;
1010   char *buf = config->buf;
1011
1012   while (read(a_c_r, buf + count, 1) == 1) {
1013     if (buf[count] == '\r') continue;
1014     if (buf[count] == '\n') {
1015       buf[count] = 0;
1016       return count;
1017     }
1018     if(count < (MAX_MEMORY_BUFF-1))      /* check owerflow */
1019         count++;
1020   }
1021   if (count) return count;
1022   else return -1;
1023 }
1024
1025 #ifdef CONFIG_FEATURE_HTTPD_CGI
1026 /****************************************************************************
1027  *
1028  > $Function: sendCgi()
1029  *
1030  * $Description: Execute a CGI script and send it's stdout back
1031  *
1032  *   Environment variables are set up and the script is invoked with pipes
1033  *   for stdin/stdout.  If a post is being done the script is fed the POST
1034  *   data in addition to setting the QUERY_STRING variable (for GETs or POSTs).
1035  *
1036  * $Parameters:
1037  *      (const char *) url . . . . . . The requested URL (with leading /).
1038  *      (const char *urlArgs). . . . . Any URL arguments.
1039  *      (int bodyLen)  . . . . . . . . Length of the post body.
1040  *      (const char *cookie) . . . . . For set HTTP_COOKIE.
1041  *      (const char *content_type) . . For set CONTENT_TYPE.
1042
1043  *
1044  * $Return: (char *)  . . . . A pointer to the decoded string (same as input).
1045  *
1046  * $Errors: None
1047  *
1048  ****************************************************************************/
1049 static int sendCgi(const char *url,
1050                    const char *request, const char *urlArgs,
1051                    int bodyLen, const char *cookie,
1052                    const char *content_type)
1053 {
1054   int fromCgi[2];  /* pipe for reading data from CGI */
1055   int toCgi[2];    /* pipe for sending data to CGI */
1056
1057   static char * argp[] = { 0, 0 };
1058   int pid = 0;
1059   int inFd;
1060   int outFd;
1061   int firstLine = 1;
1062
1063   do {
1064     if (pipe(fromCgi) != 0) {
1065       break;
1066     }
1067     if (pipe(toCgi) != 0) {
1068       break;
1069     }
1070
1071     pid = fork();
1072     if (pid < 0) {
1073         pid = 0;
1074         break;
1075     }
1076
1077     if (!pid) {
1078       /* child process */
1079       char *script;
1080       char *purl = strdup( url );
1081       char realpath_buff[MAXPATHLEN];
1082
1083       if(purl == NULL)
1084         _exit(242);
1085
1086       inFd  = toCgi[0];
1087       outFd = fromCgi[1];
1088
1089       dup2(inFd, 0);  // replace stdin with the pipe
1090       dup2(outFd, 1);  // replace stdout with the pipe
1091
1092 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1093       if (!config->debugHttpd)
1094 #endif
1095         dup2(outFd, 2);  // replace stderr with the pipe
1096
1097       close(toCgi[0]);
1098       close(toCgi[1]);
1099       close(fromCgi[0]);
1100       close(fromCgi[1]);
1101
1102       /*
1103        * Find PATH_INFO.
1104        */
1105       script = purl;
1106       while((script = strchr( script + 1, '/' )) != NULL) {
1107         /* have script.cgi/PATH_INFO or dirs/script.cgi[/PATH_INFO] */
1108         struct stat sb;
1109
1110         *script = '\0';
1111         if(is_directory(purl + 1, 1, &sb) == 0) {
1112                 /* not directory, found script.cgi/PATH_INFO */
1113                 *script = '/';
1114                 break;
1115         }
1116         *script = '/';          /* is directory, find next '/' */
1117       }
1118       addEnv("PATH", "INFO", script);   /* set /PATH_INFO or NULL */
1119       addEnv("PATH",           "",         getenv("PATH"));
1120       addEnv("REQUEST",        "METHOD",   request);
1121       if(urlArgs) {
1122         char *uri = alloca(strlen(purl) + 2 + strlen(urlArgs));
1123         if(uri)
1124             sprintf(uri, "%s?%s", purl, urlArgs);
1125         addEnv("REQUEST",        "URI",   uri);
1126       } else {
1127         addEnv("REQUEST",        "URI",   purl);
1128       }
1129       if(script != NULL)
1130         *script = '\0';         /* reduce /PATH_INFO */
1131       /* set SCRIPT_NAME as full path: /cgi-bin/dirs/script.cgi */
1132       addEnv("SCRIPT_NAME",    "",         purl);
1133       addEnv("QUERY_STRING",   "",         urlArgs);
1134       addEnv("SERVER",         "SOFTWARE", httpdVersion);
1135       addEnv("SERVER",         "PROTOCOL", "HTTP/1.0");
1136       addEnv("GATEWAY_INTERFACE", "",      "CGI/1.1");
1137       addEnv("REMOTE",         "ADDR",     config->rmt_ip_str);
1138 #ifdef CONFIG_FEATURE_HTTPD_SET_REMOTE_PORT_TO_ENV
1139       addEnvPort("REMOTE");
1140 #endif
1141       if(bodyLen) {
1142         char sbl[32];
1143
1144         sprintf(sbl, "%d", bodyLen);
1145         addEnv("CONTENT", "LENGTH", sbl);
1146       }
1147       if(cookie)
1148         addEnv("HTTP", "COOKIE", cookie);
1149       if(content_type)
1150         addEnv("CONTENT", "TYPE", content_type);
1151 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1152       if(config->remoteuser) {
1153         addEnv("REMOTE", "USER", config->remoteuser);
1154         addEnv("AUTH_TYPE", "", "Basic");
1155       }
1156 #endif
1157       if(config->referer)
1158         addEnv("HTTP", "REFERER", config->referer);
1159
1160         /* set execve argp[0] without path */
1161       argp[0] = strrchr( purl, '/' ) + 1;
1162         /* but script argp[0] must have absolute path and chdiring to this */
1163       if(realpath(purl + 1, realpath_buff) != NULL) {
1164             script = strrchr(realpath_buff, '/');
1165             if(script) {
1166                 *script = '\0';
1167                 if(chdir(realpath_buff) == 0) {
1168                   *script = '/';
1169                   // now run the program.  If it fails,
1170                   // use _exit() so no destructors
1171                   // get called and make a mess.
1172                   execv(realpath_buff, argp);
1173                 }
1174             }
1175       }
1176 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1177       config->accepted_socket = 1;      /* send to stdout */
1178 #endif
1179       sendHeaders(HTTP_NOT_FOUND);
1180       _exit(242);
1181     } /* end child */
1182
1183   } while (0);
1184
1185   if (pid) {
1186     /* parent process */
1187     int status;
1188     size_t post_readed_size = 0, post_readed_idx = 0;
1189
1190     inFd  = fromCgi[0];
1191     outFd = toCgi[1];
1192     close(fromCgi[1]);
1193     close(toCgi[0]);
1194     signal(SIGPIPE, SIG_IGN);
1195
1196     while (1) {
1197       fd_set readSet;
1198       fd_set writeSet;
1199       char wbuf[128];
1200       int nfound;
1201       int count;
1202
1203       FD_ZERO(&readSet);
1204       FD_ZERO(&writeSet);
1205       FD_SET(inFd, &readSet);
1206       if(bodyLen > 0 || post_readed_size > 0) {
1207         FD_SET(outFd, &writeSet);
1208         nfound = outFd > inFd ? outFd : inFd;
1209         if(post_readed_size == 0) {
1210                 FD_SET(a_c_r, &readSet);
1211                 if(nfound < a_c_r)
1212                         nfound = a_c_r;
1213         }
1214       /* Now wait on the set of sockets! */
1215         nfound = select(nfound + 1, &readSet, &writeSet, 0, NULL);
1216       } else {
1217         if(!bodyLen) {
1218                 close(outFd);
1219                 bodyLen = -1;
1220         }
1221         nfound = select(inFd + 1, &readSet, 0, 0, NULL);
1222       }
1223
1224       if (nfound <= 0) {
1225         if (waitpid(pid, &status, WNOHANG) > 0) {
1226           close(inFd);
1227 #ifdef DEBUG
1228           if (config->debugHttpd) {
1229             if (WIFEXITED(status))
1230               bb_error_msg("piped has exited with status=%d", WEXITSTATUS(status));
1231             if (WIFSIGNALED(status))
1232               bb_error_msg("piped has exited with signal=%d", WTERMSIG(status));
1233           }
1234 #endif
1235           break;
1236         }
1237       } else if(post_readed_size > 0 && FD_ISSET(outFd, &writeSet)) {
1238                 count = bb_full_write(outFd, wbuf + post_readed_idx, post_readed_size);
1239                 if(count > 0) {
1240                         post_readed_size -= count;
1241                         post_readed_idx += count;
1242                         if(post_readed_size == 0)
1243                                 post_readed_idx = 0;
1244                 }
1245       } else if(bodyLen > 0 && post_readed_size == 0 && FD_ISSET(a_c_r, &readSet)) {
1246                 count = bodyLen > sizeof(wbuf) ? sizeof(wbuf) : bodyLen;
1247                 count = bb_full_read(a_c_r, wbuf, count);
1248                 if(count > 0) {
1249                         post_readed_size += count;
1250                         bodyLen -= count;
1251       } else {
1252                         bodyLen = 0;    /* closed */
1253                 }
1254       } else if(FD_ISSET(inFd, &readSet)) {
1255         int s = a_c_w;
1256         char *rbuf = config->buf;
1257
1258         // There is something to read
1259         count = bb_full_read(inFd, rbuf, MAX_MEMORY_BUFF-1);
1260         if (count == 0)
1261                 break;  /* closed */
1262         if (count > 0) {
1263           if (firstLine) {
1264             rbuf[count] = 0;
1265             /* check to see if the user script added headers */
1266             if(strncmp(rbuf, "HTTP/1.0 200 OK\n", 4) != 0) {
1267               bb_full_write(s, "HTTP/1.0 200 OK\n", 16);
1268             }
1269             if (strstr(rbuf, "ontent-") == 0) {
1270               bb_full_write(s, "Content-type: text/plain\n\n", 26);
1271             }
1272             firstLine = 0;
1273           }
1274           if (bb_full_write(s, rbuf, count) != count)
1275               break;
1276
1277 #ifdef DEBUG
1278           if (config->debugHttpd)
1279                 fprintf(stderr, "cgi read %d bytes\n", count);
1280 #endif
1281         }
1282       }
1283     }
1284   }
1285   return 0;
1286 }
1287 #endif          /* CONFIG_FEATURE_HTTPD_CGI */
1288
1289 /****************************************************************************
1290  *
1291  > $Function: sendFile()
1292  *
1293  * $Description: Send a file response to an HTTP request
1294  *
1295  * $Parameter:
1296  *      (const char *) url . . The URL requested.
1297  *
1298  * $Return: (int)  . . . . . . Always 0.
1299  *
1300  ****************************************************************************/
1301 static int sendFile(const char *url)
1302 {
1303   char * suffix;
1304   int  f;
1305   const char * const * table;
1306   const char * try_suffix;
1307
1308   suffix = strrchr(url, '.');
1309
1310   for (table = suffixTable; *table; table += 2)
1311         if(suffix != NULL && (try_suffix = strstr(*table, suffix)) != 0) {
1312                 try_suffix += strlen(suffix);
1313                 if(*try_suffix == 0 || *try_suffix == '.')
1314                         break;
1315         }
1316   /* also, if not found, set default as "application/octet-stream";  */
1317   config->found_mime_type = *(table+1);
1318 #ifdef CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES
1319   if (suffix) {
1320     Htaccess * cur;
1321
1322     for (cur = config->mime_a; cur; cur = cur->next) {
1323         if(strcmp(cur->before_colon, suffix) == 0) {
1324                 config->found_mime_type = cur->after_colon;
1325                 break;
1326         }
1327     }
1328   }
1329 #endif  /* CONFIG_FEATURE_HTTPD_CONFIG_WITH_MIME_TYPES */
1330
1331 #ifdef DEBUG
1332     if (config->debugHttpd)
1333         fprintf(stderr, "Sending file '%s' Content-type: %s\n",
1334                                         url, config->found_mime_type);
1335 #endif
1336
1337   f = open(url, O_RDONLY);
1338   if (f >= 0) {
1339         int count;
1340         char *buf = config->buf;
1341
1342         sendHeaders(HTTP_OK);
1343         while ((count = bb_full_read(f, buf, MAX_MEMORY_BUFF)) > 0) {
1344                 if (bb_full_write(a_c_w, buf, count) != count)
1345                         break;
1346         }
1347         close(f);
1348   } else {
1349 #ifdef DEBUG
1350         if (config->debugHttpd)
1351                 bb_perror_msg("Unable to open '%s'", url);
1352 #endif
1353         sendHeaders(HTTP_NOT_FOUND);
1354   }
1355
1356   return 0;
1357 }
1358
1359 static int checkPermIP(void)
1360 {
1361     Htaccess_IP * cur;
1362
1363     /* This could stand some work */
1364     for (cur = config->ip_a_d; cur; cur = cur->next) {
1365 #ifdef DEBUG
1366         if (config->debugHttpd) {
1367             fprintf(stderr, "checkPermIP: '%s' ? ", config->rmt_ip_str);
1368             fprintf(stderr, "'%u.%u.%u.%u/%u.%u.%u.%u'\n",
1369                 (unsigned char)(cur->ip >> 24),
1370                 (unsigned char)(cur->ip >> 16),
1371                 (unsigned char)(cur->ip >> 8),
1372                                 cur->ip & 0xff,
1373                 (unsigned char)(cur->mask >> 24),
1374                 (unsigned char)(cur->mask >> 16),
1375                 (unsigned char)(cur->mask >> 8),
1376                                 cur->mask & 0xff);
1377         }
1378 #endif
1379         if((config->rmt_ip & cur->mask) == cur->ip)
1380             return cur->allow_deny == 'A';   /* Allow/Deny */
1381     }
1382
1383     /* if unconfigured, return 1 - access from all */
1384     return !config->flg_deny_all;
1385 }
1386
1387 /****************************************************************************
1388  *
1389  > $Function: checkPerm()
1390  *
1391  * $Description: Check the permission file for access password protected.
1392  *
1393  *   If config file isn't present, everything is allowed.
1394  *   Entries are of the form you can see example from header source
1395  *
1396  * $Parameters:
1397  *      (const char *) path  . . . . The file path.
1398  *      (const char *) request . . . User information to validate.
1399  *
1400  * $Return: (int)  . . . . . . . . . 1 if request OK, 0 otherwise.
1401  *
1402  ****************************************************************************/
1403
1404 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1405 static int checkPerm(const char *path, const char *request)
1406 {
1407     Htaccess * cur;
1408     const char *p;
1409     const char *p0;
1410
1411     const char *prev = NULL;
1412
1413     /* This could stand some work */
1414     for (cur = config->auth; cur; cur = cur->next) {
1415         p0 = cur->before_colon;
1416         if(prev != NULL && strcmp(prev, p0) != 0)
1417             continue;       /* find next identical */
1418         p = cur->after_colon;
1419 #ifdef DEBUG
1420         if (config->debugHttpd)
1421             fprintf(stderr,"checkPerm: '%s' ? '%s'\n", p0, request);
1422 #endif
1423         {
1424             int l = strlen(p0);
1425
1426             if(strncmp(p0, path, l) == 0 &&
1427                             (l == 1 || path[l] == '/' || path[l] == 0)) {
1428                 char *u;
1429                 /* path match found.  Check request */
1430                 /* for check next /path:user:password */
1431                 prev = p0;
1432                 u = strchr(request, ':');
1433                 if(u == NULL) {
1434                         /* bad request, ':' required */
1435                         break;
1436                         }
1437
1438 #ifdef CONFIG_FEATURE_HTTPD_AUTH_MD5
1439                 {
1440                         char *cipher;
1441                         char *pp;
1442
1443                         if(strncmp(p, request, u-request) != 0) {
1444                                 /* user uncompared */
1445                                 continue;
1446                         }
1447                         pp = strchr(p, ':');
1448                         if(pp && pp[1] == '$' && pp[2] == '1' &&
1449                                                  pp[3] == '$' && pp[4]) {
1450                                 pp++;
1451                                 cipher = pw_encrypt(u+1, pp);
1452                                 if (strcmp(cipher, pp) == 0)
1453                                         goto set_remoteuser_var;   /* Ok */
1454                                 /* unauthorized */
1455                                 continue;
1456                         }
1457                 }
1458 #endif
1459                 if (strcmp(p, request) == 0) {
1460 #ifdef CONFIG_FEATURE_HTTPD_AUTH_MD5
1461 set_remoteuser_var:
1462 #endif
1463                     config->remoteuser = strdup(request);
1464                     if(config->remoteuser)
1465                         config->remoteuser[(u - request)] = 0;
1466                     return 1;   /* Ok */
1467                 }
1468                 /* unauthorized */
1469             }
1470         }
1471     }   /* for */
1472
1473     return prev == NULL;
1474 }
1475
1476 #endif  /* CONFIG_FEATURE_HTTPD_BASIC_AUTH */
1477
1478
1479 /****************************************************************************
1480  *
1481  > $Function: handleIncoming()
1482  *
1483  * $Description: Handle an incoming http request.
1484  *
1485  ****************************************************************************/
1486 static void handleIncoming(void)
1487 {
1488   char *buf = config->buf;
1489   char *url;
1490   char *purl;
1491   int  blank = -1;
1492   char *urlArgs;
1493   char *test;
1494   struct stat sb;
1495   int ip_allowed;
1496 #ifdef CONFIG_FEATURE_HTTPD_CGI
1497   const char *prequest = request_GET;
1498   long length=0;
1499   char *cookie = 0;
1500   char *content_type = 0;
1501 #endif
1502 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1503   fd_set s_fd;
1504   struct timeval tv;
1505   int retval;
1506 #endif
1507
1508 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1509   int credentials = -1;  /* if not requred this is Ok */
1510 #endif
1511
1512   do {
1513     int  count;
1514
1515     if (getLine() <= 0)
1516         break;  /* closed */
1517
1518     purl = strpbrk(buf, " \t");
1519     if(purl == NULL) {
1520 BAD_REQUEST:
1521       sendHeaders(HTTP_BAD_REQUEST);
1522       break;
1523     }
1524     *purl = 0;
1525 #ifdef CONFIG_FEATURE_HTTPD_CGI
1526     if(strcasecmp(buf, prequest) != 0) {
1527         prequest = "POST";
1528         if(strcasecmp(buf, prequest) != 0) {
1529             sendHeaders(HTTP_NOT_IMPLEMENTED);
1530             break;
1531         }
1532     }
1533 #else
1534     if(strcasecmp(buf, request_GET) != 0) {
1535         sendHeaders(HTTP_NOT_IMPLEMENTED);
1536         break;
1537     }
1538 #endif
1539     *purl = ' ';
1540     count = sscanf(purl, " %[^ ] HTTP/%d.%*d", buf, &blank);
1541
1542     decodeString(buf, 0);
1543     if (count < 1 || buf[0] != '/') {
1544       /* Garbled request/URL */
1545       goto BAD_REQUEST;
1546     }
1547     url = alloca(strlen(buf) + 12);      /* + sizeof("/index.html\0") */
1548     if(url == NULL) {
1549         sendHeaders(HTTP_INTERNAL_SERVER_ERROR);
1550         break;
1551     }
1552     strcpy(url, buf);
1553     /* extract url args if present */
1554     urlArgs = strchr(url, '?');
1555     if (urlArgs)
1556       *urlArgs++ = 0;
1557
1558     /* algorithm stolen from libbb bb_simplify_path(),
1559        but don`t strdup and reducing trailing slash and protect out root */
1560     purl = test = url;
1561
1562     do {
1563         if (*purl == '/') {
1564             if (*test == '/') {        /* skip duplicate (or initial) slash */
1565                 continue;
1566             } else if (*test == '.') {
1567                 if (test[1] == '/' || test[1] == 0) { /* skip extra '.' */
1568                     continue;
1569                 } else if ((test[1] == '.') && (test[2] == '/' || test[2] == 0)) {
1570                     ++test;
1571                     if (purl == url) {
1572                         /* protect out root */
1573                         goto BAD_REQUEST;
1574                     }
1575                     while (*--purl != '/');    /* omit previous dir */
1576                     continue;
1577                 }
1578             }
1579         }
1580         *++purl = *test;
1581     } while (*++test);
1582
1583     *++purl = 0;        /* so keep last character */
1584     test = purl;        /* end ptr */
1585
1586     /* If URL is directory, adding '/' */
1587     if(test[-1] != '/') {
1588             if ( is_directory(url + 1, 1, &sb) ) {
1589                     *test++ = '/';
1590                     *test = 0;
1591                     purl = test;    /* end ptr */
1592             }
1593     }
1594 #ifdef DEBUG
1595     if (config->debugHttpd)
1596         fprintf(stderr, "url='%s', args=%s\n", url, urlArgs);
1597 #endif
1598
1599     test = url;
1600     ip_allowed = checkPermIP();
1601     while(ip_allowed && (test = strchr( test + 1, '/' )) != NULL) {
1602         /* have path1/path2 */
1603         *test = '\0';
1604         if( is_directory(url + 1, 1, &sb) ) {
1605                 /* may be having subdir config */
1606                 parse_conf(url + 1, SUBDIR_PARSE);
1607                 ip_allowed = checkPermIP();
1608         }
1609         *test = '/';
1610     }
1611
1612     // read until blank line for HTTP version specified, else parse immediate
1613     while (blank >= 0 && (count = getLine()) > 0) {
1614
1615 #ifdef DEBUG
1616       if (config->debugHttpd) fprintf(stderr, "Header: '%s'\n", buf);
1617 #endif
1618
1619 #ifdef CONFIG_FEATURE_HTTPD_CGI
1620       /* try and do our best to parse more lines */
1621       if ((strncasecmp(buf, Content_length, 15) == 0)) {
1622         if(prequest != request_GET)
1623                 length = strtol(buf + 15, 0, 0); // extra read only for POST
1624       } else if ((strncasecmp(buf, "Cookie:", 7) == 0)) {
1625                 for(test = buf + 7; isspace(*test); test++)
1626                         ;
1627                 cookie = strdup(test);
1628       } else if ((strncasecmp(buf, "Content-Type:", 13) == 0)) {
1629                 for(test = buf + 13; isspace(*test); test++)
1630                         ;
1631                 content_type = strdup(test);
1632       } else if ((strncasecmp(buf, "Referer:", 8) == 0)) {
1633                 for(test = buf + 8; isspace(*test); test++)
1634                         ;
1635                 config->referer = strdup(test);
1636       }
1637 #endif
1638
1639 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1640       if (strncasecmp(buf, "Authorization:", 14) == 0) {
1641         /* We only allow Basic credentials.
1642          * It shows up as "Authorization: Basic <userid:password>" where
1643          * the userid:password is base64 encoded.
1644          */
1645         for(test = buf + 14; isspace(*test); test++)
1646                 ;
1647         if (strncasecmp(test, "Basic", 5) != 0)
1648                 continue;
1649
1650         test += 5;  /* decodeBase64() skiping space self */
1651         decodeBase64(test);
1652         credentials = checkPerm(url, test);
1653       }
1654 #endif          /* CONFIG_FEATURE_HTTPD_BASIC_AUTH */
1655
1656     }   /* while extra header reading */
1657
1658
1659     if (strcmp(strrchr(url, '/') + 1, httpd_conf) == 0 || ip_allowed == 0) {
1660                 /* protect listing [/path]/httpd_conf or IP deny */
1661 #ifdef CONFIG_FEATURE_HTTPD_CGI
1662 FORBIDDEN:      /* protect listing /cgi-bin */
1663 #endif
1664                 sendHeaders(HTTP_FORBIDDEN);
1665                 break;
1666     }
1667
1668 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1669     if (credentials <= 0 && checkPerm(url, ":") == 0) {
1670       sendHeaders(HTTP_UNAUTHORIZED);
1671       break;
1672     }
1673 #endif
1674
1675     test = url + 1;      /* skip first '/' */
1676
1677 #ifdef CONFIG_FEATURE_HTTPD_CGI
1678     /* if strange Content-Length */
1679     if (length < 0)
1680         break;
1681
1682     if (strncmp(test, "cgi-bin", 7) == 0) {
1683                 if(test[7] == '/' && test[8] == 0)
1684                         goto FORBIDDEN;     // protect listing cgi-bin/
1685                 sendCgi(url, prequest, urlArgs, length, cookie, content_type);
1686     } else {
1687         if (prequest != request_GET)
1688                 sendHeaders(HTTP_NOT_IMPLEMENTED);
1689         else {
1690 #endif  /* CONFIG_FEATURE_HTTPD_CGI */
1691                 if(purl[-1] == '/')
1692                         strcpy(purl, "index.html");
1693                 if ( stat(test, &sb ) == 0 ) {
1694                         config->ContentLength = sb.st_size;
1695                         config->last_mod = sb.st_mtime;
1696                 }
1697                 sendFile(test);
1698 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1699                 /* unset if non inetd looped */
1700                 config->ContentLength = -1;
1701 #endif
1702
1703 #ifdef CONFIG_FEATURE_HTTPD_CGI
1704         }
1705     }
1706 #endif
1707
1708   } while (0);
1709
1710
1711 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1712 /* from inetd don`t looping: freeing, closing automatic from exit always */
1713 # ifdef DEBUG
1714   if (config->debugHttpd) fprintf(stderr, "closing socket\n");
1715 # endif
1716 # ifdef CONFIG_FEATURE_HTTPD_CGI
1717   free(cookie);
1718   free(content_type);
1719   free(config->referer);
1720 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1721   free(config->remoteuser);
1722 #endif
1723 # endif
1724   shutdown(a_c_w, SHUT_WR);
1725
1726   /* Properly wait for remote to closed */
1727   FD_ZERO (&s_fd) ;
1728   FD_SET (a_c_w, &s_fd) ;
1729
1730   do {
1731     tv.tv_sec = 2 ;
1732     tv.tv_usec = 0 ;
1733     retval = select (a_c_w + 1, &s_fd, NULL, NULL, &tv);
1734   } while (retval > 0 && (read (a_c_w, buf, sizeof (config->buf)) > 0));
1735
1736   shutdown(a_c_r, SHUT_RD);
1737   close(config->accepted_socket);
1738 #endif  /* CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY */
1739 }
1740
1741 /****************************************************************************
1742  *
1743  > $Function: miniHttpd()
1744  *
1745  * $Description: The main http server function.
1746  *
1747  *   Given an open socket fildes, listen for new connections and farm out
1748  *   the processing as a forked process.
1749  *
1750  * $Parameters:
1751  *      (int) server. . . The server socket fildes.
1752  *
1753  * $Return: (int) . . . . Always 0.
1754  *
1755  ****************************************************************************/
1756 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1757 static int miniHttpd(int server)
1758 {
1759   fd_set readfd, portfd;
1760
1761   FD_ZERO(&portfd);
1762   FD_SET(server, &portfd);
1763
1764   /* copy the ports we are watching to the readfd set */
1765   while (1) {
1766     readfd = portfd;
1767
1768     /* Now wait INDEFINITELY on the set of sockets! */
1769     if (select(server + 1, &readfd, 0, 0, 0) > 0) {
1770       if (FD_ISSET(server, &readfd)) {
1771         int on;
1772         struct sockaddr_in fromAddr;
1773
1774         socklen_t fromAddrLen = sizeof(fromAddr);
1775         int s = accept(server,
1776                        (struct sockaddr *)&fromAddr, &fromAddrLen);
1777
1778         if (s < 0) {
1779             continue;
1780         }
1781         config->accepted_socket = s;
1782         config->rmt_ip = ntohl(fromAddr.sin_addr.s_addr);
1783 #if defined(CONFIG_FEATURE_HTTPD_CGI) || defined(DEBUG)
1784         sprintf(config->rmt_ip_str, "%u.%u.%u.%u",
1785                 (unsigned char)(config->rmt_ip >> 24),
1786                 (unsigned char)(config->rmt_ip >> 16),
1787                 (unsigned char)(config->rmt_ip >> 8),
1788                                 config->rmt_ip & 0xff);
1789         config->port = ntohs(fromAddr.sin_port);
1790 #ifdef DEBUG
1791         if (config->debugHttpd) {
1792             bb_error_msg("connection from IP=%s, port %u\n",
1793                                         config->rmt_ip_str, config->port);
1794         }
1795 #endif
1796 #endif /* CONFIG_FEATURE_HTTPD_CGI */
1797
1798         /*  set the KEEPALIVE option to cull dead connections */
1799         on = 1;
1800         setsockopt(s, SOL_SOCKET, SO_KEEPALIVE, (void *)&on, sizeof (on));
1801
1802         if (config->debugHttpd || fork() == 0) {
1803             /* This is the spawned thread */
1804 #ifdef CONFIG_FEATURE_HTTPD_RELOAD_CONFIG_SIGHUP
1805             /* protect reload config, may be confuse checking */
1806             signal(SIGHUP, SIG_IGN);
1807 #endif
1808             handleIncoming();
1809             if(!config->debugHttpd)
1810                 exit(0);
1811         }
1812         close(s);
1813       }
1814     }
1815   } // while (1)
1816   return 0;
1817 }
1818
1819 #else
1820     /* from inetd */
1821
1822 static int miniHttpd(void)
1823 {
1824   struct sockaddr_in fromAddrLen;
1825   socklen_t sinlen = sizeof (struct sockaddr_in);
1826
1827   getpeername (0, (struct sockaddr *)&fromAddrLen, &sinlen);
1828   config->rmt_ip = ntohl(fromAddrLen.sin_addr.s_addr);
1829 #if defined(CONFIG_FEATURE_HTTPD_CGI) || defined(DEBUG)
1830   sprintf(config->rmt_ip_str, "%u.%u.%u.%u",
1831                 (unsigned char)(config->rmt_ip >> 24),
1832                 (unsigned char)(config->rmt_ip >> 16),
1833                 (unsigned char)(config->rmt_ip >> 8),
1834                                 config->rmt_ip & 0xff);
1835 #endif
1836   config->port = ntohs(fromAddrLen.sin_port);
1837   handleIncoming();
1838   return 0;
1839 }
1840 #endif  /* CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY */
1841
1842 #ifdef CONFIG_FEATURE_HTTPD_RELOAD_CONFIG_SIGHUP
1843 static void sighup_handler(int sig)
1844 {
1845         /* set and reset */
1846         struct sigaction sa;
1847
1848         parse_conf(default_path_httpd_conf,
1849                     sig == SIGHUP ? SIGNALED_PARSE : FIRST_PARSE);
1850         sa.sa_handler = sighup_handler;
1851         sigemptyset(&sa.sa_mask);
1852         sa.sa_flags = SA_RESTART;
1853         sigaction(SIGHUP, &sa, NULL);
1854 }
1855 #endif
1856
1857
1858 static const char httpd_opts[]="c:d:h:"
1859 #ifdef CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
1860                                 "e:"
1861 #define OPT_INC_1 1
1862 #else
1863 #define OPT_INC_1 0
1864 #endif
1865 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1866                                 "r:"
1867 # ifdef CONFIG_FEATURE_HTTPD_AUTH_MD5
1868                                 "m:"
1869 # define OPT_INC_2 2
1870 # else
1871 # define OPT_INC_2 1
1872 #endif
1873 #else
1874 #define OPT_INC_2 0
1875 #endif
1876 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1877                                 "p:v"
1878 #ifdef CONFIG_FEATURE_HTTPD_SETUID
1879                                 "u:"
1880 #endif
1881 #endif /* CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY */
1882                                         ;
1883
1884 #define OPT_CONFIG_FILE (1<<0)
1885 #define OPT_DECODE_URL  (1<<1)
1886 #define OPT_HOME_HTTPD  (1<<2)
1887 #define OPT_ENCODE_URL  (1<<(2+OPT_INC_1))
1888 #define OPT_REALM       (1<<(3+OPT_INC_1))
1889 #define OPT_MD5         (1<<(4+OPT_INC_1))
1890 #define OPT_PORT        (1<<(3+OPT_INC_1+OPT_INC_2))
1891 #define OPT_DEBUG       (1<<(4+OPT_INC_1+OPT_INC_2))
1892 #define OPT_SETUID      (1<<(5+OPT_INC_1+OPT_INC_2))
1893
1894
1895 #ifdef HTTPD_STANDALONE
1896 int main(int argc, char *argv[])
1897 #else
1898 int httpd_main(int argc, char *argv[])
1899 #endif
1900 {
1901   unsigned long opt;
1902   const char *home_httpd = home;
1903   char *url_for_decode;
1904 #ifdef CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
1905   const char *url_for_encode;
1906 #endif
1907 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1908   const char *s_port;
1909 #endif
1910
1911 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1912   int server;
1913 #endif
1914
1915 #ifdef CONFIG_FEATURE_HTTPD_SETUID
1916   const char *s_uid;
1917   long uid = -1;
1918 #endif
1919
1920 #ifdef CONFIG_FEATURE_HTTPD_AUTH_MD5
1921   const char *pass;
1922 #endif
1923
1924   config = xcalloc(1, sizeof(*config));
1925 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1926   config->realm = "Web Server Authentication";
1927 #endif
1928
1929 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1930   config->port = 80;
1931 #endif
1932
1933   config->ContentLength = -1;
1934
1935   opt = bb_getopt_ulflags(argc, argv, httpd_opts,
1936                         &(config->configFile), &url_for_decode, &home_httpd
1937 #ifdef CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
1938                         , &url_for_encode
1939 #endif
1940 #ifdef CONFIG_FEATURE_HTTPD_BASIC_AUTH
1941                         , &(config->realm)
1942 # ifdef CONFIG_FEATURE_HTTPD_AUTH_MD5
1943                         , &pass
1944 # endif
1945 #endif
1946 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1947                         , &s_port
1948 #ifdef CONFIG_FEATURE_HTTPD_SETUID
1949                         , &s_uid
1950 #endif
1951 #endif
1952     );
1953
1954   if(opt & OPT_DECODE_URL) {
1955       printf("%s", decodeString(url_for_decode, 1));
1956       return 0;
1957   }
1958 #ifdef CONFIG_FEATURE_HTTPD_ENCODE_URL_STR
1959   if(opt & OPT_ENCODE_URL) {
1960       printf("%s", encodeString(url_for_encode));
1961       return 0;
1962   }
1963 #endif
1964 #ifdef CONFIG_FEATURE_HTTPD_AUTH_MD5
1965   if(opt & OPT_MD5) {
1966       printf("%s\n", pw_encrypt(pass, "$1$"));
1967       return 0;
1968   }
1969 #endif
1970 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1971     if(opt & OPT_PORT)
1972         config->port = bb_xgetlarg(s_port, 10, 1, 0xffff);
1973     config->debugHttpd = opt & OPT_DEBUG;
1974 #ifdef CONFIG_FEATURE_HTTPD_SETUID
1975     if(opt & OPT_SETUID) {
1976         char *e;
1977
1978         uid = strtol(s_uid, &e, 0);
1979         if(*e != '\0') {
1980                 /* not integer */
1981                 uid = my_getpwnam(s_uid);
1982         }
1983       }
1984 #endif
1985 #endif
1986
1987   if(chdir(home_httpd)) {
1988     bb_perror_msg_and_die("can`t chdir to %s", home_httpd);
1989   }
1990 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
1991   server = openServer();
1992 # ifdef CONFIG_FEATURE_HTTPD_SETUID
1993   /* drop privileges */
1994   if(uid > 0)
1995         setuid(uid);
1996 # endif
1997 #endif
1998
1999 #ifdef CONFIG_FEATURE_HTTPD_CGI
2000    {
2001         char *p = getenv("PATH");
2002         if(p) {
2003                 p = bb_xstrdup(p);
2004         }
2005         clearenv();
2006         if(p)
2007                 setenv("PATH", p, 1);
2008 # ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
2009         addEnvPort("SERVER");
2010 # endif
2011    }
2012 #endif
2013
2014 #ifdef CONFIG_FEATURE_HTTPD_RELOAD_CONFIG_SIGHUP
2015   sighup_handler(0);
2016 #else
2017   parse_conf(default_path_httpd_conf, FIRST_PARSE);
2018 #endif
2019
2020 #ifndef CONFIG_FEATURE_HTTPD_USAGE_FROM_INETD_ONLY
2021   if (!config->debugHttpd) {
2022     if (daemon(1, 0) < 0)     /* don`t change curent directory */
2023         bb_perror_msg_and_die("daemon");
2024   }
2025   return miniHttpd(server);
2026 #else
2027   return miniHttpd();
2028 #endif
2029 }