1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
# This python script creates Finder aliases for all the
# dynamically-loaded modules that "live in" in a single
# shared library.
# It needs a fully functional non-dynamic python to work
# (since it creates aliases to stuff it needs itself),
# you should probably drag it onto your non-dynamic python.
#
# If you compare it to MkPluginAliases.as it also serves
# as a comparison between python and AppleScript:-)
#
# Jack Jansen, CWI, August 1995
import os
import macfs
import sys
try:
import Res
except ImportError:
print """
Res module not found, which probably means that you are trying
to execute this script with a dynamically-linked python. This will
not work, since the whole point of the script is to create aliases
for dynamically-linked python to use. Do one of the following:
- Run this script using a non-dynamic python
- Use MkPluginAliases.as (an AppleScript)
- Create the aliases by hand (see the source for a list)."""
sys.exit(1)
import EasyDialogs
goals = [
("mactcp.slb", "mactcpmodules.slb"),
("macdnr.slb", "mactcpmodules.slb"),
("AE.slb", "toolboxmodules.slb"),
("Ctl.slb", "toolboxmodules.slb"),
("Dlg.slb", "toolboxmodules.slb"),
("Evt.slb", "toolboxmodules.slb"),
("Menu.slb", "toolboxmodules.slb"),
("Qd.slb", "toolboxmodules.slb"),
("Res.slb", "toolboxmodules.slb"),
("Snd.slb", "toolboxmodules.slb"),
("Win.slb", "toolboxmodules.slb"),
("imgcolormap.slb", "imgmodules.slb"),
("imgformat.slb", "imgmodules.slb"),
("imggif.slb", "imgmodules.slb"),
("imgjpeg.slb", "imgmodules.slb"),
("imgop.slb", "imgmodules.slb"),
("imgpgm.slb", "imgmodules.slb"),
("imgppm.slb", "imgmodules.slb"),
("imgtiff.slb", "imgmodules.slb")
]
#
# Not guaranteed to be correct or stay correct (Apple doesn't tell you
# how to do this), but it seems to work.
#
def mkalias(src, dst):
"""Create a finder alias"""
srcfss = macfs.FSSpec(src)
dstfss = macfs.FSSpec(dst)
alias = srcfss.NewAlias()
srcfinfo = srcfss.GetFInfo()
Res.FSpCreateResFile(dstfss, srcfinfo.Creator, srcfinfo.Type, -1)
h = Res.FSpOpenResFile(dstfss, 3)
resource = Res.Resource(alias.data)
resource.AddResource('alis', 0, '')
Res.CloseResFile(h)
dstfinfo = dstfss.GetFInfo()
dstfinfo.Flags = dstfinfo.Flags|0x8000 # Alias flag
dstfss.SetFInfo(dstfinfo)
def main():
# Ask the user for the plugins directory
dir, ok = macfs.GetDirectory()
if not ok: sys.exit(0)
os.chdir(dir.as_pathname())
# Remove old .slb aliases and collect a list of .slb files
if EasyDialogs.AskYesNoCancel('Proceed with removing old aliases?') <= 0:
sys.exit(0)
LibFiles = []
allfiles = os.listdir(':')
for f in allfiles:
if f[-4:] == '.slb':
finfo = macfs.FSSpec(f).GetFInfo()
if finfo.Flags & 0x8000:
os.unlink(f)
else:
LibFiles.append(f)
print LibFiles
# Create the new aliases.
if EasyDialogs.AskYesNoCancel('Proceed with creating new ones?') <= 0:
sys.exit(0)
for dst, src in goals:
if src in LibFiles:
mkalias(src, dst)
else:
EasyDialogs.Message(dst+' not created: '+src+' not found')
EasyDialogs.Message('All done!')
if __name__ == '__main__':
main()
|
