Fix a couple of gengetopt-related memory leaks.
[adu.git] / 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 }