Context Navigation

source: trunk/src/sh_calls.c@ 479

Last change on this file since 479 was 473, checked in by katerina, 9 years ago
Fix for ticket #371 (use cppcheck instead of uno for static checking).
File size: 23.5 KB

Rev	Line
[1]	1	/* SAMHAIN file system integrity testing */
	2	/* Copyright (C) 1999 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	#ifdef HOST_IS_HPUX
	23	#define _XOPEN_SOURCE_EXTENDED
	24	#endif
	25
	26	#include <stdlib.h>
	27	#include <string.h>
	28	#include <errno.h>
	29
	30	#include <sys/types.h>
	31	#include <unistd.h>
	32	#include <sys/stat.h>
	33	#include <fcntl.h>
	34	#include <signal.h>
	35	#include <sys/socket.h>
[361]	36	#include <netdb.h>
[1]	37	#include <netinet/in.h>
	38
	39	#ifndef S_SPLINT_S
	40	#include <arpa/inet.h>
	41	#else
	42	#define AF_INET 2
	43	#endif
	44
	45	#include <time.h>
	46
	47	#ifndef HAVE_LSTAT
	48	#define lstat stat
	49	#endif
	50
	51	#include "samhain.h"
	52	#include "sh_error.h"
	53	#include "sh_calls.h"
[295]	54	#include "sh_ipvx.h"
[315]	55	#include "sh_sub.h"
	56	#include "sh_utils.h"
[1]	57
	58	#undef FIL__
	59	#define FIL__ _("sh_calls.c")
	60
[361]	61	extern int flag_err_debug;
	62
[1]	63	char aud_err_message[64];
	64
	65	typedef struct cht_struct
	66	{
[170]	67	const char * str;
[1]	68	unsigned long val;
	69	} cht_type;
	70
	71	static cht_type aud_tab[] =
	72	{
	73	{ N_("execve"), AUD_EXEC },
	74	{ N_("utime"), AUD_UTIME },
	75	{ N_("unlink"), AUD_UNLINK },
	76	{ N_("dup"), AUD_DUP },
	77	{ N_("chdir"), AUD_CHDIR },
	78	{ N_("open"), AUD_OPEN },
	79	{ N_("kill"), AUD_KILL },
	80	{ N_("exit"), AUD_EXIT },
	81	{ N_("fork"), AUD_FORK },
	82	{ N_("setuid"), AUD_SETUID },
	83	{ N_("setgid"), AUD_SETGID },
	84	{ N_("pipe"), AUD_PIPE },
	85	{ NULL, 0 }
	86	};
	87
	88	/* Set aud functions
	89	*/
[22]	90	int sh_aud_set_functions(const char * str_s)
[1]	91	{
	92	int i = 0;
	93
	94	SL_ENTER(_("sh_aud_set_functions"));
	95
	96	if (str_s == NULL)
	97	return -1;
	98
	99	while (aud_tab[i].str != NULL)
	100	{
	101	if (NULL != sl_strstr (str_s, _(aud_tab[i].str)))
	102	{
	103	sh.flag.audit = 1;
	104	sh.flag.aud_mask \|= aud_tab[i].val;
	105	}
	106	++i;
	107	}
	108
	109	SL_RETURN(0,_("sh_aud_set_functions"));
	110	}
	111
	112
	113
	114
	115	/* Need to catch EINTR for these functions.
	116	*/
[170]	117	long int retry_sigaction(const char * file, int line,
[1]	118	int signum, const struct sigaction *act,
	119	struct sigaction *oldact)
	120	{
	121	int error;
	122	long int val_retry = -1;
[132]	123	char errbuf[SH_ERRBUF_SIZE];
[1]	124	errno = 0;
	125
	126	SL_ENTER(_("retry_sigaction"));
	127
	128	do {
	129	val_retry = sigaction(signum, act, oldact);
	130	} while (val_retry < 0 && errno == EINTR);
	131
	132	error = errno;
	133	if (val_retry < 0) {
	134	sh_error_handle ((-1), file, line, error, MSG_ERR_SIGACT,
[132]	135	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	136	(long) signum );
	137	}
	138	errno = error;
	139	SL_RETURN(val_retry, _("retry_sigaction"));
	140	}
	141
[295]	142	static struct sh_sockaddr bind_addr;
[1]	143	static int use_bind_addr = 0;
	144
