arch/all-mingw32/bsdsocket/setsockopt.c

   1 /*
   2     Copyright © 2000-2010, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8
   9 #include "bsdsocket_intern.h"
  10 #include "bsdsocket_util.h"
  11 #include "socket_intern.h"
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16
  17         AROS_LH5(int, setsockopt,
  18
  19 /*  SYNOPSIS */
  20         AROS_LHA(int,    s,       D0),
  21         AROS_LHA(int,    level,   D1),
  22         AROS_LHA(int,    optname, D2),
  23         AROS_LHA(void *, optval,  A0),
  24         AROS_LHA(int,    optlen,  D3),
  25
  26 /*  LOCATION */
  27         struct TaskBase *, taskBase, 15, BSDSocket)
  28
  29 /*  FUNCTION
  30
  31     INPUTS
  32
  33     RESULT
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42
  43     INTERNALS
  44
  45     HISTORY
  46
  47 *****************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     struct Socket *sd = GetSocket(s, taskBase);
  52     int res = -1;
  53     int err;
  54
  55     if (sd)
  56     {
  57         struct bsdsocketBase *SocketBase = taskBase->glob;
  58
  59         Forbid();
  60
  61         res = WSsetsockopt(sd->s, level, optname, optval, optlen);
  62         if (res)
  63             err = WSAGetLastError() - WSABASEERR;
  64
  65         Permit();
  66
  67         if (res)
  68             SetError(err, taskBase);
  69     }
  70
  71     return res;
  72
  73     AROS_LIBFUNC_EXIT
  74
  75 } /* setsockopt */