1 | /*
|
---|
2 | * ICeCoffEEAppMenu.c
|
---|
3 | * ICeCoffEE APE
|
---|
4 | *
|
---|
5 | * Created by Nicholas Riley on Wed Jan 29 2003.
|
---|
6 | * Copyright (c) 2003 Nicholas Riley. All rights reserved.
|
---|
7 | *
|
---|
8 | */
|
---|
9 |
|
---|
10 | #include "ICeCoffEEAppMenu.h"
|
---|
11 | #include "ICeCoffEEConfig.h"
|
---|
12 |
|
---|
13 | /* thanks to Slava Karpenko for this one! */
|
---|
14 | OSStatus _LSCopyApplicationURLsForItemURL(CFURLRef inURL, LSRolesMask inRoleMask, CFArrayRef *outApps); // outApps to be CFReleased()
|
---|
15 |
|
---|
16 | #define THROW_ERR(e) { err = e; goto END; }
|
---|
17 | #define SAFE_RELEASE(e) { if (e != NULL) CFRelease(e); }
|
---|
18 |
|
---|
19 | static CFStringRef ICCF_NameWithLocation(CFStringRef name, CFURLRef url) {
|
---|
20 | CFURLRef urlMinus = CFURLCreateCopyDeletingLastPathComponent(NULL, url);
|
---|
21 | CFStringRef urlString = CFURLCopyFileSystemPath(urlMinus, kCFURLPOSIXPathStyle);
|
---|
22 | CFStringRef nameWithLocation = CFStringCreateWithFormat(NULL, NULL, CFSTR("%@ %s %@"), name, "Ñ", urlString);
|
---|
23 |
|
---|
24 | SAFE_RELEASE(urlMinus);
|
---|
25 | SAFE_RELEASE(urlString);
|
---|
26 | return nameWithLocation;
|
---|
27 | }
|
---|
28 |
|
---|
29 | static const MenuItemIndex kICAppMenuItemHasPath = 0xfffe;
|
---|
30 |
|
---|
31 | static CFStringRef
|
---|
32 |
|
---|
33 | OSStatus ICCF_LaunchURLWithApplication(ICInstance inst, ConstStr255Param hint, const char *urlData, long startIndex, long endIndex) {
|
---|
34 | Handle h = NewHandle(0);
|
---|
35 | CFURLRef url = NULL;
|
---|
36 | CFURLRef defaultAppURL = NULL;
|
---|
37 | CFArrayRef urlArray = NULL;
|
---|
38 | CFArrayRef appURLs = NULL;
|
---|
39 | CFMutableSetRef appPaths = NULL;
|
---|
40 | CFMutableDictionaryRef appNames = NULL;
|
---|
41 | MenuRef menu = NULL;
|
---|
42 | OSStatus err;
|
---|
43 |
|
---|
44 | if (h == NULL) return MemError();
|
---|
45 |
|
---|
46 | if ( (err = ICParseURL(inst, hint, urlData + startIndex, endIndex - startIndex + 1,
|
---|
47 | &startIndex, &endIndex, h)) != noErr) THROW_ERR(err);
|
---|
48 |
|
---|
49 | if ( (url = CFURLCreateWithBytes(NULL, *h, GetHandleSize(h), kCFStringEncodingASCII,
|
---|
50 | NULL)) == NULL) THROW_ERR(paramErr);
|
---|
51 |
|
---|
52 | CFIndex appCount = 0;
|
---|
53 | if ( (err = _LSCopyApplicationURLsForItemURL(url, kLSRolesAll, &appURLs)) != noErr)
|
---|
54 | THROW_ERR(err);
|
---|
55 |
|
---|
56 | if (appURLs == NULL || (appCount = CFArrayGetCount(appURLs)) == 0)
|
---|
57 | THROW_ERR(kLSApplicationNotFoundErr);
|
---|
58 |
|
---|
59 | if ( (appPaths = CFSetCreateMutable(NULL, appCount, &kCFCopyStringSetCallBacks)) == NULL)
|
---|
60 | THROW_ERR(memFullErr);
|
---|
61 |
|
---|
62 | // values: index of single item with name; 0/NULL if no name; kICAppMenuItemHasPath if multiple items have name
|
---|
63 | if ( (appNames = CFDictionaryCreateMutable(NULL, appCount, &kCFCopyStringDictionaryKeyCallBacks, NULL)) == NULL)
|
---|
64 | THROW_ERR(memFullErr);
|
---|
65 |
|
---|
66 | if ( (err = CreateNewMenu(0, kMenuAttrExcludesMarkColumn, &menu)) != noErr)
|
---|
67 | THROW_ERR(err);
|
---|
68 |
|
---|
69 | MenuItemIndex menuItemIndex;
|
---|
70 | if ( (err = AppendMenuItemTextWithCFString(menu, ICCF_CopyLocalizedString(CFSTR("Open Location With")), kMenuItemAttrDisabled, 0, &menuItemIndex)) != noErr)
|
---|
71 | THROW_ERR(err);
|
---|
72 |
|
---|
73 | if ( (urlArray = CFArrayCreate(NULL, (const void **)&url, 1, &kCFTypeArrayCallBacks)) == NULL)
|
---|
74 | THROW_ERR(memFullErr);
|
---|
75 |
|
---|
76 | LSGetApplicationForURL(url, kLSRolesAll, NULL, &defaultAppURL);
|
---|
77 |
|
---|
78 | CFIndex appIndex;
|
---|
79 | for (appIndex = 0 ; appIndex < appCount ; appIndex++) {
|
---|
80 | CFStringRef appName = NULL, appItemTitle = NULL;
|
---|
81 | CFBundleRef appBundle = NULL;
|
---|
82 | IconRef appIcon = NULL;
|
---|
83 | FSRef appRef;
|
---|
84 | CFURLRef appURL;
|
---|
85 | SInt16 label;
|
---|
86 |
|
---|
87 | appURL = CFArrayGetValueAtIndex(appURLs, appIndex);
|
---|
88 | CFStringRef appPath = CFURLCopyPath(appURL);
|
---|
89 | if (CFSetContainsValue(appPaths, appPath))
|
---|
90 | continue;
|
---|
91 | CFSetAddValue(appPaths, appPath);
|
---|
92 |
|
---|
93 | if ( (err = LSCopyDisplayNameForURL(appURL, &appName)) != noErr) THROW_ERR(err);
|
---|
94 |
|
---|
95 | menuItemIndex = (long)CFDictionaryGetValue(appNames, appName);
|
---|
96 | if (menuItemIndex != 0) {
|
---|
97 | CFURLRef sameAppRef;
|
---|
98 | if (menuItemIndex != kICAppMenuItemHasPath && GetMenuItemRefCon(menu, menuItemIndex, (void *)&sameAppRef) == noErr) {
|
---|
99 | CFStringRef sameAppItemTitle = NULL;
|
---|
100 | if ( (err = CopyMenuItemTextAsCFString(menu, menuItemIndex, &sameAppItemTitle)) != noErr)
|
---|
101 | THROW_ERR(err);
|
---|
102 | CFStringRef appItemTitleWithVersion = ICCF_NameWithLocation(sameAppItemTitle, sameAppRef);
|
---|
103 | SetMenuItemTextWithCFString(menu, menuItemIndex, appItemTitleWithVersion);
|
---|
104 | SAFE_RELEASE(appItemTitleWithVersion);
|
---|
105 | CFDictionarySetValue(appNames, appName, (void *)(long)kICAppMenuItemHasPath);
|
---|
106 | }
|
---|
107 | }
|
---|
108 |
|
---|
109 | CFRetain(appName);
|
---|
110 | appItemTitle = appName;
|
---|
111 |
|
---|
112 | if ( (appBundle = CFBundleCreate(NULL, appURL)) != NULL) {
|
---|
113 | // prefer a short version string, e.g. "1.0 Beta" instead of "51" for Safari
|
---|
114 | CFStringRef appVersion = CFBundleGetValueForInfoDictionaryKey(appBundle, CFSTR("CFBundleShortVersionString"));
|
---|
115 | if (appVersion == NULL)
|
---|
116 | appVersion = CFBundleGetValueForInfoDictionaryKey(appBundle, kCFBundleVersionKey);
|
---|
117 | if (appVersion != NULL) {
|
---|
118 | appItemTitle = CFStringCreateWithFormat(NULL, NULL, CFSTR("%@ (%@)"), appName, appVersion);
|
---|
119 | CFRelease(appName);
|
---|
120 | }
|
---|
121 | CFRelease(appBundle);
|
---|
122 | }
|
---|
123 |
|
---|
124 | if (menuItemIndex != 0) {
|
---|
125 | CFStringRef appItemTitleWithVersion = ICCF_NameWithLocation(appItemTitle, appURL);
|
---|
126 | CFRelease(appItemTitle);
|
---|
127 | appItemTitle = appItemTitleWithVersion;
|
---|
128 | }
|
---|
129 |
|
---|
130 | if (defaultAppURL != NULL && CFEqual(appURL, defaultAppURL)) {
|
---|
131 | CFStringRef defaultFormat = ICCF_CopyLocalizedString(CFSTR("DefaultApp%@"));
|
---|
132 | CFStringRef appItemTitleWithDefault = CFStringCreateWithFormat(NULL, NULL, defaultFormat, appItemTitle);
|
---|
133 | CFRelease(appItemTitle);
|
---|
134 | appItemTitle = appItemTitleWithDefault;
|
---|
135 | defaultAppURL = NULL;
|
---|
136 | }
|
---|
137 |
|
---|
138 | err = AppendMenuItemTextWithCFString(menu, appItemTitle, 0, 0, &menuItemIndex);
|
---|
139 | CFRelease(appItemTitle);
|
---|
140 | if (err != noErr) THROW_ERR(err);
|
---|
141 |
|
---|
142 | if (!CFDictionaryContainsKey(appNames, appName)) {
|
---|
143 | CFDictionarySetValue(appNames, appName, (void *)(long)menuItemIndex);
|
---|
144 | CFRelease(appName);
|
---|
145 | }
|
---|
146 |
|
---|
147 | if (!CFURLGetFSRef(appURL, &appRef)) THROW_ERR(paramErr);
|
---|
148 | err = GetIconRefFromFileInfo(&appRef, 0, NULL, kFSCatInfoNone, NULL, kIconServicesNormalUsageFlag, &appIcon, &label);
|
---|
149 | if (err != noErr) THROW_ERR(err);
|
---|
150 |
|
---|
151 | SetMenuItemIconHandle(menu, menuItemIndex, kMenuIconRefType, (Handle)appIcon);
|
---|
152 | SetMenuItemRefCon(menu, menuItemIndex, (UInt32)appURL);
|
---|
153 | ReleaseIconRef(appIcon);
|
---|
154 | }
|
---|
155 | InsertMenu(menu, -1);
|
---|
156 | Point mousePoint;
|
---|
157 | GetGlobalMouse(&mousePoint);
|
---|
158 | long selectedAppIndex = PopUpMenuSelect(menu, mousePoint.v + 18, mousePoint.h - 30, 0/*popUpItem*/);
|
---|
159 | if (selectedAppIndex == 0) {
|
---|
160 | err = userCanceledErr;
|
---|
161 | } else {
|
---|
162 | CFURLRef appURL = NULL;
|
---|
163 | err = GetMenuItemRefCon(menu, selectedAppIndex, (void *)&appURL);
|
---|
164 | if (err == noErr) {
|
---|
165 | LSLaunchURLSpec lsSpec = {appURL, urlArray, NULL, kLSLaunchDefaults};
|
---|
166 | err = LSOpenFromURLSpec(&lsSpec, NULL);
|
---|
167 | }
|
---|
168 | }
|
---|
169 |
|
---|
170 | END:
|
---|
171 | if (h != NULL) DisposeHandle(h);
|
---|
172 | if (menu != NULL) {
|
---|
173 | DeleteMenu(GetMenuID(menu));
|
---|
174 | DisposeMenu(menu);
|
---|
175 | }
|
---|
176 | SAFE_RELEASE(url);
|
---|
177 | SAFE_RELEASE(urlArray);
|
---|
178 | SAFE_RELEASE(appURLs);
|
---|
179 | SAFE_RELEASE(appNames);
|
---|
180 | SAFE_RELEASE(appPaths);
|
---|
181 |
|
---|
182 | return err;
|
---|
183 | } |
---|