[20]	145	int sh_calls_set_bind_addr (const char * str)
[1]	146	{
[3]	147	static int reject = 0;
	148
	149	if (reject == 1)
	150	return (0);
	151
	152	if (sh.flag.opts == S_TRUE)
	153	reject = 1;
	154
[295]	155	if (0 == sh_ipvx_aton(str, &bind_addr))
	156	return -1;
	157
[1]	158	use_bind_addr = 1;
	159	return 0;
	160	}
	161
	162
[170]	163	long int retry_connect(const char * file, int line, int sockfd,
[1]	164	struct sockaddr *serv_addr, int addrlen)
	165	{
	166	int error;
[472]	167	int err_bind = 0;
[1]	168	long int val_retry = 0;
[132]	169	char errbuf[SH_ERRBUF_SIZE];
[1]	170
	171	SL_ENTER(_("retry_connect"));
	172
	173	errno = 0;
	174
[472]	175	if (use_bind_addr)
[1]	176	{
[295]	177	int slen = SH_SS_LEN(bind_addr);
[472]	178	struct sockaddr *b_addr = sh_ipvx_sockaddr_cast(&bind_addr);
[295]	179
[472]	180	if (bind_addr.ss_family == AF_INET)
	181	b_addr->sa_family = AF_INET;
	182	#if defined(USE_IPVX)
	183	else
	184	b_addr->sa_family = AF_INET6;
	185	#endif
	186	val_retry = bind(sockfd, b_addr, slen);
[1]	187	}
	188
	189	if (val_retry == 0)
	190	{
	191	do {
[295]	192	val_retry = connect(sockfd, serv_addr, addrlen);
[171]	193	} while (val_retry < 0 && (errno == EINTR \|\| errno == EINPROGRESS));
[1]	194	}
[472]	195	else
	196	{
	197	err_bind = 1;
	198	}
[1]	199
	200	error = errno;
	201	if (val_retry != 0) {
[473]	202	long eport = 0;
[295]	203	char eaddr[SH_IP_BUF];
[472]	204	char emesg[SH_BUFSIZE];
	205	struct sockaddr *err_addr = serv_addr;
	206	struct sh_sockaddr ss;
[295]	207
[472]	208	if (err_bind)
	209	err_addr = sh_ipvx_sockaddr_cast(&bind_addr);
	210
	211	sh_ipvx_save(&ss, err_addr->sa_family, err_addr);
[295]	212	sh_ipvx_ntoa(eaddr, sizeof(eaddr), &ss);
	213
[472]	214	if (err_addr->sa_family == AF_INET)
[295]	215	eport = (long) ntohs(((struct sockaddr_in *)serv_addr)->sin_port);
[472]	216	#if defined(USE_IPVX)
[295]	217	else
	218	eport = (long) ntohs(((struct sockaddr_in6 *)serv_addr)->sin6_port);
[472]	219	#endif
[295]	220
[472]	221	sl_strlcpy(emesg, sh_error_message(error, errbuf, sizeof(errbuf)), sizeof(emesg));
	222	sl_strlcat(emesg,
	223	(err_addr->sa_family == AF_INET) ? _(", AF_INET") : _(", AF_INET6"),
	224	sizeof(emesg));
	225
	226	sl_strlcat(emesg,
	227	(err_bind) ? _(", bind") : _(", connect"),
	228	sizeof(emesg));
	229
	230	sh_error_handle ((-1), file, line, error, MSG_ERR_CONNECT,
	231	emesg,
[295]	232	(long) sockfd, eport, eaddr);
[1]	233	}
	234	errno = error;
	235	SL_RETURN(val_retry, _("retry_connect"));
	236	}
	237
