Multiple registers (alpha early)
[idzebra-moved-to-github.git] / index / main.c
1 /*
2  * Copyright (C) 1994-2002, Index Data
3  * All rights reserved.
4  *
5  * $Id: main.c,v 1.83 2002-04-04 14:14:13 adam Exp $
6  */
7 #include <stdio.h>
8 #include <string.h>
9 #include <assert.h>
10 #ifdef WIN32
11 #include <io.h>
12 #else
13 #include <unistd.h>
14 #endif
15
16 #include <yaz/data1.h>
17 #include "zebraapi.h"
18
19 char *prog;
20
21 int main (int argc, char **argv)
22 {
23     int ret;
24     int cmd = 0;
25     char *arg;
26     char *configName = 0;
27     int nsections = 0;
28     int disableCommit = 0;
29     size_t mem_max = 0;
30 #ifndef WIN32
31     char nbuf[100];
32 #endif
33     struct recordGroup rGroupDef;
34     ZebraService zs = 0;
35     ZebraHandle zh = 0;
36
37     nmem_init ();
38
39 #ifdef WIN32
40 #else
41     sprintf(nbuf, "%.40s(%d)", *argv, getpid());
42     yaz_log_init_prefix (nbuf);
43 #endif
44
45     rGroupDef.groupName = NULL;
46     rGroupDef.databaseName = NULL;
47     rGroupDef.path = NULL;
48     rGroupDef.recordId = NULL;
49     rGroupDef.recordType = NULL;
50     rGroupDef.flagStoreData = -1;
51     rGroupDef.flagStoreKeys = -1;
52     rGroupDef.flagRw = 1;
53     rGroupDef.databaseNamePath = 0;
54     rGroupDef.explainDatabase = 0;
55     rGroupDef.fileVerboseLimit = 100000;
56
57     prog = *argv;
58     if (argc < 2)
59     {
60         fprintf (stderr, "%s [options] command <dir> ...\n"
61         "Commands:\n"
62         " update <dir>  Update index with files below <dir>.\n"
63         "               If <dir> is empty filenames are read from stdin.\n"
64         " delete <dir>  Delete index with files below <dir>.\n"
65         " commit        Commit changes\n"
66         " clean         Clean shadow files\n"
67         "Options:\n"
68         " -t <type>     Index files as <type> (grs or text).\n"
69         " -c <config>   Read configuration file <config>.\n"
70         " -g <group>    Index files according to group settings.\n"
71         " -d <database> Records belong to Z39.50 database <database>.\n"
72         " -m <mbytes>   Use <mbytes> before flushing keys to disk.\n"
73         " -n            Don't use shadow system.\n"
74         " -s            Show analysis on stdout, but do no work.\n"
75         " -v <level>    Set logging to <level>.\n"
76         " -l <file>     Write log to <file>.\n"
77         " -f <n>        Display information for the first <n> records.\n"
78         " -V            Show version.\n", *argv
79                  );
80         exit (1);
81     }
82     while ((ret = options ("sVt:c:g:d:m:v:nf:l:"
83                            , argv, argc, &arg)) != -2)
84     {
85         if (ret == 0)
86         {
87             if(cmd == 0) /* command */
88             {
89                 if (!zs)
90                 {
91 #if ZMBOL
92                     logf (LOG_LOG, "zmbol version %s %s",
93                           ZEBRAVER, ZEBRADATE);
94 #else
95                     logf (LOG_LOG, "zebra version %s %s",
96                           ZEBRAVER, ZEBRADATE);
97 #endif
98                     zs = zebra_start (configName ? configName : "zebra.cfg");
99
100                     zh = zebra_open (zs);
101                 }
102                 if (rGroupDef.databaseName)
103                     zebra_select_database (zh, rGroupDef.databaseName);
104                 else
105                     zebra_select_database (zh, "Default");
106
107                 if (!strcmp (arg, "update"))
108                     cmd = 'u';
109                 else if (!strcmp (arg, "update1"))
110                     cmd = 'U';
111                 else if (!strcmp (arg, "update2"))
112                     cmd = 'm';
113                 else if (!strcmp (arg, "dump"))
114                     cmd = 's';
115                 else if (!strcmp (arg, "del") || !strcmp(arg, "delete"))
116                     cmd = 'd';
117                 else if (!strcmp (arg, "init"))
118                 {
119                     zebra_init (zh);
120                 }
121                 else if (!strcmp (arg, "commit"))
122                 {
123                     zebra_commit (zh);
124                 }
125                 else if (!strcmp (arg, "clean"))
126                 {
127                     assert (!"todo");
128                 }
129                 else if (!strcmp (arg, "stat") || !strcmp (arg, "status"))
130                 {
131                     assert (!"todo");
132                 }
133                 else if (!strcmp (arg, "compact"))
134                 {
135                     zebra_compact (zh);
136                 }
137                 else
138                 {
139                     logf (LOG_FATAL, "unknown command: %s", arg);
140                     exit (1);
141                 }
142             }
143             else
144             {
145                 rGroupDef.path = arg;
146                 zebra_set_group (zh, &rGroupDef);
147                 zebra_begin_trans (zh);
148
149                 switch (cmd)
150                 {
151                 case 'u':
152                     zebra_repository_update (zh);
153                     break;
154                 case 'd':
155                     zebra_repository_delete (zh);
156                     break;
157                 case 's':
158                     logf (LOG_LOG, "dumping %s", rGroupDef.path);
159                     zebra_repository_show (zh);
160                     nsections = 0;
161                     break;
162                 default:
163                     nsections = 0;
164                 }
165                 cmd = 0;
166                 zebra_end_trans (zh);
167                 log_event_end (NULL, NULL);
168             }
169         }
170         else if (ret == 'V')
171         {
172 #if ZMBOL
173             fprintf (stderr, "Z'mbol %s %s\n", ZEBRAVER, ZEBRADATE);
174 #else
175             fprintf (stderr, "Zebra %s %s\n", ZEBRAVER, ZEBRADATE);
176 #endif
177             fprintf (stderr, " (C) 1994-2002, Index Data ApS\n");
178 #ifdef WIN32
179 #ifdef _DEBUG
180             fprintf (stderr, " WIN32 Debug\n");
181 #else
182             fprintf (stderr, " WIN32 Release\n");
183 #endif
184 #endif
185 #if HAVE_BZLIB_H
186             fprintf (stderr, "libbzip2\n"
187                      " (C) 1996-1999 Julian R Seward.  All rights reserved.\n");
188 #endif
189         }
190         else if (ret == 'v')
191             yaz_log_init_level (yaz_log_mask_str(arg));
192         else if (ret == 'l')
193             yaz_log_init_file (arg);
194         else if (ret == 'm')
195             mem_max = 1024*1024*atoi(arg);
196         else if (ret == 'd')
197             rGroupDef.databaseName = arg;
198         else if (ret == 's')
199             rGroupDef.flagRw = 0;
200         else if (ret == 'g')
201             rGroupDef.groupName = arg;
202         else if (ret == 'f')
203             rGroupDef.fileVerboseLimit = atoi(arg);
204         else if (ret == 'c')
205             configName = arg;
206         else if (ret == 't')
207             rGroupDef.recordType = arg;
208         else if (ret == 'n')
209             disableCommit = 1;
210         else
211             logf (LOG_WARN, "unknown option '-%s'", arg);
212     }
213     zebra_close (zh);
214     zebra_stop (zs);
215     exit (0);
216     return 0;
217 }
218