Convert the run command to use the StackFrame system
[macgdbp.git] / Source / GDBpConnection.m
1 /*
2 * MacGDBp
3 * Copyright (c) 2007 - 2009, Blue Static <http://www.bluestatic.org>
4 *
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.
8 *
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.
12 *
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
15 */
16
17 #import "GDBpConnection.h"
18 #import "AppDelegate.h"
19
20 NSString *kErrorOccurredNotif = @"GDBpConnection_ErrorOccured_Notification";
21
22 @interface GDBpConnection()
23 @property(readwrite, copy) NSString *status;
24
25 - (NSString *)createCommand:(NSString *)cmd;
26 - (NSXMLDocument *)processData:(NSString *)data;
27 - (StackFrame *)createStackFrame;
28 - (void)updateStatus;
29 @end
30
31 @implementation GDBpConnection
32
33 @synthesize socket, status;
34
35 /**
36 * Creates a new DebuggerConnection and initializes the socket from the given connection
37 * paramters.
38 */
39 - (id)initWithPort:(int)aPort session:(NSString *)aSession;
40 {
41 if (self = [super init])
42 {
43 port = aPort;
44 session = [aSession retain];
45 connected = NO;
46
47 // now that we have our host information, open the socket
48 socket = [[SocketWrapper alloc] initWithConnection:self];
49 [socket setDelegate:self];
50 [socket connect];
51
52 self.status = @"Connecting";
53
54 [[BreakpointManager sharedManager] setConnection:self];
55 }
56 return self;
57 }
58
59 /**
60 * Deallocates the object
61 */
62 - (void)dealloc
63 {
64 [socket release];
65 [session release];
66 [super dealloc];
67 }
68
69 /**
70 * Gets the port number
71 */
72 - (int)port
73 {
74 return port;
75 }
76
77 /**
78 * Gets the session name
79 */
80 - (NSString *)session
81 {
82 return session;
83 }
84
85 /**
86 * Returns the name of the remote host
87 */
88 - (NSString *)remoteHost
89 {
90 if (!connected)
91 {
92 return @"(DISCONNECTED)";
93 }
94 return [socket remoteHost];
95 }
96
97 /**
98 * Returns whether or not we have an active connection
99 */
100 - (BOOL)isConnected
101 {
102 return connected;
103 }
104
105 /**
106 * Called by SocketWrapper after the connection is successful. This immediately calls
107 * -[SocketWrapper receive] to clear the way for communication, though the information
108 * could be useful server information that we don't use right now.
109 */
110 - (void)socketDidAccept:(id)obj
111 {
112 connected = YES;
113 [socket receive];
114 [self updateStatus];
115
116 // register any breakpoints that exist offline
117 for (Breakpoint *bp in [[BreakpointManager sharedManager] breakpoints])
118 {
119 [self addBreakpoint:bp];
120 }
121
122 [[[NSApp delegate] debugger] startDebugger]; // this will just load the debugger to make it look active
123 }
124
125 /**
126 * Receives errors from the SocketWrapper and updates the display
127 */
128 - (void)errorEncountered:(NSString *)error
129 {
130 [[NSNotificationCenter defaultCenter]
131 postNotificationName:kErrorOccurredNotif
132 object:self
133 userInfo:[NSDictionary
134 dictionaryWithObject:error
135 forKey:@"NSString"
136 ]
137 ];
138 }
139
140 /**
141 * Reestablishes communication with the remote debugger so that a new connection doesn't have to be
142 * created every time you want to debug a page
143 */
144 - (void)reconnect
145 {
146 [socket close];
147 self.status = @"Connecting";
148 [socket connect];
149 }
150
151 /**
152 * Tells the debugger to continue running the script
153 */
154 - (StackFrame *)run
155 {
156 [socket send:[self createCommand:@"run"]];
157 [socket receive];
158
159 [self updateStatus];
160
161 if (!connected)
162 return nil;
163
164 return [self createStackFrame];
165 }
166
167 /**
168 * Tells the debugger to step into the current command.
169 */
170 - (StackFrame *)stepIn
171 {
172 [socket send:[self createCommand:@"step_into"]];
173 [socket receive];
174
175 StackFrame *frame = [self createStackFrame];
176 [self updateStatus];
177
178 return frame;
179 }
180
181 /**
182 * Tells the debugger to step out of the current context
183 */
184 - (StackFrame *)stepOut
185 {
186 [socket send:[self createCommand:@"step_out"]];
187 [socket receive];
188
189 StackFrame *frame = [self createStackFrame];
190 [self updateStatus];
191
192 return frame;
193 }
194
195 /**
196 * Tells the debugger to step over the current function
197 */
198 - (StackFrame *)stepOver
199 {
200 [socket send:[self createCommand:@"step_over"]];
201 [socket receive];
202
203 StackFrame *frame = [self createStackFrame];
204 [self updateStatus];
205
206 return frame;
207 }
208
209 /**
210 * Tells the debugger engine to get a specifc property. This also takes in the NSXMLElement
211 * that requested it so that the child can be attached.
212 */
213 - (NSArray *)getProperty:(NSString *)property
214 {
215 [socket send:[self createCommand:[NSString stringWithFormat:@"property_get -n \"%@\"", property]]];
216
217 NSXMLDocument *doc = [self processData:[socket receive]];
218
219 /*
220 <response>
221 <property> <!-- this is the one we requested -->
222 <property ... /> <!-- these are what we want -->
223 </property>
224 </repsonse>
225 */
226
227 // we now have to detach all the children so we can insert them into another document
228 NSXMLElement *parent = (NSXMLElement *)[[doc rootElement] childAtIndex:0];
229 NSArray *children = [parent children];
230 [parent setChildren:nil];
231 return children;
232 }
233
234 #pragma mark Breakpoints
235
236 /**
237 * Send an add breakpoint command
238 */
239 - (void)addBreakpoint:(Breakpoint *)bp
240 {
241 if (!connected)
242 {
243 return;
244 }
245
246 NSString *cmd = [self createCommand:[NSString stringWithFormat:@"breakpoint_set -t line -f %@ -n %i", [bp transformedPath], [bp line]]];
247 [socket send:cmd];
248 NSXMLDocument *info = [self processData:[socket receive]];
249 [bp setDebuggerId:[[[[info rootElement] attributeForName:@"id"] stringValue] intValue]];
250 }
251
252 /**
253 * Removes a breakpoint
254 */
255 - (void)removeBreakpoint:(Breakpoint *)bp
256 {
257 if (!connected)
258 {
259 return;
260 }
261
262 [socket send:[self createCommand:[NSString stringWithFormat:@"breakpoint_remove -d %i", [bp debuggerId]]]];
263 [socket receive];
264 }
265
266 #pragma mark Private
267
268 /**
269 * Helper method to create a string command with the -i <session> automatically tacked on
270 */
271 - (NSString *)createCommand:(NSString *)cmd
272 {
273 return [NSString stringWithFormat:@"%@ -i %@", cmd, session];
274 }
275
276 /**
277 * Helper function to parse the NSData into an NSXMLDocument
278 */
279 - (NSXMLDocument *)processData:(NSString *)data
280 {
281 if (data == nil)
282 return nil;
283
284 NSError *parseError = nil;
285 NSXMLDocument *doc = [[NSXMLDocument alloc] initWithXMLString:data options:0 error:&parseError];
286 if (parseError)
287 {
288 NSLog(@"Could not parse XML? --- %@", parseError);
289 NSLog(@"Error UserInfo: %@", [parseError userInfo]);
290 NSLog(@"This is the XML Document: %@", data);
291 return nil;
292 }
293
294 // check and see if there's an error
295 NSArray *error = [[doc rootElement] elementsForName:@"error"];
296 if ([error count] > 0)
297 {
298 [self errorEncountered:[[[[error objectAtIndex:0] children] objectAtIndex:0] stringValue]];
299 return nil;
300 }
301
302 return [doc autorelease];
303 }
304
305 /**
306 * Creates a StackFrame based on the current position in the debugger
307 */
308 - (StackFrame *)createStackFrame
309 {
310 // get the stack frame
311 [socket send:[self createCommand:@"stack_get -d 0"]];
312 NSXMLDocument *doc = [self processData:[socket receive]];
313 if (doc == nil)
314 return nil;
315
316 NSXMLElement *xmlframe = [[[doc rootElement] children] objectAtIndex:0];
317
318 // get the names of all the contexts
319 [socket send:[self createCommand:@"context_names -d 0"]];
320 NSXMLElement *contextNames = [[self processData:[socket receive]] rootElement];
321 NSMutableArray *variables = [NSMutableArray array];
322 for (NSXMLElement *context in [contextNames children])
323 {
324 NSString *name = [[context attributeForName:@"name"] stringValue];
325 int cid = [[[context attributeForName:@"id"] stringValue] intValue];
326
327 // fetch the contexts
328 [socket send:[self createCommand:[NSString stringWithFormat:@"context_get -d 0 -c %d", cid]]];
329 NSArray *addVars = [[[self processData:[socket receive]] rootElement] children];
330 if (addVars != nil && name != nil)
331 [variables addObjectsFromArray:addVars];
332 }
333
334 // get the source
335 NSString *filename = [[xmlframe attributeForName:@"filename"] stringValue];
336 [socket send:[self createCommand:[NSString stringWithFormat:@"source -f %@", filename]]];
337 NSString *source = [[[self processData:[socket receive]] rootElement] value]; // decode base64
338
339 // create stack frame
340 StackFrame *frame = [[StackFrame alloc]
341 initWithIndex:0
342 withFilename:filename
343 withSource:source
344 atLine:[[[xmlframe attributeForName:@"lineno"] stringValue] intValue]
345 inFunction:[[xmlframe attributeForName:@"where"] stringValue]
346 withVariables:variables
347 ];
348
349 return [frame autorelease];
350 }
351
352 /**
353 * Fetches the value of and sets the status instance variable
354 */
355 - (void)updateStatus
356 {
357 [socket send:[self createCommand:@"status"]];
358 NSXMLDocument *doc = [self processData:[socket receive]];
359 self.status = [[[[doc rootElement] attributeForName:@"status"] stringValue] capitalizedString];
360
361 if (status == nil || [status isEqualToString:@"Stopped"] || [status isEqualToString:@"Stopping"])
362 {
363 connected = NO;
364 [socket close];
365 self.status = @"Stopped";
366 }
367 }
368
369 @end