marignotti/mbind.c
2012-05-14 23:13:08 -04:00

74 lines
1.6 KiB
C

#include "marignotti.h"
#include <gno/kerntool.h>
#include <errno.h>
#include <string.h>
#include <sys/socket.h>
#include "s16debug.h"
#pragma noroot
#pragma optimize 79
int mbind(Entry *e, void *p1, void *p2, void *p3, void *p4, void *p5)
{
Word port;
Word t;
Word terr;
xsockaddr_in *addr = (xsockaddr_in *)p3;
int addrlen = p4 ? *(int *)p4 : 0;
port = addr->sin_port;
asm {
lda <port
xba
sta <port
}
if (Debug > 0)
{
union xsplit s;
s.i32 = addr->sin_addr;
s16_debug_printf("bind family = %d address = %d.%d.%d.%d port = %d",
addr->sin_family,
s.i8[0], s.i8[1], s.i8[2], s.i8[3],
port);
}
if (e->_TYPE != SOCK_STREAM)
return EOPNOTSUPP;
if (addrlen < 8 || !addr) return EINVAL;
if (addr->sin_family != AF_INET) return EINVAL;
// don't re-bind if listen() or connect() called.
IncBusy();
terr = TCPIPStatusTCP(e->ipid, &e->sr);
if (t) terr = t;
e->terr = t;
DecBusy();
if (e->sr.srState != TCPSCLOSED) return EINVAL;
// address component is ignored -- only port is used.
// bind w/ port 0 means the system should pick a port.
// marinetti picks a port at TCPIPLogin time, so no need
// to do anything here.
// Note: TCPIPSetSourcePort does not check if the port is free.
// todo -- return EACCES if reserved port && !root.
if (port)
{
IncBusy();
TCPIPSetSourcePort(e->ipid, port);
DecBusy();
}
return 0;
}