adu.c

   1 /** \file adu.c The main functions used by all modes of operation. */
   2 #include "adu.h"
   3 #include <dirent.h> /* readdir() */
   4 #include <pwd.h>
   5 #include "format.h"
   6 #include "user.h"
   7 #include "select.cmdline.h"
   8 #include "select.h"
   9 #include "cmdline.h"
  10 #include "fd.h"
  11 #include "string.h"
  12 #include "error.h"
  13
  14 DEFINE_ERRLIST;
  15 int osl_errno;
  16
  17 /** In case a signal is received, its number is stored here. */
  18 static int signum;
  19
  20 /** Command line and config file options. */
  21 struct gengetopt_args_info conf;
  22
  23 /** Options passed to --select-options. */
  24 struct select_args_info select_conf;
  25
  26
  27 /**
  28  * The table containing the directory names and statistics.
  29  */
  30 struct osl_table *dir_table = NULL;
  31
  32 static struct osl_column_description dir_table_cols[] = {
  33         [DT_NAME] = {
  34                 .storage_type = OSL_MAPPED_STORAGE,
  35                 .storage_flags = 0,
  36                 .name = "dir",
  37         },
  38         [DT_NUM] = {
  39                 .storage_type = OSL_MAPPED_STORAGE,
  40                 .storage_flags = OSL_RBTREE | OSL_FIXED_SIZE | OSL_UNIQUE,
  41                 .name = "num",
  42                 .compare_function = uint64_compare,
  43                 .data_size = sizeof(uint64_t)
  44         },
  45         [DT_PARENT_NUM] = {
  46                 .storage_type = OSL_MAPPED_STORAGE,
  47                 .storage_flags = OSL_RBTREE | OSL_FIXED_SIZE | OSL_UNIQUE,
  48                 .name = "parent_num",
  49                 .compare_function = size_compare,
  50                 .data_size = sizeof(uint64_t)
  51         },
  52         [DT_BYTES] = {
  53                 .storage_type = OSL_MAPPED_STORAGE,
  54                 .storage_flags =  OSL_RBTREE | OSL_FIXED_SIZE,
  55                 .compare_function = size_compare,
  56                 .name = "num_bytes",
  57                 .data_size = sizeof(uint64_t)
  58         },
  59         [DT_FILES] = {
  60                 .storage_type = OSL_MAPPED_STORAGE,
  61                 .storage_flags =  OSL_RBTREE | OSL_FIXED_SIZE,
  62                 .compare_function = size_compare,
  63                 .name = "num_files",
  64                 .data_size = sizeof(uint64_t)
  65         }
  66 };
  67
  68 static struct osl_table_description dir_table_desc = {
  69         .name = "dir_table",
  70         .num_columns = NUM_DT_COLUMNS,
  71         .flags = 0,
  72         .column_descriptions = dir_table_cols,
  73 };
  74
  75 /**
  76  * The log function.
  77  *
  78  * \param ll Loglevel.
  79  * \param fmt Usual format string.
  80  *
  81  * All XXX_LOG() macros use this function.
  82  */
  83 __printf_2_3 void __log(int ll, const char* fmt,...)
  84 {
  85         va_list argp;
  86         FILE *outfd;
  87         struct tm *tm;
  88         time_t t1;
  89         char str[255] = "";
  90
  91         if (ll < conf.loglevel_arg)
  92                 return;
  93         outfd = stderr;
  94         time(&t1);
  95         tm = localtime(&t1);
  96         strftime(str, sizeof(str), "%b %d %H:%M:%S", tm);
  97         fprintf(outfd, "%s ", str);
  98         va_start(argp, fmt);
  99         vfprintf(outfd, fmt, argp);
 100         va_end(argp);
 101 }
 102
 103 static void close_dir_table(void)
 104 {
 105         int ret;
 106
 107         if (!dir_table)
 108                 return;
 109         ret = osl(osl_close_table(dir_table, OSL_MARK_CLEAN));
 110         if (ret < 0)
 111                 ERROR_LOG("failed to close dir table: %s\n", adu_strerror(-ret));
 112         free((char *)dir_table_desc.dir);
 113         dir_table = NULL;
 114 }
 115
 116 void close_all_tables(void)
 117 {
 118         close_dir_table();
 119         close_user_tables();
 120 }
 121
 122 static void signal_handler(int s)
 123 {
 124         signum = s;
 125 }
 126
 127 void check_signals(void)
 128 {
 129         if (likely(!signum))
 130                 return;
 131         EMERG_LOG("caught signal %d\n", signum);
 132         close_all_tables();
 133         exit(EXIT_FAILURE);
 134 }
 135
 136 static int init_signals(void)
 137 {
 138         if (signal(SIGINT, &signal_handler) == SIG_ERR)
 139                 return -E_SIGNAL_SIG_ERR;
 140         if (signal(SIGTERM, &signal_handler) == SIG_ERR)
 141                 return -E_SIGNAL_SIG_ERR;
 142         if (signal(SIGPIPE, &signal_handler) == SIG_ERR)
 143                 return -E_SIGNAL_SIG_ERR;
 144         return 1;
 145 }
 146
 147 int open_dir_table(int create)
 148 {
 149         dir_table_desc.dir = adu_strdup(conf.database_dir_arg);
 150
 151         if (create) {
 152                 int ret = osl(osl_create_table(&dir_table_desc));
 153                 if (ret < 0) {
 154                         free((char *)dir_table_desc.dir);
 155                         return ret;
 156                 }
 157         }
 158         return osl(osl_open_table(&dir_table_desc, &dir_table));
 159 }
 160
 161 static int check_args(void)
 162 {
 163         if (conf.create_given && !conf.base_dir_given)
 164                 return -E_SYNTAX;
 165
 166         /* remove trailing slashes from base-dir arg */
 167         if (conf.base_dir_given) {
 168                 size_t len = strlen(conf.base_dir_arg);
 169                 for (;;) {
 170                         if (!len) /* empty string */
 171                                 return -ERRNO_TO_ERROR(EINVAL);
 172                         if (!--len) /* length 1 is always OK */
 173                                 break;
 174                         if (conf.base_dir_arg[len] != '/')
 175                                 break; /* no trailing slash, also OK */
 176                         conf.base_dir_arg[len] = '\0';
 177                 }
 178         }
 179         return 1;
 180 }
 181
 182 static int print_complete_help_and_die(void)
 183 {
 184         const char **line;
 185
 186         printf("%s-%s\n", CMDLINE_PARSER_PACKAGE, CMDLINE_PARSER_VERSION);
 187         printf("%s\n\n", gengetopt_args_info_purpose);
 188         printf("%s\n\n", gengetopt_args_info_usage);
 189
 190         if (conf.help_given)
 191                 line = gengetopt_args_info_help;
 192         else
 193                 line = gengetopt_args_info_detailed_help;
 194         for (; *line; line++)
 195                 printf("%s\n", *line);
 196
 197         if (conf.help_given)
 198                 line = select_args_info_help;
 199         else
 200                 line  = select_args_info_detailed_help;
 201         printf("Select options:\n");
 202         for (; *line; line++)
 203                 printf("%s\n", *line);
 204
 205         printf("Interactive commands:\n");
 206         print_interactive_help();
 207         cmdline_parser_free(&conf);
 208         select_cmdline_parser_free(&select_conf);
 209         exit(EXIT_FAILURE);
 210 }
 211
 212 int main(int argc, char **argv)
 213 {
 214         int ret;
 215         struct cmdline_parser_params params = {
 216                 .override = 1,
 217                 .initialize = 1,
 218                 .check_required = 0,
 219                 .check_ambiguity = 0,
 220                 .print_errors = 0
 221         };
 222         select_cmdline_parser_init(&select_conf);
 223         cmdline_parser_init(&conf);
 224         /* ignore errors and print complete help if --help was given */
 225         cmdline_parser_ext(argc, argv, &conf, &params);
 226         if (conf.help_given || conf.detailed_help_given)
 227                 print_complete_help_and_die();
 228         cmdline_parser_free(&conf);
 229         params.check_required = 1;
 230         params.check_ambiguity = 1;
 231         params.print_errors = 1;
 232         ret = cmdline_parser_ext(argc, argv, &conf, &params);
 233         if (ret)
 234                 exit(EXIT_FAILURE);
 235
 236         ret = check_args();
 237         if (ret < 0)
 238                 goto out;
 239         ret = init_signals();
 240         if (ret < 0)
 241                 goto out;
 242         ret = -E_SYNTAX;
 243         if (conf.select_given)
 244                 ret = com_select();
 245         else if (conf.create_given)
 246                 ret = com_create();
 247         else
 248                 ret = com_interactive();
 249         if (ret < 0)
 250                 goto out;
 251 out:
 252         if (ret < 0) {
 253                 ERROR_LOG("%s\n", adu_strerror(-ret));
 254                 return -EXIT_FAILURE;
 255         }
 256         cmdline_parser_free(&conf);
 257         select_cmdline_parser_free(&select_conf);
 258         return EXIT_SUCCESS;
 259 }