source: trunk/ICeCoffEE/ICeCoffEE/ICeCoffEE.m@ 317

Last change on this file since 317 was 272, checked in by Nicholas Riley, 18 years ago

ICeCoffEE.m: Strip intra-URL whitespace, not just leading and trailing.

ICeCoffEE.ldb: More localization changes.

ICeCoffEE.xcodeproj: Copy Smart Crash Reports, its Unsanity Installer
plugin, and the German-localized Select Services nib (oops).

And nuke some .DS_Stores for good measure.
File size: 24.0 KB
Line 
1// ICeCoffEE - Internet Config Carbon/Cocoa Editor Extension
2// Nicholas Riley <mailto:icecoffee@sabi.net>
3
4/* To do/think about:
5
6- TXNClick - MLTE has its own (lousy) support in Jaguar, seems improved in Panther, good enough to leave?
7
8*/
9
10#import "ICeCoffEE.h"
11#import <Carbon/Carbon.h>
12#include <unistd.h>
13#import "ICeCoffEESuper.h"
14#import "ICeCoffEESetServicesMenu.h"
15#import "ICeCoffEETrigger.h"
16
17iccfPrefRec ICCF_prefs;
18
19NSString *ICCF_ErrString(OSStatus err, NSString *context) {
20 if (err == noErr || err == userCanceledErr) return nil;
21
22 NSString *errNum = [NSString stringWithFormat: @"%ld", err];
23 NSString *errDesc = ICCF_LocalizedString(errNum);
24
25 if (errDesc == NULL || errDesc == errNum)
26 errDesc = [NSString stringWithFormat: ICCF_LocalizedString(@"An unknown error occurred in %@"), context];
27
28 return [NSString stringWithFormat: @"%@ (%d)", errDesc, (int)err];
29}
30
31CFStringRef ICCF_CopyErrString(OSStatus err, CFStringRef context) {
32 if (err == noErr || err == userCanceledErr) return NULL;
33
34 CFStringRef errNum = CFStringCreateWithFormat(NULL, NULL, CFSTR("%ld"), err);
35 CFStringRef errDesc = ICCF_CopyLocalizedString(errNum);
36
37 if (errDesc == NULL || errDesc == errNum) {
38 CFStringRef errDescFormat = ICCF_CopyLocalizedString(CFSTR("An unknown error occurred in %@"));
39 if (errDesc != NULL) CFRelease(errDesc);
40 errDesc = CFStringCreateWithFormat(NULL, NULL, errDescFormat, context);
41 }
42
43 CFStringRef errStr = CFStringCreateWithFormat(NULL, NULL, CFSTR("%@ (%d)"), errDesc, (int)err);
44
45 if (errNum != NULL) CFRelease(errNum);
46 if (errDesc != NULL) CFRelease(errDesc);
47 return errStr;
48}
49
50CFStringRef ICCF_CopyAppName() {
51 ProcessSerialNumber psn = {0, kCurrentProcess};
52 CFStringRef appName = NULL;
53 CopyProcessName(&psn, &appName);
54 if (appName == NULL) return CFSTR("(unknown)");
55 return appName;
56}
57
58BOOL ICCF_EventIsCommandMouseDown(NSEvent *e) {
59 return ([e type] == NSLeftMouseDown && ([e modifierFlags] & NSCommandKeyMask) != 0 && [e clickCount] == 1);
60}
61
62iccfURLAction ICCF_KeyboardAction(NSEvent *e) {
63 unsigned int modifierFlags = [e modifierFlags];
64 iccfURLAction action;
65 action.presentMenu = (modifierFlags & NSAlternateKeyMask) != 0;
66 action.launchInBackground = (modifierFlags & NSShiftKeyMask) != 0;
67 return action;
68}
69
70void ICCF_CheckRange(NSRange range) {
71 NSCAssert(range.length > 0, ICCF_LocalizedString(@"No URL is selected"));
72 NSCAssert1(range.length <= ICCF_MAX_URL_LEN, ICCF_LocalizedString(@"The potential URL is longer than %lu characters"), ICCF_MAX_URL_LEN);
73}
74
75void ICCF_Delimiters(NSCharacterSet **leftPtr, NSCharacterSet **rightPtr) {
76 static NSCharacterSet *urlLeftDelimiters = nil, *urlRightDelimiters = nil;
77
78 if (urlLeftDelimiters == nil || urlRightDelimiters == nil) {
79 NSMutableCharacterSet *set = [[NSCharacterSet whitespaceAndNewlineCharacterSet] mutableCopy];
80 NSMutableCharacterSet *tmpSet;
81 [urlLeftDelimiters release];
82 [urlRightDelimiters release];
83
84 [set autorelease];
85 [set formUnionWithCharacterSet: [[NSCharacterSet characterSetWithRange: NSMakeRange(0x21, 0x5e)] invertedSet]]; // nonprintable and non-ASCII characters
86 [set formUnionWithCharacterSet: [NSCharacterSet punctuationCharacterSet]];
87 [set removeCharactersInString: @";/?:@&=+$,-_.!~*'()%#"]; // RFC 2396 ¤2.2, 2.3, 2.4, plus % and # from "delims" set
88
89 tmpSet = [[set mutableCopy] autorelease];
90 [tmpSet formUnionWithCharacterSet: [NSCharacterSet characterSetWithCharactersInString: @"><("]];
91 urlLeftDelimiters = [tmpSet copy]; // make immutable again - for efficiency
92
93 tmpSet = [[set mutableCopy] autorelease];
94 [tmpSet formUnionWithCharacterSet: [NSCharacterSet characterSetWithCharactersInString: @"><)"]];
95 urlRightDelimiters = [tmpSet copy]; // make immutable again - for efficiency
96 }
97
98 *leftPtr = urlLeftDelimiters; *rightPtr = urlRightDelimiters;
99}
100
101static ICInstance ICCF_icInst = NULL;
102
103void ICCF_StartIC() {
104 OSStatus err;
105
106 if (ICCF_icInst != NULL) {
107 ICLog(@"ICCF_StartIC: Internet Config is already running!");
108 ICCF_StopIC();
109 }
110 err = ICStart(&ICCF_icInst, kICCFCreator);
111 NSCAssert1(err == noErr, ICCF_LocalizedString(@"Unable to start Internet Config (error %d)"), err);
112}
113
114void ICCF_StopIC() {
115 if (ICCF_icInst == NULL) {
116 ICLog(@"ICCF_StopIC: Internet Config is not running!");
117 } else {
118 ICStop(ICCF_icInst);
119 ICCF_icInst = NULL;
120 }
121}
122
123ICInstance ICCF_GetInst() {
124 NSCAssert(ICCF_icInst != NULL, @"Internal error: Called ICCF_GetInst without ICCF_StartIC");
125 return ICCF_icInst;
126}
127
128ConstStringPtr ICCF_GetHint(ICInstance inst, const char *urlData, Size length, long *selStart, long *selEnd, Boolean *needsSlashes) {
129 Handle h = NewHandle(0);
130 OSStatus err;
131
132 if (h == NULL) return NULL;
133
134 // parse the URL providing a bogus protocol, to get rid of escaped forms
135 err = ICParseURL(inst, "\p*", urlData, length, selStart, selEnd, h);
136 if (err != noErr) return NULL;
137
138 // scan through the parsed URL looking for characters not found in email addresses
139 Size hSize = GetHandleSize(h);
140 if (hSize == 0) return NULL;
141
142 const char *urlParsed = *h;
143 long i = 0;
144 Boolean sawAt = false;
145 if (hSize >= 2 && urlParsed[0] == '*' && urlParsed[1] == ':') {
146 // this is an IC-inserted protocol; skip over it
147 i = 2;
148 *needsSlashes = (hSize < i + 2 || urlParsed[i] != '/' || urlParsed[i + 1] != '/');
149 } else *needsSlashes = false;
150 for ( ; i < hSize ; i++) {
151 char c = urlParsed[i];
152 if (c == '@') {
153 sawAt = true;
154 } else if (!((c >= 'A' && c <= 'Z') || (c >= 'a' && c <= 'z') || (c >= '0' && c <= '9') ||
155 (c == '+' || c == '-' || c == '_' || c == '!' || c == '.'))) {
156 DisposeHandle(h);
157 return "\phttp";
158 }
159 }
160 DisposeHandle(h);
161 if (sawAt) {
162 *needsSlashes = false;
163 return "\pmailto";
164 }
165 return "\phttp";
166}
167
168static const char *kICSlashes = "//";
169
170void ICCF_AddSlashes(Handle h, ConstStringPtr hint) {
171 Size sizeBefore = GetHandleSize(h);
172 unsigned char hintLength = StrLength(hint);
173 char *copy = (char *)malloc(sizeBefore);
174 memcpy(copy, *h, sizeBefore);
175 ICLog(@"ICCF_AddSlashes before: |%s|\n", *h);
176 ReallocateHandle(h, sizeBefore + 2);
177
178 // if *h begins with '<hint>:', then copy the slashes after it
179 if (sizeBefore > hintLength + 1 && strncmp((const char *)&hint[1], copy, hintLength) == 0 && copy[hintLength] == ':') {
180 memcpy(*h, copy, hintLength + 1);
181 memcpy(*h + hintLength + 1, kICSlashes, 2);
182 memcpy(*h + hintLength + 3, &copy[hintLength + 1], sizeBefore - hintLength - 1);
183 } else {
184 memcpy(*h, kICSlashes, 2);
185 memcpy(*h + 2, copy, sizeBefore);
186 }
187
188 free(copy);
189 ICLog(@"ICCF_AddSlashes after: |%s|\n", *h);
190}
191
192// input/output 'range' is the range of source document which contains 'string'
193void ICCF_ParseURL(NSString *string, NSRange *range) {
194 OSStatus err;
195 Handle h;
196 long selStart = 0, selEnd = range->length; // local offsets within 'string'
197 char *urlData = NULL;
198
199 NSCAssert(selEnd == [string length], @"Internal error: URL string is wrong length");
200
201 NS_DURING
202 if ([[NSCharacterSet characterSetWithCharactersInString: @";,."] characterIsMember:
203 [string characterAtIndex: selEnd - 1]]) {
204 selEnd--;
205 }
206 NSCharacterSet *alphanumericCharacterSet = [NSCharacterSet alphanumericCharacterSet];
207 while (![alphanumericCharacterSet characterIsMember: [string characterAtIndex: selStart]]) {
208 selStart++;
209 NSCAssert(selStart < selEnd, @"No URL is selected");
210 }
211
212 string = [string substringWithRange: NSMakeRange(selStart, selEnd - selStart)];
213
214 ICLog(@"Parsing URL |%@|", string);
215
216 NSCAssert([string canBeConvertedToEncoding: NSASCIIStringEncoding], @"No URL is selected");
217
218 urlData = (char *)malloc( (range->length + 1) * sizeof(char));
219 NSCAssert(urlData != NULL, @"Internal error: can't allocate memory for URL string");
220
221 // XXX getCString: is deprecated in 10.4, but this is safe and shouldn't assert because we've already verified the string can be converted to ASCII, which should be a subset of any possible system encoding. The replacement (getCString:maxLength:encoding:) is not available until 10.4, so we leave this until we dump Internet Config and gain IDN friendliness.
222 [string getCString: urlData];
223
224 h = NewHandle(0);
225 NSCAssert(h != NULL, @"Internal error: can't allocate URL handle");
226
227 err = ICParseURL(ICCF_GetInst(), "\pmailto", urlData, range->length, &selStart, &selEnd, h);
228 DisposeHandle(h);
229
230 ICCF_OSErrCAssert(err, @"ICParseURL");
231
232 range->length = selEnd - selStart;
233 range->location += selStart;
234 NS_HANDLER
235 free(urlData);
236 [localException raise];
237 NS_ENDHANDLER
238
239 free(urlData);
240}
241
242BOOL ICCF_LaunchURL(NSString *string, iccfURLAction action) {
243 OSStatus err = noErr;
244 long selStart, selEnd;
245 NSMutableString *urlString = [[NSMutableString alloc] init];
246 NSCharacterSet *whitespace = [NSCharacterSet whitespaceAndNewlineCharacterSet];
247 NSScanner *scanner = [[NSScanner alloc] initWithString: string];
248 NSString *fragmentString;
249 while ([scanner scanUpToCharactersFromSet: whitespace intoString: &fragmentString]) {
250 [urlString appendString: fragmentString];
251 }
252 unsigned len = [urlString length];
253
254 Handle h = NULL;
255
256 NS_DURING
257 h = NewHandle(len);
258 if (h == NULL)
259 ICCF_OSErrCAssert(MemError(), @"NewHandle");
260
261 if (CFStringGetBytes((CFStringRef)urlString, CFRangeMake(0, len), kCFStringEncodingASCII, '\0', false, (UInt8 *)*h, len, NULL) != len)
262 ICCF_OSErrCAssert(kTECNoConversionPathErr, @"CFStringGetBytes");
263
264 selStart = 0; selEnd = len;
265
266 Boolean needsSlashes;
267 ConstStringPtr hint = ICCF_GetHint(ICCF_GetInst(), *h, len, &selStart, &selEnd, &needsSlashes);
268 NSCAssert(hint != NULL, @"Internal error: can't get protocol hint for URL");
269
270 if (needsSlashes) {
271 ICCF_AddSlashes(h, hint);
272 len = selEnd = GetHandleSize(h);
273 }
274
275 err = ICCF_DoURLAction(ICCF_GetInst(), hint, *h, selStart, selEnd, action);
276 ICCF_OSErrCAssert(err, @"ICCF_DoURLAction");
277
278 NS_HANDLER
279 DisposeHandle(h);
280 [urlString release];
281 [localException raise];
282 NS_ENDHANDLER
283
284 DisposeHandle(h);
285 [urlString release];
286
287 return (err == noErr);
288}
289
290// XXX not sure what to do if there's already a selection; BBEdit and MLTE extend it, Tex-Edit Plus doesn't.
291// RFC-ordained max URL length, just to avoid passing IC/LS multi-megabyte documents
292#if ICCF_DEBUG
293const long ICCF_MAX_URL_LEN = 60; // XXX change later
294#else
295const long ICCF_MAX_URL_LEN = 1024;
296#endif
297
298Boolean ICCF_enabled = true;
299
300BOOL ICCF_HandleException(NSException *e) {
301 if ([e reason] == nil || [[e reason] length] == 0)
302 return NO;
303
304 if (ICCF_prefs.errorSoundEnabled) NSBeep();
305 if (!ICCF_prefs.errorDialogEnabled) return YES;
306
307 int result = NSRunAlertPanel(ICCF_LocalizedString(@"AlertTitle"), ICCF_LocalizedString(@"AlertMessage%@"), nil, nil, ICCF_LocalizedString(@"AlertDisableButton"), e);
308 if (result != NSAlertDefaultReturn) {
309 result = NSRunAlertPanel(ICCF_LocalizedString(@"DisableAlertTitle"), ICCF_LocalizedString(@"DisableAlertMessage%@"), ICCF_LocalizedString(@"DisableAlertDisableButton"), ICCF_LocalizedString(@"DisableAlertDontDisableButton"), nil,
310 [(NSString *)ICCF_CopyAppName() autorelease]);
311 if (result == NSAlertDefaultReturn)
312 ICCF_enabled = NO;
313 }
314 return YES;
315}
316
317void ICCF_LaunchURLFromTextView(NSTextView *self, NSEvent *triggeringEvent) {
318 NSCharacterSet *urlLeftDelimiters = nil, *urlRightDelimiters = nil;
319 NSRange range = [self selectedRange], delimiterRange;
320 NSColor *insertionPointColor = [self insertionPointColor];
321 NSString *s = [[self textStorage] string]; // according to the class documentation, sending 'string' is guaranteed to be O(1)
322 unsigned extraLen;
323 int i;
324
325 NS_DURING
326
327 NSCAssert(range.location != NSNotFound, ICCF_LocalizedString(@"There is no insertion point or selection in the text field where you clicked"));
328 NSCAssert(s != nil, ICCF_LocalizedString(@"Sorry, ICeCoffEE is unable to locate the insertion point or selection"));
329
330 ICCF_StartIC();
331
332 NSCAssert([s length] != 0, ICCF_LocalizedString(@"No text was found"));
333
334 if (range.location == [s length]) range.location--; // work around bug in selectionRangeForProposedRange (r. 2845418)
335
336 range = [self selectionRangeForProposedRange: range granularity: NSSelectByWord];
337
338 // However, NSSelectByWord does not capture even the approximate boundaries of a URL
339 // (text to a space/line ending character); it'll stop at a period in the middle of a hostname.
340 // So, we expand it as follows:
341
342 ICCF_CheckRange(range);
343
344 ICCF_Delimiters(&urlLeftDelimiters, &urlRightDelimiters);
345
346 // XXX instead of 0, make this stop at the max URL length to prevent protracted searches
347 // add 1 to range to trap delimiters that are on the edge of the selection (i.e., <...)
348 delimiterRange = [s rangeOfCharacterFromSet: urlLeftDelimiters
349 options: NSLiteralSearch | NSBackwardsSearch
350 range: NSMakeRange(0, range.location + (range.location != [s length]))];
351 if (delimiterRange.location == NSNotFound) {
352 // extend to beginning of string
353 range.length += range.location;
354 range.location = 0;
355 } else {
356 NSCAssert(delimiterRange.length == 1, @"Internal error: delimiter matched range is not of length 1");
357 range.length += range.location - delimiterRange.location - 1;
358 range.location = delimiterRange.location + 1;
359 }
360
361 ICCF_CheckRange(range);
362
363 // XXX instead of length of string, make this stop at the max URL length to prevent protracted searches
364 // add 1 to range to trap delimiters that are on the edge of the selection (i.e., ...>)
365 extraLen = [s length] - range.location - range.length;
366 delimiterRange = [s rangeOfCharacterFromSet: urlRightDelimiters
367 options: NSLiteralSearch
368 range: NSMakeRange(range.location + range.length - (range.length != 0),
369 extraLen + (range.length != 0))];
370 if (delimiterRange.location == NSNotFound) {
371 // extend to end of string
372 range.length += extraLen;
373 } else {
374 NSCAssert(delimiterRange.length == 1, @"Internal error: delimiter matched range is not of length 1");
375 range.length += delimiterRange.location - range.location - range.length;
376 }
377
378 ICCF_CheckRange(range);
379
380 ICCF_ParseURL([s substringWithRange: range], &range);
381
382 [self setSelectedRange: range affinity: NSSelectionAffinityDownstream stillSelecting: NO];
383 [self display];
384
385 if (ICCF_LaunchURL([s substringWithRange: range], ICCF_KeyboardAction(triggeringEvent)) && ICCF_prefs.textBlinkEnabled) {
386 for (i = 0 ; i < ICCF_prefs.textBlinkCount ; i++) {
387 NSRange emptyRange = {range.location, 0};
388 [self setSelectedRange: emptyRange affinity: NSSelectionAffinityDownstream stillSelecting: YES];
389 [self display];
390 usleep(kICBlinkDelayUsecs);
391 [self setInsertionPointColor: [self backgroundColor]];
392 [self setSelectedRange: range affinity: NSSelectionAffinityDownstream stillSelecting: YES];
393 [self display];
394 usleep(kICBlinkDelayUsecs);
395 }
396 }
397
398 NS_HANDLER
399 ICCF_HandleException(localException);
400 NS_ENDHANDLER
401
402 ICCF_StopIC();
403 [self setInsertionPointColor: insertionPointColor];
404}
405
406NSString * const ICCF_SERVICES_ITEM = @"ICeCoffEE Services Item";
407
408NSMenuItem *ICCF_ServicesMenuItem() {
409 NSMenuItem *servicesItem;
410 NSString *servicesTitle = nil;
411 NSMenu *servicesMenu = [NSApp servicesMenu];
412
413 if (servicesMenu != nil) {
414 servicesTitle = [servicesMenu title];
415 if (servicesTitle == nil) {
416 ICLog(@"Can't get service menu title");
417 servicesTitle = @"Services";
418 }
419 } else {
420 servicesTitle = [[NSBundle bundleWithIdentifier: @"com.apple.AppKit"] localizedStringForKey: @"Services" value: nil table: @"ServicesMenu"];
421 if (servicesTitle == nil) {
422 ICLog(@"Can't get localized text for 'Services' in AppKit.framework");
423 servicesTitle = @"Services";
424 }
425 }
426 servicesMenu = [[NSMenu alloc] initWithTitle: servicesTitle];
427 servicesItem = [[NSMenuItem alloc] initWithTitle: servicesTitle action:nil keyEquivalent:@""];
428 ICCF_SetServicesMenu(servicesMenu);
429 [servicesItem setSubmenu: servicesMenu];
430 [servicesItem setRepresentedObject: ICCF_SERVICES_ITEM];
431 [servicesMenu release];
432 return [servicesItem autorelease];
433}
434
435static const unichar UNICHAR_BLACK_RIGHT_POINTING_SMALL_TRIANGLE = 0x25b8;
436
437// returns YES if menu contains useful items, NO otherwise
438BOOL ICCF_ConsolidateServicesMenu(NSMenu *menu, NSDictionary *serviceOptions) {
439 [menu update]; // doesn't propagate to submenus, so we need to do this first
440 NSEnumerator *enumerator = [[menu itemArray] objectEnumerator];
441 NSMenuItem *menuItem;
442 NSMenu *submenu;
443 NSDictionary *itemOptions = nil;
444 BOOL shouldKeepItem = NO, shouldKeepMenu = NO;
445
446 while ( (menuItem = [enumerator nextObject]) != nil) {
447 if (serviceOptions != nil)
448 itemOptions = [serviceOptions objectForKey: [menuItem title]];
449 if ([[itemOptions objectForKey: (NSString *)kICServiceHidden] boolValue]) {
450 shouldKeepItem = NO;
451 } else if ( (submenu = [menuItem submenu]) != nil) {
452 shouldKeepItem = ICCF_ConsolidateServicesMenu(submenu, [itemOptions objectForKey: (NSString *)kICServiceSubmenu]);
453 if (shouldKeepItem && [submenu numberOfItems] == 1) { // consolidate
454 NSMenuItem *serviceItem = [[submenu itemAtIndex: 0] retain];
455 [serviceItem setTitle:
456 [NSString stringWithFormat: @"%@ %@ %@", [menuItem title], [NSString stringWithCharacters: &UNICHAR_BLACK_RIGHT_POINTING_SMALL_TRIANGLE length: 1], [serviceItem title]]];
457
458 int serviceIndex = [menu indexOfItem: menuItem];
459 [submenu removeItemAtIndex: 0]; // can't have item in two menus
460 [menu removeItemAtIndex: serviceIndex];
461 [menu insertItem: serviceItem atIndex: serviceIndex];
462 [serviceItem release];
463 }
464 } else {
465 [menuItem setKeyEquivalent: @""];
466 shouldKeepItem = [menuItem isEnabled];
467 }
468 if (shouldKeepItem) {
469 shouldKeepMenu = YES;
470 } else {
471 [menu removeItem: menuItem];
472 }
473 }
474
475 return shouldKeepMenu;
476}
477
478NSMenuItem *ICCF_ContextualServicesMenuItem() {
479 NSMenuItem *servicesItem = ICCF_ServicesMenuItem();
480 if (ICCF_ConsolidateServicesMenu([servicesItem submenu], (NSDictionary *)ICCF_prefs.serviceOptions))
481 return servicesItem;
482 else
483 return nil;
484}
485
486void ICCF_AddRemoveServicesMenu() {
487 // needed because:
488 // (a) we get called before the runloop has properly started and will crash if we don't delay on app startup
489 // (b) the APE message handler calls us from another thread and nothing happens if we try to add a menu on it
490 [ICeCoffEE performSelectorOnMainThread: @selector(IC_addRemoveServicesMenu) withObject: nil waitUntilDone: NO];
491}
492
493NSMenu *ICCF_MenuForEvent(NSView *self, NSMenu *contextMenu, NSEvent *e) {
494 if (contextMenu != nil && [e type] == NSRightMouseDown || ([e type] == NSLeftMouseDown && [e modifierFlags] & NSControlKeyMask)) {
495 int servicesItemIndex = [contextMenu indexOfItemWithRepresentedObject: ICCF_SERVICES_ITEM];
496 // always regenerate: make sure menu reflects context
497 if (servicesItemIndex != -1) {
498 [contextMenu removeItemAtIndex: servicesItemIndex];
499 [contextMenu removeItemAtIndex: servicesItemIndex - 1];
500 }
501 if (ICCF_prefs.servicesInContextualMenu) {
502 NSMenuItem *contextualServicesItem = ICCF_ContextualServicesMenuItem();
503 if (contextualServicesItem != nil) {
504 [contextMenu addItem: [NSMenuItem separatorItem]];
505 [contextMenu addItem: contextualServicesItem];
506 }
507 }
508 }
509 return contextMenu;
510}
511
512static NSEvent *ICCF_MouseDownEventWithModifierFlags(NSEvent *e, BOOL inheritModifierFlags) {
513 return [NSEvent mouseEventWithType: NSLeftMouseDown
514 location: [e locationInWindow]
515 modifierFlags: (inheritModifierFlags ? [e modifierFlags] : 0)
516 timestamp: [e timestamp]
517 windowNumber: [e windowNumber]
518 context: [e context]
519 eventNumber: [e eventNumber]
520 clickCount: 1
521 pressure: 0];
522}
523
524
525@interface NSTextView (IC_NSSharing)
526// only in Mac OS X 10.4 and later
527- (NSArray *)selectedRanges;
528@end
529
530@implementation ICeCoffEE
531
532+ (void)IC_addRemoveServicesMenu;
533{
534 NSMenu *mainMenu = [[NSApplication sharedApplication] mainMenu];
535 static NSMenuItem *servicesItem = nil;
536
537 if (servicesItem == nil && ICCF_prefs.servicesInMenuBar) {
538 servicesItem = [ICCF_ServicesMenuItem() retain];
539
540 int insertLoc = [mainMenu indexOfItemWithSubmenu: [NSApp windowsMenu]];
541 if (insertLoc == -1)
542 insertLoc = [mainMenu numberOfItems];
543
544 [mainMenu insertItem: servicesItem atIndex: insertLoc];
545 } else if (servicesItem != nil && !ICCF_prefs.servicesInMenuBar) {
546 [mainMenu removeItem: servicesItem];
547 [servicesItem release];
548 servicesItem = nil;
549 }
550 if (floor(NSAppKitVersionNumber) <= NSAppKitVersionNumber10_3) {
551 [[NSApp servicesMenu] update]; // enable keyboard equivalents in Mac OS X 10.3
552 }
553}
554
555// XXX localization?
556- (NSMenu *)menuForEvent:(NSEvent *)e;
557{
558 NSMenu *myMenu = [super menuForEvent: e];
559 return ICCF_MenuForEvent(self, myMenu, e);
560}
561
562- (void)mouseDown:(NSEvent *)e;
563{
564#if ICCF_DEBUG
565 static BOOL down = NO;
566 if (down) {
567 ICLog(@"recursive invocation!");
568 return;
569 }
570 down = YES;
571 ICLog(@"ICeCoffEE down: %@", e);
572#endif
573 if (ICCF_sharedTrigger != nil) {
574 ICLog(@"%@ cancelling", ICCF_sharedTrigger);
575 [ICCF_sharedTrigger cancel];
576 }
577 if (ICCF_enabled && ICCF_prefs.commandClickEnabled && ICCF_EventIsCommandMouseDown(e)) {
578 BOOL inheritModifierFlags;
579 if ([self respondsToSelector: @selector(selectedRanges)]) {
580 // Command-multiple-click or -drag for discontiguous selection, Mac OS X 10.4 or later
581 inheritModifierFlags = YES;
582 } else {
583 // don't want to trigger selection extension or anything else; pass through as a plain click
584 // (on Mac OS X 10.3, command does not modify behavior)
585 inheritModifierFlags = NO;
586 }
587 [super mouseDown: ICCF_MouseDownEventWithModifierFlags(e, inheritModifierFlags)];
588 // we don't actually get a mouseUp event, just wait for mouseDown to return
589 NSEvent *upEvent = [[self window] currentEvent];
590 NSPoint downPt = [e locationInWindow];
591 NSPoint upPt = [upEvent locationInWindow];
592 ICLog(@"next: %@", upEvent);
593 NSAssert([upEvent type] == NSLeftMouseUp, @"NSTextView mouseDown: did not return with current event as mouse up!");
594 if (abs(downPt.x - upPt.x) <= kICHysteresisPixels && abs(downPt.y - upPt.y) <= kICHysteresisPixels) {
595 if (inheritModifierFlags) {
596 // Mac OS X 10.4 and later: make sure we don't have a command-double-click
597 [ICeCoffEETrigger setTriggerForEvent: e onTarget: self]; // gets stored in ICCF_sharedTrigger; the reason for this weird calling pattern is that we don't want to add methods to NSTextView, and we don't want to add a method call on every mouseDown
598 ICLog(@"%@ set", ICCF_sharedTrigger);
599 } else {
600 // Mac OS X 10.3
601 ICCF_LaunchURLFromTextView(self, e);
602 }
603 }
604 } else {
605 [super mouseDown: e];
606 }
607#if ICCF_DEBUG
608 down = NO;
609#endif
610}
611
612@end
Note: See TracBrowser for help on using the repository browser.