[170]	238	long int retry_accept(const char * file, int line, int fd,
[295]	239	struct sh_sockaddr serv_addr, int addrlen)
[1]	240	{
	241	int error;
	242	long int val_retry = -1;
[132]	243	char errbuf[SH_ERRBUF_SIZE];
[295]	244	struct sockaddr_storage ss;
[132]	245
[295]	246	ACCEPT_TYPE_ARG3 my_addrlen = sizeof(ss);
[1]	247
	248	errno = 0;
	249
	250	SL_ENTER(_("retry_accept"));
	251
	252	do {
[295]	253	val_retry = accept(fd, (struct sockaddr *)&ss, &my_addrlen);
[1]	254	} while (val_retry < 0 && errno == EINTR);
[295]	255
[1]	256	error = errno;
	257	if (val_retry < 0) {
	258	sh_error_handle ((-1), file, line, error, MSG_ERR_ACCEPT,
[132]	259	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	260	(long) fd );
	261	}
[295]	262	errno = error;
	263
[361]	264	if (flag_err_debug == SL_TRUE)
	265	{
	266	char ipbuf[SH_IP_BUF];
	267	char buf[SH_BUFSIZE];
	268	#if defined(USE_IPVX)
	269	sl_strlcpy(errbuf, _("Address family: "), sizeof(errbuf));
	270	sl_strlcat(errbuf,
	271	(ss.ss_family == AF_INET6) ? _("AF_INET6") : _("AF_INET"),
	272	sizeof(errbuf));
	273	getnameinfo((struct sockaddr *)&ss, my_addrlen,
	274	ipbuf, sizeof(ipbuf), NULL, 0, NI_NUMERICHOST);
	275	#else
	276	struct sockaddr_in sa;
	277	char * p;
	278	memcpy(&(sa), (struct sockaddr_in*)&ss, sizeof(struct sockaddr_in));
	279	p = inet_ntoa(sa.sin_addr);
	280	sl_strlcpy(ipbuf, p, sizeof(ipbuf));
	281	sl_strlcpy(errbuf, _("Address family: AF_INET"), sizeof(errbuf));
	282	#endif
	283	sl_strlcpy(buf, _("Address: "), sizeof(buf));
	284	sl_strlcat(buf, ipbuf, sizeof(buf));
	285	sh_error_handle (SH_ERR_ALL, FIL__, __LINE__, 0, MSG_E_SUBGEN,
	286	errbuf, _("retry_accept"));
	287	sh_error_handle (SH_ERR_ALL, FIL__, __LINE__, 0, MSG_E_SUBGEN,
	288	buf, _("retry_accept"));
	289	}
	290
[295]	291	sh_ipvx_save(serv_addr, ss.ss_family, (struct sockaddr *) &ss);
	292
[361]	293	if (flag_err_debug == SL_TRUE)
	294	{
	295	char ipbuf[SH_IP_BUF];
	296	char ipbuf2[SH_IP_BUF];
	297	char buf[SH_BUFSIZE];
	298	#if defined(USE_IPVX)
	299	int len = (serv_addr->ss_family == AF_INET) ?
	300	sizeof(struct sockaddr_in) :
	301	sizeof(struct sockaddr_in6);
	302	getnameinfo(sh_ipvx_sockaddr_cast(serv_addr), len,
	303	ipbuf2, sizeof(ipbuf2), NULL, 0, NI_NUMERICHOST);
	304	#else
	305	char * p = inet_ntoa((serv_addr->sin).sin_addr);
	306	sl_strlcpy(ipbuf2, p, sizeof(ipbuf2));
	307	#endif
	308	sh_ipvx_ntoa (ipbuf, sizeof(ipbuf), serv_addr);
	309	sl_snprintf(buf, sizeof(buf), _("Address: %s / %s"),
	310	ipbuf, ipbuf2);
	311	sh_error_handle (SH_ERR_ALL, FIL__, __LINE__, 0, MSG_E_SUBGEN,
	312	buf, _("retry_accept"));
	313	}
	314
[307]	315	*addrlen = (int) my_addrlen;
[1]	316	SL_RETURN(val_retry, _("retry_accept"));
	317	}
	318
[317]	319	static int sh_enable_use_sub = 0;
	320
	321	#if defined (SH_WITH_CLIENT) \|\| defined (SH_STANDALONE)
	322	static int sh_use_sub = 1;
	323	#else
[315]	324	static int sh_use_sub = 0;
[317]	325	#endif
[315]	326
[317]	327	void sh_calls_enable_sub()
	328	{
	329	sh_enable_use_sub = 1;
	330	return;
	331	}
	332
[315]	333	int sh_calls_set_sub (const char * str)
	334	{
[317]	335	int ret = sh_util_flagval(str, &sh_use_sub);
	336
	337	if ((ret == 0) && (!sh_use_sub))
	338	{
	339	sh_kill_sub();
	340	}
	341	return ret;
[315]	342	}
	343
