28651ae5e7f233a145315c85cd652e8a4d2334c3
[metaproxy-moved-to-github.git] / src / metaproxy_prog.cpp
1 /* This file is part of Metaproxy.
2    Copyright (C) 2005-2012 Index Data
3
4 Metaproxy 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 Metaproxy 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 #include "config.hpp"
20
21 #include <yaz/log.h>
22 #include <yaz/options.h>
23 #include <yaz/daemon.h>
24
25 #include <yaz/sc.h>
26 #include <iostream>
27 #include <stdexcept>
28 #include <libxml/xinclude.h>
29
30 #include <metaproxy/filter.hpp>
31 #include <metaproxy/package.hpp>
32 #include <metaproxy/util.hpp>
33 #include "router_flexml.hpp"
34 #include "factory_static.hpp"
35
36 #if HAVE_UNISTD_H
37 #include <unistd.h>
38 #endif
39 #include <signal.h>
40 #ifdef WIN32
41 #include <direct.h>
42 #include <io.h>
43 #include <process.h>
44 #endif
45
46 namespace mp = metaproxy_1;
47
48 mp::RouterFleXML *routerp = 0;
49
50 static void set_log_prefix(void)
51 {
52 #if HAVE_UNISTD_H
53     char str[80];
54
55     sprintf(str, "%lld", (long long) getpid());
56     yaz_log_init_prefix(str);
57 #endif
58 }
59
60 #if HAVE_UNISTD_H
61 static pid_t process_group = 0;
62
63 static void sig_usr1_handler(int s)
64 {
65     yaz_log(YLOG_LOG, "metaproxy received SIGUSR1");
66     routerp->stop();
67 }
68
69 static void sig_term_handler(int s)
70 {
71     yaz_log(YLOG_LOG, "metaproxy received SIGTERM");
72     yaz_log(YLOG_LOG, "metaproxy stop");
73     kill(-process_group, SIGTERM); /* kill all children processes as well */
74     _exit(0);
75 }
76 #endif
77
78 static void work_common(void *data)
79 {
80     set_log_prefix();
81 #if HAVE_UNISTD_H
82     process_group = getpgid(0); // save process group ID
83
84     signal(SIGTERM, sig_term_handler);
85     signal(SIGUSR1, sig_usr1_handler);
86 #endif
87     routerp = (mp::RouterFleXML*) data;
88     routerp->start();
89
90     mp::Package pack;
91     pack.router(*routerp).move();
92     yaz_log(YLOG_LOG, "metaproxy stop"); /* only for graceful stop */
93 #if HAVE_UNISTD_H
94     kill(-process_group, SIGTERM); /* kill all children processes as well */
95 #endif
96     _exit(0);
97 }
98
99 static void work_debug(void *data)
100 {
101     work_common(data);
102 }
103
104 static void work_normal(void *data)
105 {
106 #if HAVE_UNISTD_H
107     /* make the current working process group leader */
108     setpgid(0, 0);
109 #endif
110     work_common(data);
111 }
112
113 static int sc_main(
114     yaz_sc_t s,
115     int argc, char **argv)
116 {
117     bool test_config = false;
118     const char *fname = 0;
119     int ret;
120     char *arg;
121     unsigned mode = 0;
122     const char *pidfile = 0;
123     const char *uid = 0;
124
125     set_log_prefix();
126
127     while ((ret = options("c{config}:Dh{help}l:p:tu:V{version}w:X",
128                           argv, argc, &arg)) != -2)
129     {
130         switch (ret)
131         {
132         case 'c':
133             fname = arg;
134             break;
135         case 'D':
136             mode = YAZ_DAEMON_FORK|YAZ_DAEMON_KEEPALIVE;
137             break;
138         case 'h':
139             std::cerr << "metaproxy\n"
140                 " -h|--help     help\n"
141                 " -V|--version  version\n"
142                 " -c|--config f config filename\n"
143                 " -D            daemon and keepalive operation\n"
144                 " -l f          log file f\n"
145                 " -p f          pid file f\n"
146                 " -t            test configuration\n"
147                 " -u id         change uid to id\n"
148                 " -w dir        changes working directory to dir\n"
149                 " -X            debug mode (no fork/daemon mode)\n"
150 #ifdef WIN32
151                 " -install      install windows service\n"
152                 " -remove       remove windows service\n"
153 #endif
154
155                       << std::endl;
156             break;
157         case 'l':
158             yaz_log_init_file(arg);
159             break;
160         case 'p':
161             pidfile = arg;
162             break;
163         case 't':
164             test_config = true;
165             break;
166         case 'u':
167             uid = arg;
168             break;
169         case 'V':
170             std::cout << VERSION;
171 #ifdef VERSION_SHA1
172             std::cout << " " VERSION_SHA1;
173 #endif
174             std::cout << "\n";
175             return 0;
176             break;
177         case 'w':
178             if (
179 #ifdef WIN32
180                 _chdir(arg)
181 #else
182                 chdir(arg)
183 #endif
184                 )
185             {
186                 std::cerr << "chdir " << arg << " failed" << std::endl;
187                 return 1;
188             }
189         case 'X':
190             mode = YAZ_DAEMON_DEBUG;
191             break;
192         case -1:
193             std::cerr << "bad option: " << arg << std::endl;
194             return 1;
195         }
196     }
197     if (!fname)
198     {
199         std::cerr << "No configuration given; use -h for help\n";
200         return 1;
201     }
202
203     yaz_log(YLOG_LOG, "metaproxy %s " VERSION
204 #ifdef VERSION_SHA1
205                 " " VERSION_SHA1
206 #endif
207         , test_config ? "test" : "start"
208             );
209
210     yaz_log_xml_errors(0, YLOG_LOG);
211     xmlDocPtr doc = xmlReadFile(fname,
212                                 NULL,
213                                 XML_PARSE_XINCLUDE + XML_PARSE_NOBLANKS
214                                 + XML_PARSE_NSCLEAN + XML_PARSE_NONET );
215
216     if (!doc)
217     {
218         yaz_log(YLOG_FATAL,"XML parsing failed");
219         return 1;
220     }
221     // and perform Xinclude then
222     int r = xmlXIncludeProcess(doc);
223     if (r == -1)
224     {
225         yaz_log(YLOG_FATAL, "XInclude processing failed");
226         return 1;
227     }
228     mp::wrbuf base_path;
229     const char *last_p = strrchr(fname,
230 #ifdef WIN32
231                                  '\\'
232 #else
233                                  '/'
234 #endif
235         );
236     if (last_p)
237         wrbuf_write(base_path, fname, last_p - fname);
238     else
239         wrbuf_puts(base_path, ".");
240     ret = 0;
241     try {
242         mp::FactoryStatic factory;
243         mp::RouterFleXML *router =
244             new mp::RouterFleXML(doc, factory, test_config, wrbuf_cstr(base_path));
245         if (!test_config)
246         {
247
248             yaz_sc_running(s);
249
250             yaz_daemon("metaproxy", mode, mode == YAZ_DAEMON_DEBUG ?
251                        work_debug : work_normal, router, pidfile, uid);
252         }
253     }
254     catch (std::logic_error &e) {
255         yaz_log(YLOG_FATAL,"std::logic error: %s" , e.what() );
256         ret = 1;
257     }
258     catch (std::runtime_error &e) {
259         yaz_log(YLOG_FATAL, "std::runtime error: %s" , e.what() );
260         ret = 1;
261     }
262     catch ( ... ) {
263         yaz_log(YLOG_FATAL, "Unknown Exception");
264         ret = 1;
265     }
266     xmlFreeDoc(doc);
267     if (test_config)
268         yaz_log(YLOG_LOG, "metaproxy test exit code %d", ret);
269     return ret;
270 }
271
272 static void sc_stop(yaz_sc_t s)
273 {
274     return;
275 }
276
277 int main(int argc, char **argv)
278 {
279     int ret;
280     yaz_sc_t s = yaz_sc_create("metaproxy", "metaproxy");
281
282     ret = yaz_sc_program(s, argc, argv, sc_main, sc_stop);
283
284     yaz_sc_destroy(&s);
285     exit(ret);
286 }
287
288 /*
289  * Local variables:
290  * c-basic-offset: 4
291  * c-file-style: "Stroustrup"
292  * indent-tabs-mode: nil
293  * End:
294  * vim: shiftwidth=4 tabstop=8 expandtab
295  */
296