busybox/libbb/platform.c

/*
 * Replacements for common but usually nonstandard functions that aren't
 * supplied by all platforms.
 *
 * Copyright (C) 2009 by Dan Fandrich <dan@coneharvesters.com>, et. al.
 *
 * Licensed under the GPL version 2, see the file LICENSE in this tarball.
 */
#include "libbb.h"

#ifndef HAVE_STRCHRNUL
char* FAST_FUNC strchrnul(const char *s, int c)
{
	while (*s != '\0' && *s != c)
		s++;
	return (char*)s;
}
#endif

#ifndef HAVE_VASPRINTF
int FAST_FUNC vasprintf(char **string_ptr, const char *format, va_list p)
{
	int r;
	va_list p2;
	char buf[128];

	va_copy(p2, p);
	r = vsnprintf(buf, 128, format, p);
	va_end(p);

	if (r < 128) {
		va_end(p2);
		*string_ptr = xstrdup(buf);
		return r;
	}

	*string_ptr = xmalloc(r+1);
	r = vsnprintf(*string_ptr, r+1, format, p2);
	va_end(p2);

	return r;
}
#endif

#ifndef HAVE_FDPRINTF
/* dprintf is now actually part of POSIX.1, but was only added in 2008 */
int fdprintf(int fd, const char *format, ...)
{
	va_list p;
	int r;
	char *string_ptr;

	va_start(p, format);
	r = vasprintf(&string_ptr, format, p);
	va_end(p);
	if (r >= 0) {
		r = full_write(fd, string_ptr, r);
		free(string_ptr);
	}
	return r;
}
#endif

#ifndef HAVE_MEMRCHR
/* Copyright (C) 2005 Free Software Foundation, Inc.
 * memrchr() is a GNU function that might not be available everywhere.
 * It's basically the inverse of memchr() - search backwards in a
 * memory block for a particular character.
 */
void* FAST_FUNC memrchr(const void *s, int c, size_t n)
{
	const char *start = s, *end = s;

	end += n - 1;

	while (end >= start) {
		if (*end == (char)c)
			return (void *) end;
		end--;
	}

	return NULL;
}
#endif

#ifndef HAVE_MKDTEMP
/* This is now actually part of POSIX.1, but was only added in 2008 */
char* FAST_FUNC mkdtemp(char *template)
{
	if (mktemp(template) == NULL || mkdir(template, 0700) != 0)
		return NULL;
	return template;
}
#endif

#ifndef HAVE_STRCASESTR
/* Copyright (c) 1999, 2000 The ht://Dig Group */
char* FAST_FUNC strcasestr(const char *s, const char *pattern)
{
	int length = strlen(pattern);

	while (*s) {
		if (strncasecmp(s, pattern, length) == 0)
			return (char *)s;
		s++;
	}
	return 0;
}
#endif
1	/*
2	* Replacements for common but usually nonstandard functions that aren't
3	* supplied by all platforms.
4	*
5	* Copyright (C) 2009 by Dan Fandrich <dan@coneharvesters.com>, et. al.
6	*
7	* Licensed under the GPL version 2, see the file LICENSE in this tarball.
8	*/
9	#include "libbb.h"
10
11	#ifndef HAVE_STRCHRNUL
12	char* FAST_FUNC strchrnul(const char *s, int c)
13	{
14	while (s != '\0' && s != c)
15	s++;
16	return (char*)s;
17	}
18	#endif
19
20	#ifndef HAVE_VASPRINTF
21	int FAST_FUNC vasprintf(char *string_ptr, const char format, va_list p)
22	{
23	int r;
24	va_list p2;
25	char buf[128];
26
27	va_copy(p2, p);
28	r = vsnprintf(buf, 128, format, p);
29	va_end(p);
30
31	if (r < 128) {
32	va_end(p2);
33	*string_ptr = xstrdup(buf);
34	return r;
35	}
36
37	*string_ptr = xmalloc(r+1);
38	r = vsnprintf(*string_ptr, r+1, format, p2);
39	va_end(p2);
40
41	return r;
42	}
43	#endif
44
45	#ifndef HAVE_FDPRINTF
46	/* dprintf is now actually part of POSIX.1, but was only added in 2008 */
47	int fdprintf(int fd, const char *format, ...)
48	{
49	va_list p;
50	int r;
51	char *string_ptr;
52
53	va_start(p, format);
54	r = vasprintf(&string_ptr, format, p);
55	va_end(p);
56	if (r >= 0) {
57	r = full_write(fd, string_ptr, r);
58	free(string_ptr);
59	}
60	return r;
61	}
62	#endif
63
64	#ifndef HAVE_MEMRCHR
65	/* Copyright (C) 2005 Free Software Foundation, Inc.
66	* memrchr() is a GNU function that might not be available everywhere.
67	* It's basically the inverse of memchr() - search backwards in a
68	* memory block for a particular character.
69	*/
70	void* FAST_FUNC memrchr(const void *s, int c, size_t n)
71	{
72	const char start = s, end = s;
73
74	end += n - 1;
75
76	while (end >= start) {
77	if (*end == (char)c)
78	return (void *) end;
79	end--;
80	}
81
82	return NULL;
83	}
84	#endif
85
86	#ifndef HAVE_MKDTEMP
87	/* This is now actually part of POSIX.1, but was only added in 2008 */
88	char* FAST_FUNC mkdtemp(char *template)
89	{
90	if (mktemp(template) == NULL \|\| mkdir(template, 0700) != 0)
91	return NULL;
92	return template;
93	}
94	#endif
95
96	#ifndef HAVE_STRCASESTR
97	/* Copyright (c) 1999, 2000 The ht://Dig Group */
98	char* FAST_FUNC strcasestr(const char s, const char pattern)
99	{
100	int length = strlen(pattern);
101
102	while (*s) {
103	if (strncasecmp(s, pattern, length) == 0)
104	return (char *)s;
105	s++;
106	}
107	return 0;
108	}
109	#endif