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

Diff for /mandoc/cgi.c between version 1.29 and 1.41

version 1.29, 2011/12/11 00:22:47 version 1.41, 2012/03/24 00:31:55
Line 41 
Line 41 
 #include "man.h"  #include "man.h"
 #include "main.h"  #include "main.h"
 #include "manpath.h"  #include "manpath.h"
   #include "mandocdb.h"
   
 #ifdef __linux__  #ifdef __linux__
 # include <db_185.h>  # include <db_185.h>
Line 68  struct query {
Line 69  struct query {
         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              manroot; /* manroot index (or -1)*/
         int              whatis; /* whether whatis mode */  
         int              legacy; /* whether legacy mode */          int              legacy; /* whether legacy mode */
 };  };
   
Line 80  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_printquery(const struct req *);
 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 req *, char *);  static  void             http_parse(struct req *, char *);
   static  void             http_print(const char *);
   static  void             http_putchar(char);
   static  void             http_printquery(const struct req *);
 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 130  atou(const char *buf, unsigned *v)
Line 134  atou(const char *buf, unsigned *v)
                 return(0);                  return(0);
         if ((errno == ERANGE && (lval == LONG_MAX ||          if ((errno == ERANGE && (lval == LONG_MAX ||
                                         lval == LONG_MIN)) ||                                          lval == LONG_MIN)) ||
                         (lval > UINT_MAX || lval < 0))                          (lval > INT_MAX || lval < 0))
                 return(0);                  return(0);
   
         *v = (unsigned int)lval;          *v = (unsigned int)lval;
Line 163  html_putchar(char c)
Line 167  html_putchar(char c)
                 break;                  break;
         }          }
 }  }
   static void
   http_printquery(const struct req *req)
   {
   
           printf("&expr=");
           http_print(req->q.expr ? req->q.expr : "");
           printf("&sec=");
           http_print(req->q.sec ? req->q.sec : "");
           printf("&arch=");
           http_print(req->q.arch ? req->q.arch : "");
   }
   
   
   static void
   html_printquery(const struct req *req)
   {
   
           printf("&amp;expr=");
           html_print(req->q.expr ? req->q.expr : "");
           printf("&amp;sec=");
           html_print(req->q.sec ? req->q.sec : "");
           printf("&amp;arch=");
           html_print(req->q.arch ? req->q.arch : "");
   }
   
   static void
   http_print(const char *p)
   {
   
           if (NULL == p)
                   return;
           while ('\0' != *p)
                   http_putchar(*p++);
   }
   
 /*  /*
  * Call through to html_putchar().   * Call through to html_putchar().
  * Accepts NULL strings.   * Accepts NULL strings.
Line 187  static void
Line 225  static void
 http_parse(struct req *req, char *p)  http_parse(struct req *req, char *p)
 {  {
         char            *key, *val, *manroot;          char            *key, *val, *manroot;
         size_t           sz;  
         int              i, legacy;          int              i, legacy;
   
         memset(&req->q, 0, sizeof(struct query));          memset(&req->q, 0, sizeof(struct query));
   
         req->q.whatis = 1;  
         legacy = -1;          legacy = -1;
         manroot = NULL;          manroot = NULL;
   
         while (p && '\0' != *p) {          while ('\0' != *p) {
                 while (' ' == *p)  
                         p++;  
   
                 key = p;                  key = p;
                 val = NULL;                  val = NULL;
   
                 if (NULL != (p = strchr(p, '='))) {                  p += (int)strcspn(p, ";&");
                   if ('\0' != *p)
                         *p++ = '\0';                          *p++ = '\0';
                         val = p;                  if (NULL != (val = strchr(key, '=')))
                           *val++ = '\0';
   
                         sz = strcspn(p, ";&");                  if ('\0' == *key || NULL == val || '\0' == *val)
                         /* LINTED */  
                         p += sz;  
   
                         if ('\0' != *p)  
                                 *p++ = '\0';  
                 } else {  
                         p = key;  
                         sz = strcspn(p, ";&");  
                         /* LINTED */  
                         p += sz;  
   
                         if ('\0' != *p)  
                                 p++;  
                         continue;                          continue;
                 }  
   
                 if ('\0' == *key || '\0' == *val)  
                         continue;  
   
                 /* Just abort handling. */                  /* Just abort handling. */
   
                 if ( ! http_decode(key))                  if ( ! http_decode(key))
                         break;                          break;
                 if ( ! http_decode(val))                  if (NULL != val && ! http_decode(val))
                         break;                          break;
   
                 if (0 == strcmp(key, "expr"))                  if (0 == strcmp(key, "expr"))
