Context Navigation

source: trunk/src/sh_hash.c@ 412

Last change on this file since 412 was 405, checked in by katerina, 12 years ago
Fix for tickets #303, #304, #305. #306, and #307. Update version number.
File size: 102.9 KB

Line
1	/* SAMHAIN file system integrity testing */
2	/* Copyright (C) 1999, 2000, 2001, 2002 Rainer Wichmann */
3	/* */
4	/* This program is free software; you can redistribute it */
5	/* and/or modify */
6	/* it under the terms of the GNU General Public License as */
7	/* published by */
8	/* the Free Software Foundation; either version 2 of the License, or */
9	/* (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., 675 Mass Ave, Cambridge, MA 02139, USA. */
19
20	#include "config_xor.h"
21
22	/* define this if you want version 1.3 style database file */
23	/* #define OLD_BUG */
24
25	/* make sure state changes of a file are always reported, even
26	* with reportonlyonce=true
27	*/
28	/* #define REPLACE_OLD // moved to samhain.h */
29
30	#include <stdlib.h>
31	#include <string.h>
32	#include <stdio.h>
33	#include <sys/types.h>
34	#include <sys/stat.h>
35	#include <unistd.h>
36
37	#ifdef MAJOR_IN_MKDEV
38	#include <sys/mkdev.h>
39	#else
40	#ifdef MAJOR_IN_SYSMACROS
41	#include <sys/sysmacros.h>
42	#endif
43	#endif
44
45	#ifdef HAVE_MEMORY_H
46	#include <memory.h>
47	#endif
48
49	#if defined(SH_WITH_CLIENT) \|\| defined(SH_STANDALONE)
50
51	#include "sh_hash.h"
52	#include "sh_utils.h"
53	#include "sh_error.h"
54	#include "sh_tiger.h"
55	#include "sh_gpg.h"
56	#include "sh_unix.h"
57	#include "sh_files.h"
58	#include "sh_ignore.h"
59	#include "sh_pthread.h"
60
61	#if defined(SH_WITH_CLIENT)
62	#include "sh_forward.h"
63	#endif
64
65
66	#define SH_KEY_NULL _("000000000000000000000000000000000000000000000000")
67
68
69	#undef FIL__
70	#define FIL__ _("sh_hash.c")
71
72	SH_MUTEX_STATIC(mutex_hash,PTHREAD_MUTEX_INITIALIZER);
73
74	const char notalink[2] = { '-', '\0' };
75
76	static char * all_items (file_type * theFile, char * fileHash, int is_new);
77
78	#define QUOTE_CHAR '='
79
80	char * unquote_string (const char * str, size_t len)
81	{
82	int i = 0, t1, t2;
83	char * tmp = NULL;
84	size_t l2, j, k = 0;
85
86	SL_ENTER(_("unquote_string"));
87
88	if (str != NULL)
89	{
90	l2 = len - 2;
91	tmp = SH_ALLOC(len + 1);
92
93	for (j = 0; j <= len; ++j)
94	{
95	if (str[j] != QUOTE_CHAR)
96	{
97	tmp[k] = str[j];
98	}
99	else if (str[j] == QUOTE_CHAR && j < l2)
100	{
101	t1 = sh_util_hexchar(str[j+1]);
102	t2 = sh_util_hexchar(str[j+2]);
103	if ((t1\|t2) >= 0)
104	{
105	i = 16 * t1 + t2;
106	tmp[k] = i;
107	j += 2;
108	}
109	else
110	{
111	tmp[k] = str[j];
112	}
113	}
114	else
115	tmp[k] = str[j];
116	++k;
117	}
118	}
119	SL_RETURN(tmp, _("unquote_string"));
120	}
121
122
123	static char * int2hex (unsigned char i, char * i2h)
124	{
125	static char hexchars[] = "0123456789ABCDEF";
126
127	i2h[0] = hexchars[(((i) & 0xF0) >> 4)]; /* high */
128	i2h[1] = hexchars[((i) & 0x0F)]; /* low */
129
130	return i2h;
131	}
132
133
134	char * quote_string (const char * str, size_t len)
135	{
136	char * tmp;
137	char * tmp2;
138	size_t l2, j, i = 0, k = 0;
139	char i2h[2];
140
141	SL_ENTER(_("quote_string"));
142
143	if (str == NULL)
144	{
145	SL_RETURN(NULL, _("quote_string"));
146	}
147
148	for (j = 0; j < len; ++j)
149	if (str[j] == '\n' \|\| str[j] == QUOTE_CHAR) ++i;
150
151	l2 = len + 1;
152	if (sl_ok_muls(3, i) && sl_ok_adds(l2, (3*i)))
153	{
154	tmp = SH_ALLOC(len + 1 + 3*i);
155	}
156	else
157	{
158	sh_error_handle((-1), FIL__, __LINE__, -1, MSG_E_SUBGEN,
159	_("integer overflow"),
160	_("quote_string"));
161	SL_RETURN(NULL, _("quote_string"));
162	}
163
164	for (j = 0; j <= len; ++j)
165	{
166	if (str[j] == '\n')
167	{
168	tmp2 = int2hex((unsigned char) '\n', i2h); /* was 'n', fixed in 1.5.4 */
169	tmp[k] = QUOTE_CHAR; ++k;
170	tmp[k] = tmp2[0]; ++k;
171	tmp[k] = tmp2[1];
172	}
173	else if (str[j] == QUOTE_CHAR)
174	{
175	tmp2 = int2hex((unsigned char) QUOTE_CHAR, i2h);
176	tmp[k] = QUOTE_CHAR; ++k;
177	tmp[k] = tmp2[0]; ++k;
178	tmp[k] = tmp2[1];
179	}
180	else
181	{
182	tmp[k] = str[j];
183	}
184	++k;
185	}
186	SL_RETURN(tmp, _("quote_string"));
187	}
188
189	static UINT32 * swap_32 (UINT32 * iptr)
190	{
191	#ifdef WORDS_BIGENDIAN
192	unsigned char swap;
193	unsigned char * ii = (unsigned char *) iptr;
194	swap = ii[0]; ii[0] = ii[3]; ii[3] = swap;
195	swap = ii[1]; ii[1] = ii[2]; ii[2] = swap;
196	return iptr;
197	#else
198	return iptr;
199	#endif
200	}
201
202	static UINT64 * swap_64 (UINT64 * iptr)
203	{
204	#ifdef WORDS_BIGENDIAN
205	#ifdef UINT64_IS_32
206	swap_32 ((UINT32*) iptr);
207	#else
208	unsigned char swap;
209	unsigned char * ii = (unsigned char *) iptr;
210	swap = ii[0]; ii[0] = ii[7]; ii[7] = swap;
211	swap = ii[1]; ii[1] = ii[6]; ii[6] = swap;
212	swap = ii[2]; ii[2] = ii[5]; ii[5] = swap;
213	swap = ii[3]; ii[3] = ii[4]; ii[4] = swap;
214	#endif
215	return iptr;
216	#else
217	return iptr;
218	#endif
219	}
220
221	static unsigned short * swap_short (unsigned short * iptr)
222	{
223	#ifdef WORDS_BIGENDIAN
224	if (sizeof(short) == 4)
225	swap_32 ((UINT32*) iptr);
226	else
227	{
228	/* alignment problem */
229	unsigned char swap;
230	static unsigned short ooop;
231	unsigned char * ii;
232	ooop = *iptr;
233	ii = (unsigned char *) &ooop;
234	/* printf("SWAP0: %hd %d\n", iptr, sizeof(unsigned short)); /
235	swap = ii[0]; ii[0] = ii[1]; ii[1] = swap;
236	/* printf("SWAP1: %hd\n", (unsigned short) ooop); */
237	#ifndef OLD_BUG
238	return &ooop;
239	#endif
240	}
241	return iptr;
242	#else
243	return iptr;
244	#endif
245	}
246
247
248	typedef struct store_info {
249
250	UINT32 mode;
251	UINT32 linkmode;
252
253	UINT64 dev;
254	UINT64 rdev;
255	UINT32 hardlinks;
256	UINT32 ino;
257	UINT64 size;
258	UINT64 atime;
259	UINT64 mtime;
260	UINT64 ctime;
261	UINT32 owner;
262	UINT32 group;
263
264	#ifdef OLD_BUG
265	#if defined(__linux__)
266	UINT32 attributes;
267	char c_attributes[ATTRBUF_SIZE];
268	#endif
269	#else
270	/* #if defined(__linux__) */
271	UINT32 attributes;
272	char c_attributes[ATTRBUF_SIZE];
273	/* endif */
274	#endif
275	unsigned short mark;
276	char c_owner[USER_MAX+2];
277	char c_group[GROUP_MAX+2];
278	char c_mode[CMODE_SIZE];
279	char checksum[KEY_LEN+1];
280	} sh_filestore_t;
281
282	typedef struct file_info {
283	sh_filestore_t theFile;
284	char * fullpath;
285	char * linkpath;
286	char * attr_string;
287	int fflags;
288	unsigned long modi_mask;
289	struct file_info * next;
290	} sh_file_t;
291
292	static const char *policy[] = {
293	N_("[]"),
294	N_("[ReadOnly]"),
295	N_("[LogFiles]"),
296	N_("[GrowingLogs]"),
297	N_("[IgnoreNone]"),
298	N_("[IgnoreAll]"),
299	N_("[Attributes]"),
300	N_("[User0]"),
301	N_("[User1]"),
302	N_("[User2]"),
303	N_("[User3]"),
304	N_("[User4]"),
305	N_("[Prelink]"),
306	NULL
307	};
308
309	const char * sh_hash_getpolicy(int class)
310	{
311	if (class > 0 && class < SH_ERR_T_DIR)
312	return _(policy[class]);
313	return _("[indef]");
314	}
315
316	/**********************************
317	*
318	* hash table functions
319	*
320	**********************************
321	*/
322
323	#include "sh_hash.h"
324
325	/* must fit an int */
326	/* #define TABSIZE 2048 */
327	#define TABSIZE 65536
328
329	/* must fit an unsigned short */
330	/* changed for V0.8, as the */
331	/* database format has changed */
332
333	/* changed again for V0.9 */
334	/* #define REC_MAGIC 19 */
335	/* changed again for V1.3 */
336	#ifdef OLD_BUG
337	#define REC_MAGIC 20
338	#else
339	/* changed again for V1.4 */
340	#define REC_MAGIC 21
341	#endif
342
343	#define REC_FLAGS_ATTR (1<<8)
344	#define REC_FLAGS_MASK 0xFF00
345
346	/**************************************************************
347	*
348	* create a file_type from a sh_file_t
349	*
350	**************************************************************/
351	static file_type * sh_hash_create_ft (const sh_file_t * p, char * fileHash)
352	{
353	file_type * theFile;
354
355	SL_ENTER(_("sh_hash_create_ft"));
356
357	theFile = SH_ALLOC(sizeof(file_type));
358
359	sl_strlcpy(theFile->c_mode, p->theFile.c_mode, 11);
360	theFile->mode = p->theFile.mode;
361	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
362	sl_strlcpy(theFile->c_attributes, p->theFile.c_attributes, ATTRBUF_SIZE);
363	theFile->attributes = p->theFile.attributes;
364	#endif
365
366	sl_strlcpy(theFile->fullpath, p->fullpath, PATH_MAX);
367	if (p->linkpath != NULL /* && theFile->c_mode[0] == 'l' */)
368	{
369	theFile->link_path = sh_util_strdup(p->linkpath);
370	}
371	else
372	{
373	theFile->link_path = NULL;
374	}
375	sl_strlcpy(fileHash, p->theFile.checksum, KEY_LEN+1);
376
377	theFile->mtime = p->theFile.mtime;
378	theFile->ctime = p->theFile.ctime;
379	theFile->atime = p->theFile.atime;
380
381	theFile->size = p->theFile.size;
382
383	sl_strlcpy(theFile->c_group, p->theFile.c_group, GROUP_MAX+2);
384	theFile->group = p->theFile.group;
385	sl_strlcpy(theFile->c_owner, p->theFile.c_owner, USER_MAX+2);
386	theFile->owner = p->theFile.owner;
387
388	theFile->ino = p->theFile.ino;
389	theFile->rdev = p->theFile.rdev;
390	theFile->dev = p->theFile.dev;
391	theFile->hardlinks = p->theFile.hardlinks;
392
393	if (p->attr_string)
394	theFile->attr_string = sh_util_strdup(p->attr_string);
395	else
396	theFile->attr_string = NULL;
397
398	SL_RETURN((theFile), _("sh_hash_create_ft"));
399	}
400
401	struct two_sh_file_t {
402	sh_file_t * prev;
403	sh_file_t * this;
404	};
405
406	static sh_file_t * hashsearch (const char * s);
407	static int hashsearch_prev (const char * s, struct two_sh_file_t * a, int * index);
408
409	static sh_file_t * tab[TABSIZE];
410
411	/**************************************************************
412	*
413	* compute hash function
414	*
415	**************************************************************/
416
417	static int hashfunc(const char *s)
418	{
419	unsigned int n = 0;
420
421	for ( ; *s; s++)
422	n = 31 * n + *s;
423
424	return n & (TABSIZE - 1); /* % TABSIZE */;
425	}
426
427
428	int hashreport_missing( char *fullpath, int level)
429	{
430	sh_file_t * p;
431	char * tmp;
432	char fileHash[KEY_LEN + 1];
433	file_type * theFile;
434	char * str;
435	char hashbuf[KEYBUF_SIZE];
436	volatile int retval;
437
438	/* -------- find the entry for the file ---------------- */
439
440	SH_MUTEX_LOCK(mutex_hash);
441
442	retval = 0;
443
444	if (sl_strlen(fullpath) <= MAX_PATH_STORE)
445	p = hashsearch(fullpath);
446	else
447	p = hashsearch( sh_tiger_hash(fullpath,
448	TIGER_DATA,
449	sl_strlen(fullpath),
450	hashbuf, sizeof(hashbuf))
451	);
452	if (p == NULL)
453	{
454	retval = -1;
455	goto unlock_and_return;
456	}
457
458	theFile = sh_hash_create_ft (p, fileHash);
459	str = all_items(theFile, fileHash, 0);
460	tmp = sh_util_safe_name(fullpath);
461
462	SH_MUTEX_LOCK(mutex_thread_nolog);
463	sh_error_handle (level, FIL__, __LINE__, 0,
464	MSG_FI_MISS2, tmp, str);
465	SH_MUTEX_UNLOCK(mutex_thread_nolog);
466	++sh.statistics.files_report;
467
468	SH_FREE(tmp);
469	SH_FREE(str);
470	if (theFile->attr_string) SH_FREE(theFile->attr_string);
471	if (theFile->link_path) SH_FREE(theFile->link_path);
472	SH_FREE(theFile);
473
474	unlock_and_return:
475	; /* 'label at end of compound statement */
476	SH_MUTEX_UNLOCK(mutex_hash);
477
478	return retval;
479	}
480
481
482	/**************************************************************
483	*
484	* search for files not visited, and check whether they exist
485	*
486	**************************************************************/
487	static sh_file_t * delete_db_entry(sh_file_t *p)
488	{
489	if (p->fullpath)
490	{
491	SH_FREE(p->fullpath);
492	p->fullpath = NULL;
493	}
494	if (p->linkpath)
495	{
496	if (p->linkpath != notalink)
497	SH_FREE(p->linkpath);
498	p->linkpath = NULL;
499	}
500	if (p->attr_string)
501	{
502	SH_FREE(p->attr_string);
503	p->attr_string = NULL;
504	}
505	SH_FREE(p);
506	return NULL;
507	}
508
509	static void hash_unvisited (int j,
510	sh_file_t prev, sh_file_t p, ShErrLevel level)
511	{
512	struct stat buf;
513	int i;
514	char * tmp;
515	char * ptr;
516	char fileHash[KEY_LEN + 1];
517	file_type * theFile;
518
519	char * str;
520
521
522	SL_ENTER(_("hash_unvisited"));
523
524	if (p->next != NULL)
525	hash_unvisited (j, p, p->next, level);
526
527	if (p->fullpath == NULL)
528	{
529	SL_RET0(_("hash_unvisited"));
530	}
531
532	/* Not a fully qualified path, i.e. some info stored by some module
533	*/
534	if (p->fullpath[0] != '/')
535	{
536	SL_RET0(_("hash_unvisited"));
537	}
538
539	/* visited flag not set: not seen;
540	* checked flag set: not seen (i.e. missing), and already checked
541	* reported flag not set: not reported yet
542	* allignore flag not set: not under IgnoreAll
543	*
544	* Files/directories under IgnoreAll are noticed as missing already
545	* during the file check.
546	*/
547	if (((!SH_FFLAG_VISITED_SET(p->fflags)) \|\| SH_FFLAG_CHECKED_SET(p->fflags))
548	&& (!SH_FFLAG_REPORTED_SET(p->fflags))
549	&& (!SH_FFLAG_ALLIGNORE_SET(p->fflags)))
550	{
551	i = retry_lstat(FIL__, __LINE__, p->fullpath, &buf);
552
553	/* if file does not exist
554	*/
555	if (0 != i)
556	{
557	ptr = sh_util_dirname (p->fullpath);
558	if (ptr)
559	{
560	/* If any of the parent directories is under IgnoreAll
561	*/
562	if (0 != sh_files_is_allignore(ptr))
563	level = ShDFLevel[SH_LEVEL_ALLIGNORE];
564	SH_FREE(ptr);
565	}
566
567	/* Only report if !SH_FFLAG_CHECKED_SET
568	*/
569	if (!SH_FFLAG_CHECKED_SET(p->fflags))
570	{
571	if (S_FALSE == sh_ignore_chk_del(p->fullpath))
572	{
573	tmp = sh_util_safe_name(p->fullpath);
574
575	theFile = sh_hash_create_ft (p, fileHash);
576	str = all_items(theFile, fileHash, 0);
577	sh_error_handle (level, FIL__, __LINE__, 0,
578	MSG_FI_MISS2, tmp, str);
579	++sh.statistics.files_report;
580	SH_FREE(str);
581	if (theFile->attr_string) SH_FREE(theFile->attr_string);
582	if (theFile->link_path) SH_FREE(theFile->link_path);
583	SH_FREE(theFile);
584
585	SH_FREE(tmp);
586	}
587	}
588
589	/* We rewrite the db on update, thus we need to keep this
590	* if the user does not want to purge it from the db.
591	*/
592
593	if ((sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE) \|\|
594	(S_TRUE == sh.flag.update && S_TRUE == sh_util_ask_update(p->fullpath)))
595	{
596	#ifdef REPLACE_OLD
597	/* Remove the old entry
598	*/
599	if (prev == p)
600	tab[j] = p->next;
601	else
602	prev->next = p->next;
603
604	delete_db_entry(p);
605
606	SL_RET0(_("hash_unvisited"));
607	#else
608	SET_SH_FFLAG_REPORTED(p->fflags);
609	#endif
610	}
611	}
612	}
613
614	else if (SH_FFLAG_VISITED_SET(p->fflags) && SH_FFLAG_REPORTED_SET(p->fflags)
615	&& (!SH_FFLAG_ALLIGNORE_SET(p->fflags)))
616	{
617	if (S_FALSE == sh_ignore_chk_new(p->fullpath))
618	{
619	tmp = sh_util_safe_name(p->fullpath);
620
621	theFile = sh_hash_create_ft (p, fileHash);
622	str = all_items(theFile, fileHash, 0);
623	sh_error_handle (level, FIL__, __LINE__, 0,
624	MSG_FI_MISS2, tmp, str);
625	++sh.statistics.files_report;
626	SH_FREE(str);
627	if (theFile->attr_string)
628	SH_FREE(theFile->attr_string);
629	SH_FREE(theFile);
630
631	SH_FREE(tmp);
632	}
633
634	CLEAR_SH_FFLAG_REPORTED(p->fflags);
635	}
636
637	if (sh.flag.reportonce == S_FALSE)
638	CLEAR_SH_FFLAG_REPORTED(p->fflags);
639
640	CLEAR_SH_FFLAG_VISITED(p->fflags);
641	CLEAR_SH_FFLAG_CHECKED(p->fflags);
642
643	SL_RET0(_("hash_unvisited"));
644	}
645
646
647
648	/*********************************************************************
649	*
650	* Search for files in the database that have been deleted from disk.
651	*
652	*********************************************************************/
653	void sh_hash_unvisited (ShErrLevel level)
654	{
655	int i;
656
657	SL_ENTER(_("sh_hash_unvisited"));
658
659	SH_MUTEX_LOCK(mutex_hash);
660	for (i = 0; i < TABSIZE; ++i)
661	{
662	if (tab[i] != NULL)
663	hash_unvisited (i, tab[i], tab[i], level);
664	}
665	SH_MUTEX_UNLOCK(mutex_hash);
666
667	SL_RET0(_("hash_unvisited"));
668	}
669
670	/*********************************************************************
671	*
672	* Remove a single file from the database.
673	*
674	*********************************************************************/
675	void sh_hash_remove (const char * path)
676	{
677	struct two_sh_file_t entries;
678	int index;
679
680	SL_ENTER(_("sh_hash_remove"));
681
682	SH_MUTEX_LOCK(mutex_hash);
683
684	if ((sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE) \|\|
685	(S_TRUE == sh.flag.update && S_TRUE == sh_util_ask_update(path)))
686	{
687	if (0 == hashsearch_prev (path, &entries, &index))
688	{
689	sh_file_t * p = entries.this;
690	#ifdef REPLACE_OLD
691	/* Remove the old entry
692	*/
693	if (entries.prev == p)
694	tab[index] = p->next;
695	else
696	entries.prev->next = p->next;
697
698	delete_db_entry(p);
699
700	goto end;
701	#else
702	SET_SH_FFLAG_REPORTED(p->fflags);
703	#endif
704	}
705	}
706
707	end:
708	; /* 'label at end of compound statement' */
709	SH_MUTEX_UNLOCK(mutex_hash);
710
711	SL_RET0(_("sh_hash_remove"));
712	}
713
714
715	/*********************************************************************
716	*
717	* Search for unvisited entries in the database, custom error handler.
718	*
719	*********************************************************************/
720	void sh_hash_unvisited_custom (char prefix, void(handler)(const char key))
721	{
722	int i;
723	sh_file_t *p = NULL;
724	sh_file_t *prev = NULL;
725	sh_file_t *next = NULL;
726
727	SL_ENTER(_("sh_hash_unvisited_custom"));
728
729	SH_MUTEX_LOCK(mutex_hash);
730	for (i = 0; i < TABSIZE; ++i)
731	{
732	if (tab[i] != NULL)
733	{
734	p = tab[i]; prev = p;
735
736	do
737	{
738	next = p->next;
739
740	if (p->fullpath &&
741	prefix == p->fullpath[0])
742	{
743	if ((!SH_FFLAG_VISITED_SET(p->fflags))
744	&& (!SH_FFLAG_REPORTED_SET(p->fflags)))
745	{
746	handler(p->fullpath);
747
748	if (!SH_FFLAG_CHECKED_SET(p->fflags))
749	{
750	/* delete */
751	if (tab[i] == p)
752	{
753	tab[i] = p->next;
754	prev = tab[i];
755	next = prev;
756	}
757	else
758	{
759	prev->next = p->next;
760	next = prev->next;
761	}
762
763	p = delete_db_entry(p);
764	}
765	}
766	if (p)
767	{
768	CLEAR_SH_FFLAG_VISITED(p->fflags);
769	CLEAR_SH_FFLAG_CHECKED(p->fflags);
770	}
771	}
772	if (p)
773	prev = p;
774	p = next;
775	}
776	while (p);
777	}
778	}
779	SH_MUTEX_UNLOCK(mutex_hash);
780
781	SL_RET0(_("hash_unvisited_custom"));
782	}
783
784
785	/**********************************************************************
786	*
787	* delete hash array
788	*
789	**********************************************************************/
790	static void hash_kill (sh_file_t *p)
791	{
792	SL_ENTER(_("hash_kill"));
793
794	if (p == NULL)
795	SL_RET0(_("hash_kill"));
796
797	if (p->next != NULL)
798	hash_kill (p->next);
799
800	if (p->fullpath)
801	{
802	SH_FREE(p->fullpath);
803	p->fullpath = NULL;
804	}
805	if (p->linkpath)
806	{
807	if (p->linkpath != notalink)
808	SH_FREE(p->linkpath);
809	p->linkpath = NULL;
810	}
811	if (p->attr_string)
812	{
813	SH_FREE(p->attr_string);
814	p->attr_string = NULL;
815	}
816	SH_FREE(p);
817	p = NULL;
818	SL_RET0(_("hash_kill"));
819	}
820
821
822	/***********************************************************************
823	*
824	* get info out of hash array
825	*
826	***********************************************************************/
827	static sh_file_t * hashsearch (const char * s)
828	{
829	sh_file_t * p;
830
831	SL_ENTER(_("hashsearch"));
832
833	if (s)
834	{
835	for (p = tab[hashfunc(s)]; p; p = p->next)
836	if ((p->fullpath != NULL) && (0 == strcmp(s, p->fullpath)))
837	SL_RETURN( p, _("hashsearch"));
838	}
839	SL_RETURN( NULL, _("hashsearch"));
840	}
841
842	static int hashsearch_prev (const char * s, struct two_sh_file_t * a, int * index)
843	{
844	sh_file_t * this;
845	sh_file_t * prev = NULL;
846
847	SL_ENTER(_("hashsearch_prev"));
848
849	if (s)
850	{
851	*index = hashfunc(s);
852
853	this = tab[*index];
854
855	prev = this;
856
857	if (this)
858	{
859	do {
860
861	if ((this->fullpath != NULL) && (0 == strcmp(s, this->fullpath)))
862	{
863	a->prev = prev;
864	a->this = this;
865
866	SL_RETURN( 0, _("hashsearch_prev"));
867	}
868
869	prev = this;
870	this = this->next;
871
872	} while(this);
873	}
874	}
875	SL_RETURN( -1, _("hashsearch"));
876	}
877
878
879	/***********************************************************************
880	*
881	* insert into hash array
882	*
883	***********************************************************************/
884	static void hashinsert (sh_file_t * s)
885	{
886	sh_file_t * p;
887	sh_file_t * q;
888	int key;
889
890	SL_ENTER(_("hashinsert"));
891
892	key = hashfunc(s->fullpath);
893
894	if (tab[key] == NULL)
895	{
896	tab[key] = s;
897	tab[key]->next = NULL;
898	SL_RET0(_("hashinsert"));
899	}
900	else
901	{
902	p = tab[key];
903	while (1)
904	{
905	if (p && p->fullpath &&
906	0 == strcmp(s->fullpath, p->fullpath))
907	{
908	q = p->next;
909	SH_FREE(p->fullpath);
910	if(p->linkpath && p->linkpath != notalink)
911	SH_FREE(p->linkpath);
912	if(p->attr_string)
913	SH_FREE(p->attr_string);
914	memcpy(p, s, sizeof(sh_file_t));
915	p->next = q;
916	SH_FREE(s);
917	s = NULL;
918	SL_RET0(_("hashinsert"));
919	}
920	else if (p && p->next == NULL)
921	{
922	p->next = s;
923	p->next->next = NULL;
924	SL_RET0(_("hashinsert"));
925	}
926	if (p)
927	p = p->next;
928	else /* cannot really happen, but llvm/clang does not know */
929	break;
930	}
931	}
932	/* notreached */
933	}
934
935
936	/******************************************************************
937	*
938	* Get a single line
939	*
940	******************************************************************/
941	static FILE * sh_fin_fd = NULL;
942
943	static int sh_hash_getline (FILE * fd, char * line, int sizeofline)
944	{
945	register int n = 0;
946	char * res;
947
948	if (sizeofline < 2) {
949	if (sizeofline > 0) line[0] = '\0';
950	return 0;
951	}
952	res = fgets(line, sizeofline, fd);
953	if (res == NULL)
954	{
955	line[0] = '\0';
956	return -1;
957	}
958	n = strlen(line);
959	if (n > 0) {
960	--n;
961	line[n] = '\0'; /* remove terminating '\n' */
962	}
963	return n;
964	}
965
966	static void sh_hash_getline_end (void)
967	{
968	sl_fclose (FIL__, __LINE__, sh_fin_fd);
969	sh_fin_fd = NULL;
970	return;
971	}
972
973	/******************************************************************
974	*
975	* ------- Check functions -------
976	*
977	******************************************************************/
978
979	static int IsInit = 0;
980
981
982	/******************************************************************
983	*
984	* Fast forward to start of data
985	*
986	******************************************************************/
987	int sh_hash_setdataent (SL_TICKET fd, char * line, int size, const char * file)
988	{
989	long i;
990	extern int get_the_fd (SL_TICKET ticket);
991
992	SL_ENTER(_("sh_hash_setdataent"));
993
994	sl_rewind (fd);
995
996	if (sh_fin_fd != NULL)
997	{
998	sl_fclose (FIL__, __LINE__, sh_fin_fd);
999	sh_fin_fd = NULL;
1000	}
1001
1002	sh_fin_fd = fdopen(dup(get_the_fd(fd)), "rb");
1003	if (!sh_fin_fd)
1004	{
1005	dlog(1, FIL__, __LINE__,
1006	_("The file signature database: %s is not readable.\n"),
1007	(NULL == file) ? _("(null)") : file);
1008	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_P_NODATA,
1009	( (NULL == file) ? _("(null)") : file)
1010	);
1011	aud_exit (FIL__, __LINE__, EXIT_FAILURE);
1012	}
1013
1014	while (1)
1015	{
1016	i = sh_hash_getline (sh_fin_fd, line, size);
1017	if (i < 0 )
1018	{
1019	SH_FREE(line);
1020	dlog(1, FIL__, __LINE__,
1021	_("The file signature database: %s does not\ncontain any data, or the start-of-file marker is missing (unlikely,\nunless modified by hand).\n"),
1022	(NULL == file) ? _("(null)") : file);
1023
1024	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_P_NODATA,
1025	( (NULL == file) ? _("(null)") : file)
1026	);
1027	aud_exit (FIL__, __LINE__, EXIT_FAILURE);
1028	}
1029
1030	#if defined(SH_STEALTH)
1031	if (0 == sl_strncmp (line, N_("[SOF]"), 5))
1032	#else
1033	if (0 == sl_strncmp (line, _("[SOF]"), 5))
1034	#endif
1035	break;
1036	}
1037	SL_RETURN( 1, _("sh_hash_setdataent"));
1038	}
1039
1040	static int sh_hash_setdataent_old (SL_TICKET fd, char * line, int size,
1041	char * file)
1042	{
1043	long i;
1044
1045	SL_ENTER(_("sh_hash_setdataent_old"));
1046
1047	sl_rewind (fd);
1048
1049	while (1)
1050	{
1051	i = sh_unix_getline (fd, line, size-1);
1052	if (i < 0 )
1053	{
1054	SH_FREE(line);
1055	dlog(1, FIL__, __LINE__,
1056	_("The file signature database: %s does not\ncontain any data, or the start-of-file marker is missing (unlikely,\nunless modified by hand).\n"),
1057	(NULL == file) ? _("(null)") : file);
1058
1059	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_P_NODATA,
1060	( (NULL == file) ? _("(null)") : file)
1061	);
1062	aud_exit (FIL__, __LINE__, EXIT_FAILURE);
1063	}
1064
1065	#if defined(SH_STEALTH)
1066	if (0 == sl_strncmp (line, N_("[SOF]"), 5))
1067	#else
1068	if (0 == sl_strncmp (line, _("[SOF]"), 5))
1069	#endif
1070	break;
1071	}
1072	SL_RETURN( 1, _("sh_hash_setdataent_old"));
1073	}
1074
1075	/******************************************************************
1076	*
1077	* Read next record
1078	*
1079	******************************************************************/
1080	sh_file_t * sh_hash_getdataent (SL_TICKET fd, char * line, int size)
1081	{
1082	sh_file_t * p;
1083	sh_filestore_t ft;
1084	long i;
1085	size_t len;
1086	char * fullpath;
1087	char * linkpath;
1088	char * attr_string = NULL;
1089	char * tmp;
1090
1091	SL_ENTER(_("sh_hash_getdataent"));
1092
1093	(void) fd;
1094
1095	/* Read next record -- Part One
1096	*/
1097	p = SH_ALLOC(sizeof(sh_file_t));
1098
1099	i = fread (&ft, sizeof(sh_filestore_t), 1, sh_fin_fd);
1100	/* i = sl_read(fd, &ft, sizeof(sh_filestore_t)); */
1101	/* if ( SL_ISERROR(i) \|\| i == 0) */
1102	if (i < 1)
1103	{
1104	SH_FREE(p);
1105	SL_RETURN( NULL, _("sh_hash_getdataent"));
1106	}
1107
1108	swap_32(&(ft.mode));
1109	swap_32(&(ft.linkmode));
1110	swap_64(&(ft.dev));
1111	swap_64(&(ft.rdev));
1112	swap_32(&(ft.hardlinks));
1113	swap_32(&(ft.ino));
1114	swap_64(&(ft.size));
1115	swap_64(&(ft.atime));
1116	swap_64(&(ft.mtime));
1117	swap_64(&(ft.ctime));
1118	swap_32(&(ft.owner));
1119	swap_32(&(ft.group));
1120	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
1121	swap_32(&(ft.attributes));
1122	#endif
1123	#ifdef OLD_BUG
1124	swap_short(&(ft.mark));
1125	#else
1126	ft.mark = *(swap_short(&(ft.mark)));
1127	#endif
1128
1129	if ((ft.mark & ~REC_FLAGS_MASK) != REC_MAGIC)
1130	{
1131	SH_FREE(p);
1132	SL_RETURN( NULL, _("sh_hash_getdataent"));
1133	}
1134
1135	/* Read next record -- Part Two -- Fullpath
1136	*/
1137	i = sh_hash_getline (sh_fin_fd, line, size);
1138	if (i <= 0 )
1139	{
1140	SH_FREE(line);
1141	SH_FREE(p);
1142	dlog(1, FIL__, __LINE__,
1143	_("There is a corrupt record in the file signature database: %s\nThe file path is missing.\n"),
1144	(NULL == file_path('D', 'R'))? _("(null)"):file_path('D', 'R'));
1145	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_P_NODATA,
1146	( (NULL == file_path('D', 'R')) ? _("(null)") :
1147	file_path('D', 'R'))
1148	);
1149	aud_exit (FIL__, __LINE__,EXIT_FAILURE);
1150	}
1151
1152	tmp = unquote_string (line, i);
1153	len = sl_strlen(tmp)+1;
1154	fullpath = SH_ALLOC(len);
1155	(void) sl_strlcpy (fullpath, tmp, len);
1156	if (tmp)
1157	SH_FREE(tmp);
1158	if (fullpath[len-2] == '\n')
1159	fullpath[len-2] = '\0';
1160
1161	/* Read next record -- Part Three -- Linkpath
1162	*/
1163	i = sh_hash_getline (sh_fin_fd, line, size);
1164	if (i <= 0 )
1165	{
1166	SH_FREE(line);
1167	SH_FREE(fullpath);
1168	SH_FREE(p);
1169	dlog(1, FIL__, __LINE__,
1170	_("There is a corrupt record in the file signature database: %s\nThe link path (or its placeholder) is missing.\n"),
1171	(NULL == file_path('D', 'R'))? _("(null)"):file_path('D', 'R'));
1172	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_P_NODATA,
1173	( (NULL == file_path('D', 'R')) ? _("(null)") :
1174	file_path('D', 'R'))
1175	);
1176	aud_exit (FIL__, __LINE__,EXIT_FAILURE);
1177	}
1178
1179	tmp = unquote_string (line, i);
1180
1181	if ( tmp && tmp[0] == '-' &&
1182	(tmp[1] == '\0' \|\| (tmp[1] == '\n' && tmp[2] == '\0')))
1183	{
1184	linkpath = (char *)notalink;
1185	}
1186	else
1187	{
1188	len = sl_strlen(tmp);
1189	linkpath = sh_util_strdup_l(tmp, len);
1190	if (len > 0 && linkpath[len-1] == '\n')
1191	linkpath[len-1] = '\0';
1192	}
1193
1194	if (tmp)
1195	SH_FREE(tmp);
1196
1197	/* Read next record -- Part Four -- attr_string
1198	*/
1199	if ((ft.mark & REC_FLAGS_ATTR) != 0)
1200	{
1201	i = sh_hash_getline (sh_fin_fd, line, size);
1202	if (i <= 0 )
1203	{
1204	SH_FREE(line);
1205	SH_FREE(fullpath);
1206	if (linkpath != notalink)
1207	SH_FREE(linkpath);
1208	SH_FREE(p);
1209	dlog(1, FIL__, __LINE__,
1210	_("There is a corrupt record in the file signature database: %s\nThe attribute string is missing.\n"),
1211	(NULL == file_path('D', 'R'))? _("(null)"):file_path('D', 'R'));
1212	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_P_NODATA,
1213	( (NULL == file_path('D', 'R')) ? _("(null)") :
1214	file_path('D', 'R'))
1215	);
1216	aud_exit (FIL__, __LINE__,EXIT_FAILURE);
1217	}
1218
1219	tmp = unquote_string (line, i);
1220
1221	len = sl_strlen(tmp)+1;
1222	attr_string = SH_ALLOC(len);
1223	(void) sl_strlcpy (attr_string, tmp, len);
1224	if (tmp)
1225	SH_FREE(tmp);
1226	if (attr_string[len-2] == '\n')
1227	attr_string[len-2] = '\0';
1228	}
1229
1230	/* Read next record -- Part Four -- Decode
1231	*/
1232	#if defined(SH_STEALTH)
1233	sh_do_decode(fullpath, sl_strlen(fullpath));
1234
1235	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
1236	sh_do_decode(ft.c_attributes, sl_strlen(ft.c_attributes));
1237	#endif
1238
1239	sh_do_decode(ft.c_mode, sl_strlen(ft.c_mode));
1240	sh_do_decode(ft.c_owner, sl_strlen(ft.c_owner));
1241	sh_do_decode(ft.c_group, sl_strlen(ft.c_group));
1242	sh_do_decode(ft.checksum, sl_strlen(ft.checksum));
1243
1244	/* TXT entries are c_mode[0] != 'l' and do not get decoded
1245	*/
1246	if (ft.c_mode[0] == 'l' && linkpath != notalink)
1247	{
1248	sh_do_decode(linkpath, sl_strlen(linkpath));
1249	}
1250
1251	if ((ft.mark & REC_FLAGS_ATTR) != 0)
1252	{
1253	sh_do_decode(attr_string, sl_strlen(attr_string));
1254	}
1255	#endif
1256
1257	memcpy( &(*p).theFile, &ft, sizeof(sh_filestore_t) );
1258
1259	/* init fflags, such that suid files in
1260	* database are recognized as such
1261	*/
1262	{
1263	mode_t mode = (mode_t) ft.mode;
1264
1265	if (S_ISREG(mode) &&
1266	(0 !=(S_ISUID & mode) \|\|
1267	#if defined(HOST_IS_LINUX)
1268	(0 !=(S_ISGID & mode) &&
1269	0 !=(S_IXGRP & mode))
1270	#else
1271	0 !=(S_ISGID & mode)
1272	#endif
1273	)
1274	)
1275	p->fflags = SH_FFLAG_SUIDCHK;
1276
1277	else
1278	p->fflags = 0;
1279	}
1280
1281	p->modi_mask = 0L;
1282	p->fullpath = fullpath;
1283	p->linkpath = linkpath;
1284
1285	p->attr_string = attr_string;
1286
1287	/* set to an invalid value
1288	*/
1289	ft.mark = (REC_MAGIC + 5);
1290
1291	SL_RETURN( p, _("sh_hash_getdataent"));
1292	}
1293
1294	/******************************************************************
1295	*
1296	* Initialize
1297	*
1298	******************************************************************/
1299	void sh_hash_init ()
1300	{
1301
1302	#define FGETS_BUF 16384
1303
1304	sh_file_t * p;
1305	SL_TICKET fd;
1306	long i;
1307	int count = 0;
1308	char * line = NULL;
1309
1310	#if defined(WITH_GPG) \|\| defined(WITH_PGP)
1311	extern int get_the_fd (SL_TICKET ticket);
1312
1313	SL_TICKET fdTmp = (-1);
1314	#endif
1315	char hashbuf[KEYBUF_SIZE];
1316
1317	volatile int retval = 0;
1318	volatile int exitval = EXIT_SUCCESS;
1319
1320	SL_ENTER(_("sh_hash_init"));
1321
1322	SH_MUTEX_LOCK(mutex_hash);
1323
1324	if (IsInit == 1)
1325	{
1326	goto unlock_and_return;
1327	}
1328
1329	fd = (-1);
1330
1331	#if defined(SH_WITH_CLIENT)
1332
1333	/* Data file from Server
1334	*/
1335
1336	if (fd == (-1) && 0 == sl_strcmp(file_path('D', 'R'), _("REQ_FROM_SERVER")))
1337	{
1338	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_D_DSTART);
1339	fd = sh_forward_req_file(_("DATA"));
1340	if (SL_ISERROR(fd))
1341	{
1342	dlog(1, FIL__, __LINE__,
1343	_("Could not retrieve the file signature database from the server(errnum = %ld).\nPossible reasons include:\n - the server is not running,\n - session key negotiation failed (see the manual for proper setup), or\n - the server cannot access the file.\n"), fd);
1344	sh_error_handle ((-1), FIL__, __LINE__, fd, MSG_EXIT_ABORT1,
1345	sh.prg_name);
1346	retval = 1; exitval = EXIT_FAILURE;
1347	goto unlock_and_return;
1348	}
1349	sl_rewind (fd);
1350
1351	sl_strlcpy (sh.data.hash,
1352	sh_tiger_hash (file_path('D', 'R'),
1353	fd, TIGER_NOLIM, hashbuf, sizeof(hashbuf)),
1354	KEY_LEN+1);
1355	sl_rewind (fd);
1356	}
1357	else
1358	#endif
1359	/* Local data file
1360	*/
1361
1362	if (fd == (-1))
1363	{
1364	if ( SL_ISERROR(fd = sl_open_read(FIL__, __LINE__,
1365	file_path('D', 'R'), SL_YESPRIV)))
1366	{
1367	TPT(( 0, FIL__, __LINE__, _("msg=<Error opening: %s>\n"),
1368	file_path('D', 'R')));
1369	dlog(1, FIL__, __LINE__,
1370	_("Could not open the local file signature database for reading because\nof the following error: %s (errnum = %ld)\nIf this is a permission problem, you need to change file permissions\nto make the file readable for the effective UID: %d\n"),
1371	sl_get_errmsg(), fd, (int) sl_ret_euid());
1372	sh_error_handle ((-1), FIL__, __LINE__, fd, MSG_EXIT_ABORT1,
1373	sh.prg_name);
1374	retval = 1; exitval = EXIT_FAILURE;
1375	goto unlock_and_return;
1376	}
1377
1378	TPT(( 0, FIL__, __LINE__, _("msg=<Opened database: %s>\n"),
1379	file_path('D', 'R')));
1380
1381	if (0 != sl_strncmp(sh.data.hash,
1382	sh_tiger_hash (file_path('D', 'R'), fd, TIGER_NOLIM,
1383	hashbuf, sizeof(hashbuf)),
1384	KEY_LEN)
1385	&& sh.flag.checkSum != SH_CHECK_INIT)
1386	{
1387	dlog(1, FIL__, __LINE__,
1388	_("The checksum of the file signature database has changed since startup: %s -> %s\n"),
1389	sh.data.hash, sh_tiger_hash (file_path('D', 'R'), fd, TIGER_NOLIM,
1390	hashbuf, sizeof(hashbuf)));
1391	sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_E_AUTH,
1392	( (NULL == file_path('D', 'R')) ? _("(null)") :
1393	file_path('D', 'R') )
1394	);
1395	retval = 1; exitval = EXIT_FAILURE;
1396	goto unlock_and_return;
1397	}
1398	sl_rewind (fd);
1399
1400	} /* new 1.4.8 */
1401
1402	if (sig_termfast == 1) /* SIGTERM */
1403	{
1404	TPT((0, FIL__, __LINE__, _("msg=<Terminate.>\n")));
1405	--sig_raised; --sig_urgent;
1406	retval = 1; exitval = EXIT_SUCCESS;
1407	goto unlock_and_return;
1408	}
1409
1410	#if defined(WITH_GPG) \|\| defined(WITH_PGP)
1411
1412	/* extract the data and copy to temporary file
1413	*/
1414	fdTmp = sh_gpg_extract_signed(fd);
1415
1416	if (sig_termfast == 1) /* SIGTERM */
1417	{
1418	TPT((0, FIL__, __LINE__, _("msg=<Terminate.>\n")));
1419	--sig_raised; --sig_urgent;
1420	retval = 1; exitval = EXIT_SUCCESS;
1421	goto unlock_and_return;
1422	}
1423
1424	sl_close(fd);
1425	fd = fdTmp;
1426
1427	/* Validate signature of open file.
1428	*/
1429	if (0 != sh_gpg_check_sign (0, fd, 2))
1430	{
1431	retval = 1; exitval = EXIT_FAILURE;
1432	goto unlock_and_return;
1433	}
1434	sl_rewind (fd);
1435	#endif
1436
1437	line = SH_ALLOC(MAX_PATH_STORE+2);
1438
1439	/* fast forward to start of data
1440	*/
1441	sh_hash_setdataent(fd, line, MAX_PATH_STORE+1, file_path('D', 'R'));
1442
1443	for (i = 0; i < TABSIZE; ++i)
1444	tab[i] = NULL;
1445
1446	while (1)
1447	{
1448	if (sig_termfast == 1) /* SIGTERM */
1449	{
1450	TPT((0, FIL__, __LINE__, _("msg=<Terminate.>\n")));
1451	--sig_raised; --sig_urgent;
1452	retval = 1; exitval = EXIT_SUCCESS;
1453	SH_FREE(line);
1454	line = NULL;
1455	goto unlock_and_return;
1456	}
1457
1458	p = sh_hash_getdataent (fd, line, MAX_PATH_STORE+1);
1459	if (p != NULL)
1460	{
1461	hashinsert (p);
1462	++count;
1463	}
1464	else
1465	break;
1466	}
1467
1468	/* Initialization completed.
1469	*/
1470	IsInit = 1;
1471
1472	if (line != NULL)
1473	SH_FREE(line);
1474
1475	/* Always keep db in memory, so we have no open file
1476	*/
1477	sl_close (fd);
1478	sh_hash_getline_end();
1479	/* fd = -1; */
1480
1481	unlock_and_return:
1482	; /* 'label at end of compound statement */
1483	SH_MUTEX_UNLOCK(mutex_hash);
1484	if (retval == 0)
1485	{
1486	SL_RET0(_("sh_hash_init"));
1487	}
1488	aud_exit (FIL__, __LINE__, exitval);
1489	}
1490
1491	/*****************************************************************
1492	*
1493	* delete hash array
1494	*
1495	*****************************************************************/
1496	void sh_hash_hashdelete ()
1497	{
1498	int i;
1499
1500	SL_ENTER(_("sh_hash_hashdelete"));
1501
1502	/* need deadlock detection here if called from exit handler
1503	*/
1504	SH_MUTEX_TRYLOCK(mutex_hash);
1505
1506	if (IsInit == 0)
1507	goto unlock_and_exit;
1508
1509	for (i = 0; i < TABSIZE; ++i)
1510	if (tab[i] != NULL)
1511	{
1512	hash_kill (tab[i]);
1513	tab[i] = NULL;
1514	}
1515	IsInit = 0;
1516
1517	unlock_and_exit:
1518	; /* 'label at end of compound statement */
1519	SH_MUTEX_TRYLOCK_UNLOCK(mutex_hash);
1520
1521	SL_RET0(_("sh_hash_hashdelete"));
1522	}
1523
1524	/******************************************************************
1525	*
1526	* Insert a file into the database.
1527	*
1528	******************************************************************/
1529	static int pushdata_isfirst = 1;
1530	static SL_TICKET pushdata_fd = -1;
1531
1532	static int pushdata_stdout = S_FALSE;
1533
1534	static char * sh_db_version_string = NULL;
1535
1536	int sh_hash_pushdata_stdout (const char * str)
1537	{
1538	if (!str)
1539	{ pushdata_stdout = S_TRUE; return 0; }
1540	return -1;
1541	}
1542
1543	int sh_hash_version_string(const char * str)
1544	{
1545	if (str)
1546	{
1547	if (sh_db_version_string != NULL) {
1548	SH_FREE(sh_db_version_string);
1549	}
1550	if (0 == sl_strncmp(str, _("NULL"), 4))
1551	{
1552	sh_db_version_string = NULL;
1553	return 0;
1554	}
1555	sh_db_version_string = sh_util_strdup(str);
1556	return 0;
1557	}
1558	return -1;
1559	}
1560
1561	static int sh_loosedircheck = S_FALSE;
1562
1563	int sh_hash_loosedircheck(const char * str)
1564	{
1565	return sh_util_flagval(str, &sh_loosedircheck);
1566	}
1567
1568
1569	static void sh_hash_pushdata_int (file_type * buf, char * fileHash)
1570	{
1571	static long p_count = 0;
1572
1573	int status = 0;
1574
1575	char * tmp;
1576	size_t tmp_len = 0;
1577	size_t old_len = 0;
1578	size_t path_len = 0;
1579
1580	sh_filestore_t p;
1581
1582	struct stat sbuf;
1583
1584	char * fullpath = NULL;
1585	char * linkpath = NULL;
1586	char * attr_string = NULL;
1587
1588	char * line = NULL;
1589
1590	char timestring[81];
1591
1592	#if !defined(__linux__) && !defined(HAVE_STAT_FLAGS)
1593	int i;
1594	#endif
1595
1596	SL_ENTER(_("sh_hash_pushdata_int"));
1597
1598	fullpath = SH_ALLOC(MAX_PATH_STORE+1);
1599	linkpath = SH_ALLOC(MAX_PATH_STORE+1);
1600
1601	linkpath[0] = '-';
1602	linkpath[1] = '\0';
1603	fullpath[0] = '-';
1604	fullpath[1] = '\0';
1605
1606	if (!buf) {
1607	memset(&p, '\0', sizeof(sh_filestore_t));
1608	}
1609
1610	if ((pushdata_stdout == S_TRUE) && (sh.flag.update == S_TRUE))
1611	{
1612	dlog(1, FIL__, __LINE__,
1613	_("You cannot write the database to stdout when you use update rather than init.\n"));
1614	sh_error_handle((-1), FIL__, __LINE__, 0, MSG_EXIT_ABORTS,
1615	_("Writing database to stdout with update"),
1616	sh.prg_name,
1617	_("sh_hash_pushdata_int"));
1618	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1619	}
1620
1621	if ((pushdata_stdout == S_TRUE) && (sl_is_suid()))
1622	{
1623	dlog(1, FIL__, __LINE__,
1624	_("You cannot write the database to stdout when running with suid privileges.\n"));
1625	sh_error_handle((-1), FIL__, __LINE__, 0, MSG_EXIT_ABORTS,
1626	_("Writing database to stdout when suid"),
1627	sh.prg_name,
1628	_("sh_hash_pushdata_int"));
1629	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1630	}
1631
1632
1633	if ((pushdata_isfirst == 1) && (pushdata_stdout == S_FALSE) &&
1634	( (NULL == file_path('D', 'W')) \|\|
1635	(0 == sl_strcmp(file_path('D', 'W'), _("REQ_FROM_SERVER"))) ))
1636	{
1637	dlog(1, FIL__, __LINE__,
1638	_("You need to configure a local path for initializing the database\nlike ./configure --with-data-file=REQ_FROM_SERVER/some/local/path\n"));
1639	sh_error_handle((-1), FIL__, __LINE__, 0, MSG_EXIT_ABORTS,
1640	_("No local path for database specified"),
1641	sh.prg_name,
1642	_("sh_hash_pushdata_int"));
1643	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1644	}
1645
1646
1647	if ((pushdata_isfirst == 1) && (pushdata_stdout == S_FALSE))
1648	{
1649	/* Warn that file already exists; file_path != NULL here because
1650	* checked above
1651	*/
1652	if (0 == retry_lstat(FIL__, __LINE__, file_path('D', 'W'), &sbuf))
1653	{
1654	if (sh.flag.update == S_FALSE)
1655	{
1656	sh_error_handle((-1), FIL__, __LINE__, 0, MSG_FI_DBEX,
1657	file_path('D', 'W'));
1658	}
1659	}
1660	}
1661
1662
1663	if (sh.flag.update == S_FALSE)
1664	{
1665	if (pushdata_stdout == S_FALSE && pushdata_fd == -1)
1666	{
1667	if ( SL_ISERROR(pushdata_fd = sl_open_write(FIL__, __LINE__,
1668	file_path('D', 'W'),
1669	SL_YESPRIV)))
1670	{
1671	SH_FREE(fullpath);
1672	SH_FREE(linkpath);
1673	sh_error_handle((-1), FIL__, __LINE__, pushdata_fd, MSG_E_ACCESS,
1674	geteuid(), file_path('D', 'W'));
1675	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1676	}
1677
1678	if (SL_ISERROR(status = sl_lock (pushdata_fd)))
1679	{
1680	SH_FREE(fullpath);
1681	SH_FREE(linkpath);
1682	sh_error_handle((-1), FIL__, __LINE__, status, MSG_E_SUBGPATH,
1683	_("Failed to lock baseline database"), _("sh_hash_pushdata_int"),
1684	file_path('D', 'W'));
1685	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1686	}
1687
1688	if ( SL_ISERROR(status = sl_forward(pushdata_fd)))
1689	{
1690	SH_FREE(fullpath);
1691	SH_FREE(linkpath);
1692	sh_error_handle((-1), FIL__, __LINE__, status, MSG_E_SUBGPATH,
1693	_("Failed to seek to end of baseline database"),
1694	_("sh_hash_pushdata_int"),
1695	file_path('D', 'W'));
1696	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1697	}
1698	}
1699	}
1700	else /* update == TRUE */
1701	{
1702	if (pushdata_isfirst == 1)
1703	{
1704	TPT((0, FIL__, __LINE__, _("msg=<Update.>\n")))
1705	if ( SL_ISERROR(pushdata_fd = sl_open_rdwr(FIL__, __LINE__,
1706	file_path('D', 'W'),
1707	SL_YESPRIV))){
1708	SH_FREE(fullpath);
1709	SH_FREE(linkpath);
1710	sh_error_handle((-1), FIL__, __LINE__, pushdata_fd, MSG_E_ACCESS,
1711	geteuid(), file_path('D', 'W'));
1712	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1713	}
1714
1715	if (SL_ISERROR(status = sl_lock (pushdata_fd)))
1716	{
1717	SH_FREE(fullpath);
1718	SH_FREE(linkpath);
1719	sh_error_handle((-1), FIL__, __LINE__, status, MSG_E_SUBGPATH,
1720	_("Failed to lock baseline database"), _("sh_hash_pushdata_int"),
1721	file_path('D', 'W'));
1722	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1723	}
1724
1725	line = SH_ALLOC(MAX_PATH_STORE+1);
1726	if (SL_ISERROR(sh_hash_setdataent_old (pushdata_fd, line,
1727	MAX_PATH_STORE,
1728	file_path('D', 'W'))))
1729	{
1730	SH_FREE(fullpath);
1731	SH_FREE(linkpath);
1732	SH_FREE(line);
1733	aud_exit(FIL__, __LINE__, EXIT_FAILURE);
1734	}
1735	SH_FREE(line);
1736	}
1737	}
1738
1739	if (buf != NULL && buf->fullpath != NULL) {
1740
1741	old_len = sl_strlen(buf->fullpath);
1742	#if defined(SH_STEALTH)
1743	sh_do_encode(buf->fullpath, old_len);
1744	#endif
1745	tmp = quote_string(buf->fullpath, old_len);
1746	tmp_len = sl_strlen(tmp);
1747	#if defined(SH_STEALTH)
1748	sh_do_decode(buf->fullpath, old_len);
1749	#endif
1750
1751	if (tmp && tmp_len <= MAX_PATH_STORE)
1752	{
1753	sl_strlcpy(fullpath, buf->fullpath, MAX_PATH_STORE+1);
1754	}
1755	else
1756	{
1757	char hashbuf[KEYBUF_SIZE];
1758
1759	sl_strlcpy(fullpath,
1760	sh_tiger_hash (buf->fullpath,
1761	TIGER_DATA, old_len,
1762	hashbuf, sizeof(hashbuf)),
1763	KEY_LEN+1);
1764	}
1765	if (tmp) SH_FREE(tmp);
1766	}
1767
1768	path_len = sl_strlen(fullpath);
1769	#if defined(SH_STEALTH)
1770	sh_do_encode(fullpath, path_len);
1771	#endif
1772
1773	tmp = quote_string(fullpath, path_len);
1774	if (tmp) {
1775	sl_strlcpy(fullpath, tmp, MAX_PATH_STORE+1);
1776	SH_FREE(tmp);
1777	}
1778
1779	/* NOTE: TXT entries are c_mode[0] != 'l' and do not get decoded
1780	*/
1781	if (buf != NULL /* && buf->c_mode[0] == 'l' */ && buf->link_path != NULL)
1782	{
1783
1784	old_len = sl_strlen(buf->link_path);
1785	#if defined(SH_STEALTH)
1786	if (buf->c_mode[0] == 'l')
1787	sh_do_encode(buf->link_path, old_len);
1788	#endif
1789	tmp = quote_string(buf->link_path, old_len);
1790	tmp_len = sl_strlen(tmp);
1791	#if defined(SH_STEALTH)
1792	if (buf->c_mode[0] == 'l')
1793	sh_do_decode(buf->link_path, old_len);
1794	#endif
1795
1796	if (tmp && tmp_len <= MAX_PATH_STORE)
1797	{
1798	sl_strlcpy(linkpath, buf->link_path, MAX_PATH_STORE+1);
1799	}
1800	else
1801	{
1802	char hashbuf[KEYBUF_SIZE];
1803	sl_strlcpy(linkpath,
1804	sh_tiger_hash (buf->link_path,
1805	TIGER_DATA, old_len,
1806	hashbuf, sizeof(hashbuf)),
1807	KEY_LEN+1);
1808	}
1809	if (tmp) SH_FREE(tmp);
1810
1811	path_len = sl_strlen(linkpath);
1812	#if defined(SH_STEALTH)
1813	if (buf->c_mode[0] == 'l')
1814	sh_do_encode(linkpath, path_len);
1815	#endif
1816	tmp = quote_string(linkpath, path_len);
1817	if (tmp)
1818	{
1819	sl_strlcpy(linkpath, tmp, MAX_PATH_STORE+1);
1820	SH_FREE(tmp);
1821	}
1822	}
1823
1824	if (buf != NULL && buf->attr_string != NULL)
1825	{
1826	old_len = sl_strlen(buf->attr_string);
1827	#if defined(SH_STEALTH)
1828	sh_do_encode(buf->attr_string, old_len);
1829	#endif
1830	tmp = quote_string(buf->attr_string, old_len);
1831	if (tmp)
1832	{
1833	attr_string = tmp;
1834	tmp = NULL;
1835	}
1836	#if defined(SH_STEALTH)
1837	sh_do_decode(buf->attr_string, old_len);
1838	#endif
1839	}
1840
1841
1842	if (buf != NULL) {
1843	p.mark = REC_MAGIC;
1844	if (attr_string)
1845	p.mark \|= REC_FLAGS_ATTR;
1846	sl_strlcpy(p.c_mode, buf->c_mode, CMODE_SIZE);
1847	sl_strlcpy(p.c_group, buf->c_group, GROUP_MAX+1);
1848	sl_strlcpy(p.c_owner, buf->c_owner, USER_MAX+1);
1849	if (fileHash) {
1850	sl_strlcpy(p.checksum, fileHash, KEY_LEN+1);
1851	}
1852	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
1853	sl_strlcpy(p.c_attributes, buf->c_attributes, ATTRBUF_SIZE);
1854	#else
1855	for (i = 0; i < ATTRBUF_USED; ++i) p.c_attributes[i] = '-';
1856	p.c_attributes[ATTRBUF_USED] = '\0';
1857	#endif
1858
1859	#if defined(SH_STEALTH)
1860	sh_do_encode(p.c_mode, sl_strlen(p.c_mode));
1861	sh_do_encode(p.c_owner, sl_strlen(p.c_owner));
1862	sh_do_encode(p.c_group, sl_strlen(p.c_group));
1863	sh_do_encode(p.checksum, sl_strlen(p.checksum));
1864
1865	sh_do_encode(p.c_attributes, sl_strlen(p.c_attributes));
1866	#endif
1867
1868	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
1869	p.attributes = (UINT32) buf->attributes;
1870	#else
1871	p.attributes = 0;
1872	#endif
1873	p.linkmode = (UINT32) buf->linkmode;
1874	p.hardlinks = (UINT32) buf->hardlinks;
1875	p.dev = (UINT64) buf->dev;
1876	p.rdev = (UINT64) buf->rdev;
1877	p.mode = (UINT32) buf->mode;
1878	p.ino = (UINT32) buf->ino;
1879	p.size = (UINT64) buf->size;
1880	p.mtime = (UINT64) buf->mtime;
1881	p.atime = (UINT64) buf->atime;
1882	p.ctime = (UINT64) buf->ctime;
1883	p.owner = (UINT32) buf->owner;
1884	p.group = (UINT32) buf->group;
1885
1886	swap_32(&(p.mode));
1887	swap_32(&(p.linkmode));
1888	swap_64(&(p.dev));
1889	swap_64(&(p.rdev));
1890	swap_32(&(p.hardlinks));
1891	swap_32(&(p.ino));
1892	swap_64(&(p.size));
1893	swap_64(&(p.atime));
1894	swap_64(&(p.mtime));
1895	swap_64(&(p.ctime));
1896	swap_32(&(p.owner));
1897	swap_32(&(p.group));
1898	swap_32(&(p.attributes));
1899
1900	#ifdef OLD_BUG
1901	swap_short(&(p.mark));
1902	#else
1903	p.mark = *(swap_short(&(p.mark)));
1904	#endif
1905	}
1906
1907	/* write the start marker
1908	*/
1909	if (pushdata_isfirst == 1)
1910	{
1911	if (sh.flag.update == S_FALSE)
1912	{
1913	if (sh_db_version_string != NULL)
1914	{
1915	if (pushdata_stdout == S_FALSE)
1916	{
1917	sl_write (pushdata_fd, _("\n#Host "), 7);
1918	sl_write (pushdata_fd, sh.host.name,
1919	sl_strlen(sh.host.name));
1920	sl_write (pushdata_fd, _(" Version "), 9);
1921	sl_write (pushdata_fd, sh_db_version_string,
1922	sl_strlen(sh_db_version_string));
1923	sl_write (pushdata_fd, _(" Date "), 6);
1924	(void) sh_unix_time(0, timestring, sizeof(timestring));
1925	sl_write (pushdata_fd, timestring, strlen(timestring));
1926	sl_write (pushdata_fd, "\n", 1);
1927	} else {
1928	printf ("%s",_("\n#Host "));
1929	printf ("%s", sh.host.name);
1930	printf ("%s",_(" Version "));
1931	printf ("%s", sh_db_version_string);
1932	printf ("%s",_(" Date "));
1933	(void) sh_unix_time(0, timestring, sizeof(timestring));
1934	printf ("%s\n", timestring);
1935	}
1936	}
1937
1938	if (pushdata_stdout == S_FALSE)
1939	{
1940	#if defined(SH_STEALTH)
1941	sl_write (pushdata_fd, "\n", 1);
1942	sl_write_line (pushdata_fd, N_("[SOF]"), 5);
1943	#else
1944	sl_write_line (pushdata_fd, _("\n[SOF]"), 6);
1945	#endif
1946	}
1947	else
1948	{
1949	#if defined(SH_STEALTH)
1950	printf ("\n%s\n", N_("[SOF]"));
1951	#else
1952	printf ("%s\n", _("\n[SOF]"));
1953	#endif
1954	}
1955	}
1956	pushdata_isfirst = 0;
1957	}
1958
1959	if (pushdata_stdout == S_FALSE)
1960	{
1961	sl_write (pushdata_fd, &p, sizeof(sh_filestore_t));
1962	sl_write_line_fast (pushdata_fd, fullpath, sl_strlen(fullpath));
1963	sl_write_line_fast (pushdata_fd, linkpath, sl_strlen(linkpath));
1964	if (attr_string)
1965	sl_write_line_fast (pushdata_fd, attr_string, sl_strlen(attr_string));
1966	} else {
1967	if (fwrite (&p, sizeof(sh_filestore_t), 1, stdout))
1968	{
1969	printf ("%s\n", fullpath);
1970	printf ("%s\n", linkpath);
1971	if (attr_string)
1972	printf ("%s\n", attr_string);
1973	}
1974	else
1975	{
1976	perror(_("Error writing database"));
1977	aud_exit (FIL__, __LINE__, EXIT_FAILURE);
1978	}
1979	}
1980
1981	++p_count;
1982
1983	if ((sh.flag.update != S_TRUE) && (pushdata_stdout == S_FALSE))
1984	{
1985	if (sh.flag.checkSum != SH_CHECK_INIT \|\| (buf == NULL && fileHash == NULL))
1986	{
1987	sl_close (pushdata_fd);
1988	pushdata_fd = -1;
1989	}
1990	}
1991
1992	SH_FREE(fullpath);
1993	SH_FREE(linkpath);
1994	if (attr_string)
1995	SH_FREE(attr_string);
1996
1997	SL_RET0(_("sh_hash_pushdata_int"));
1998	}
1999
2000	SH_MUTEX_STATIC(mutex_writeout,PTHREAD_MUTEX_INITIALIZER);
2001
2002	void sh_hash_pushdata (file_type * buf, char * fileHash)
2003	{
2004	SH_MUTEX_LOCK(mutex_writeout);
2005	sh_hash_pushdata_int (buf, fileHash);
2006	SH_MUTEX_UNLOCK(mutex_writeout);
2007	return;
2008	}
2009
2010
2011	int sh_hash_writeout()
2012	{
2013	sh_file_t * p;
2014	int i;
2015	file_type * f;
2016	char fileHash[KEY_LEN + 1];
2017
2018	SL_ENTER(_("sh_hash_writeout"));
2019
2020	if (S_TRUE == file_is_remote())
2021	{
2022	sh_error_handle((-1), FIL__, __LINE__, S_FALSE, MSG_E_SUBGEN,
2023	_("Baseline database is remote"), _("sh_hash_writeout"));
2024	SL_RETURN (1, _("sh_hash_writeout"));
2025	}
2026
2027	SH_MUTEX_LOCK(mutex_writeout);
2028	if (!SL_ISERROR(pushdata_fd))
2029	{
2030	sl_close(pushdata_fd);
2031	pushdata_fd = -1;
2032	}
2033	pushdata_isfirst = 1;
2034
2035
2036	SH_MUTEX_LOCK(mutex_hash);
2037	for (i = 0; i < TABSIZE; ++i)
2038	{
2039	for (p = tab[i]; p; p = p->next)
2040	{
2041	f = sh_hash_create_ft (p, fileHash);
2042	sh_hash_pushdata_int (f, fileHash);
2043	if (f->attr_string) SH_FREE(f->attr_string);
2044	if (f->link_path) SH_FREE(f->link_path);
2045	SH_FREE(f);
2046	}
2047	}
2048	SH_MUTEX_UNLOCK(mutex_hash);
2049
2050	if (!SL_ISERROR(pushdata_fd))
2051	{
2052	sl_close(pushdata_fd);
2053	pushdata_fd = -1;
2054	}
2055	pushdata_isfirst = 1;
2056	SH_MUTEX_UNLOCK(mutex_writeout);
2057
2058	SL_RETURN (0, _("sh_hash_writeout"));
2059	}
2060
2061
2062	/*********************************************************************
2063	*
2064	* Check whether a file is present in the database.
2065	*
2066	*********************************************************************/
2067	static sh_file_t * sh_hash_have_it_int (const char * newname)
2068	{
2069	sh_file_t * p;
2070	char hashbuf[KEYBUF_SIZE];
2071
2072	SL_ENTER(_("sh_hash_have_it_int"));
2073
2074	if (newname == NULL)
2075	SL_RETURN( (NULL), _("sh_hash_have_it_int"));
2076
2077	if (sl_strlen(newname) <= MAX_PATH_STORE)
2078	p = hashsearch(newname);
2079	else
2080	p = hashsearch ( sh_tiger_hash(newname, TIGER_DATA, sl_strlen(newname),
2081	hashbuf, sizeof(hashbuf)) );
2082	if (p == NULL)
2083	SL_RETURN( (NULL), _("sh_hash_have_it_int"));
2084
2085	SL_RETURN( (p), _("sh_hash_have_it_int"));
2086	}
2087
2088	int sh_hash_have_it (const char * newname)
2089	{
2090	sh_file_t * p;
2091	int retval;
2092
2093	if (IsInit != 1)
2094	sh_hash_init();
2095
2096	SH_MUTEX_LOCK(mutex_hash);
2097
2098	retval = 0;
2099
2100	p = sh_hash_have_it_int (newname);
2101
2102	if (!p)
2103	retval = (-1);
2104	else if ((!SH_FFLAG_ALLIGNORE_SET(p->fflags)) &&
2105	(p->modi_mask & MODI_CHK) != 0 &&
2106	(p->modi_mask & MODI_MOD) != 0)
2107	retval = 1;
2108	SH_MUTEX_UNLOCK(mutex_hash);
2109
2110	return retval;
2111	}
2112
2113	int sh_hash_get_it (const char * newname, file_type * tmpFile, char * fileHash)
2114	{
2115	sh_file_t * p;
2116	int retval;
2117
2118	if (IsInit != 1)
2119	sh_hash_init();
2120
2121	tmpFile->link_path = NULL;
2122	tmpFile->attr_string = NULL;
2123
2124	SH_MUTEX_LOCK(mutex_hash);
2125
2126	retval = (-1);
2127
2128	p = sh_hash_have_it_int (newname);
2129	if (p)
2130	{
2131	sl_strlcpy(tmpFile->fullpath, p->fullpath, PATH_MAX);
2132	if (p->linkpath)
2133	tmpFile->link_path = sh_util_strdup (p->linkpath);
2134	tmpFile->size = p->theFile.size;
2135	tmpFile->mtime = p->theFile.mtime;
2136	tmpFile->ctime = p->theFile.ctime;
2137	tmpFile->atime = p->theFile.atime;
2138
2139	if (NULL != fileHash)
2140	sl_strlcpy(fileHash, p->theFile.checksum, KEY_LEN+1);
2141
2142	tmpFile->attr_string = NULL;
2143	retval = 0;
2144	}
2145	SH_MUTEX_UNLOCK(mutex_hash);
2146
2147	return retval;
2148	}
2149
2150	int sh_hash_getflags (char * filename)
2151	{
2152	sh_file_t * p;
2153	int retval;
2154
2155	if (IsInit != 1)
2156	sh_hash_init();
2157
2158	SH_MUTEX_LOCK(mutex_hash);
2159	p = sh_hash_have_it_int (filename);
2160	if (p)
2161	retval = p->fflags;
2162	else
2163	retval = -1;
2164	SH_MUTEX_UNLOCK(mutex_hash);
2165	return retval;
2166	}
2167
2168	int sh_hash_setflags (char * filename, int flags)
2169	{
2170	sh_file_t * p;
2171	int retval;
2172
2173	if (IsInit != 1)
2174	sh_hash_init();
2175
2176	SH_MUTEX_LOCK(mutex_hash);
2177	p = sh_hash_have_it_int (filename);
2178	if (p)
2179	{
2180	p->fflags = flags;
2181	retval = 0;
2182	}
2183	else
2184	retval = -1;
2185	SH_MUTEX_UNLOCK(mutex_hash);
2186	return retval;
2187	}
2188
2189	/* needs lock to be threadsafe
2190	*/
2191	void sh_hash_addflag (char * filename, int flag_to_set)
2192	{
2193	sh_file_t * p;
2194
2195	if (IsInit != 1)
2196	sh_hash_init();
2197
2198	SH_MUTEX_LOCK(mutex_hash);
2199	p = sh_hash_have_it_int (filename);
2200	if (p)
2201	{
2202	p->fflags \|= flag_to_set;
2203	}
2204	SH_MUTEX_UNLOCK(mutex_hash);
2205	return;
2206	}
2207
2208	/*****************************************************************
2209	*
2210	* Set a file's status to 'visited'. This is required for
2211	* files that should be ignored, and may be present in the
2212	* database, but not on disk.
2213	*
2214	*****************************************************************/
2215	static int sh_hash_set_visited_int (char * newname, int flag)
2216	{
2217	sh_file_t * p;
2218	char hashbuf[KEYBUF_SIZE];
2219	int retval;
2220
2221	SL_ENTER(_("sh_hash_set_visited_int"));
2222
2223	if (newname == NULL)
2224	SL_RETURN((-1), _("sh_hash_set_visited_int"));
2225
2226	if (IsInit != 1)
2227	sh_hash_init();
2228
2229	SH_MUTEX_LOCK(mutex_hash);
2230
2231	if (sl_strlen(newname) <= MAX_PATH_STORE)
2232	p = hashsearch(newname);
2233	else
2234	p = hashsearch (sh_tiger_hash(newname, TIGER_DATA, sl_strlen(newname),
2235	hashbuf, sizeof(hashbuf)));
2236
2237	if (p)
2238	{
2239	if (flag == SH_FFLAG_CHECKED)
2240	{
2241	CLEAR_SH_FFLAG_REPORTED(p->fflags);
2242	CLEAR_SH_FFLAG_VISITED(p->fflags);
2243	SET_SH_FFLAG_CHECKED(p->fflags);
2244	}
2245	else
2246	{
2247	SET_SH_FFLAG_VISITED(p->fflags);
2248	CLEAR_SH_FFLAG_CHECKED(p->fflags);
2249	if (flag == SH_FFLAG_REPORTED)
2250	SET_SH_FFLAG_REPORTED(p->fflags);
2251	else
2252	CLEAR_SH_FFLAG_REPORTED(p->fflags);
2253	}
2254	retval = 0;
2255	}
2256	else
2257	retval = -1;
2258
2259	SH_MUTEX_UNLOCK(mutex_hash);
2260	SL_RETURN((retval), _("sh_hash_set_visited_int"));
2261	}
2262
2263
2264	/* cause the record to be deleted without a 'missing' message
2265	*/
2266	int sh_hash_set_missing (char * newname)
2267	{
2268	int i;
2269	SL_ENTER(_("sh_hash_set_missing"));
2270
2271	i = sh_hash_set_visited_int(newname, SH_FFLAG_CHECKED);
2272
2273	if (sh.flag.checkSum != SH_CHECK_INIT) {
2274	sh_hash_remove(newname);
2275	}
2276
2277	SL_RETURN(i, _("sh_hash_set_missing"));
2278	}
2279
2280	/* mark the file as visited and reported
2281	*/
2282	int sh_hash_set_visited (char * newname)
2283	{
2284	int i;
2285	SL_ENTER(_("sh_hash_set_visited"));
2286	i = sh_hash_set_visited_int(newname, SH_FFLAG_REPORTED);
2287	SL_RETURN(i, _("sh_hash_set_visited"));
2288	}
2289
2290	/* mark the file as visited and NOT reported
2291	* used to avoid deletion of file from internal database
2292	*/
2293	int sh_hash_set_visited_true (char * newname)
2294	{
2295	int i;
2296	SL_ENTER(_("sh_hash_set_visited_true"));
2297	i = sh_hash_set_visited_int(newname, 0);
2298	SL_RETURN(i, _("sh_hash_set_visited_true"));
2299	}
2300
2301
2302	/******************************************************************
2303	*
2304	* Data entry for arbitrary data into database
2305	*
2306	******************************************************************/
2307
2308	void sh_hash_push2db (const char * key, struct store2db * save)
2309	{
2310	int i = 0;
2311	char * p;
2312	char i2h[2];
2313	file_type * tmpFile = SH_ALLOC(sizeof(file_type));
2314
2315	int size = save->size;
2316	unsigned char * str = save->str;
2317
2318
2319	tmpFile->attr_string = NULL;
2320	tmpFile->link_path = NULL;
2321
2322	sl_strlcpy(tmpFile->fullpath, key, PATH_MAX);
2323	tmpFile->size = save->val0;
2324	tmpFile->mtime = save->val1;
2325	tmpFile->ctime = save->val2;
2326	tmpFile->atime = save->val3;
2327
2328	tmpFile->mode = 0;
2329	tmpFile->owner = 0;
2330	tmpFile->group = 0;
2331	sl_strlcpy(tmpFile->c_owner, _("root"), 5);
2332	sl_strlcpy(tmpFile->c_group, _("root"), 5);
2333
2334	if ((str != NULL) && (size < (PATH_MAX/2)-1))
2335	{
2336	tmpFile->c_mode[0] = 'l';
2337	tmpFile->c_mode[1] = 'r'; tmpFile->c_mode[2] = 'w';
2338	tmpFile->c_mode[3] = 'x'; tmpFile->c_mode[4] = 'r';
2339	tmpFile->c_mode[5] = 'w'; tmpFile->c_mode[6] = 'x';
2340	tmpFile->c_mode[7] = 'r'; tmpFile->c_mode[8] = 'w';
2341	tmpFile->c_mode[9] = 'x'; tmpFile->c_mode[10] = '\0';
2342	tmpFile->link_path = SH_ALLOC((size * 2) + 2);
2343	for (i = 0; i < size; ++i)
2344	{
2345	p = sh_util_charhex (str[i],i2h);
2346	tmpFile->link_path[2*i] = p[0];
2347	tmpFile->link_path[2*i+1] = p[1];
2348	tmpFile->link_path[2*i+2] = '\0';
2349	}
2350	}
2351	else
2352	{
2353	for (i = 0; i < 10; ++i)
2354	tmpFile->c_mode[i] = '-';
2355	tmpFile->c_mode[10] = '\0';
2356	tmpFile->link_path = sh_util_strdup("-");
2357	}
2358
2359	if (sh.flag.checkSum == SH_CHECK_INIT)
2360	sh_hash_pushdata (tmpFile,
2361	(save->checksum[0] == '\0') ? SH_KEY_NULL : save->checksum);
2362	else
2363	sh_hash_pushdata_memory (tmpFile,
2364	(save->checksum[0] == '\0') ? SH_KEY_NULL : save->checksum);
2365
2366	if (tmpFile->link_path) SH_FREE(tmpFile->link_path);
2367	SH_FREE(tmpFile);
2368	return;
2369	}
2370
2371	extern int sh_util_hextobinary (char * binary, char * hex, int bytes);
2372
2373	char * sh_hash_db2pop (const char * key, struct store2db * save)
2374	{
2375	size_t len;
2376	char * p;
2377	int i;
2378	char * retval = NULL;
2379	char fileHash[KEY_LEN+1];
2380	file_type * tmpFile = SH_ALLOC(sizeof(file_type));
2381
2382	save->size = 0;
2383
2384	if (0 == sh_hash_get_it (key, tmpFile, fileHash))
2385	{
2386	save->val0 = tmpFile->size;
2387	save->val1 = tmpFile->mtime;
2388	save->val2 = tmpFile->ctime;
2389	save->val3 = tmpFile->atime;
2390
2391	sl_strlcpy(save->checksum, fileHash, KEY_LEN+1);
2392
2393	if (tmpFile->link_path && tmpFile->link_path[0] != '-')
2394	{
2395	len = strlen(tmpFile->link_path);
2396
2397	p = SH_ALLOC((len/2)+1);
2398	i = sh_util_hextobinary (p, tmpFile->link_path, len);
2399
2400	if (i == 0)
2401	{
2402	save->size = (len/2);
2403	p[save->size] = '\0';
2404	retval = p;
2405	}
2406	else
2407	{
2408	SH_FREE(p);
2409	save->size = 0;
2410	}
2411	}
2412	else
2413	{
2414	save->size = 0;
2415	}
2416	}
2417	else
2418	{
2419	save->size = -1;
2420	save->val0 = 0;
2421	save->val1 = 0;
2422	save->val2 = 0;
2423	save->val3 = 0;
2424	}
2425	if (tmpFile->link_path) SH_FREE(tmpFile->link_path);
2426	SH_FREE(tmpFile);
2427	return retval;
2428	}
2429
2430
2431
2432
2433	/******************************************************************
2434	*
2435	* Data entry in hash table
2436	*
2437	******************************************************************/
2438	sh_file_t * sh_hash_push_int (file_type * buf, char * fileHash)
2439	{
2440	sh_file_t * fp;
2441	sh_filestore_t p;
2442
2443	size_t len;
2444	char * fullpath;
2445	char * linkpath;
2446	char * attr_string = NULL;
2447	char hashbuf[KEYBUF_SIZE];
2448
2449	SL_ENTER(_("sh_hash_push_int"));
2450
2451	fp = SH_ALLOC(sizeof(sh_file_t));
2452
2453	p.mark = REC_MAGIC;
2454	if (buf->attr_string)
2455	p.mark \|= REC_FLAGS_ATTR;
2456	sl_strlcpy(p.c_mode, buf->c_mode, 11);
2457	sl_strlcpy(p.c_group, buf->c_group, GROUP_MAX+1);
2458	sl_strlcpy(p.c_owner, buf->c_owner, USER_MAX+1);
2459	sl_strlcpy(p.checksum, fileHash, KEY_LEN+1);
2460	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
2461	sl_strlcpy(p.c_attributes, buf->c_attributes, 13);
2462	#endif
2463
2464	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
2465	p.attributes = (UINT32) buf->attributes;
2466	#endif
2467	p.linkmode = (UINT32) buf->linkmode;
2468	p.hardlinks = (UINT32) buf->hardlinks;
2469	p.dev = (UINT64) buf->dev;
2470	p.rdev = (UINT64) buf->rdev;
2471	p.mode = (UINT32) buf->mode;
2472	p.ino = (UINT32) buf->ino;
2473	p.size = (UINT64) buf->size;
2474	p.mtime = (UINT64) buf->mtime;
2475	p.atime = (UINT64) buf->atime;
2476	p.ctime = (UINT64) buf->ctime;
2477	p.owner = (UINT32) buf->owner;
2478	p.group = (UINT32) buf->group;
2479
2480	memcpy( &(*fp).theFile, &p, sizeof(sh_filestore_t) );
2481	fp->fflags = 0; /* init fflags */
2482	fp->modi_mask = 0L;
2483
2484	if (buf->attr_string)
2485	attr_string = sh_util_strdup(buf->attr_string);
2486	fp->attr_string = attr_string;
2487
2488	len = sl_strlen(buf->fullpath);
2489	if (len <= MAX_PATH_STORE)
2490	{
2491	fullpath = SH_ALLOC(len+1);
2492	sl_strlcpy(fullpath, buf->fullpath, len+1);
2493	}
2494	else
2495	{
2496	fullpath = SH_ALLOC(KEY_LEN + 1);
2497	sl_strlcpy(fullpath,
2498	sh_tiger_hash (buf->fullpath, TIGER_DATA, len,
2499	hashbuf, sizeof(hashbuf)),
2500	KEY_LEN+1);
2501	}
2502	fp->fullpath = fullpath;
2503
2504	if (buf->link_path)
2505	{
2506	len = sl_strlen(buf->link_path);
2507	if (len <= MAX_PATH_STORE)
2508	{
2509	linkpath = SH_ALLOC(len+1);
2510	sl_strlcpy(linkpath, buf->link_path, len+1);
2511	}
2512	else
2513	{
2514	linkpath = SH_ALLOC(KEY_LEN + 1);
2515	sl_strlcpy(linkpath,
2516	sh_tiger_hash (buf->link_path, TIGER_DATA, len,
2517	hashbuf, sizeof(hashbuf)),
2518	KEY_LEN+1);
2519	}
2520	fp->linkpath = linkpath;
2521	}
2522	else
2523	fp->linkpath = NULL;
2524
2525	SL_RETURN( fp, _("sh_hash_push_int"));
2526	}
2527
2528	#ifdef HAVE_INTTYPES_H
2529	#include <inttypes.h>
2530	#else
2531	#ifdef HAVE_STDINT_H
2532	#include <stdint.h>
2533	#endif
2534	#endif
2535
2536	#ifndef PRIu64
2537	#ifdef HAVE_LONG_32
2538	#define PRIu64 "llu"
2539	#else
2540	#define PRIu64 "lu"
2541	#endif
2542	#endif
2543
2544	char * sh_hash_size_format()
2545	{
2546	static char form_rval[81];
2547
2548	SL_ENTER(_("sh_hash_size_format"));
2549
2550
2551	#ifdef SH_USE_XML
2552	sl_snprintf(form_rval, 80, _("%s%s%s%s%s"),
2553	_("size_old=\"%"), PRIu64, _("\" size_new=\"%"), PRIu64, "\" ");
2554	#else
2555	sl_snprintf(form_rval, 80, _("%s%s%s%s%s"),
2556	_("size_old=<%"), PRIu64, _(">, size_new=<%"), PRIu64, ">, ");
2557	#endif
2558
2559	SL_RETURN( form_rval, _("sh_hash_size_format"));
2560	}
2561
2562
2563	#ifdef SH_USE_XML
2564	static char * all_items (file_type * theFile, char * fileHash, int is_new)
2565	{
2566	char timstr1c[32];
2567	char timstr1a[32];
2568	char timstr1m[32];
2569
2570	char * tmp_lnk;
2571	char * format;
2572
2573	char * tmp = SH_ALLOC(SH_MSG_BUF);
2574	char * msg = SH_ALLOC(SH_MSG_BUF);
2575
2576	tmp[0] = '\0';
2577	msg[0] = '\0';
2578
2579
2580	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
2581	if (is_new)
2582	format = _("mode_new=\"%s\" attr_new=\"%s\" imode_new=\"%ld\" iattr_new=\"%ld\" ");
2583	else
2584	format = _("mode_old=\"%s\" attr_old=\"%s\" imode_old=\"%ld\" iattr_old=\"%ld\" ");
2585	sl_snprintf(tmp, SH_MSG_BUF, format,
2586	theFile->c_mode,
2587	theFile->c_attributes,
2588	(long) theFile->mode,
2589	(long) theFile->attributes
2590	);
2591	#else
2592	if (is_new)
2593	format = _("mode_new=\"%s\" imode_new=\"%ld\" ");
2594	else
2595	format = _("mode_old=\"%s\" imode_old=\"%ld\" ");
2596
2597	sl_snprintf(tmp, SH_MSG_BUF, format,
2598	theFile->c_mode,
2599	(long) theFile->mode
2600	);
2601	#endif
2602	sl_strlcat(msg, tmp, SH_MSG_BUF);
2603
2604	if (is_new)
2605	format = _("hardlinks_new=\"%lu\" ");
2606	else
2607	format = _("hardlinks_old=\"%lu\" ");
2608	sl_snprintf(tmp, SH_MSG_BUF, format,
2609	(unsigned long) theFile->hardlinks);
2610	sl_strlcat(msg, tmp, SH_MSG_BUF);
2611
2612
2613	if (is_new)
2614	format = _("idevice_new=\"%lu\" ");
2615	else
2616	format = _("idevice_old=\"%lu\" ");
2617	sl_snprintf(tmp, SH_MSG_BUF, format, (unsigned long) theFile->rdev);
2618	sl_strlcat(msg, tmp, SH_MSG_BUF);
2619
2620
2621	if (is_new)
2622	format = _("inode_new=\"%lu\" ");
2623	else
2624	format = _("inode_old=\"%lu\" ");
2625	sl_snprintf(tmp, SH_MSG_BUF, format, (unsigned long) theFile->ino);
2626	sl_strlcat(msg, tmp, SH_MSG_BUF);
2627
2628	/*
2629	* also report device for prelude
2630	*/
2631	#if defined(HAVE_LIBPRELUDE)
2632	if (is_new)
2633	format = _("dev_new=\"%lu,%lu\" ");
2634	else
2635	format = _("dev_old=\"%lu,%lu\" ");
2636	sl_snprintf(tmp, SH_MSG_BUF, format,
2637	(unsigned long) major(theFile->dev),
2638	(unsigned long) minor(theFile->dev));
2639	sl_strlcat(msg, tmp, SH_MSG_BUF);
2640	#endif
2641
2642
2643	if (is_new)
2644	format = _("owner_new=\"%s\" iowner_new=\"%ld\" ");
2645	else
2646	format = _("owner_old=\"%s\" iowner_old=\"%ld\" ");
2647	sl_snprintf(tmp, SH_MSG_BUF, format,
2648	theFile->c_owner, (long) theFile->owner);
2649	sl_strlcat(msg, tmp, SH_MSG_BUF);
2650
2651
2652	if (is_new)
2653	format = _("group_new=\"%s\" igroup_new=\"%ld\" ");
2654	else
2655	format = _("group_old=\"%s\" igroup_old=\"%ld\" ");
2656	sl_snprintf(tmp, SH_MSG_BUF, format,
2657	theFile->c_group, (long) theFile->group);
2658	sl_strlcat(msg, tmp, SH_MSG_BUF);
2659
2660
2661	if (is_new)
2662	sl_snprintf(tmp, SH_MSG_BUF, sh_hash_size_format(),
2663	(UINT64) 0, (UINT64) theFile->size);
2664	else
2665	sl_snprintf(tmp, SH_MSG_BUF, sh_hash_size_format(),
2666	(UINT64) theFile->size, (UINT64) 0);
2667	sl_strlcat(msg, tmp, SH_MSG_BUF);
2668
2669
2670	(void) sh_unix_gmttime (theFile->ctime, timstr1c, sizeof(timstr1c));
2671	if (is_new)
2672	sl_snprintf(tmp, SH_MSG_BUF, _("ctime_new=\"%s\" "), timstr1c);
2673	else
2674	sl_snprintf(tmp, SH_MSG_BUF, _("ctime_old=\"%s\" "), timstr1c);
2675	sl_strlcat(msg, tmp, SH_MSG_BUF);
2676
2677	(void) sh_unix_gmttime (theFile->atime, timstr1a, sizeof(timstr1a));
2678	if (is_new)
2679	sl_snprintf(tmp, SH_MSG_BUF, _("atime_new=\"%s\" "), timstr1a);
2680	else
2681	sl_snprintf(tmp, SH_MSG_BUF, _("atime_old=\"%s\" "), timstr1a);
2682	sl_strlcat(msg, tmp, SH_MSG_BUF);
2683
2684	(void) sh_unix_gmttime (theFile->mtime, timstr1m, sizeof(timstr1m));
2685	if (is_new)
2686	sl_snprintf(tmp, SH_MSG_BUF, _("mtime_new=\"%s\" "), timstr1m);
2687	else
2688	sl_snprintf(tmp, SH_MSG_BUF, _("mtime_old=\"%s\" "), timstr1m);
2689	sl_strlcat(msg, tmp, SH_MSG_BUF);
2690
2691	if (is_new)
2692	sl_snprintf(tmp, SH_MSG_BUF, _("chksum_new=\"%s\" "), fileHash);
2693	else
2694	sl_snprintf(tmp, SH_MSG_BUF, _("chksum_old=\"%s\" "), fileHash);
2695	sl_strlcat(msg, tmp, SH_MSG_BUF);
2696
2697	if (theFile->c_mode[0] == 'l' \|\|
2698	(theFile->link_path != NULL && theFile->link_path[0] != '-'))
2699	{
2700	tmp_lnk = sh_util_safe_name(theFile->link_path);
2701	if (tmp_lnk)
2702	{
2703	if (is_new)
2704	sl_snprintf(tmp, SH_MSG_BUF, _("link_new=\"%s\" "), tmp_lnk);
2705	else
2706	sl_snprintf(tmp, SH_MSG_BUF, _("link_old=\"%s\" "), tmp_lnk);
2707	SH_FREE(tmp_lnk);
2708	sl_strlcat(msg, tmp, SH_MSG_BUF);
2709	}
2710	}
2711
2712	if (theFile->attr_string)
2713	{
2714	tmp_lnk = sh_util_safe_name(theFile->attr_string);
2715	if (tmp_lnk)
2716	{
2717	if (is_new)
2718	sl_snprintf(tmp, SH_MSG_BUF, _("acl_new=\"%s\" "), tmp_lnk);
2719	else
2720	sl_snprintf(tmp, SH_MSG_BUF, _("acl_old=\"%s\" "), tmp_lnk);
2721	SH_FREE(tmp_lnk);
2722	sl_strlcat(msg, tmp, SH_MSG_BUF);
2723	}
2724	}
2725
2726
2727	SH_FREE(tmp);
2728	return (msg);
2729	}
2730	#else
2731	static char * all_items (file_type * theFile, char * fileHash, int is_new)
2732	{
2733	char timstr1c[32];
2734	char timstr1a[32];
2735	char timstr1m[32];
2736
2737	char * tmp_lnk;
2738	char * format;
2739
2740	char * tmp = SH_ALLOC(SH_MSG_BUF);
2741	char * msg = SH_ALLOC(SH_MSG_BUF);
2742
2743	tmp[0] = '\0';
2744	msg[0] = '\0';
2745
2746
2747	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
2748	if (is_new)
2749	format = _("mode_new=<%s>, attr_new=<%s>, imode_new=<%ld>, iattr_new=<%ld>, ");
2750	else
2751	format = _("mode_old=<%s>, attr_old=<%s>, imode_old=<%ld>, iattr_old=<%ld>, ");
2752	sl_snprintf(tmp, SH_MSG_BUF, format,
2753	theFile->c_mode,
2754	theFile->c_attributes,
2755	(long) theFile->mode,
2756	(long) theFile->attributes
2757	);
2758	#else
2759	if (is_new)
2760	format = _("mode_new=<%s>, imode_new=<%ld>, ");
2761	else
2762	format = _("mode_old=<%s>, imode_old=<%ld>, ");
2763
2764	sl_snprintf(tmp, SH_MSG_BUF, format,
2765	theFile->c_mode,
2766	(long) theFile->mode
2767	);
2768	#endif
2769	sl_strlcat(msg, tmp, SH_MSG_BUF);
2770
2771	if (is_new)
2772	format = _("hardlinks_new=<%lu>, ");
2773	else
2774	format = _("hardlinks_old=<%lu>, ");
2775	sl_snprintf(tmp, SH_MSG_BUF, format,
2776	(unsigned long) theFile->hardlinks);
2777	sl_strlcat(msg, tmp, SH_MSG_BUF);
2778
2779
2780	if (is_new)
2781	format = _("idevice_new=<%lu>, ");
2782	else
2783	format = _("idevice_old=<%lu>, ");
2784	sl_snprintf(tmp, SH_MSG_BUF, format, (unsigned long) theFile->rdev);
2785	sl_strlcat(msg, tmp, SH_MSG_BUF);
2786
2787
2788	if (is_new)
2789	format = _("inode_new=<%lu>, ");
2790	else
2791	format = _("inode_old=<%lu>, ");
2792	sl_snprintf(tmp, SH_MSG_BUF, format, (unsigned long) theFile->ino);
2793	sl_strlcat(msg, tmp, SH_MSG_BUF);
2794
2795
2796	/*
2797	* also report device for prelude
2798	*/
2799	#if defined(HAVE_LIBPRELUDE)
2800	if (is_new)
2801	format = _("dev_new=<%lu,%lu>, ");
2802	else
2803	format = _("dev_old=<%lu,%lu>, ");
2804	sl_snprintf(tmp, SH_MSG_BUF, format,
2805	(unsigned long) major(theFile->dev),
2806	(unsigned long) minor(theFile->dev));
2807	sl_strlcat(msg, tmp, SH_MSG_BUF);
2808	#endif
2809
2810	if (is_new)
2811	format = _("owner_new=<%s>, iowner_new=<%ld>, ");
2812	else
2813	format = _("owner_old=<%s>, iowner_old=<%ld>, ");
2814	sl_snprintf(tmp, SH_MSG_BUF, format,
2815	theFile->c_owner, (long) theFile->owner);
2816	sl_strlcat(msg, tmp, SH_MSG_BUF);
2817
2818
2819	if (is_new)
2820	format = _("group_new=<%s>, igroup_new=<%ld>, ");
2821	else
2822	format = _("group_old=<%s>, igroup_old=<%ld>, ");
2823	sl_snprintf(tmp, SH_MSG_BUF, format,
2824	theFile->c_group, (long) theFile->group);
2825	sl_strlcat(msg, tmp, SH_MSG_BUF);
2826
2827
2828	if (is_new)
2829	sl_snprintf(tmp, SH_MSG_BUF, sh_hash_size_format(),
2830	(UINT64) 0, (UINT64) theFile->size);
2831	else
2832	sl_snprintf(tmp, SH_MSG_BUF, sh_hash_size_format(),
2833	(UINT64) theFile->size, (UINT64) 0);
2834	sl_strlcat(msg, tmp, SH_MSG_BUF);
2835
2836
2837	(void) sh_unix_gmttime (theFile->ctime, timstr1c, sizeof(timstr1c));
2838	if (is_new)
2839	sl_snprintf(tmp, SH_MSG_BUF, _("ctime_new=<%s>, "), timstr1c);
2840	else
2841	sl_snprintf(tmp, SH_MSG_BUF, _("ctime_old=<%s>, "), timstr1c);
2842	sl_strlcat(msg, tmp, SH_MSG_BUF);
2843
2844	(void) sh_unix_gmttime (theFile->atime, timstr1a, sizeof(timstr1a));
2845	if (is_new)
2846	sl_snprintf(tmp, SH_MSG_BUF, _("atime_new=<%s>, "), timstr1a);
2847	else
2848	sl_snprintf(tmp, SH_MSG_BUF, _("atime_old=<%s>, "), timstr1a);
2849	sl_strlcat(msg, tmp, SH_MSG_BUF);
2850
2851	(void) sh_unix_gmttime (theFile->mtime, timstr1m, sizeof(timstr1m));
2852	if (is_new)
2853	sl_snprintf(tmp, SH_MSG_BUF, _("mtime_new=<%s>, "), timstr1m);
2854	else
2855	sl_snprintf(tmp, SH_MSG_BUF, _("mtime_old=<%s>, "), timstr1m);
2856	sl_strlcat(msg, tmp, SH_MSG_BUF);
2857
2858	if (is_new)
2859	sl_snprintf(tmp, SH_MSG_BUF, _("chksum_new=<%s>"), fileHash);
2860	else
2861	sl_snprintf(tmp, SH_MSG_BUF, _("chksum_old=<%s>"), fileHash);
2862	sl_strlcat(msg, tmp, SH_MSG_BUF);
2863
2864	if (theFile->c_mode[0] == 'l' \|\|
2865	(theFile->link_path != NULL && theFile->link_path[0] != '-'))
2866	{
2867	tmp_lnk = sh_util_safe_name(theFile->link_path);
2868	if (tmp_lnk)
2869	{
2870	if (is_new)
2871	sl_snprintf(tmp, SH_MSG_BUF, _(", link_new=<%s> "), tmp_lnk);
2872	else
2873	sl_snprintf(tmp, SH_MSG_BUF, _(", link_old=<%s> "), tmp_lnk);
2874	SH_FREE(tmp_lnk);
2875	sl_strlcat(msg, tmp, SH_MSG_BUF);
2876	}
2877	}
2878
2879	if (theFile->attr_string)
2880	{
2881	tmp_lnk = sh_util_safe_name(theFile->attr_string);
2882	if (tmp_lnk)
2883	{
2884	if (is_new)
2885	sl_snprintf(tmp, SH_MSG_BUF, _(", acl_new=<%s> "), tmp_lnk);
2886	else
2887	sl_snprintf(tmp, SH_MSG_BUF, _(", acl_old=<%s> "), tmp_lnk);
2888	SH_FREE(tmp_lnk);
2889	sl_strlcat(msg, tmp, SH_MSG_BUF);
2890	}
2891	}
2892
2893	SH_FREE(tmp);
2894	return (msg);
2895	}
2896	#endif
2897
2898	void sh_hash_pushdata_memory (file_type * theFile, char * fileHash)
2899	{
2900	sh_file_t * p;
2901
2902	SL_ENTER(_("sh_hash_pushdata_memory"));
2903
2904	p = sh_hash_push_int(theFile, fileHash);
2905	if (p)
2906	{
2907	SH_MUTEX_LOCK(mutex_hash);
2908	hashinsert (p);
2909	p->modi_mask = theFile->check_mask;
2910	SH_MUTEX_UNLOCK(mutex_hash);
2911	}
2912
2913	SL_RET0(_("sh_hash_pushdata_memory"));
2914	}
2915
2916
2917	/*****************************************************************
2918	*
2919	* Compare a file with the database status.
2920	*
2921	*****************************************************************/
2922	int sh_hash_compdata (int class, file_type * theFile, char * fileHash,
2923	char * policy_override, int severity_override)
2924	{
2925	char * msg;
2926	sh_file_t * p;
2927	char * tmp;
2928	char * tmp_path;
2929	char * tmp_lnk;
2930	char * tmp_lnk_old;
2931
2932	char * str;
2933
2934	char timstr1c[32];
2935	char timstr2c[32];
2936	char timstr1a[32];
2937	char timstr2a[32];
2938	char timstr1m[32];
2939	char timstr2m[32];
2940	char linkHash[KEY_LEN+1];
2941	char * linkComp;
2942	int maxcomp;
2943
2944	char change_code[16];
2945	int i;
2946
2947	unsigned long modi_mask;
2948
2949	char log_policy[32];
2950	volatile int log_severity;
2951	char hashbuf[KEYBUF_SIZE];
2952
2953	int retval;
2954
2955	SL_ENTER(_("sh_hash_compdata"));
2956
2957	if (IsInit != 1) sh_hash_init();
2958
2959	if (severity_override < 0)
2960	log_severity = ShDFLevel[class];
2961	else
2962	log_severity = severity_override;
2963
2964	if (policy_override != NULL)
2965	sl_strlcpy (log_policy, policy_override, 32);
2966
2967	/* -------- find the entry for the file ---------------- */
2968
2969	SH_MUTEX_LOCK(mutex_hash);
2970
2971	modi_mask = 0;
2972	retval = 0;
2973
2974	if (sl_strlen(theFile->fullpath) <= MAX_PATH_STORE)
2975	p = hashsearch(theFile->fullpath);
2976	else
2977	p = hashsearch( sh_tiger_hash(theFile->fullpath,
2978	TIGER_DATA,
2979	sl_strlen(theFile->fullpath),
2980	hashbuf, sizeof(hashbuf))
2981	);
2982
2983
2984	/* --------- Not found in database. ------------
2985	*/
2986
2987	if (p == NULL)
2988	{
2989	if (S_FALSE == sh_ignore_chk_new(theFile->fullpath))
2990	{
2991	tmp = sh_util_safe_name(theFile->fullpath);
2992
2993	str = all_items (theFile, fileHash, 1);
2994	sh_error_handle (log_severity, FIL__, __LINE__, 0,
2995	MSG_FI_ADD2,
2996	tmp, str);
2997	++sh.statistics.files_report;
2998	SH_FREE(str);
2999
3000	SH_FREE(tmp);
3001	}
3002
3003	if (sh.flag.reportonce == S_TRUE)
3004	SET_SH_FFLAG_REPORTED(theFile->file_reported);
3005
3006	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3007	{
3008	p = sh_hash_push_int(theFile, fileHash);
3009	if (p)
3010	{
3011	hashinsert (p);
3012	p->modi_mask = theFile->check_mask;
3013	}
3014	}
3015
3016	else if (S_TRUE == sh.flag.update)
3017	{
3018	if (S_TRUE == sh_util_ask_update (theFile->fullpath))
3019	{
3020	p = sh_hash_push_int(theFile, fileHash);
3021	if (p)
3022	{
3023	hashinsert (p);
3024	p->modi_mask = theFile->check_mask;
3025	}
3026	}
3027	else
3028	{
3029	retval = 1;
3030	goto unlock_and_return;
3031	}
3032	}
3033
3034	goto unlock_and_return;
3035	}
3036
3037	p->modi_mask = theFile->check_mask;
3038
3039	/* initialize change_code */
3040	for (i = 0; i < 15; ++i)
3041	change_code[i] = '-';
3042	change_code[15] = '\0';
3043
3044	TPT ((0, FIL__, __LINE__, _("file=<%s>, cs_old=<%s>, cs_new=<%s>\n"),
3045	theFile->fullpath, fileHash, p->theFile.checksum));
3046
3047	if ( (fileHash != NULL) && (p->theFile.checksum != NULL) &&
3048	(strncmp (fileHash, p->theFile.checksum, KEY_LEN) != 0) &&
3049	(theFile->check_mask & MODI_CHK) != 0)
3050	{
3051	if ((theFile->check_mask & MODI_SGROW) == 0)
3052	{
3053	modi_mask \|= MODI_CHK;
3054	change_code[0] = 'C';
3055	TPT ((0, FIL__, __LINE__, _("mod=<checksum>")));
3056	}
3057	else
3058	{
3059	if (0 != strncmp (&fileHash[KEY_LEN + 1],
3060	p->theFile.checksum, KEY_LEN))
3061	{
3062	modi_mask \|= MODI_CHK;
3063	change_code[0] = 'C';
3064	TPT ((0, FIL__, __LINE__, _("mod=<checksum>")));
3065	}
3066	else
3067	{
3068	p->theFile.size = theFile->size;
3069	sl_strlcpy(p->theFile.checksum, fileHash, KEY_LEN+1);
3070	}
3071	}
3072	}
3073
3074	if (p->theFile.c_mode[0] == 'l')
3075	{
3076	if (!(theFile->link_path) &&
3077	(theFile->check_mask & MODI_LNK) != 0)
3078	{
3079	linkComp = NULL;
3080	modi_mask \|= MODI_LNK;
3081	change_code[1] = 'L';
3082	TPT ((0, FIL__, __LINE__, _("mod=<link>")));
3083	}
3084	else
3085	{
3086	if (sl_strlen(theFile->link_path) >= MAX_PATH_STORE)
3087	{
3088	sl_strlcpy(linkHash,
3089	sh_tiger_hash(theFile->link_path,
3090	TIGER_DATA,
3091	sl_strlen(theFile->link_path),
3092	hashbuf, sizeof(hashbuf)),
3093	MAX_PATH_STORE+1);
3094	linkComp = linkHash;
3095	maxcomp = KEY_LEN;
3096	}
3097	else
3098	{
3099	linkComp = theFile->link_path;
3100	maxcomp = MAX_PATH_STORE;
3101	}
3102
3103	if ( sl_strncmp (linkComp, p->linkpath, maxcomp) != 0 &&
3104	(theFile->check_mask & MODI_LNK) != 0)
3105	{
3106	modi_mask \|= MODI_LNK;
3107	change_code[1] = 'L';
3108	TPT ((0, FIL__, __LINE__, _("mod=<link>")));
3109	}
3110	}
3111	}
3112
3113	if (p->theFile.c_mode[0] == 'c' \|\| p->theFile.c_mode[0] == 'b')
3114	{
3115	if ( ( major(theFile->rdev) != major((dev_t)p->theFile.rdev) \|\|
3116	minor(theFile->rdev) != minor((dev_t)p->theFile.rdev) ) &&
3117	(theFile->check_mask & MODI_RDEV) != 0)
3118	{
3119	modi_mask \|= MODI_RDEV;
3120	change_code[2] = 'D';
3121	TPT ((0, FIL__, __LINE__, _("mod=<rdev>")));
3122	}
3123	}
3124
3125	/* cast to UINT32 in case ino_t is not 32bit
3126	*/
3127	if ( (UINT32) theFile->ino != (UINT32) p->theFile.ino &&
3128	(theFile->check_mask & MODI_INO) != 0)
3129	{
3130	modi_mask \|= MODI_INO;
3131	change_code[3] = 'I';
3132	TPT ((0, FIL__, __LINE__, _("mod=<inode>")));
3133	}
3134
3135	if ( theFile->hardlinks != (nlink_t) p->theFile.hardlinks &&
3136	(theFile->check_mask & MODI_HLN) != 0)
3137	{
3138	modi_mask \|= MODI_HLN;
3139	change_code[4] = 'H';
3140	TPT ((0, FIL__, __LINE__, _("mod=<hardlink>")));
3141	}
3142
3143
3144	if ( ( (theFile->mode != p->theFile.mode)
3145	#if defined(USE_ACL) \|\| defined(USE_XATTR)
3146	\|\| ( (sh_unix_check_selinux\|sh_unix_check_acl) &&
3147	(
3148	(theFile->attr_string == NULL && p->attr_string != NULL) \|\|
3149	(theFile->attr_string != NULL && p->attr_string == NULL) \|\|
3150	(theFile->attr_string != NULL && 0 != strcmp(theFile->attr_string, p->attr_string))
3151	)
3152	)
3153	#endif
3154	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
3155	\|\| (theFile->attributes != p->theFile.attributes)
3156	#endif
3157	)
3158	&& (theFile->check_mask & MODI_MOD) != 0)
3159	{
3160	modi_mask \|= MODI_MOD;
3161	change_code[5] = 'M';
3162	TPT ((0, FIL__, __LINE__, _("mod=<mode>")));
3163	/*
3164	* report link path if switch link/no link
3165	*/
3166	if ((theFile->check_mask & MODI_LNK) != 0 &&
3167	(theFile->c_mode[0] != p->theFile.c_mode[0]) &&
3168	(theFile->c_mode[0] == 'l' \|\| p->theFile.c_mode[0] == 'l'))
3169	{
3170	modi_mask \|= MODI_LNK;
3171	change_code[1] = 'L';
3172	TPT ((0, FIL__, __LINE__, _("mod=<link>")));
3173	}
3174	}
3175
3176	if ( theFile->owner != (uid_t) p->theFile.owner &&
3177	(theFile->check_mask & MODI_USR) != 0)
3178	{
3179	modi_mask \|= MODI_USR;
3180	change_code[6] = 'U';
3181	TPT ((0, FIL__, __LINE__, _("mod=<user>")));
3182	}
3183
3184	if ( theFile->group != (gid_t) p->theFile.group &&
3185	(theFile->check_mask & MODI_GRP) != 0)
3186	{
3187	modi_mask \|= MODI_GRP;
3188	change_code[7] = 'G';
3189	TPT ((0, FIL__, __LINE__, _("mod=<group>")));
3190	}
3191
3192
3193	if ( theFile->mtime != (time_t) p->theFile.mtime &&
3194	(theFile->check_mask & MODI_MTM) != 0)
3195	{
3196	modi_mask \|= MODI_MTM;
3197	change_code[8] = 'T';
3198	TPT ((0, FIL__, __LINE__, _("mod=<mtime>")));
3199	}
3200
3201	if ( (theFile->check_mask & MODI_ATM) != 0 &&
3202	theFile->atime != (time_t) p->theFile.atime)
3203	{
3204	modi_mask \|= MODI_ATM;
3205	change_code[8] = 'T';
3206	TPT ((0, FIL__, __LINE__, _("mod=<atime>")));
3207	}
3208
3209
3210	/* Resetting the access time will set a new ctime. Thus, either we ignore
3211	* the access time or the ctime for NOIGNORE
3212	*/
3213	if ( theFile->ctime != (time_t) p->theFile.ctime &&
3214	(theFile->check_mask & MODI_CTM) != 0)
3215	{
3216	modi_mask \|= MODI_CTM;
3217	change_code[8] = 'T';
3218	TPT ((0, FIL__, __LINE__, _("mod=<ctime>")));
3219	}
3220
3221	if ( theFile->size != (off_t) p->theFile.size &&
3222	(theFile->check_mask & MODI_SIZ) != 0)
3223	{
3224	if ((theFile->check_mask & MODI_SGROW) == 0 \|\|
3225	theFile->size < (off_t) p->theFile.size)
3226	{
3227	modi_mask \|= MODI_SIZ;
3228	change_code[9] = 'S';
3229	TPT ((0, FIL__, __LINE__, _("mod=<size>")));
3230	}
3231	}
3232	change_code[10] = '\0';
3233
3234	/* --- Directories special case ---
3235	*/
3236	if (p->theFile.c_mode[0] == 'd' &&
3237	0 == (modi_mask & ~(MODI_SIZ\|MODI_ATM\|MODI_CTM\|MODI_MTM)) &&
3238	sh_loosedircheck == S_TRUE)
3239	{
3240	modi_mask = 0;
3241	}
3242
3243	/* --- Report full details. ---
3244	*/
3245	if (modi_mask != 0 && sh.flag.fulldetail == S_TRUE)
3246	{
3247	if ((theFile->check_mask & MODI_ATM) == 0)
3248	modi_mask = MASK_READONLY_;
3249	else
3250	modi_mask = MASK_NOIGNORE_;
3251	}
3252
3253	/* --- Report on modified files. ---
3254	*/
3255	if (modi_mask != 0 && (!SH_FFLAG_REPORTED_SET(p->fflags)))
3256	{
3257	tmp = SH_ALLOC(SH_MSG_BUF);
3258	msg = SH_ALLOC(SH_MSG_BUF);
3259	msg[0] = '\0';
3260
3261	if ( ((modi_mask & MODI_MOD) != 0)
3262	#if defined(HAVE_LIBPRELUDE)
3263	\|\| ((modi_mask & MODI_USR) != 0)
3264	\|\| ((modi_mask & MODI_GRP) != 0)
3265	#endif
3266	)
3267	{
3268	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
3269	sl_snprintf(tmp, SH_MSG_BUF,
3270	#ifdef SH_USE_XML
3271	_("mode_old=\"%s\" mode_new=\"%s\" attr_old=\"%s\" attr_new=\"%s\" imode_old=\"%ld\" imode_new=\"%ld\" iattr_old=\"%ld\" iattr_new=\"%ld\" "),
3272	#else
3273	_("mode_old=<%s>, mode_new=<%s>, attr_old=<%s>, attr_new=<%s>, "),
3274	#endif
3275	p->theFile.c_mode, theFile->c_mode,
3276	p->theFile.c_attributes, theFile->c_attributes
3277	#ifdef SH_USE_XML
3278	, (long) p->theFile.mode, (long) theFile->mode,
3279	(long) p->theFile.attributes,
3280	(long) theFile->attributes
3281	#endif
3282	);
3283	#else
3284	#ifdef SH_USE_XML
3285	sl_snprintf(tmp, SH_MSG_BUF,
3286	_("mode_old=\"%s\" mode_new=\"%s\" imode_old=\"%ld\" imode_new=\"%ld\" "),
3287	p->theFile.c_mode, theFile->c_mode,
3288	(long) p->theFile.mode, (long) theFile->mode);
3289	#else
3290	sl_snprintf(tmp, SH_MSG_BUF, _("mode_old=<%s>, mode_new=<%s>, "),
3291	p->theFile.c_mode, theFile->c_mode);
3292	#endif
3293	#endif
3294	sl_strlcat(msg, tmp, SH_MSG_BUF);
3295
3296	#if defined(USE_ACL) \|\| defined(USE_XATTR)
3297	if (theFile->attr_string != NULL \|\| p->attr_string != NULL)
3298	{
3299	sl_snprintf(tmp, SH_MSG_BUF,
3300	#ifdef SH_USE_XML
3301	_("acl_old=\"%s\" acl_new=\"%s\" "),
3302	#else
3303	_("acl_old=<%s>, acl_new=<%s>, "),
3304	#endif
3305	(p->attr_string) ? p->attr_string : _("none"),
3306	(theFile->attr_string) ? theFile->attr_string : _("none"));
3307
3308	sl_strlcat(msg, tmp, SH_MSG_BUF);
3309	}
3310	#endif
3311
3312	#ifdef REPLACE_OLD
3313	if ((modi_mask & MODI_MOD) != 0)
3314	{
3315	/*
3316	* We postpone update if sh.flag.update == S_TRUE because
3317	* in interactive mode the user may not accept the change.
3318	*/
3319	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3320	{
3321	sl_strlcpy(p->theFile.c_mode, theFile->c_mode, 11);
3322	p->theFile.mode = theFile->mode;
3323	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
3324	sl_strlcpy(p->theFile.c_attributes,theFile->c_attributes,16);
3325	p->theFile.attributes = theFile->attributes;
3326	#endif
3327	#if defined(USE_ACL) \|\| defined(USE_XATTR)
3328	if (p->attr_string == NULL && theFile->attr_string != NULL)
3329	{ p->attr_string = sh_util_strdup (theFile->attr_string); }
3330	else if (p->attr_string != NULL && theFile->attr_string == NULL)
3331	{ SH_FREE(p->attr_string); p->attr_string = NULL; }
3332	else if (theFile->attr_string != NULL && p->attr_string != NULL)
3333	{
3334	if (0 != strcmp(theFile->attr_string, p->attr_string))
3335	{
3336	SH_FREE(p->attr_string);
3337	p->attr_string = sh_util_strdup (theFile->attr_string);
3338	}
3339	}
3340	#endif
3341	}
3342	}
3343	#endif
3344	}
3345
3346	if ((modi_mask & MODI_HLN) != 0)
3347	{
3348	sl_snprintf(tmp, SH_MSG_BUF,
3349	#ifdef SH_USE_XML
3350	_("hardlinks_old=\"%lu\" hardlinks_new=\"%lu\" "),
3351	#else
3352	_("hardlinks_old=<%lu>, hardlinks_new=<%lu>, "),
3353	#endif
3354	(unsigned long) p->theFile.hardlinks,
3355	(unsigned long) theFile->hardlinks);
3356	sl_strlcat(msg, tmp, SH_MSG_BUF);
3357	#ifdef REPLACE_OLD
3358	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3359	p->theFile.hardlinks = theFile->hardlinks;
3360	#endif
3361	}
3362
3363	if ((modi_mask & MODI_RDEV) != 0)
3364	{
3365	sl_snprintf(tmp, SH_MSG_BUF,
3366	#ifdef SH_USE_XML
3367	_("device_old=\"%lu,%lu\" device_new=\"%lu,%lu\" idevice_old=\"%lu\" idevice_new=\"%lu\" "),
3368	#else
3369	_("device_old=<%lu,%lu>, device_new=<%lu,%lu>, "),
3370	#endif
3371	(unsigned long) major(p->theFile.rdev),
3372	(unsigned long) minor(p->theFile.rdev),
3373	(unsigned long) major(theFile->rdev),
3374	(unsigned long) minor(theFile->rdev)
3375	#ifdef SH_USE_XML
3376	, (unsigned long) p->theFile.rdev,
3377	(unsigned long) theFile->rdev
3378	#endif
3379	);
3380	sl_strlcat(msg, tmp, SH_MSG_BUF);
3381	#ifdef REPLACE_OLD
3382	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3383	p->theFile.rdev = theFile->rdev;
3384	#endif
3385	}
3386
3387	if ((modi_mask & MODI_INO) != 0)
3388	{
3389	sl_snprintf(tmp, SH_MSG_BUF,
3390	#ifdef SH_USE_XML
3391	_("inode_old=\"%lu\" inode_new=\"%lu\" "),
3392	#else
3393	_("inode_old=<%lu>, inode_new=<%lu>, "),
3394	#endif
3395	(unsigned long) p->theFile.ino,
3396	(unsigned long) theFile->ino);
3397	sl_strlcat(msg, tmp, SH_MSG_BUF);
3398	#ifdef REPLACE_OLD
3399	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3400	{
3401	p->theFile.ino = theFile->ino;
3402	p->theFile.dev = theFile->dev;
3403	}
3404	#endif
3405	}
3406
3407
3408	/*
3409	* also report device for prelude
3410	*/
3411	#if defined(HAVE_LIBPRELUDE)
3412	if ((modi_mask & MODI_INO) != 0)
3413	{
3414	sl_snprintf(tmp, SH_MSG_BUF,
3415	#ifdef SH_USE_XML
3416	_("dev_old=\"%lu,%lu\" dev_new=\"%lu,%lu\" "),
3417	#else
3418	_("dev_old=<%lu,%lu>, dev_new=<%lu,%lu>, "),
3419	#endif
3420	(unsigned long) major(p->theFile.dev),
3421	(unsigned long) minor(p->theFile.dev),
3422	(unsigned long) major(theFile->dev),
3423	(unsigned long) minor(theFile->dev)
3424	);
3425	sl_strlcat(msg, tmp, SH_MSG_BUF);
3426	#ifdef REPLACE_OLD
3427	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3428	p->theFile.dev = theFile->dev;
3429	#endif
3430	}
3431	#endif
3432
3433	if ( ((modi_mask & MODI_USR) != 0)
3434	#if defined(HAVE_LIBPRELUDE)
3435	\|\| ((modi_mask & MODI_MOD) != 0)
3436	#endif
3437	)
3438	{
3439	#ifdef SH_USE_XML
3440	sl_snprintf(tmp, SH_MSG_BUF,
3441	_("owner_old=\"%s\" owner_new=\"%s\" iowner_old=\"%ld\" iowner_new=\"%ld\" "),
3442	#else
3443	sl_snprintf(tmp, SH_MSG_BUF,
3444	_("owner_old=<%s>, owner_new=<%s>, iowner_old=<%ld>, iowner_new=<%ld>, "),
3445	#endif
3446	p->theFile.c_owner, theFile->c_owner,
3447	(long) p->theFile.owner, (long) theFile->owner
3448	);
3449	sl_strlcat(msg, tmp, SH_MSG_BUF);
3450	#ifdef REPLACE_OLD
3451	if ((modi_mask & MODI_USR) != 0) {
3452	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3453	{
3454	sl_strlcpy(p->theFile.c_owner, theFile->c_owner, USER_MAX+2);
3455	p->theFile.owner = theFile->owner;
3456	}
3457	}
3458	#endif
3459	}
3460
3461	if ( ((modi_mask & MODI_GRP) != 0)
3462	#if defined(HAVE_LIBPRELUDE)
3463	\|\| ((modi_mask & MODI_MOD) != 0)
3464	#endif
3465	)
3466	{
3467	#ifdef SH_USE_XML
3468	sl_snprintf(tmp, SH_MSG_BUF,
3469	_("group_old=\"%s\" group_new=\"%s\" igroup_old=\"%ld\" igroup_new=\"%ld\" "),
3470	p->theFile.c_group, theFile->c_group,
3471	(long) p->theFile.group, (long) theFile->group);
3472	#else
3473	sl_snprintf(tmp, SH_MSG_BUF,
3474	_("group_old=<%s>, group_new=<%s>, igroup_old=<%ld>, igroup_new=<%ld>, "),
3475	p->theFile.c_group, theFile->c_group,
3476	(long) p->theFile.group, (long) theFile->group);
3477	#endif
3478
3479	sl_strlcat(msg, tmp, SH_MSG_BUF);
3480	#ifdef REPLACE_OLD
3481	if ((modi_mask & MODI_GRP) != 0) {
3482	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3483	{
3484	sl_strlcpy(p->theFile.c_group, theFile->c_group, GROUP_MAX+2);
3485	p->theFile.group = theFile->group;
3486	}
3487	}
3488	#endif
3489	}
3490
3491	if ((modi_mask & MODI_SIZ) != 0)
3492	{
3493	sl_snprintf(tmp, SH_MSG_BUF, sh_hash_size_format(),
3494	(UINT64) p->theFile.size,
3495	(UINT64) theFile->size);
3496	sl_strlcat(msg, tmp, SH_MSG_BUF);
3497	#ifdef REPLACE_OLD
3498	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3499	p->theFile.size = theFile->size;
3500	#endif
3501	}
3502
3503	if ((modi_mask & MODI_CTM) != 0)
3504	{
3505	(void) sh_unix_gmttime (p->theFile.ctime, timstr1c, sizeof(timstr1c));
3506	(void) sh_unix_gmttime (theFile->ctime, timstr2c, sizeof(timstr2c));
3507	#ifdef SH_USE_XML
3508	sl_snprintf(tmp, SH_MSG_BUF, _("ctime_old=\"%s\" ctime_new=\"%s\" "),
3509	timstr1c, timstr2c);
3510	#else
3511	sl_snprintf(tmp, SH_MSG_BUF, _("ctime_old=<%s>, ctime_new=<%s>, "),
3512	timstr1c, timstr2c);
3513	#endif
3514	sl_strlcat(msg, tmp, SH_MSG_BUF);
3515	#ifdef REPLACE_OLD
3516	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3517	p->theFile.ctime = theFile->ctime;
3518	#endif
3519	}
3520
3521	if ((modi_mask & MODI_ATM) != 0)
3522	{
3523	(void) sh_unix_gmttime (p->theFile.atime, timstr1a, sizeof(timstr1a));
3524	(void) sh_unix_gmttime (theFile->atime, timstr2a, sizeof(timstr2a));
3525	#ifdef SH_USE_XML
3526	sl_snprintf(tmp, SH_MSG_BUF, _("atime_old=\"%s\" atime_new=\"%s\" "),
3527	timstr1a, timstr2a);
3528	#else
3529	sl_snprintf(tmp, SH_MSG_BUF, _("atime_old=<%s>, atime_new=<%s>, "),
3530	timstr1a, timstr2a);
3531	#endif
3532	sl_strlcat(msg, tmp, SH_MSG_BUF);
3533	#ifdef REPLACE_OLD
3534	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3535	p->theFile.atime = theFile->atime;
3536	#endif
3537	}
3538
3539	if ((modi_mask & MODI_MTM) != 0)
3540	{
3541	(void) sh_unix_gmttime (p->theFile.mtime, timstr1m, sizeof(timstr1m));
3542	(void) sh_unix_gmttime (theFile->mtime, timstr2m, sizeof(timstr2m));
3543	#ifdef SH_USE_XML
3544	sl_snprintf(tmp, SH_MSG_BUF, _("mtime_old=\"%s\" mtime_new=\"%s\" "),
3545	timstr1m, timstr2m);
3546	#else
3547	sl_snprintf(tmp, SH_MSG_BUF, _("mtime_old=<%s>, mtime_new=<%s>, "),
3548	timstr1m, timstr2m);
3549	#endif
3550	sl_strlcat(msg, tmp, SH_MSG_BUF);
3551	#ifdef REPLACE_OLD
3552	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3553	p->theFile.mtime = theFile->mtime;
3554	#endif
3555	}
3556
3557
3558	if ((modi_mask & MODI_CHK) != 0)
3559	{
3560	sl_snprintf(tmp, SH_MSG_BUF,
3561	#ifdef SH_USE_XML
3562	_("chksum_old=\"%s\" chksum_new=\"%s\" "),
3563	#else
3564	_("chksum_old=<%s>, chksum_new=<%s>, "),
3565	#endif
3566	p->theFile.checksum, fileHash);
3567	sl_strlcat(msg, tmp, SH_MSG_BUF);
3568	#ifdef REPLACE_OLD
3569	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3570	{
3571	sl_strlcpy(p->theFile.checksum, fileHash, KEY_LEN+1);
3572	if ((theFile->check_mask & MODI_SGROW) != 0)
3573	p->theFile.size = theFile->size;
3574	}
3575	#endif
3576	/* FIXME is this correct? */
3577	if (theFile->c_mode[0] != 'l' && theFile->link_path &&
3578	strlen(theFile->link_path) > 2)
3579	modi_mask \|= MODI_LNK;
3580	}
3581
3582
3583	if ((modi_mask & MODI_LNK) != 0 /* && theFile->c_mode[0] == 'l' */)
3584	{
3585	if (theFile->link_path)
3586	tmp_lnk = sh_util_safe_name(theFile->link_path);
3587	else
3588	tmp_lnk = sh_util_strdup("-");
3589	if (p->linkpath)
3590	tmp_lnk_old = sh_util_safe_name(p->linkpath);
3591	else
3592	tmp_lnk_old = sh_util_strdup("-");
3593	#ifdef SH_USE_XML
3594	sl_snprintf(tmp, SH_MSG_BUF, _("link_old=\"%s\" link_new=\"%s\" "),
3595	tmp_lnk_old, tmp_lnk);
3596	#else
3597	sl_snprintf(tmp, SH_MSG_BUF, _("link_old=<%s>, link_new=<%s>, "),
3598	tmp_lnk_old, tmp_lnk);
3599	#endif
3600	SH_FREE(tmp_lnk);
3601	SH_FREE(tmp_lnk_old);
3602	sl_strlcat(msg, tmp, SH_MSG_BUF);
3603	#ifdef REPLACE_OLD
3604	if (sh.flag.reportonce == S_TRUE && sh.flag.update == S_FALSE)
3605	{
3606	if (p->linkpath != NULL && p->linkpath != notalink)
3607	SH_FREE(p->linkpath);
3608	if (!(theFile->link_path) \|\|
3609	(theFile->link_path[0] == '-' && theFile->link_path[1] == '\0'))
3610	p->linkpath = (char *)notalink;
3611	else
3612	p->linkpath = sh_util_strdup(theFile->link_path);
3613	}
3614	#endif
3615	}
3616
3617	if (MODI_AUDIT_ENABLED(theFile->check_mask))
3618	{
3619	char result[256];
3620
3621	if (NULL != sh_audit_fetch (theFile->fullpath, theFile->mtime, result, sizeof(result)))
3622	{
3623	#ifdef SH_USE_XML
3624	sl_strlcat(msg, _("obj=\""), SH_MSG_BUF);
3625	#else
3626	sl_strlcat(msg, _("obj=<"), SH_MSG_BUF);
3627	#endif
3628
3629	sl_strlcat(msg, result, SH_MSG_BUF);
3630
3631	#ifdef SH_USE_XML
3632	sl_strlcat(msg, _("\" "), SH_MSG_BUF);
3633	#else
3634	sl_strlcat(msg, _(">"), SH_MSG_BUF);
3635	#endif
3636	}
3637	}
3638
3639	tmp_path = sh_util_safe_name(theFile->fullpath);
3640	sh_error_handle(log_severity, FIL__, __LINE__,
3641	(long) modi_mask, MSG_FI_CHAN,
3642	(policy_override == NULL) ? _(policy[class]):log_policy,
3643	change_code, tmp_path, msg);
3644	++sh.statistics.files_report;
3645
3646	SH_FREE(tmp_path);
3647	SH_FREE(tmp);
3648	SH_FREE(msg);
3649
3650	#ifndef REPLACE_OLD
3651	SET_SH_FFLAG_REPORTED(p->fflags);
3652	#endif
3653
3654	if (S_TRUE == sh.flag.update)
3655	{
3656	if (S_FALSE == sh_util_ask_update(theFile->fullpath))
3657	{
3658	/* user does not want to update, thus we replace
3659	* with data from the baseline database
3660	*/
3661	sl_strlcpy(theFile->c_mode, p->theFile.c_mode, 11);
3662	theFile->mode = p->theFile.mode;
3663	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
3664	sl_strlcpy(theFile->c_attributes, p->theFile.c_attributes, 16);
3665	theFile->attributes = p->theFile.attributes;
3666	#endif
3667	#if defined(USE_ACL) \|\| defined(USE_XATTR)
3668	if (theFile->attr_string == NULL && p->attr_string != NULL)
3669	{ theFile->attr_string = sh_util_strdup (p->attr_string); }
3670	else if (theFile->attr_string != NULL && p->attr_string == NULL)
3671	{ SH_FREE(theFile->attr_string); theFile->attr_string = NULL; }
3672	else if (theFile->attr_string != NULL && p->attr_string != NULL)
3673	{
3674	if (0 != strcmp(theFile->attr_string, p->attr_string))
3675	{
3676	SH_FREE(theFile->attr_string);
3677	theFile->attr_string = sh_util_strdup (p->attr_string);
3678	}
3679	}
3680	#endif
3681
3682	if (theFile->c_mode[0] == 'l') /* c_mode is already copied */
3683	{
3684	if (theFile->link_path)
3685	SH_FREE(theFile->link_path);
3686	if (p->linkpath)
3687	theFile->link_path = sh_util_strdup(p->linkpath);
3688	else
3689	theFile->link_path = sh_util_strdup("-");
3690	}
3691	else
3692	{
3693	if (theFile->link_path)
3694	SH_FREE(theFile->link_path);
3695	if (p->linkpath && p->linkpath != notalink)
3696	theFile->link_path = sh_util_strdup(p->linkpath);
3697	else
3698	theFile->link_path = NULL;
3699	}
3700
3701	sl_strlcpy(fileHash, p->theFile.checksum, KEY_LEN+1);
3702
3703	theFile->mtime = p->theFile.mtime;
3704	theFile->ctime = p->theFile.ctime;
3705	theFile->atime = p->theFile.atime;
3706
3707	theFile->size = p->theFile.size;
3708
3709	sl_strlcpy(theFile->c_group, p->theFile.c_group, GROUP_MAX+2);
3710	theFile->group = p->theFile.group;
3711	sl_strlcpy(theFile->c_owner, p->theFile.c_owner, USER_MAX+2);
3712	theFile->owner = p->theFile.owner;
3713
3714	theFile->ino = p->theFile.ino;
3715	theFile->rdev = p->theFile.rdev;
3716	theFile->dev = p->theFile.dev;
3717	theFile->hardlinks = p->theFile.hardlinks;
3718
3719	SET_SH_FFLAG_VISITED(p->fflags);
3720	CLEAR_SH_FFLAG_CHECKED(p->fflags);
3721	retval = 1;
3722	goto unlock_and_return;
3723	}
3724	else /* if (sh.flag.reportonce == S_TRUE) */
3725	{
3726	/* we replace the data in the in-memory copy of the
3727	* baseline database, because otherwise we would get
3728	* another warning if the suidcheck runs
3729	*/
3730	sl_strlcpy(p->theFile.c_mode, theFile->c_mode, 11);
3731	p->theFile.mode = theFile->mode;
3732	#if defined(__linux__) \|\| defined(HAVE_STAT_FLAGS)
3733	sl_strlcpy(p->theFile.c_attributes, theFile->c_attributes, 16);
3734	p->theFile.attributes = theFile->attributes;
3735	#endif
3736	#if defined(USE_ACL) \|\| defined(USE_XATTR)
3737	if (p->attr_string == NULL && theFile->attr_string != NULL)
3738	{ p->attr_string = sh_util_strdup (theFile->attr_string); }
3739	else if (p->attr_string != NULL && theFile->attr_string == NULL)
3740	{ SH_FREE(p->attr_string); p->attr_string = NULL; }
3741	else if (theFile->attr_string != NULL && p->attr_string != NULL)
3742	{
3743	if (0 != strcmp(theFile->attr_string, p->attr_string))
3744	{
3745	SH_FREE(p->attr_string);
3746	p->attr_string = sh_util_strdup (theFile->attr_string);
3747	}
3748	}
3749	#endif
3750
3751	if (theFile->c_mode[0] == 'l' \|\| theFile->link_path)
3752	{
3753	if (p->linkpath != NULL && p->linkpath != notalink)
3754	SH_FREE(p->linkpath);
3755	p->linkpath = sh_util_strdup(theFile->link_path);
3756	}
3757	else
3758	{
3759	if (p->linkpath != NULL && p->linkpath != notalink) {
3760	SH_FREE(p->linkpath);
3761	}
3762	p->linkpath = (char *)notalink;
3763	}
3764
3765	sl_strlcpy(p->theFile.checksum, fileHash, KEY_LEN+1);
3766
3767	p->theFile.mtime = theFile->mtime;
3768	p->theFile.ctime = theFile->ctime;
3769	p->theFile.atime = theFile->atime;
3770
3771	p->theFile.size = theFile->size;
3772
3773	sl_strlcpy(p->theFile.c_group, theFile->c_group, GROUP_MAX+2);
3774	p->theFile.group = theFile->group;
3775	sl_strlcpy(p->theFile.c_owner, theFile->c_owner, USER_MAX+2);
3776	p->theFile.owner = theFile->owner;
3777
3778	p->theFile.ino = theFile->ino;
3779	p->theFile.rdev = theFile->rdev;
3780	p->theFile.dev = theFile->dev;
3781	p->theFile.hardlinks = theFile->hardlinks;
3782	}
3783	}
3784	}
3785
3786	SET_SH_FFLAG_VISITED(p->fflags);
3787	CLEAR_SH_FFLAG_CHECKED(p->fflags);
3788
3789	unlock_and_return:
3790	; /* 'label at end of compound statement */
3791	SH_MUTEX_UNLOCK(mutex_hash);
3792	SL_RETURN(retval, _("sh_hash_compdata"));
3793	}
3794
3795	int hash_full_tree ()
3796	{
3797	sh_file_t * p;
3798	int i;
3799
3800	SL_ENTER(_("sh_hash_compdata"));
3801
3802	if (IsInit != 1)
3803	SL_RETURN(0, _("sh_hash_compdata"));
3804
3805	SH_MUTEX_LOCK_UNSAFE(mutex_hash);
3806	for (i = 0; i < TABSIZE; ++i)
3807	{
3808	for (p = tab[i]; p; p = p->next)
3809	CLEAR_SH_FFLAG_ALLIGNORE(p->fflags);
3810	}
3811	SH_MUTEX_UNLOCK_UNSAFE(mutex_hash);
3812	SL_RETURN (0, _("sh_hash_compdata"));
3813	}
3814
3815
3816	int hash_remove_tree (char * s)
3817	{
3818	sh_file_t * p;
3819	size_t len;
3820	unsigned int i;
3821
3822	SL_ENTER(_("hash_remove_tree"));
3823
3824	if (!s \|\| *s == '\0')
3825	SL_RETURN ((-1), _("hash_remove_tree"));
3826
3827	len = sl_strlen(s);
3828
3829	if (IsInit != 1)
3830	sh_hash_init();
3831
3832	SH_MUTEX_LOCK_UNSAFE(mutex_hash);
3833	for (i = 0; i < TABSIZE; ++i)
3834	{
3835	for (p = tab[i]; p; p = p->next)
3836	{
3837	if (p->fullpath && 0 == strncmp(s, p->fullpath, len))
3838	{
3839	SET_SH_FFLAG_ALLIGNORE(p->fflags);
3840	}
3841	}
3842	}
3843	SH_MUTEX_UNLOCK_UNSAFE(mutex_hash);
3844	SL_RETURN ((0), _("hash_remove_tree"));
3845	}
3846
3847	#if TIME_WITH_SYS_TIME
3848	#include <sys/time.h>
3849	#include <time.h>
3850	#else
3851	#if HAVE_SYS_TIME_H
3852	#include <sys/time.h>
3853	#else
3854	#include <time.h>
3855	#endif
3856	#endif
3857
3858	static int ListFullDetail = S_FALSE;
3859	static int ListWithDelimiter = S_FALSE;
3860	static char * ListFile = NULL;
3861
3862	int set_list_file (const char * c)
3863	{
3864	ListFile = sh_util_strdup(c);
3865	return 0;
3866	}
3867
3868	int set_full_detail (const char * c)
3869	{
3870	(void) c;
3871	ListFullDetail = S_TRUE;
3872	return 0;
3873	}
3874
3875	int set_list_delimited (const char * c)
3876	{
3877	(void) c;
3878	ListFullDetail = S_TRUE;
3879	ListWithDelimiter = S_TRUE;
3880	return 0;
3881	}
3882
3883	/* Always quote the string, except if it is empty. Quote quotes by
3884	* doubling them.
3885	*/
3886	char * csv_escape(const char * str)
3887	{
3888	const char * p = str;
3889	const char * q;
3890
3891	size_t size = 0;
3892	size_t flag_quote = 0;
3893
3894	char * new;
3895	char * pnew;
3896
3897	if (p)
3898	{
3899
3900	while (*p)
3901	{
3902	if (*p == '"')
3903	++flag_quote;
3904
3905	++size; ++p;
3906	}
3907
3908	if (sl_ok_adds(size, flag_quote))
3909	size += flag_quote; /* double each quote */
3910	else
3911	return NULL;
3912
3913	if (sl_ok_adds(size, 3))
3914	size += 3; /* two quotes and terminating null */
3915	else
3916	return NULL;
3917
3918	new = SH_ALLOC(size);
3919
3920	if (flag_quote != 0)
3921	{
3922	new[0] = '"';
3923	pnew = &new[1];
3924	q = str;
3925	while (*q)
3926	{
3927	pnew = q;
3928	if (*pnew == '"')
3929	{
3930	++pnew; *pnew = '"';
3931	}
3932	++pnew; ++q;
3933	}
3934	*pnew = '"'; ++pnew;
3935	*pnew = '\0';
3936	}
3937	else
3938	{
3939	if (size > 3)
3940	{
3941	new[0] = '"';
3942	sl_strlcpy (&new[1], str, size-1);
3943	new[size-2] = '"';
3944	new[size-1] = '\0';
3945	}
3946	else
3947	{
3948	new[0] = '\0';
3949	}
3950	}
3951
3952	return new;
3953	}
3954	return NULL;
3955	}
3956
3957
3958
3959	void sh_hash_list_db_entry_full_detail (sh_file_t * p)
3960	{
3961	char * tmp;
3962	char * esc;
3963	char str[81];
3964
3965	if (ListWithDelimiter == S_TRUE)
3966	{
3967	printf(_("%7ld, %7ld, %10s, %5d, %12s, %5d, %3d, %-8s, %5d, %-8s, %5d, "),
3968	(unsigned long) p->theFile.ino, (unsigned long) p->theFile.dev,
3969	p->theFile.c_mode, (int) p->theFile.mode,
3970	p->theFile.c_attributes, (int) p->theFile.attributes,
3971	(int) p->theFile.hardlinks,
3972	p->theFile.c_owner, (int) p->theFile.owner,
3973	p->theFile.c_group, (int) p->theFile.group);
3974	}
3975	else
3976	{
3977	printf(_("%7ld %7ld %10s %5d %12s %5d %3d %-8s %5d %-8s %5d "),
3978	(unsigned long) p->theFile.ino, (unsigned long) p->theFile.dev,
3979	p->theFile.c_mode, (int) p->theFile.mode,
3980	p->theFile.c_attributes, (int) p->theFile.attributes,
3981	(int) p->theFile.hardlinks,
3982	p->theFile.c_owner, (int) p->theFile.owner,
3983	p->theFile.c_group, (int) p->theFile.group);
3984	}
3985
3986	if ('c' == p->theFile.c_mode[0] \|\| 'b' == p->theFile.c_mode[0])
3987	sl_snprintf(str, sizeof(str), "%"PRIu64, p->theFile.rdev);
3988	else
3989	sl_snprintf(str, sizeof(str), "%"PRIu64, p->theFile.size);
3990
3991	printf( _(" %8s"), str);
3992	if (ListWithDelimiter == S_TRUE)
3993	putchar(',');
3994
3995	printf( _(" %s"), sh_unix_gmttime (p->theFile.ctime, str, sizeof(str)));
3996	if (ListWithDelimiter == S_TRUE)
3997	putchar(',');
3998	printf( _(" %s"), sh_unix_gmttime (p->theFile.mtime, str, sizeof(str)));
3999	if (ListWithDelimiter == S_TRUE)
4000	putchar(',');
4001	printf( _(" %s"), sh_unix_gmttime (p->theFile.atime, str, sizeof(str)));
4002	if (ListWithDelimiter == S_TRUE)
4003	putchar(',');
4004	printf( _(" %s"), p->theFile.checksum);
4005	if (ListWithDelimiter == S_TRUE)
4006	putchar(',');
4007
4008	tmp = sh_util_safe_name(p->fullpath);
4009	if (ListWithDelimiter != S_TRUE)
4010	{
4011	printf( _(" %s"), tmp);
4012	}
4013	else
4014	{
4015	esc = csv_escape(tmp);
4016	printf( _(" %s,"), (esc != NULL) ? esc : _("(null)"));
4017	if (esc)
4018	SH_FREE(esc);
4019	}
4020	SH_FREE(tmp);
4021
4022	if ('l' == p->theFile.c_mode[0])
4023	{
4024	tmp = sh_util_safe_name(p->linkpath);
4025	if (ListWithDelimiter != S_TRUE)
4026	{
4027	printf(_(" -> %s"), tmp);
4028	}
4029	else
4030	{
4031	esc = csv_escape(tmp);
4032	printf( _(" %s,"), (esc != NULL) ? esc : _("(null)"));
4033	if (esc)
4034	SH_FREE(esc);
4035	}
4036	SH_FREE(tmp);
4037	}
4038
4039	if (p->attr_string)
4040	{
4041	tmp = sh_util_safe_name(p->attr_string);
4042	if (ListWithDelimiter != S_TRUE)
4043	{
4044	printf(_(" %s"), tmp);
4045	}
4046	else
4047	{
4048	esc = csv_escape(tmp);
4049	printf( _(" %s"), (esc != NULL) ? esc : _("(null)"));
4050	if (esc)
4051	SH_FREE(esc);
4052	}
4053	SH_FREE(tmp);
4054	}
4055	else
4056	{
4057	if (ListWithDelimiter == S_TRUE)
4058	printf("%s",_(" no_attr"));
4059	}
4060	putchar('\n');
4061
4062	return;
4063	}
4064
4065	void sh_hash_list_db_entry (sh_file_t * p)
4066	{
4067	char nowtime[128];
4068	char thetime[128];
4069	char * tmp;
4070	time_t now = time(NULL);
4071	time_t then = (time_t) p->theFile.mtime;
4072
4073	#if defined(HAVE_PTHREAD) && defined (_POSIX_THREAD_SAFE_FUNCTIONS) && defined(HAVE_GMTIME_R)
4074	struct tm * time_ptr;
4075	struct tm time_tm;
4076
4077	time_ptr = gmtime_r(&then, &time_tm);
4078	strftime(thetime, 127, _("%b %d %Y"), time_ptr);
4079	time_ptr = gmtime_r(&now, &time_tm);
4080	strftime(nowtime, 127, _("%b %d %Y"), time_ptr);
4081	if (0 == strncmp(&nowtime[7], &thetime[7], 4))
4082	{
4083	time_ptr = gmtime_r(&then, &time_tm);
4084	strftime(thetime, 127, _("%b %d %H:%M"), time_ptr);
4085	}
4086	#else
4087	strftime(thetime, 127, _("%b %d %Y"), gmtime(&then));
4088	strftime(nowtime, 127, _("%b %d %Y"), gmtime(&now));
4089	if (0 == strncmp(&nowtime[7], &thetime[7], 4))
4090	strftime(thetime, 127, _("%b %d %H:%M"), gmtime(&then));
4091	#endif
4092
4093	tmp = sh_util_safe_name(p->fullpath);
4094	if ('c' == p->theFile.c_mode[0] \|\| 'b' == p->theFile.c_mode[0])
4095	printf(_("%10s %3d %-8s %-8s %3d,%4d %s %s"),
4096	p->theFile.c_mode, (int) p->theFile.hardlinks,
4097	p->theFile.c_owner, p->theFile.c_group,
4098	(int) major((dev_t)p->theFile.rdev),
4099	(int) minor((dev_t)p->theFile.rdev),
4100	thetime,
4101	tmp);
4102	else
4103	printf(_("%10s %3d %-8s %-8s %8ld %s %s"),
4104	p->theFile.c_mode, (int) p->theFile.hardlinks,
4105	p->theFile.c_owner, p->theFile.c_group, (long) p->theFile.size,
4106	thetime,
4107	tmp);
4108	SH_FREE(tmp);
4109
4110	if ('l' == p->theFile.c_mode[0])
4111	{
4112	tmp = sh_util_safe_name(p->linkpath);
4113	printf(_(" -> %s\n"), tmp);
4114	SH_FREE(tmp);
4115	}
4116	else
4117	printf("\n");
4118
4119	return;
4120	}
4121
4122	#ifdef HAVE_LIBZ
4123	#include <zlib.h>
4124	#endif
4125
4126	int sh_hash_printcontent(char * linkpath)
4127	{
4128	#ifdef HAVE_LIBZ
4129	unsigned char * decoded;
4130	unsigned char * decompressed = NULL;
4131	size_t dlen;
4132	unsigned long clen;
4133	unsigned long clen_o;
4134	int res;
4135
4136	if (linkpath && *linkpath != '-')
4137	{
4138	dlen = sh_util_base64_dec_alloc (&decoded,
4139	(unsigned char *)linkpath,
4140	strlen(linkpath));
4141
4142	clen = dlen * 2 + 1;
4143
4144	do {
4145	if (decompressed)
4146	SH_FREE(decompressed);
4147	clen += dlen; clen_o = clen;
4148	decompressed = SH_ALLOC(clen);
4149	res = uncompress(decompressed, &clen, decoded, dlen);
4150	if (res == Z_MEM_ERROR)
4151	{ fprintf(stderr, "%s",_("Error: Not enough memory\n")); return -1; }
4152	if (res == Z_DATA_ERROR)
4153	{ fprintf(stderr, "%s",_("Error: Data corrupt or incomplete\n")); return -1; }
4154	} while (res == Z_BUF_ERROR \|\| clen == clen_o);
4155
4156	decompressed[clen] = '\0';
4157	fputs( (char*) decompressed, stdout);
4158	SH_FREE(decompressed);
4159	return 0;
4160	}
4161	#else
4162	(void) linkpath;
4163	#endif
4164	fprintf(stderr, "%s",_("Error: No data available\n"));
4165	return -1;
4166	}
4167
4168	int sh_hash_list_db (const char * db_file)
4169	{
4170	sh_file_t * p;
4171	SL_TICKET fd;
4172	char * line;
4173	int flag = 0;
4174
4175	if (!db_file)
4176	{
4177	_exit(EXIT_FAILURE);
4178	return -1;
4179	}
4180	if (sl_is_suid())
4181	{
4182	fprintf(stderr, "%s",_("ERROR: insufficient privilege\n"));
4183	_exit (EXIT_FAILURE);
4184	return -1; /* for Mac OSX compiler */
4185	}
4186	if (0 == strcmp(db_file, _("default")))
4187	db_file = file_path('D', 'W');
4188	if (!db_file)
4189	{
4190	_exit(EXIT_FAILURE);
4191	return -1;
4192	}
4193
4194	line = SH_ALLOC(MAX_PATH_STORE+2);
4195
4196	if ( SL_ISERROR(fd = sl_open_read(FIL__, __LINE__, db_file, SL_YESPRIV)))
4197	{
4198	fprintf(stderr, _("ERROR: can't open %s for read (errnum = %ld)\n"),
4199	db_file, fd);
4200	_exit(EXIT_FAILURE);
4201	return -1;
4202	}
4203
4204	/* fast forward to start of data
4205	*/
4206	sh_hash_setdataent(fd, line, MAX_PATH_STORE+1, db_file);
4207
4208	while (1)
4209	{
4210	p = sh_hash_getdataent (fd, line, MAX_PATH_STORE+1);
4211	if ((p != NULL) && (p->fullpath[0] == '/'))
4212	{
4213	if (!ListFile)
4214	{
4215	flag = 1;
4216	if (ListFullDetail == S_FALSE)
4217	sh_hash_list_db_entry (p);
4218	else
4219	sh_hash_list_db_entry_full_detail (p);
4220	}
4221	else
4222	{
4223	if (0 != sl_strcmp(ListFile, p->fullpath))
4224	{
4225	continue;
4226	}
4227	flag = 1;
4228	if ('l' != p->theFile.c_mode[0])
4229	{
4230	if (sh_hash_printcontent(p->linkpath) < 0)
4231	{
4232	_exit(EXIT_FAILURE);
4233	return -1;
4234	}
4235	}
4236	else
4237	{
4238	fprintf(stderr, "%s",_("File is a link\n"));
4239	_exit(EXIT_FAILURE);
4240	return -1;
4241	}
4242	break;
4243	}
4244	}
4245	else if (p == NULL)
4246	{
4247	break;
4248	}
4249	}
4250
4251	if (line != NULL)
4252	SH_FREE(line);
4253	sl_close (fd);
4254
4255	fflush(NULL);
4256
4257	if (flag == 0)
4258	{
4259	fprintf(stderr, "%s",_("File not found\n"));
4260	_exit(EXIT_FAILURE);
4261	}
4262	_exit(EXIT_SUCCESS);
4263	return 0;
4264	}
4265
4266	/* if defined(SH_WITH_CLIENT) \|\| defined(SH_STANDALONE) */
4267	#endif

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

Download in other formats: