[BACK]Return to cgi.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / mandoc

Diff for /mandoc/cgi.c between version 1.24 and 1.32

version 1.24, 2011/12/10 21:51:07 version 1.32, 2011/12/15 12:05:19
Line 67  struct query {
Line 67  struct query {
         const char      *arch; /* architecture */          const char      *arch; /* architecture */
         const char      *sec; /* manual section */          const char      *sec; /* manual section */
         const char      *expr; /* unparsed expression string */          const char      *expr; /* unparsed expression string */
           int              manroot; /* manroot index (or -1)*/
         int              whatis; /* whether whatis mode */          int              whatis; /* whether whatis mode */
         int              legacy; /* whether legacy mode */          int              legacy; /* whether legacy mode */
 };  };
Line 79  struct req {
Line 80  struct req {
 };  };
   
 static  int              atou(const char *, unsigned *);  static  int              atou(const char *, unsigned *);
 static  void             catman(const char *);  static  void             catman(const struct req *, const char *);
 static  int              cmp(const void *, const void *);  static  int              cmp(const void *, const void *);
 static  void             format(const char *);  static  void             format(const struct req *, const char *);
 static  void             html_print(const char *);  static  void             html_print(const char *);
 static  void             html_putchar(char);  static  void             html_putchar(char);
 static  int              http_decode(char *);  static  int              http_decode(char *);
 static  void             http_parse(struct query *, char *);  static  void             http_parse(struct req *, char *);
 static  int              pathstop(DIR *);  static  int              pathstop(DIR *);
 static  void             pathgen(DIR *, char *, struct req *);  static  void             pathgen(DIR *, char *, struct req *);
 static  void             pg_index(const struct req *, char *);  static  void             pg_index(const struct req *, char *);
