Context Navigation

source: trunk/src/sh_prelude.c@ 169

Last change on this file since 169 was 169, checked in by katerina, 17 years ago
Fixes for tickes #93 to #104 (yes, big commit, bad, bad,...).
File size: 37.9 KB

Line
1	/*
2	*
3	* Copyright (C) 2005 Yoann Vandoorselaere, Prelude IDS Technologies
4	* Rainer Wichmann
5	*
6	* This program is free software; you can redistribute it and/or modify
7	* it under the terms of the GNU General Public License as published by
8	* the Free Software Foundation; either version 2, or (at your option)
9	* 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; see the file COPYING. If not, write to
18	* the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
19	*
20	*/
21
22	/*
23	* 28/04/2005 : R.W.:
24	* move libprelude 0.8 code to seperate file
25	*
26	* 23/04/2005 : R.W.:
27	* include libprelude 0.9 code from Yoann Vandoorselaere
28	*/
29
30
31	/*
32	* for strptime()
33	*/
34	#define _GNU_SOURCE 1
35
36	#include "config_xor.h"
37
38	#include <stdio.h>
39	#include <string.h>
40	#include <sys/types.h>
41
42	#if TIME_WITH_SYS_TIME
43
44	# include <sys/time.h>
45	# include <time.h>
46
47	#else
48
49	# if HAVE_SYS_TIME_H
50	# include <sys/time.h>
51	# else
52	# include <time.h>
53	# endif
54
55	#endif
56
57	#include <unistd.h>
58	#include <syslog.h>
59	#include <pwd.h>
60
61	int sh_argc_store;
62	char ** sh_argv_store;
63
64	#if defined(HAVE_LIBPRELUDE) && defined(HAVE_LIBPRELUDE_9)
65
66
67	/*
68	* _() macros are samhain specific; they are used to replace string
69	* constants at runtime. This is part of the samhain stealth mode
70	* (fill string constants with encoded strings, decode at runtime).
71	*/
72	#define FIL__ _("sh_prelude.c")
73
74
75	#include <libprelude/idmef.h>
76	#include <libprelude/prelude.h>
77
78	/*
79	* includes for samhain-specific functions (sl_strstr, sh_error_handle)
80	*/
81	#include "samhain.h"
82	#include "sh_cat.h"
83	#include "sh_error_min.h"
84	#include "sh_prelude.h"
85	#define SH_NEED_PWD_GRP 1
86	#include "sh_static.h"
87	char * sh_util_strdup (const char * str) SH_GNUC_MALLOC;
88	/*
89	* When SH_USE_XML is set, value are formated using name="value".
90	* Otherwise, value is formatted using the format name=<value>.
91	*/
92	#ifdef SH_USE_XML
93	# define VALUE_DELIM_START '"'
94	# define VALUE_DELIM_END '"'
95	#else
96	# define VALUE_DELIM_START '<'
97	# define VALUE_DELIM_END '>'
98	#endif
99
100	#define IDMEF_ANALYZER_MODEL _("Samhain")
101	#define IDMEF_ANALYZER_CLASS _("Integrity Checker")
102	#define IDMEF_ANALYZER_VERSION VERSION
103	#define IDMEF_ANALYZER_MANUFACTURER _("http://www.la-samhna.de/samhain/")
104
105
106
107	/*
108	* 0 = not initialized; -1 = failed; 1 = initialized
109	*/
110	static int initialized = 0;
111	static int ready_for_init = 0;
112
113	static char *profile = NULL;
114	static prelude_client_t *client = NULL;
115
116	static int severity_map[1 + (unsigned int) IDMEF_IMPACT_SEVERITY_HIGH] = {
117	/* 0: unused (?) */ 0,
118	/* 1: INFO */ 0,
119	/* 2: LOW */ SH_ERR_ALL\|SH_ERR_INFO,
120	/* 3: MEDIUM */ SH_ERR_NOTICE\|SH_ERR_WARN\|SH_ERR_STAMP\|SH_ERR_ERR,
121	/* 4: HIGH */ SH_ERR_SEVERE\|SH_ERR_FATAL
122	};
123
124	/* returns 0/tiger, 1/sha1, or 2/md5
125	*/
126	extern int sh_tiger_get_hashtype(void);
127
128	static void clear_and_set (int setpos, int flag)
129	{
130	unsigned int i;
131	/* clear everywhere, and set at correct position */
132	for (i = 1; i < (1 + (unsigned int) IDMEF_IMPACT_SEVERITY_HIGH); ++i)
133	severity_map[i] &= ~flag;
134	severity_map[setpos] \|= flag;
135	return;
136	}
137
138	static int set_prelude_severity_int (const char * str, int prelude_sev)
139	{
140	char * p;
141	char * dup = strdup (str);
142	#if defined(HAVE_PTHREAD) && defined (_POSIX_THREAD_SAFE_FUNCTIONS) && defined(HAVE_STRTOK_R)
143	char * saveptr;
144	#endif
145
146	if (!dup)
147	return -1;
148
149	#if defined(HAVE_PTHREAD) && defined (_POSIX_THREAD_SAFE_FUNCTIONS) && defined(HAVE_STRTOK_R)
150	p = strtok_r (dup, ", \t", &saveptr);
151	#else
152	p = strtok (dup, ", \t");
153	#endif
154	if (p) {
155	do {
156	if (0 == strcmp (p, _("alert")))
157	clear_and_set (prelude_sev, SH_ERR_FATAL);
158	else if (0 == strcmp (p, _("crit")))
159	clear_and_set (prelude_sev, SH_ERR_SEVERE);
160	else if (0 == strcmp (p, _("err")))
161	clear_and_set (prelude_sev, SH_ERR_ERR);
162	else if (0 == strcmp (p, _("mark")))
163	clear_and_set (prelude_sev, SH_ERR_STAMP);
164	else if (0 == strcmp (p, _("warn")))
165	clear_and_set (prelude_sev, SH_ERR_WARN);
166	else if (0 == strcmp (p, _("notice")))
167	clear_and_set (prelude_sev, SH_ERR_NOTICE);
168	else if (0 == strcmp (p, _("debug")))
169	clear_and_set (prelude_sev, SH_ERR_ALL);
170	else if (0 == strcmp (p, _("info")))
171	clear_and_set (prelude_sev, SH_ERR_INFO);
172	else {
173	free (dup);
174	return -1;
175	}
176	#if defined(HAVE_PTHREAD) && defined (_POSIX_THREAD_SAFE_FUNCTIONS) && defined(HAVE_STRTOK_R)
177	p = strtok_r (NULL, ", \t", &saveptr);
178	#else
179	p = strtok (NULL, ", \t");
180	#endif
181	} while (p);
182	}
183	free(dup);
184	return 0;
185	}
186
187	int sh_prelude_map_info (const char * str)
188	{
189	return (set_prelude_severity_int(str,(int)IDMEF_IMPACT_SEVERITY_INFO));
190	}
191	int sh_prelude_map_low (const char * str)
192	{
193	return (set_prelude_severity_int(str,(int)IDMEF_IMPACT_SEVERITY_LOW));
194	}
195	int sh_prelude_map_medium (const char * str)
196	{
197	return (set_prelude_severity_int(str,(int)IDMEF_IMPACT_SEVERITY_MEDIUM));
198	}
199	int sh_prelude_map_high (const char * str)
200	{
201	return (set_prelude_severity_int(str,(int)IDMEF_IMPACT_SEVERITY_HIGH));
202	}
203
204	static idmef_impact_severity_t map_severity (int sam_sev)
205	{
206	int i;
207	int max = 1 + (unsigned int) IDMEF_IMPACT_SEVERITY_HIGH;
208	idmef_impact_severity_t retval = IDMEF_IMPACT_SEVERITY_MEDIUM;
209
210	for (i = 0; i < max; ++i) {
211	if (severity_map[i] & sam_sev) {
212	retval = (idmef_impact_severity_t) i;
213	}
214	}
215	return retval;
216	}
217
218	static char do_get_value(char ptr, char delim_start, char delim_end)
219	{
220	char *ret = NULL;
221
222	ptr = strchr(ptr, delim_start);
223	if ( ! ptr )
224	return NULL;
225
226	ret = ++ptr;
227
228	ptr = strchr(ptr, delim_end);
229	if ( ! ptr )
230	return NULL;
231
232	*ptr = '\0';
233	ret = strdup(ret);
234	*ptr = delim_end;
235
236	return ret;
237	}
238
239
240
241	static char get_value(char msg, const char toktmp, const char toksuffix)
242	{
243	char *ptr, tok[128];
244
245	snprintf(tok, sizeof(tok), "%s%s=", toktmp, (toksuffix) ? toksuffix : "");
246
247	ptr = strstr(msg, tok);
248	if ( ! ptr )
249	return NULL;
250
251	return do_get_value(ptr, VALUE_DELIM_START, VALUE_DELIM_END);
252	}
253
254
255
256	static char get_time_value(char msg, const char toktmp, const char toksuffix)
257	{
258
259	char ret, ptr, tok[128];
260
261	snprintf(tok, sizeof(tok), "%s%s=", toktmp, (toksuffix) ? toksuffix : "");
262
263	ptr = strstr(msg, tok);
264	if ( ! ptr )
265	return NULL;
266
267	#ifndef SH_USE_XML
268	ret = do_get_value(ptr, '[', ']');
269	#else
270	ret = do_get_value(ptr, VALUE_DELIM_START, VALUE_DELIM_END);
271	#endif
272
273	return ret;
274	}
275
276
277
278
279	#if 0
280	void debug_print_message(idmef_message_t *msg)
281	{
282	int ret;
283	prelude_io_t *fd;
284
285	ret = prelude_io_new(&fd);
286	if ( ret < 0 )
287	return;
288
289	prelude_io_set_file_io(fd, stderr);
290	idmef_message_print(idmef, fd);
291
292	prelude_io_destroy(fd);
293	}
294	#endif
295
296
297
298	static int idmef_time_from_samhain(idmef_time_t *time, const char str)
299	{
300	int ret;
301	char *ptr;
302	time_t utc;
303	struct tm lt;
304
305	/*
306	* Samhain stamp are encoded in UTC.
307	*/
308	ptr = strptime(str, _("%Y-%m-%dT%H:%M:%S"), &lt);
309	if ( ! ptr ) {
310	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
311	_("could not format Samhain time"), _("idmef_time_from_samhain"));
312	return -1;
313	}
314
315	utc = prelude_timegm(&lt);
316
317	ret = idmef_time_new_from_time(time, &utc);
318	if ( ret < 0 )
319	return ret;
320
321	return 0;
322	}
323
324	/* flawfinder: ignore // is part of name, not access() */
325	static void get_access_info(idmef_file_access_t access, char mode, int pos, int mpos)
326	{
327	int got = 0;
328	int ret;
329	prelude_string_t *str;
330
331	do {
332	if ( mode[pos] == 'r' ) {
333	/* flawfinder: ignore // is part of name, not access() */
334	ret = idmef_file_access_new_permission(access, &str, IDMEF_LIST_APPEND);
335	if ( ret < 0 )
336	return;
337	prelude_string_set_dup(str, _("read"));
338	++got;
339	}
340	else if ( mode[pos] == 'w' ) {
341	/* flawfinder: ignore // is part of name, not access() */
342	ret = idmef_file_access_new_permission(access, &str, IDMEF_LIST_APPEND);
343	if ( ret < 0 )
344	return;
345	prelude_string_set_dup(str, _("write"));
346	++got;
347	}
348	else if ( mode[pos] == 'x' \|\| mode[pos] == 's' \|\| mode[pos] == 't') {
349	/* flawfinder: ignore // is part of name, not access() */
350	ret = idmef_file_access_new_permission(access, &str, IDMEF_LIST_APPEND);
351	if ( ret < 0 )
352	return;
353
354	if ( mode[pos] == 'x' && mode[0] == 'd' )
355	prelude_string_set_dup(str, _("search"));
356
357	else if ( mode[pos] == 'x' \|\| mode[pos] == 't' )
358	prelude_string_set_dup(str, _("execute"));
359
360	else /* 's' */
361	prelude_string_set_dup(str, _("executeAs"));
362	++got;
363	}
364	++pos;
365	} while (pos <= mpos);
366
367	if ( got == 0 ) {
368	/* flawfinder: ignore // is part of name, not access() */
369	ret = idmef_file_access_new_permission(access, &str, IDMEF_LIST_APPEND);
370	if ( ret < 0 )
371	return;
372	prelude_string_set_dup(str, _("noAccess"));
373	}
374	return;
375	}
376
377
378	static void get_file_infos(idmef_target_t target, char msg,
379	idmef_file_category_t category)
380	{
381	int ret;
382	int hashtype = 0;
383	char *ptr;
384	idmef_time_t *time;
385	idmef_file_t *file;
386	idmef_inode_t *inode;
387	prelude_string_t *str;
388	idmef_checksum_t *checksum;
389	idmef_file_access_t access; / flawfinder: ignore */
390	idmef_user_id_t *userid;
391	const char *suffix = (category == IDMEF_FILE_CATEGORY_CURRENT) ? "_new" : "_old";
392	char *mode = NULL;
393
394	ret = idmef_target_new_file(target, &file, IDMEF_LIST_APPEND);
395	if ( ret < 0 )
396	return;
397	idmef_file_set_category(file, category);
398
399	ptr = get_value(msg, _("path"), NULL);
400	if ( ptr ) {
401	/*
402	* In term of IDMEF, this is the full path,
403	* including the name.
404	*/
405	ret = idmef_file_new_path(file, &str);
406	if ( ret < 0 ) {
407	free(ptr);
408	return;
409	}
410	prelude_string_set_nodup(str, ptr);
411
412	ptr = strrchr(ptr, '/');
413	if ( ptr ) {
414	ret = idmef_file_new_name(file, &str);
415	if ( ret == 0 ) {
416	prelude_string_set_dup(str, ptr + 1);
417	}
418	}
419	}
420
421	ptr = get_value(msg, _("size"), suffix);
422	if ( ptr ) {
423	idmef_file_set_data_size(file, strtoul(ptr, NULL, 10));
424	free(ptr);
425	}
426
427	ptr = get_time_value(msg, _("mtime"), suffix);
428	if ( ptr ) {
429	ret = idmef_time_from_samhain(&time, ptr);
430	if ( ret == 0 ) {
431	idmef_file_set_modify_time(file, time);
432	}
433	free(ptr);
434	}
435
436	ptr = get_time_value(msg, _("ctime"), suffix);
437	if ( ptr ) {
438	ret = idmef_time_from_samhain(&time, ptr);
439	if ( ret == 0 ) {
440	idmef_file_set_create_time(file, time);
441	}
442	free(ptr);
443	}
444
445	ptr = get_value(msg, _("inode"), suffix);
446	if ( ptr ) {
447	ret = idmef_file_new_inode(file, &inode);
448	if ( ret == 0 ) {
449	char * dev = get_value(msg, _("dev"), suffix);
450	if (dev) {
451	char * q = strchr(dev, ',');
452	if (*q) {
453	*q = '\0'; ++q;
454	idmef_inode_set_major_device(inode, strtoul(dev, NULL, 0));
455	idmef_inode_set_minor_device(inode, strtoul( q, NULL, 0));
456	}
457	free(dev);
458	}
459	idmef_inode_set_number(inode, strtoul(ptr, NULL, 10));
460	}
461	free(ptr);
462	}
463
464	ptr = get_value(msg, _("chksum"), suffix);
465	if ( ptr ) {
466	ret = idmef_file_new_checksum(file, &checksum, IDMEF_LIST_APPEND);
467	if ( ret < 0 ) {
468	free(ptr);
469	goto get_mode;
470	}
471
472	hashtype = sh_tiger_get_hashtype();
473
474	if (hashtype == 0)
475	idmef_checksum_set_algorithm(checksum, IDMEF_CHECKSUM_ALGORITHM_TIGER);
476
477	else if (hashtype == 1)
478	idmef_checksum_set_algorithm(checksum, IDMEF_CHECKSUM_ALGORITHM_SHA1);
479
480	else if (hashtype == 2)
481	idmef_checksum_set_algorithm(checksum, IDMEF_CHECKSUM_ALGORITHM_MD5);
482
483	else
484	idmef_checksum_set_algorithm(checksum, IDMEF_CHECKSUM_ALGORITHM_TIGER);
485
486
487	ret = idmef_checksum_new_value(checksum, &str);
488	if ( ret < 0 ) {
489	free(ptr);
490	goto get_mode;
491	}
492
493	/* will be freed on destroy()
494	*/
495	prelude_string_set_nodup(str, ptr);
496	}
497
498	get_mode:
499
500	mode = get_value(msg, _("mode"), suffix);
501	if ( mode ) {
502	/* flawfinder: ignore // is part of name, not access() */
503	ret = idmef_file_new_file_access(file, &access, IDMEF_LIST_APPEND);
504	if ( ret < 0 )
505	goto get_owner;
506
507	/* flawfinder: ignore // is part of name, not access() */
508	ret = idmef_file_access_new_user_id(access, &userid);
509	if ( ret < 0 )
510	goto get_owner;
511	idmef_user_id_set_type(userid, IDMEF_USER_ID_TYPE_OTHER_PRIVS);
512
513	/* flawfinder: ignore // is part of name, not access() */
514	get_access_info ( access, mode, 7, 9 );
515	}
516
517	get_owner:
518
519	ptr = get_value(msg, _("owner"), suffix);
520	if ( ptr ) {
521	char * uid;
522
523	/* flawfinder: ignore // is part of name, not access() */
524	ret = idmef_file_new_file_access(file, &access, IDMEF_LIST_APPEND);
525	if ( ret < 0 ) {
526	free(ptr);
527	goto get_group;
528	}
529
530	/* flawfinder: ignore // is part of name, not access() */
531	ret = idmef_file_access_new_user_id(access, &userid);
532	if ( ret < 0 ) {
533	free(ptr);
534	goto get_group;
535	}
536	idmef_user_id_set_type(userid, IDMEF_USER_ID_TYPE_USER_PRIVS);
537
538	ret = idmef_user_id_new_name(userid, &str);
539	if ( ret < 0 ) {
540	free(ptr);
541	goto get_group;
542	}
543	prelude_string_set_nodup(str, ptr);
544
545	uid = get_value(msg, _("iowner"), suffix);
546	if ( ! uid )
547	goto get_group;
548
549	idmef_user_id_set_number(userid, strtoul(uid, NULL, 0));
550
551	if ( mode ) {
552	/* flawfinder: ignore // is part of name, not access() */
553	get_access_info ( access, mode, 1, 3 );
554	}
555
556	free(uid);
557	}
558
559	get_group:
560
561	ptr = get_value(msg, _("group"), suffix);
562	if ( ptr ) {
563	char *gid;
564
565	/* flawfinder: ignore // is part of name, not access() */
566	ret = idmef_file_new_file_access(file, &access, IDMEF_LIST_APPEND);
567	if ( ret < 0 ) {
568	free(ptr);
569	goto mode_free;
570	}
571
572	ret = idmef_file_access_new_user_id(access, &userid);/* flawfinder: ignore // is part of name, not access() */
573	if ( ret < 0 ) {
574	free(ptr);
575	goto mode_free;
576	}
577
578	idmef_user_id_set_type(userid, IDMEF_USER_ID_TYPE_GROUP_PRIVS);
579
580	ret = idmef_user_id_new_name(userid, &str);
581	if ( ret < 0 ) {
582	free(ptr);
583	goto mode_free;
584	}
585
586	prelude_string_set_nodup(str, ptr);
587
588	gid = get_value(msg, _("igroup"), suffix);
589	if ( ! gid )
590	goto mode_free;
591
592	idmef_user_id_set_number(userid, strtoul(gid, NULL, 0));
593
594	if ( mode ) {
595	get_access_info ( access, mode, 4, 6 ); /* flawfinder: ignore */
596	}
597
598	free(gid);
599	}
600
601	mode_free:
602
603	if ( mode ) {
604	free ( mode );
605	}
606
607	return;
608	}
609
610
611
612	static int map_policy_to_class(char msg, unsigned long msgid, idmef_impact_t impact, prelude_string_t *out)
613	{
614	char *ptr;
615	int ret, i;
616	struct tbl {
617	unsigned int msgid;
618	const char *name;
619	idmef_impact_type_t type;
620	} tbl[] = {
621
622	#ifdef SH_USE_UTMP
623	{ MSG_UT_LG1X, N_("User Login"), IDMEF_IMPACT_TYPE_USER },
624	{ MSG_UT_LG1A, N_("User Login"), IDMEF_IMPACT_TYPE_USER },
625	{ MSG_UT_LG1B, N_("User Login"), IDMEF_IMPACT_TYPE_USER },
626	{ MSG_UT_LG2X, N_("Multiple User Login"), IDMEF_IMPACT_TYPE_USER },
627	{ MSG_UT_LG2A, N_("Multiple User Login"), IDMEF_IMPACT_TYPE_USER },
628	{ MSG_UT_LG2B, N_("Multiple User Login"), IDMEF_IMPACT_TYPE_USER },
629	{ MSG_UT_LG3X, N_("User Logout"), IDMEF_IMPACT_TYPE_USER },
630	{ MSG_UT_LG3A, N_("User Logout"), IDMEF_IMPACT_TYPE_USER },
631	{ MSG_UT_LG3B, N_("User Logout"), IDMEF_IMPACT_TYPE_USER },
632	{ MSG_UT_LG3C, N_("User Logout"), IDMEF_IMPACT_TYPE_USER },
633	#endif
634
635	#if defined(SH_WITH_CLIENT) \|\| defined(SH_STANDALONE)
636	{ MSG_FI_MISS, N_("File Missing"), IDMEF_IMPACT_TYPE_FILE },
637	{ MSG_FI_MISS2, N_("File Missing"), IDMEF_IMPACT_TYPE_FILE },
638	{ MSG_FI_ADD, N_("File Added"), IDMEF_IMPACT_TYPE_FILE },
639	{ MSG_FI_ADD2, N_("File Added"), IDMEF_IMPACT_TYPE_FILE },
640	{ MSG_FI_CHAN, N_("File Modified"), IDMEF_IMPACT_TYPE_FILE },
641	{ MSG_FI_NODIR, N_("File found where directory was expected"), IDMEF_IMPACT_TYPE_FILE },
642	#endif
643
644	#ifdef SH_USE_KERN
645	{ MSG_KERN_POLICY, N_("Kernel Modified"), IDMEF_IMPACT_TYPE_OTHER },
646	{ MSG_KERN_POL_CO, N_("Kernel Modified"), IDMEF_IMPACT_TYPE_OTHER },
647	{ MSG_KERN_PROC, N_("Kernel Modified"), IDMEF_IMPACT_TYPE_OTHER },
648	{ MSG_KERN_GATE, N_("Kernel Modified"), IDMEF_IMPACT_TYPE_OTHER },
649	{ MSG_KERN_IDT, N_("Kernel Modified"), IDMEF_IMPACT_TYPE_OTHER },
650	{ MSG_KERN_SYSCALL, N_("Kernel Modified"), IDMEF_IMPACT_TYPE_OTHER },
651	#endif
652
653	#ifdef SH_USE_PORTCHECK
654	{ MSG_PORT_MISS, N_("Service closed"), IDMEF_IMPACT_TYPE_OTHER },
655	{ MSG_PORT_NEW, N_("Service opened"), IDMEF_IMPACT_TYPE_OTHER },
656	{ MSG_PORT_RESTART, N_("Service restarted"), IDMEF_IMPACT_TYPE_OTHER },
657	{ MSG_PORT_NEWPORT, N_("Service restarted"), IDMEF_IMPACT_TYPE_OTHER },
658	#endif
659
660	#ifdef SH_USE_SUIDCHK
661	{ MSG_SUID_POLICY, N_("SUID/SGID File Detected"), IDMEF_IMPACT_TYPE_FILE },
662	#endif
663	/*
664	* This must be the last table entry
665	*/
666	{ 0, NULL, IDMEF_IMPACT_TYPE_OTHER },
667	};
668
669	for ( i = 0; tbl[i].name != NULL; i++ ) {
670	if ( tbl[i].msgid != msgid )
671	continue;
672
673	idmef_impact_set_type(impact, tbl[i].type);
674	return prelude_string_cat(out, _(tbl[i].name));
675	}
676
677	/* some other message
678	*/
679	ptr = get_value(msg, _("msg"), NULL);
680	if ( ! ptr ) {
681	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
682	_("could not format Samhain message"), _("map_policy_to_class"));
683	return -1;
684	}
685
686	ret = prelude_string_cat(out, ptr);
687	free(ptr);
688
689	return ret;
690	}
691
692
693	#ifdef SH_USE_PORTCHECK
694	static int get_service_info(char msg, idmef_alert_t alert)
695	{
696	int ret;
697	long port;
698	char ptr, new, tmp, ip, srv, end;
699	prelude_string_t *str;
700	idmef_address_t *address;
701	idmef_node_t *node;
702	idmef_service_t *service;
703	idmef_source_t *source = idmef_alert_get_next_source(alert, NULL);
704
705	new = sh_util_strdup(msg);
706
707	ptr = strstr(new, _("port: "));
708	if ( ! ptr ) {
709	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
710	_("malformed Samhain port check message"), _("get_service_info"));
711	SH_FREE( new );
712	return -1;
713	}
714
715	ptr += 6; /* skip 'port: ', position on first byte of interface */
716	tmp = strchr(ptr, ':');
717	if ( ! tmp ) {
718	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
719	_("malformed Samhain port check message (no port)"), _("get_service_info"));
720	SH_FREE( new );
721	return -1;
722	}
723	*tmp = '\0';
724
725	ip = strdup(ptr);
726	if ( ip ) {
727	if ( ! source ) {
728	ret = idmef_alert_new_source(alert, &source, IDMEF_LIST_APPEND);
729	if ( ret < 0 ) {
730	free(ip);
731	SH_FREE( new );
732	return ret;
733	}
734	}
735
736	ret = idmef_source_new_node(source, &node);
737	if ( ret < 0 ) {
738	free(ip);
739	SH_FREE( new );
740	return ret;
741	}
742
743	ret = idmef_node_new_address(node, &address, IDMEF_LIST_APPEND);
744	if ( ret < 0 ) {
745	free(ip);
746	SH_FREE( new );
747	return ret;
748	}
749
750	ret = idmef_address_new_address(address, &str);
751	if ( ret < 0 ) {
752	free(ip);
753	SH_FREE( new );
754	return ret;
755	}
756
757	prelude_string_set_nodup(str, ip);
758	}
759
760	ptr = tmp;
761	++ptr;
762	tmp = strchr(ptr, '/');
763	if ( ! tmp ) {
764	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
765	_("malformed Samhain port check message (no protocol)"), _("get_service_info"));
766	SH_FREE( new );
767	return -1;
768	}
769	*tmp = '\0';
770
771	port = strtol(ptr, &end, 0);
772	if ( ptr && end == '\0' && port >= 0 && port < 65536) {
773
774	if ( ! source ) {
775	ret = idmef_alert_new_source(alert, &source, IDMEF_LIST_APPEND);
776	if ( ret < 0 ) {
777	free(srv);
778	SH_FREE( new );
779	return ret;
780	}
781	}
782
783	ret = idmef_source_new_service(source, &service);
784	if ( ret < 0 ) {
785	free(srv);
786	SH_FREE( new );
787	return ret;
788	}
789
790	idmef_service_set_port(service, port);
791	}
792
793	ptr = tmp;
794	++ptr;
795	ptr = strchr(ptr, '(');
796	if ( ! ptr ) {
797	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
798	_("malformed Samhain port check message (no service)"), _("get_service_info"));
799	SH_FREE( new );
800	return -1;
801	}
802	++ptr;
803	tmp = strchr(ptr, ')');
804	if ( ! tmp ) {
805	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
806	_("malformed Samhain port check message (service not closed)"), _("get_service_info"));
807	SH_FREE( new );
808	return -1;
809	}
810	*tmp = '\0';
811
812	srv = strdup(ptr);
813	if ( srv ) {
814	if ( ! source ) {
815	ret = idmef_alert_new_source(alert, &source, IDMEF_LIST_APPEND);
816	if ( ret < 0 ) {
817	free(srv);
818	SH_FREE( new );
819	return ret;
820	}
821	}
822
823	if ( ! service ) {
824	ret = idmef_source_new_service(source, &service);
825	if ( ret < 0 ) {
826	free(srv);
827	SH_FREE( new );
828	return ret;
829	}
830	}
831
832	ret = idmef_service_new_ident(service, &str);
833	if ( ret < 0 ) {
834	free(srv);
835	SH_FREE( new );
836	return ret;
837	}
838
839	prelude_string_set_nodup(str, srv);
840	}
841
842	SH_FREE( new );
843
844	return 0;
845	}
846	#endif
847
848	static int get_login_info(char msg, idmef_alert_t alert)
849	{
850	int ret;
851	char ptr, ip;
852	idmef_user_t *user;
853	idmef_node_t *node;
854	struct passwd *pw;
855	#if defined(HAVE_PTHREAD) && defined (_POSIX_THREAD_SAFE_FUNCTIONS) && defined(HAVE_GETPWNAM_R)
856	struct passwd pwd;
857	char buffer[SH_PWBUF_SIZE];
858	#endif
859	prelude_string_t *str;
860	idmef_user_id_t *user_id;
861	idmef_address_t *address;
862	idmef_target_t *target = idmef_alert_get_next_target(alert, NULL);
863	idmef_source_t *source = idmef_alert_get_next_source(alert, NULL);
864
865	ip = ptr = get_value(msg, _("ip"), NULL);
866	if ( ptr ) {
867	if ( ! source ) {
868	ret = idmef_alert_new_source(alert, &source, IDMEF_LIST_APPEND);
869	if ( ret < 0 ) {
870	free(ptr);
871	return ret;
872	}
873	}
874
875	ret = idmef_source_new_node(source, &node);
876	if ( ret < 0 ) {
877	free(ptr);
878	return ret;
879	}
880
881	ret = idmef_node_new_address(node, &address, IDMEF_LIST_APPEND);
882	if ( ret < 0 ) {
883	free(ptr);
884	return ret;
885	}
886
887	ret = idmef_address_new_address(address, &str);
888	if ( ret < 0 ) {
889	free(ptr);
890	return ret;
891	}
892
893	prelude_string_set_nodup(str, ptr);
894	}
895
896	ptr = get_value(msg, _("host"), NULL);
897	if ( ptr ) {
898	if ( ip && strcmp(ptr, ip) == 0 )
899	free(ptr);
900	else {
901	if ( ! source ) {
902	ret = idmef_alert_new_source(alert, &source, IDMEF_LIST_APPEND);
903	if ( ret < 0 ) {
904	free(ptr);
905	return ret;
906	}
907	}
908
909	ret = idmef_source_new_node(source, &node);
910	if ( ret < 0 ) {
911	free(ptr);
912	return ret;
913	}
914
915	ret = idmef_node_new_name(node, &str);
916	if ( ret < 0 ) {
917	free(ptr);
918	return ret;
919	}
920
921	prelude_string_set_nodup(str, ptr);
922	}
923	}
924
925	ptr = get_value(msg, _("name"), NULL);
926	if ( ptr ) {
927	ret = idmef_target_new_user(target, &user);
928	if ( ret < 0 ) {
929	free(ptr);
930	return ret;
931	}
932
933	idmef_user_set_category(user, IDMEF_USER_CATEGORY_OS_DEVICE);
934
935	ret = idmef_user_new_user_id(user, &user_id, IDMEF_LIST_APPEND);
936	if ( ret < 0 ) {
937	free(ptr);
938	return ret;
939	}
940
941	idmef_user_id_set_type(user_id, IDMEF_USER_ID_TYPE_TARGET_USER);
942
943	#if defined(HAVE_PTHREAD) && defined (_POSIX_THREAD_SAFE_FUNCTIONS) && defined(HAVE_GETPWNAM_R)
944	sh_getpwnam_r(ptr, &pwd, buffer, sizeof(buffer), &pw);
945	#else
946	pw = sh_getpwnam(ptr);
947	#endif
948	if ( pw )
949	idmef_user_id_set_number(user_id, pw->pw_uid);
950
951	ret = idmef_user_id_new_name(user_id, &str);
952	if ( ret < 0 ) {
953	free(ptr);
954	return ret;
955	}
956	prelude_string_set_nodup(str, ptr);
957
958	ptr = get_value(msg, _("tty"), NULL);
959	if ( ptr ) {
960	ret = idmef_user_id_new_tty(user_id, &str);
961	if ( ret < 0 ) {
962	free(ptr);
963	return ret;
964	}
965
966	prelude_string_set_nodup(str, ptr);
967	}
968	}
969
970	ptr = get_time_value(msg, _("time"), NULL);
971	if ( ptr ) {
972	idmef_time_t *time;
973
974	ret = idmef_time_from_samhain(&time, ptr);
975	free(ptr);
976
977	if ( ret < 0 )
978	return ret;
979
980	idmef_alert_set_detect_time(alert, time);
981	}
982
983	return 0;
984	}
985
986
987	static int samhain_alert_prelude(int priority, int sh_class,
988	char *message, unsigned long msgid)
989	{
990	int ret;
991	idmef_time_t *time;
992	idmef_alert_t *alert;
993	idmef_message_t *idmef;
994	idmef_classification_t *classification;
995	idmef_assessment_t *assessment;
996	idmef_additional_data_t *data;
997	idmef_impact_t *impact;
998	idmef_target_t *target;
999	idmef_confidence_t *confidence;
1000	prelude_string_t *str;
1001
1002	if ( !client \|\| sh_class == STAMP)
1003	return 0;
1004
1005	ret = idmef_message_new(&idmef);
1006	if ( ret < 0 )
1007	goto err;
1008
1009	ret = idmef_message_new_alert(idmef, &alert);
1010	if ( ret < 0 )
1011	goto err;
1012
1013	idmef_alert_set_analyzer(alert, idmef_analyzer_ref(prelude_client_get_analyzer(client)), IDMEF_LIST_PREPEND);
1014
1015	ret = idmef_time_new_from_gettimeofday(&time);
1016	if ( ret < 0 )
1017	goto err;
1018	idmef_alert_set_detect_time(alert, time);
1019
1020	ret = idmef_time_new_from_gettimeofday(&time);
1021	if ( ret < 0 )
1022	goto err;
1023	idmef_alert_set_create_time(alert, time);
1024
1025	ret = idmef_alert_new_classification(alert, &classification);
1026	if ( ret < 0 )
1027	goto err;
1028
1029	ret = idmef_alert_new_target(alert, &target, IDMEF_LIST_APPEND);
1030	if ( ret < 0 )
1031	goto err;
1032
1033	idmef_target_set_decoy(target, IDMEF_TARGET_DECOY_NO);
1034
1035	if ( idmef_analyzer_get_node(prelude_client_get_analyzer(client)) ) {
1036	idmef_node_ref(idmef_analyzer_get_node(prelude_client_get_analyzer(client)));
1037	idmef_target_set_node(target, idmef_analyzer_get_node(prelude_client_get_analyzer(client)));
1038	}
1039
1040	if ( strstr(message, _("path=")) ) {
1041	#if defined(SH_WITH_CLIENT) \|\| defined(SH_STANDALONE)
1042	if ( msgid != MSG_FI_ADD && msgid != MSG_FI_ADD2 )
1043	get_file_infos(target, message, IDMEF_FILE_CATEGORY_ORIGINAL);
1044	#endif
1045
1046	get_file_infos(target, message, IDMEF_FILE_CATEGORY_CURRENT);
1047	}
1048
1049	ret = idmef_alert_new_assessment(alert, &assessment);
1050	if ( ret < 0 )
1051	goto err;
1052
1053	ret = idmef_assessment_new_impact(assessment, &impact);
1054	if ( ret < 0 )
1055	goto err;
1056
1057	ret = idmef_classification_new_text(classification, &str);
1058	if ( ret < 0 )
1059	goto err;
1060
1061	ret = get_login_info(message, alert);
1062	if ( ret < 0 )
1063	goto err;
1064
1065	#ifdef SH_USE_PORTCHECK
1066	if (msgid == MSG_PORT_MISS \|\| msgid == MSG_PORT_NEW \|\| msgid == MSG_PORT_RESTART \|\| msgid == MSG_PORT_NEWPORT) {
1067	ret = get_service_info(message, alert);
1068	if ( ret < 0 )
1069	goto err;
1070	}
1071	#endif
1072
1073	map_policy_to_class(message, msgid, impact, str);
1074
1075	#if 0
1076	if ( priority == SH_ERR_SEVERE \|\| priority == SH_ERR_FATAL )
1077	idmef_impact_set_severity(impact, IDMEF_IMPACT_SEVERITY_HIGH);
1078
1079	else if ( priority == SH_ERR_ALL \|\| priority == SH_ERR_INFO \|\| priority == SH_ERR_NOTICE )
1080	idmef_impact_set_severity(impact, IDMEF_IMPACT_SEVERITY_LOW);
1081
1082	else
1083	idmef_impact_set_severity(impact, IDMEF_IMPACT_SEVERITY_MEDIUM);
1084	#endif
1085	idmef_impact_set_severity(impact, map_severity(priority));
1086
1087	idmef_impact_set_completion(impact, IDMEF_IMPACT_COMPLETION_SUCCEEDED);
1088
1089	ret = idmef_assessment_new_confidence(assessment, &confidence);
1090	if ( ret < 0 )
1091	goto err;
1092
1093	idmef_confidence_set_rating(confidence, IDMEF_CONFIDENCE_RATING_HIGH);
1094
1095	ret = idmef_alert_new_additional_data(alert, &data, IDMEF_LIST_APPEND);
1096	if ( ret < 0 )
1097	goto err;
1098
1099	ret = idmef_additional_data_new_meaning(data, &str);
1100	if ( ret < 0 )
1101	goto err;
1102
1103	prelude_string_set_dup(str, _("Message generated by Samhain"));
1104	idmef_additional_data_set_type(data, IDMEF_ADDITIONAL_DATA_TYPE_STRING);
1105	idmef_additional_data_set_string_ref(data, message);
1106
1107	/* debug_print_message(idmef); */
1108
1109	prelude_client_send_idmef(client, idmef);
1110	idmef_message_destroy(idmef);
1111
1112	return 0;
1113
1114	err:
1115	idmef_message_destroy(idmef);
1116	return -1;
1117	}
1118
1119
1120	int sh_prelude_alert(int priority, int sh_class, char *message, long msgflags, unsigned long msgid)
1121	{
1122	int ret;
1123
1124	(void) msgflags; /* fix compiler warning */
1125
1126	if ( initialized < 1 )
1127	return -1;
1128
1129	ret = samhain_alert_prelude(priority, sh_class, message, msgid);
1130	if ( ret < 0 ) {
1131	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
1132	_("Problem with IDMEF for prelude-ids support: alert lost"),
1133	_("sh_prelude_alert"));
1134	}
1135
1136	return ret;
1137	}
1138
1139
1140
1141	int sh_prelude_set_profile(const char *arg)
1142	{
1143	if ( profile ) {
1144	free(profile);
1145	profile = NULL;
1146	}
1147
1148	if ( arg ) {
1149	profile = strdup(arg);
1150	if ( ! profile )
1151	return -1;
1152	}
1153
1154	return 0;
1155	}
1156
1157	/* Allow initialization of prelude; to be called
1158	* after forking the daemon. Delays heartbeat
1159	* start after config read until it is safe.
1160	*/
1161	void sh_prelude_reset(void)
1162	{
1163	extern void sh_error_init_prelude();
1164
1165	ready_for_init = 1;
1166	sh_error_init_prelude();
1167	return;
1168	}
1169
1170
1171
1172	void sh_prelude_stop(void)
1173	{
1174	if (initialized < 1)
1175	return;
1176
1177	if (sh.flag.isdaemon == S_TRUE)
1178	prelude_client_destroy(client, PRELUDE_CLIENT_EXIT_STATUS_FAILURE);
1179	else
1180	prelude_client_destroy(client, PRELUDE_CLIENT_EXIT_STATUS_SUCCESS);
1181
1182	client = NULL;
1183
1184	prelude_deinit();
1185
1186	initialized = 0;
1187	return;
1188	}
1189
1190
1191
1192	int sh_prelude_init(void)
1193	{
1194	int ret;
1195	prelude_string_t *str;
1196	idmef_analyzer_t *analyzer;
1197	prelude_client_flags_t flags;
1198	#ifdef SH_NOFAILOVER
1199	prelude_connection_pool_t *pool;
1200	prelude_connection_pool_flags_t conn_flags;
1201	#endif
1202
1203	if (ready_for_init == 0)
1204	return initialized;
1205
1206	if (initialized > 0)
1207	return initialized;
1208
1209	prelude_thread_init(NULL);
1210	prelude_init(&sh_argc_store, sh_argv_store);
1211
1212	ret = prelude_client_new(&client, profile ? profile : _("samhain"));
1213	if ( ret < 0 ) {
1214	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
1215	_("Failed to initialize Prelude"), _("sh_prelude_init"));
1216	initialized = -1;
1217	return -1;
1218	}
1219
1220	/*
1221	* Enable automatic heartbeat sending.
1222	*/
1223	flags = prelude_client_get_flags(client);
1224	ret = prelude_client_set_flags(client, flags \| PRELUDE_CLIENT_FLAGS_ASYNC_TIMER);
1225
1226	analyzer = prelude_client_get_analyzer(client);
1227
1228	ret = idmef_analyzer_new_model(analyzer, &str);
1229	prelude_string_set_dup(str, IDMEF_ANALYZER_MODEL);
1230
1231	ret = idmef_analyzer_new_class(analyzer, &str);
1232	prelude_string_set_dup(str, IDMEF_ANALYZER_CLASS);
1233
1234	ret = idmef_analyzer_new_version(analyzer, &str);
1235	prelude_string_set_dup(str, IDMEF_ANALYZER_VERSION);
1236
1237	#ifdef SH_NOFAILOVER
1238	pool = prelude_client_get_connection_pool(client);
1239	conn_flags = prelude_connection_pool_get_flags(pool);
1240
1241	conn_flags &= ~PRELUDE_CONNECTION_POOL_FLAGS_FAILOVER;
1242	prelude_connection_pool_set_flags(pool, conn_flags);
1243	#endif
1244
1245	ret = prelude_client_start(client);
1246	if ( ret < 0 ) {
1247	prelude_perror(ret, _("error starting prelude client"));
1248
1249	if ( prelude_client_is_setup_needed(ret) )
1250	prelude_client_print_setup_error(client);
1251
1252	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
1253	_("Failed to start Prelude"), _("sh_prelude_init"));
1254	initialized = -1;
1255	return -1;
1256	}
1257
1258	initialized = 1;
1259	return 1;
1260	}
1261
1262	/* HAVE_LIBPRELUDE_9 */
1263	#endif
1264

Note: See TracBrowser for help on using the repository browser.

Download in other formats: