compat.c revision eddd9bf1a1369aea4a2715f6be1137da6d17d293
/* Copyright (c) 2002-2007 Dovecot authors, see the included COPYING file */
#include "config.h"
#undef HAVE_CONFIG_H
/* Linux needs the _XOPEN_SOURCE define, but others don't. It needs to be
defined before unistd.h, so we need the above config.h include hack.. */
#ifdef PREAD_WRAPPERS
# define _XOPEN_SOURCE 500 /* Linux */
#endif
#define IN_COMPAT_C
#include "lib.h"
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <unistd.h>
#include <syslog.h>
#ifndef INADDR_NONE
# define INADDR_NONE INADDR_BROADCAST
#endif
#if !defined (HAVE_STRCASECMP) && !defined (HAVE_STRICMP)
int my_strcasecmp(const char *s1, const char *s2)
{
while (*s1 != '\0' && i_toupper(*s1) == i_toupper(*s2)) {
s1++; s2++;
}
return i_toupper(*s1) - i_toupper(*s2);
}
int my_strncasecmp(const char *s1, const char *s2, size_t max_chars)
{
while (max_chars > 1 && *s1 != '\0' &&
i_toupper(*s1) == i_toupper(*s2)) {
s1++; s2++; max_chars--;
}
return i_toupper(*s1) - i_toupper(*s2);
}
#endif
#ifndef HAVE_INET_ATON
int my_inet_aton(const char *cp, struct in_addr *inp)
{
in_addr_t addr;
addr = inet_addr(cp);
if (addr == INADDR_NONE)
return 0;
inp->s_addr = addr;
return 1;
}
#endif
#ifndef HAVE_VSYSLOG
void my_vsyslog(int priority, const char *format, va_list args)
{
DSTACK_FRAME(
syslog(priority, "%s", t_strdup_vprintf(format, args));
);
}
#endif
#ifndef HAVE_GETPAGESIZE
int my_getpagesize(void)
{
#ifdef _SC_PAGESIZE
return sysconf(_SC_PAGESIZE);
#else
# ifdef __GNUC__
# warning Guessing page size to be 4096
# endif
return 4096;
#endif
}
#endif
#ifndef HAVE_WRITEV
ssize_t my_writev(int fd, const struct iovec *iov, int iov_len)
{
size_t written;
ssize_t ret;
int i;
written = 0;
for (i = 0; i < iov_len; i++, iov++) {
ret = write(fd, iov->iov_base, iov->iov_len);
if (ret < 0)
return -1;
written += ret;
if ((size_t)ret != iov->iov_len)
break;
}
if (written > SSIZE_T_MAX) {
errno = ERANGE;
return -1;
}
return (ssize_t)written;
}
#endif
#ifndef HAVE_PREAD
ssize_t my_pread(int fd, void *buf, size_t count, off_t offset)
{
ssize_t ret;
off_t old_offset;
old_offset = lseek(fd, 0, SEEK_CUR);
if (old_offset == -1)
return -1;
if (lseek(fd, offset, SEEK_SET) < 0)
return -1;
ret = read(fd, buf, count);
if (ret < 0)
return -1;
if (lseek(fd, old_offset, SEEK_SET) < 0)
return -1;
return ret;
}
ssize_t my_pwrite(int fd, const void *buf, size_t count, off_t offset)
{
ssize_t ret;
off_t old_offset;
old_offset = lseek(fd, 0, SEEK_CUR);
if (old_offset == -1)
return -1;
if (lseek(fd, offset, SEEK_SET) < 0)
return -1;
ret = write(fd, buf, count);
if (ret < 0)
return -1;
if (lseek(fd, old_offset, SEEK_SET) < 0)
return -1;
return ret;
}
#endif
#ifdef PREAD_WRAPPERS
ssize_t my_pread(int fd, void *buf, size_t count, off_t offset)
{
return pread(fd, buf, count, offset);
}
ssize_t my_pwrite(int fd, const void *buf, size_t count, off_t offset)
{
return pwrite(fd, buf, count, offset);
}
#endif
#ifndef HAVE_SETEUID
int my_seteuid(uid_t euid)
{
#ifdef HAVE_SETREUID
/* HP-UX at least doesn't have seteuid() but has setreuid() */
return setreuid(-1, euid);
#else
# error Missing seteuid functionality
#endif
}
#endif
#ifndef HAVE_SETEGID
int my_setegid(gid_t egid)
{
#ifdef HAVE_SETRESGID
/* HP-UX at least doesn't have setegid() but has setresgid() */
return setresgid(-1, egid, -1);
#else
# error Missing setegid functionality
#endif
}
#endif
#ifndef HAVE_LIBGEN_H
char *my_basename(char *path)
{
char *p;
/* note that this isn't POSIX-compliant basename() replacement.
too much trouble without any gain. */
p = strrchr(path, '/');
return p == NULL ? path : p + 1;
}
#endif
#ifndef HAVE_STRTOULL
unsigned long long int my_strtoull(const char *nptr, char **endptr, int base)
{
#ifdef HAVE_STRTOUQ
return strtouq(nptr, endptr, base);
#else
unsigned long ret = 0;
/* we support only base-10 in our fallback implementation.. */
i_assert(base == 10);
for (; *nptr != '\0'; nptr++) {
if (*nptr < '0' || *nptr > '9')
break;
ret = ret * 10 + (*nptr - '0');
}
if (endptr != NULL)
*endptr = (char *)nptr;
return ret;
#endif
}
#endif