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

Diff for /mandoc/Attic/apropos.c between version 1.17 and 1.28

version 1.17, 2011/11/20 21:36:00 version 1.28, 2012/03/24 01:46:25
Line 1 
Line 1 
 /*      $Id$ */  /*      $Id$ */
 /*  /*
  * Copyright (c) 2011 Kristaps Dzonsons <kristaps@bsd.lv>   * Copyright (c) 2011, 2012 Kristaps Dzonsons <kristaps@bsd.lv>
  * Copyright (c) 2011 Ingo Schwarze <schwarze@openbsd.org>   * Copyright (c) 2011 Ingo Schwarze <schwarze@openbsd.org>
  *   *
  * Permission to use, copy, modify, and distribute this software for any   * Permission to use, copy, modify, and distribute this software for any
Line 18 
Line 18 
 #ifdef HAVE_CONFIG_H  #ifdef HAVE_CONFIG_H
 #include "config.h"  #include "config.h"
 #endif  #endif
   #include <sys/param.h>
   
 #include <assert.h>  #include <assert.h>
 #include <ctype.h>  
 #include <getopt.h>  #include <getopt.h>
 #include <limits.h>  
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <string.h>  #include <string.h>
   
 #include "apropos_db.h"  #include "apropos_db.h"
 #include "mandoc.h"  #include "mandoc.h"
   #include "manpath.h"
   
 /*  #define SINGLETON(_res, _sz) \
  * FIXME: add support for manpath(1), which everybody but OpenBSD and          ((_sz) && (_res)[0].matched && \
  * NetBSD seem to use.           (1 == (_sz) || 0 == (_res)[1].matched))
  */  #define EMPTYSET(_res, _sz) \
 #define MAN_CONF_FILE   "/etc/man.conf"          ((0 == (_sz)) || 0 == (_res)[0].matched)
 #define MAN_CONF_KEY    "_whatdb"  
   
 /*  
  * List of paths to be searched for manual databases.  
  */  
 struct  manpaths {  
         int       sz;  
         char    **paths;  
 };  
   
 static  int      cmp(const void *, const void *);  static  int      cmp(const void *, const void *);
 static  void     list(struct res *, size_t, void *);  static  void     list(struct res *, size_t, void *);
 static  void     manpath_add(struct manpaths *, const char *);  
 static  void     manpath_parse(struct manpaths *, char *);  
 static  void     manpath_parseconf(struct manpaths *);  
 static  void     usage(void);  static  void     usage(void);
   
 static  char    *progname;  static  char    *progname;