[317]	344	long int retry_lstat_ns(const char * file, int line,
	345	const char file_name, struct stat buf)
	346	{
	347	int error;
	348	long int val_retry = -1;
	349	char errbuf[SH_ERRBUF_SIZE];
	350
	351	SL_ENTER(_("retry_lstat_ns"));
	352
	353	do {
	354	val_retry = /@-unrecog@/lstat (file_name, buf)/@+unrecog@/;
	355	} while (val_retry < 0 && errno == EINTR);
	356
	357	error = errno;
	358	if (val_retry < 0) {
	359	(void) sh_error_message(error, aud_err_message, 64);
	360	sh_error_handle ((-1), file, line, error, MSG_ERR_LSTAT,
	361	sh_error_message(error, errbuf, sizeof(errbuf)),
	362	file_name );
	363	}
	364	errno = error;
	365
	366	SL_RETURN(val_retry, _("retry_lstat_ns"));
	367	}
	368
[170]	369	long int retry_lstat(const char * file, int line,
[1]	370	const char file_name, struct stat buf)
	371	{
	372	int error;
	373	long int val_retry = -1;
[132]	374	char errbuf[SH_ERRBUF_SIZE];
[1]	375
	376	SL_ENTER(_("retry_lstat"));
	377
[317]	378	if (sh_use_sub && sh_enable_use_sub)
[315]	379	{
	380	val_retry = sh_sub_lstat (file_name, buf);
	381	}
	382	else
	383	{
	384	do {
	385	val_retry = /@-unrecog@/lstat (file_name, buf)/@+unrecog@/;
	386	} while (val_retry < 0 && errno == EINTR);
	387	}
	388
[1]	389	error = errno;
	390	if (val_retry < 0) {
[134]	391	(void) sh_error_message(error, aud_err_message, 64);
[1]	392	sh_error_handle ((-1), file, line, error, MSG_ERR_LSTAT,
[132]	393	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	394	file_name );
	395	}
	396	errno = error;
[315]	397
[1]	398	SL_RETURN(val_retry, _("retry_lstat"));
	399	}
	400
[170]	401	long int retry_stat(const char * file, int line,
[1]	402	const char file_name, struct stat buf)
	403	{
	404	int error;
	405	long int val_retry = -1;
[132]	406	char errbuf[SH_ERRBUF_SIZE];
[1]	407
	408	SL_ENTER(_("retry_stat"));
	409
[317]	410	if (sh_use_sub && sh_enable_use_sub)
[315]	411	{
	412	val_retry = sh_sub_stat (file_name, buf);
	413	}
	414	else
	415	{
	416	do {
	417	val_retry = stat (file_name, buf);
	418	} while (val_retry < 0 && errno == EINTR);
	419	}
	420
[1]	421	error = errno;
	422	if (val_retry < 0) {
[134]	423	(void) sh_error_message(error, aud_err_message, 64);
[1]	424	sh_error_handle ((-1), file, line, error, MSG_ERR_STAT,
[132]	425	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	426	file_name );
	427	}
	428	errno = error;
[315]	429
[1]	430	SL_RETURN(val_retry, _("retry_stat"));
	431	}
	432
[170]	433	long int retry_fstat(const char * file, int line, int filed, struct stat *buf)
[1]	434	{
	435	int error;
	436	long int val_retry = -1;
[132]	437	char errbuf[SH_ERRBUF_SIZE];
[1]	438
	439	SL_ENTER(_("retry_fstat"));
	440
	441	do {
	442	val_retry = fstat (filed, buf);
	443	} while (val_retry < 0 && errno == EINTR);
	444	error = errno;
	445	if (val_retry < 0) {
	446	sh_error_handle ((-1), file, line, error, MSG_ERR_FSTAT,
[132]	447	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	448	(long) filed );
	449	}
	450	errno = error;
	451	SL_RETURN(val_retry, _("retry_fstat"));
	452	}
	453