Line 248  http_parse(struct req *req, char *p)
Line 266  http_parse(struct req *req, char *p)
                         manroot = val;                          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"))  
                         req->q.whatis = 0 == strcasecmp(val, "whatis");  
         }          }
   
         /* Test for old man.cgi compatibility mode. */          /* Test for old man.cgi compatibility mode. */
   
         if (legacy == 0) {          req->q.legacy = legacy > 0;
                 req->q.whatis = 0;  
                 req->q.legacy = 1;  
         } else if (legacy > 0) {  
                 req->q.legacy = 1;  
                 req->q.whatis = 1;  
         }  
   
         /*          /*
          * Section "0" means no section when in legacy mode.           * Section "0" means no section when in legacy mode.
Line 284  http_parse(struct req *req, char *p)
Line 294  http_parse(struct req *req, char *p)
         }          }
 }  }
   
   static void
   http_putchar(char c)
   {
   
           if (isalnum((unsigned char)c)) {
                   putchar((unsigned char)c);
                   return;
           } else if (' ' == c) {
                   putchar('+');
                   return;
           }
           printf("%%%.2x", c);
   }
   
 /*  /*
  * HTTP-decode a string.  The standard explanation is that this turns   * HTTP-decode a string.  The standard explanation is that this turns
  * "%4e+foo" into "n foo" in the regular way.  This is done in-place   * "%4e+foo" into "n foo" in the regular way.  This is done in-place
Line 346  resp_begin_html(int code, const char *msg)
Line 370  resp_begin_html(int code, const char *msg)
                "<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=\"%s/man.cgi.css\""                 "<LINK REL=\"stylesheet\" HREF=\"%s/man-cgi.css\""
                " TYPE=\"text/css\" media=\"all\">\n"                 " TYPE=\"text/css\" media=\"all\">\n"
                  "<LINK REL=\"stylesheet\" HREF=\"%s/man.css\""
                  " TYPE=\"text/css\" media=\"all\">\n"
                "<TITLE>System Manpage Reference</TITLE>\n"                 "<TITLE>System Manpage Reference</TITLE>\n"
                "</HEAD>\n"                 "</HEAD>\n"
                "<BODY>\n"                 "<BODY>\n"
                "<!-- Begin page content. //-->\n", css);                 "<!-- Begin page content. //-->\n", css, css);
 }  }
   
 static void  static void
Line 368  resp_searchform(const struct req *req)
Line 394  resp_searchform(const struct req *req)
         int              i;          int              i;
   
         puts("<!-- Begin search form. //-->");          puts("<!-- Begin search form. //-->");
         printf("<FORM ACTION=\"%s/search.html\" METHOD=\"get\">\n"          printf("<DIV ID=\"mancgi\">\n"
                  "<FORM ACTION=\"%s/search.html\" METHOD=\"get\">\n"
                "<FIELDSET>\n"                 "<FIELDSET>\n"
                "<LEGEND>Search Parameters</LEGEND>\n"                 "<LEGEND>Search Parameters</LEGEND>\n"
                "<INPUT TYPE=\"submit\" NAME=\"op\""                 "<INPUT TYPE=\"submit\" "
                " VALUE=\"Whatis\"> or \n"                 " VALUE=\"Search\"> for manuals satisfying \n"
                "<INPUT TYPE=\"submit\" NAME=\"op\""  
                " VALUE=\"apropos\"> for manuals satisfying \n"  
                "<INPUT TYPE=\"text\" NAME=\"expr\" VALUE=\"",                 "<INPUT TYPE=\"text\" NAME=\"expr\" VALUE=\"",
                progname);                 progname);
         html_print(req->q.expr ? req->q.expr : "");          html_print(req->q.expr ? req->q.expr : "");
Line 404  resp_searchform(const struct req *req)
Line 429  resp_searchform(const struct req *req)
         puts(".\n"          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 469  resp_baddb(void)
Line 495  resp_baddb(void)
 static void  static void
 resp_search(struct res *r, size_t sz, void *arg)  resp_search(struct res *r, size_t sz, void *arg)
 {  {
         int               i;          size_t           i, matched;
         const struct req *req;          const struct req *req;
   
         req = (const struct req *)arg;          req = (const struct req *)arg;
         assert(req->q.manroot >= 0);  
   
         if (1 == sz) {          if (sz > 0)
                   assert(req->q.manroot >= 0);
   
           for (matched = i = 0; i < sz; i++)
                   if (r[i].matched)
                           matched++;
   
           if (1 == matched) {
                   for (i = 0; i < sz; i++)
                           if (r[i].matched)
                                   break;
                 /*                  /*
                  * 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/%d/%u/%u.html\n",                  printf("Location: http://%s%s/show/%d/%u/%u.html?",
                                 host, progname, req->q.manroot,                                  host, progname, req->q.manroot,
                                 r[0].volume, r[0].rec);                                  r[i].volume, r[i].rec);
                 puts("Content-Type: text/html; charset=utf-8\n");                  http_printquery(req);
                   puts("\n"
                        "Content-Type: text/html; charset=utf-8\n");
                 return;                  return;
         }          }
   
         qsort(r, sz, sizeof(struct res), cmp);  
   
         resp_begin_html(200, NULL);          resp_begin_html(200, NULL);
         resp_searchform(req);          resp_searchform(req);
   
         if (0 == sz) {          puts("<DIV CLASS=\"results\">");
                 printf("<P>\n"  
                        "No %s results found.\n",          if (0 == matched) {
                        req->q.whatis ? "whatis" : "apropos");                  puts("<P>\n"
                 if (req->q.whatis) {                       "No results found.\n"
                         printf("(Try <A HREF=\"%s/search.html?"                       "</P>\n"
                                "op=apropos&amp;expr=", progname);                       "</DIV>");
                         html_print(req->q.expr ? req->q.expr : "");  
                         printf("&amp;sec=");  
                         html_print(req->q.sec ? req->q.sec : "");  
                         printf("&amp;arch=");  
                         html_print(req->q.arch ? req->q.arch : "");  
                         puts("\">apropos</A>?)");  
                 }  
                 puts("</P>");  
                 resp_end_html();                  resp_end_html();
                 return;                  return;
         }          }
   
         puts("<P></P>\n"          qsort(r, sz, sizeof(struct res), cmp);
              "<TABLE>");  
   
         for (i = 0; i < (int)sz; i++) {          puts("<TABLE>");
   
           for (i = 0; i < sz; i++) {
                   if ( ! r[i].matched)
                           continue;
                 printf("<TR>\n"                  printf("<TR>\n"
                        "<TD CLASS=\"title\">\n"                         "<TD CLASS=\"title\">\n"
                        "<A HREF=\"%s/show/%d/%u/%u.html\">",                         "<A HREF=\"%s/show/%d/%u/%u.html?",
                                 progname, req->q.manroot,                                  progname, req->q.manroot,
                                 r[i].volume, r[i].rec);                                  r[i].volume, r[i].rec);
                   html_printquery(req);
                   printf("\">");
                 html_print(r[i].title);                  html_print(r[i].title);
                 putchar('(');                  putchar('(');
                 html_print(r[i].cat);                  html_print(r[i].cat);
Line 536  resp_search(struct res *r, size_t sz, void *arg)
Line 568  resp_search(struct res *r, size_t sz, void *arg)
                      "</TR>");                       "</TR>");
         }          }
   
         puts("</TABLE>");          puts("</TABLE>\n"
                "</DIV>");
         resp_end_html();          resp_end_html();
 }  }
   
Line 549  pg_index(const struct req *req, char *path)
Line 582  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 562  catman(const char *file)
Line 595  catman(const char *file)
                 return;                  return;
         }          }
   
         resp_begin_http(200, NULL);          resp_begin_html(200, NULL);
         printf("<!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"               "<PRE>");
                "<HTML>\n"  
                "<HEAD>\n"  
                "<META HTTP-EQUIV=\"Content-Type\""  
                " CONTENT=\"text/html; charset=utf-8\">\n"  
                "<LINK REL=\"stylesheet\" HREF=\"%s/catman.css\""  
                " TYPE=\"text/css\" media=\"all\">\n"  
                "<TITLE>System Manpage Reference</TITLE>\n"  
                "</HEAD>\n"  
                "<BODY>\n"  
                "<!-- Begin page content. //-->\n"  
                "<PRE>\n", css);  
   
         while (NULL != (p = fgetln(f, &len))) {          while (NULL != (p = fgetln(f, &len))) {
                 bold = italic = 0;                  bold = italic = 0;
Line 688  catman(const char *file)
Line 710  catman(const char *file)
         }          }
   
         puts("</PRE>\n"          puts("</PRE>\n"
                "</DIV>\n"
              "</BODY>\n"               "</BODY>\n"
              "</HTML>");               "</HTML>");
   
Line 695  catman(const char *file)
Line 718  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 719  format(const char *file)
Line 742  format(const char *file)
                 return;                  return;
         }          }
   
         snprintf(opts, sizeof(opts), "style=%s/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"*/,
                         css, 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 744  static void
