3 * Copyright (c) 2007 - 2008, Blue Static <http://www.bluestatic.org>
5 * This program is free software; you can redistribute it and/or modify it under the terms of the GNU
6 * General Public License as published by the Free Software Foundation; either version 2 of the
7 * License, or (at your option) any later version.
9 * This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without
10 * even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11 * General Public License for more details.
13 * You should have received a copy of the GNU General Public License along with this program; if not,
14 * write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
17 #import "SocketWrapper.h"
18 #include <sys/types.h>
19 #include <sys/socket.h>
20 #include <netinet/in.h>
21 #include <arpa/inet.h>
24 @interface SocketWrapper (Private
)
26 - (void)error
:(NSString
*)msg
;
30 @implementation SocketWrapper
33 * Initializes the socket wrapper with a host and port
35 - (id)initWithConnection
:(DebuggerConnection
*)cnx
37 if (self = [super init
])
40 port
= [connection port
];
46 * Close our socket and clean up anything else
54 * Returns the delegate
62 * Sets the delegate but does *not* retain it
64 - (void)setDelegate
:(id)aDelegate
70 * Returns the name of the host to whom we are currently connected.
72 - (NSString
*)remoteHost
78 * Connects to a socket on the port specified during init. This will dispatch another thread to do the
79 * actual waiting. Delegate notifications are posted along the way to let the client know what is going on.
83 [NSThread detachNewThreadSelector
:@selector(connect
:) toTarget
:self withObject
:nil];
87 * This does the actual dirty work (in a separate thread) of connecting to a socket
89 - (void)connect
:(id)obj
91 // create an INET socket that we'll be listen()ing on
92 int socketOpen
= socket(PF_INET
, SOCK_STREAM
, 0);
94 // create our address given the port
95 struct sockaddr_in address
;
96 address.sin_family
= AF_INET
;
97 address.sin_port
= htons(port
);
98 address.sin_addr.s_addr
= htonl(INADDR_ANY
);
99 memset(address.sin_zero
, '\0', sizeof(address.sin_zero
));
101 // allow an already-opened socket to be reused
103 setsockopt(socketOpen
, SOL_SOCKET
, SO_REUSEADDR
, &yes
, sizeof(int));
105 // bind the socket... and don't give up until we've tried for a while
107 while (bind(socketOpen
, (struct sockaddr
*)&address
, sizeof(address
)) < 0)
112 [self error
:@
"Could not bind to socket"];
115 NSLog(@
"couldn't bind to the socket... trying again in 5");
120 // now we just have to keep our ears open
121 if (listen(socketOpen
, 0) == -1)
123 [self error
:@
"Could not use bound socket for listening"];
126 // accept a connection
127 struct sockaddr_in remoteAddress
;
128 socklen_t remoteAddressLen
= sizeof(remoteAddress
);
129 sock
= accept(socketOpen
, (struct sockaddr
*)&remoteAddress
, &remoteAddressLen
);
133 [self error
:@
"Client failed to accept remote socket"];
137 // we're done listening now that we have a connection
140 struct sockaddr_in addr
;
141 socklen_t addrLength
;
142 if (getpeername(sock
, (struct sockaddr
*)&addr
, &addrLength
) < 0)
144 [self error
:@
"Could not get remote hostname."];
146 char *name
= inet_ntoa(addr.sin_addr
);
147 hostname
= [NSString stringWithUTF8String
:name
];
149 [connection performSelectorOnMainThread
:@selector(socketDidAccept
:) withObject
:nil waitUntilDone
:NO
];
153 * Reads from the socket and returns the result as a NSString (because it's always going to be XML). Be aware
154 * that the underlying socket recv() call will *wait* for the server to send a message, so be sure that this
155 * is used either in a threaded environment so the interface does not hang, or when you *know* the server
156 * will return something (which we almost always do). Returns the data that was received from the socket.
158 - (NSString
*)receive
163 // do our initial recv() call to get (hopefully) all the data and the lengh of the packet
164 int recvd
= recv(sock
, &buffer
, sizeof(buffer
), 0);
166 // take the received data and put it into an NSData
167 NSMutableString
*str
= [NSMutableString string
];
169 // strip the length from the packet, and clear the null byte then add it to the NSData
170 char packetLength
[8];
171 memset(packetLength
, '\0', sizeof(packetLength
));
173 while (buffer
[i
] != '\0')
175 packetLength
[i
] = buffer
[i
];
179 // we also want the null byte, so move us up 1
182 // the total length of the full transmission
183 int length
= atoi(packetLength
);
185 // move the packet part of the received data into it's own char[]
186 char packet
[sizeof(buffer
)];
187 memset(packet
, '\0', sizeof(packet
));
188 memmove(packet
, &buffer
[i
], recvd
- i
);
190 // convert bytes to NSString
191 [str appendString
:[[NSString alloc
] initWithCString
:packet length
:recvd
- i
]];
193 // check if we have a partial packet
194 if (length
+ i
> sizeof(buffer
))
196 while (recvd
< length
)
198 int latest
= recv(sock
, &buffer
, sizeof(buffer
), 0);
201 [self error
:@
"Socket closed or could not be read"];
204 [str appendString
:[[NSString alloc
] initWithCString
:buffer length
:latest
]];
209 NSString
*tmp
= [str stringByTrimmingCharactersInSet
:[NSCharacterSet whitespaceAndNewlineCharacterSet
]]; // strip whitespace
210 return [tmp substringToIndex
:[tmp length
] - 1]; // don't want the null byte
214 * Sends a given NSString over the socket. Returns YES on complete submission.
216 - (BOOL)send
:(NSString
*)data
218 data
= [NSString stringWithFormat
:@
"%@\0", data
];
219 int sent
= send(sock
, [data UTF8String
], [data length
], 0);
222 [self error
:@
"Failed to write data to socket"];
225 if (sent
< [data length
])
227 // TODO - do we really need to worry about partial sends with the lenght of our commands?
228 NSLog(@
"FAIL: only partial packet was sent; sent %d bytes", sent
);
236 * Helper method that just calls -[DebuggerWindowController setError:] on the main thread
238 - (void)error
:(NSString
*)msg
240 [delegate performSelectorOnMainThread
:@selector(errorEncountered
:) withObject
:msg waitUntilDone
:NO
];