[170]	454	long int retry_fcntl(const char * file, int line, int fd, int cmd, long arg)
[1]	455	{
	456	int error;
	457	long int val_retry = -1;
[132]	458	char errbuf[SH_ERRBUF_SIZE];
[1]	459	errno = 0;
	460
	461	SL_ENTER(_("retry_fcntl"));
	462
	463	if (cmd == F_GETFD \|\| cmd == F_GETFL)
	464	{
	465	do {
	466	val_retry = fcntl(fd, cmd);
	467	} while (val_retry < 0 && errno == EINTR);
	468	}
	469	else
	470	{
	471	do {
	472	val_retry = fcntl(fd, cmd, arg);
	473	} while (val_retry < 0 && errno == EINTR);
	474	}
	475	error = errno;
	476	if (val_retry < 0) {
	477	sh_error_handle ((-1), file, line, error, MSG_ERR_FCNTL,
[132]	478	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	479	(long) fd, (long) cmd, arg );
	480	}
	481	errno = error;
	482	SL_RETURN(val_retry, _("retry_fcntl"));
	483	}
	484
	485	long int retry_msleep (int sec, int millisec)
	486	{
	487	int result = 0;
	488	#if defined(HAVE_NANOSLEEP)
	489	struct timespec req, rem;
	490	#endif
	491
[169]	492	SL_ENTER(_("retry_msleep"));
[1]	493
	494	errno = 0;
	495	if (millisec > 999) millisec = 999;
	496	if (millisec < 0) millisec = 0;
	497	if (sec < 0) sec = 0;
	498
	499	#if defined(HAVE_NANOSLEEP)
	500	/@-usedef@/
	501	req.tv_sec = sec; rem.tv_sec = 0;
	502	req.tv_nsec = millisec * 1000000; rem.tv_nsec = 0;
	503	/@+usedef@/
	504	do {
	505	result = /@-unrecog@/nanosleep(&req, &rem)/@+unrecog@/;
	506
	507	req.tv_sec = rem.tv_sec; rem.tv_sec = 0;
	508	req.tv_nsec = rem.tv_nsec; rem.tv_nsec = 0;
	509
	510	} while ((result == -1) && (errno == EINTR));
	511	#else
	512	if (sec > 0)
	513	{
[134]	514	sleep (sec); /* nanosleep not available */
[1]	515	}
	516	else
	517	{
	518	#ifdef HAVE_USLEEP
	519	if (millisec > 0)
	520	{
	521	usleep(1000 * millisec);
	522	}
	523	#else
	524	if (millisec > 0)
	525	{
	526	sleep (1);
	527	}
	528	#endif
	529	}
	530	#endif
	531	SL_RETURN(result, _("retry_msleep"));
	532	}
	533
	534	/***************************************************
	535	*
	536	* Audit these functions.
	537	*
	538	***************************************************/
	539
[170]	540	long int retry_aud_execve (const char * file, int line,
[1]	541	const char dateiname, char argv[],
	542	char * envp[])
	543	{
	544	uid_t a = geteuid();
	545	gid_t b = getegid();
	546	int i;
	547	int error;
[132]	548	char errbuf[SH_ERRBUF_SIZE];
[1]	549
	550	SL_ENTER(_("retry_aud_execve"));
	551
	552	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_EXEC) != 0)
	553	sh_error_handle ((-1), file, line, 0, MSG_AUD_EXEC,
	554	dateiname, (long) a, (long) b );
	555	do {
	556	i = execve(dateiname, argv, envp);
	557	} while (i < 0 && errno == EINTR);
	558
	559	error = errno;
	560	if (i < 0) {
[132]	561	sh_error_handle ((-1), file, line, error, MSG_ERR_EXEC,
	562	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	563	dateiname, (long) a, (long) b );
	564	}
	565	errno = error;
	566	SL_RETURN(i, _("retry_aud_execve"));
	567	}
	568
	569
[170]	570	long int retry_aud_utime (const char * file, int line,
	571	char * path, struct utimbuf *buf)
[1]	572	{
	573	long int val_return;
	574	int error;
[132]	575	char errbuf[SH_ERRBUF_SIZE];
[1]	576	errno = 0;
	577
	578	SL_ENTER(_("retry_aud_utime"));
	579
	580	do {
	581	val_return = utime (path, buf);
	582	} while (val_return < 0 && errno == EINTR);
	583
	584	error = errno;
	585	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_UTIME) != 0)
	586	sh_error_handle ((-1), file, line, 0, MSG_AUD_UTIME,
	587	path,
	588	(unsigned long) buf->actime,
	589	(unsigned long) buf->modtime);
	590	if (val_return < 0) {
	591	sh_error_handle ((-1), file, line, error, MSG_ERR_UTIME,
[132]	592	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	593	path,
	594	(unsigned long) buf->actime,
	595	(unsigned long) buf->modtime);
	596	}
	597	errno = error;
	598	SL_RETURN(val_return, _("retry_aud_utime"));
	599	}
	600
