ยปCore Development>Code coverage>Lib/plat-irix5/flp.py

Python code coverage for Lib/plat-irix5/flp.py

#countcontent
1n/a#
2n/a# flp - Module to load fl forms from fd files
3n/a#
4n/a# Jack Jansen, December 1991
5n/a#
6n/afrom warnings import warnpy3k
7n/awarnpy3k("the flp module has been removed in Python 3.0", stacklevel=2)
8n/adel warnpy3k
9n/a
10n/aimport string
11n/aimport os
12n/aimport sys
13n/aimport FL
14n/a
15n/aSPLITLINE = '--------------------'
16n/aFORMLINE = '=============== FORM ==============='
17n/aENDLINE = '=============================='
18n/a
19n/aclass error(Exception):
20n/a pass
21n/a
22n/a##################################################################
23n/a# Part 1 - The parsing routines #
24n/a##################################################################
25n/a
26n/a#
27n/a# Externally visible function. Load form.
28n/a#
29n/adef parse_form(filename, formname):
30n/a forms = checkcache(filename)
31n/a if forms is None:
32n/a forms = parse_forms(filename)
33n/a if forms.has_key(formname):
34n/a return forms[formname]
35n/a else:
36n/a raise error, 'No such form in fd file'
37n/a
38n/a#
39n/a# Externally visible function. Load all forms.
40n/a#
41n/adef parse_forms(filename):
42n/a forms = checkcache(filename)
43n/a if forms is not None: return forms
44n/a fp = _open_formfile(filename)
45n/a nforms = _parse_fd_header(fp)
46n/a forms = {}
47n/a for i in range(nforms):
48n/a form = _parse_fd_form(fp, None)
49n/a forms[form[0].Name] = form
50n/a writecache(filename, forms)
51n/a return forms
52n/a
53n/a#
54n/a# Internal: see if a cached version of the file exists
55n/a#
56n/aMAGIC = '.fdc'
57n/a_internal_cache = {} # Used by frozen scripts only
58n/adef checkcache(filename):
59n/a if _internal_cache.has_key(filename):
60n/a altforms = _internal_cache[filename]
61n/a return _unpack_cache(altforms)
62n/a import marshal
63n/a fp, filename = _open_formfile2(filename)
64n/a fp.close()
65n/a cachename = filename + 'c'
66n/a try:
67n/a fp = open(cachename, 'r')
68n/a except IOError:
69n/a #print 'flp: no cache file', cachename
70n/a return None
71n/a try:
72n/a if fp.read(4) != MAGIC:
73n/a print 'flp: bad magic word in cache file', cachename
74n/a return None
75n/a cache_mtime = rdlong(fp)
76n/a file_mtime = getmtime(filename)
77n/a if cache_mtime != file_mtime:
78n/a #print 'flp: outdated cache file', cachename
79n/a return None
80n/a #print 'flp: valid cache file', cachename
81n/a altforms = marshal.load(fp)
82n/a return _unpack_cache(altforms)
83n/a finally:
84n/a fp.close()
85n/a
86n/adef _unpack_cache(altforms):
87n/a forms = {}
88n/a for name in altforms.keys():
89n/a altobj, altlist = altforms[name]
90n/a obj = _newobj()
91n/a obj.make(altobj)
92n/a list = []
93n/a for altobj in altlist:
94n/a nobj = _newobj()
95n/a nobj.make(altobj)
96n/a list.append(nobj)
97n/a forms[name] = obj, list
98n/a return forms
99n/a
100n/adef rdlong(fp):
101n/a s = fp.read(4)
102n/a if len(s) != 4: return None
103n/a a, b, c, d = s[0], s[1], s[2], s[3]
104n/a return ord(a)<<24 | ord(b)<<16 | ord(c)<<8 | ord(d)
105n/a
106n/adef wrlong(fp, x):
107n/a a, b, c, d = (x>>24)&0xff, (x>>16)&0xff, (x>>8)&0xff, x&0xff
108n/a fp.write(chr(a) + chr(b) + chr(c) + chr(d))
109n/a
110n/adef getmtime(filename):
111n/a import os
112n/a from stat import ST_MTIME
113n/a try:
114n/a return os.stat(filename)[ST_MTIME]
115n/a except os.error:
116n/a return None
117n/a
118n/a#
119n/a# Internal: write cached version of the form (parsing is too slow!)
120n/a#
121n/adef writecache(filename, forms):
122n/a import marshal
123n/a fp, filename = _open_formfile2(filename)
124n/a fp.close()
125n/a cachename = filename + 'c'
126n/a try:
127n/a fp = open(cachename, 'w')
128n/a except IOError:
129n/a print 'flp: can\'t create cache file', cachename
130n/a return # Never mind
131n/a fp.write('\0\0\0\0') # Seek back and write MAGIC when done
132n/a wrlong(fp, getmtime(filename))
133n/a altforms = _pack_cache(forms)
134n/a marshal.dump(altforms, fp)
135n/a fp.seek(0)
136n/a fp.write(MAGIC)
137n/a fp.close()
138n/a #print 'flp: wrote cache file', cachename
139n/a
140n/a#
141n/a# External: print some statements that set up the internal cache.
142n/a# This is for use with the "freeze" script. You should call
143n/a# flp.freeze(filename) for all forms used by the script, and collect
144n/a# the output on a file in a module file named "frozenforms.py". Then
145n/a# in the main program of the script import frozenforms.
146n/a# (Don't forget to take this out when using the unfrozen version of
147n/a# the script!)
148n/a#
149n/adef freeze(filename):
150n/a forms = parse_forms(filename)
151n/a altforms = _pack_cache(forms)
152n/a print 'import flp'
153n/a print 'flp._internal_cache[', repr(filename), '] =', altforms
154n/a
155n/a#
156n/a# Internal: create the data structure to be placed in the cache
157n/a#
158n/adef _pack_cache(forms):
159n/a altforms = {}
160n/a for name in forms.keys():
161n/a obj, list = forms[name]
162n/a altobj = obj.__dict__
163n/a altlist = []
164n/a for obj in list: altlist.append(obj.__dict__)
165n/a altforms[name] = altobj, altlist
166n/a return altforms
167n/a
168n/a#
169n/a# Internal: Locate form file (using PYTHONPATH) and open file
170n/a#
171n/adef _open_formfile(filename):
172n/a return _open_formfile2(filename)[0]
173n/a
174n/adef _open_formfile2(filename):
175n/a if filename[-3:] != '.fd':
176n/a filename = filename + '.fd'
177n/a if filename[0] == '/':
178n/a try:
179n/a fp = open(filename,'r')
180n/a except IOError:
181n/a fp = None
182n/a else:
183n/a for pc in sys.path:
184n/a pn = os.path.join(pc, filename)
185n/a try:
186n/a fp = open(pn, 'r')
187n/a filename = pn
188n/a break
189n/a except IOError:
190n/a fp = None
191n/a if fp is None:
192n/a raise error, 'Cannot find forms file ' + filename
193n/a return fp, filename
194n/a
195n/a#
196n/a# Internal: parse the fd file header, return number of forms
197n/a#
198n/adef _parse_fd_header(file):
199n/a # First read the magic header line
200n/a datum = _parse_1_line(file)
201n/a if datum != ('Magic', 12321):
202n/a raise error, 'Not a forms definition file'
203n/a # Now skip until we know number of forms
204n/a while 1:
205n/a datum = _parse_1_line(file)
206n/a if type(datum) == type(()) and datum[0] == 'Numberofforms':
207n/a break
208n/a return datum[1]
209n/a#
210n/a# Internal: parse fd form, or skip if name doesn't match.
211n/a# the special value None means 'always parse it'.
212n/a#
213n/adef _parse_fd_form(file, name):
214n/a datum = _parse_1_line(file)
215n/a if datum != FORMLINE:
216n/a raise error, 'Missing === FORM === line'
217n/a form = _parse_object(file)
218n/a if form.Name == name or name is None:
219n/a objs = []
220n/a for j in range(form.Numberofobjects):
221n/a obj = _parse_object(file)
222n/a objs.append(obj)
223n/a return (form, objs)
224n/a else:
225n/a for j in range(form.Numberofobjects):
226n/a _skip_object(file)
227n/a return None
228n/a
229n/a#
230n/a# Internal class: a convenient place to store object info fields
231n/a#
232n/aclass _newobj:
233n/a def add(self, name, value):
234n/a self.__dict__[name] = value
235n/a def make(self, dict):
236n/a for name in dict.keys():
237n/a self.add(name, dict[name])
238n/a
239n/a#
240n/a# Internal parsing routines.
241n/a#
242n/adef _parse_string(str):
243n/a if '\\' in str:
244n/a s = '\'' + str + '\''
245n/a try:
246n/a return eval(s)
247n/a except:
248n/a pass
249n/a return str
250n/a
251n/adef _parse_num(str):
252n/a return eval(str)
253n/a
254n/adef _parse_numlist(str):
255n/a slist = string.split(str)
256n/a nlist = []
257n/a for i in slist:
258n/a nlist.append(_parse_num(i))
259n/a return nlist
260n/a
261n/a# This dictionary maps item names to parsing routines.
262n/a# If no routine is given '_parse_num' is default.
263n/a_parse_func = { \
264n/a 'Name': _parse_string, \
265n/a 'Box': _parse_numlist, \
266n/a 'Colors': _parse_numlist, \
267n/a 'Label': _parse_string, \
268n/a 'Name': _parse_string, \
269n/a 'Callback': _parse_string, \
270n/a 'Argument': _parse_string }
271n/a
272n/a# This function parses a line, and returns either
273n/a# a string or a tuple (name,value)
274n/a
275n/aimport re
276n/aprog = re.compile('^([^:]*): *(.*)')
277n/a
278n/adef _parse_line(line):
279n/a match = prog.match(line)
280n/a if not match:
281n/a return line
282n/a name, value = match.group(1, 2)
283n/a if name[0] == 'N':
284n/a name = string.join(string.split(name),'')
285n/a name = string.lower(name)
286n/a name = string.capitalize(name)
287n/a try:
288n/a pf = _parse_func[name]
289n/a except KeyError:
290n/a pf = _parse_num
291n/a value = pf(value)
292n/a return (name, value)
293n/a
294n/adef _readline(file):
295n/a line = file.readline()
296n/a if not line:
297n/a raise EOFError
298n/a return line[:-1]
299n/a
300n/adef _parse_1_line(file):
301n/a line = _readline(file)
302n/a while line == '':
303n/a line = _readline(file)
304n/a return _parse_line(line)
305n/a
306n/adef _skip_object(file):
307n/a line = ''
308n/a while not line in (SPLITLINE, FORMLINE, ENDLINE):
309n/a pos = file.tell()
310n/a line = _readline(file)
311n/a if line == FORMLINE:
312n/a file.seek(pos)
313n/a
314n/adef _parse_object(file):
315n/a obj = _newobj()
316n/a while 1:
317n/a pos = file.tell()
318n/a datum = _parse_1_line(file)
319n/a if datum in (SPLITLINE, FORMLINE, ENDLINE):
320n/a if datum == FORMLINE:
321n/a file.seek(pos)
322n/a return obj
323n/a if type(datum) is not type(()) or len(datum) != 2:
324n/a raise error, 'Parse error, illegal line in object: '+datum
325n/a obj.add(datum[0], datum[1])
326n/a
327n/a#################################################################
328n/a# Part 2 - High-level object/form creation routines #
329n/a#################################################################
330n/a
331n/a#
332n/a# External - Create a form an link to an instance variable.
333n/a#
334n/adef create_full_form(inst, (fdata, odatalist)):
335n/a form = create_form(fdata)
336n/a exec 'inst.'+fdata.Name+' = form\n'
337n/a for odata in odatalist:
338n/a create_object_instance(inst, form, odata)
339n/a
340n/a#
341n/a# External - Merge a form into an existing form in an instance
342n/a# variable.
343n/a#
344n/adef merge_full_form(inst, form, (fdata, odatalist)):
345n/a exec 'inst.'+fdata.Name+' = form\n'
346n/a if odatalist[0].Class != FL.BOX:
347n/a raise error, 'merge_full_form() expects FL.BOX as first obj'
348n/a for odata in odatalist[1:]:
349n/a create_object_instance(inst, form, odata)
350n/a
351n/a
352n/a#################################################################
353n/a# Part 3 - Low-level object/form creation routines #
354n/a#################################################################
355n/a
356n/a#
357n/a# External Create_form - Create form from parameters
358n/a#
359n/adef create_form(fdata):
360n/a import fl
361n/a return fl.make_form(FL.NO_BOX, fdata.Width, fdata.Height)
362n/a
363n/a#
364n/a# External create_object - Create an object. Make sure there are
365n/a# no callbacks. Returns the object created.
366n/a#
367n/adef create_object(form, odata):
368n/a obj = _create_object(form, odata)
369n/a if odata.Callback:
370n/a raise error, 'Creating free object with callback'
371n/a return obj
372n/a#
373n/a# External create_object_instance - Create object in an instance.
374n/a#
375n/adef create_object_instance(inst, form, odata):
376n/a obj = _create_object(form, odata)
377n/a if odata.Callback:
378n/a cbfunc = eval('inst.'+odata.Callback)
379n/a obj.set_call_back(cbfunc, odata.Argument)
380n/a if odata.Name:
381n/a exec 'inst.' + odata.Name + ' = obj\n'
382n/a#
383n/a# Internal _create_object: Create the object and fill options
384n/a#
385n/adef _create_object(form, odata):
386n/a crfunc = _select_crfunc(form, odata.Class)
387n/a obj = crfunc(odata.Type, odata.Box[0], odata.Box[1], odata.Box[2], \
388n/a odata.Box[3], odata.Label)
389n/a if not odata.Class in (FL.BEGIN_GROUP, FL.END_GROUP):
390n/a obj.boxtype = odata.Boxtype
391n/a obj.col1 = odata.Colors[0]
392n/a obj.col2 = odata.Colors[1]
393n/a obj.align = odata.Alignment
394n/a obj.lstyle = odata.Style
395n/a obj.lsize = odata.Size
396n/a obj.lcol = odata.Lcol
397n/a return obj
398n/a#
399n/a# Internal crfunc: helper function that returns correct create function
400n/a#
401n/adef _select_crfunc(fm, cl):
402n/a if cl == FL.BEGIN_GROUP: return fm.bgn_group
403n/a elif cl == FL.END_GROUP: return fm.end_group
404n/a elif cl == FL.BITMAP: return fm.add_bitmap
405n/a elif cl == FL.BOX: return fm.add_box
406n/a elif cl == FL.BROWSER: return fm.add_browser
407n/a elif cl == FL.BUTTON: return fm.add_button
408n/a elif cl == FL.CHART: return fm.add_chart
409n/a elif cl == FL.CHOICE: return fm.add_choice
410n/a elif cl == FL.CLOCK: return fm.add_clock
411n/a elif cl == FL.COUNTER: return fm.add_counter
412n/a elif cl == FL.DIAL: return fm.add_dial
413n/a elif cl == FL.FREE: return fm.add_free
414n/a elif cl == FL.INPUT: return fm.add_input
415n/a elif cl == FL.LIGHTBUTTON: return fm.add_lightbutton
416n/a elif cl == FL.MENU: return fm.add_menu
417n/a elif cl == FL.POSITIONER: return fm.add_positioner
418n/a elif cl == FL.ROUNDBUTTON: return fm.add_roundbutton
419n/a elif cl == FL.SLIDER: return fm.add_slider
420n/a elif cl == FL.VALSLIDER: return fm.add_valslider
421n/a elif cl == FL.TEXT: return fm.add_text
422n/a elif cl == FL.TIMER: return fm.add_timer
423n/a else:
424n/a raise error, 'Unknown object type: %r' % (cl,)
425n/a
426n/a
427n/adef test():
428n/a import time
429n/a t0 = time.time()
430n/a if len(sys.argv) == 2:
431n/a forms = parse_forms(sys.argv[1])
432n/a t1 = time.time()
433n/a print 'parse time:', 0.001*(t1-t0), 'sec.'
434n/a keys = forms.keys()
435n/a keys.sort()
436n/a for i in keys:
437n/a _printform(forms[i])
438n/a elif len(sys.argv) == 3:
439n/a form = parse_form(sys.argv[1], sys.argv[2])
440n/a t1 = time.time()
441n/a print 'parse time:', round(t1-t0, 3), 'sec.'
442n/a _printform(form)
443n/a else:
444n/a print 'Usage: test fdfile [form]'
445n/a
446n/adef _printform(form):
447n/a f = form[0]
448n/a objs = form[1]
449n/a print 'Form ', f.Name, ', size: ', f.Width, f.Height, ' Nobj ', f.Numberofobjects
450n/a for i in objs:
451n/a print ' Obj ', i.Name, ' type ', i.Class, i.Type
452n/a print ' Box ', i.Box, ' btype ', i.Boxtype
453n/a print ' Label ', i.Label, ' size/style/col/align ', i.Size,i.Style, i.Lcol, i.Alignment
454n/a print ' cols ', i.Colors
455n/a print ' cback ', i.Callback, i.Argument