links/hpux.c

125 lines
2.5 KiB
C

#if defined(__hpux)
#include "cfg.h"
#include "com-defs.h"
#ifdef report
#include <stdio.h>
#include <unistd.h>
#endif
#include <string.h>
#include <errno.h>
#include <sys/types.h>
#include <sys/socket.h>
#ifndef HAVE_SOCKLEN_T
#define socklen_t int
#endif
#include "hpux.h"
union len_t {
int intlen;
socklen_t socklen;
};
static int hp_detect_length(int s)
{
static int mode_cache = -1;
union len_t u;
int val;
int r;
if (sizeof(int) == sizeof(socklen_t)) return 0;
if (mode_cache >= 0) return mode_cache;
memset(&u, 1, sizeof u);
r = getsockopt(s, SOL_SOCKET, SO_ERROR, (void *)&val, (void *)&u);
if (r) return -1;
if (u.socklen == sizeof(int)) {
#ifdef report
fprintf(stderr, "detected socklen argument\n");
sleep(1);
#endif
mode_cache = 1;
return 1;
} else if (u.intlen == sizeof(int)) {
#ifdef report
fprintf(stderr, "detected int argument\n");
sleep(1);
#endif
mode_cache = 0;
return 0;
} else {
fatal_exit("Could not detect HP-UX socklen argument type: %lx,%x", (long)u.socklen, u.intlen);
errno = EINVAL;
return -1;
}
}
int hp_accept(int s, struct sockaddr *addr, socklen_t *len)
{
union len_t u;
int mode, r;
if (addr == NULL || len == NULL) return accept(s, NULL, NULL);
if ((mode = hp_detect_length(s)) == -1) return -1;
memset(&u, 0, sizeof u);
if (!mode) u.intlen = *len;
else u.socklen = *len;
r = accept(s, addr, (void *)&u);
if (!mode) *len = u.intlen;
else *len = u.socklen;
return r;
}
int hp_getpeername(int s, struct sockaddr *addr, socklen_t *len)
{
union len_t u;
int mode, r;
if ((mode = hp_detect_length(s)) == -1) return -1;
memset(&u, 0, sizeof u);
if (!mode) u.intlen = *len;
else u.socklen = *len;
r = getpeername(s, addr, (void *)&u);
if (!mode) *len = u.intlen;
else *len = u.socklen;
return r;
}
int hp_getsockname(int s, struct sockaddr *addr, socklen_t *len)
{
union len_t u;
int mode, r;
if ((mode = hp_detect_length(s)) == -1) return -1;
memset(&u, 0, sizeof u);
if (!mode) u.intlen = *len;
else u.socklen = *len;
r = getsockname(s, addr, (void *)&u);
if (!mode) *len = u.intlen;
else *len = u.socklen;
return r;
}
int hp_getsockopt(int s, int level, int opt, void *val, socklen_t *len)
{
union len_t u;
int mode, r;
if (val == NULL || len == NULL) return getsockopt(s, level, opt, NULL, NULL);
if ((mode = hp_detect_length(s)) == -1) return -1;
memset(&u, 0, sizeof u);
if (!mode) u.intlen = *len;
else u.socklen = *len;
r = getsockopt(s, level, opt, val, (void *)&u);
if (!mode) *len = u.intlen;
else *len = u.socklen;
return r;
}
#else
typedef int hpux_c_no_empty_unit;
#endif