chiark - git - mdw - disorder/blob - cgi/cgimain.c

   1 /*
   2  * This file is part of DisOrder.
   3  * Copyright (C) 2004, 2005, 2007, 2008 Richard Kettlewell
   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 3 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,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU 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, see <http://www.gnu.org/licenses/>.
  17  */
  18 /** @file cgi/cgimain.c
  19  * @brief DisOrder CGI
  20  */
  21
  22 #include "disorder-cgi.h"
  23
  24 int main(int argc, char **argv) {
  25   const char *conf;
  26
  27   if(argc > 0)
  28     progname = argv[0];
  29   /* RFC 3875 s8.2 recommends rejecting PATH_INFO if we don't make use of
  30    * it. */
  31   if(!setlocale(LC_CTYPE, "")) disorder_error(errno, "error calling setlocale");
  32   /* TODO we could make disorder/ACTION equivalent to disorder?action=ACTION */
  33   if(getenv("PATH_INFO")) {
  34     /* TODO it might be nice to link back to the right place... */
  35     printf("Content-Type: text/html; charset=UTF-8\n");
  36     printf("Status: 404\n");
  37     printf("\n");
  38     printf("<p>Sorry, is PATH_INFO not supported."
  39            "<a href=\"%s\">Try here instead.</a></p>\n",
  40            cgi_sgmlquote(infer_url(0/*!include_path_info*/)));
  41     exit(0);
  42   }
  43   /* Parse CGI arguments */
  44   cgi_init();
  45   /* We allow various things to be overridden from the environment.  This is
  46    * intended for debugging and is not a documented feature. */
  47   if((conf = getenv("DISORDER_CONFIG")))
  48     configfile = xstrdup(conf);
  49   if(getenv("DISORDER_DEBUG"))
  50     debugging = 1;
  51   /* Read configuration */
  52   if(config_read(0/*!server*/, NULL))
  53     exit(EXIT_FAILURE);
  54   /* Figure out our URL.  This can still be overridden from the config file if
  55    * necessary but it shouldn't be necessary in ordinary installations. */
  56   if(!config->url)
  57     config->url = infer_url(1/*include_path_info*/);
  58   /* Pick up the cookie, if there is one */
  59   dcgi_get_cookie();
  60   /* Register expansions */
  61   mx_register_builtin();
  62   dcgi_expansions();
  63   /* Update search path.  We look in the config directory first and the data
  64    * directory second, so that the latter overrides the former. */
  65   mx_search_path(pkgconfdir);
  66   mx_search_path(pkgdatadir);
  67   /* Never cache anythging */
  68   if(printf("Cache-Control: no-cache\n") < 0)
  69     disorder_fatal(errno, "error writing to stdout");
  70   /* Create the initial connection, trying the cookie if we found a suitable
  71    * one. */
  72   dcgi_login();
  73   /* Do whatever the user wanted */
  74   dcgi_action(NULL);
  75   /* In practice if a write fails that probably means the web server went away,
  76    * but we log it anyway. */
  77   if(fclose(stdout) < 0)
  78     disorder_fatal(errno, "error closing stdout");
  79   return 0;
  80 }
  81
  82 /*
  83 Local Variables:
  84 c-basic-offset:2
  85 comment-column:40
  86 fill-column:79
  87 indent-tabs-mode:nil
  88 End:
  89 */