1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
|
#include <errno.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include <assert.h>
#if EMSCRIPTEN
#include <emscripten.h>
#endif
#include "test_sockets_msg.h"
// message to send to the server
#ifndef MESSAGE
#define MESSAGE "pingtothepong"
#endif
typedef enum {
MSG_READ,
MSG_WRITE
} msg_state_t;
typedef struct {
int fd;
msg_t msg;
msg_state_t state;
} server_t;
server_t server;
msg_t echo_msg;
int echo_read;
int echo_wrote;
void finish(int result) {
close(server.fd);
#if EMSCRIPTEN
REPORT_RESULT();
#endif
exit(result);
}
void main_loop(void *arg) {
static char out[1024*2];
static int pos = 0;
fd_set fdr;
fd_set fdw;
int res;
// make sure that server.fd is ready to read / write
FD_ZERO(&fdr);
FD_ZERO(&fdw);
FD_SET(server.fd, &fdr);
FD_SET(server.fd, &fdw);
res = select(64, &fdr, &fdw, NULL, NULL);
if (res == -1) {
perror("select failed");
finish(EXIT_FAILURE);
}
if (server.state == MSG_READ) {
if (!FD_ISSET(server.fd, &fdr)) {
return;
}
// as a test, confirm with ioctl that we have data available
// after selecting
int available;
res = ioctl(server.fd, FIONREAD, &available);
assert(res != -1);
assert(available);
res = do_msg_read(server.fd, &server.msg, echo_read, 0, NULL, NULL);
if (res != -1) echo_read += res;
// once we've read the entire message, validate it
if (echo_read >= server.msg.length) {
assert(!strcmp(server.msg.buffer, MESSAGE));
finish(EXIT_SUCCESS);
}
} else {
if (!FD_ISSET(server.fd, &fdw)) {
return;
}
res = do_msg_write(server.fd, &echo_msg, echo_wrote, 0, NULL, 0);
if (res != -1) echo_wrote += res;
// once we're done writing the message, read it back
if (echo_wrote >= echo_msg.length) {
server.state = MSG_READ;
}
}
}
int main() {
struct sockaddr_in addr;
int res;
memset(&server, 0, sizeof(server_t));
server.state = MSG_WRITE;
// setup the message we're going to echo
memset(&echo_msg, 0, sizeof(msg_t));
echo_msg.length = strlen(MESSAGE) + 1;
echo_msg.buffer = malloc(echo_msg.length);
strncpy(echo_msg.buffer, MESSAGE, echo_msg.length);
// create the socket and set to non-blocking
#if !USE_UDP
server.fd = socket(PF_INET, SOCK_STREAM, IPPROTO_TCP);
#else
server.fd = socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP);
#endif
if (server.fd == -1) {
perror("cannot create socket");
finish(EXIT_FAILURE);
}
fcntl(server.fd, F_SETFL, O_NONBLOCK);
// connect the socket
memset(&addr, 0, sizeof(addr));
addr.sin_family = AF_INET;
addr.sin_port = htons(SOCKK);
if (inet_pton(AF_INET, "127.0.0.1", &addr.sin_addr) != 1) {
perror("inet_pton failed");
finish(EXIT_FAILURE);
}
res = connect(server.fd, (struct sockaddr *)&addr, sizeof(addr));
if (res == -1 && errno != EINPROGRESS) {
perror("connect failed");
finish(EXIT_FAILURE);
}
#if EMSCRIPTEN
emscripten_set_main_loop(main_loop, 0, 0);
#else
while (1) main_loop(NULL);
#endif
return EXIT_SUCCESS;
}
|