packages feed

socket-sctp-0.2.0.0: src/System/Socket/Protocol/SCTP/hs_sctp.c

#include <errno.h>
#include "hs_sctp.h"

int hs_sctp_sendmsg(int sd, const void * msg, size_t len,
                    struct sockaddr *to, socklen_t tolen,
                    uint32_t ppid, uint32_t flags,
                    uint16_t stream_no, uint32_t timetolive,
                    uint32_t context, int *err) {
  int i = sctp_sendmsg(sd, msg, len, to, tolen, ppid, flags,
                       stream_no, timetolive, context);
  *err = errno;
  return i;
}

int hs_sctp_recvmsg(int sd, void * msg, size_t len,
                    struct sockaddr * from, socklen_t * fromlen,
                    struct sctp_sndrcvinfo * sinfo, int * msg_flags,
                    int *err) {
  int i = sctp_recvmsg(sd, msg, len, from, fromlen, sinfo, msg_flags);
  *err = errno;
  return i;
}