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
= {