[170]	601	long int retry_aud_unlink (const char * file, int line,
[1]	602	char * path)
	603	{
	604	long int val_return;
	605	int error;
[132]	606	char errbuf[SH_ERRBUF_SIZE];
[1]	607	errno = 0;
	608
	609	SL_ENTER(_("retry_aud_unlink"));
	610
	611	do {
	612	val_return = unlink (path);
	613	} while (val_return < 0 && errno == EINTR);
	614
	615	error = errno;
	616	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_UNLINK) != 0)
	617	sh_error_handle ((-1), file, line, 0, MSG_AUD_UNLINK,
	618	path);
	619	if (val_return < 0) {
[132]	620	sh_error_handle ((-1), file, line, error, MSG_ERR_UNLINK,
	621	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	622	path);
	623	}
	624	errno = error;
	625	SL_RETURN(val_return, _("retry_aud_unlink"));
	626	}
	627
[170]	628	long int retry_aud_dup2 (const char * file, int line,
[1]	629	int fd, int fd2)
	630	{
	631	long int val_return;
	632	int error;
[132]	633	char errbuf[SH_ERRBUF_SIZE];
[1]	634	errno = 0;
	635
	636	SL_ENTER(_("retry_aud_dup2"));
	637
	638	do {
	639	val_return = dup2 (fd, fd2);
	640	} while (val_return < 0 && errno == EINTR);
	641
	642	error = errno;
	643	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_DUP) != 0)
	644	sh_error_handle ((-1), file, line, 0, MSG_AUD_DUP,
	645	(long) fd, val_return);
	646	if (val_return < 0) {
	647	sh_error_handle ((-1), file, line, error, MSG_ERR_DUP,
[132]	648	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	649	(long) fd, val_return);
	650	}
	651	errno = error;
	652	SL_RETURN(val_return, _("retry_aud_dup2"));
	653	}
	654
[170]	655	long int retry_aud_dup (const char * file, int line,
[1]	656	int fd)
	657	{
	658	long int val_return;
	659	int error;
[132]	660	char errbuf[SH_ERRBUF_SIZE];
[1]	661	errno = 0;
	662
	663	SL_ENTER(_("retry_aud_dup"));
	664
	665	do {
	666	val_return = dup (fd);
	667	} while (val_return < 0 && errno == EINTR);
	668	error = errno;
	669	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_DUP) != 0)
	670	sh_error_handle ((-1), file, line, 0, MSG_AUD_DUP,
	671	(long) fd, val_return);
	672	if (val_return < 0) {
	673	sh_error_handle ((-1), file, line, error, MSG_ERR_DUP,
[132]	674	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	675	(long) fd, val_return);
	676	}
	677	errno = error;
	678	SL_RETURN(val_return, _("retry_aud_dup"));
	679	}
	680
	681
	682
[170]	683	long int retry_aud_chdir (const char * file, int line,
[1]	684	const char *path)
	685	{
	686	long int val_return;
	687	int error = 0;
[132]	688	char errbuf[SH_ERRBUF_SIZE];
[1]	689	errno = 0;
	690
	691	SL_ENTER(_("retry_aud_chdir"));
	692
	693	do {
	694	val_return = chdir (path);
	695	} while (val_return < 0 && errno == EINTR);
	696
	697	error = errno;
	698	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_CHDIR) != 0)
	699	sh_error_handle ((-1), file, line, 0, MSG_AUD_CHDIR,
	700	path);
	701	if (val_return < 0) {
[132]	702	sh_error_handle ((-1), file, line, error, MSG_ERR_CHDIR,
	703	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	704	path);
	705	}
	706	errno = error;
	707	SL_RETURN(val_return, _("retry_aud_chdir"));
	708	}
	709
	710
