author rgbecker
Wed, 25 Oct 2000 08:57:46 +0000
changeset 494 54257447cfe9
parent 433 7cc80d826fe1
child 506 68bd275f16e2
permissions -rw-r--r--
Changed to indirect copyright

#copyright ReportLab Inc. 2000
#see license.txt for license details
#$Header: /tmp/reportlab/reportlab/platypus/,v 1.28 2000/10/25 08:57:45 rgbecker Exp $
__version__=''' $Id:,v 1.28 2000/10/25 08:57:45 rgbecker Exp $ '''
import string
import re
from types import TupleType
import sys
import os
import copy

import reportlab.lib.sequencer
#	from xml.parsers import xmllib
#	_xmllib_newStyle = 1
	from reportlab.lib import xmllib
	_xmllib_newStyle = 1
except ImportError:
	import xmllib
	_xmllib_newStyle = 0

from reportlab.lib.colors import toColor, white, black, red, Color
from reportlab.lib.fonts import tt2ps, ps2tt
from reportlab.lib.enums import TA_LEFT, TA_RIGHT, TA_CENTER, TA_JUSTIFY
_re_para = re.compile('^\\s*<\\s*para(\\s+|>)')

sizeDelta = 2		# amount to reduce font size by for super and sub script
subFraction = 0.5	# fraction of font size that a sub script should be lowered
superFraction = 0.5	# fraction of font size that a super script should be raised

def _num(s):
	if s[0] in ['+','-']:
			return ('relative',int(s))
		except ValueError:
			return ('relative',float(s))
			return int(s)
		except ValueError:
			return float(s)

def _align(s):
	s = string.lower(s)
	if s=='left': return TA_LEFT
	elif s=='right': return TA_RIGHT
	elif s=='justify': return TA_JUSTIFY
	elif s in ('centre','center'): return TA_CENTER
	else: raise ValueError

_paraAttrMap = {'font': ('fontName', None),
				'face': ('fontName', None),
				'fontsize': ('fontSize', _num),
				'size': ('fontSize', _num),
				'leading': ('leading', _num),
				'lindent': ('leftIndent', _num),
				'rindent': ('rightIndent', _num),
				'findent': ('firstLineIndent', _num),
				'align': ('alignment', _align),
				'spaceb': ('spaceBefore', _num),
				'spacea': ('spaceAfter', _num),
				'bfont': ('bulletFontName', None),
				'bfontsize': ('bulletFontSize',_num),
				'bindent': ('bulletIndent',_num),
				'bcolor': ('bulletColor',toColor),
				'fg': ('textColor',toColor)}

_bulletAttrMap = {
				'font': ('bulletFontName', None),
				'face': ('bulletFontName', None),
				'size': ('bulletFontSize',_num),
				'fontsize': ('bulletFontSize',_num),
				'indent': ('bulletIndent',_num),
				'color': ('bulletColor',toColor),
				'fg': ('bulletColor',toColor)}

#things which are valid font attributes
_fontAttrMap = {'size': ('fontSize', _num),
				'face': ('fontName', None),
				'name': ('fontName', None),
				'fg': 	('textColor', toColor),
				'color':('textColor', toColor)}

def _addAttributeNames(m):
	K = m.keys()
	for k in K:
		n = string.lower(m[k][0])
		if not m.has_key(n):
			m[n] = m[k]


def _applyAttributes(obj, attr):
	for k, v in attr.items():
		if type(v) is TupleType and v[0]=='relative':
			#AR 20/5/2000 - remove 1.5.2-ism
			#v = v[1]+getattr(obj,k,0)
			if hasattr(obj, k):
				v = v[1]+getattr(obj,k)
				v = v[1]

