Source/EvalController.m

   1 /*
   2  * MacGDBp
   3  * Copyright (c) 2011, 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 "EvalController.h"
  18
  19 #import "DebuggerBackEnd.h"
  20
  21 @implementation EvalController
  22
  23 @synthesize dataField = dataField_;
  24 @synthesize resultField = resultField_;
  25
  26 - (id)initWithBackEnd:(DebuggerBackEnd*)backEnd
  27 {
  28   if (self = [super initWithWindowNibName:@"Eval"]) {
  29     backEnd_ = backEnd;
  30   }
  31   return self;
  32 }
  33
  34 - (void)dealloc
  35 {
  36   self.dataField = nil;
  37   self.resultField = nil;
  38   [super dealloc];
  39 }
  40
  41 - (void)runModalForWindow:(NSWindow*)parent
  42 {
  43   [NSApp beginSheet:[self window]
  44      modalForWindow:parent
  45       modalDelegate:self
  46      didEndSelector:@selector(sheetDidEnd:returnCode:contextInfo:)
  47         contextInfo:nil];
  48 }
  49
  50 - (void)sheetDidEnd:(NSWindow*)sheet
  51          returnCode:(NSInteger)returnCode
  52         contextInfo:(void*)contextInfo
  53 {
  54   [self autorelease];
  55 }
  56
  57 - (IBAction)evaluateScript:(id)sender
  58 {
  59   NSString* code = [self.dataField stringValue];
  60   [backEnd_ evalScript:code callback:^(NSString* result) {
  61     [self.resultField setStringValue:result];
  62   }];
  63 }
  64
  65 - (IBAction)closeWindow:(id)sender
  66 {
  67   [self close];
  68   [NSApp endSheet:[self window]];
  69 }
  70
  71 @end