Line 775  static void
 pg_show(const struct req *req, char *path)  pg_show(const struct req *req, char *path)
 {  {
         struct manpaths  ps;          struct manpaths  ps;
           size_t           sz;
         char            *sub;          char            *sub;
         char             file[MAXPATHLEN];          char             file[MAXPATHLEN];
         const char      *fn, *cp;          const char      *cp;
         int              rc;          int              rc, catm;
         unsigned int     vol, rec, mr;          unsigned int     vol, rec, mr;
         DB              *idx;          DB              *idx;
         DBT              key, val;          DBT              key, val;
Line 792  pg_show(const struct req *req, char *path)
Line 824  pg_show(const struct req *req, char *path)
         }          }
   
         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 (vol >= (unsigned int)ps.sz) {          if (vol >= (unsigned int)ps.sz) {
                 resp_error400();                  resp_error400();
                 goto out;                  goto out;
         }          }
   
         strlcpy(file, ps.paths[vol], MAXPATHLEN);          sz = strlcpy(file, ps.paths[vol], MAXPATHLEN);
         strlcat(file, "/mandoc.index", MAXPATHLEN);          assert(sz < MAXPATHLEN);
           strlcat(file, "/", MAXPATHLEN);
           strlcat(file, MANDOC_IDX, MAXPATHLEN);
   
         /* Open the index recno(3) database. */          /* Open the index recno(3) database. */
   
