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

   1 /*
   2  * This file is part of DisOrder.
   3  * Copyright (C) 2004-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 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>
  22 #include "types.h"
  23
  24 #include <string.h>
  25 #include <stdio.h>
  26 #include <unistd.h>
  27 #include <stdlib.h>
  28 #include <errno.h>
  29 #include <sys/stat.h>
  30 #include <stddef.h>
  31 #include <fcntl.h>
  32 #include <unistd.h>
  33 #include <pcre.h>
  34 #include <limits.h>
  35 #include <fnmatch.h>
  36 #include <ctype.h>
  37
  38 #include "mem.h"
  39 #include "log.h"
  40 #include "hex.h"
  41 #include "charset.h"
  42 #include "configuration.h"
  43 #include "table.h"
  44 #include "syscalls.h"
  45 #include "kvp.h"
  46 #include "vector.h"
  47 #include "split.h"
  48 #include "inputline.h"
  49 #include "regsub.h"
  50 #include "defs.h"
  51 #include "sink.h"
  52 #include "server-cgi.h"
  53 #include "printf.h"
  54 #include "mime.h"
  55 #include "unicode.h"
  56 #include "hash.h"
  57
  58 struct kvp *cgi_args;
  59
  60 /* options */
  61 struct column {
  62   struct column *next;
  63   char *name;
  64   int ncolumns;
  65   char **columns;
  66 };
  67
  68 /* macros */
  69 struct cgi_macro {
  70   int nargs;
  71   char **args;
  72   const char *value;
  73 };
  74
  75 #define RELIST(x) struct re *x, **x##_tail = &x
  76
  77 static int have_read_options;
  78 static struct kvp *labels;
  79 static struct column *columns;
  80
  81 static void include_options(const char *name);
  82 static void cgi_expand_parsed(const char *name,
  83                               struct cgi_element *head,
  84                               const struct cgi_expansion *expansions,
  85                               size_t nexpansions,
  86                               cgi_1sink *output,
  87                               void *u);
  88
  89 void cgi_header(struct sink *output, const char *name, const char *value) {
  90   sink_printf(output, "%s: %s\r\n", name, value);
  91 }
  92
  93 void cgi_body(struct sink *output) {
  94   sink_printf(output, "\r\n");
  95 }
  96
  97 const char *cgi_label(const char *key) {
  98   const char *label;
  99
 100   read_options();
 101   if(!(label = kvp_get(labels, key))) {
 102     /* No label found */
 103     if(!strncmp(key, "images.", 7)) {
 104       static const char *url_static;
 105       /* images.X defaults to <url.static>X.png */
 106
 107       if(!url_static)
 108         url_static = cgi_label("url.static");
 109       byte_xasprintf((char **)&label, "%s%s.png", url_static, key + 7);
 110     } else if((label = strchr(key, '.')))
 111       /* X.Y defaults to Y */
 112       ++label;
 113     else
 114       /* otherwise default to label name */
 115       label = key;
 116   }
 117   return label;
 118 }
 119
 120 int cgi_label_exists(const char *key) {
 121   read_options();
 122   return kvp_get(labels, key) ? 1 : 0;
 123 }
 124
 125 char **cgi_columns(const char *name, int *ncolumns) {
 126   struct column *c;
 127
 128   read_options();
 129   for(c = columns; c && strcmp(name, c->name); c = c->next)
 130     ;
 131   if(c) {
 132     if(ncolumns)
 133       *ncolumns = c->ncolumns;
 134     return c->columns;
 135   } else {
 136     if(ncolumns)
 137       *ncolumns = 0;
 138     return 0;
 139   }
 140 }
 141
 142 /*
 143 Local Variables:
 144 c-basic-offset:2
 145 comment-column:40
 146 End:
 147 */