Line 57  static char *progname;
Line 45  static char *progname;
 int  int
 main(int argc, char *argv[])  main(int argc, char *argv[])
 {  {
         int              i, ch, rc;          int              ch, rc, whatis, usecat;
           struct res      *res;
         struct manpaths  paths;          struct manpaths  paths;
         size_t           terms;          const char      *prog;
           pid_t            pid;
           char             path[PATH_MAX];
           int              fds[2];
           size_t           terms, ressz, sz;
         struct opts      opts;          struct opts      opts;
         struct expr     *e;          struct expr     *e;
         char            *defpaths, *auxpaths;          char            *defpaths, *auxpaths, *conf_file, *cp;
         extern int       optind;          extern int       optind;
         extern char     *optarg;          extern char     *optarg;
   
Line 72  main(int argc, char *argv[])
Line 65  main(int argc, char *argv[])
         else          else
                 ++progname;                  ++progname;
   
           whatis = 0 == strncmp(progname, "whatis", 6);
   
         memset(&paths, 0, sizeof(struct manpaths));          memset(&paths, 0, sizeof(struct manpaths));
         memset(&opts, 0, sizeof(struct opts));          memset(&opts, 0, sizeof(struct opts));
   
           usecat = 0;
           ressz = 0;
           res = NULL;
         auxpaths = defpaths = NULL;          auxpaths = defpaths = NULL;
           conf_file = NULL;
         e = NULL;          e = NULL;
         rc = 0;          path[0] = '\0';
   
         while (-1 != (ch = getopt(argc, argv, "M:m:S:s:")))          while (-1 != (ch = getopt(argc, argv, "C:M:m:S:s:")))
                 switch (ch) {                  switch (ch) {
                   case ('C'):
                           conf_file = optarg;
                           break;
                 case ('M'):                  case ('M'):
                         defpaths = optarg;                          defpaths = optarg;
                         break;                          break;
Line 95  main(int argc, char *argv[])
Line 97  main(int argc, char *argv[])
                         break;                          break;
                 default:                  default:
                         usage();                          usage();
                         goto out;                          return(EXIT_FAILURE);
                 }                  }
   
         argc -= optind;          argc -= optind;
         argv += optind;          argv += optind;
   
         if (0 == argc) {          if (0 == argc)
                 rc = 1;                  return(EXIT_SUCCESS);
                 goto out;  
         }  
   
         if (NULL != getenv("MANPATH"))          rc = 0;
                 defpaths = getenv("MANPATH");  
   
         if (NULL == defpaths)          manpath_parse(&paths, conf_file, defpaths, auxpaths);
                 manpath_parseconf(&paths);  
         else  
                 manpath_parse(&paths, defpaths);  
   
         manpath_parse(&paths, auxpaths);          e = whatis ? termcomp(argc, argv, &terms) :
                        exprcomp(argc, argv, &terms);
         if (NULL == (e = exprcomp(argc, argv, &terms))) {  
           if (NULL == e) {
                 fprintf(stderr, "%s: Bad expression\n", progname);                  fprintf(stderr, "%s: Bad expression\n", progname);
                 goto out;                  goto out;
         }          }
   
         rc = apropos_search          rc = apropos_search
                 (paths.sz, paths.paths,                  (paths.sz, paths.paths, &opts,
                  &opts, e, terms, NULL, list);                   e, terms, NULL, &ressz, &res, list);
   
         if (0 == rc)          terms = 1;
                 fprintf(stderr, "%s: Error reading "  
                                 "manual database\n", progname);  
   
 out:          if (0 == rc) {
         for (i = 0; i < paths.sz; i++)                  fprintf(stderr, "%s: Bad database\n", progname);
                 free(paths.paths[i]);                  goto out;
           } else if ( ! isatty(STDOUT_FILENO) || EMPTYSET(res, ressz))
                   goto out;
   
         free(paths.paths);          if ( ! SINGLETON(res, ressz)) {
                   printf("Which manpage would you like [1]? ");
                   fflush(stdout);
                   if (NULL != (cp = fgetln(stdin, &sz)) &&
                                   sz > 1 && '\n' == cp[--sz]) {
                           if ((ch = atoi(cp)) <= 0)
                                   goto out;
                           terms = (size_t)ch;
                   }
           }
   
           if (--terms < ressz && res[terms].matched) {
                   strlcpy(path, res[terms].file, PATH_MAX);
                   usecat = RESTYPE_CAT == res[terms].type;
           }
   out:
           manpath_free(&paths);
           resfree(res, ressz);
         exprfree(e);          exprfree(e);
   
         return(rc ? EXIT_SUCCESS : EXIT_FAILURE);          if ('\0' == path[0])
                   return(rc ? EXIT_SUCCESS : EXIT_FAILURE);
   
           if (-1 == pipe(fds)) {
                   perror(NULL);
                   exit(EXIT_FAILURE);
           }
   
           if (-1 == (pid = fork())) {
                   perror(NULL);
                   exit(EXIT_FAILURE);
           } else if (pid > 0) {
                   dup2(fds[0], STDIN_FILENO);
                   close(fds[1]);
                   prog = NULL != getenv("MANPAGER") ?
                           getenv("MANPAGER") :
                           (NULL != getenv("PAGER") ?
                            getenv("PAGER") : "more");
                   execlp(prog, prog, (char *)NULL);
                   perror(prog);
                   return(EXIT_FAILURE);
           }
   
           dup2(fds[1], STDOUT_FILENO);
           close(fds[0]);
           prog = usecat ? "cat" : "mandoc";
           execlp(prog, prog, path, (char *)NULL);
           perror(prog);
           return(EXIT_FAILURE);
 }  }
   
 /* ARGSUSED */  /* ARGSUSED */
 static void  static void
 list(struct res *res, size_t sz, void *arg)  list(struct res *res, size_t sz, void *arg)
 {  {
         int              i;          size_t           i;
   
         qsort(res, sz, sizeof(struct res), cmp);          qsort(res, sz, sizeof(struct res), cmp);
   
         for (i = 0; i < (int)sz; i++)          if (EMPTYSET(res, sz) || SINGLETON(res, sz))
                 printf("%s(%s%s%s) - %s\n", res[i].title,                  return;
                                 res[i].cat,  
                                 *res[i].arch ? "/" : "",          if ( ! isatty(STDOUT_FILENO))
                                 *res[i].arch ? res[i].arch : "",                  for (i = 0; i < sz && res[i].matched; i++)
                                 res[i].desc);                          printf("%s(%s%s%s) - %.70s\n",
                                           res[i].title, res[i].cat,
                                           *res[i].arch ? "/" : "",
                                           *res[i].arch ? res[i].arch : "",
                                           res[i].desc);
           else
                   for (i = 0; i < sz && res[i].matched; i++)
                           printf("[%zu] %s(%s%s%s) - %.70s\n", i + 1,
                                           res[i].title, res[i].cat,
                                           *res[i].arch ? "/" : "",
                                           *res[i].arch ? res[i].arch : "",
                                           res[i].desc);
 }  }
   
 static int  static int
 cmp(const void *p1, const void *p2)  cmp(const void *p1, const void *p2)
 {  {
           const struct res *r1 = p1;
           const struct res *r2 = p2;
   
         return(strcmp(((const struct res *)p1)->title,          if (0 == r1->matched)
                                 ((const struct res *)p2)->title));                  return(1);
           else if (0 == r2->matched)
                   return(1);
   
           return(strcasecmp(r1->title, r2->title));
 }  }
   
 static void  static void
