ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/i-scream/projects/cms/source/ihost/ihost.c

Comparing projects/cms/source/ihost/ihost.c (file contents):
Revision 1.2 by pajs, Fri May 10 20:05:05 2002 UTC vs.
Revision 1.53 by tdb, Sat Sep 24 13:30:40 2005 UTC

#	Line 1 | Line 1
1	+	/*
2	+	* i-scream central monitoring system
3	+	* http://www.i-scream.org
4	+	* Copyright (C) 2000-2004 i-scream
5	+	*
6	+	* This program is free software; you can redistribute it and/or
7	+	* modify it under the terms of the GNU General Public License
8	+	* as published by the Free Software Foundation; either version 2
9	+	* of the License, or (at your option) any later version.
10	+	*
11	+	* This program is distributed in the hope that it will be useful,
12	+	* but WITHOUT ANY WARRANTY; without even the implied warranty of
13	+	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14	+	* GNU General Public License for more details.
15	+	*
16	+	* You should have received a copy of the GNU General Public License
17	+	* along with this program; if not, write to the Free Software
18	+	* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19	+	*/
20	+
21	+	#ifdef HAVE_CONFIG_H
22	+	#include "config.h"
23	+	#endif
24	+
25		#include <stdio.h>
2	–	#include <sys/socket.h>
26		#include <stdlib.h>
27		#include <unistd.h>
28	<	#include <syslog.h>
28	>	#include <string.h>
29	>	#include <sys/types.h>
30	>	#include <stdarg.h>
31	>	#include <errno.h>
32	>	#ifndef WIN32
33	>	#include <sys/socket.h>
34	>	#include <netdb.h>
35		#include <netinet/in.h>
36	+	#else
37	+	#include <winsock2.h>
38	+	#include <getopt.h>
39	+	#endif
40	+	#include <time.h>
41	+
42		#include <ukcprog.h>
43	<	#include <netdb.h>
9	<	#include <strings.h>
43	>	#include <statgrab.h>
44
45	+	#define LOG_CRIT 0
46	+	#define LOG_ERR 1
47	+	#define LOG_INFO 2
48	+	#define LOG_DEBUG 3
49	+
50	+	#define SERVICENAME "ihost"
51	+
52	+	/* Windows printf does not understand %lld, so we have to use %I64d */
53	+	#ifdef WIN32
54	+	#define LLD "%I64d"
55	+	#define OPTSTRING "vVn:i:s:p:w:h"
56	+	#define SLEEP 10000
57	+	#else
58	+	#define LLD "%lld"
59	+	#define OPTSTRING "vfVn:i:s:p:h"
60	+	#define SLEEP 10
61	+	#endif
62	+
63	+	/* The "socket" */
64	+	#ifdef WIN32
65	+	#define IHOST_SOCKET SOCKET
66	+	#define CLOSESOCKET(socket) closesocket(socket)
67	+	#else
68	+	#define IHOST_SOCKET FILE *
69	+	#define CLOSESOCKET(socket) fclose(socket)
70	+	#endif
71	+
72		typedef struct{
73	<	int fm_port;
74	<	char *fm_host;
75	<
76	<	char *my_fqdn;
73	>	int filtermanager_port;
74	>	char *filtermanager_host;
75	>
76	>	char *host_ip;
77	>	char *host_fqdn;
78	>	int preset_fqdn;
79	>	int preset_ip;
80	>
81		char *server_fqdn;
82		int server_udp_port;
83	<	int server_tcp_port;
84	<	long last_modified;
85	<	char *files_list;
86	<	char *key;
83	>
84	>	/* Weird stuff iscream wants sent to it */
85	>	char *last_modified;
86	>	char *file_list;
87	>
88		int udp_update_time;
23	–	int tcp_update_time;
89
90	+	time_t config_ttl;
91	+
92		}ihost_state_t;
93
94	<	char* sock_comm(FILE *f_r, FILE *f_w, char* sendString){
95	<	char *reply;
96	<	fprintf(f_w, "%s", sendString);
30	<	fflush(f_w);
31	<	reply=fpgetline(f_r);
32	<	/* Returns pointer to static buffer */
33	<	return reply;
34	<	}
94	>	typedef struct{
95	>	int verbose;
96	>	int daemon;
97
98	<	int ihost_configure(ihost_state_t *ihost_state){
98	>	FILE *log;
99	>	}ihost_config_t;
100	>
101	>	typedef struct{
102		struct sockaddr_in addr;
103	<	struct in_addr haddr;
104	<	int sd;
40	<	FILE *fm_fd_r, *fm_fd_w;
41	<	char *reply;
42	<	char *reply_ptr;
103	>	int sock;
104	>	}udp_sockinfo_t;
105
106	<	if ((sd = socket(AF_INET, SOCK_STREAM, PF_UNSPEC)) < 0) {
107	<	errf("Can't create AF_INET socket (%m)");
46	<	return -1;
47	<	}
106	>	ihost_config_t ihost_config;
107	>	ihost_state_t ihost_state;
108
109	<	if (get_host_addr(ihost_state->fm_host, &haddr) != 0){
110	<	errf("Failed to resolve address %s (%m)", ihost_state->fm_host);
111	<	return -1;
109	>	extern int errno;
110	>
111	>	#ifdef WIN32
112	>	int run_server = 1;
113	>	int run_as_service = 0;
114	>	SERVICE_STATUS service_status;
115	>	SERVICE_STATUS_HANDLE hstatus;
116	>	#endif
117	>
118	>	/* Taken from the OpenSSH code. Its licence included in function.*/
119	>	#ifndef HAVE_STRLCAT
120	>
121	>	/*
122	>	* Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com>
123	>	* All rights reserved.
124	>	*
125	>	* Redistribution and use in source and binary forms, with or without
126	>	* modification, are permitted provided that the following conditions
127	>	* are met:
128	>	* 1. Redistributions of source code must retain the above copyright
129	>	*    notice, this list of conditions and the following disclaimer.
130	>	* 2. Redistributions in binary form must reproduce the above copyright
131	>	*    notice, this list of conditions and the following disclaimer in the
132	>	*    documentation and/or other materials provided with the distribution.
133	>	* 3. The name of the author may not be used to endorse or promote products
134	>	*    derived from this software without specific prior written permission.
135	>	*
136	>	* THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
137	>	* INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
138	>	* AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
139	>	* THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
140	>	* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
141	>	* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
142	>	* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
143	>	* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
144	>	* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
145	>	* ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
146	>	*/
147	>
148	>	/*
149	>	* Appends src to string dst of size siz (unlike strncat, siz is the
150	>	* full size of dst, not space left).  At most siz-1 characters
151	>	* will be copied.  Always NUL terminates (unless siz <= strlen(dst)).
152	>	* Returns strlen(src) + MIN(siz, strlen(initial dst)).
153	>	* If retval >= siz, truncation occurred.
154	>	*/
155	>	size_t
156	>	strlcat(dst, src, siz)
157	>	char *dst;
158	>	const char *src;
159	>	size_t siz;
160	>	{
161	>	register char *d = dst;
162	>	register const char *s = src;
163	>	register size_t n = siz;
164	>	size_t dlen;
165	>
166	>	/* Find the end of dst and adjust bytes left but don't go past end */
167	>	while (n-- != 0 && *d != '\0')
168	>	d++;
169	>	dlen = d - dst;
170	>	n = siz - dlen;
171	>
172	>	if (n == 0)
173	>	return(dlen + strlen(s));
174	>	while (*s != '\0') {
175	>	if (n != 1) {
176	>	*d++ = *s;
177	>	n--;
178	>	}
179	>	s++;
180		}
181	+	*d = '\0';
182
183	<	memset((char *)&addr, 0, sizeof addr);
184	<	addr.sin_family = AF_INET;
56	<	memcpy((char *)&addr.sin_addr, &haddr, sizeof haddr);
57	<	addr.sin_port =  htons(ihost_state->fm_port);
183	>	return(dlen + (s - src));       /* count does not include NUL */
184	>	}
185
186	<	if (connect(sd, (struct sockaddr *)&addr, sizeof addr) != 0) {
187	<	errf("Failed to connect to %s on port %d (%m)", ihost_state->fm_host, ihost_state->fm_port);
188	<	return -1;
186	>	#endif
187	>	/* End strlcat function taken from OpenSSH */
188	>
189	>	void log_msg(int level, char *format, ...){
190	>	int cur_errno;
191	>	va_list ap;
192	>
193	>	cur_errno=errno;
194	>
195	>	if(level<=ihost_config.verbose){
196	>	va_start(ap, format);
197	>	vfprintf(ihost_config.log, format, ap);
198	>	va_end(ap);
199	>	if(level==LOG_CRIT){
200	>	fprintf(ihost_config.log, " (%s)\n", strerror(cur_errno));
201	>	}else{
202	>	fprintf(ihost_config.log, "\n");
203	>	}
204	>	fflush(ihost_config.log);
205		}
206	+	}
207
208	<	/* Need to open 2 files, one for reading one for writing, as it gets confused if we only use 1 :) */
209	<	if ((fm_fd_r=fdopen(sd,"r")) == NULL){
210	<	errf("Failed to open stream (%m)");
211	<	return -1;
208	>	int create_udp_sockinfo(udp_sockinfo_t *udp_sockinfo, char *hostname, int port){
209	>
210	>	struct in_addr haddr;
211	>
212	>	log_msg(LOG_DEBUG, "Resolving name for udp connection");
213	>	if(get_host_addr(hostname, &haddr) != 0){
214	>	log_msg(LOG_CRIT, "Failed to lookup name");
215	>	return 1;
216		}
217
218	<	if ((fm_fd_w=fdopen(dup(sd),"w")) == NULL){
219	<	errf("Failed to open stream (%m)");
220	<	return -1;
218	>	if((udp_sockinfo->sock=socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP)) < 0){
219	>	log_msg(LOG_CRIT, "Failed to create UDP socket");
220	>	return 1;
221		}
222
223	<	reply=sock_comm(fm_fd_r, fm_fd_w, "STARTCONFIG\n");
224	<	if ((reply==NULL) || (strncasecmp(reply, "OK", 2) != 0) ) {
225	<	errf("Server error");
226	<	return -1;
223	>	memset(&(udp_sockinfo->addr), 0, sizeof(struct sockaddr_in));
224	>	udp_sockinfo->addr.sin_family=AF_INET;
225	>	memcpy((char *)&(udp_sockinfo->addr.sin_addr), &haddr, sizeof(haddr));
226	>	udp_sockinfo->addr.sin_port = htons(port);
227	>
228	>	log_msg(LOG_DEBUG, "Socket created");
229	>	return 0;
230	>	}
231	>
232	>	IHOST_SOCKET create_tcp_connection(char *hostname, int port){
233	>	#ifdef WIN32
234	>	SOCKET sock;
235	>	#else
236	>	int sock;
237	>	#endif
238	>	struct sockaddr_in addr;
239	>	struct in_addr haddr;
240	>	FILE *f;
241	>
242	>	log_msg(LOG_DEBUG, "Creating tcp socket");
243	>	if((sock = socket(PF_INET, SOCK_STREAM, IPPROTO_TCP))<0){
244	>	log_msg(LOG_CRIT, "Failed to make TCP Socket");
245	>	goto out;
246		}
247
248	<	reply=sock_comm(fm_fd_r, fm_fd_w, "LASTMODIFIED\n");
249	<	if((reply== NULL) || (strncasecmp(reply, "ERROR", 5) ==0)){
250	<	errf("Server error (%m)");
251	<	return -1;
248	>	if((get_host_addr(hostname, &haddr))!=0){
249	>	log_msg(LOG_CRIT, "Failed to lookup name for %s", hostname);
250	>	close(sock);
251	>	goto out;
252		}
253	<	ihost_state->last_modified=atol(reply);
254	<
255	<	reply=sock_comm(fm_fd_r, fm_fd_w, "FILELIST\n");
256	<	if((reply== NULL) || (strncasecmp(reply, "ERROR", 5) ==0)){
257	<	errf("Server error (%m)");
258	<	return -1;
253	>
254	>	memset(&addr, 0, sizeof(addr));
255	>	addr.sin_family = AF_INET;
256	>	memcpy(&addr.sin_addr, &haddr, sizeof(haddr));
257	>	addr.sin_port = htons(port);
258	>
259	>	log_msg(LOG_DEBUG, "Creating a tcp connection");
260	>	if(connect(sock, (struct sockaddr *)&addr, sizeof(addr)) !=0){
261	>	log_msg(LOG_CRIT, "Failed to connect to hostname %s on port %d", hostname, port);
262	>	close(sock);
263	>	goto out;
264		}
265	<	if((ihost_state->files_list=strdup(reply)) == NULL){
266	<	errf("strdup failed (%m)");
267	<	return -1;
265	>
266	>	#ifndef WIN32
267	>	/* Windows does not treat sockets like this :( */
268	>	if((f=fdopen(sock, "r+"))==NULL){
269	>	log_msg(LOG_CRIT, "Failed to connect to open filedescriptor on tcp connection");
270	>	close(sock);
271	>	return NULL;
272		}
273
274	<	reply=sock_comm(fm_fd_r, fm_fd_w, "FQDN\n");
275	<	if((reply== NULL) || (strncasecmp(reply, "ERROR", 5)==0)){
276	<	errf("Server error (%m)");
274	>	return f;
275	>	#else
276	>	return sock;
277	>	#endif
278	>
279	>	out:
280	>	#ifdef WIN32
281	>	return 0;
282	>	#else
283	>	return NULL;
284	>	#endif
285	>	}
286	>
287	>	#ifndef WIN32
288	>	int tcp_comm(FILE *f, char *send, char **response, char *expected){
289	>
290	>	log_msg(LOG_DEBUG, "Sending %s", send);
291	>	fprintf(f, "%s\n", send);
292	>	fflush(f);
293	>	*response=fpgetline(f);
294	>	fseek(f, 0, SEEK_CUR);
295	>
296	>	if(*response!=NULL) log_msg(LOG_DEBUG, "Received %s", *response);
297	>
298	>	if( (*response==NULL) || (strcmp(*response, "ERROR")==0) ) return -1;
299	>
300	>	if(expected==NULL) return 0;
301	>
302	>	if((strcmp(expected, *response))==0) return 0;
303	>
304	>	log_msg(LOG_DEBUG, "Did not get expected response");
305	>	return -1;
306	>	}
307	>	#else
308	>	int tcp_comm(SOCKET soc, char *sendstr, char **response, char *expected) {
309	>	static char *rec = NULL;
310	>	char sendbuf[128];
311	>	char recbuf[128];
312	>	int bytesRecv;
313	>	char *tmp;
314	>
315	>	sprintf(sendbuf, "%s\n", sendstr);
316	>
317	>	log_msg(LOG_DEBUG, "Sending %s", sendstr);
318	>	send(soc, sendbuf, strlen(sendbuf), 0);
319	>	bytesRecv = recv(soc, recbuf, 128, 0);
320	>
321	>	if(bytesRecv != 0 && bytesRecv != SOCKET_ERROR) {
322	>	/* remove \n and copy to a string */
323	>	recbuf[bytesRecv-1] = '\0';
324	>	tmp = realloc(rec, bytesRecv);
325	>	if(tmp == NULL) {
326	>	free(rec);
327	>	rec = NULL;
328	>	log_msg(LOG_CRIT, "out of memory");
329	>	return -1;
330	>	}
331	>	rec = tmp;
332	>	rec = strcpy(rec, recbuf);
333	>	*response = rec;
334	>	log_msg(LOG_DEBUG, "Received %s", *response);
335	>	} else {
336		return -1;
337		}
338	<	if((ihost_state->my_fqdn=strdup(reply)) == NULL){
339	<	errf("strdup failed (%m)");
338	>	if(strcmp(*response, "ERROR")==0) return -1;
339	>
340	>	if(expected==NULL) return 0;
341	>
342	>	if((strcmp(expected, *response))==0) return 0;
343	>
344	>	log_msg(LOG_DEBUG, "Did not get expected response");
345	>	return -1;
346	>	}
347	>	#endif /* WIN32 */
348	>
349	>	int tcp_comm_strdup(IHOST_SOCKET f, char *send, char **response, char *expected)
350	>	{
351	>	if((tcp_comm(f, send, response, expected))!=0){
352		return -1;
353		}
354
355	<	reply=sock_comm(fm_fd_r, fm_fd_w, "UDPUpdateTime\n");
356	<	if(reply== NULL){
357	<	errf("Server error (%m)");
355	>	*response=strdup(*response);
356	>	if (response==NULL) return -1;
357	>
358	>	return 0;
359	>	}
360	>
361	>	int ihost_getconfig(ihost_state_t *ihost_state){
362	>	IHOST_SOCKET tcp_con;
363	>	char *response;
364	>	char *response_ptr;
365	>
366	>	/* Keep these in case of a failure and so it can keep running on the old config */
367	>	char *file_list=NULL;
368	>	char *last_modified=NULL;
369	>	char *host_fqdn=NULL;
370	>	char *host_ip=NULL;
371	>	int udp_update_time=0;
372	>	char *server_fqdn=NULL;
373	>	int server_udp_port=0;
374	>	time_t config_ttl=0;
375	>
376	>	if((tcp_con=create_tcp_connection(ihost_state->filtermanager_host, ihost_state->filtermanager_port))
377	>	#ifndef WIN32
378	>	==NULL
379	>	#else
380	>	==0
381	>	#endif
382	>	) {
383		return -1;
384		}
385	<	if (strncasecmp(reply, "ERROR", 5) != 0){
386	<	ihost_state->udp_update_time=atoi(reply);
385	>
386	>	if(ihost_state->file_list!=NULL || ihost_state->last_modified!=NULL){
387	>	#ifndef WIN32
388	>	if(tcp_con==NULL)
389	>	#else
390	>	if(tcp_con==0)
391	>	#endif
392	>	{
393	>	goto error;
394	>	}
395	>
396	>	if((tcp_comm(tcp_con, "CHECKCONFIG", &response, "OK"))!=0){
397	>	goto error;
398	>	}
399	>
400	>	if((tcp_comm(tcp_con, ihost_state->file_list, &response, "OK"))!=0){
401	>	goto error;
402	>	}
403	>
404	>	if((tcp_comm(tcp_con, ihost_state->last_modified, &response, "OK"))==0){
405	>	if((tcp_comm(tcp_con, "END", &response, "OK"))!=0){
406	>	goto error;
407	>	}
408	>	CLOSESOCKET(tcp_con);
409	>	return 0;
410	>	}else{
411	>	if((strcmp(response, "EXPIRED"))!=0){
412	>	goto error;
413	>	}
414	>	}
415		}
416
417	<	reply=sock_comm(fm_fd_r, fm_fd_w, "TCPUpdateTime\n");
418	<	if(reply== NULL){
419	<	errf("Server error (%m)");
420	<	return -1;
417	>	/* If we got to here, the config must of expired */
418	>
419	>	if((tcp_comm(tcp_con, "STARTCONFIG", &response, "OK"))!=0){
420	>	goto error;
421		}
422	<	if (strncasecmp(reply, "ERROR", 5) != 0){
423	<	ihost_state->tcp_update_time=atoi(reply);
422	>
423	>	if((tcp_comm_strdup(tcp_con, "LASTMODIFIED", &response, NULL))!=0){
424	>	goto error;
425		}
426	+	last_modified=response;
427
428	<	reply=sock_comm(fm_fd_r, fm_fd_w, "ENDCONFIG\n");
429	<	if(reply== NULL){
128	<	errf("Server error (%m)");
129	<	return -1;
428	>	if((tcp_comm_strdup(tcp_con, "FILELIST", &response, NULL))!=0){
429	>	goto error;
430		}
431	+	file_list=response;
432
433	<	reply=sock_comm(fm_fd_r, fm_fd_w, "FILTER\n");
434	<	if((reply== NULL) || (strncasecmp(reply, "ERROR", 5)==0)){
134	<	errf("Server error (%m)");
135	<	return -1;
433	>	if((tcp_comm_strdup(tcp_con, "FQDN", &response, NULL))!=0){
434	>	goto error;
435		}
436	<	reply_ptr=strchr(reply,';');
437	<	if (reply_ptr==NULL){
438	<	errf("Incorrect data returned");
439	<	return -1;
436	>	host_fqdn=response;
437	>
438	>	if((tcp_comm_strdup(tcp_con, "IP", &response, NULL))!=0){
439	>	goto error;
440		}
441	<	*reply_ptr='\0';
442	<	if((ihost_state->server_fqdn=strdup(reply)) == NULL){
443	<	errf("strdup failed (%m)");
444	<	return -1;
441	>	host_ip=response;
442	>
443	>	if((tcp_comm(tcp_con, "UDPUpdateTime", &response, NULL))!=0){
444	>	goto error;
445		}
446	<	reply=++reply_ptr;
447	<	reply_ptr=strchr(reply,';');
448	<	if (reply_ptr==NULL){
449	<	errf("Incorrect data returned 2");
151	<	return -1;
446	>	udp_update_time=atoi(response);
447	>
448	>	if((tcp_comm(tcp_con, "ConfigTTL", &response, NULL))!=0){
449	>	goto error;
450		}
451	<	*reply_ptr='\0';
452	<	ihost_state->server_udp_port=atoi(reply);
453	<	reply=++reply_ptr;
454	<	ihost_state->server_tcp_port=atoi(reply);
157	<	if ((ihost_state->server_tcp_port==0) || (ihost_state->server_udp_port==0)){
158	<	errf("Incorrect data returned 3 ");
159	<	return -1;
451	>	config_ttl=atoi(response);
452	>
453	>	if((tcp_comm(tcp_con, "ENDCONFIG", &response, NULL))!=0){
454	>	goto error;
455		}
456
457	<	reply=sock_comm(fm_fd_r, fm_fd_w, "END\n");
458	<	if((reply== NULL) || (strncasecmp(reply, "ERROR", 5) ==0 )){
459	<	errf("Server error (%m)");
460	<	return -1;
457	>	if((tcp_comm(tcp_con, "FILTER", &response, NULL))!=0){
458	>	goto error;
459	>	}else{
460	>	response_ptr=strchr(response,';');
461	>	if(response_ptr==NULL){
462	>	log_msg(LOG_ERR, "Incorrect data sent by server");
463	>	goto error;
464	>	}
465	>	*response_ptr='\0';
466	>	server_fqdn=strdup(response);
467	>	if(server_fqdn==NULL){
468	>	goto error;
469	>	}
470	>	response_ptr++;
471	>	if(response_ptr==NULL){
472	>	log_msg(LOG_ERR, "Incorrect data sent by server");
473	>	goto error;
474	>	}
475	>
476	>	server_udp_port=atoi(response_ptr);
477	>
478	>	if (server_udp_port==0){
479	>	log_msg(LOG_ERR, "Incorrect data sent by server");
480	>	goto error;
481	>	}
482		}
483
484	<	if(fclose(fm_fd_r) !=0){
485	<	errf("Failed to close FD (%m)");
170	<	return -1;
484	>	if((tcp_comm(tcp_con, "END", &response, "OK"))!=0){
485	>	goto error;
486		}
487	<	if(fclose(fm_fd_w) !=0){
488	<	errf("Failed to close FD (%m)");
489	<	return -1;
487	>
488	>	CLOSESOCKET(tcp_con);
489	>
490	>	/* We have the data we need, and its all been read correctly */
491	>
492	>	/* Free the old data before pointing them to the new data. m_free copes should
493	>	* this already be NULL */
494	>	if(ihost_state->file_list!=NULL) free(ihost_state->file_list);
495	>	if(ihost_state->last_modified!=NULL) free(ihost_state->last_modified);
496	>	if(ihost_state->server_fqdn!=NULL) free(ihost_state->server_fqdn);
497	>
498	>	if(ihost_state->preset_fqdn){
499	>	if(host_fqdn != NULL) free(host_fqdn);
500	>	}else{
501	>	if(ihost_state->host_fqdn!=NULL) free(ihost_state->host_fqdn);
502	>	ihost_state->host_fqdn=host_fqdn;
503		}
504
505	+	if(ihost_state->preset_ip){
506	+	if(host_ip != NULL) free(host_ip);
507	+	}else{
508	+	if(ihost_state->host_ip!=NULL) free(ihost_state->host_ip);
509	+	ihost_state->host_ip=host_ip;
510	+	}
511	+
512	+
513	+	ihost_state->file_list=file_list;
514	+	ihost_state->last_modified=last_modified;
515	+	ihost_state->server_fqdn=server_fqdn;
516	+	ihost_state->server_udp_port=server_udp_port;
517	+	ihost_state->udp_update_time=udp_update_time;
518	+	ihost_state->config_ttl=config_ttl;
519	+
520	+	log_msg(LOG_DEBUG, "UDP Update time %d", udp_update_time);
521	+	log_msg(LOG_DEBUG, "Configure ttl %d", config_ttl);
522	+
523		return 0;
524
525	+	error:
526	+
527	+	if(file_list!=NULL) free(file_list);
528	+	if(last_modified!=NULL) free(last_modified);
529	+	if(host_fqdn!=NULL) free(host_fqdn);
530	+	if(server_fqdn!=NULL) free(server_fqdn);
531	+	if(host_ip!=NULL) free(host_ip);
532	+	CLOSESOCKET(tcp_con);
533	+
534	+	return -1;
535		}
536
537	<	int main(){
538	<	ihost_state_t ihost_state;
537	>	int get_system_stats(int seq_no, ihost_state_t *ihost_state, char *xml, int size){
538	>	char tmp[size];
539	>	sg_cpu_percents *cpu_percent;
540	>	sg_mem_stats *mem_stats;
541	>	sg_load_stats *load_stats;
542	>	sg_user_stats *user_stats;
543	>	sg_swap_stats *swap_stats;
544	>	sg_host_info *general_stats;
545	>	sg_fs_stats *disk_stats;
546	>	sg_disk_io_stats *diskio_stats;
547	>	sg_process_count *process_stats;
548	>	sg_network_io_stats *network_stats;
549	>	sg_page_stats *page_stats;
550	>	int disk_entries=0;
551	>	int diskio_entries=0;
552	>	int network_entries=0;
553
554	<	ihost_state.fm_host=strdup("kernow.ukc.ac.uk");
555	<	ihost_state.fm_port=4567;
554	>	int counter;
555	>	long long x;
556	>	long long y;
557
558	<	if(ihost_configure(&ihost_state)!=0){
559	<	errf("configure failed");
558	>	/* Print start of the packet we want */
559	>	snprintf(xml, size, "<packet seq_no=\"%d\" machine_name=\"%s\" date=\"%ld\" type=\"data\" ip=\"%s\">", \
560	>	seq_no, ihost_state->host_fqdn, (long) time(NULL), ihost_state->host_ip);
561	>
562	>	/* Get cpu stats, check it is correct, then fill in its entry for the xml */
563	>	if((cpu_percent=sg_get_cpu_percents())==NULL){
564	>	log_msg(LOG_CRIT, "Failed to get cpu statistics: %s (%s)",
565	>	sg_str_error(sg_get_error()), sg_get_error_arg());
566	>	}else{
567	>	snprintf(tmp, size, \
568	>	"<cpu><user>%3.2f</user><kernel>%3.2f</kernel><idle>%3.2f</idle><iowait>%3.2f</iowait><swap>%3.2f</swap></cpu>", \
569	>	cpu_percent->user, \
570	>	cpu_percent->kernel, \
571	>	cpu_percent->idle, \
572	>	cpu_percent->iowait, \
573	>	cpu_percent->swap);
574	>
575	>	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
576		}
577
578	+
579	+	/*Get mem stats, and fill in xml */
580	+
581	+	if((mem_stats=sg_get_mem_stats())==NULL){
582	+	log_msg(LOG_CRIT, "Failed to get memory statistics: %s (%s)",
583	+	sg_str_error(sg_get_error()), sg_get_error_arg());
584	+	}else{
585	+	snprintf(tmp, size, \
586	+	"<memory><total>"LLD"</total><free>"LLD"</free><used>"LLD"</used><cache>"LLD"</cache></memory>", \
587	+	mem_stats->total, \
588	+	mem_stats->free, \
589	+	mem_stats->used, \
590	+	mem_stats->cache);
591	+
592	+	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
593	+	}
594	+
595	+
596	+	/* Get load stats */
597	+
598	+	if((load_stats=sg_get_load_stats())==NULL){
599	+	log_msg(LOG_CRIT, "Failed to get load statistics: %s (%s)",
600	+	sg_str_error(sg_get_error()), sg_get_error_arg());
601	+	}else{
602	+	snprintf(tmp, size, \
603	+	"<load><load1>%.2lf</load1><load5>%.2lf</load5><load15>%.2lf</load15></load>", \
604	+	load_stats->min1, \
605	+	load_stats->min5, \
606	+	load_stats->min15);
607	+	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
608	+	}
609	+
610	+
611	+	/* get user stats */
612	+
613	+	if((user_stats=sg_get_user_stats())==NULL){
614	+	log_msg(LOG_CRIT, "Failed to get user statistics: %s (%s)",
615	+	sg_str_error(sg_get_error()), sg_get_error_arg());
616	+	}else{
617	+
618	+	snprintf(tmp, size, \
619	+	"<users><list>%s</list><count>%d</count></users>", \
620	+	user_stats->name_list, \
621	+	user_stats->num_entries);
622	+
623	+	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
624	+	}
625	+
626	+
627	+	/* swap stats */
628	+
629	+	if((swap_stats=sg_get_swap_stats())==NULL){
630	+	log_msg(LOG_CRIT, "Failed to get swap statistics: %s (%s)",
631	+	sg_str_error(sg_get_error()), sg_get_error_arg());
632	+	}else{
633	+	snprintf(tmp, size, \
634	+	"<swap><total>"LLD"</total><used>"LLD"</used><free>"LLD"</free></swap>",\
635	+	swap_stats->total, \
636	+	swap_stats->used, \
637	+	swap_stats->free);
638	+
639	+	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
640	+	}
641	+
642	+
643	+	/* general stats */
644	+
645	+	if((general_stats=sg_get_host_info())==NULL){
646	+	log_msg(LOG_CRIT, "Failed to get host info statistics: %s (%s)",
647	+	sg_str_error(sg_get_error()), sg_get_error_arg());
648	+	}else{
649	+	snprintf(tmp, size, \
650	+	"<os><name>%s</name><release>%s</release><version>%s</version><sysname>%s</sysname><platform>%s</platform><uptime>%ld</uptime></os>", \
651	+	general_stats->os_name, \
652	+	general_stats->os_release, \
653	+	general_stats->os_version, \
654	+	general_stats->hostname, \
655	+	general_stats->platform, \
656	+	(long)general_stats->uptime);
657	+
658	+	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
659	+
660	+	}
661	+
662	+
663	+	/* process stats */
664	+
665	+	if((process_stats=sg_get_process_count())==NULL){
666	+	log_msg(LOG_CRIT, "Failed to get process statistics: %s (%s)",
667	+	sg_str_error(sg_get_error()), sg_get_error_arg());
668	+	}else{
669	+	snprintf(tmp, size, \
670	+	"<processes><sleeping>%d</sleeping><cpu>%d</cpu><zombie>%d</zombie><stopped>%d</stopped><total>%d</total></processes>",\
671	+	process_stats->sleeping, \
672	+	process_stats->running, \
673	+	process_stats->zombie, \
674	+	process_stats->stopped, \
675	+	process_stats->total);
676	+
677	+	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
678	+
679	+	}
680	+
681	+
682	+	/* Get paging stats */
683	+
684	+	if((page_stats=sg_get_page_stats_diff())==NULL){
685	+	log_msg(LOG_CRIT, "Failed to get paging statistics: %s (%s)",
686	+	sg_str_error(sg_get_error()), sg_get_error_arg());
687	+	}else{
688	+	if(page_stats->systime!=0){
689	+	x=page_stats->pages_pagein / page_stats->systime;
690	+	y=page_stats->pages_pageout / page_stats->systime;
691	+	}else{
692	+	x=page_stats->pages_pagein;
693	+	y=page_stats->pages_pageout;
694	+	}
695	+	snprintf(tmp, size, \
696	+	"<pages><pageins>"LLD"</pageins><pageouts>"LLD"</pageouts></pages>", \
697	+	x, \
698	+	y);
699	+
700	+	if(strlcat(xml, tmp, size) >= size) goto too_big_error;
701	+	}
702	+
703	+
704	+	/* get diskio stats */
705	+
706	+	if((diskio_stats=sg_get_disk_io_stats_diff(&diskio_entries))==NULL){
707	+	log_msg(LOG_CRIT, "Failed to get disk io statistics: %s (%s)",
708	+	sg_str_error(sg_get_error()), sg_get_error_arg());
709	+	}else{
710	+	strlcat(xml, "<diskio>", size);
711	+	for(counter=0;counter<diskio_entries;counter++){
712	+
713	+	if(diskio_stats->systime!=0){
714	+	x=diskio_stats->read_bytes / diskio_stats->systime;
715	+	y=diskio_stats->write_bytes / diskio_stats->systime;
716	+	}else{
717	+	x=diskio_stats->read_bytes;
718	+	y=diskio_stats->write_bytes;
719	+	}
720	+
721	+	snprintf(tmp, size, \
722	+	"<p%d name=\"%s\" rbytes=\""LLD"\" wbytes=\""LLD"\"></p%d>", \
723	+	counter, \
724	+	diskio_stats->disk_name, \
725	+	x, \
726	+	y, \
727	+	counter);
728	+
729	+	strlcat(xml, tmp, size);
730	+	diskio_stats++;
731	+	}
732	+
733	+	if(strlcat(xml, "</diskio>", size) >= size) goto too_big_error;
734	+
735	+	}
736	+
737	+
738	+	/* get networks stats */
739	+
740	+	if((network_stats=sg_get_network_io_stats_diff(&network_entries))==NULL){
741	+	log_msg(LOG_CRIT, "Failed to get network io statistics: %s (%s)",
742	+	sg_str_error(sg_get_error()), sg_get_error_arg());
743	+	}else{
744	+	strlcat(xml, "<net>", size);
745	+	for(counter=0;counter<network_entries;counter++){
746	+	if(network_stats->systime!=0){
747	+	x=network_stats->rx / network_stats->systime;
748	+	y=network_stats->tx / network_stats->systime;
749	+	}else{
750	+	x=network_stats->rx;
751	+	y=network_stats->tx;
752	+	}
753	+
754	+	snprintf(tmp, size, \
755	+	"<p%d name=\"%s\" rx=\""LLD"\" tx=\""LLD"\"></p%d>", \
756	+	counter, \
757	+	network_stats->interface_name, \
758	+	x, \
759	+	y, \
760	+	counter);
761	+
762	+	strlcat(xml, tmp, size);
763	+	network_stats++;
764	+	}
765	+
766	+	if(strlcat(xml, "</net>", size) >= size) goto too_big_error;
767	+
768	+	}
769	+
770	+
771	+	/* get disk stats */
772	+
773	+	if((disk_stats=sg_get_fs_stats(&disk_entries))==NULL){
774	+	log_msg(LOG_CRIT, "Failed to get fs statistics: %s (%s)",
775	+	sg_str_error(sg_get_error()), sg_get_error_arg());
776	+	}else{
777	+	strlcat(xml, "<disk>", size);
778	+	for(counter=0;counter<disk_entries;counter++){
779	+	snprintf(tmp, size, \
780	+	"<p%d name=\"%s\" mount=\"%s\" fstype=\"%s\" total=\""LLD"\" used=\""LLD"\" avail=\""LLD"\" totalinodes=\""LLD"\" usedinodes=\""LLD"\" freeinodes=\""LLD"\"></p%d>", \
781	+	counter, \
782	+	disk_stats->device_name, \
783	+	disk_stats->mnt_point, \
784	+	disk_stats->fs_type, \
785	+	disk_stats->size, \
786	+	disk_stats->used, \
787	+	disk_stats->avail, \
788	+	disk_stats->total_inodes, \
789	+	disk_stats->used_inodes, \
790	+	disk_stats->free_inodes, \
791	+	counter);
792	+
793	+	strlcat(xml, tmp, size);
794	+
795	+	disk_stats++;
796	+	}
797	+
798	+	if(strlcat(xml, "</disk>", size) >= size) goto too_big_error;
799	+
800	+	}
801	+
802	+
803	+	if(strlcat(xml, "</packet>", size) >= size) goto too_big_error;
804	+
805	+	/*If we got to here, it should of all been filled in nicely now */
806		return 0;
807	+
808	+	too_big_error:
809	+	log_msg(LOG_ERR, "UDP Packet is too large. Throwing away the packet");
810	+	return -1;
811		}
812
813	+
814	+
815	+	/* WIN32 NT service stuff */
816	+	#ifdef WIN32
817	+	void service_stopped() {
818	+	if(run_as_service) {
819	+	service_status.dwCurrentState = SERVICE_STOPPED;
820	+	service_status.dwWin32ExitCode = errno;
821	+	service_status.dwServiceSpecificExitCode = 0;
822	+
823	+	SetServiceStatus(hstatus, &service_status);
824	+	}
825	+	}
826	+
827	+	void control_handler(DWORD request) {
828	+	switch(request) {
829	+	case SERVICE_CONTROL_STOP:
830	+	case SERVICE_CONTROL_SHUTDOWN:
831	+	service_status.dwWin32ExitCode = 0;
832	+	service_status.dwCurrentState = SERVICE_STOP_PENDING;
833	+	break;
834	+	default:
835	+	break;
836	+	}
837	+
838	+	SetServiceStatus (hstatus, &service_status);
839	+	}
840	+
841	+	/* attempt to tell service manager to start our service.
842	+	* return 0 on error, 1 on ok
843	+	*/
844	+	int start_service() {
845	+	SC_HANDLE scm;
846	+	SC_HANDLE service;
847	+
848	+	// Open SCM
849	+	if((scm = OpenSCManager(NULL, NULL, SC_MANAGER_CONNECT)) == NULL) {
850	+	log_msg(LOG_CRIT, "Failed to open Service Control Manager");
851	+	return 0;
852	+	}
853	+	// Locate the service
854	+	if((service = OpenService(scm, SERVICENAME, SERVICE_START)) == NULL) {
855	+	log_msg(LOG_CRIT, "Unable to open the service");
856	+	return 0;
857	+	}
858	+	// Start the service
859	+	if(StartService(service, 0, NULL) == 0) {
860	+	log_msg(LOG_CRIT, "Unable to start the service");
861	+	return 0;
862	+	}
863	+	return 1;
864	+	}
865	+
866	+	int stop_service() {
867	+	SC_HANDLE scm;
868	+	SC_HANDLE service;
869	+	SERVICE_STATUS status;
870	+
871	+	// Open SCM
872	+	if((scm = OpenSCManager(NULL, NULL, SC_MANAGER_CONNECT)) == NULL) {
873	+	log_msg(LOG_CRIT, "Failed to open Service Control Manager");
874	+	return 0;
875	+	}
876	+	// Locate service
877	+	if((service = OpenService(scm, SERVICENAME, SERVICE_STOP)) == NULL) {
878	+	log_msg(LOG_CRIT, "Unable to open the service");
879	+	return 0;
880	+	}
881	+	// Stop the service
882	+	if(!ControlService(service, SERVICE_CONTROL_STOP, &status)) {
883	+	log_msg(LOG_CRIT, "Unable to stop the service");
884	+	return 0;
885	+	}
886	+	return 1;
887	+	}
888	+
889	+	int register_service(int argc, char **argv) {
890	+	char path[MAX_PATH];
891	+	int cmdline_len;
892	+	int i;
893	+	char *cmdline;
894	+	char *tmp;
895	+	SC_HANDLE scm;
896	+
897	+	if(!GetModuleFileName(NULL, path, MAX_PATH)) {
898	+	log_msg(LOG_CRIT, "GetModuleFileName failed");
899	+	return 0;
900	+	}
901	+
902	+	// Calculate command line length
903	+	// 14 = 10 for " -w service", 2x quote around path and ending \0
904	+	cmdline_len = strlen(path) + 14;
905	+	for (i=0; i<argc; i++) {
906	+	// +1 for space prefix
907	+	cmdline_len += strlen(argv[i]) +1;
908	+	}
909	+
910	+	cmdline = malloc(cmdline_len);
911	+	if(cmdline == NULL) {
912	+	log_msg(LOG_CRIT, "out of memory");
913	+	return 0;
914	+	}
915	+	tmp = malloc(cmdline_len);
916	+	if(tmp == NULL) {
917	+	log_msg(LOG_CRIT, "out of memory");
918	+	free(cmdline);
919	+	return 0;
920	+	}
921	+
922	+	// Compile up the final command line call
923	+	snprintf(cmdline, cmdline_len, "\"%s\" -w service", path);
924	+	for (i=0; i<argc; i++) {
925	+	snprintf(tmp, cmdline_len, " %s", argv[i]);
926	+	strcat(cmdline, tmp);
927	+	}
928	+	free(tmp);
929	+
930	+	// Open SCM
931	+	if((scm = OpenSCManager(NULL, NULL, SC_MANAGER_CREATE_SERVICE)) == NULL) {
932	+	log_msg(LOG_CRIT, "Unable to open Service Control Manager");
933	+	return 0;
934	+	}
935	+
936	+	// Add the service
937	+	if (CreateService(scm, SERVICENAME, SERVICENAME,
938	+	SC_MANAGER_ALL_ACCESS, SERVICE_WIN32_OWN_PROCESS,
939	+	SERVICE_AUTO_START, SERVICE_ERROR_IGNORE, cmdline, NULL,
940	+	NULL, NULL, NULL, NULL) == NULL) {
941	+	log_msg(LOG_CRIT, "Unable to create service");
942	+	return 0;
943	+	}
944	+
945	+	return 1;
946	+	}
947	+
948	+	int unregister_service() {
949	+	SC_HANDLE scm;
950	+	SC_HANDLE service;
951	+
952	+	// Open the SCM
953	+	if((scm = OpenSCManager(NULL, NULL, SC_MANAGER_CREATE_SERVICE)) ==NULL) {
954	+	log_msg(LOG_CRIT, "Unable to open Service Control Manager");
955	+	return 0;
956	+	}
957	+	// Get the service
958	+	if((service = OpenService(scm, SERVICENAME, SC_MANAGER_ALL_ACCESS)) == NULL) {
959	+	log_msg(LOG_CRIT, "Unable to locate the service");
960	+	return 0;
961	+	}
962	+	// Delete service
963	+	if(DeleteService(service) == 0) {
964	+	log_msg(LOG_CRIT, "Unable to remove the service");
965	+	return 0;
966	+	}
967	+	return 1;
968	+	}
969	+	#endif
970	+
971	+
972	+
973	+	void usage(char *progname){
974	+	const char *usage;
975	+	#ifdef WIN32
976	+	usage = "Usage %s [-w option] [-v[v]] [-n name] [-i ip] [-s server] [-p port] [-V] [-h]\n\n";
977	+	#else
978	+	usage = "Usage %s [-v[v]] [-f] [-n name] [-i ip] [-s server] [-p port] [-V] [-h]\n\n";
979	+	#endif
980	+	fprintf(stderr, usage, progname);
981	+	fprintf(stderr, "  -v    Verbose mode, -vv would make even more verbose\n");
982	+	#ifndef WIN32
983	+	fprintf(stderr, "  -f    Foreground mode, print errors to stderr\n");
984	+	#else
985	+	fprintf(stderr, "  -w    Windows Service options:\n");
986	+	fprintf(stderr, "     start      - start the service\n");
987	+	fprintf(stderr, "     stop       - stop the service\n");
988	+	fprintf(stderr, "     register   - register the service\n");
989	+	fprintf(stderr, "     unregister - unregister the service\n");
990	+	/* service - run as a service, only called by windows service */
991	+	#endif
992	+	fprintf(stderr, "  -n    Set the machine name to be reported as\n");
993	+	fprintf(stderr, "  -i    Set the IP to be reported as\n");
994	+	fprintf(stderr, "  -s    Specifies the i-scream server to connect to\n");
995	+	fprintf(stderr, "         default: %s\n", DEF_SERVER_NAME);
996	+	fprintf(stderr, "  -p    Specifies the i-scream server port\n");
997	+	fprintf(stderr, "         default: %d\n", DEF_SERVER_PORT);
998	+	fprintf(stderr, "  -V    Print version number\n");
999	+	fprintf(stderr, "  -h    Prints this help page\n");
1000	+	fprintf(stderr, "\nReport bugs to <%s>.\n", PACKAGE_BUGREPORT);
1001	+	exit(1);
1002	+	}
1003	+
1004	+	int run_ihost(){
1005	+
1006	+	udp_sockinfo_t udp_sockinfo;
1007	+
1008	+	pid_t pid;
1009	+	FILE *f;
1010	+	int packet_num=0;
1011	+	int len;
1012	+
1013	+	char packet[MAX_UDP_PACKET_SIZE];
1014	+
1015	+	time_t cur_time, sleep_delay, udp_time=0, config_time=0;
1016	+	#ifdef WIN32
1017	+	int tries=0;
1018	+	WSADATA wsaData;
1019	+
1020	+	if(WSAStartup(MAKEWORD(2,2), &wsaData) != NO_ERROR) {
1021	+	log_msg(LOG_CRIT, "Failed to init a winsock");
1022	+	service_stopped();
1023	+	exit(1);
1024	+	}
1025	+	#endif
1026	+
1027	+	if(gethostbyname(ihost_state.filtermanager_host)==NULL){
1028	+	printf("%s\n", ihost_state.filtermanager_host);
1029	+	log_msg(LOG_CRIT, "Failed to lookup hostname. Please check settings");
1030	+	goto out;
1031	+	}
1032	+	if(ihost_state.filtermanager_port==0){
1033	+	log_msg(LOG_ERR, "Invalid port number");
1034	+	goto out;
1035	+	}
1036	+
1037	+	#ifndef WIN32
1038	+	if(ihost_config.daemon){
1039	+	pid=fork();
1040	+	if(pid==-1){
1041	+	log_msg(LOG_CRIT, "Failed to background exiting");
1042	+	exit(1);
1043	+	}else if(pid!=0){
1044	+	/* Parent process */
1045	+	return 0;
1046	+	}
1047	+	/* We should now be in the background*/
1048	+	if(setsid()==-1){
1049	+	log_msg(LOG_CRIT, "setsid failed");
1050	+	exit(1);
1051	+	}
1052	+
1053	+	if((ihost_config.log=fopen(LOG_FILE, "a"))==NULL){
1054	+	ihost_config.log=stderr;
1055	+	log_msg(LOG_CRIT, "Failed to open Logfiles %s for writing", LOG_FILE);
1056	+	exit(1);
1057	+	}
1058	+
1059	+	fclose(stdin);
1060	+	fclose(stdout);
1061	+	fclose(stderr);
1062	+
1063	+	}
1064	+	#endif
1065	+
1066	+	log_msg(LOG_INFO, "Starting ihost...");
1067	+
1068	+	log_msg(LOG_DEBUG, "Running sg_init()");
1069	+	if(sg_init()){
1070	+	log_msg(LOG_CRIT, "sg_init failed: %s (%s)",
1071	+	sg_str_error(sg_get_error()), sg_get_error_arg());
1072	+	goto out;
1073	+	}
1074	+	if(sg_snapshot()) {
1075	+	log_msg(LOG_ERR, "sg_snapshot failed: %s (%s)",
1076	+	sg_str_error(sg_get_error()), sg_get_error_arg());
1077	+	}
1078	+
1079	+	#ifndef WIN32
1080	+	log_msg(LOG_DEBUG,"Writing PID FILE");
1081	+
1082	+	pid=getpid();
1083	+
1084	+	if((f=fopen(PID_FILE,"w")) == NULL){
1085	+	log_msg(LOG_CRIT, "Failed to write PID file");
1086	+	}else{
1087	+	if((fprintf(f,"%d",(int)pid)) <= 0 ){
1088	+	log_msg(LOG_CRIT, "Failed to write PID file");
1089	+	}
1090	+	if((fclose(f))!=0){
1091	+	log_msg(LOG_CRIT, "failed to close PID file");
1092	+	}
1093	+	}
1094	+	#endif
1095	+
1096	+	/* Get the initial config from the filter manager. Should this fail,
1097	+	* wait, and then try again. */
1098	+	/* Win32 - for a max of one minute */
1099	+
1100	+	sg_get_disk_io_stats_diff(&packet_num);
1101	+	packet_num=0;
1102	+
1103	+	while(ihost_getconfig(&ihost_state)!=0
1104	+	#ifdef WIN32
1105	+	&& (tries<6)
1106	+	#endif
1107	+	){
1108	+	log_msg(LOG_ERR, "Failed to get ihost config");
1109	+	sleep(SLEEP);
1110	+	#ifdef WIN32
1111	+	tries++;
1112	+	#endif
1113	+	}
1114	+
1115	+	#ifdef WIN32
1116	+	if (tries == 6) {
1117	+	log_msg(LOG_ERR, "Giving up");
1118	+	goto out;
1119	+	}
1120	+	tries = 0;
1121	+	#endif
1122	+
1123	+	while((create_udp_sockinfo(&udp_sockinfo, ihost_state.server_fqdn, ihost_state.server_udp_port))!=0
1124	+	#ifdef WIN32
1125	+	&& (tries<6)
1126	+	#endif
1127	+	){
1128	+	log_msg(LOG_ERR, "Failed to create udp socket");
1129	+	sleep(SLEEP);
1130	+	#ifdef WIN32
1131	+	tries++;
1132	+	#endif
1133	+	}
1134	+
1135	+	#ifdef WIN32
1136	+	if (tries == 6) {
1137	+	log_msg(LOG_ERR, "Giving up");
1138	+	goto out;
1139	+	}
1140	+	#endif
1141	+
1142	+	config_time=time(NULL)+ihost_state.config_ttl;
1143	+
1144	+	#ifdef WIN32
1145	+	/* Finally, we have started successfully!
1146	+	* We set state to running even for non-service calls so the while
1147	+	* loop works. Bit of a hack ;)
1148	+	*/
1149	+	service_status.dwCurrentState = SERVICE_RUNNING;
1150	+	if(run_as_service) {
1151	+	SetServiceStatus(hstatus, &service_status);
1152	+	}
1153	+	printf("started\n");
1154	+	#endif
1155	+
1156	+	/* Now have config.. collect data and send as often as required */
1157	+	#ifdef WIN32
1158	+	while(service_status.dwCurrentState == SERVICE_RUNNING)
1159	+	#else
1160	+	for(;;)
1161	+	#endif
1162	+	{
1163	+	cur_time=time(NULL);
1164	+
1165	+	if(cur_time>=udp_time){
1166	+	if(sg_snapshot()) {
1167	+	log_msg(LOG_ERR, "sg_snapshot failed: %s (%s)",
1168	+	sg_str_error(sg_get_error()), sg_get_error_arg());
1169	+	continue; /* Could this get ugly? */
1170	+	}
1171	+	if((get_system_stats(packet_num++, &ihost_state, packet, MAX_UDP_PACKET_SIZE))!=0){
1172	+	log_msg(LOG_ERR, "Failed to get system stats");
1173	+	}
1174	+
1175	+	len=strlen(packet);
1176	+	log_msg(LOG_DEBUG, "Packet size: %d\nPacket: %s\n", len, packet);
1177	+
1178	+	if((sendto(udp_sockinfo.sock, packet, len, 0, (struct sockaddr *) &udp_sockinfo.addr, sizeof(udp_sockinfo.addr)))!=len){
1179	+	log_msg(LOG_CRIT, "Failed to send packet");
1180	+	}
1181	+	udp_time=cur_time+ihost_state.udp_update_time;
1182	+	log_msg(LOG_DEBUG, "Next packet should be sent on %d", udp_time);
1183	+	}
1184	+
1185	+	if(cur_time>=config_time){
1186	+	if(ihost_getconfig(&ihost_state)!=0){
1187	+	/* If we can't get the config, try again 5 minutes time */
1188	+	log_msg(LOG_ERR, "Failed to get config, try again 5 minutes time");
1189	+	config_time=time(NULL)+300;
1190	+	}else{
1191	+	close(udp_sockinfo.sock);
1192	+
1193	+	while((create_udp_sockinfo(&udp_sockinfo, ihost_state.server_fqdn, ihost_state.server_udp_port))!=0){
1194	+	log_msg(LOG_CRIT, "Failed to create udp socket");
1195	+	sleep(SLEEP);
1196	+	}
1197	+
1198	+	config_time=time(NULL)+ihost_state.config_ttl;
1199	+
1200	+	log_msg(LOG_DEBUG, "Config expires on %d\n", ihost_state.config_ttl);
1201	+	}
1202	+	}
1203	+
1204	+	sleep_delay=udp_time-time(NULL);
1205	+	log_msg(LOG_DEBUG, "Sleeping for %d", sleep_delay);
1206	+	#ifdef WIN32
1207	+	/* convert to millisecs */
1208	+	sleep_delay *= 1000;
1209	+	#endif
1210	+	if(sleep_delay>0) sleep(sleep_delay);
1211	+	}
1212	+
1213	+	if(sg_shutdown()) {
1214	+	log_msg(LOG_ERR, "sg_shutdown failed: %s (%s)",
1215	+	sg_str_error(sg_get_error()), sg_get_error_arg());
1216	+	}
1217	+
1218	+	#ifdef WIN32
1219	+	WSACleanup();
1220	+	if(run_as_service) {
1221	+	service_status.dwWin32ExitCode = 0;
1222	+	service_status.dwCurrentState = SERVICE_STOPPED;
1223	+	SetServiceStatus(hstatus, &service_status);
1224	+	}
1225	+	#endif
1226	+	log_msg(LOG_ERR, "ihost shutdown successfully");
1227	+	fclose(ihost_config.log);
1228	+
1229	+	return(0);
1230	+
1231	+	out:
1232	+	#ifdef WIN32
1233	+	WSACleanup();
1234	+	service_stopped();
1235	+	#endif
1236	+	exit(1);
1237	+	}
1238	+
1239	+	#ifdef WIN32
1240	+	int service_main(int argc, char **argv) {
1241	+	int error;
1242	+
1243	+	service_status.dwServiceType = SERVICE_WIN32;
1244	+	service_status.dwCurrentState = SERVICE_START_PENDING;
1245	+	service_status.dwControlsAccepted = SERVICE_ACCEPT_STOP |
1246	+	SERVICE_ACCEPT_SHUTDOWN;
1247	+	service_status.dwWin32ExitCode = 0;
1248	+	service_status.dwServiceSpecificExitCode = 0;
1249	+	service_status.dwCheckPoint = 0;
1250	+	service_status.dwWaitHint = 0;
1251	+
1252	+	hstatus = RegisterServiceCtrlHandler(SERVICENAME,
1253	+	(LPHANDLER_FUNCTION)control_handler);
1254	+	if(hstatus == (SERVICE_STATUS_HANDLE)0) {
1255	+	log_msg(LOG_CRIT, "RegisterServiceCtrlHandle failed");
1256	+	return -1;
1257	+	}
1258	+
1259	+	return run_ihost();
1260	+	}
1261	+
1262	+
1263	+	void parse_w(int argc, char **argv) {
1264	+	if (strcasecmp(optarg, "start") == 0) {
1265	+	log_msg(LOG_ERR, "Attempting to start service...");
1266	+	run_server = 0;
1267	+	if(start_service())
1268	+	log_msg(LOG_ERR, "Service started");
1269	+	} else if (strcasecmp(optarg, "stop") == 0) {
1270	+	log_msg(LOG_ERR, "Attempting to stop service...");
1271	+	run_server = 0;
1272	+	if(stop_service())
1273	+	log_msg(LOG_ERR, "Service stopped");
1274	+	} else if (strcasecmp(optarg, "service") == 0) {
1275	+	run_as_service = 1;
1276	+	} else if (strcasecmp(optarg, "register") == 0) {
1277	+	log_msg(LOG_ERR, "Attempting to register service...");
1278	+	run_server = 0;
1279	+	int i = optind;
1280	+	optind = argc;
1281	+	/* Grab the remaining arguments and use each time the service
1282	+	* is started */
1283	+	if (register_service(argc-i, &argv[i]))
1284	+	log_msg(LOG_ERR, "Registered service successfully");
1285	+	} else if (strcasecmp(optarg, "unregister") == 0) {
1286	+	log_msg(LOG_ERR, "Attempting to unregister service...");
1287	+	run_server = 0;
1288	+	if(unregister_service())
1289	+	log_msg(LOG_ERR, "Unregistered service successfully");
1290	+	} else {
1291	+	fprintf(stderr, "Unknown -w option\n");
1292	+	usage(argv[0]);
1293	+	exit(1);
1294	+	}
1295	+	}
1296	+	#endif
1297	+
1298	+
1299	+	int main(int argc, char **argv){
1300	+	int cmdopt;
1301	+	extern int optind;
1302	+
1303	+	/* Set default settings */
1304	+	ihost_config.verbose=1;
1305	+	ihost_config.daemon=1;
1306	+	/* Set all errors to go down stderr until told otherwise */
1307	+	ihost_config.log=stderr;
1308	+
1309	+	/* Blank ihost_state to default settings */
1310	+	ihost_state.filtermanager_host=DEF_SERVER_NAME;
1311	+	ihost_state.filtermanager_port=DEF_SERVER_PORT;
1312	+	ihost_state.host_fqdn=NULL;
1313	+	ihost_state.host_ip=NULL;
1314	+	ihost_state.preset_fqdn = 0;
1315	+	ihost_state.preset_ip = 0;
1316	+	ihost_state.server_fqdn=NULL;
1317	+	ihost_state.file_list=NULL;
1318	+	ihost_state.last_modified=NULL;
1319	+
1320	+	while((cmdopt=getopt(argc, argv, OPTSTRING)) != -1){
1321	+	switch(cmdopt){
1322	+	case 'v':
1323	+	ihost_config.verbose++;
1324	+	break;
1325	+
1326	+	#ifndef WIN32
1327	+	case 'f':
1328	+	/* Force syslog logging since stderr will be closed in this case */
1329	+	ihost_config.daemon=0;
1330	+	break;
1331	+	#endif
1332	+
1333	+	case 'V':
1334	+	fprintf(stderr, "%s version %s\n", argv[0], VERSION);
1335	+	break;
1336	+	case 'n':
1337	+	ihost_state.preset_fqdn = 1;
1338	+	ihost_state.host_fqdn = strdup(optarg);
1339	+	if(ihost_state.host_fqdn == NULL){
1340	+	fprintf(stderr, "Missing hostname\n");
1341	+	usage(argv[0]);
1342	+	}
1343	+	break;
1344	+	case 'i':
1345	+	/* Hmm.. Someone could set any string to be the IP, and it will let it */
1346	+	ihost_state.preset_ip = 1;
1347	+	ihost_state.host_ip = strdup(optarg);
1348	+	if(ihost_state.host_ip == NULL){
1349	+	fprintf(stderr, "Missing ip\n");
1350	+	usage(argv[0]);
1351	+	}
1352	+	break;
1353	+
1354	+	case 's':
1355	+	ihost_state.filtermanager_host=strdup(optarg);
1356	+	break;
1357	+
1358	+	case 'p':
1359	+	ihost_state.filtermanager_port=atoi(optarg);
1360	+	break;
1361	+
1362	+	#ifdef WIN32
1363	+	case 'w':
1364	+	parse_w(argc, argv);
1365	+	break;
1366	+	#endif
1367	+
1368	+	case 'h':
1369	+	default:
1370	+	usage(argv[0]);
1371	+	exit(1);
1372	+	}
1373	+	}
1374	+
1375	+	#ifdef WIN32
1376	+	if (run_server) {
1377	+	if(run_as_service) {
1378	+	if((ihost_config.log=fopen(LOG_FILE, "a"))==NULL){
1379	+	ihost_config.log=stderr;
1380	+	log_msg(LOG_CRIT, "Failed to open Logfiles %s for writing", LOG_FILE);
1381	+	exit(1);
1382	+	}
1383	+	log_msg(LOG_ERR, "Starting Service-Mode i-host");
1384	+	SERVICE_TABLE_ENTRY service_table[2];
1385	+	service_table[0].lpServiceName = SERVICENAME;
1386	+	service_table[0].lpServiceProc = (LPSERVICE_MAIN_FUNCTION)service_main;
1387	+	service_table[1].lpServiceName = NULL;
1388	+	service_table[1].lpServiceProc = NULL;
1389	+	return StartServiceCtrlDispatcher(service_table);
1390	+	} else {
1391	+	log_msg(LOG_ERR, "Starting User-Mode i-host");
1392	+	return run_ihost();
1393	+	}
1394	+	}
1395	+	#else
1396	+	return run_ihost();
1397	+	#endif
1398	+	}

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines