Merge branch 'master' of ssh://git.indexdata.com/home/git/pub/pazpar2
[pazpar2-moved-to-github.git] / src / pazpar2.c
1 /* This file is part of Pazpar2.
2    Copyright (C) 2006-2011 Index Data
3
4 Pazpar2 is free software; you can redistribute it and/or modify it under
5 the terms of the GNU General Public License as published by the Free
6 Software Foundation; either version 2, or (at your option) any later
7 version.
8
9 Pazpar2 is distributed in the hope that it will be useful, but WITHOUT ANY
10 WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12 for more details.
13
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
17
18 */
19
20 #if HAVE_CONFIG_H
21 #include <config.h>
22 #endif
23 #ifdef WIN32
24 #include <winsock.h>
25 #endif
26
27 #include <signal.h>
28 #include <assert.h>
29
30 #include "parameters.h"
31 #include "session.h"
32 #include "ppmutex.h"
33 #include <yaz/daemon.h>
34 #include <yaz/log.h>
35 #include <yaz/options.h>
36 #include <yaz/sc.h>
37
38 // #define MTRACE
39 #ifdef MTRACE
40 #include <mcheck.h>
41 #endif
42
43 static struct conf_config *sc_stop_config = 0;
44
45 void child_handler(void *data)
46 {
47     struct conf_config *config = (struct conf_config *) data;
48
49     config_process_events(config);
50
51     config_destroy(config);
52 }
53
54 static void show_version(void)
55 {
56     char yaz_version_str[80];
57     printf("Pazpar2 " PACKAGE_VERSION 
58 #ifdef PAZPAR2_VERSION_SHA1
59            " "
60            PAZPAR2_VERSION_SHA1
61 #endif
62 "\n");
63
64     yaz_version(yaz_version_str, 0);
65
66     printf("Configuration:");
67 #if YAZ_HAVE_ICU
68     printf(" icu:enabled");
69 #else
70     printf(" icu:disabled");
71 #endif
72     printf(" yaz:%s", yaz_version_str);
73     printf("\n");
74     exit(0);
75 }            
76
77 #ifdef WIN32
78 static int tcpip_init (void)
79 {
80     WORD requested;
81     WSADATA wd;
82
83     requested = MAKEWORD(1, 1);
84     if (WSAStartup(requested, &wd))
85         return 0;
86     return 1;
87 }
88 #endif
89
90
91 static int sc_main(
92     yaz_sc_t s, 
93     int argc, char **argv)
94 {
95     int daemon = 0;
96     int ret;
97     int log_file_in_use = 0;
98     char *arg;
99     const char *pidfile = 0;
100     const char *uid = 0;
101     const char *listener_override = 0;
102     const char *config_fname = 0;
103     const char *record_fname = 0;
104     struct conf_config *config = 0;
105     int test_mode = 0;
106
107 #ifndef WIN32
108     if (signal(SIGPIPE, SIG_IGN) == SIG_ERR)
109         yaz_log(YLOG_WARN|YLOG_ERRNO, "signal");
110 #else
111     tcpip_init();
112 #endif
113
114     yaz_log_init_prefix("pazpar2");
115     yaz_log_xml_errors(0, YLOG_WARN);
116
117     while ((ret = options("dDf:h:l:p:R:tu:v:VX", argv, argc, &arg)) != -2)
118     {
119         switch (ret)
120         {
121         case 'd':
122             global_parameters.dump_records = 1;
123             break;
124         case 'D':
125             daemon = 1;
126             break;
127         case 'f':
128             config_fname = arg;
129             break;
130         case 'h':
131             listener_override = arg;
132             break;
133         case 'l':
134             yaz_log_init_file(arg);
135             log_file_in_use = 1;
136             break;
137         case 'p':
138             pidfile = arg;
139             break;
140         case 'R':
141             record_fname = arg;
142             break;
143         case 't':
144             test_mode = 1;
145             break;
146         case 'u':
147             uid = arg;
148             break;
149         case 'v':
150             yaz_log_init_level(yaz_log_mask_str(arg));
151             break;
152         case 'V':
153             show_version();
154         case 'X':
155             global_parameters.debug_mode++;
156             break;
157         default:
158             fprintf(stderr, "Usage: pazpar2\n"
159                     "    -d                      Show internal records\n"
160                     "    -D                      Daemon mode (background)\n"
161                     "    -f configfile           Configuration\n"
162                     "    -h [host:]port          Listener port\n"
163                     "    -l file                 Log to file\n"
164                     "    -p pidfile              PID file\n"
165                     "    -R recfile              HTTP recording file\n"
166                     "    -t                      Test configuration\n"
167                     "    -u uid                  Change user to uid\n"
168                     "    -V                      Show version\n"
169                     "    -v level                Set log level\n"
170                     "    -X                      Debug mode\n"
171 #ifdef WIN32
172                     "    -install                Install windows service\n"
173                     "    -remove                 Remove windows service\n"
174 #endif
175                 );
176             return 1;
177         }
178     }
179     if (!config_fname)
180     {
181         yaz_log(YLOG_FATAL, "Configuration must be given with option -f");
182         return 1;
183     }
184     pazpar2_mutex_init();
185     
186     config = config_create(config_fname, global_parameters.dump_records);
187     if (!config)
188         return 1;
189     sc_stop_config = config;
190     if (test_mode)
191     {
192         yaz_log(YLOG_LOG, "Configuration OK");
193         config_destroy(config);
194     }
195     else
196     {
197         yaz_log(YLOG_LOG, "Pazpar2 " VERSION  " "
198 #ifdef PAZPAR2_VERSION_SHA1
199                 PAZPAR2_VERSION_SHA1
200 #else
201                 "-"
202 #endif
203                 " started");
204         if (daemon && !log_file_in_use)
205         {
206             yaz_log(YLOG_FATAL, "Logfile must be given (option -l) for daemon "
207                     "mode");
208             return 1;
209         }
210         ret = config_start_listeners(config, listener_override, record_fname);
211         if (ret)
212             return ret; /* error starting http listener */
213         
214         yaz_sc_running(s);
215         
216         yaz_daemon("pazpar2",
217                    (global_parameters.debug_mode ? YAZ_DAEMON_DEBUG : 0) +
218                    (daemon ? YAZ_DAEMON_FORK : 0) + YAZ_DAEMON_KEEPALIVE,
219                    child_handler, config /* child_data */,
220                    pidfile, uid);
221     }
222     return 0;
223 }
224
225
226 static void sc_stop(yaz_sc_t s)
227 {
228     config_stop_listeners(sc_stop_config);
229 }
230
231 int main(int argc, char **argv)
232 {
233     int ret;
234     yaz_sc_t s = yaz_sc_create("pazpar2", "Pazpar2");
235     
236 #ifdef MTRACE
237     mtrace();
238 #endif
239
240     ret = yaz_sc_program(s, argc, argv, sc_main, sc_stop);
241
242     yaz_sc_destroy(&s);
243
244 #ifdef MTRACE
245     muntrace();
246 #endif
247
248
249     exit(ret);
250 }
251
252 /*
253  * Local variables:
254  * c-basic-offset: 4
255  * c-file-style: "Stroustrup"
256  * indent-tabs-mode: nil
257  * End:
258  * vim: shiftwidth=4 tabstop=8 expandtab
259  */
260