[170]	711	long int aud_open_noatime (const char * file, int line, int privs,
[1]	712	const char *pathname, int flags, mode_t mode,
	713	int * o_noatime)
	714	{
	715	long int val_return;
	716	int error;
[132]	717	char errbuf[SH_ERRBUF_SIZE];
[1]	718
	719	SL_ENTER(_("aud_open"));
	720
[412]	721	#ifdef USE_SUID
	722	if (0 == strcmp(pathname, "/usr/bin/sudo"))
	723	{
	724	uid_t ruid; uid_t euid; uid_t suid;
	725	getresuid(&ruid, &euid, &suid);
	726	}
	727	if (privs == SL_YESPRIV)
	728	sl_set_suid();
	729	#else
	730	/@-noeffect@/
	731	(void) privs; /* fix compiler warning */
	732	/@+noeffect@/
	733	#endif
	734
[1]	735	val_return = open (pathname, *o_noatime\|flags, mode);
[412]	736
	737	#ifdef USE_SUID
	738	if (privs == SL_YESPRIV)
	739	sl_unset_suid();
	740	#endif
	741
[1]	742	if ((val_return < 0) && (*o_noatime != 0))
	743	{
	744	val_return = open (pathname, flags, mode);
	745	if (val_return >= 0)
	746	*o_noatime = 0;
	747	}
	748	error = errno;
	749
	750	if (val_return < 0)
	751	{
[134]	752	(void) sh_error_message(error, aud_err_message, 64);
[1]	753	}
	754
	755	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_OPEN) != 0)
	756	{
	757	sh_error_handle ((-1), file, line, 0, MSG_AUD_OPEN,
	758	pathname, (long) flags, (long) mode, val_return);
	759	}
	760	if (val_return < 0) {
	761	sh_error_handle ((-1), file, line, error, MSG_ERR_OPEN,
[132]	762	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	763	pathname, (long) flags, (long) mode, val_return);
	764	}
	765	errno = error;
	766	SL_RETURN(val_return, _("aud_open"));
	767	}
	768
[170]	769	long int aud_open (const char * file, int line, int privs,
[1]	770	const char *pathname, int flags, mode_t mode)
	771	{
	772	long int val_return;
	773	int error;
[132]	774	char errbuf[SH_ERRBUF_SIZE];
[1]	775
	776	SL_ENTER(_("aud_open"));
	777
[412]	778	#ifdef USE_SUID
	779	if (privs == SL_YESPRIV)
	780	sl_set_suid();
	781	#else
[1]	782	/@-noeffect@/
	783	(void) privs; /* fix compiler warning */
	784	/@+noeffect@/
[412]	785	#endif
[1]	786
[412]	787	val_return = open (pathname, flags, mode);
	788
	789	#ifdef USE_SUID
	790	if (privs == SL_YESPRIV)
	791	sl_unset_suid();
	792	#endif
	793
	794	error = errno;
	795
[1]	796	if (val_return < 0)
	797	{
[134]	798	(void) sh_error_message(error, aud_err_message, 64);
[1]	799	}
	800
	801	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_OPEN) != 0)
	802	{
	803	sh_error_handle ((-1), file, line, 0, MSG_AUD_OPEN,
	804	pathname, (long) flags, (long) mode, val_return);
	805	}
	806	if (val_return < 0) {
	807	sh_error_handle ((-1), file, line, error, MSG_ERR_OPEN,
[132]	808	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	809	pathname, (long) flags, (long) mode, val_return);
	810	}
	811	errno = error;
	812	SL_RETURN(val_return, _("aud_open"));
	813	}
	814
[170]	815	long int aud_kill (const char * file, int line, pid_t pid, int sig)
[1]	816	{
	817	int myerror;
	818	long int val_return = kill (pid, sig);
[132]	819	char errbuf[SH_ERRBUF_SIZE];
[1]	820	myerror = errno;
	821
	822	SL_ENTER(_("aud_kill"));
	823
	824	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_KILL) != 0)
	825	sh_error_handle ((-1), file, line, 0, MSG_AUD_KILL,
	826	(long) pid, (long) sig);
	827	if (val_return < 0) {
	828	sh_error_handle ((-1), file, line, myerror, MSG_ERR_KILL,
[132]	829	sh_error_message(myerror, errbuf, sizeof(errbuf)),
[1]	830	(long) pid, (long) sig);
	831	}
	832	errno = myerror;
	833	SL_RETURN(val_return, _("aud_kill"));
	834	}
	835
	836	/@noreturn@/
[170]	837	void aud_exit (const char * file, int line, int fd)
[1]	838	{
	839	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_EXIT) != 0)
	840	sh_error_handle ((-1), file, line, 0, MSG_AUD_EXIT,
	841	(long) fd);
	842
	843	SL_ENTER(_("aud_exit"));
	844
	845	sh.flag.exit = fd;
	846	exit(fd);
	847	}
	848
	849	/@noreturn@/
