libs-base/Examples/port-server.m

29 lines
535 B
Mathematica
Raw Normal View History

#include <stdio.h>
#include <gnustep/base/SocketPort.h>
#define MSG "Hello back to you, from a server SocketPort"
int main()
{
id packet;
id p = [TcpPort newLocalWithNumber:3];
id rp;
int len;
char *buf;
for (;;)
{
packet = [p receivePacketWithTimeout: -1];
len = [p streamBufferLength];
buf = [p streamBuffer];
if (len >= 0 && len < 32)
buf[l] = '\0';
printf("(length %d): %s\n", len, buf);
[p sendPacket:MSG length:strlen(MSG)
toPort:rp
timeout:15000];
}
exit(0);
}