Line 102  static void   resp_index(const struct req *);
Line 103  static void   resp_index(const struct req *);
 static  void             resp_search(struct res *, size_t, void *);  static  void             resp_search(struct res *, size_t, void *);
 static  void             resp_searchform(const struct req *);  static  void             resp_searchform(const struct req *);
   
 static  const char       *progname;  static  const char       *progname; /* cgi script name */
 static  const char       *cache;  static  const char       *cache; /* cache directory */
 static  const char       *host;  static  const char       *css; /* css directory */
   static  const char       *host; /* hostname */
   
 static  const char * const pages[PAGE__MAX] = {  static  const char * const pages[PAGE__MAX] = {
         "index", /* PAGE_INDEX */          "index", /* PAGE_INDEX */
Line 182  html_print(const char *p)
Line 184  html_print(const char *p)
  * uses only GET for simplicity.   * uses only GET for simplicity.
  */   */
 static void  static void
 http_parse(struct query *q, char *p)  http_parse(struct req *req, char *p)
 {  {
         char            *key, *val;          char            *key, *val, *manroot;
         size_t           sz;          size_t           sz;
         int              legacy;          int              i, legacy;
   
         memset(q, 0, sizeof(struct query));          memset(&req->q, 0, sizeof(struct query));
   
         q->whatis = 1;          req->q.whatis = 1;
         legacy = -1;          legacy = -1;
           manroot = NULL;
   
         while (p && '\0' != *p) {          while (p && '\0' != *p) {
                 while (' ' == *p)                  while (' ' == *p)
Line 232  http_parse(struct query *q, char *p)
Line 235  http_parse(struct query *q, char *p)
                         break;                          break;
   
                 if (0 == strcmp(key, "expr"))                  if (0 == strcmp(key, "expr"))
                         q->expr = val;                          req->q.expr = val;
                 else if (0 == strcmp(key, "query"))                  else if (0 == strcmp(key, "query"))
                         q->expr = val;                          req->q.expr = val;
                 else if (0 == strcmp(key, "sec"))                  else if (0 == strcmp(key, "sec"))
                         q->sec = val;                          req->q.sec = val;
                 else if (0 == strcmp(key, "sektion"))                  else if (0 == strcmp(key, "sektion"))
                         q->sec = val;                          req->q.sec = val;
                 else if (0 == strcmp(key, "arch"))                  else if (0 == strcmp(key, "arch"))
                         q->arch = val;                          req->q.arch = val;
                   else if (0 == strcmp(key, "manpath"))
                           manroot = val;
                 else if (0 == strcmp(key, "apropos"))                  else if (0 == strcmp(key, "apropos"))
                         legacy = 0 == strcmp(val, "0");                          legacy = 0 == strcmp(val, "0");
                 else if (0 == strcmp(key, "op"))                  else if (0 == strcmp(key, "op"))
                         q->whatis = 0 == strcasecmp(val, "whatis");                          req->q.whatis = 0 == strcasecmp(val, "whatis");
         }          }
   
         /* Test for old man.cgi compatibility mode. */          /* Test for old man.cgi compatibility mode. */
   
         if (legacy == 0) {          if (legacy == 0) {
                 q->whatis = 0;                  req->q.whatis = 0;
                 q->legacy = 1;                  req->q.legacy = 1;
         } else if (legacy > 0) {          } else if (legacy > 0) {
                 q->legacy = 1;                  req->q.legacy = 1;
                 q->whatis = 1;                  req->q.whatis = 1;
         }          }
   
         /*          /*
Line 262  http_parse(struct query *q, char *p)
Line 267  http_parse(struct query *q, char *p)
          * For some man.cgi scripts, "default" arch is none.           * For some man.cgi scripts, "default" arch is none.
          */           */
   
         if (q->legacy && NULL != q->sec)          if (req->q.legacy && NULL != req->q.sec)
                 if (0 == strcmp(q->sec, "0"))                  if (0 == strcmp(req->q.sec, "0"))
                         q->sec = NULL;                          req->q.sec = NULL;
         if (q->legacy && NULL != q->arch)          if (req->q.legacy && NULL != req->q.arch)
                 if (0 == strcmp(q->arch, "default"))                  if (0 == strcmp(req->q.arch, "default"))
                         q->arch = NULL;                          req->q.arch = NULL;
   
           /* Default to first manroot. */
   
           if (NULL != manroot) {
                   for (i = 0; i < (int)req->psz; i++)
                           if (0 == strcmp(req->p[i].name, manroot))
                                   break;
                   req->q.manroot = i < (int)req->psz ? i : -1;
           }
 }  }
   
 /*  /*
Line 325  resp_begin_html(int code, const char *msg)
Line 339  resp_begin_html(int code, const char *msg)
   
         resp_begin_http(code, msg);          resp_begin_http(code, msg);
   
         puts("<!DOCTYPE HTML PUBLIC "          printf("<!DOCTYPE HTML PUBLIC "
              " \"-//W3C//DTD HTML 4.01//EN\""                 " \"-//W3C//DTD HTML 4.01//EN\""
              " \"http://www.w3.org/TR/html4/strict.dtd\">\n"                 " \"http://www.w3.org/TR/html4/strict.dtd\">\n"
              "<HTML>\n"                 "<HTML>\n"
              "<HEAD>\n"                 "<HEAD>\n"
              "<META HTTP-EQUIV=\"Content-Type\""                 "<META HTTP-EQUIV=\"Content-Type\""
              " CONTENT=\"text/html; charset=utf-8\">\n"                 " CONTENT=\"text/html; charset=utf-8\">\n"
              "<LINK REL=\"stylesheet\" HREF=\"/man.cgi.css\""                 "<LINK REL=\"stylesheet\" HREF=\"%s/man-cgi.css\""
              " TYPE=\"text/css\" media=\"all\">\n"                 " TYPE=\"text/css\" media=\"all\">\n"
              "<TITLE>System Manpage Reference</TITLE>\n"                 "<LINK REL=\"stylesheet\" HREF=\"%s/man.css\""
              "</HEAD>\n"                 " TYPE=\"text/css\" media=\"all\">\n"
              "<BODY>\n"                 "<TITLE>System Manpage Reference</TITLE>\n"
              "<!-- Begin page content. //-->");                 "</HEAD>\n"
                  "<BODY>\n"
                  "<!-- Begin page content. //-->\n", css, css);
 }  }
   
 static void  static void
Line 351  resp_end_html(void)
Line 367  resp_end_html(void)
 static void  static void
 resp_searchform(const struct req *req)  resp_searchform(const struct req *req)
 {  {
           int              i;
   
         puts("<!-- Begin search form. //-->");          puts("<!-- Begin search form. //-->");
         printf("<FORM ACTION=\"");          printf("<DIV ID=\"mancgi\">\n"
         html_print(progname);                 "<FORM ACTION=\"%s/search.html\" METHOD=\"get\">\n"
         printf("/search.html\" METHOD=\"get\">\n");                 "<FIELDSET>\n"
         printf("<FIELDSET>\n"  
                "<LEGEND>Search Parameters</LEGEND>\n"                 "<LEGEND>Search Parameters</LEGEND>\n"
                "<INPUT TYPE=\"submit\" NAME=\"op\""                 "<INPUT TYPE=\"submit\" NAME=\"op\""
                " VALUE=\"Whatis\"> or \n"                 " VALUE=\"Whatis\"> or \n"
                "<INPUT TYPE=\"submit\" NAME=\"op\""                 "<INPUT TYPE=\"submit\" NAME=\"op\""
                " VALUE=\"apropos\"> for manuals satisfying \n"                 " VALUE=\"apropos\"> for manuals satisfying \n"
                "<INPUT TYPE=\"text\" NAME=\"expr\" VALUE=\"");                 "<INPUT TYPE=\"text\" NAME=\"expr\" VALUE=\"",
                  progname);
         html_print(req->q.expr ? req->q.expr : "");          html_print(req->q.expr ? req->q.expr : "");
         printf("\">, section "          printf("\">, section "
                "<INPUT TYPE=\"text\""                 "<INPUT TYPE=\"text\""
Line 372  resp_searchform(const struct req *req)
Line 389  resp_searchform(const struct req *req)
                "<INPUT TYPE=\"text\""                 "<INPUT TYPE=\"text\""
                " SIZE=\"8\" NAME=\"arch\" VALUE=\"");                 " SIZE=\"8\" NAME=\"arch\" VALUE=\"");
         html_print(req->q.arch ? req->q.arch : "");          html_print(req->q.arch ? req->q.arch : "");
         puts("\">.\n"          printf("\">");
           if (req->psz > 1) {
                   puts(", <SELECT NAME=\"manpath\">");
                   for (i = 0; i < (int)req->psz; i++) {
                           printf("<OPTION %s VALUE=\"",
                                   (i == req->q.manroot) ||
                                   (0 == i && -1 == req->q.manroot) ?
                                   "SELECTED=\"selected\"" : "");
                           html_print(req->p[i].name);
                           printf("\">");
                           html_print(req->p[i].name);
                           puts("</OPTION>");
                   }
                   puts("</SELECT>");
           }
           puts(".\n"
              "<INPUT TYPE=\"reset\" VALUE=\"Reset\">\n"               "<INPUT TYPE=\"reset\" VALUE=\"Reset\">\n"
              "</FIELDSET>\n"               "</FIELDSET>\n"
              "</FORM>");               "</FORM>\n"
                "</DIV>");
         puts("<!-- End search form. //-->");          puts("<!-- End search form. //-->");
 }  }
   
Line 443  resp_search(struct res *r, size_t sz, void *arg)
Line 476  resp_search(struct res *r, size_t sz, void *arg)
         int               i;          int               i;
         const struct req *req;          const struct req *req;
   
           req = (const struct req *)arg;
           assert(req->q.manroot >= 0);
   
         if (1 == sz) {          if (1 == sz) {
                 /*                  /*
                  * If we have just one result, then jump there now                   * If we have just one result, then jump there now
                  * without any delay.                   * without any delay.
                  */                   */
                 puts("Status: 303 See Other");                  puts("Status: 303 See Other");
                 printf("Location: http://%s%s/show/%u/%u.html\n",                  printf("Location: http://%s%s/show/%d/%u/%u.html\n",
                                 host, progname,                                  host, progname, req->q.manroot,
                                 r[0].volume, r[0].rec);                                  r[0].volume, r[0].rec);
                 puts("Content-Type: text/html; charset=utf-8\n");                  puts("Content-Type: text/html; charset=utf-8\n");
                 return;                  return;
Line 459  resp_search(struct res *r, size_t sz, void *arg)
Line 495  resp_search(struct res *r, size_t sz, void *arg)
         qsort(r, sz, sizeof(struct res), cmp);          qsort(r, sz, sizeof(struct res), cmp);
   
         resp_begin_html(200, NULL);          resp_begin_html(200, NULL);
   
         req = (const struct req *)arg;  
         resp_searchform(req);          resp_searchform(req);
   
         if (0 == sz) {          if (0 == sz) {
Line 468  resp_search(struct res *r, size_t sz, void *arg)
Line 502  resp_search(struct res *r, size_t sz, void *arg)
                        "No %s results found.\n",                         "No %s results found.\n",
                        req->q.whatis ? "whatis" : "apropos");                         req->q.whatis ? "whatis" : "apropos");
                 if (req->q.whatis) {                  if (req->q.whatis) {
                         printf("(Try <A HREF=\"");                          printf("(Try <A HREF=\"%s/search.html?"
                         html_print(progname);                                 "op=apropos&amp;expr=", progname);
                         printf("/search.html?op=apropos&amp;expr=");  
                         html_print(req->q.expr ? req->q.expr : "");                          html_print(req->q.expr ? req->q.expr : "");
                         printf("&amp;sec=");                          printf("&amp;sec=");
                         html_print(req->q.sec ? req->q.sec : "");                          html_print(req->q.sec ? req->q.sec : "");
Line 489  resp_search(struct res *r, size_t sz, void *arg)
Line 522  resp_search(struct res *r, size_t sz, void *arg)
         for (i = 0; i < (int)sz; i++) {          for (i = 0; i < (int)sz; i++) {
                 printf("<TR>\n"                  printf("<TR>\n"
                        "<TD CLASS=\"title\">\n"                         "<TD CLASS=\"title\">\n"
                        "<A HREF=\"");                         "<A HREF=\"%s/show/%d/%u/%u.html\">",
                 html_print(progname);                                  progname, req->q.manroot,
                 printf("/show/%u/%u.html\">", r[i].volume, r[i].rec);                                  r[i].volume, r[i].rec);
                 html_print(r[i].title);                  html_print(r[i].title);
                 putchar('(');                  putchar('(');
                 html_print(r[i].cat);                  html_print(r[i].cat);
Line 520  pg_index(const struct req *req, char *path)
Line 553  pg_index(const struct req *req, char *path)
 }  }
   
 static void  static void
 catman(const char *file)  catman(const struct req *req, const char *file)
 {  {
         FILE            *f;          FILE            *f;
         size_t           len;          size_t           len;
Line 533  catman(const char *file)
Line 566  catman(const char *file)
                 return;                  return;
         }          }
   
         resp_begin_http(200, NULL);          resp_begin_html(200, NULL);
         puts("<!DOCTYPE HTML PUBLIC "          resp_searchform(req);
              " \"-//W3C//DTD HTML 4.01//EN\""          puts("<DIV CLASS=\"catman\">\n"
              " \"http://www.w3.org/TR/html4/strict.dtd\">\n"  
              "<HTML>\n"  
              "<HEAD>\n"  
              "<META HTTP-EQUIV=\"Content-Type\""  
              " CONTENT=\"text/html; charset=utf-8\">\n"  
              "<LINK REL=\"stylesheet\" HREF=\"/catman.css\""  
              " TYPE=\"text/css\" media=\"all\">\n"  
              "<TITLE>System Manpage Reference</TITLE>\n"  
              "</HEAD>\n"  
              "<BODY>\n"  
              "<!-- Begin page content. //-->\n"  
              "<PRE>");               "<PRE>");
   
         while (NULL != (p = fgetln(f, &len))) {          while (NULL != (p = fgetln(f, &len))) {
Line 659  catman(const char *file)
Line 681  catman(const char *file)
         }          }
   
         puts("</PRE>\n"          puts("</PRE>\n"
                "</DIV>\n"
              "</BODY>\n"               "</BODY>\n"
              "</HTML>");               "</HTML>");
   
Line 666  catman(const char *file)
Line 689  catman(const char *file)
 }  }
   
 static void  static void
 format(const char *file)  format(const struct req *req, const char *file)
 {  {
         struct mparse   *mp;          struct mparse   *mp;
         int              fd;          int              fd;
Line 690  format(const char *file)
Line 713  format(const char *file)
                 return;                  return;
         }          }
   
         snprintf(opts, sizeof(opts), "style=/man.css,"          snprintf(opts, sizeof(opts), "fragment,"
                         "man=%s/search.html?sec=%%S&expr=%%N,"                          "man=%s/search.html?sec=%%S&expr=%%N,"
                         /*"includes=/cgi-bin/man.cgi/usr/include/%%I"*/,                          /*"includes=/cgi-bin/man.cgi/usr/include/%%I"*/,
                         progname);                          progname);
   
         mparse_result(mp, &mdoc, &man);          mparse_result(mp, &mdoc, &man);
           if (NULL == man && NULL == mdoc) {
                   resp_baddb();
                   mparse_free(mp);
                   return;
           }
   
           resp_begin_html(200, NULL);
           resp_searchform(req);
   
         vp = html_alloc(opts);          vp = html_alloc(opts);
   
         if (NULL != mdoc) {          if (NULL != mdoc)
                 resp_begin_http(200, NULL);  
                 html_mdoc(vp, mdoc);                  html_mdoc(vp, mdoc);
         } else if (NULL != man) {          else
                 resp_begin_http(200, NULL);  
                 html_man(vp, man);                  html_man(vp, man);
         } else  
                 resp_baddb();  
   
           puts("</BODY>\n"
                "</HTML>");
   
         html_free(vp);          html_free(vp);
         mparse_free(mp);          mparse_free(mp);
 }  }
