mirror of
https://github.com/9fans/plan9port.git
synced 2025-01-12 11:10:07 +00:00
mac: add 9term.app, Plumb.app
R=rsc http://codereview.appspot.com/2783041
This commit is contained in:
parent
c84e737c3f
commit
afea5fc3fd
15 changed files with 220 additions and 0 deletions
|
@ -23,6 +23,8 @@ bin/unmount
|
|||
bin/vwhois
|
||||
bin/vmount
|
||||
bin/yesterday
|
||||
mac/9term.app/Contents/MacOS/9term
|
||||
mac/Plumb.app/Contents/MacOS/plumb
|
||||
mail/lib/qmail
|
||||
mail/lib/remotemail
|
||||
man/mkindex
|
||||
|
|
28
mac/9term.app/Contents/Info.plist
Normal file
28
mac/9term.app/Contents/Info.plist
Normal file
|
@ -0,0 +1,28 @@
|
|||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
|
||||
<plist version="1.0">
|
||||
<dict>
|
||||
<key>CFBundleDevelopmentRegion</key>
|
||||
<string>English</string>
|
||||
<key>CFBundleExecutable</key>
|
||||
<string>9term</string>
|
||||
<key>CFBundleGetInfoString</key>
|
||||
<string>0.1-1</string>
|
||||
<key>CFBundleIconFile</key>
|
||||
<string>spaceglenda.icns</string>
|
||||
<key>CFBundleIdentifier</key>
|
||||
<string>com.swtch.9term</string>
|
||||
<key>CFBundleInfoDictionaryVersion</key>
|
||||
<string>6.0</string>
|
||||
<key>CFBundleName</key>
|
||||
<string>9term</string>
|
||||
<key>CFBundlePackageType</key>
|
||||
<string>APPL</string>
|
||||
<key>CFBundleShortVersionString</key>
|
||||
<string>0.1</string>
|
||||
<key>CFBundleSignature</key>
|
||||
<string>9term1</string>
|
||||
<key>CFBundleVersion</key>
|
||||
<string>1</string>
|
||||
</dict>
|
||||
</plist>
|
5
mac/9term.app/Contents/MacOS/9term
Executable file
5
mac/9term.app/Contents/MacOS/9term
Executable file
|
@ -0,0 +1,5 @@
|
|||
#!/bin/bash
|
||||
cd $HOME
|
||||
. ~/.bashrc
|
||||
PLAN9=${PLAN9:-/usr/local/plan9}
|
||||
$PLAN9/bin/9term -W600x800 &
|
2
mac/9term.app/Contents/PkgInfo
Normal file
2
mac/9term.app/Contents/PkgInfo
Normal file
|
@ -0,0 +1,2 @@
|
|||
APPL9term
|
||||
|
BIN
mac/9term.app/Contents/Resources/spaceglenda.icns
Normal file
BIN
mac/9term.app/Contents/Resources/spaceglenda.icns
Normal file
Binary file not shown.
78
mac/Plumb.app/Contents/Info.plist
Normal file
78
mac/Plumb.app/Contents/Info.plist
Normal file
|
@ -0,0 +1,78 @@
|
|||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
|
||||
<plist version="1.0">
|
||||
<dict>
|
||||
<key>CFBundleDevelopmentRegion</key>
|
||||
<string>English</string>
|
||||
<key>CFBundleExecutable</key>
|
||||
<string>plumb</string>
|
||||
<key>CFBundleGetInfoString</key>
|
||||
<string>1</string>
|
||||
<key>CFBundleIconFile</key>
|
||||
<string>pjw.icns</string>
|
||||
<key>CFBundleIdentifier</key>
|
||||
<string>com.swtch.plan9port.plumb</string>
|
||||
<key>CFBundleInfoDictionaryVersion</key>
|
||||
<string>6.0</string>
|
||||
<key>CFBundleName</key>
|
||||
<string>Plumb</string>
|
||||
<key>CFBundlePackageType</key>
|
||||
<string>APPL</string>
|
||||
<key>CFBundleShortVersionString</key>
|
||||
<string>1</string>
|
||||
<key>CFBundleSignature</key>
|
||||
<string>Plumb1</string>
|
||||
<key>CFBundleVersion</key>
|
||||
<string>1</string>
|
||||
<key>CFBundleDocumentTypes</key>
|
||||
<array>
|
||||
<dict>
|
||||
<key>CFBundleTypeExtensions</key>
|
||||
<array>
|
||||
<string>C</string>
|
||||
<string>asm</string>
|
||||
<string>b</string>
|
||||
<string>c</string>
|
||||
<string>cc</string>
|
||||
<string>cgi</string>
|
||||
<string>cgo</string>
|
||||
<string>cpp</string>
|
||||
<string>cs</string>
|
||||
<string>go</string>
|
||||
<string>goc</string>
|
||||
<string>h</string>
|
||||
<string>java</string>
|
||||
<string>l</string>
|
||||
<string>lx</string>
|
||||
<string>m</string>
|
||||
<string>ms</string>
|
||||
<string>pl</string>
|
||||
<string>py</string>
|
||||
<string>s</string>
|
||||
<string>tex</string>
|
||||
<string>txt</string>
|
||||
<string>xy</string>
|
||||
<string>y</string>
|
||||
</array>
|
||||
<key>CFBundleTypeIconFile</key>
|
||||
<string>spaceglenda.icns</string>
|
||||
<key>CFBundleTypeMIMETypes</key>
|
||||
<array>
|
||||
<string>text/plain</string>
|
||||
</array>
|
||||
<key>LSItemContentTypes</key>
|
||||
<array>
|
||||
<string>public.plain-text</string>
|
||||
<string>public.source-code</string>
|
||||
</array>
|
||||
<key>CFBundleTypeName</key>
|
||||
<string>Program Files</string>
|
||||
<key>CFBundleTypeOSTypes</key>
|
||||
<array>
|
||||
</array>
|
||||
<key>CFBundleTypeRole</key>
|
||||
<string>Viewer</string>
|
||||
</dict>
|
||||
</array>
|
||||
</dict>
|
||||
</plist>
|
4
mac/Plumb.app/Contents/MacOS/plumb
Executable file
4
mac/Plumb.app/Contents/MacOS/plumb
Executable file
|
@ -0,0 +1,4 @@
|
|||
#!/bin/bash
|
||||
. ~/.bashrc
|
||||
PLAN9=${PLAN9:-/usr/local/plan9}
|
||||
$PLAN9/bin/plumb $($PLAN9/bin/macargv)
|
2
mac/Plumb.app/Contents/PkgInfo
Normal file
2
mac/Plumb.app/Contents/PkgInfo
Normal file
|
@ -0,0 +1,2 @@
|
|||
APPLPlumb
|
||||
|
BIN
mac/Plumb.app/Contents/Resources/pjw.icns
Normal file
BIN
mac/Plumb.app/Contents/Resources/pjw.icns
Normal file
Binary file not shown.
BIN
mac/spaceglenda.icns
Normal file
BIN
mac/spaceglenda.icns
Normal file
Binary file not shown.
BIN
mac/spaceglenda.png
Normal file
BIN
mac/spaceglenda.png
Normal file
Binary file not shown.
After Width: | Height: | Size: 1.3 MiB |
90
src/cmd/devdraw/macargv.c
Normal file
90
src/cmd/devdraw/macargv.c
Normal file
|
@ -0,0 +1,90 @@
|
|||
#include <u.h>
|
||||
#include <stdio.h>
|
||||
#include <Carbon/Carbon.h>
|
||||
|
||||
AUTOFRAMEWORK(Carbon)
|
||||
|
||||
static OSErr Handler(const AppleEvent *event, AppleEvent *reply, long handlerRefcon);
|
||||
|
||||
int
|
||||
main(void)
|
||||
{
|
||||
AEInstallEventHandler(kCoreEventClass, kAEOpenDocuments, Handler, 0, false);
|
||||
RunApplicationEventLoop();
|
||||
return 0;
|
||||
}
|
||||
|
||||
static OSErr
|
||||
GetFullPathname(FSSpec *fss, char *path, int len)
|
||||
{
|
||||
FSRef fsr;
|
||||
OSErr err;
|
||||
|
||||
*path = '\0';
|
||||
err = FSpMakeFSRef(fss, &fsr);
|
||||
if (err == fnfErr) {
|
||||
/* FSSpecs can point to non-existing files, fsrefs can't. */
|
||||
FSSpec fss2;
|
||||
int tocopy;
|
||||
|
||||
err = FSMakeFSSpec(fss->vRefNum, fss->parID,
|
||||
(unsigned char*)"", &fss2);
|
||||
if (err)
|
||||
return err;
|
||||
err = FSpMakeFSRef(&fss2, &fsr);
|
||||
if (err)
|
||||
return err;
|
||||
err = (OSErr)FSRefMakePath(&fsr, (unsigned char*)path, len-1);
|
||||
if (err)
|
||||
return err;
|
||||
/* This part is not 100% safe: we append the filename part, but
|
||||
** I'm not sure that we don't run afoul of the various 8bit
|
||||
** encodings here. Will have to look this up at some point...
|
||||
*/
|
||||
strcat(path, "/");
|
||||
tocopy = fss->name[0];
|
||||
if ((strlen(path) + tocopy) >= len)
|
||||
tocopy = len - strlen(path) - 1;
|
||||
if (tocopy > 0)
|
||||
strncat(path, (char*)fss->name+1, tocopy);
|
||||
}
|
||||
else {
|
||||
if (err)
|
||||
return err;
|
||||
err = (OSErr)FSRefMakePath(&fsr, (unsigned char*)path, len);
|
||||
if (err)
|
||||
return err;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
static void
|
||||
chk(int err)
|
||||
{
|
||||
if(err != 0) {
|
||||
printf("err %d\n", err);
|
||||
exit(1);
|
||||
}
|
||||
}
|
||||
|
||||
static OSErr
|
||||
Handler(const AppleEvent *event, AppleEvent *reply, long handlerRefcon)
|
||||
{
|
||||
AEDesc list;
|
||||
DescType type;
|
||||
FSSpec f;
|
||||
AEKeyword keyword;
|
||||
Size actual;
|
||||
long len;
|
||||
char s[1000];
|
||||
|
||||
chk(AEGetParamDesc(event, keyDirectObject, typeAEList, &list));
|
||||
chk(AECountItems(&list, &len));
|
||||
chk(AEGetNthPtr(&list, 1, typeFSS, &keyword, &type, (Ptr*)&f, sizeof(FSSpec), &actual));
|
||||
chk(GetFullPathname(&f, s, sizeof s));
|
||||
printf("%s\n", s);
|
||||
fflush(stdout);
|
||||
|
||||
// uncomment to keep handling more open events
|
||||
exit(0);
|
||||
}
|
|
@ -41,3 +41,8 @@ CLEANFILES=latin1.h $O.mklatinkbd
|
|||
devdraw-cocoa: devdraw.o latin1.o mouseswap.o winsize.o osx-screen-objc.o osx-draw.o osx-srv-objc.o osx-delegate-objc.o
|
||||
$LD -o $target $prereq
|
||||
|
||||
install-macargv: $O.macargv
|
||||
install $O.macargv $PLAN9/bin/macargv
|
||||
|
||||
$O.macargv: macargv.$O
|
||||
$LD -o $target $prereq
|
||||
|
|
|
@ -52,6 +52,7 @@ elif [ $WSYSTYPE = osx ]; then
|
|||
echo 'LDFLAGS=$LDFLAGS -F/System/Library/PrivateFrameworks'
|
||||
fi
|
||||
echo 'WSYSOFILES=$WSYSOFILES osx-screen-carbon-objc.o osx-draw.o osx-srv.o'
|
||||
echo 'install: install-macargv'
|
||||
elif [ $WSYSTYPE = nowsys ]; then
|
||||
echo 'WSYSOFILES=nowsys.o'
|
||||
fi
|
||||
|
|
|
@ -41,3 +41,6 @@ error.$O: showevent/ShowEvent.c
|
|||
$O.xshove: xshove.$O
|
||||
$LD -o $O.xshove xshove.$O -lX11
|
||||
|
||||
# bug in reusing mksysrules.sh
|
||||
install-macargv:
|
||||
true
|
||||
|
|
Loading…
Reference in a new issue