mirror of https://github.com/python/cpython.git
315 lines
8.4 KiB
Python
Executable File
315 lines
8.4 KiB
Python
Executable File
#
|
|
# flp - Module to load fl forms from fd files
|
|
#
|
|
# Jack Jansen, December 1991
|
|
#
|
|
import string
|
|
import path
|
|
import sys
|
|
import fl
|
|
import FL
|
|
|
|
SPLITLINE = '--------------------'
|
|
FORMLINE = '=============== FORM ==============='
|
|
ENDLINE = '=============================='
|
|
|
|
error = 'flp.error'
|
|
|
|
##################################################################
|
|
# Part 1 - The parsing routines #
|
|
##################################################################
|
|
|
|
#
|
|
# Externally visible function. Load form.
|
|
#
|
|
def parse_form(filename, formname):
|
|
fp = _open_formfile(filename)
|
|
nforms = _parse_fd_header(fp)
|
|
for i in range(nforms):
|
|
form = _parse_fd_form(fp, formname)
|
|
if form <> None:
|
|
return form
|
|
raise error, 'No such form in fd file'
|
|
|
|
#
|
|
# Externally visible function. Load all forms.
|
|
#
|
|
def parse_forms(filename):
|
|
fp = _open_formfile(filename)
|
|
nforms = _parse_fd_header(fp)
|
|
forms = {}
|
|
for i in range(nforms):
|
|
form = _parse_fd_form(fp, None)
|
|
forms[form[0].Name] = form
|
|
return forms
|
|
|
|
#
|
|
# Internal: Locate form file (using PYTHONPATH) and open file
|
|
#
|
|
def _open_formfile(filename):
|
|
if filename[-3:] <> '.fd':
|
|
filename = filename + '.fd'
|
|
if filename[0] = '/':
|
|
try:
|
|
fp = open(filename,'r')
|
|
except IOError:
|
|
fp = None
|
|
else:
|
|
for pc in sys.path:
|
|
pn = path.join(pc, filename)
|
|
try:
|
|
fp = open(pn, 'r')
|
|
break
|
|
except IOError:
|
|
fp = None
|
|
if fp = None:
|
|
raise error, 'Cannot find forms file ' + filename
|
|
return fp
|
|
|
|
#
|
|
# Internal: parse the fd file header, return number of forms
|
|
#
|
|
def _parse_fd_header(file):
|
|
# First read the magic header line
|
|
datum = _parse_1_line(file)
|
|
if datum <> ('Magic', 12321):
|
|
raise error, 'Not a forms definition file'
|
|
# Now skip until we know number of forms
|
|
while 1:
|
|
datum = _parse_1_line(file)
|
|
if type(datum) = type(()) and datum[0] = 'Numberofforms':
|
|
break
|
|
return datum[1]
|
|
#
|
|
# Internal: parse fd form, or skip if name doesn't match.
|
|
# the special value None means 'allways parse it'.
|
|
#
|
|
def _parse_fd_form(file, name):
|
|
datum = _parse_1_line(file)
|
|
if datum <> FORMLINE:
|
|
raise error, 'Missing === FORM === line'
|
|
form = _parse_object(file)
|
|
if form.Name = name or name = None:
|
|
objs = []
|
|
for j in range(form.Numberofobjects):
|
|
obj = _parse_object(file)
|
|
objs.append(obj)
|
|
return (form, objs)
|
|
else:
|
|
for j in range(form.Numberofobjects):
|
|
_skip_object(file)
|
|
return None
|
|
|
|
#
|
|
# Internal class: a convient place to store object info fields
|
|
#
|
|
class _newobj:
|
|
def init(self):
|
|
return self
|
|
def add(self, (name, value)):
|
|
cmd = 'self.'+name+' = '+`value`+'\n'
|
|
exec(cmd)
|
|
|
|
#
|
|
# Internal parsing routines.
|
|
#
|
|
def _parse_string(str):
|
|
return str
|
|
|
|
def _parse_num(str):
|
|
return eval(str)
|
|
|
|
def _parse_numlist(str):
|
|
slist = string.split(str)
|
|
nlist = []
|
|
for i in slist:
|
|
nlist.append(_parse_num(i))
|
|
return nlist
|
|
|
|
# This dictionary maps item names to parsing routines.
|
|
# If no routine is given '_parse_num' is default.
|
|
_parse_func = { \
|
|
'Name': _parse_string, \
|
|
'Box': _parse_numlist, \
|
|
'Colors': _parse_numlist, \
|
|
'Label': _parse_string, \
|
|
'Name': _parse_string, \
|
|
'Callback': _parse_string, \
|
|
'Argument': _parse_string }
|
|
|
|
# This function parses a line, and returns either
|
|
# a string or a tuple (name,value)
|
|
|
|
import regexp
|
|
|
|
def _parse_line(line):
|
|
a = regexp.match('^([^:]*): *(.*)', line)
|
|
if not a:
|
|
return line
|
|
name = line[:a[1][1]]
|
|
if name[0] = 'N':
|
|
name = string.joinfields(string.split(name),'')
|
|
name = string.lower(name)
|
|
name = string.upper(name[0]) + name[1:]
|
|
value = line[a[2][0]:]
|
|
try:
|
|
pf = _parse_func[name]
|
|
except KeyError:
|
|
pf = _parse_num
|
|
value = pf(value)
|
|
return (name, value)
|
|
|
|
def _readline(file):
|
|
line = file.readline()
|
|
if not line:
|
|
raise EOFError
|
|
return line[:-1]
|
|
|
|
def _parse_1_line(file):
|
|
line = _readline(file)
|
|
while line = '':
|
|
line = _readline(file)
|
|
return _parse_line(line)
|
|
|
|
def _skip_object(file):
|
|
line = ''
|
|
while not line in (SPLITLINE, FORMLINE, ENDLINE):
|
|
pos = file.tell()
|
|
line = _readline(file)
|
|
if line = FORMLINE:
|
|
file.seek(pos)
|
|
|
|
def _parse_object(file):
|
|
obj = _newobj().init()
|
|
while 1:
|
|
pos = file.tell()
|
|
datum = _parse_1_line(file)
|
|
if datum in (SPLITLINE, FORMLINE, ENDLINE):
|
|
if datum = FORMLINE:
|
|
file.seek(pos)
|
|
return obj
|
|
if type(datum) <> type(()):
|
|
raise error, 'Parse error, illegal line in object: '+datum
|
|
obj.add(datum)
|
|
|
|
#################################################################
|
|
# Part 2 - High-level object/form creation routines #
|
|
#################################################################
|
|
|
|
#
|
|
# External - Create a form an link to an instance variable.
|
|
#
|
|
def create_full_form(inst, (fdata, odatalist)):
|
|
form = create_form(fdata)
|
|
exec('inst.'+fdata.Name+' = form\n')
|
|
for odata in odatalist:
|
|
create_object_instance(inst, form, odata)
|
|
|
|
#
|
|
# External - Merge a form into an existing form in an instance
|
|
# variable.
|
|
#
|
|
def merge_full_form(inst, form, (fdata, odatalist)):
|
|
exec('inst.'+fdata.Name+' = form\n')
|
|
if odatalist[0].Class <> FL.BOX:
|
|
raise error, 'merge_full_form() expects FL.BOX as first obj'
|
|
for odata in odatalist[1:]:
|
|
create_object_instance(inst, form, odata)
|
|
|
|
|
|
#################################################################
|
|
# Part 3 - Low-level object/form creation routines #
|
|
#################################################################
|
|
|
|
#
|
|
# External Create_form - Create form from parameters
|
|
#
|
|
def create_form(fdata):
|
|
return fl.make_form(FL.NO_BOX,fdata.Width, fdata.Height)
|
|
|
|
#
|
|
# External create_object - Create an object. Make sure there are
|
|
# no callbacks. Returns the object created.
|
|
#
|
|
def create_object(form, odata):
|
|
obj = _create_object(form, odata)
|
|
if odata.Callback:
|
|
raise error, 'Creating free object with callback'
|
|
return obj
|
|
#
|
|
# External create_object_instance - Create object in an instance.
|
|
#
|
|
def create_object_instance(inst, form, odata):
|
|
obj = _create_object(form, odata)
|
|
if odata.Callback:
|
|
cbfunc = eval('inst.'+odata.Callback)
|
|
obj.set_call_back(cbfunc, odata.Argument)
|
|
if odata.Name:
|
|
exec('inst.' + odata.Name + ' = obj\n')
|
|
#
|
|
# Internal _create_object: Create the object and fill options
|
|
#
|
|
def _create_object(form, odata):
|
|
crfunc = _select_crfunc(form, odata.Class)
|
|
obj = crfunc(odata.Type, odata.Box[0], odata.Box[1], odata.Box[2], \
|
|
odata.Box[3], odata.Label)
|
|
if not odata.Class in (FL.BEGIN_GROUP, FL.END_GROUP):
|
|
obj.boxtype = odata.Boxtype
|
|
obj.col1 = odata.Colors[0]
|
|
obj.col2 = odata.Colors[1]
|
|
obj.align = odata.Alignment
|
|
obj.lstyle = odata.Style
|
|
obj.lsize = odata.Size
|
|
obj.lcol = odata.Lcol
|
|
return obj
|
|
#
|
|
# Internal crfunc: helper function that returns correct create function
|
|
#
|
|
def _select_crfunc(fm, cl):
|
|
if cl = FL.BEGIN_GROUP: return fm.bgn_group
|
|
elif cl = FL.END_GROUP: return fm.end_group
|
|
elif cl = FL.BITMAP: return fm.add_bitmap
|
|
elif cl = FL.BOX: return fm.add_box
|
|
elif cl = FL.BROWSER: return fm.add_browser
|
|
elif cl = FL.BUTTON: return fm.add_button
|
|
elif cl = FL.CHART: return fm.add_chart
|
|
elif cl = FL.CHOICE: return fm.add_choice
|
|
elif cl = FL.CLOCK: return fm.add_clock
|
|
elif cl = FL.COUNTER: return fm.add_counter
|
|
elif cl = FL.DIAL: return fm.add_dial
|
|
elif cl = FL.FREE: return fm.add_free
|
|
elif cl = FL.INPUT: return fm.add_input
|
|
elif cl = FL.LIGHTBUTTON: return fm.add_lightbutton
|
|
elif cl = FL.MENU: return fm.add_menu
|
|
elif cl = FL.POSITIONER: return fm.add_positioner
|
|
elif cl = FL.ROUNDBUTTON: return fm.add_roundbutton
|
|
elif cl = FL.SLIDER: return fm.add_slider
|
|
elif cl = FL.VALSLIDER: return fm.add_valslider
|
|
elif cl = FL.TEXT: return fm.add_text
|
|
elif cl = FL.TIMER: return fm.add_timer
|
|
else:
|
|
raise error, 'Unknown object type: ' + `cl`
|
|
|
|
|
|
def test():
|
|
if len(sys.argv) == 2:
|
|
forms = parse_forms(sys.argv[1])
|
|
for i in forms.keys():
|
|
_printform(forms[i])
|
|
elif len(sys.argv) == 3:
|
|
form = parse_form(sys.argv[1], sys.argv[2])
|
|
_printform(form)
|
|
else:
|
|
print 'Usage: test fdfile [form]'
|
|
|
|
def _printform(form):
|
|
f = form[0]
|
|
objs = form[1]
|
|
print 'Form ', f.Name, ', size: ', f.Width, f.Height, ' Nobj ', f.Numberofobjects
|
|
for i in objs:
|
|
print ' Obj ', i.Name, ' type ', i.Class, i.Type
|
|
print ' Box ', i.Box, ' btype ', i.Boxtype
|
|
print ' Label ', i.Label, ' size/style/col/align ', i.Size,i.Style, i.Lcol, i.Alignment
|
|
print ' cols ', i.Colors
|
|
print ' cback ', i.Callback, i.Argument
|