1 #include <u.h>
2 #include <stdio.h>
3 #include <Carbon/Carbon.h>
4 
5 AUTOFRAMEWORK(Carbon)
6 
7 static OSErr Handler(const AppleEvent *event, AppleEvent *reply, long handlerRefcon);
8 
9 int
10 main(void)
11 {
12 	AEInstallEventHandler(kCoreEventClass, kAEOpenDocuments, Handler, 0, false);
13 	RunApplicationEventLoop();
14 	return 0;
15 }
16 
17 static OSErr
18 GetFullPathname(FSSpec *fss, char *path, int len)
19 {
20         FSRef fsr;
21         OSErr err;
22 
23         *path = '\0';
24         err = FSpMakeFSRef(fss, &fsr);
25         if (err == fnfErr) {
26                 /* FSSpecs can point to non-existing files, fsrefs can't. */
27                 FSSpec fss2;
28                 int tocopy;
29 
30                 err = FSMakeFSSpec(fss->vRefNum, fss->parID,
31                                    (unsigned char*)"", &fss2);
32                 if (err)
33                         return err;
34                 err = FSpMakeFSRef(&fss2, &fsr);
35                 if (err)
36                         return err;
37                 err = (OSErr)FSRefMakePath(&fsr, (unsigned char*)path, len-1);
38                 if (err)
39                         return err;
40                 /* This part is not 100% safe: we append the filename part, but
41                 ** I'm not sure that we don't run afoul of the various 8bit
42                 ** encodings here. Will have to look this up at some point...
43                 */
44                 strcat(path, "/");
45                 tocopy = fss->name[0];
46                 if ((strlen(path) + tocopy) >= len)
47                         tocopy = len - strlen(path) - 1;
48                 if (tocopy > 0)
49                         strncat(path, (char*)fss->name+1, tocopy);
50         }
51         else {
52                 if (err)
53                         return err;
54                 err = (OSErr)FSRefMakePath(&fsr, (unsigned char*)path, len);
55                 if (err)
56                         return err;
57         }
58         return 0;
59 }
60 
61 static void
62 chk(int err)
63 {
64 	if(err != 0) {
65 		printf("err %d\n", err);
66 		exit(1);
67 	}
68 }
69 
70 static OSErr
71 Handler(const AppleEvent *event, AppleEvent *reply, long handlerRefcon)
72 {
73 	AEDesc list;
74 	DescType type;
75 	FSSpec f;
76 	AEKeyword keyword;
77 	Size actual;
78 	long len;
79 	char s[1000];
80 
81 	chk(AEGetParamDesc(event, keyDirectObject, typeAEList, &list));
82 	chk(AECountItems(&list, &len));
83 	chk(AEGetNthPtr(&list, 1, typeFSS, &keyword, &type, (Ptr*)&f, sizeof(FSSpec), &actual));
84 	chk(GetFullPathname(&f, s, sizeof s));
85 	printf("%s\n", s);
86 	fflush(stdout);
87 
88 	// uncomment to keep handling more open events
89 	exit(0);
90 }