Line 719  pg_show(const struct req *req, char *path)
Line 750  pg_show(const struct req *req, char *path)
         char             file[MAXPATHLEN];          char             file[MAXPATHLEN];
         const char      *fn, *cp;          const char      *fn, *cp;
         int              rc;          int              rc;
         unsigned int     vol, rec;          unsigned int     vol, rec, mr;
         DB              *idx;          DB              *idx;
         DBT              key, val;          DBT              key, val;
   
         idx = NULL;          idx = NULL;
   
         if (0 == req->psz || NULL == path) {          /* Parse out mroot, volume, and record from the path. */
   
           if (NULL == path || NULL == (sub = strchr(path, '/'))) {
                 resp_error400();                  resp_error400();
                 return;                  return;
         } else if (NULL == (sub = strrchr(path, '/'))) {          }
           *sub++ = '\0';
           if ( ! atou(path, &mr)) {
                 resp_error400();                  resp_error400();
                 return;                  return;
         } else          }
                 *sub++ = '\0';          path = sub;
           if (NULL == (sub = strchr(path, '/'))) {
                   resp_error400();
                   return;
           }
           *sub++ = '\0';
           if ( ! atou(path, &vol) || ! atou(sub, &rec)) {
                   resp_error400();
                   return;
           } else if (mr >= (unsigned int)req->psz) {
                   resp_error400();
                   return;
           }
   
         /*          /*
          * Begin by chdir()ing into the root of the manpath.           * Begin by chdir()ing into the manroot.
          * This way we can pick up the database files, which are           * This way we can pick up the database files, which are
          * relative to the manpath root.           * relative to the manpath root.
          */           */
   
         if (-1 == chdir(req->p[0].path)) {          if (-1 == chdir(req->p[(int)mr].path)) {
                 perror(req->p[0].path);                  perror(req->p[(int)mr].path);
                 resp_error400();                  resp_baddb();
                 return;                  return;
         }          }
   
         memset(&ps, 0, sizeof(struct manpaths));          memset(&ps, 0, sizeof(struct manpaths));
         manpath_manconf("etc/catman.conf", &ps);          manpath_manconf(&ps, "etc/catman.conf");
   
         if ( ! (atou(path, &vol) && atou(sub, &rec))) {          if (vol >= (unsigned int)ps.sz) {
                 resp_error400();                  resp_error400();
                 goto out;                  goto out;
         } else if (vol >= (unsigned int)ps.sz) {  
                 resp_error400();  
                 goto out;  
         }          }
   
         strlcpy(file, ps.paths[vol], MAXPATHLEN);          strlcpy(file, ps.paths[vol], MAXPATHLEN);