[170]	850	void aud__exit (const char * file, int line, int fd)
[1]	851	{
	852	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_EXIT) != 0)
	853	sh_error_handle ((-1), file, line, 0, MSG_AUD_EXIT,
	854	(long) fd);
	855
	856	SL_ENTER(_("aud__exit"));
	857
	858	sh.flag.exit = fd;
	859	_exit(fd);
	860	}
	861
[170]	862	pid_t aud_fork (const char * file, int line)
[1]	863	{
	864	int error;
	865	pid_t i = fork();
[132]	866	char errbuf[SH_ERRBUF_SIZE];
[1]	867
	868	error = errno;
	869	SL_ENTER(_("aud_fork"));
	870
	871	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_FORK) != 0 && (i > 0))
	872	sh_error_handle ((-1), file, line, 0, MSG_AUD_FORK,
	873	(long) i);
	874	if (i == (pid_t) -1) {
	875	sh_error_handle ((-1), file, line, error, MSG_ERR_FORK,
[132]	876	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	877	(long) i);
	878	}
	879	errno = error;
	880	SL_RETURN(i, _("aud_fork"));
	881	}
	882
[170]	883	int aud_setuid (const char * file, int line, uid_t uid)
[1]	884	{
	885	int error = 0;
	886	int i = 0;
[132]	887	char errbuf[SH_ERRBUF_SIZE];
[1]	888
	889	SL_ENTER(_("aud_setuid"));
	890
	891	if (uid != (uid_t) 0) {
	892	i = setuid(uid);
	893	error = errno;
	894	}
	895	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_SETUID) != 0)
	896	sh_error_handle ((-1), file, line, 0, MSG_AUD_SETUID,
	897	(long) uid);
	898	if (uid == (uid_t) 0) {
	899	i = setuid(uid);
	900	error = errno;
	901	}
	902	if (i < 0) {
	903	sh_error_handle ((-1), file, line, error, MSG_ERR_SETUID,
[132]	904	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	905	(long) uid);
	906	}
	907	errno = error;
	908	SL_RETURN(i, _("aud_setuid"));
	909	}
	910
[170]	911	int aud_setgid (const char * file, int line, gid_t gid)
[1]	912	{
	913	int error = 0;
	914	int i = 0;
[132]	915	char errbuf[SH_ERRBUF_SIZE];
[1]	916
	917	SL_ENTER(_("aud_setgid"));
	918
	919	if (gid != (gid_t) 0) {
	920	i = setgid(gid);
	921	error = errno;
	922	}
	923
	924	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_SETGID) != 0)
	925	sh_error_handle ((-1), file, line, 0, MSG_AUD_SETGID,
	926	(long) gid);
	927	if (gid == (gid_t) 0) {
	928	i = setgid(gid);
	929	error = errno;
	930	}
	931	if (i < 0) {
	932	sh_error_handle ((-1), file, line, error, MSG_ERR_SETGID,
[132]	933	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	934	(long) gid);
	935	}
	936	errno = error;
	937	SL_RETURN(i, _("aud_setgid"));
	938	}
	939
[170]	940	int aud_pipe (const char * file, int line, int * modus)
[1]	941	{
	942	int error;
	943	int i = pipe (modus);
[132]	944	char errbuf[SH_ERRBUF_SIZE];
[1]	945
	946	SL_ENTER(_("aud_pipe"));
	947
	948	error = errno;
	949	if (sh.flag.audit != 0 && (sh.flag.aud_mask & AUD_PIPE) != 0)
	950	{
	951	if (i < 0)
	952	sh_error_handle ((-1), file, line, 0, MSG_AUD_PIPE,
	953	(long) 0, (long) 0);
	954	else
	955	sh_error_handle ((-1), file, line, 0, MSG_AUD_PIPE,
	956	(long) modus[0], (long) modus[1]);
	957	}
	958	if (i < 0) {
	959	if (i < 0)
	960	sh_error_handle ((-1), file, line, error, MSG_ERR_PIPE,
[137]	961	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	962	(long) 0, (long) 0);
	963	else
	964	sh_error_handle ((-1), file, line, error, MSG_ERR_PIPE,
[132]	965	sh_error_message(error, errbuf, sizeof(errbuf)),
[1]	966	(long) modus[0], (long) modus[1]);
	967	}
	968	SL_RETURN(i, _("aud_pipe"));
	969	}

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

Download in other formats: