annotate nt/installer/Wise/pre_wise.py @ 981:0205cafe98ff

[xemacs-hg @ 2002-08-30 08:25:48 by youngs] Don't look now, but 21.5.9 is on its way out the door! Don't forget what good 'ol Ma used to say... "Eat your brussels sprouts, little Johnny, so you can grow up big and strong."
author youngs
date Fri, 30 Aug 2002 08:26:22 +0000
parents 74fd4e045ea6
children a268de273009
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
1 import string
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
2 import re
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
3 import os
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
4 import types
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
5
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
6 infile=open("xemacs.tmpl","r")
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
7
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
8 import version
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
9 import dirs
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
10 import filelist
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
11 import packages
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
12
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
13 def letter(package):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
14 index = packages.all.index(package)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
15 if index>29:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
16 raise "WISE error: too many components"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
17 return chr(ord("A")+index)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
18
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
19 def letters(package_list):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
20 ret = ""
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
21 for p in package_list:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
22 ret = ret+letter(p)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
23 return ret
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
24
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
25 def describe(package):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
26 if package in packages.descriptions.keys():
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
27 return ": "+packages.descriptions[package]
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
28 else: return ""
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
29
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
30 def ifblock(var,val):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
31 return("item: If/While Statement\n Variable=%s\n Value=%s\n Flags=00001010\nend\n" % (var,val))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
32
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
33 def endblock():
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
34 return("item: End Block\nend\n")
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
35
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
36 def setvar(var,val):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
37 return("item: Set Variable\n Variable=%s\n Value=%s\n Flags=10000000\nend\n" % (string.upper(var), val))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
38
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
39 def default_letters_of_category(cat):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
40 val = ""
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
41 for p in packages.default:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
42 if packages.category_of_package(p) == cat:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
43 val = val + packages.letter_of_package(p)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
44 return val
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
45
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
46 def set_category_defaults():
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
47 ret = ""
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
48 for c in packages.category_names:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
49 ret = ret + setvar(c, default_letters_of_category(c))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
50 return ret
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
51
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
52 def do_category(cat):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
53 ret = ifblock("COMPONENTS", packages.letter_of_category(cat))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
54 for pkg in packages.packages_of_category(cat):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
55 ret = ret + ifblock(string.upper(cat),packages.letter_of_package(pkg))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
56 for f in files_of_package(pkg):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
57 ret = ret+install_pkg_file(f)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
58 ret = ret + endblock()
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
59 ret = ret + endblock()
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
60 return ret
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
61
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
62 def files_of_package(package):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
63 manifest_file = dirs.packages + "\\pkginfo\\MANIFEST." + package
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
64 manifest = open(manifest_file,"r")
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
65 lines = manifest.readlines()
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
66 lines = map(lambda s:s[:-1], lines)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
67 lines = map(lambda s:string.replace(s,'/','\\'), lines)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
68 return lines
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
69
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
70 def category_dialog(cat):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
71 npkg = len(packages.packages_of_category(cat))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
72 ret=""
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
73 ret=ret+" item: Dialog\n Title="+packages.category_descriptions[cat]+" Packages\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
74 ret=ret+" Width=210\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
75 ret=ret+" Height=%d\n" % (45+npkg*10)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
76 ret=ret+" Font Name=Helv\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
77 ret=ret+" Font Size=8\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
78 ret=ret+" item: Push Button\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
79 ret=ret+" Rectangle=107 %d 147 %d\n" % (5+npkg*10+2, 5+npkg*10+17)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
80 ret=ret+" Create Flags=01010000000000010000000000000001\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
81 ret=ret+" Text=OK\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
82 ret=ret+" end\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
83 ret=ret+" item: Push Button\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
84 ret=ret+" Rectangle=153 %d 193 %d\n" % (5+npkg*10+2, 5+npkg*10+17)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
85 ret=ret+" Variable=%s\n" % string.upper(cat)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
86 ret=ret+" Value=%%%s_SAVE%%\n" % string.upper(cat)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
87 ret=ret+" Create Flags=01010000000000010000000000000000\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
88 ret=ret+" Flags=0000000000000001\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
89 ret=ret+" Text=Cancel\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
90 ret=ret+" end\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
91 ret=ret+" item: Checkbox\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
92 ret=ret+" Rectangle=0 5 191 %d\n" % (10*npkg)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
93 ret=ret+" Variable=%s\n"%string.upper(cat)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
94 ret=ret+" Create Flags=01010000000000010000000000000011\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
95 ret=ret+" Flags=0000000000000010\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
96 for pkg in packages.packages_of_category(cat):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
97 ret = ret+" Text=%s: %s\n"%( pkg, packages.package_descriptions[pkg])
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
98 ret=ret+" Text=\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
99 ret=ret+" end\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
100 ret=ret+" end\n"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
101 return ret
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
102
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
103 def src_path(src,name):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
104 return src + "\\" + name
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
105
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
106 def dst_path(dst,name):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
107 return "%MAINDIR%"+"\\"+dst+"\\" + name
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
108
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
109 def install_file(name,src,dst):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
110 return("item: Install File\n Source=%s\n Destination=%s\n Flags=0000000010000010\nend\n" % (src_path(src,name),dst_path(dst,name)))
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
111
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
112 def install_pkg_file(name):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
113 return install_file(name,dirs.packages,dirs.pkg_dst)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
114
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
115 def do_package(package):
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
116 return ifblock("COMPONENTS",letter(package)) + \
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
117 string.join(map(install_pkg_file,files(package)),"")+ \
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
118 endblock()
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
119
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
120 for line in infile.readlines():
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
121 left=string.find(line,"<<<")
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
122 if left>=0:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
123 right=string.find(line,">>>")
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
124 expr=line[left+3:right]
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
125 val=eval(expr)
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
126 if type(val)==types.StringType:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
127 print line[:left] + val + line[right+3:],
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
128 elif type(val)==types.ListType:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
129 for v in val:
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
130 print line[:left] + v + line[right+3:],
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
131 else: print line,
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
132
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
133