Line 787  pg_show(const struct req *req, char *path)
Line 831  pg_show(const struct req *req, char *path)
                 resp_baddb();                  resp_baddb();
         else {          else {
                 if (0 == strcmp(cp, "cat"))                  if (0 == strcmp(cp, "cat"))
                         catman(fn + 1);                          catman(req, fn + 1);
                 else                  else
                         format(fn + 1);                          format(req, fn + 1);
         }          }
 out:  out:
         if (idx)          if (idx)
Line 808  pg_search(const struct req *req, char *path)
Line 852  pg_search(const struct req *req, char *path)
         struct opts       opt;          struct opts       opt;
         struct expr      *expr;          struct expr      *expr;
   
         if (0 == req->psz) {          if (req->q.manroot < 0 || 0 == req->psz) {
                 resp_search(NULL, 0, (void *)req);                  resp_search(NULL, 0, (void *)req);
                 return;                  return;
         }          }
Line 828  pg_search(const struct req *req, char *path)
Line 872  pg_search(const struct req *req, char *path)
          * relative to the manpath root.           * relative to the manpath root.
          */           */
   
         if (-1 == (chdir(req->p[0].path))) {          assert(req->q.manroot < (int)req->psz);
                 perror(req->p[0].path);          if (-1 == (chdir(req->p[req->q.manroot].path))) {
                   perror(req->p[req->q.manroot].path);
                 resp_search(NULL, 0, (void *)req);                  resp_search(NULL, 0, (void *)req);
                 return;                  return;
         }          }
   
         memset(&ps, 0, sizeof(struct manpaths));          memset(&ps, 0, sizeof(struct manpaths));
         manpath_manconf("etc/catman.conf", &ps);          manpath_manconf(&ps, "etc/catman.conf");
   
         /*          /*
          * Poor man's tokenisation: just break apart by spaces.           * Poor man's tokenisation: just break apart by spaces.
Line 896  main(void)
Line 941  main(void)
   
         /* Scan our run-time environment. */          /* Scan our run-time environment. */
   
         progname = getenv("SCRIPT_NAME");          if (NULL == (cache = getenv("CACHE_DIR")))
         if (NULL == progname)                  cache = "/cache/man.cgi";
   
           if (NULL == (progname = getenv("SCRIPT_NAME")))
                 progname = "";                  progname = "";
   
         cache = getenv("CACHE_DIR");          if (NULL == (css = getenv("CSS_DIR")))
         if (NULL == cache)                  css = "";
                 cache = "/cache/man.cgi";  
   
         host = getenv("HTTP_HOST");          if (NULL == (host = getenv("HTTP_HOST")))
         if (NULL == host)  
                 host = "localhost";                  host = "localhost";
   
         /*          /*
Line 933  main(void)
Line 978  main(void)
         /* Next parse out the query string. */          /* Next parse out the query string. */
   
         if (NULL != (p = getenv("QUERY_STRING")))          if (NULL != (p = getenv("QUERY_STRING")))
                 http_parse(&req.q, p);                  http_parse(&req, p);
   
         /*          /*
          * Now juggle paths to extract information.           * Now juggle paths to extract information.
Line 1070  pathgen(DIR *dir, char *path, struct req *req)
Line 1115  pathgen(DIR *dir, char *path, struct req *req)
   
         if (rc > 0) {          if (rc > 0) {
                 /* This also strips the trailing slash. */                  /* This also strips the trailing slash. */
                 path[(int)sz - 1] = '\0';                  path[(int)--sz] = '\0';
                 req->p = mandoc_realloc                  req->p = mandoc_realloc
                         (req->p,                          (req->p,
                          (req->psz + 1) * sizeof(struct paths));                           (req->psz + 1) * sizeof(struct paths));
                   /*
                    * Strip out the leading "./" unless we're just a ".",
                    * in which case use an empty string as our name.
                    */
                 req->p[(int)req->psz].path = mandoc_strdup(path);                  req->p[(int)req->psz].path = mandoc_strdup(path);
                 /* And this strips out the leading "./". */  
                 req->p[(int)req->psz].name =                  req->p[(int)req->psz].name =
                         cp = mandoc_strdup(path + 2);                          cp = mandoc_strdup(path + (1 == sz ? 1 : 2));
                 req->psz++;                  req->psz++;
                 /*                  /*
                  * The name is just the path with all the slashes taken                   * The name is just the path with all the slashes taken
Legend:
Removed from v.1.24  
changed lines
  Added in v.1.32
CVSweb