21 static SOCKET s
= INVALID_SOCKET
;
23 static void raw_size(void);
25 static int sb_opt
, sb_len
;
26 static char *sb_buf
= NULL
;
27 static int sb_size
= 0;
30 static void try_write (void) {
31 while (outbuf_head
!= outbuf_reap
) {
32 int end
= (outbuf_reap
< outbuf_head ? outbuf_head
: OUTBUF_SIZE
);
33 int len
= end
- outbuf_reap
;
36 ret
= send (s
, outbuf
+outbuf_reap
, len
, 0);
38 outbuf_reap
= (outbuf_reap
+ ret
) & OUTBUF_MASK
;
44 static void s_write (void *buf
, int len
) {
45 unsigned char *p
= buf
;
47 int new_head
= (outbuf_head
+ 1) & OUTBUF_MASK
;
48 if (new_head
!= outbuf_reap
) {
49 outbuf
[outbuf_head
] = *p
++;
50 outbuf_head
= new_head
;
56 static void c_write (char *buf
, int len
) {
57 from_backend(0, buf
, len
);
61 * Called to set up the raw connection. Will arrange for
62 * WM_NETEVENT messages to be passed to the specified window, whose
63 * window procedure should then call raw_msg().
65 * Returns an error message, or NULL on success.
67 * Also places the canonical host name into `realhost'.
69 static char *raw_init (HWND hwnd
, char *host
, int port
, char **realhost
) {
77 if ( (a
= inet_addr(host
)) == (unsigned long) INADDR_NONE
) {
78 if ( (h
= gethostbyname(host
)) == NULL
)
79 switch (WSAGetLastError()) {
80 case WSAENETDOWN
: return "Network is down";
81 case WSAHOST_NOT_FOUND
: case WSANO_DATA
:
82 return "Host does not exist";
83 case WSATRY_AGAIN
: return "Host not found";
84 default: return "gethostbyname: unknown error";
86 memcpy (&a
, h
->h_addr
, sizeof(a
));
87 *realhost
= h
->h_name
;
93 port
= 23; /* default telnet port */
98 s
= socket(AF_INET
, SOCK_STREAM
, 0);
99 if (s
== INVALID_SOCKET
)
100 switch (WSAGetLastError()) {
101 case WSAENETDOWN
: return "Network is down";
102 case WSAEAFNOSUPPORT
: return "TCP/IP support not present";
103 default: return "socket(): unknown error";
107 * Bind to local address.
109 addr
.sin_family
= AF_INET
;
110 addr
.sin_addr
.s_addr
= htonl(INADDR_ANY
);
111 addr
.sin_port
= htons(0);
112 if (bind (s
, (struct sockaddr
*)&addr
, sizeof(addr
)) == SOCKET_ERROR
)
113 switch (WSAGetLastError()) {
114 case WSAENETDOWN
: return "Network is down";
115 default: return "bind(): unknown error";
119 * Connect to remote address.
121 addr
.sin_addr
.s_addr
= htonl(a
);
122 addr
.sin_port
= htons((short)port
);
123 if (connect (s
, (struct sockaddr
*)&addr
, sizeof(addr
)) == SOCKET_ERROR
)
124 switch (WSAGetLastError()) {
125 case WSAENETDOWN
: return "Network is down";
126 case WSAECONNREFUSED
: return "Connection refused";
127 case WSAENETUNREACH
: return "Network is unreachable";
128 case WSAEHOSTUNREACH
: return "No route to host";
129 default: return "connect(): unknown error";
132 if (hwnd
&& WSAAsyncSelect (s
, hwnd
, WM_NETEVENT
, FD_READ
|
133 FD_WRITE
| FD_OOB
| FD_CLOSE
) == SOCKET_ERROR
)
134 switch (WSAGetLastError()) {
135 case WSAENETDOWN
: return "Network is down";
136 default: return "WSAAsyncSelect(): unknown error";
140 * We have no pre-session phase.
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
) {
168 if (WSAGETSELECTERROR(lParam
) != 0)
169 return -WSAGETSELECTERROR(lParam
);
171 switch (WSAGETSELECTEVENT(lParam
)) {
174 ret
= recv(s
, buf
, sizeof(buf
), 0);
175 if (ret
< 0 && WSAGetLastError() == WSAEWOULDBLOCK
)
177 if (ret
< 0) { /* any _other_ error */
180 return -10000-WSAGetLastError();
190 ret
= recv(s
, buf
, sizeof(buf
), 0);
194 ret
= recv(s
, buf
, 1, MSG_OOB
);
196 if (ret
< 0 && WSAGetLastError() != WSAEWOULDBLOCK
)
197 return -30000-WSAGetLastError();
200 if (outbuf_head
!= outbuf_reap
)
204 return 1; /* shouldn't happen, but WTF */
208 * Called to send data down the raw connection.
210 static void raw_send (char *buf
, int len
) {
212 if (s
== INVALID_SOCKET
)
219 * Called to set the size of the window
221 static void raw_size(void) {
227 * Send raw special codes.
229 static void raw_special (Telnet_Special code
) {
234 static SOCKET
raw_socket(void) { return s
; }
236 static int raw_sendok(void) { return 1; }
238 Backend raw_backend
= {