Line 168  usage(void)
Line 227  usage(void)
 {  {
   
         fprintf(stderr, "usage: %s "          fprintf(stderr, "usage: %s "
                         "[-M dirs] "                          "[-C file] "
                         "[-m dirs] "                          "[-M manpath] "
                           "[-m manpath] "
                         "[-S arch] "                          "[-S arch] "
                         "[-s section] "                          "[-s section] "
                         "expression...\n", progname);                          "expression ...\n",
 }                          progname);
   
 /*  
  * Parse a FULL pathname from a colon-separated list of arrays.  
  */  
 static void  
 manpath_parse(struct manpaths *dirs, char *path)  
 {  
         char    *dir;  
   
         if (NULL == path)  
                 return;  
   
         for (dir = strtok(path, ":"); dir; dir = strtok(NULL, ":"))  
                 manpath_add(dirs, dir);  
 }  
   
 /*  
  * Add a directory to the array, ignoring bad directories.  
  * Grow the array one-by-one for simplicity's sake.  
  */  
 static void  
 manpath_add(struct manpaths *dirs, const char *dir)  
 {  
         char             buf[PATH_MAX];  
         char            *cp;  
         int              i;  
   
         if (NULL == (cp = realpath(dir, buf)))  
                 return;  
   
         for (i = 0; i < dirs->sz; i++)  
                 if (0 == strcmp(dirs->paths[i], dir))  
                         return;  
   
         dirs->paths = mandoc_realloc  
                 (dirs->paths,  
                  ((size_t)dirs->sz + 1) * sizeof(char *));  
   
         dirs->paths[dirs->sz++] = mandoc_strdup(cp);  
 }  
   
 static void  
 manpath_parseconf(struct manpaths *dirs)  
 {  
         FILE            *stream;  
 #ifdef  USE_MANPATH  
         char            *buf;  
         size_t           sz, bsz;  
   
         stream = popen("manpath", "r");  
         if (NULL == stream)  
                 return;  
   
         buf = NULL;  
         bsz = 0;  
   
         do {  
                 buf = mandoc_realloc(buf, bsz + 1024);  
                 sz = fread(buf + (int)bsz, 1, 1024, stream);  
                 bsz += sz;  
         } while (sz > 0);  
   
         assert(bsz && '\n' == buf[bsz - 1]);  
         buf[bsz - 1] = '\0';  
   
         manpath_parse(dirs, buf);  
         free(buf);  
         pclose(stream);  
 #else  
         char            *p, *q;  
         size_t           len, keysz;  
   
         keysz = strlen(MAN_CONF_KEY);  
         assert(keysz > 0);  
   
         if (NULL == (stream = fopen(MAN_CONF_FILE, "r")))  
                 return;  
   
         while (NULL != (p = fgetln(stream, &len))) {  
                 if (0 == len || '\n' == p[--len])  
                         break;  
                 p[len] = '\0';  
                 while (isspace((unsigned char)*p))  
                         p++;  
                 if (strncmp(MAN_CONF_KEY, p, keysz))  
                         continue;  
                 p += keysz;  
                 while (isspace(*p))  
                         p++;  
                 if ('\0' == *p)  
                         continue;  
                 if (NULL == (q = strrchr(p, '/')))  
                         continue;  
                 *q = '\0';  
                 manpath_add(dirs, p);  
         }  
   
         fclose(stream);  
 #endif  
 }  }
Legend:
Removed from v.1.17  
changed lines
  Added in v.1.28
CVSweb