460b9539 |
1 | /* |
2 | * This file is part of DisOrder. |
fdf98378 |
3 | * Copyright (C) 2004, 2005, 2007 Richard Kettlewell |
460b9539 |
4 | * |
5 | * This program is free software; you can redistribute it and/or modify |
6 | * it under the terms of the GNU General Public License as published by |
7 | * the Free Software Foundation; either version 2 of the License, or |
8 | * (at your option) any later version. |
9 | * |
10 | * This program is distributed in the hope that it will be useful, but |
11 | * WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
13 | * General Public License for more details. |
14 | * |
15 | * You should have received a copy of the GNU General Public License |
16 | * along with this program; if not, write to the Free Software |
17 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 |
18 | * USA |
19 | */ |
20 | |
21 | #include <config.h> |
6d2d327c |
22 | #include "types.h" |
460b9539 |
23 | |
24 | #include <stdio.h> |
25 | #include <errno.h> |
26 | #include <stdlib.h> |
27 | #include <sys/types.h> |
28 | #include <sys/socket.h> |
29 | #include <locale.h> |
30 | #include <string.h> |
31 | #include <stdarg.h> |
32 | |
33 | #include "client.h" |
34 | #include "sink.h" |
35 | #include "cgi.h" |
36 | #include "dcgi.h" |
37 | #include "mem.h" |
38 | #include "log.h" |
39 | #include "configuration.h" |
40 | #include "disorder.h" |
41 | #include "api-client.h" |
fdf98378 |
42 | #include "mime.h" |
b64c2805 |
43 | #include "printf.h" |
44 | |
45 | /** @brief Infer the base URL for the web interface if it's not set |
46 | * |
47 | * See <a href="http://tools.ietf.org/html/rfc3875">RFC 3875</a>. |
48 | */ |
49 | static void infer_url(void) { |
50 | if(!config->url) { |
51 | const char *scheme = "http", *server, *script, *e; |
52 | int port; |
53 | |
54 | /* Figure out the server. 'MUST' be set and we don't cope if it |
55 | * is not. */ |
56 | if(!(server = getenv("SERVER_NAME"))) |
57 | fatal(0, "SERVER_NAME is not set"); |
58 | server = xstrdup(server); |
59 | |
60 | /* Figure out the port. 'MUST' be set but we cope if it is not. */ |
61 | if((e = getenv("SERVER_PORT"))) |
62 | port = atoi(e); |
63 | else |
64 | port = 80; |
65 | |
66 | /* Figure out path to ourselves */ |
67 | if(!(script = getenv("SCRIPT_NAME"))) |
68 | fatal(0, "SCRIPT_NAME is not set"); |
69 | if(script[0] != '/') |
70 | fatal(0, "SCRIPT_NAME does not start with a '/'"); |
71 | script = xstrdup(script); |
72 | |
73 | if(port == 80) |
74 | byte_xasprintf(&config->url, "%s://%s%s", |
75 | scheme, server, script); |
76 | else |
77 | byte_xasprintf(&config->url, "%s://%s:%d%s", |
78 | scheme, server, port, script); |
79 | } |
80 | } |
fdf98378 |
81 | |
460b9539 |
82 | int main(int argc, char **argv) { |
fdf98378 |
83 | const char *cookie_env, *conf; |
460b9539 |
84 | dcgi_global g; |
85 | dcgi_state s; |
86 | cgi_sink output; |
fdf98378 |
87 | int n; |
88 | struct cookiedata cd; |
460b9539 |
89 | |
460b9539 |
90 | if(argc > 0) progname = argv[0]; |
91 | cgi_parse(); |
92 | if((conf = getenv("DISORDER_CONFIG"))) configfile = xstrdup(conf); |
93 | if(getenv("DISORDER_DEBUG")) debugging = 1; |
c00fce3a |
94 | if(config_read(0)) exit(EXIT_FAILURE); |
b64c2805 |
95 | infer_url(); |
460b9539 |
96 | memset(&g, 0, sizeof g); |
97 | memset(&s, 0, sizeof s); |
98 | s.g = &g; |
99 | g.client = disorder_get_client(); |
100 | output.quote = 1; |
b64c2805 |
101 | output.sink = sink_stdio("stdout", stdout); |
fdf98378 |
102 | /* See if there's a cookie */ |
103 | cookie_env = getenv("HTTP_COOKIE"); |
104 | if(cookie_env) { |
105 | /* This will be an HTTP header */ |
106 | if(!parse_cookie(cookie_env, &cd)) { |
107 | for(n = 0; n < cd.ncookies |
108 | && strcmp(cd.cookies[n].name, "disorder"); ++n) |
109 | ; |
110 | if(n < cd.ncookies) |
111 | login_cookie = cd.cookies[n].value; |
112 | } |
460b9539 |
113 | } |
fdf98378 |
114 | /* Log in with the cookie if possible otherwise as guest */ |
115 | if(disorder_connect_cookie(g.client, login_cookie)) { |
116 | disorder_cgi_error(&output, &s, "connect"); |
460b9539 |
117 | return 0; |
118 | } |
b64c2805 |
119 | /* TODO RFC 3875 s8.2 recommendations e.g. concerning PATH_INFO */ |
460b9539 |
120 | disorder_cgi(&output, &s); |
121 | if(fclose(stdout) < 0) fatal(errno, "error closing stdout"); |
122 | return 0; |
123 | } |
124 | |
125 | /* |
126 | Local Variables: |
127 | c-basic-offset:2 |
128 | comment-column:40 |
129 | End: |
130 | */ |