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

Diff for /mandoc/cgi.c between version 1.155 and 1.168

version 1.155, 2017/06/20 17:24:35 version 1.168, 2019/10/01 17:54:14
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2011, 2012 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2011, 2012 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2014, 2015, 2016, 2017 Ingo Schwarze <schwarze@usta.de>   * Copyright (c) 2014-2019 Ingo Schwarze <schwarze@usta.de>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
  * purpose with or without fee is hereby granted, provided that the above   * purpose with or without fee is hereby granted, provided that the above
Line 38 
Line 38 
 #include "roff.h"  #include "roff.h"
 #include "mdoc.h"  #include "mdoc.h"
 #include "man.h"  #include "man.h"
   #include "mandoc_parse.h"
 #include "main.h"  #include "main.h"
 #include "manconf.h"  #include "manconf.h"
 #include "mansearch.h"  #include "mansearch.h"
Line 69  enum focus {
Line 70  enum focus {
 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_encode(const char *p);
 static  void             parse_manpath_conf(struct req *);  static  void             parse_manpath_conf(struct req *);
 static  void             parse_path_info(struct req *req, const char *path);  static  void             parse_path_info(struct req *req, const char *path);
 static  void             parse_query_string(struct req *, const char *);  static  void             parse_query_string(struct req *, const char *);
 static  void             pg_error_badrequest(const char *);  static  void             pg_error_badrequest(const char *);
 static  void             pg_error_internal(void);  static  void             pg_error_internal(void);
 static  void             pg_index(const struct req *);  static  void             pg_index(const struct req *);
 static  void             pg_noresult(const struct req *, const char *);  static  void             pg_noresult(const struct req *, int, const char *,
                                   const char *);
 static  void             pg_redirect(const struct req *, const char *);  static  void             pg_redirect(const struct req *, const char *);
 static  void             pg_search(const struct req *);  static  void             pg_search(const struct req *);
 static  void             pg_searchres(const struct req *,  static  void             pg_searchres(const struct req *,
Line 90  static void   resp_format(const struct req *, const ch
Line 93  static void   resp_format(const struct req *, const ch
 static  void             resp_searchform(const struct req *, enum focus);  static  void             resp_searchform(const struct req *, enum focus);
 static  void             resp_show(const struct req *, const char *);  static  void             resp_show(const struct req *, const char *);
 static  void             set_query_attr(char **, char **);  static  void             set_query_attr(char **, char **);
   static  int              validate_arch(const char *);
 static  int              validate_filename(const char *);  static  int              validate_filename(const char *);
 static  int              validate_manpath(const struct req *, const char *);  static  int              validate_manpath(const struct req *, const char *);
 static  int              validate_urifrag(const char *);  static  int              validate_urifrag(const char *);
Line 316  http_decode(char *p)
Line 320  http_decode(char *p)
 }  }
   
 static void  static void
   http_encode(const char *p)
   {
           for (; *p != '\0'; p++) {
                   if (isalnum((unsigned char)*p) == 0 &&
                       strchr("-._~", *p) == NULL)
                           printf("%%%2.2X", (unsigned char)*p);
                   else
                           putchar(*p);
           }
   }
   
   static void
 resp_begin_http(int code, const char *msg)  resp_begin_http(int code, const char *msg)
 {  {
   
Line 356  resp_begin_html(int code, const char *msg, const char 
Line 372  resp_begin_html(int code, const char *msg, const char 
                "<html>\n"                 "<html>\n"
                "<head>\n"                 "<head>\n"
                "  <meta charset=\"UTF-8\"/>\n"                 "  <meta charset=\"UTF-8\"/>\n"
                  "  <meta name=\"viewport\""
                         " content=\"width=device-width, initial-scale=1.0\">\n"
                "  <link rel=\"stylesheet\" href=\"%s/mandoc.css\""                 "  <link rel=\"stylesheet\" href=\"%s/mandoc.css\""
                " type=\"text/css\" media=\"all\">\n"                 " type=\"text/css\" media=\"all\">\n"
                "  <title>",                 "  <title>",
Line 398  resp_searchform(const struct req *req, enum focus focu
Line 416  resp_searchform(const struct req *req, enum focus focu
   
         /* Write query input box. */          /* Write query input box. */
   
         printf("    <input type=\"text\" name=\"query\" value=\"");          printf("    <input type=\"search\" name=\"query\" value=\"");
         if (req->q.query != NULL)          if (req->q.query != NULL)
                 html_print(req->q.query);                  html_print(req->q.query);
         printf( "\" size=\"40\"");          printf( "\" size=\"40\"");
Line 434  resp_searchform(const struct req *req, enum focus focu
Line 452  resp_searchform(const struct req *req, enum focus focu
                 printf(" selected=\"selected\"");                  printf(" selected=\"selected\"");
         puts(">All Architectures</option>");          puts(">All Architectures</option>");
         for (i = 0; i < arch_MAX; i++) {          for (i = 0; i < arch_MAX; i++) {
                 printf("      <option value=\"%s\"", arch_names[i]);                  printf("      <option");
                 if (NULL != req->q.arch &&                  if (NULL != req->q.arch &&
                     0 == strcmp(arch_names[i], req->q.arch))                      0 == strcmp(arch_names[i], req->q.arch))
                         printf(" selected=\"selected\"");                          printf(" selected=\"selected\"");
Line 447  resp_searchform(const struct req *req, enum focus focu
Line 465  resp_searchform(const struct req *req, enum focus focu
         if (req->psz > 1) {          if (req->psz > 1) {
                 puts("    <select name=\"manpath\">");                  puts("    <select name=\"manpath\">");
                 for (i = 0; i < (int)req->psz; i++) {                  for (i = 0; i < (int)req->psz; i++) {
                         printf("      <option ");                          printf("      <option");
                         if (strcmp(req->q.manpath, req->p[i]) == 0)                          if (strcmp(req->q.manpath, req->p[i]) == 0)
                                 printf("selected=\"selected\" ");                                  printf(" selected=\"selected\"");
                         printf("value=\"");                          printf(">");
                         html_print(req->p[i]);                          html_print(req->p[i]);
                         printf("\">");  
                         html_print(req->p[i]);  
                         puts("</option>");                          puts("</option>");
                 }                  }
                 puts("    </select>");                  puts("    </select>");
Line 490  validate_manpath(const struct req *req, const char* ma
Line 506  validate_manpath(const struct req *req, const char* ma
 }  }
   
 static int  static int
   validate_arch(const char *arch)
   {
           int      i;
   
           for (i = 0; i < arch_MAX; i++)
                   if (strcmp(arch, arch_names[i]) == 0)
                           return 1;
   
           return 0;
   }
   
   static int
 validate_filename(const char *file)  validate_filename(const char *file)
 {  {
   
Line 519  pg_index(const struct req *req)
Line 547  pg_index(const struct req *req)
 }  }
   
 static void  static void
 pg_noresult(const struct req *req, const char *msg)  pg_noresult(const struct req *req, int code, const char *http_msg,
       const char *user_msg)
 {  {
         resp_begin_html(200, NULL, NULL);          resp_begin_html(code, http_msg, NULL);
         resp_searchform(req, FOCUS_QUERY);          resp_searchform(req, FOCUS_QUERY);
         puts("<p>");          puts("<p>");
         puts(msg);          puts(user_msg);
         puts("</p>");          puts("</p>");
         resp_end_html();          resp_end_html();
 }  }
Line 562  pg_redirect(const struct req *req, const char *name)
Line 591  pg_redirect(const struct req *req, const char *name)
                 printf("%s/", req->q.manpath);                  printf("%s/", req->q.manpath);
         if (req->q.arch != NULL)          if (req->q.arch != NULL)
                 printf("%s/", req->q.arch);                  printf("%s/", req->q.arch);
         printf("%s", name);          http_encode(name);
         if (req->q.sec != NULL)          if (req->q.sec != NULL) {
                 printf(".%s", req->q.sec);                  putchar('.');
                   http_encode(req->q.sec);
           }
         printf("\r\nContent-Type: text/html; charset=utf-8\r\n\r\n");          printf("\r\nContent-Type: text/html; charset=utf-8\r\n\r\n");
 }  }
   
Line 820  resp_format(const struct req *req, const char *file)
Line 851  resp_format(const struct req *req, const char *file)
 {  {
         struct manoutput conf;          struct manoutput conf;
         struct mparse   *mp;          struct mparse   *mp;
         struct roff_man *man;          struct roff_meta *meta;
         void            *vp;          void            *vp;
         int              fd;          int              fd;
         int              usepath;          int              usepath;
Line 831  resp_format(const struct req *req, const char *file)
Line 862  resp_format(const struct req *req, const char *file)
         }          }
   
         mchars_alloc();          mchars_alloc();
         mp = mparse_alloc(MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1,          mp = mparse_alloc(MPARSE_SO | MPARSE_UTF8 | MPARSE_LATIN1 |
             MANDOCLEVEL_BADARG, NULL, req->q.manpath);              MPARSE_VALIDATE, MANDOC_OS_OTHER, req->q.manpath);
         mparse_readfd(mp, fd, file);          mparse_readfd(mp, fd, file);
         close(fd);          close(fd);
           meta = mparse_result(mp);
   
         memset(&conf, 0, sizeof(conf));          memset(&conf, 0, sizeof(conf));
         conf.fragment = 1;          conf.fragment = 1;
Line 844  resp_format(const struct req *req, const char *file)
Line 876  resp_format(const struct req *req, const char *file)
             scriptname, *scriptname == '\0' ? "" : "/",              scriptname, *scriptname == '\0' ? "" : "/",
             usepath ? req->q.manpath : "", usepath ? "/" : "");              usepath ? req->q.manpath : "", usepath ? "/" : "");
   
         mparse_result(mp, &man, NULL);  
         if (man == NULL) {  
                 warnx("fatal mandoc error: %s/%s", req->q.manpath, file);  
                 pg_error_internal();  
                 mparse_free(mp);  
                 mchars_free();  
                 return;  
         }  
   
         vp = html_alloc(&conf);          vp = html_alloc(&conf);
           if (meta->macroset == MACROSET_MDOC)
                   html_mdoc(vp, meta);
           else
                   html_man(vp, meta);
   
         if (man->macroset == MACROSET_MDOC) {  
                 mdoc_validate(man);  
                 html_mdoc(vp, man);  
         } else {  
                 man_validate(man);  
                 html_man(vp, man);  
         }  
   
         html_free(vp);          html_free(vp);
         mparse_free(mp);          mparse_free(mp);
         mchars_free();          mchars_free();
Line 999  pg_search(const struct req *req)
Line 1018  pg_search(const struct req *req)
         if (req->isquery && req->q.equal && argc == 1)          if (req->isquery && req->q.equal && argc == 1)
                 pg_redirect(req, argv[0]);                  pg_redirect(req, argv[0]);
         else if (mansearch(&search, &paths, argc, argv, &res, &ressz) == 0)          else if (mansearch(&search, &paths, argc, argv, &res, &ressz) == 0)
                 pg_noresult(req, "You entered an invalid query.");                  pg_noresult(req, 400, "Bad Request",
                       "You entered an invalid query.");
         else if (ressz == 0)          else if (ressz == 0)
                 pg_noresult(req, "No results found.");                  pg_noresult(req, 404, "Not Found", "No results found.");
         else          else
                 pg_searchres(req, res, ressz);                  pg_searchres(req, res, ressz);
   
Line 1089  main(void)
Line 1109  main(void)
                 return EXIT_FAILURE;                  return EXIT_FAILURE;
         }          }
   
         if ( ! (NULL == req.q.arch || validate_urifrag(req.q.arch))) {          if (req.q.arch != NULL && validate_arch(req.q.arch) == 0) {
                 pg_error_badrequest(                  pg_error_badrequest(
                     "You specified an invalid architecture.");                      "You specified an invalid architecture.");
                 return EXIT_FAILURE;                  return EXIT_FAILURE;
Line 1115  main(void)
Line 1135  main(void)
 }  }
   
 /*  /*
  * If PATH_INFO is not a file name, translate it to a query.   * Translate PATH_INFO to a query.
  */   */
 static void  static void
 parse_path_info(struct req *req, const char *path)  parse_path_info(struct req *req, const char *path)
 {  {
         char    *dir[4];          const char      *name, *sec, *end;
         int      i;  
   
         req->isquery = 0;          req->isquery = 0;
         req->q.equal = 1;          req->q.equal = 1;
         req->q.manpath = mandoc_strdup(path);          req->q.manpath = NULL;
         req->q.arch = NULL;          req->q.arch = NULL;
   
         /* Mandatory manual page name. */          /* Mandatory manual page name. */
         if ((req->q.query = strrchr(req->q.manpath, '/')) == NULL) {          if ((name = strrchr(path, '/')) == NULL)
                 req->q.query = req->q.manpath;                  name = path;
                 req->q.manpath = NULL;          else
         } else                  name++;
                 *req->q.query++ = '\0';  
   
         /* Optional trailing section. */          /* Optional trailing section. */
         if ((req->q.sec = strrchr(req->q.query, '.')) != NULL) {          sec = strrchr(name, '.');
                 if(isdigit((unsigned char)req->q.sec[1])) {          if (sec != NULL && isdigit((unsigned char)*++sec)) {
                         *req->q.sec++ = '\0';                  req->q.query = mandoc_strndup(name, sec - name - 1);
                         req->q.sec = mandoc_strdup(req->q.sec);                  req->q.sec = mandoc_strdup(sec);
                 } else          } else {
                         req->q.sec = NULL;                  req->q.query = mandoc_strdup(name);
                   req->q.sec = NULL;
         }          }
   
         /* Handle the case of name[.section] only. */          /* Handle the case of name[.section] only. */
         if (req->q.manpath == NULL)          if (name == path)
                 return;                  return;
         req->q.query = mandoc_strdup(req->q.query);  
   
         /* Split directory components. */  
         dir[i = 0] = req->q.manpath;  
         while ((dir[i + 1] = strchr(dir[i], '/')) != NULL) {  
                 if (++i == 3) {  
                         pg_error_badrequest(  
                             "You specified too many directory components.");  
                         exit(EXIT_FAILURE);  
                 }  
                 *dir[i]++ = '\0';  
         }  
   
         /* Optional manpath. */          /* Optional manpath. */
         if ((i = validate_manpath(req, req->q.manpath)) == 0)          end = strchr(path, '/');
           req->q.manpath = mandoc_strndup(path, end - path);
           if (validate_manpath(req, req->q.manpath)) {
                   path = end + 1;
                   if (name == path)
                           return;
           } else {
                   free(req->q.manpath);
                 req->q.manpath = NULL;                  req->q.manpath = NULL;
         else if (dir[1] == NULL)          }
                 return;  
   
         /* Optional section. */          /* Optional section. */
         if (strncmp(dir[i], "man", 3) == 0) {          if (strncmp(path, "man", 3) == 0 || strncmp(path, "cat", 3) == 0) {
                   path += 3;
                   end = strchr(path, '/');
                 free(req->q.sec);                  free(req->q.sec);
                 req->q.sec = mandoc_strdup(dir[i++] + 3);                  req->q.sec = mandoc_strndup(path, end - path);
                   path = end + 1;
                   if (name == path)
                           return;
         }          }
         if (dir[i] == NULL) {  
                 if (req->q.manpath == NULL)          /* Optional architecture. */
                         free(dir[0]);          end = strchr(path, '/');
                 return;          if (end + 1 != name) {
                   pg_error_badrequest(
                       "You specified too many directory components.");
                   exit(EXIT_FAILURE);
         }          }
         if (dir[i + 1] != NULL) {          req->q.arch = mandoc_strndup(path, end - path);
           if (validate_arch(req->q.arch) == 0) {
                 pg_error_badrequest(                  pg_error_badrequest(
                     "You specified an invalid directory component.");                      "You specified an invalid directory component.");
                 exit(EXIT_FAILURE);                  exit(EXIT_FAILURE);
         }          }
   
         /* Optional architecture. */  
         if (i) {  
                 req->q.arch = mandoc_strdup(dir[i]);  
                 if (req->q.manpath == NULL)  
                         free(dir[0]);  
         } else  
                 req->q.arch = dir[0];  
 }  }
   
 /*  /*
Legend:
Removed from v.1.155  
changed lines
  Added in v.1.168
CVSweb