Line 817  pg_show(const struct req *req, char *path)
Line 851  pg_show(const struct req *req, char *path)
         if (0 != (rc = (*idx->get)(idx, &key, &val, 0))) {          if (0 != (rc = (*idx->get)(idx, &key, &val, 0))) {
                 rc < 0 ? resp_baddb() : resp_error400();                  rc < 0 ? resp_baddb() : resp_error400();
                 goto out;                  goto out;
         }          } else if (0 == val.size) {
                   resp_baddb();
                   goto out;
           }
   
         cp = (char *)val.data;          cp = (char *)val.data;
           catm = 'c' == *cp++;
   
         if (NULL == (fn = memchr(cp, '\0', val.size)))          if (NULL == memchr(cp, '\0', val.size - 1))
                 resp_baddb();                  resp_baddb();
         else if (++fn - cp >= (int)val.size)  
                 resp_baddb();  
         else if (NULL == memchr(fn, '\0', val.size - (fn - cp)))  
                 resp_baddb();  
         else {          else {
                 if (0 == strcmp(cp, "cat"))                  file[(int)sz] = '\0';
                         catman(fn + 1);                  strlcat(file, "/", MAXPATHLEN);
                   strlcat(file, cp, MAXPATHLEN);
                   if (catm)
                           catman(req, file);
                 else                  else
                         format(fn + 1);                          format(req, file);
         }          }
 out:  out:
         if (idx)          if (idx)
