15 static SOCKET s = INVALID_SOCKET;
17 #define iswritable(x) ( (x) != IAC && (x) != CR )
19 static void raw_size(void);
21 static int sb_opt, sb_len;
22 static char *sb_buf = NULL;
23 static int sb_size = 0;
26 static void try_write (void) {
27 while (outbuf_head != outbuf_reap) {
28 int end = (outbuf_reap < outbuf_head ? outbuf_head : OUTBUF_SIZE);
29 int len = end - outbuf_reap;
32 ret = send (s, outbuf+outbuf_reap, len, 0);
34 outbuf_reap = (outbuf_reap + ret) & OUTBUF_MASK;
40 static void s_write (void *buf, int len) {
41 unsigned char *p = buf;
43 int new_head = (outbuf_head + 1) & OUTBUF_MASK;
44 if (new_head != outbuf_reap) {
45 outbuf[outbuf_head] = *p++;
46 outbuf_head = new_head;
52 static void c_write (char *buf, int len) {
54 int new_head = (inbuf_head + 1) & INBUF_MASK;
55 if (new_head != inbuf_reap) {
56 inbuf[inbuf_head] = *buf++;
57 inbuf_head = new_head;
60 if( inbuf_head == inbuf_reap ) len++; else break;
66 * Called to set up the raw connection. Will arrange for
67 * WM_NETEVENT messages to be passed to the specified window, whose
68 * window procedure should then call raw_msg().
70 * Returns an error message, or NULL on success.
72 * Also places the canonical host name into `realhost'.
74 static char *raw_init (HWND hwnd, char *host, int port, char **realhost) {
82 if ( (a = inet_addr(host)) == (unsigned long) INADDR_NONE) {
83 if ( (h = gethostbyname(host)) == NULL)
84 switch (WSAGetLastError()) {
85 case WSAENETDOWN: return "Network is down";
86 case WSAHOST_NOT_FOUND: case WSANO_DATA:
87 return "Host does not exist";
88 case WSATRY_AGAIN: return "Host not found";
89 default: return "gethostbyname: unknown error";
91 memcpy (&a, h->h_addr, sizeof(a));
92 *realhost = h->h_name;
98 port = 23; /* default telnet port */
103 s = socket(AF_INET, SOCK_STREAM, 0);
104 if (s == INVALID_SOCKET)
105 switch (WSAGetLastError()) {
106 case WSAENETDOWN: return "Network is down";
107 case WSAEAFNOSUPPORT: return "TCP/IP support not present";
108 default: return "socket(): unknown error";
112 * Bind to local address.
114 addr.sin_family = AF_INET;
115 addr.sin_addr.s_addr = htonl(INADDR_ANY);
116 addr.sin_port = htons(0);
117 if (bind (s, (struct sockaddr *)&addr, sizeof(addr)) == SOCKET_ERROR)
118 switch (WSAGetLastError()) {
119 case WSAENETDOWN: return "Network is down";
120 default: return "bind(): unknown error";
124 * Connect to remote address.
126 addr.sin_addr.s_addr = htonl(a);
127 addr.sin_port = htons((short)port);
128 if (connect (s, (struct sockaddr *)&addr, sizeof(addr)) == SOCKET_ERROR)
129 switch (WSAGetLastError()) {
130 case WSAENETDOWN: return "Network is down";
131 case WSAECONNREFUSED: return "Connection refused";
132 case WSAENETUNREACH: return "Network is unreachable";
133 case WSAEHOSTUNREACH: return "No route to host";
134 default: return "connect(): unknown error";
137 if (WSAAsyncSelect (s, hwnd, WM_NETEVENT, FD_READ |
138 FD_WRITE | FD_OOB | FD_CLOSE) == SOCKET_ERROR)
139 switch (WSAGetLastError()) {
140 case WSAENETDOWN: return "Network is down";
141 default: return "WSAAsyncSelect(): unknown error";
148 * Process a WM_NETEVENT message. Will return 0 if the connection
149 * has closed, or <0 for a socket error.
151 static int raw_msg (WPARAM wParam, LPARAM lParam) {
156 * Because reading less than the whole of the available pending
157 * data can generate an FD_READ event, we need to allow for the
158 * possibility that FD_READ may arrive with FD_CLOSE already in
159 * the queue; so it's possible that we can get here even with s
160 * invalid. If so, we return 1 and don't worry about it.
162 if (s == INVALID_SOCKET)
165 if (WSAGETSELECTERROR(lParam) != 0)
166 return -WSAGETSELECTERROR(lParam);
168 switch (WSAGETSELECTEVENT(lParam)) {
171 ret = recv(s, buf, sizeof(buf), 0);
172 if (ret < 0 && WSAGetLastError() == WSAEWOULDBLOCK)
174 if (ret < 0) /* any _other_ error */
175 return -10000-WSAGetLastError();
184 ret = recv(s, buf, sizeof(buf), 0);
188 ret = recv(s, buf, 1, MSG_OOB);
190 if (ret < 0 && WSAGetLastError() != WSAEWOULDBLOCK)
191 return -30000-WSAGetLastError();
194 if (outbuf_head != outbuf_reap)
198 return 1; /* shouldn't happen, but WTF */
202 * Called to send data down the raw connection.
204 static void raw_send (char *buf, int len) {
206 if (s == INVALID_SOCKET)
213 * Called to set the size of the window
215 static void raw_size(void) {
221 * Send raw special codes.
223 static void raw_special (Telnet_Special code) {
228 Backend raw_backend = {