version 1.4, 2012/06/09 11:00:13 |
version 1.22, 2014/03/17 16:31:44 |
|
|
/* $Id$ */ |
/* $Id$ */ |
/* |
/* |
* Copyright (c) 2012 Kristaps Dzonsons <kristaps@bsd.lv> |
* Copyright (c) 2012 Kristaps Dzonsons <kristaps@bsd.lv> |
|
* Copyright (c) 2013, 2014 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 |
* purpose with or without fee is hereby granted, provided that the above |
* purpose with or without fee is hereby granted, provided that the above |
|
|
#include "config.h" |
#include "config.h" |
#endif |
#endif |
|
|
#include <sys/param.h> |
|
|
|
#include <assert.h> |
#include <assert.h> |
#include <fcntl.h> |
#include <fcntl.h> |
#include <getopt.h> |
#include <getopt.h> |
|
#include <limits.h> |
|
#include <regex.h> |
#include <stdio.h> |
#include <stdio.h> |
#include <stdint.h> |
#include <stdint.h> |
#include <stddef.h> |
#include <stddef.h> |
|
|
|
|
#include "mandoc.h" |
#include "mandoc.h" |
#include "manpath.h" |
#include "manpath.h" |
#include "mandocdb.h" |
|
#include "mansearch.h" |
#include "mansearch.h" |
|
|
|
extern int mansearch_keymax; |
|
extern const char *const mansearch_keynames[]; |
|
|
#define SQL_BIND_TEXT(_db, _s, _i, _v) \ |
#define SQL_BIND_TEXT(_db, _s, _i, _v) \ |
if (SQLITE_OK != sqlite3_bind_text \ |
do { if (SQLITE_OK != sqlite3_bind_text \ |
((_s), (_i)++, (_v), -1, SQLITE_STATIC)) \ |
((_s), (_i)++, (_v), -1, SQLITE_STATIC)) \ |
fprintf(stderr, "%s\n", sqlite3_errmsg((_db))) |
fprintf(stderr, "%s\n", sqlite3_errmsg((_db))); \ |
|
} while (0) |
#define SQL_BIND_INT64(_db, _s, _i, _v) \ |
#define SQL_BIND_INT64(_db, _s, _i, _v) \ |
if (SQLITE_OK != sqlite3_bind_int64 \ |
do { if (SQLITE_OK != sqlite3_bind_int64 \ |
((_s), (_i)++, (_v))) \ |
((_s), (_i)++, (_v))) \ |
fprintf(stderr, "%s\n", sqlite3_errmsg((_db))) |
fprintf(stderr, "%s\n", sqlite3_errmsg((_db))); \ |
|
} while (0) |
|
#define SQL_BIND_BLOB(_db, _s, _i, _v) \ |
|
do { if (SQLITE_OK != sqlite3_bind_blob \ |
|
((_s), (_i)++, (&_v), sizeof(_v), SQLITE_STATIC)) \ |
|
fprintf(stderr, "%s\n", sqlite3_errmsg((_db))); \ |
|
} while (0) |
|
|
struct expr { |
struct expr { |
int glob; /* is glob? */ |
uint64_t bits; /* type-mask */ |
uint64_t bits; /* type-mask */ |
const char *substr; /* to search for, if applicable */ |
const char *v; /* search value */ |
regex_t regexp; /* compiled regexp, if applicable */ |
struct expr *next; /* next in sequence */ |
int open; /* opening parentheses before */ |
|
int and; /* logical AND before */ |
|
int close; /* closing parentheses after */ |
|
struct expr *next; /* next in sequence */ |
}; |
}; |
|
|
struct match { |
struct match { |
uint64_t id; /* identifier in database */ |
uint64_t id; /* identifier in database */ |
char *file; /* relative filepath of manpage */ |
|
char *desc; /* description of manpage */ |
|
int form; /* 0 == catpage */ |
int form; /* 0 == catpage */ |
}; |
}; |
|
|
struct type { |
static void buildnames(struct manpage *, sqlite3 *, |
uint64_t bits; |
sqlite3_stmt *, uint64_t, |
const char *name; |
const char *, int form); |
}; |
static char *buildoutput(sqlite3 *, sqlite3_stmt *, |
|
uint64_t, uint64_t); |
static const struct type types[] = { |
|
{ TYPE_An, "An" }, |
|
{ TYPE_Ar, "Ar" }, |
|
{ TYPE_At, "At" }, |
|
{ TYPE_Bsx, "Bsx" }, |
|
{ TYPE_Bx, "Bx" }, |
|
{ TYPE_Cd, "Cd" }, |
|
{ TYPE_Cm, "Cm" }, |
|
{ TYPE_Dv, "Dv" }, |
|
{ TYPE_Dx, "Dx" }, |
|
{ TYPE_Em, "Em" }, |
|
{ TYPE_Er, "Er" }, |
|
{ TYPE_Ev, "Ev" }, |
|
{ TYPE_Fa, "Fa" }, |
|
{ TYPE_Fl, "Fl" }, |
|
{ TYPE_Fn, "Fn" }, |
|
{ TYPE_Fn, "Fo" }, |
|
{ TYPE_Ft, "Ft" }, |
|
{ TYPE_Fx, "Fx" }, |
|
{ TYPE_Ic, "Ic" }, |
|
{ TYPE_In, "In" }, |
|
{ TYPE_Lb, "Lb" }, |
|
{ TYPE_Li, "Li" }, |
|
{ TYPE_Lk, "Lk" }, |
|
{ TYPE_Ms, "Ms" }, |
|
{ TYPE_Mt, "Mt" }, |
|
{ TYPE_Nd, "Nd" }, |
|
{ TYPE_Nm, "Nm" }, |
|
{ TYPE_Nx, "Nx" }, |
|
{ TYPE_Ox, "Ox" }, |
|
{ TYPE_Pa, "Pa" }, |
|
{ TYPE_Rs, "Rs" }, |
|
{ TYPE_Sh, "Sh" }, |
|
{ TYPE_Ss, "Ss" }, |
|
{ TYPE_St, "St" }, |
|
{ TYPE_Sy, "Sy" }, |
|
{ TYPE_Tn, "Tn" }, |
|
{ TYPE_Va, "Va" }, |
|
{ TYPE_Va, "Vt" }, |
|
{ TYPE_Xr, "Xr" }, |
|
{ ~0ULL, "any" }, |
|
{ 0ULL, NULL } |
|
}; |
|
|
|
static void *hash_alloc(size_t, void *); |
static void *hash_alloc(size_t, void *); |
static void hash_free(void *, size_t, void *); |
static void hash_free(void *, size_t, void *); |
static void *hash_halloc(size_t, void *); |
static void *hash_halloc(size_t, void *); |
static struct expr *exprcomp(int, char *[]); |
static struct expr *exprcomp(const struct mansearch *, |
|
int, char *[]); |
static void exprfree(struct expr *); |
static void exprfree(struct expr *); |
static struct expr *exprterm(char *); |
static struct expr *exprspec(struct expr *, uint64_t, |
static char *sql_statement(const struct expr *, |
const char *, const char *); |
const char *, const char *); |
static struct expr *exprterm(const struct mansearch *, char *, int); |
|
static void sql_append(char **sql, size_t *sz, |
|
const char *newstr, int count); |
|
static void sql_match(sqlite3_context *context, |
|
int argc, sqlite3_value **argv); |
|
static void sql_regexp(sqlite3_context *context, |
|
int argc, sqlite3_value **argv); |
|
static char *sql_statement(const struct expr *); |
|
|
int |
int |
mansearch(const struct manpaths *paths, |
mansearch(const struct mansearch *search, |
const char *arch, const char *sec, |
const struct manpaths *paths, |
int argc, char *argv[], |
int argc, char *argv[], |
|
const char *outkey, |
struct manpage **res, size_t *sz) |
struct manpage **res, size_t *sz) |
{ |
{ |
int fd, rc, c; |
int fd, rc, c, indexbit; |
int64_t id; |
int64_t id; |
char buf[MAXPATHLEN]; |
uint64_t outbit, iterbit; |
|
char buf[PATH_MAX]; |
char *sql; |
char *sql; |
|
struct manpage *mpage; |
struct expr *e, *ep; |
struct expr *e, *ep; |
sqlite3 *db; |
sqlite3 *db; |
sqlite3_stmt *s; |
sqlite3_stmt *s, *s2; |
struct match *mp; |
struct match *mp; |
struct ohash_info info; |
struct ohash_info info; |
struct ohash htab; |
struct ohash htab; |
Line 158 mansearch(const struct manpaths *paths, |
|
Line 136 mansearch(const struct manpaths *paths, |
|
|
|
if (0 == argc) |
if (0 == argc) |
goto out; |
goto out; |
if (NULL == (e = exprcomp(argc, argv))) |
if (NULL == (e = exprcomp(search, argc, argv))) |
goto out; |
goto out; |
|
|
|
outbit = 0; |
|
if (NULL != outkey) { |
|
for (indexbit = 0, iterbit = 1; |
|
indexbit < mansearch_keymax; |
|
indexbit++, iterbit <<= 1) { |
|
if (0 == strcasecmp(outkey, |
|
mansearch_keynames[indexbit])) { |
|
outbit = iterbit; |
|
break; |
|
} |
|
} |
|
} |
|
|
/* |
/* |
* Save a descriptor to the current working directory. |
* Save a descriptor to the current working directory. |
* Since pathnames in the "paths" variable might be relative, |
* Since pathnames in the "paths" variable might be relative, |
Line 168 mansearch(const struct manpaths *paths, |
|
Line 159 mansearch(const struct manpaths *paths, |
|
* on our current directory from which to start the chdir(). |
* on our current directory from which to start the chdir(). |
*/ |
*/ |
|
|
if (NULL == getcwd(buf, MAXPATHLEN)) { |
if (NULL == getcwd(buf, PATH_MAX)) { |
perror(NULL); |
perror(NULL); |
goto out; |
goto out; |
} else if (-1 == (fd = open(buf, O_RDONLY, 0))) { |
} else if (-1 == (fd = open(buf, O_RDONLY, 0))) { |
Line 176 mansearch(const struct manpaths *paths, |
|
Line 167 mansearch(const struct manpaths *paths, |
|
goto out; |
goto out; |
} |
} |
|
|
sql = sql_statement(e, arch, sec); |
sql = sql_statement(e); |
|
|
/* |
/* |
* Loop over the directories (containing databases) for us to |
* Loop over the directories (containing databases) for us to |
Line 206 mansearch(const struct manpaths *paths, |
|
Line 197 mansearch(const struct manpaths *paths, |
|
continue; |
continue; |
} |
} |
|
|
|
/* |
|
* Define the SQL functions for substring |
|
* and regular expression matching. |
|
*/ |
|
|
|
c = sqlite3_create_function(db, "match", 2, |
|
SQLITE_ANY, NULL, sql_match, NULL, NULL); |
|
assert(SQLITE_OK == c); |
|
c = sqlite3_create_function(db, "regexp", 2, |
|
SQLITE_ANY, NULL, sql_regexp, NULL, NULL); |
|
assert(SQLITE_OK == c); |
|
|
j = 1; |
j = 1; |
c = sqlite3_prepare_v2(db, sql, -1, &s, NULL); |
c = sqlite3_prepare_v2(db, sql, -1, &s, NULL); |
if (SQLITE_OK != c) |
if (SQLITE_OK != c) |
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
|
|
if (NULL != arch) |
|
SQL_BIND_TEXT(db, s, j, arch); |
|
if (NULL != sec) |
|
SQL_BIND_TEXT(db, s, j, arch); |
|
|
|
for (ep = e; NULL != ep; ep = ep->next) { |
for (ep = e; NULL != ep; ep = ep->next) { |
SQL_BIND_TEXT(db, s, j, ep->v); |
if (NULL == ep->substr) { |
|
SQL_BIND_BLOB(db, s, j, ep->regexp); |
|
} else |
|
SQL_BIND_TEXT(db, s, j, ep->substr); |
SQL_BIND_INT64(db, s, j, ep->bits); |
SQL_BIND_INT64(db, s, j, ep->bits); |
} |
} |
|
|
Line 233 mansearch(const struct manpaths *paths, |
|
Line 234 mansearch(const struct manpaths *paths, |
|
* distribution of buckets in the table. |
* distribution of buckets in the table. |
*/ |
*/ |
while (SQLITE_ROW == (c = sqlite3_step(s))) { |
while (SQLITE_ROW == (c = sqlite3_step(s))) { |
id = sqlite3_column_int64(s, 0); |
id = sqlite3_column_int64(s, 1); |
idx = ohash_lookup_memory |
idx = ohash_lookup_memory |
(&htab, (char *)&id, |
(&htab, (char *)&id, |
sizeof(uint64_t), (uint32_t)id); |
sizeof(uint64_t), (uint32_t)id); |
Line 243 mansearch(const struct manpaths *paths, |
|
Line 244 mansearch(const struct manpaths *paths, |
|
|
|
mp = mandoc_calloc(1, sizeof(struct match)); |
mp = mandoc_calloc(1, sizeof(struct match)); |
mp->id = id; |
mp->id = id; |
mp->file = mandoc_strdup |
mp->form = sqlite3_column_int(s, 0); |
((char *)sqlite3_column_text(s, 3)); |
|
mp->desc = mandoc_strdup |
|
((char *)sqlite3_column_text(s, 4)); |
|
mp->form = sqlite3_column_int(s, 5); |
|
ohash_insert(&htab, idx, mp); |
ohash_insert(&htab, idx, mp); |
} |
} |
|
|
Line 255 mansearch(const struct manpaths *paths, |
|
Line 252 mansearch(const struct manpaths *paths, |
|
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
|
|
sqlite3_finalize(s); |
sqlite3_finalize(s); |
sqlite3_close(db); |
|
|
|
|
c = sqlite3_prepare_v2(db, |
|
"SELECT * FROM mlinks WHERE pageid=?" |
|
" ORDER BY sec, arch, name", |
|
-1, &s, NULL); |
|
if (SQLITE_OK != c) |
|
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
|
|
|
c = sqlite3_prepare_v2(db, |
|
"SELECT * FROM keys WHERE pageid=? AND bits & ?", |
|
-1, &s2, NULL); |
|
if (SQLITE_OK != c) |
|
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
|
|
for (mp = ohash_first(&htab, &idx); |
for (mp = ohash_first(&htab, &idx); |
NULL != mp; |
NULL != mp; |
mp = ohash_next(&htab, &idx)) { |
mp = ohash_next(&htab, &idx)) { |
Line 265 mansearch(const struct manpaths *paths, |
|
Line 274 mansearch(const struct manpaths *paths, |
|
*res = mandoc_realloc |
*res = mandoc_realloc |
(*res, maxres * sizeof(struct manpage)); |
(*res, maxres * sizeof(struct manpage)); |
} |
} |
strlcpy((*res)[cur].file, |
mpage = *res + cur; |
paths->paths[i], MAXPATHLEN); |
mpage->form = mp->form; |
strlcat((*res)[cur].file, "/", MAXPATHLEN); |
buildnames(mpage, db, s, mp->id, |
strlcat((*res)[cur].file, mp->file, MAXPATHLEN); |
paths->paths[i], mp->form); |
(*res)[cur].desc = mp->desc; |
mpage->output = outbit ? |
(*res)[cur].form = mp->form; |
buildoutput(db, s2, mp->id, outbit) : NULL; |
free(mp->file); |
|
free(mp); |
free(mp); |
cur++; |
cur++; |
} |
} |
|
|
|
sqlite3_finalize(s); |
|
sqlite3_finalize(s2); |
|
sqlite3_close(db); |
ohash_delete(&htab); |
ohash_delete(&htab); |
} |
} |
rc = 1; |
rc = 1; |
|
|
return(rc); |
return(rc); |
} |
} |
|
|
|
static void |
|
buildnames(struct manpage *mpage, sqlite3 *db, sqlite3_stmt *s, |
|
uint64_t id, const char *path, int form) |
|
{ |
|
char *newnames, *prevsec, *prevarch; |
|
const char *oldnames, *sep1, *name, *sec, *sep2, *arch, *fsec; |
|
size_t i; |
|
int c; |
|
|
|
mpage->names = NULL; |
|
prevsec = prevarch = NULL; |
|
i = 1; |
|
SQL_BIND_INT64(db, s, i, id); |
|
while (SQLITE_ROW == (c = sqlite3_step(s))) { |
|
|
|
/* Decide whether we already have some names. */ |
|
|
|
if (NULL == mpage->names) { |
|
oldnames = ""; |
|
sep1 = ""; |
|
} else { |
|
oldnames = mpage->names; |
|
sep1 = ", "; |
|
} |
|
|
|
/* Fetch the next name. */ |
|
|
|
sec = sqlite3_column_text(s, 0); |
|
arch = sqlite3_column_text(s, 1); |
|
name = sqlite3_column_text(s, 2); |
|
|
|
/* If the section changed, append the old one. */ |
|
|
|
if (NULL != prevsec && |
|
(strcmp(sec, prevsec) || |
|
strcmp(arch, prevarch))) { |
|
sep2 = '\0' == *prevarch ? "" : "/"; |
|
if (-1 == asprintf(&newnames, "%s(%s%s%s)", |
|
oldnames, prevsec, sep2, prevarch)) { |
|
perror(0); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
free(mpage->names); |
|
oldnames = mpage->names = newnames; |
|
free(prevsec); |
|
free(prevarch); |
|
prevsec = prevarch = NULL; |
|
} |
|
|
|
/* Save the new section, to append it later. */ |
|
|
|
if (NULL == prevsec) { |
|
prevsec = mandoc_strdup(sec); |
|
prevarch = mandoc_strdup(arch); |
|
} |
|
|
|
/* Append the new name. */ |
|
|
|
if (-1 == asprintf(&newnames, "%s%s%s", |
|
oldnames, sep1, name)) { |
|
perror(0); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
free(mpage->names); |
|
mpage->names = newnames; |
|
|
|
/* Also save the first file name encountered. */ |
|
|
|
if (NULL != mpage->file) |
|
continue; |
|
|
|
if (form) { |
|
sep1 = "man"; |
|
fsec = sec; |
|
} else { |
|
sep1 = "cat"; |
|
fsec = "0"; |
|
} |
|
sep2 = '\0' == *arch ? "" : "/"; |
|
if (-1 == asprintf(&mpage->file, "%s/%s%s%s%s/%s.%s", |
|
path, sep1, sec, sep2, arch, name, fsec)) { |
|
perror(0); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
} |
|
if (SQLITE_DONE != c) |
|
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
|
sqlite3_reset(s); |
|
|
|
/* Append one final section to the names. */ |
|
|
|
if (NULL != prevsec) { |
|
sep2 = '\0' == *prevarch ? "" : "/"; |
|
if (-1 == asprintf(&newnames, "%s(%s%s%s)", |
|
mpage->names, prevsec, sep2, prevarch)) { |
|
perror(0); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
free(mpage->names); |
|
mpage->names = newnames; |
|
free(prevsec); |
|
free(prevarch); |
|
} |
|
} |
|
|
|
static char * |
|
buildoutput(sqlite3 *db, sqlite3_stmt *s, uint64_t id, uint64_t outbit) |
|
{ |
|
char *output, *newoutput; |
|
const char *oldoutput, *sep1, *data; |
|
size_t i; |
|
int c; |
|
|
|
output = NULL; |
|
i = 1; |
|
SQL_BIND_INT64(db, s, i, id); |
|
SQL_BIND_INT64(db, s, i, outbit); |
|
while (SQLITE_ROW == (c = sqlite3_step(s))) { |
|
if (NULL == output) { |
|
oldoutput = ""; |
|
sep1 = ""; |
|
} else { |
|
oldoutput = output; |
|
sep1 = " # "; |
|
} |
|
data = sqlite3_column_text(s, 1); |
|
if (-1 == asprintf(&newoutput, "%s%s%s", |
|
oldoutput, sep1, data)) { |
|
perror(0); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
free(output); |
|
output = newoutput; |
|
} |
|
if (SQLITE_DONE != c) |
|
fprintf(stderr, "%s\n", sqlite3_errmsg(db)); |
|
sqlite3_reset(s); |
|
return(output); |
|
} |
|
|
/* |
/* |
|
* Implement substring match as an application-defined SQL function. |
|
* Using the SQL LIKE or GLOB operators instead would be a bad idea |
|
* because that would require escaping metacharacters in the string |
|
* being searched for. |
|
*/ |
|
static void |
|
sql_match(sqlite3_context *context, int argc, sqlite3_value **argv) |
|
{ |
|
|
|
assert(2 == argc); |
|
sqlite3_result_int(context, NULL != strcasestr( |
|
(const char *)sqlite3_value_text(argv[1]), |
|
(const char *)sqlite3_value_text(argv[0]))); |
|
} |
|
|
|
/* |
|
* Implement regular expression match |
|
* as an application-defined SQL function. |
|
*/ |
|
static void |
|
sql_regexp(sqlite3_context *context, int argc, sqlite3_value **argv) |
|
{ |
|
|
|
assert(2 == argc); |
|
sqlite3_result_int(context, !regexec( |
|
(regex_t *)sqlite3_value_blob(argv[0]), |
|
(const char *)sqlite3_value_text(argv[1]), |
|
0, NULL, 0)); |
|
} |
|
|
|
static void |
|
sql_append(char **sql, size_t *sz, const char *newstr, int count) |
|
{ |
|
size_t newsz; |
|
|
|
newsz = 1 < count ? (size_t)count : strlen(newstr); |
|
*sql = mandoc_realloc(*sql, *sz + newsz + 1); |
|
if (1 < count) |
|
memset(*sql + *sz, *newstr, (size_t)count); |
|
else |
|
memcpy(*sql + *sz, newstr, newsz); |
|
*sz += newsz; |
|
(*sql)[*sz] = '\0'; |
|
} |
|
|
|
/* |
* Prepare the search SQL statement. |
* Prepare the search SQL statement. |
* We search for any of the words specified in our match expression. |
|
* We filter the per-doc AND expressions when collecting results. |
|
*/ |
*/ |
static char * |
static char * |
sql_statement(const struct expr *e, const char *arch, const char *sec) |
sql_statement(const struct expr *e) |
{ |
{ |
char *sql; |
char *sql; |
const char *glob = "(key GLOB ? AND bits & ?)"; |
|
const char *eq = "(key = ? AND bits & ?)"; |
|
const char *andarch = "arch = ? AND "; |
|
const char *andsec = "sec = ? AND "; |
|
size_t globsz; |
|
size_t eqsz; |
|
size_t sz; |
size_t sz; |
|
int needop; |
|
|
sql = mandoc_strdup |
sql = mandoc_strdup("SELECT * FROM mpages WHERE "); |
("SELECT docid,bits,key,file,desc,form,sec,arch " |
|
"FROM keys " |
|
"INNER JOIN docs ON docs.id=keys.docid " |
|
"WHERE "); |
|
sz = strlen(sql); |
sz = strlen(sql); |
globsz = strlen(glob); |
|
eqsz = strlen(eq); |
|
|
|
if (NULL != arch) { |
for (needop = 0; NULL != e; e = e->next) { |
sz += strlen(andarch) + 1; |
if (e->and) |
sql = mandoc_realloc(sql, sz); |
sql_append(&sql, &sz, " AND ", 1); |
strlcat(sql, andarch, sz); |
else if (needop) |
|
sql_append(&sql, &sz, " OR ", 1); |
|
if (e->open) |
|
sql_append(&sql, &sz, "(", e->open); |
|
sql_append(&sql, &sz, NULL == e->substr ? |
|
"id IN (SELECT pageid FROM keys " |
|
"WHERE key REGEXP ? AND bits & ?)" : |
|
"id IN (SELECT pageid FROM keys " |
|
"WHERE key MATCH ? AND bits & ?)", 1); |
|
if (e->close) |
|
sql_append(&sql, &sz, ")", e->close); |
|
needop = 1; |
} |
} |
|
|
if (NULL != sec) { |
|
sz += strlen(andsec) + 1; |
|
sql = mandoc_realloc(sql, sz); |
|
strlcat(sql, andsec, sz); |
|
} |
|
|
|
sz += 2; |
|
sql = mandoc_realloc(sql, sz); |
|
strlcat(sql, "(", sz); |
|
|
|
for ( ; NULL != e; e = e->next) { |
|
sz += (e->glob ? globsz : eqsz) + |
|
(NULL == e->next ? 3 : 5); |
|
sql = mandoc_realloc(sql, sz); |
|
strlcat(sql, e->glob ? glob : eq, sz); |
|
strlcat(sql, NULL == e->next ? ");" : " OR ", sz); |
|
} |
|
|
|
return(sql); |
return(sql); |
} |
} |
|
|
Line 346 sql_statement(const struct expr *e, const char *arch, |
|
Line 525 sql_statement(const struct expr *e, const char *arch, |
|
* "(", "foo=bar", etc.). |
* "(", "foo=bar", etc.). |
*/ |
*/ |
static struct expr * |
static struct expr * |
exprcomp(int argc, char *argv[]) |
exprcomp(const struct mansearch *search, int argc, char *argv[]) |
{ |
{ |
int i; |
int i, toopen, logic, igncase, toclose; |
struct expr *first, *next, *cur; |
struct expr *first, *next, *cur; |
|
|
first = cur = NULL; |
first = cur = NULL; |
|
logic = igncase = toclose = 0; |
|
toopen = 1; |
|
|
for (i = 0; i < argc; i++) { |
for (i = 0; i < argc; i++) { |
next = exprterm(argv[i]); |
if (0 == strcmp("(", argv[i])) { |
if (NULL == next) { |
if (igncase) |
exprfree(first); |
goto fail; |
return(NULL); |
toopen++; |
|
toclose++; |
|
continue; |
|
} else if (0 == strcmp(")", argv[i])) { |
|
if (toopen || logic || igncase || NULL == cur) |
|
goto fail; |
|
cur->close++; |
|
if (0 > --toclose) |
|
goto fail; |
|
continue; |
|
} else if (0 == strcmp("-a", argv[i])) { |
|
if (toopen || logic || igncase || NULL == cur) |
|
goto fail; |
|
logic = 1; |
|
continue; |
|
} else if (0 == strcmp("-o", argv[i])) { |
|
if (toopen || logic || igncase || NULL == cur) |
|
goto fail; |
|
logic = 2; |
|
continue; |
|
} else if (0 == strcmp("-i", argv[i])) { |
|
if (igncase) |
|
goto fail; |
|
igncase = 1; |
|
continue; |
} |
} |
|
next = exprterm(search, argv[i], !igncase); |
|
if (NULL == next) |
|
goto fail; |
|
next->open = toopen; |
|
next->and = (1 == logic); |
if (NULL != first) { |
if (NULL != first) { |
cur->next = next; |
cur->next = next; |
cur = next; |
cur = next; |
} else |
} else |
cur = first = next; |
cur = first = next; |
|
toopen = logic = igncase = 0; |
} |
} |
|
if (toopen || logic || igncase || toclose) |
|
goto fail; |
|
|
|
cur->close++; |
|
cur = exprspec(cur, TYPE_arch, search->arch, "^(%s|any)$"); |
|
exprspec(cur, TYPE_sec, search->sec, "^%s$"); |
|
|
return(first); |
return(first); |
|
|
|
fail: |
|
if (NULL != first) |
|
exprfree(first); |
|
return(NULL); |
} |
} |
|
|
static struct expr * |
static struct expr * |
exprterm(char *buf) |
exprspec(struct expr *cur, uint64_t key, const char *value, |
|
const char *format) |
{ |
{ |
|
char errbuf[BUFSIZ]; |
|
char *cp; |
|
int irc; |
|
|
|
if (NULL == value) |
|
return(cur); |
|
|
|
if (-1 == asprintf(&cp, format, value)) { |
|
perror(0); |
|
exit((int)MANDOCLEVEL_SYSERR); |
|
} |
|
cur->next = mandoc_calloc(1, sizeof(struct expr)); |
|
cur = cur->next; |
|
cur->and = 1; |
|
cur->bits = key; |
|
if (0 != (irc = regcomp(&cur->regexp, cp, |
|
REG_EXTENDED | REG_NOSUB | REG_ICASE))) { |
|
regerror(irc, &cur->regexp, errbuf, sizeof(errbuf)); |
|
fprintf(stderr, "regcomp: %s\n", errbuf); |
|
cur->substr = value; |
|
} |
|
free(cp); |
|
return(cur); |
|
} |
|
|
|
static struct expr * |
|
exprterm(const struct mansearch *search, char *buf, int cs) |
|
{ |
|
char errbuf[BUFSIZ]; |
struct expr *e; |
struct expr *e; |
char *key, *v; |
char *key, *v; |
size_t i; |
uint64_t iterbit; |
|
int i, irc; |
|
|
if ('\0' == *buf) |
if ('\0' == *buf) |
return(NULL); |
return(NULL); |
|
|
e = mandoc_calloc(1, sizeof(struct expr)); |
e = mandoc_calloc(1, sizeof(struct expr)); |
|
|
|
/*"whatis" mode uses an opaque string and default fields. */ |
|
|
|
if (MANSEARCH_WHATIS & search->flags) { |
|
e->substr = buf; |
|
e->bits = search->deftype; |
|
return(e); |
|
} |
|
|
/* |
/* |
* If no =~ is specified, search with equality over names and |
* If no =~ is specified, search with equality over names and |
* descriptions. |
* descriptions. |
Line 388 exprterm(char *buf) |
|
Line 649 exprterm(char *buf) |
|
*/ |
*/ |
|
|
if (NULL == (v = strpbrk(buf, "=~"))) { |
if (NULL == (v = strpbrk(buf, "=~"))) { |
e->v = buf; |
e->substr = buf; |
e->bits = TYPE_Nm | TYPE_Nd; |
e->bits = search->deftype; |
return(e); |
return(e); |
} else if (v == buf) |
} else if (v == buf) |
e->bits = TYPE_Nm | TYPE_Nd; |
e->bits = search->deftype; |
|
|
e->glob = '~' == *v; |
if ('~' == *v++) { |
*v++ = '\0'; |
if (NULL != strstr(buf, "arch")) |
e->v = v; |
cs = 0; |
|
if (0 != (irc = regcomp(&e->regexp, v, |
|
REG_EXTENDED | REG_NOSUB | (cs ? 0 : REG_ICASE)))) { |
|
regerror(irc, &e->regexp, errbuf, sizeof(errbuf)); |
|
fprintf(stderr, "regcomp: %s\n", errbuf); |
|
free(e); |
|
return(NULL); |
|
} |
|
} else |
|
e->substr = v; |
|
v[-1] = '\0'; |
|
|
/* |
/* |
* Parse out all possible fields. |
* Parse out all possible fields. |
Line 406 exprterm(char *buf) |
|
Line 677 exprterm(char *buf) |
|
while (NULL != (key = strsep(&buf, ","))) { |
while (NULL != (key = strsep(&buf, ","))) { |
if ('\0' == *key) |
if ('\0' == *key) |
continue; |
continue; |
i = 0; |
for (i = 0, iterbit = 1; |
while (types[i].bits && |
i < mansearch_keymax; |
strcasecmp(types[i].name, key)) |
i++, iterbit <<= 1) { |
i++; |
if (0 == strcasecmp(key, |
if (0 == types[i].bits) { |
mansearch_keynames[i])) { |
free(e); |
e->bits |= iterbit; |
return(NULL); |
break; |
|
} |
} |
} |
e->bits |= types[i].bits; |
if (i == mansearch_keymax) { |
|
if (strcasecmp(key, "any")) { |
|
free(e); |
|
return(NULL); |
|
} |
|
e->bits |= ~0ULL; |
|
} |
} |
} |
|
|
return(e); |
return(e); |