#characters not supported: epsi, Gammad, gammad, kappav, rhov, Upsi, upsi
greeks = {

class ParaFrag:
	"""class ParaFrag contains the intermediate representation of string
	segments as they are being parsed by the XMLParser.
	def __init__(self,**attr):
		for k,v in attr.items():

	def clone(self,**attr):
		n = apply(ParaFrag,(),self.__dict__)
		if attr != {}: apply(ParaFrag.__init__,(n,),attr)
		return n

# The ParaFormatter will be able to format the following xml
# tags:
#	   < b > < /b > - bold
#	   < i > < /i > - italics
#	   < u > < /u > - underline
#	   < super > < /super > - superscript
#	   < sub > < /sub > - subscript
#	   <font name=fontfamily/fontname color=colorname size=float>
#      < bullet > </bullet> - bullet text (at head of para only)
#		The whole may be surrounded by <para> </para> tags
# It will also be able to handle any MathML specified Greek characters.
class ParaParser(xmllib.XMLParser):

	# First we will define all of the xml tag handler functions.
	# start_<tag>(attributes)
	# end_<tag>()
	# While parsing the xml ParaFormatter will call these
	# functions to handle the string formatting tags.
	# At the start of each tag the corresponding field will
	# be set to 1 and at the end tag the corresponding field will
	# be set to 0.	Then when handle_data is called the options
	# for that data will be aparent by the current settings.

	#### bold
	def start_b( self, attributes ):

	def end_b( self ):

	#### italics
	def start_i( self, attributes ):

	def end_i( self ):

	#### underline
	def start_u( self, attributes ):

	def end_u( self ):

	#### super script
	def start_super( self, attributes ):

	def end_super( self ):

	#### sub script
	def start_sub( self, attributes ):

	def end_sub( self ):

	#### greek script
	if _xmllib_newStyle:
		def handle_entityref(self,name):
			if greeks.has_key(name):

		def syntax_error(self,lineno,message):

		def start_greekLetter(self, attributes,letter):

		def syntax_error(self,message):

	def _syntax_error(self,message):
		if message[:10]=="attribute " and message[-17:]==" value not quoted": return

	def start_greek(self, attributes):

	def end_greek(self):

	def start_font(self,attr):
		A = self.getAttributes(attr,_fontAttrMap)

	def end_font(self):

	def _initial_frag(self,attr,attrMap,bullet=0):
		style = self._style
		if attr!={}:
			style = copy.deepcopy(style)
			self._style = style

		# initialize semantic values
		frag = ParaFrag()
		frag.sub = 0
		frag.super = 0
		frag.rise = 0
		frag.underline = 0
		frag.greek = 0
		if bullet:
			frag.fontName, frag.bold, frag.italic = ps2tt(style.bulletFontName)
			frag.fontSize = style.bulletFontSize
			frag.textColor = hasattr(style,'bulletColor') and style.bulletColor or style.textColor
			frag.fontName, frag.bold, frag.italic = ps2tt(style.fontName)
			frag.fontSize = style.fontSize
			frag.textColor = style.textColor
		return frag

	def start_para(self,attr):
		self._stack = [self._initial_frag(attr,_paraAttrMap)]

	def end_para(self):

	def start_bullet(self,attr):
		if hasattr(self,'bFragList'):
			self._syntax_error('only one <bullet> tag allowed')
		self.bFragList = []
		frag = self._initial_frag(attr,_bulletAttrMap,1)
		frag.isBullet = 1

	def end_bullet(self):

	def start_seqdefault(self, attr):
			default = attr['id']
		except KeyError:
			default = None

	def end_seqdefault(self):
	def start_seqreset(self, attr):
			id = attr['id']
		except KeyError:
			id = None
			base = math.atoi(attr['base'])
		self._seq.reset(id, base)

	def end_seqreset(self):
	def start_seq(self, attr):
		#if it has a template, use that; otherwise try for id;
		#otherwise take default sequence
		if attr.has_key('template'):
			templ = attr['template']
			self.handle_data(templ % self._seq)
		elif attr.has_key('id'):
			id = attr['id']
			id = None
		output = self._seq.nextf(id)
	def end_seq(self):

	def _push(self,**attr):
		frag = copy.copy(self._stack[-1])

	def _pop(self,**kw):
		frag = self._stack[-1]
		del self._stack[-1]
		for k, v in kw.items():
			assert getattr(frag,k)==v
		return frag

	def getAttributes(self,attr,attrMap):
		A = {}
		for k, v in attr.items():
			k = string.lower(k)
			if k in attrMap.keys():
				j = attrMap[k]
				func = j[1]
					A[j[0]] = (func is None) and v or apply(func,(v,))
					self._syntax_error('%s: invalid value %s'%(k,v))
				self._syntax_error('invalid attribute name %s'%k)
		return A


	def __init__(self,verbose=0):
		if _xmllib_newStyle:
			# set up handlers for various tags
			self.elements = {	'b': (self.start_b, self.end_b),
							'u': (self.start_u, self.end_u),
							'i': (self.start_i, self.end_i),
							'super': (self.start_super, self.end_super),
							'sub': (self.start_sub, self.end_sub),
							'font': (self.start_font, self.end_font),
							'greek': (self.start_greek, self.end_greek),
							'para': (self.start_para, self.end_para)

			# automatically add handlers for all of the greek characters
			for item in greeks.keys():
				self.elements[item] = (lambda attr,self=self,letter=greeks[item]:
					self.start_greekLetter(attr,letter), self.end_greek)

			# set up dictionary for greek characters, this is a class variable
			self.entitydefs = self.entitydefs.copy()
			for item in greeks.keys():
				self.entitydefs[item] = '<%s/>' % item


	def _iReset(self):
		self.fragList = []
		if hasattr(self, 'bFragList'): delattr(self,'bFragList')

	def _reset(self, style):
		'''reset the parser'''

		# initialize list of string segments to empty
		self.errors = []
		self._style = style

	def handle_data(self,data):
		"Creates an intermediate representation of string segments."

		frag = copy.copy(self._stack[-1])
		#save our data
		frag.text = data

		# if sub and super are both one they will cancel each other out
		if frag.sub == 1 and frag.super == 1:
			frag.sub = 0
			frag.super = 0

		if frag.sub:
			frag.rise = -frag.fontSize*subFraction
			frag.fontSize = max(frag.fontSize-sizeDelta,3)
		elif frag.super:
			frag.rise = frag.fontSize*superFraction
			frag.fontSize = max(frag.fontSize-sizeDelta,3)

		if frag.greek: frag.fontName = 'symbol'
		# bold, italic, and underline
		frag.fontName = tt2ps(frag.fontName,frag.bold,frag.italic)

		if hasattr(frag,'isBullet'):

	def handle_cdata(self,data):

	def parse(self, text, style):
		"""Given a formatted string will return a list of
		ParaFrag objects with their calculated widths.
		If errors occur None will be returned and the
		self.errors holds a list of the error messages.
		self._seq = reportlab.lib.sequencer.getSequencer()
		self._reset(style)	# reinitialise the parser

		# the xmlparser requires that all text be surrounded by xml
		# tags, therefore we must throw some unused flags around the
		# given string
		if not(len(text)>=6 and text[0]=='<' and _re_para.match(text)):
			text = "<para>"+text+"</para>"
		self.close()	# force parsing to complete
		del self._seq
		style = self._style
		del self._style
		if len(self.errors)==0:
			fragList = self.fragList
			bFragList = hasattr(self,'bFragList') and self.bFragList or None
			fragList = bFragList = None
		return style, fragList, bFragList

if __name__=='__main__':
	from reportlab.platypus import cleanBlockQuotedText
	def check_text(text,p=_parser):
		print '##########'
		text = cleanBlockQuotedText(text)
		l,rv,bv = p.parse(text,style)
		if rv is None:
			for l in _parser.errors:
				print l
			print 'ParaStyle', l.fontName,l.fontSize,l.textColor
			for l in rv:
				print l.fontName,l.fontSize,l.textColor,l.bold, l.rise, '|%s|'%l.text[:25]

	style.fontSize = 12
	style.textColor = black
	style.bulletFontName = black

	<font name="helvetica" size="15" color=green>
	Tell me, O muse, of that ingenious hero who travelled far and wide
	after</font> he had sacked the famous town of Troy. Many cities did he visit,
	and many were the nations with whose manners and customs he was acquainted;
	moreover he suffered much by sea while trying to save his own life
	and bring his men safely home; but do what he might he could not save
	his men, for they perished through their own sheer folly in eating
	the cattle of the Sun-god Hyperion; so the god prevented them from
	ever reaching home. Tell me, too, about all these things, O daughter
	of Jove, from whatsoever source you<super>1</super> may know them.
	check_text('<para> </para>')
	check_text('<para font="times-bold" size=24 leading=28.8 spaceAfter=72>ReportLab -- Reporting for the Internet Age</para>')
	<font color=red>&tau;</font>Tell me, O muse, of that ingenious hero who travelled far and wide
	after he had sacked the famous town of Troy. Many cities did he visit,
	and many were the nations with whose manners and customs he was acquainted;
	moreover he suffered much by sea while trying to save his own life
	and bring his men safely home; but do what he might he could not save
	his men, for they perished through their own sheer folly in eating
	the cattle of the Sun-god Hyperion; so the god prevented them from
	ever reaching home. Tell me, too, about all these things, O daughter
	of Jove, from whatsoever source you may know them.''')
	Telemachus took this speech as of good omen and rose at once, for
	he was bursting with what he had to say. He stood in the middle of
	the assembly and the good herald Pisenor brought him his staff. Then,
	turning to Aegyptius, "Sir," said he, "it is I, as you will shortly
	learn, who have convened you, for it is I who am the most aggrieved.
	I have not got wind of any host approaching about which I would warn
	you, nor is there any matter of public moment on which I would speak.
	My grieveance is purely personal, and turns on two great misfortunes
	which have fallen upon my house. The first of these is the loss of
	my excellent father, who was chief among all you here present, and
	was like a father to every one of you; the second is much more serious,
	and ere long will be the utter ruin of my estate. The sons of all
	the chief men among you are pestering my mother to marry them against
	her will. They are afraid to go to her father Icarius, asking him
	to choose the one he likes best, and to provide marriage gifts for
	his daughter, but day by day they keep hanging about my father's house,
	sacrificing our oxen, sheep, and fat goats for their banquets, and
	never giving so much as a thought to the quantity of wine they drink.
	No estate can stand such recklessness; we have now no Ulysses to ward
	off harm from our doors, and I cannot hold my own against them. I
	shall never all my days be as good a man as he was, still I would
	indeed defend myself if I had power to do so, for I cannot stand such
	treatment any longer; my house is being disgraced and ruined. Have
	respect, therefore, to your own consciences and to public opinion.
	Fear, too, the wrath of heaven, lest the gods should be displeased
	and turn upon you. I pray you by Jove and Themis, who is the beginning
	and the end of councils, [do not] hold back, my friends, and leave
	me singlehanded- unless it be that my brave father Ulysses did some
	wrong to the Achaeans which you would now avenge on me, by aiding
	and abetting these suitors. Moreover, if I am to be eaten out of house
	and home at all, I had rather you did the eating yourselves, for I
	could then take action against you to some purpose, and serve you
	with notices from house to house till I got paid in full, whereas
	now I have no remedy."''')

But as the sun was rising from the fair sea into the firmament of
heaven to shed light on mortals and immortals, they reached Pylos
the city of Neleus. Now the people of Pylos were gathered on the sea
shore to offer sacrifice of black bulls to Neptune lord of the Earthquake.
There were nine guilds with five hundred men in each, and there were
nine bulls to each guild. As they were eating the inward meats and
burning the thigh bones [on the embers] in the name of Neptune, Telemachus
and his crew arrived, furled their sails, brought their ship to anchor,
and went ashore. ''')
So the neighbours and kinsmen of Menelaus were feasting and making
merry in his house. There was a bard also to sing to them and play
his lyre, while two tumblers went about performing in the midst of
them when the man struck up with his tune.]''')
"When we had passed the [Wandering] rocks, with Scylla and terrible
Charybdis, we reached the noble island of the sun-god, where were
the goodly cattle and sheep belonging to the sun Hyperion. While still
at sea in my ship I could bear the cattle lowing as they came home
to the yards, and the sheep bleating. Then I remembered what the blind
Theban prophet Teiresias had told me, and how carefully Aeaean Circe
had warned me to shun the island of the blessed sun-god. So being
much troubled I said to the men, 'My men, I know you are hard pressed,
but listen while I tell you the prophecy that Teiresias made me, and
how carefully Aeaean Circe warned me to shun the island of the blessed
sun-god, for it was here, she said, that our worst danger would lie.
Head the ship, therefore, away from the island.''')
	check_text('''A&lt; B&gt; C&amp; D&quot; E&apos; F''')
	check_text('''<bullet face=courier size=14 color=green>+</bullet>
There was a bard also to sing to them and play
his lyre, while two tumblers went about performing in the midst of
them when the man struck up with his tune.]''')