Changeset 19 for trunk/Cocoa/F-Script Anywhere/Source/FSAViewAssociationController.m

Timestamp:

10/20/02 05:39:33 (20 years ago)

Author:

Nicholas Riley

Message:

F-Script Anywhere 1.1.6d1

File:

• trunk/Cocoa/F-Script Anywhere/Source/FSAViewAssociationController.m (modified) (13 diffs)

trunk/Cocoa/F-Script Anywhere/Source/FSAViewAssociationController.m

@@ -27 +27 @@
 #import "FSAViewAssociationController.h"
 #import "FSAController.h"
+#import "FSAWindowManager.h"
 #import "FSAnywhere.h"
 #import <FScript/FSInterpreter.h>
@@ -43 +44 @@
 
     if (self != nil) {
+        NSImage *bullseyeImage = [[NSImage alloc] initByReferencingFile: [[NSBundle bundleForClass: [self class]] pathForResource: @"Bullseye menu cursor" ofType: @"tiff"]];
+        NSString *label = [fsa interpreterLabel];
+        
         interpreter = [[[fsa interpreterView] interpreter] retain];
         system = [fsa system];
-        [self window];
+        [[self window] setResizeIncrements: NSMakeSize(1, 12)];
+        if (label != nil) [[self window] setTitle: [NSString stringWithFormat: @"%@: %@", [[self window] title], label]];
+        bullseyeCursor = [[NSCursor alloc] initWithImage: bullseyeImage hotSpot: NSMakePoint(6, 7)];
         [[NSNotificationCenter defaultCenter] addObserver: self selector: @selector(controlTextDidChange:) name: NSControlTextDidChangeNotification object: variableNameField];
         [[captureButton cell] setShowsStateBy: NSContentsCellMask | NSChangeGrayCellMask];
+        [captureButton setState: NSOffState];
         [self update: nil];
     }
