printf family format fixup found (har har) and suggested by Scott McKellar -- %lf...
[OpenSRF.git] / src / libstack / osrf_system.c
1 #include "osrf_system.h"
2 #include <signal.h>
3 #include "osrf_application.h"
4 #include "osrf_prefork.h"
5
6 void __osrfSystemSignalHandler( int sig );
7
8 transport_client* __osrfGlobalTransportClient = NULL;
9
10 transport_client* osrfSystemGetTransportClient() {
11         return __osrfGlobalTransportClient;
12 }
13
14 void osrfSystemIgnoreTransportClient() {
15         __osrfGlobalTransportClient = NULL;
16 }
17
18 transport_client* osrf_system_get_transport_client() {
19         return __osrfGlobalTransportClient;
20 }
21
22 int osrf_system_bootstrap_client( char* config_file, char* contextnode ) {
23         return osrf_system_bootstrap_client_resc(config_file, contextnode, NULL);
24 }
25
26 int osrfSystemBootstrapClientResc( char* config_file, char* contextnode, char* resource ) {
27         return osrf_system_bootstrap_client_resc( config_file, contextnode, resource );
28 }
29
30
31 int _osrfSystemInitCache() {
32
33         jsonObject* cacheServers = osrf_settings_host_value_object("/cache/global/servers/server");
34         char* maxCache = osrf_settings_host_value("/cache/global/max_cache_time");
35
36         if( cacheServers && maxCache) {
37
38                 if( cacheServers->type == JSON_ARRAY ) {
39                         int i;
40                         char* servers[cacheServers->size];
41                         for( i = 0; i != cacheServers->size; i++ ) {
42                                 servers[i] = jsonObjectGetString( jsonObjectGetIndex(cacheServers, i) );
43                                 osrfLogInfo( OSRF_LOG_MARK, "Adding cache server %s", servers[i]);
44                         }
45                         osrfCacheInit( servers, cacheServers->size, atoi(maxCache) );
46
47                 } else {
48                         char* servers[] = { jsonObjectGetString(cacheServers) };                
49                         osrfLogInfo( OSRF_LOG_MARK, "Adding cache server %s", servers[0]);
50                         osrfCacheInit( servers, 1, atoi(maxCache) );
51                 }
52
53         } else {
54                 osrfLogError( OSRF_LOG_MARK,  "Missing config value for /cache/global/servers/server _or_ "
55                         "/cache/global/max_cache_time");
56         }
57
58         return 0;
59 }
60
61
62 int osrfSystemBootstrap( char* hostname, char* configfile, char* contextNode ) {
63         if( !(hostname && configfile && contextNode) ) return -1;
64
65         /* first we grab the settings */
66         if(!osrfSystemBootstrapClientResc(configfile, contextNode, "settings_grabber" )) {
67                 osrfLogError( OSRF_LOG_MARK, "Unable to bootstrap");
68                 return -1;
69         }
70
71         osrf_settings_retrieve(hostname);
72         osrf_system_disconnect_client();
73
74         jsonObject* apps = osrf_settings_host_value_object("/activeapps/appname");
75         osrfStringArray* arr = osrfNewStringArray(8);
76         
77         _osrfSystemInitCache();
78
79         if(apps) {
80                 int i = 0;
81
82                 if(apps->type == JSON_STRING) {
83                         osrfStringArrayAdd(arr, jsonObjectGetString(apps));
84
85                 } else {
86                         jsonObject* app;
87                         while( (app = jsonObjectGetIndex(apps, i++)) ) 
88                                 osrfStringArrayAdd(arr, jsonObjectGetString(app));
89                 }
90
91                 char* appname = NULL;
92                 i = 0;
93                 while( (appname = osrfStringArrayGetString(arr, i++)) ) {
94
95                         char* lang = osrf_settings_host_value("/apps/%s/language", appname);
96
97                         if(lang && !strcasecmp(lang,"c"))  {
98
99                                 char* libfile = osrf_settings_host_value("/apps/%s/implementation", appname);
100                 
101                                 if(! (appname && libfile) ) {
102                                         osrfLogWarning( OSRF_LOG_MARK, "Missing appname / libfile in settings config");
103                                         continue;
104                                 }
105
106                                 osrfLogInfo( OSRF_LOG_MARK, "Launching application %s with implementation %s", appname, libfile);
107                 
108                                 int pid;
109                 
110                                 if( (pid = fork()) ) { 
111                                         // storage pid in local table for re-launching dead children...
112                                         osrfLogInfo( OSRF_LOG_MARK, "Launched application child %d", pid);
113         
114                                 } else {
115                 
116                                         fprintf(stderr, " * Running application %s\n", appname);
117                                         if( osrfAppRegisterApplication( appname, libfile ) == 0 ) 
118                                                 osrf_prefork_run(appname);
119         
120                                         osrfLogDebug( OSRF_LOG_MARK, "Server exiting for app %s and library %s", appname, libfile );
121                                         exit(0);
122                                 }
123                         } // language == c
124                 } 
125         }
126
127         /** daemonize me **/
128
129         /* background and let our children do their thing */
130         daemonize();
131         while(1) {
132                 signal(SIGCHLD, __osrfSystemSignalHandler);
133                 sleep(10000);
134         }
135         
136         return 0;
137 }
138
139 int osrf_system_bootstrap_client_resc( char* config_file, char* contextnode, char* resource ) {
140
141         if(osrfSystemGetTransportClient()) {
142                 osrfLogInfo(OSRF_LOG_MARK, "Client is already bootstrapped");
143                 return 1; /* we already have a client connection */
144         }
145
146         if( !( config_file && contextnode ) && ! osrfConfigHasDefaultConfig() ) {
147                 osrfLogError( OSRF_LOG_MARK, "No Config File Specified\n" );
148                 return -1;
149         }
150
151         if( config_file ) {
152                 osrfConfigCleanup();
153                 osrfConfig* cfg = osrfConfigInit( config_file, contextnode );
154                 osrfConfigSetDefaultConfig(cfg);
155         }
156
157
158         char* log_file          = osrfConfigGetValue( NULL, "/logfile");
159         char* log_level = osrfConfigGetValue( NULL, "/loglevel" );
160         osrfStringArray* arr = osrfNewStringArray(8);
161         osrfConfigGetValueList(NULL, arr, "/domains/domain");
162         char* username          = osrfConfigGetValue( NULL, "/username" );
163         char* password          = osrfConfigGetValue( NULL, "/passwd" );
164         char* port                      = osrfConfigGetValue( NULL, "/port" );
165         char* unixpath          = osrfConfigGetValue( NULL, "/unixpath" );
166         char* facility          = osrfConfigGetValue( NULL, "/syslog" );
167         char* actlog            = osrfConfigGetValue( NULL, "/actlog" );
168
169         char* domain = strdup(osrfStringArrayGetString( arr, 0 )); /* just the first for now */
170         osrfStringArrayFree(arr);
171
172    /* if we're a source-client, tell the logger */
173    char* isclient = osrfConfigGetValue(NULL, "/client");
174    if( isclient && !strcasecmp(isclient,"true") )
175       osrfLogSetIsClient(1);
176    free(isclient);
177
178         int llevel = 0;
179         int iport = 0;
180         if(port) iport = atoi(port);
181         if(log_level) llevel = atoi(log_level);
182
183         if(!log_file) { fprintf(stderr, "Log file needed\n"); return -1; }
184
185         if(!strcmp(log_file, "syslog")) {
186                 osrfLogInit( OSRF_LOG_TYPE_SYSLOG, contextnode, llevel );
187                 osrfLogSetSyslogFacility(osrfLogFacilityToInt(facility));
188                 if(actlog) osrfLogSetSyslogActFacility(osrfLogFacilityToInt(actlog));
189
190         } else {
191                 osrfLogInit( OSRF_LOG_TYPE_FILE, contextnode, llevel );
192                 osrfLogSetFile( log_file );
193         }
194
195         osrfLogInfo( OSRF_LOG_MARK, "Bootstrapping system with domain %s, port %d, and unixpath %s", domain, iport, unixpath );
196
197         transport_client* client = client_init( domain, iport, unixpath, 0 );
198
199         char* host;
200         host = getenv("HOSTNAME");
201
202         char tbuf[32];
203         memset(tbuf, 0x0, 32);
204         snprintf(tbuf, 32, "%f", get_timestamp_millis());
205
206         if(!host) host = "";
207         if(!resource) resource = "";
208
209         int len = strlen(resource) + 256;
210         char buf[len];
211         memset(buf,0,len);
212         snprintf(buf, len - 1, "%s_%s_%s_%d", resource, host, tbuf, getpid() );
213         
214         if(client_connect( client, username, password, buf, 10, AUTH_DIGEST )) {
215                 /* child nodes will leak the parents client... but we can't free
216                         it without disconnecting the parents client :( */
217                 __osrfGlobalTransportClient = client;
218         }
219
220         free(actlog);
221         free(facility);
222         free(log_level);
223         free(log_file);
224         free(username);
225         free(password);
226         free(port);     
227         free(unixpath);
228         free(domain);
229
230         if(__osrfGlobalTransportClient)
231                 return 1;
232
233         return 0;
234 }
235
236 int osrf_system_disconnect_client() {
237         client_disconnect( __osrfGlobalTransportClient );
238         client_free( __osrfGlobalTransportClient );
239         __osrfGlobalTransportClient = NULL;
240         return 0;
241 }
242
243 int osrf_system_shutdown() {
244         osrfConfigCleanup();
245         osrf_system_disconnect_client();
246         osrf_settings_free_host_config(NULL);
247         osrfAppSessionCleanup();
248         osrfLogCleanup();
249         return 1;
250 }
251
252
253
254
255 void __osrfSystemSignalHandler( int sig ) {
256
257         pid_t pid;
258         int status;
259
260         while( (pid = waitpid(-1, &status, WNOHANG)) > 0) {
261                 osrfLogWarning( OSRF_LOG_MARK, "We lost child %d", pid);
262         }
263
264         /** relaunch the server **/
265 }
266
267