src/lib/compat.c

	compat.c revision 9f9dc85ef78dd2f431da00f26d292a0ed4f07350
/* Copyright (c) 2002-2003 Timo Sirainen */

#include "config.h"
#undef HAVE_CONFIG_H

#ifdef PREAD_WRAPPERS
#  define _XOPEN_SOURCE 500 /* Linux */
#endif

#define IN_COMPAT_C
#include "lib.h"

#include <stdio.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 > 0 && *s1 != '\0' &&
           i_toupper(*s1) == i_toupper(*s2)) {
        s1++; s2++;
    }

        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)
{
    t_push();
    syslog(priority, "%s", t_strdup_vprintf(format, args));
    t_pop();
}
#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