chiark / gitweb /
REORG Delete everything that's not innduct or build system or changed for innduct
[innduct.git] / storage / tradindexed / tdx-util.c
diff --git a/storage/tradindexed/tdx-util.c b/storage/tradindexed/tdx-util.c
deleted file mode 100644 (file)
index c1b004b..0000000
+++ /dev/null
@@ -1,469 +0,0 @@
-/*  $Id: tdx-util.c 6289 2003-04-09 04:16:16Z rra $
-**
-**  Utility for managing a tradindexed overview spool.
-**
-**  This utility can manipulate a tradindexed overview spool in various ways,
-**  including some ways that are useful for recovery from crashes.  It allows
-**  the user to view the contents of the various data structures that
-**  tradindexed stores on disk.
-*/
-
-#include "config.h"
-#include "clibrary.h"
-#include <ctype.h>
-#include <dirent.h>
-#include <pwd.h>
-#include <sys/stat.h>
-
-#include "inn/buffer.h"
-#include "inn/history.h"
-#include "inn/innconf.h"
-#include "inn/messages.h"
-#include "inn/vector.h"
-#include "libinn.h"
-#include "ov.h"
-#include "ovinterface.h"
-#include "paths.h"
-#include "tdx-private.h"
-#include "tdx-structure.h"
-
-/*
-**  Dump the main index data, either all of it or that for a particular group
-**  if the group argument is non-NULL.
-*/
-static void
-dump_index(const char *group)
-{
-    struct group_index *index;
-
-    index = tdx_index_open(OV_READ);
-    if (index == NULL)
-        return;
-    if (group == NULL)
-        tdx_index_dump(index, stdout);
-    else {
-        const struct group_entry *entry;
-
-        entry = tdx_index_entry(index, group);
-        if (entry == NULL) {
-            warn("cannot find group %s", group);
-            return;
-        }
-        tdx_index_print(group, entry, stdout);
-    }
-    tdx_index_close(index);
-}
-
-
-/*
-**  Dump the data index file for a particular group.
-*/
-static void
-dump_group_index(const char *group)
-{
-    struct group_index *index;
-    struct group_entry *entry;
-    struct group_data *data;
-
-    index = tdx_index_open(OV_READ);
-    if (index == NULL)
-        return;
-    entry = tdx_index_entry(index, group);
-    if (entry == NULL) {
-        warn("cannot find group %s in the index", group);
-        return;
-    }
-    data = tdx_data_open(index, group, entry);
-    if (data == NULL) {
-        warn("cannot open group %s", group);
-        return;
-    }
-    tdx_data_index_dump(data, stdout);
-    tdx_data_close(data);
-    tdx_index_close(index);
-}
-
-
-/*
-**  Dump the overview data for a particular group.  If number is 0, dump the
-**  overview data for all current articles; otherwise, only dump the data for
-**  that particular article.  Include the article number, token, arrived time,
-**  and expires time (if any) in the overview data as additional fields.
-*/
-static void
-dump_overview(const char *group, ARTNUM number)
-{
-    struct group_index *index;
-    struct group_data *data;
-    struct group_entry *entry;
-    struct article article;
-    struct search *search;
-    char datestring[256];
-
-    index = tdx_index_open(OV_READ);
-    if (index == NULL)
-        return;
-    entry = tdx_index_entry(index, group);
-    if (entry == NULL) {
-        warn("cannot find group %s", group);
-        return;
-    }
-    data = tdx_data_open(index, group, entry);
-    if (data == NULL) {
-        warn("cannot open group %s", group);
-        return;
-    }
-    data->refcount++;
-
-    if (number != 0)
-        search = tdx_search_open(data, number, number, entry->high);
-    else
-        search = tdx_search_open(data, entry->low, entry->high, entry->high);
-    if (search == NULL) {
-        if (number != 0)
-            puts("Article not found");
-        else
-            warn("cannot open search in %s: %lu - %lu", group, entry->low,
-                 entry->high);
-        return;
-    }
-    while (tdx_search(search, &article)) {
-        fwrite(article.overview, article.overlen - 2, 1, stdout);
-        printf("\tArticle: %lu\tToken: %s", article.number,
-               TokenToText(article.token));
-        makedate(article.arrived, true, datestring, sizeof(datestring));
-        printf("\tArrived: %s", datestring);
-        if (article.expires != 0) {
-            makedate(article.expires, true, datestring, sizeof(datestring));
-            printf("\tExpires: %s", datestring);
-        }
-        printf("\n");
-    }
-    tdx_search_close(search);
-    tdx_data_close(data);
-    tdx_index_close(index);
-}
-
-
-/*
-**  Check a string to see if its a valid number.
-*/
-static bool
-check_number(const char *string)
-{
-    const char *p;
-
-    for (p = string; *p != '\0'; p++)
-        if (!CTYPE(isdigit, *p))
-            return false;
-    return true;
-}
-
-
-/*
-**  Find the message ID in the group overview data and return a copy of it.
-**  Caller is responsible for freeing.
-*/
-static char *
-extract_messageid(const char *overview)
-{
-    const char *p, *end;
-    int count;
-
-    for (p = overview, count = 0; count < 4; count++) {
-        p = strchr(p + 1, '\t');
-        if (p == NULL)
-            return NULL;
-    }
-    p++;
-    end = strchr(p, '\t');
-    if (end == NULL)
-        return NULL;
-    return xstrndup(p, end - p);
-}
-
-
-/*
-**  Compare two file names assuming they're numbers, used to sort the list of
-**  articles numerically.  Suitable for use as a comparison function for
-**  qsort.
-*/
-static int
-file_compare(const void *p1, const void *p2)
-{
-    const char *file1 = *((const char * const *) p1);
-    const char *file2 = *((const char * const *) p2);
-    ARTNUM n1, n2;
-
-    n1 = strtoul(file1, NULL, 10);
-    n2 = strtoul(file2, NULL, 10);
-    if (n1 > n2)
-        return 1;
-    else if (n1 < n2)
-        return -1;
-    else
-        return 0;
-}
-
-
-/*
-**  Get a list of articles in a directory, sorted by article number.
-*/
-static struct vector *
-article_list(const char *directory)
-{
-    DIR *articles;
-    struct dirent *file;
-    struct vector *list;
-
-    list = vector_new();
-    articles = opendir(directory);
-    if (articles == NULL)
-        sysdie("cannot open directory %s", directory);
-    while ((file = readdir(articles)) != NULL) {
-        if (!check_number(file->d_name))
-            continue;
-        vector_add(list, file->d_name);
-    }
-    closedir(articles);
-
-    qsort(list->strings, list->count, sizeof(list->strings[0]), file_compare);
-    return list;
-}
-
-
-/*
-**  Rebuild the overview data for a particular group.  Takes a path to a
-**  directory containing all the articles, as individual files, that should be
-**  in that group.  The names of the files should be the article numbers in
-**  the group.
-*/
-static void
-group_rebuild(const char *group, const char *path)
-{
-    char *filename, *histpath, *article, *wireformat, *p;
-    size_t size, file;
-    int flags, length;
-    struct buffer *overview = NULL;
-    struct vector *extra, *files;
-    struct history *history;
-    struct group_index *index;
-    struct group_data *data;
-    struct group_entry *entry, info;
-    struct article artdata;
-    struct stat st;
-
-    index = tdx_index_open(OV_READ);
-    if (index == NULL)
-        die("cannot open group index");
-    entry = tdx_index_entry(index, group);
-    if (entry == NULL) {
-        if (!tdx_index_add(index, group, 1, 0, "y"))
-            die("cannot create group %s", group);
-        entry = tdx_index_entry(index, group);
-        if (entry == NULL)
-            die("cannot find group %s", group);
-    }
-    info = *entry;
-    data = tdx_data_rebuild_start(group);
-    if (data == NULL)
-        die("cannot start data rebuild for %s", group);
-    if (!tdx_index_rebuild_start(index, entry))
-        die("cannot start index rebuild for %s", group);
-
-    histpath = concatpath(innconf->pathdb, _PATH_HISTORY);
-    flags = HIS_RDONLY | HIS_ONDISK;
-    history = HISopen(histpath, innconf->hismethod, flags);
-    if (history == NULL)
-        sysdie("cannot open history %s", histpath);
-    free(histpath);
-
-    extra = overview_extra_fields();
-    files = article_list(path);
-
-    info.count = 0;
-    info.high = 0;
-    info.low = 0;
-    for (file = 0; file < files->count; file++) {
-        filename = concatpath(path, files->strings[file]);
-        article = ReadInFile(filename, &st);
-        size = st.st_size;
-        if (article == NULL) {
-            syswarn("cannot read in %s", filename);
-            free(filename);
-            continue;
-        }
-
-        /* Check to see if the article is not in wire format.  If it isn't,
-           convert it.  We only check the first line ending. */
-        p = strchr(article, '\n');
-        if (p != NULL && (p == article || p[-1] != '\r')) {
-            wireformat = ToWireFmt(article, size, (size_t *)&length);
-            free(article);
-            article = wireformat;
-            size = length;
-        }
-
-        artdata.number = strtoul(files->strings[file], NULL, 10);
-        if (artdata.number > info.high)
-            info.high = artdata.number;
-        if (artdata.number < info.low || info.low == 0)
-            info.low = artdata.number;
-        info.count++;
-        overview = overview_build(artdata.number, article, size, extra,
-                                  overview);
-        artdata.overview = overview->data;
-        artdata.overlen = overview->left;
-        p = extract_messageid(overview->data);
-        if (p == NULL) {
-            warn("cannot find message ID in %s", filename);
-            free(filename);
-            free(article);
-            continue;
-        }
-        if (HISlookup(history, p, &artdata.arrived, NULL, &artdata.expires,
-                      &artdata.token)) {
-            if (!tdx_data_store(data, &artdata))
-                warn("cannot store data for %s", filename);
-        } else {
-            warn("cannot find article %s in history", p);
-        }
-        free(p);
-        free(filename);
-        free(article);
-    }
-    vector_free(files);
-    vector_free(extra);
-
-    info.indexinode = data->indexinode;
-    info.base = data->base;
-    if (!tdx_index_rebuild_finish(index, entry, &info))
-        die("cannot update group index for %s", group);
-    if (!tdx_data_rebuild_finish(group))
-        die("cannot finish rebuilding data for group %s", group);
-    tdx_data_close(data);
-    HISclose(history);
-}
-
-
-/*
-**  Change to the news user if possible, and if not, die.  Used for operations
-**  that may change the overview files so as not to mess up the ownership.
-*/
-static void
-setuid_news(void)
-{
-    struct passwd *pwd;
-
-    pwd = getpwnam(NEWSUSER);
-    if (pwd == NULL)
-        die("can't resolve %s to a UID (account doesn't exist?)", NEWSUSER);
-    if (getuid() == 0)
-        setuid(pwd->pw_uid);
-    if (getuid() != pwd->pw_uid)
-        die("must be run as %s", NEWSUSER);
-}
-
-
-/*
-**  Main routine.  Load inn.conf, parse the arguments, and dispatch to the
-**  appropriate function.
-*/
-int
-main(int argc, char *argv[])
-{
-    int option;
-    char mode = '\0';
-    const char *newsgroup = NULL;
-    const char *path = NULL;
-    ARTNUM article = 0;
-
-    message_program_name = "tdx-util";
-
-    if (!innconf_read(NULL))
-        exit(1);
-
-    /* Parse options. */
-    opterr = 0;
-    while ((option = getopt(argc, argv, "a:n:p:AFR:gio")) != EOF) {
-        switch (option) {
-        case 'a':
-            article = strtoul(optarg, NULL, 10);
-            if (article == 0)
-                die("invalid article number %s", optarg);
-            break;
-        case 'n':
-            newsgroup = optarg;
-            break;
-        case 'p':
-            innconf->pathoverview = xstrdup(optarg);
-            break;
-        case 'A':
-            if (mode != '\0')
-                die("only one mode option allowed");
-            mode = 'A';
-            break;
-        case 'F':
-            if (mode != '\0')
-                die("only one mode option allowed");
-            mode = 'F';
-            break;
-        case 'R':
-            if (mode != '\0')
-                die("only one mode option allowed");
-            mode = 'R';
-            path = optarg;
-            break;
-        case 'g':
-            if (mode != '\0')
-                die("only one mode option allowed");
-            mode = 'g';
-            break;
-        case 'i':
-            if (mode != '\0')
-                die("only one mode option allowed");
-            mode = 'i';
-            break;
-        case 'o':
-            if (mode != '\0')
-                die("only one mode option allowed");
-            mode = 'o';
-            break;
-        default:
-            die("invalid option %c", optopt);
-            break;
-        }
-    }
-
-    /* Modes g and o require a group be specified. */
-    if ((mode == 'g' || mode == 'o' || mode == 'R') && newsgroup == NULL)
-        die("group must be specified for -%c", mode);
-
-    /* Run the specified function. */
-    switch (mode) {
-    case 'A':
-        tdx_index_audit(false);
-        break;
-    case 'F':
-        setuid_news();
-        tdx_index_audit(true);
-        break;
-    case 'R':
-        setuid_news();
-        group_rebuild(newsgroup, path);
-        break;
-    case 'i':
-        dump_index(newsgroup);
-        break;
-    case 'g':
-        dump_group_index(newsgroup);
-        break;
-    case 'o':
-        dump_overview(newsgroup, article);
-        break;
-    default:
-        die("a mode option must be specified");
-        break;
-    }
-    exit(0);
-}