@@ -56 +63 @@
 {
     [viewHierarchyMenu release];
-    [selectedView release];
+    [selectedElement release];
     [interpreter release];
+    [bullseyeCursor release];
     [[NSNotificationCenter defaultCenter] removeObserver: self];
     [super dealloc];
@@ -66 +74 @@
     NSString *variableName = [variableNameField stringValue];
     BOOL canAssignToVariable = NO;
-    [browseButton setEnabled: selectedView != nil];
+    [browseButton setEnabled: selectedElement != nil];
     [statusField setStringValue: @""];
     if ([variableName length] != 0) {
         if (![Compiler isValidIndentifier: variableName]) {
             [statusField setStringValue: @"Invalid name: contains spaces, punctuation or non-ASCII characters"];
-        } else if (selectedView != nil) {
+        } else if (selectedElement != nil) {
             [statusField setStringValue: @"Click ÒAssociateÓ to assign to this variable"];
             canAssignToVariable = YES;
@@ -80 +88 @@
 }
 
-- (void)stopCapturing;
+- (void)stopCapturingVoluntarily:(BOOL)voluntary;
 {
     FSALog(@"stopping capture");
+    [[NSNotificationCenter defaultCenter] removeObserver: self name: NSMenuWillSendActionNotification object: nil];
     [captureButton setState: NSOffState];
-    [statusField setStringValue: @""];
     [self update: nil];
-    [variableNameField becomeFirstResponder];
+    if (voluntary) {
+        FSALog(@"voluntary!");
+        [[self window] makeKeyAndOrderFront: self];
+        [bullseyeCursor pop];
+        [variableNameField becomeFirstResponder];        
+    }
+}
+
+- (void)_addElement:(id)element withLabel:(NSString *)label toSubmenuForItem:(NSMenuItem *)item;
+{
+    NSMenu *submenu = [item submenu];
+    NSMenuItem *subItem;
+    if (submenu == nil) {
+        id superElement = [item representedObject];
+        submenu = [[NSMenu alloc] initWithTitle: @""];
+        subItem = [submenu addItemWithTitle: NSStringFromClass([superElement class])
+                                     action: @selector(elementSelected:)
+                              keyEquivalent: @""];
+        [subItem setTarget: self];
+        [subItem setRepresentedObject: superElement];
+        [item setSubmenu: submenu];
+        [submenu release];
+    }
+    [submenu addItem: [NSMenuItem separatorItem]];
+    [submenu addItemWithTitle: label action: nil keyEquivalent: @""];
+    subItem = [submenu addItemWithTitle: [@"  "
+                stringByAppendingString: NSStringFromClass([element class])]
+                                           action: @selector(elementSelected:)
+                                    keyEquivalent: @""];
+    [subItem setTarget: self];
+    [subItem setRepresentedObject: element];
+}
+
+- (void)_addValueForSelector:(SEL)sel withLabel:(NSString *)label toSubmenuForItem:(NSMenuItem *)item;
+{
+    id obj = [item representedObject];
+    if ([obj respondsToSelector: sel]) {
+        id value = [obj performSelector: sel];
+        if (value == nil) return;
+        [self _addElement: value withLabel: label toSubmenuForItem: item];
+    }
 }
 
@@ -99 +147 @@
     [item setTarget: self];
     [item setRepresentedObject: element];
+    [self _addValueForSelector: @selector(windowController) withLabel: @"Window Controller" toSubmenuForItem: item];
+    [self _addValueForSelector: @selector(delegate) withLabel: @"Delegate" toSubmenuForItem: item];
+    [self _addValueForSelector: @selector(dataSource) withLabel: @"Data Source" toSubmenuForItem: item];
+    [self _addValueForSelector: @selector(target) withLabel: @"Target" toSubmenuForItem: item];
+    [self _addValueForSelector: @selector(cell) withLabel: @"Cell" toSubmenuForItem: item];
 }
 
@@ -106 +159 @@
     NSView *view, *superView = nil, *contentView;
     NSWindow *eventWindow;
-
-    FSALog(@"capturing one");
+    static unsigned captureCount = 0;
+    unsigned capture = captureCount++;
+    
+    FSALog(@"%4u>capturing one", capture);
     [captureButton setState: NSOnState];
-
-    event = [NSApp nextEventMatchingMask: NSLeftMouseDownMask | NSRightMouseDownMask | NSKeyUpMask
+    [bullseyeCursor push];
+
+captureElement:
+    [bullseyeCursor set];
+    FSALog(@"%4u waiting for event...", capture);
+    [[NSNotificationCenter defaultCenter] addObserver: self selector: @selector(menuWillSendAction:) name: NSMenuWillSendActionNotification object: nil];
+    event = [NSApp nextEventMatchingMask: NSLeftMouseDownMask | NSRightMouseDownMask | NSOtherMouseDownMask | NSKeyUpMask | NSAppKitDefinedMask
                                untilDate: [NSDate distantFuture]
                                   inMode: NSEventTrackingRunLoopMode
                                  dequeue: YES];
+    FSALog(@"%4u got %@", capture, event);
+    [[NSNotificationCenter defaultCenter] removeObserver: self name: NSMenuWillSendActionNotification object: nil];
+    if ([event type] == NSAppKitDefined) {
+        if ([event subtype] == NSApplicationDeactivatedEventType) {
+            [NSApp discardEventsMatchingMask: NSAnyEventMask beforeEvent: event];
+            [self stopCapturingVoluntarily: NO];
+            [NSApp sendEvent: event];
+            return;
+        }
+        goto captureElement;
+    }
     if ([event type] == NSKeyUp) {
-        [self stopCapturing];
+        [NSApp discardEventsMatchingMask: NSAnyEventMask & ~NSKeyUpMask beforeEvent: event];
+        FSALog(@"%4u<stop capture [key up]", capture);
+        [self stopCapturingVoluntarily: YES];
         return;
     }
@@ -125 +198 @@
         view = [[contentView superview] hitTest: [event locationInWindow]];
         if (view == captureButton) {
-            [self stopCapturing];
+            [NSApp discardEventsMatchingMask: NSAnyEventMask & ~NSKeyUpMask beforeEvent: event];
+            FSALog(@"%4u<stop capture [capture button]", capture);
+            [self stopCapturingVoluntarily: YES];
+            NS_VOIDRETURN;
+        }
+        if (view == nil) {
+            [self captureOneView];
             NS_VOIDRETURN;
         }
@@ -144 +223 @@
     NS_ENDHANDLER
     [NSMenu popUpContextMenu: viewHierarchyMenu withEvent: event forView: view];
-    if ([captureButton state] == NSOnState)
-        [self captureOneView];
+    if ([captureButton state] == NSOnState) goto captureElement;
+    FSALog(@"%4u<stop capture [fell through to end]", capture);
 }
 
@@ -151 +230 @@
 {
     [statusField setStringValue: @"Click inside one of this applicationÕs windows to select."];
-    [selectedView release]; selectedView = nil;
+    [selectedElement release]; selectedElement = nil;
     [self update: nil];
     [self captureOneView];
 }
 
-- (void)elementSelected:(NSMenuItem *)sender;
-{
-    NSView *element = [sender representedObject];
-    FSALog(@"element selected: %@", sender);
+- (void)setSelectedElement:(id)element;
+{
+    FSALog(@"element selected: %@", element);
     NS_DURING
         [descriptionField setStringValue: [element description]];
-        [selectedView release];
-        selectedView = [element retain];
+        [selectedElement release];
+        selectedElement = [element retain];
+        [[self window] orderFront: self];
     NS_HANDLER
         [descriptionField setStringValue:
@@ -169 +248 @@
     NS_ENDHANDLER
     [viewHierarchyMenu release]; viewHierarchyMenu = nil;
+}
+
+- (void)elementSelected:(NSMenuItem *)sender;
+{
+    [self setSelectedElement: [sender representedObject]];
     [self captureOneView];
+}
+
+- (void)menuWillSendAction:(NSNotification *)notification;
+{
+    NSMenuItem *item = [[notification userInfo] objectForKey: @"MenuItem"];
+    [self setSelectedElement: item];
+    [NSApp discardEventsMatchingMask: NSAnyEventMask beforeEvent: [NSApp currentEvent]];
+    // we're already capturing, don't do it again
+}
+
+- (void)controlTextDidChange:(NSNotification *)notification;
+{
+    [self update: nil];
 }
 
@@ -178 +275 @@
         NSString *variableName = [variableNameField stringValue];
         [statusField setStringValue: @"AssociatingÉ"];
-        [interpreter setObject: selectedView forIdentifier: variableName];
+        [interpreter setObject: selectedElement forIdentifier: variableName];
         [statusField setStringValue: [NSString stringWithFormat: @"Assigned variable Ò%@Ó", variableName]];
     NS_HANDLER
@@ -188 +285 @@
 {
     FSALog(@"system: %@", system);
-    [system browse: selectedView];
+    [system browse: selectedElement];
     [statusField setStringValue: @"Opened object browser"];
 }
 
-- (void)controlTextDidChange:(NSNotification *)notification;
-{
-    [self update: nil];
-}
-
 @end