Line 842  out:
Line 879  out:
 static void  static void
 pg_search(const struct req *req, char *path)  pg_search(const struct req *req, char *path)
 {  {
         size_t            tt;          size_t            tt, ressz;
         struct manpaths   ps;          struct manpaths   ps;
         int               i, sz, rc;          int               i, sz, rc;
         const char       *ep, *start;          const char       *ep, *start;
           struct res      *res;
         char            **cp;          char            **cp;
         struct opts       opt;          struct opts       opt;
         struct expr      *expr;          struct expr      *expr;
Line 863  pg_search(const struct req *req, char *path)
Line 901  pg_search(const struct req *req, char *path)
         rc       = -1;          rc       = -1;
         sz       = 0;          sz       = 0;
         cp       = NULL;          cp       = NULL;
           ressz    = 0;
           res      = NULL;
   
         /*          /*
          * Begin by chdir()ing into the root of the manpath.           * Begin by chdir()ing into the root of the manpath.
Line 878  pg_search(const struct req *req, char *path)
Line 918  pg_search(const struct req *req, char *path)
         }          }
   
         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 905  pg_search(const struct req *req, char *path)
Line 945  pg_search(const struct req *req, char *path)
          * The resp_search() function is called with the results.           * The resp_search() function is called with the results.
          */           */
   
         expr = req->q.whatis ?          expr = req->q.legacy ?
                 termcomp(sz, cp, &tt) : exprcomp(sz, cp, &tt);                  termcomp(sz, cp, &tt) : exprcomp(sz, cp, &tt);
   
         if (NULL != expr)          if (NULL != expr)
                 rc = apropos_search                  rc = apropos_search
                         (ps.sz, ps.paths, &opt,                          (ps.sz, ps.paths, &opt, expr, tt,
                          expr, tt, (void *)req, resp_search);                           (void *)req, &ressz, &res, resp_search);
   
         /* ...unless errors occured. */          /* ...unless errors occured. */
   
         if (0 == rc)          if (0 == rc)
                 resp_baddb();                  resp_baddb();
         else if (-1 == rc)          else if (-1 == rc)
                 resp_search(NULL, 0, (void *)req);                  resp_search(NULL, 0, NULL);
   
         for (i = 0; i < sz; i++)          for (i = 0; i < sz; i++)
                 free(cp[i]);                  free(cp[i]);
   
         free(cp);          free(cp);
           resfree(res, ressz);
         exprfree(expr);          exprfree(expr);
         manpath_free(&ps);          manpath_free(&ps);
 }  }
Line 946  main(void)
Line 987  main(void)
                 progname = "";                  progname = "";
   
         if (NULL == (css = getenv("CSS_DIR")))          if (NULL == (css = getenv("CSS_DIR")))
                 css = "/";                  css = "";
   
         if (NULL == (host = getenv("HTTP_HOST")))          if (NULL == (host = getenv("HTTP_HOST")))
                 host = "localhost";                  host = "localhost";
Legend:
Removed from v.1.29  
changed lines
  Added in v.1.41
CVSweb