在IBM i (OS/400)上使用RPGLE编写WebSocket服务器

本示例展示了如何使用RPGLE在IBM i (OS/400)上编写WebSocket服务器，以及如何与客户端进行通信。

// 监听端口
exec SQL call qp2zlisten('12345') PARM('AF_INET', 'SOCK_STREAM', 'IPPROTO_TCP')
// 接受连接
exec SQL call qp2zaccept(PARM(X'0002', 0, 0, %len(%addr(cliaddr)), %Addr(cliaddr)))
// 接收消息
read(fd, buffer, len);
// 发送消息
write(fd, buffer, len);

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com