sane_socketpair.c

[詳解]

/*++
/* NAME
/*  sane_socketpair 3
/* SUMMARY
/*  sanitize socketpair() error returns
/* SYNOPSIS
/*  #include <sane_socketpair.h>
/*
/*  int sane_socketpair(domain, type, protocol, result)
/*  int domain;
/*  int type;
/*  int protocol;
/*  int *result;
/* DESCRIPTION
/*  sane_socketpair() implements the socketpair(2) socket call, and
/*  skips over silly error results such as EINTR.
/* BUGS
/*  Bizarre systems may have other harmless error results. Such
/*  systems encourage programmers to ignore error results, and
/*  penalize programmers who code defensively.
/* LICENSE
/* .ad
/* .fi
/*  The Secure Mailer license must be distributed with this software.
/* AUTHOR(S)
/*  Wietse Venema
/*  IBM T.J. Watson Research
/*  P.O. Box 704
/*  Yorktown Heights, NY 10598, USA
/*--*/

/* System library. */

#include "sys_defs.h"
#include <sys/socket.h>
#include <unistd.h>
#include <errno.h>

/* Utility library. */

#include "msg.h"
#include "sane_socketpair.h"

/* sane_socketpair - sanitize socketpair() error returns */

int     sane_socketpair(int domain, int type, int protocol, int *result)
{
    static int socketpair_ok_errors[] = {
    EINTR,
    0,
    };
    int     count;
    int     err;
    int     ret;

    /*
     * Solaris socketpair() can fail with EINTR.
     */
    while ((ret = socketpair(domain, type, protocol, result)) < 0) {
    for (count = 0; /* void */ ; count++) {
        if ((err = socketpair_ok_errors[count]) == 0)
        return (ret);
        if (errno == err) {
        msg_warn("socketpair: %m (trying again)");
        sleep(1);
        break;
        }
    }
    }
    return (ret);
}