CDRFilter Class Reference

Corel Draw file importing class. More...

#include <cdrfiltr.h>

Inheritance diagram for CDRFilter:

List of all members.

Public Member Functions
	CDRFilter ()
	Constructor.
BOOL	Init ()
	Initialisation.
INT32	HowCompatible (PathName &Filename, ADDR HeaderStart, UINT32 HeaderSize, UINT32 FileSize)
	Examines a file to see how compatable it is with this filter.
BOOL	DoImport (SelOperation *, CCLexFile *, Document *, BOOL AutoChosen=FALSE, ImportPosition *Pos=NULL, KernelBitmap **ppImportedBitmap=NULL, DocCoord *pPosTranslate=NULL, String_256 *=NULL)
BOOL	DoExport (Operation *, CCLexFile *, PathName *, Document *, BOOL)
	Refuses to export a Corel Palette file.
Static Public Member Functions
static void	DeleteNodeList (Node *)
	Deletes a linked list of nodes (forward direction only).
static BOOL	GetCorelBBox (NodeRenderableBounded *pNode, DocRect *BBox)
	gets the Corel simple union bbox of an object
static ADDR	FindDataInObject (cdrfOffsetHeader *Header, WORD Type)
	returns the address of data of the given type in an objects with a standard offset header
static BOOL	AddElementsToPath (Path *pPath, INT32 NCoords, cdrfCoord *Coords, BYTE *Types, BOOL *IsClosed)
	Adds elements to a path from a CDR path data.
static BOOL	AddStandardColourSet (Document *pDocument)
	Adds the standard set of colours to a Corel file.
static BOOL	HasCDRFileGotCMXFile (PathName *FileName, CCLexFile *pFile=NULL)
	to find out whether a CDR file has got a CMX file in it, and therefore whether the CMX filter should grab it instead of this one
Static Public Attributes
static INT32	BitmapNumber = 0
static INT32	PatternNumber = 0
Private Member Functions
	CC_DECLARE_DYNAMIC (CDRFilter)
BOOL	ClearUp (void)
	Clears up after an CDR file import.
BOOL	UpdateProgress (BOOL Now=FALSE)
	Updating the progress everysooften - called at every significant place to get a nice smooth update on that progress bar thingy.
BOOL	ProcessDoc (void)
	Processes the root level doc chunk of a CDR file.
BOOL	ProcessPage (void)
	Processes a page list of a CDR file.
BOOL	ProcessLayer (void)
	Processes a layer list of a CDR file. This is the function which actually grabs objects to convert.
BOOL	ProcessObjectTree (UINT32 Level)
	process objects from the CDR file - they end up linked to pLevelNodeList.
BOOL	ProcessObject (void)
	Converts an object. If there's a problem with the object, then it's skipped rather than reporting an error, and the count of problem objects incremented.
BOOL	ProcessGroup (UINT32 Level, BOOL FromLink=FALSE)
	Sets up a group end action and alters the level node list to be a new list.
BOOL	ProcessLink (void)
	Sets up a group end action and a post transform action and alters the level node list to be a new list.
BOOL	ProcessVectorList (ADDR Block, INT32 Size)
	processes the vector list at the beginning of CDR files. This contains a list of objects which are used for things such as full colour fills, texture fills, mould shapes, that sort of thing.
BOOL	ProcessVectorListEntry ()
	processes an entry in the vector list
BOOL	ProcessTextList4 ()
	Processes the list of text objects for a version 4 CDR file creating text lines and textchars with partially applied attributes.
BOOL	ProcessTextListItem4 ()
	Processes a item from the list of text objects for a version 4 CDR file creating text lines and textchars with partially applied attributes.
BOOL	ConvertRectangle (cdrfOffsetHeader *)
BOOL	ConvertEllipse (cdrfOffsetHeader *)
	generates an ellipse object
BOOL	ConvertPath (cdrfOffsetHeader *)
	actually converts a path object to a node. If the object has an unexpected format, then FormatError is set and it return *TRUE* - the return value only indicated environmental errors such as lack of memory
BOOL	ConvertText (cdrfOffsetHeader *)
	converts a text object to a node. If the object has an unexpected format, then FormatError is set and it return *TRUE* - the return value only indicated environmental errors such as lack of memory
BOOL	ConvertText4Art (cdrfOffsetHeader *)
	converts a version 4 artisitic text object
BOOL	ConvertText4Para (cdrfOffsetHeader *)
	converts a version 4 paragraph text object
BOOL	ConvertText3 (cdrfOffsetHeader *)
	converts a version 3 text object to a node. If the object has an unexpected format, then FormatError is set and it return *TRUE* - the return value only indicated environmental errors such as lack of memory
BOOL	ConvertBitmap (cdrfOffsetHeader *)
BOOL	SetLineAttr (cdrfOffsetHeader *Object)
BOOL	SetFillAttr (cdrfOffsetHeader *Object)
	sets the fill attributes
BOOL	SetLineAttr3 (cdrfOffsetHeader *Object)
BOOL	SetFillAttr3 (cdrfOffsetHeader *Object)
	sets the fill attributes for version 3
BOOL	SetFillAttrFlat (cdrfFillHeader *Fill, INT32 Size)
	sets flat fill attributes
BOOL	SetFillAttrGrad (cdrfFillHeader *Fill, INT32 Size)
	sets graduated fill attributes
BOOL	SetUKFill (void)
	sets a fill attribute for unknown fills
BOOL	SetLinearGrad (CDRFillInfo *GFill, DocRect &BBox, DocColour *StartColour, DocColour *EndColour)
	sets a linear graduated fill from fill definition in the file Copied from coreleps.cpp and modified
BOOL	SetRadialGrad (CDRFillInfo *GFill, DocRect &BBox, DocColour *StartColour, DocColour *EndColour)
	sets a radial graduated fill from fill definition in the file
BOOL	SetConicalGrad (CDRFillInfo *GFill, DocRect &BBox, DocColour *StartColour, DocColour *EndColour)
	sets a conical graduated fill from fill definition in the file Copied from coreleps.cpp and modified
BOOL	SetFillAttrPattern (CDRTiledFillInfo *Info, DocColour *Colour1, DocColour *Colour2)
	set pattern fill attributes
BOOL	SetFillAttrTexture (cdrfFillHeader *Fill, INT32 Size)
	sets texture fill attributes
BOOL	SetFillAttrVector (CDRTiledFillInfo *Info)
	set vector fill attributes
BOOL	NoFill (void)
	makes an object not filled
BOOL	AddAttributesToArrowheadNode (NodeRenderableBounded *N, DocColour *Col, INT32 LineWidth, LineCapType Cap, JointType Join)
	apply attributes to a arrow head node
BOOL	AddAttributesToArrowheadPath (NodePath *P, DocColour *Col, INT32 LineWidth, LineCapType Cap, JointType Join)
	apply attributes to a arrow head path
BOOL	DoesPathNeedArrowheads (NodePath *P)
	To find out whether a path need attributes.
BOOL	TransformArrowhead (NodeRenderableBounded *N, DocCoord *Point, DocCoord *Other, BOOL Start, INT32 LineWidth, INT32 Distance)
	transform an arrowhead path to be the correct size and orientation
BOOL	AddArrowheadsToPath (DWORD StartArrow, DWORD EndArrow, DocColour *Col, INT32 LineWidth, LineCapType Cap, JointType Join)
	adds arrowheads to a path. Changes pMadeNode from a path to a group
BOOL	ConvertColour (cdrfColour *Col, DocColour *Out)
	converts a colour from the CDR definition taking into account the version
BOOL	IsTransformJustMatrices (ADDR Trans, INT32 Size)
	scans a transform chunk. Returns TRUE if the transform was just composed of matrices and unknown transforms.
BOOL	TransformConvertedObject (NodeRenderable **N, ADDR Trans, INT32 Size, BOOL TranslateForPage=TRUE, BOOL IsAGroupTransform=FALSE, BOOL WorkAtOrigin=FALSE)
	transforms an object we converted, given a trfd chunk. If TranslateForPage is true (defaults to TRUE) then the object will also be translated to get the origin in the right place. The pointer may be modified to be a pointer to a different object. WorkAtOrigin causes the object to be translated back to the origin before being hacked apon, except if it's in a CDR3 file when it's ignored as the file is mass-translated at the end of the conversion..
BOOL	TransformConvertedObjectDoMatrix (NodeRenderable **N, cdrMatrix *Ma, BOOL TranslateForPage)
	transforms an object given a CDR matrix
BOOL	TransformConvertedObjectDoPerspective (NodeRenderable **N, cdrPerspective *P, BOOL TranslateShapeForPage=FALSE)
BOOL	TransformConvertedObjectDoEnvelope (NodeRenderable **N, Path *P, DocRect *OriginalBBox, INT32 *Corners, BOOL TranslateShapeForPage=FALSE)
	transforms an object given a path to envelope into
BOOL	TransformConvertedObjectDoExtrude (NodeRenderable **N, cdrExtrudeInfo *Info, BOOL TranslateShapeForPage=FALSE)
	performs a extrude transform
BOOL	TransformConvertedObjectDoExtrudeTransPath (NodePath *pPath, cdrExtrudeInfo *Info)
	does the extrude transform on a path
BOOL	GetMatrixFromTransform (Matrix *M, ADDR Trans, INT32 Size, BOOL TranslateForPage=TRUE)
	given some transform data, works out a matrix. This ignores any 3D transforms, TransformConvertedObject should be used in preference.
BOOL	GetObjCorelBBox (NodeRenderableBounded *pNode, DocRect *BBox)
	gets the corel bbox of a converted object, looking up the bbox of text objects
KernelBitmap *	BitmapFromNodeList (Node *List)
	given a list of nodes, if it only contains one bitmap then return a pointer to that bitmap
BOOL	MakeTextOnPathLinkList ()
	creates the list of paths which should be linked to text stories to get text on paths.
BOOL	AttachTextToPaths ()
	attachs paths to text stories from the list of links.
BOOL	CheckTextForLinks (TextStory *pTextStory, cdrfOffsetHeader *Header)
	checks to see if this text story is in the link table
BOOL	GetTextStyleFromCDRStyle (CDRTextStyle *TS, WORD StyleRef, BOOL SearchForParent=TRUE)
	gets a text style from a CDR style. If it can't be found, you get the default text style. If SearchForParent is TRUE, the parent style of this style will be located
BOOL	GetTextStyleFromDefn (CDRTextStyle *TS, cdrfTextInfoFontDefn *FontDefn, const CDRTextStyle *BasedOn)
	gets a font style from a font definition stored in a txsm chunk. Anything not defined comes from the BasedOn style.
BOOL	ApplyTextAttr (Node *ContextNode, const CDRTextStyle *TS, const CDRTextStyle *BasedOn)
	Applies text attributes to a node from a CDRTextStyle. If BasedOn != 0 then the attributes will only be applied if they are different from those in *BasedOn.
BOOL	ApplyTextAttrDoApply (Node *ContextNode, TxtBaseClassAttribute *Attr, BOOL CheckExisting)
	Given a text attribute, apply it to a node. If CheckExising is TRUE, the existing attributes will be checked, and this attribute will not be applied if one of it's type already exists.
TCHAR *	GetFontName (WORD FontRef)
	finds a font name
BOOL	GetTextStyle3 (CDRTextStyle *TS, WORD Style, CDRTextStyle *BasedOn=0)
	gets a style for version 3 text from the global text styles table
BOOL	GetTextStyleFromChar4 (CDRTextStyle *TS, cdrfTextCharStyledV4 *Char, CDRTextStyle *BasedOn)
	gets a text style from a styled version 4 text character
Private Attributes
friend	CDRActionTransform
friend	CDRActionGroupEnd
friend	CDRBitmapStore
friend	CDRBitmap
Document *	pDocument
Spread *	pSpread
Page *	pPage
CDRVersion	Version
BOOL	Success
RIFFFile *	RIFF
UndoableOperation *	ThisOp
BOOL	SlowJobStarted
UINT32	ProgressCount
BOOL	InMasterPage
BOOL	DoneMasterPage
BOOL	DoneDoc
BOOL	UseLayers
CDRAttributeStore	Fills
CDRAttributeStore	Outlines
CDRAttributeStore	Styles
CDRFontnameStore	Fonts
CDRArrowheadStore	Arrowheads
CDRBitmapStore	Patterns
CDRBitmapStore	Bitmaps
CDRVectorStore	Vectors
CDRVectorStore	TextV4
CDRPageList	Pages
CDRPageListItem *	ThisPage
CDRLayerListItem *	ThisLayer
CDRActionList	Actions
CDRBBoxList	TextBBoxes
INT32	PageX
INT32	PageY
BOOL	Landscape
DocCoord	Origin
INT32	TranslateByX
INT32	TranslateByY
INT32	ObjectsConverted
INT32	ObjectsFormatWrong
INT32	ObjectsUnknown
INT32	EnvelopesApproximated
BOOL	FormatError
NodeRenderable *	pLevelNodeList
NodeRenderable *	pMadeNode
INT32	SerialNumber
BOOL	ObjFilled
BOOL	ObjStroked
BOOL	IsText
BOOL	IsTextStory
BOOL	AttrsAlreadyApplied
ADDR	ObjDataBlock
INT32	ObjDataBlockSize
ColourList *	ColList
ADDR	TransformChunk
INT32	TransformChunkSize
ADDR	FontTableV3
INT32	FontTableEntriesV3
ADDR	FontStylesV3
ADDR	LinkTable
BOOL	LinkTransformsExist
List	TextOnPathLinks
BOOL	IsTextOnAPath

---

Detailed Description

Corel Draw file importing class.

Author:

Ben_Summers (Xara Group Ltd) <camelotdev@xara.com>

Date:

21 03 95

Definition at line 764 of file cdrfiltr.h.

---

Constructor & Destructor Documentation

CDRFilter::CDRFilter (  void   )

Constructor. Author: Ben_Summers (Xara Group Ltd) <camelotdev@xara.com> Date: 21 03 95 Parameters: As  for the Filter class [INPUTS] Returns: As for the Filter class See also: Filter Definition at line 234 of file cdrfiltr.cpp. { // Set up filter descriptions. FilterName.Load(_R(IDT_CDRFILTER_FILTERNAME)); FilterInfo.Load(_R(IDT_CDRFILTER_FILTERINFO)); FilterID = FILTERID_CDR; Flags.CanImport = TRUE; Flags.CanExport = FALSE; Version = CDRVERSION_NULL; }

---

Member Function Documentation

BOOL CDRFilter::AddArrowheadsToPath (  DWORD  StartArrow, DWORD  EndArrow, DocColour *  Col, INT32  LineWidth, LineCapType  Cap, JointType  Join )  [private]

adds arrowheads to a path. Changes pMadeNode from a path to a group Author: Ben_Summers (Xara Group Ltd) <camelotdev@xara.com> Date: 29 03 95 Parameters: [INPUTS]  Returns: error flag See also: Filter Definition at line 632 of file cdroutl.cpp. { if(!IS_A(pMadeNode, NodePath)) return TRUE; // don't apply arrowheads to non path things NodePath *pPath = (NodePath *)pMadeNode; // check that the path actaully needs some arrow heads if(!DoesPathNeedArrowheads(pPath) || (StartArrow == 0 && EndArrow == 0)) return TRUE; // get pointers to nodes of the arrow heads to copy NodeRenderableBounded *StartA = 0; NodeRenderableBounded *EndA = 0; INT32 StartDistance; INT32 EndDistance; if(StartArrow != 0) { BOOL NotPresent; StartA = Arrowheads.GetConvertedNode(StartArrow, &StartDistance, &NotPresent); if(StartA == 0 && NotPresent == FALSE) return FALSE; // error occurred } if(EndArrow != 0) { BOOL NotPresent; EndA = Arrowheads.GetConvertedNode(EndArrow, &EndDistance, &NotPresent); if(EndA == 0 && NotPresent == FALSE) return FALSE; // error occurred } // check that enough arrowheads were found to do something with if(StartA == 0 && EndA == 0) return TRUE; // get rid of any dash patterns DashRec NoDash; NoDash = SD_SOLID; SetDashPattern(NoDash); // get some info about the path DocCoord *Coords = pPath->InkPath.GetCoordArray(); PathVerb *Verbs = pPath->InkPath.GetVerbArray(); INT32 NCoords = pPath->InkPath.GetNumCoords(); INT32 SubPathStart = -1; // the number of the coord the sub path starts on INT32 SubPathEnd = -1; // the number of the coord the sub path ends on // set up a pointers for the nodes we're about to create - it points to the made // at first, but shuffles on as nodes are copied. You see, we have to copy nodes which // are attached to something NodeRenderableBounded *ThisNode = pPath; // work out the trim distances double StartTrimDistance; double EndTrimDistance; if(StartA != 0) StartTrimDistance = ((double)LineWidth / (double)cdrfARROWHEAD_LINEWIDTH) * (double)StartDistance; if(EndA != 0) EndTrimDistance = ((double)LineWidth / (double)cdrfARROWHEAD_LINEWIDTH) * (double)EndDistance; // run through all the coords INT32 c; for(c = 0; c < NCoords; c++) { UINT32 Verb = Verbs[c] & ~PT_CLOSEFIGURE; BOOL CloseHere = ((Verbs[c] & PT_CLOSEFIGURE) != 0)?TRUE:FALSE; // if the verb is a close figure, this sub path is close, so we can't add arrowheads // to it. Invalidate the path start to avoid getting any arrowheads if(CloseHere) SubPathStart = -1; // if we get a new moveto and the sub path start is valid then we have a applying arrowheads // situation if((Verb == PT_MOVETO || ((c == (NCoords - 1)) && !CloseHere)) && c != 0) { // set the sub path end if(Verb == PT_MOVETO) { // if it's a moveto, then the sub path end was at the previous coord SubPathEnd = c - 1; } else { // if it wasn't, then it's this one (end of path) SubPathEnd = c; } } // have we got a valid start path marker? if(SubPathStart != -1 && SubPathEnd != -1) { // OK, now we need to trim the sub path if(StartA != 0) { // trim the start of the path if the next element is a line if((Verbs[SubPathStart + 1] & ~PT_CLOSEFIGURE) == PT_LINETO) { double dx, dy; dx = Coords[SubPathStart + 1].x - Coords[SubPathStart].x; dy = Coords[SubPathStart + 1].y - Coords[SubPathStart].y; double len = sqrt((dx * dx) + (dy * dy)); // if the resulting path line leaves enough room, trim it if((len - StartTrimDistance) >= 32.0) { double factor = StartTrimDistance / len; dx *= factor; Coords[SubPathStart].x += (INT32)dx; dy *= factor; Coords[SubPathStart].y += (INT32)dy; } } // now pop an arrowhead on the resulting point // first, make a copy of our node if(!StartA->CopyNode(ThisNode, NEXT)) return FALSE; // error! ThisNode = (NodeRenderableBounded *)ThisNode->FindNext(); ERROR3IF(ThisNode == 0, "CopyNode returned a zero path but didn't complain"); ERROR3IF(ThisNode->IsKindOf(CC_RUNTIME_CLASS(NodeRenderableBounded)) == FALSE, "copied thing isn't a renderable bounded node"); // transform it if(!TransformArrowhead(ThisNode, &Coords[SubPathStart], &Coords[SubPathStart + 1], TRUE, LineWidth, StartDistance)) return FALSE; // and apply attributes to it if(!AddAttributesToArrowheadNode(ThisNode, Col, LineWidth, Cap, Join)) return FALSE; } // and the same for the end path if(EndA != 0) { if((Verbs[SubPathEnd] & ~PT_CLOSEFIGURE) == PT_LINETO) { double dx, dy; dx = Coords[SubPathEnd].x - Coords[SubPathEnd - 1].x; dy = Coords[SubPathEnd].y - Coords[SubPathEnd - 1].y; double len = sqrt((dx * dx) + (dy * dy)); // if the resulting path line leaves enough room, trim it if((len - EndTrimDistance) >= 32.0) { double factor = EndTrimDistance / len; dx *= factor; Coords[SubPathEnd].x += (INT32)dx; dy *= factor; Coords[SubPathEnd].y += (INT32)dy; } } // now pop an arrowhead on the resulting point // first, make a copy of our node if(!EndA->CopyNode(ThisNode, NEXT)) return FALSE; // error! ThisNode = (NodeRenderableBounded *)ThisNode->FindNext(); ERROR3IF(ThisNode == 0, "CopyNode returned a zero path but didn't complain"); ERROR3IF(ThisNode->IsKindOf(CC_RUNTIME_CLASS(NodeRenderableBounded)) == FALSE, "copied thing isn't a renderable bounded node"); // transform it if(!TransformArrowhead(ThisNode, &Coords[SubPathEnd], &Coords[SubPathEnd - 1], FALSE, LineWidth, EndDistance)) return FALSE; // and apply attributes to it if(!AddAttributesToArrowheadNode(ThisNode, Col, LineWidth, Cap, Join)) return FALSE; } } // set the new sub path start marker and invalidate the end point marker if(Verb == PT_MOVETO) { SubPathStart = c; SubPathEnd = -1; } } // ensure that the bounding rectangle is updated pPath->InvalidateBoundingRect(); // get a new group node NodeGroup *pGroup = new NodeGroup; if(pGroup == 0) return FALSE; // attach everything to it pMadeNode->InsertChainSimple(pGroup, FIRSTCHILD); // and make the made node the group pMadeNode = pGroup; return TRUE; }

BOOL CDRFilter::AddAttributesToArrowheadNode (  NodeRenderableBounded *  N, DocColour *  Col, INT32  LineWidth, LineCapType  Cap, JointType  Join )  [private]

apply attributes to a arrow head node Author: Ben_Summers (Xara Group Ltd) <camelotdev@xara.com> Date: 29 03 95 Parameters: node,colour  and line width [INPUTS] Returns: error flag See also: Filter Definition at line 442 of file cdroutl.cpp. { if(IS_A(N, NodeGroup)) { // go through all the members of the group setting their attributes Node *pNode; pNode = N->FindFirstChild(); while(pNode != 0) { if(IS_A(pNode, NodePath)) AddAttributesToArrowheadPath((NodePath *)pNode, Col, LineWidth, Cap, Join); pNode = pNode->FindNext(); } } else if(IS_A(N, NodePath)) { // simply apply the attributes to this path AddAttributesToArrowheadPath((NodePath *)N, Col, LineWidth, Cap, Join); } else { ERROR3("Something unexpected passed to AddAttributesToArrowheadNode"); } return TRUE; }

BOOL CDRFilter::AddAttributesToArrowheadPath (  NodePath *  P, DocColour *  Col, INT32  LineWidth, LineCapType  Cap, JointType  Join )  [private]

apply attributes to a arrow head path Author: Ben_Summers (Xara Group Ltd) <camelotdev@xara.com> Date: 29 03 95 Parameters: node,colour  and line width [INPUTS] Returns: error flag See also: Filter Definition at line 485 of file cdroutl.cpp. { if(P->InkPath.IsFilled) { // it's a filled path, so it need to be filled with the colour and have no line // colour SetPathFilled(TRUE); if(!SetLineColour(DocColour(COLOUR_TRANS)) || !SetFillColour(*Col)) return FALSE; } else { // it's not a filled colour, so don't fill it and stroke it with the line width and colour if(!SetLineColour(*Col) || !SetLineWidth(LineWidth) || !SetLineCap(Cap) || !SetJoinType(Join)) return FALSE; } // apply the attributes to the object // If not filled, then set the ignore bit on the fill attribute. // if (P->InkPath.IsFilled == FALSE) // CurrentAttrs[ATTR_FILLGEOMETRY].Ignore = TRUE; // else CurrentAttrs[ATTR_FILLGEOMETRY].Ignore = FALSE; // Add attributes to the path, if they are different from the default... BOOL Result = AttributeManager::ApplyBasedOnDefaults(P, CurrentAttrs); // DeleteCurrentAttrs(); // SetUpCurrentAttrs(); // Enable the fill attribute again CurrentAttrs[ATTR_FILLGEOMETRY].Ignore = FALSE; return Result; }

BOOL CDRFilter::AddElementsToPath (  Path *  pPath, INT32  NCoords, cdrfCoord *  Coords, BYTE *  Types, BOOL *  IsClosed )  [static]

Adds elements to a path from a CDR path data. Author: Ben_Summers (Xara Group Ltd) <camelotdev@xara.com> Date: 06/05/95 Parameters: path  to add too, number of coords, pointer to coord data, pointer to types [INPUTS] Returns: error flag See also: Definition at line 2476 of file cdrfiltr.cpp. { // go through the coordinates in the CDR path adding them to the Camelot path INT32 c; // coord counter UINT32 CoordType; // type of this coordinate UINT32 Control1 = 0; // number of first control point UINT32 Control2 = 0; // of second DocCoord co, cn1, cn2; // coordinates PathFlags Flags; BOOL NeedMoveTo = TRUE; if(IsClosed != 0) (*IsClosed) = FALSE; // go though converting all the coords for(c = 0; c < NCoords; c++) { CoordType = Types[c] & cdrfPATHCOORDTYPE_MASK; co.x = CDRDATA_SWORD(Coords[c].X) * CDRCOORDS_TO_MILLIPOINTS; co.y = CDRDATA_SWORD(Coords[c].Y) * CDRCOORDS_TO_MILLIPOINTS; // add in a move to if necessary if(NeedMoveTo && CoordType != cdrfPATHCOORDTYPE_MOVE) { if(!pPath->InsertMoveTo(co)) return FALSE; } NeedMoveTo = FALSE; // process the coordinate switch(CoordType) { case cdrfPATHCOORDTYPE_MOVE: // add a move to this path if(!pPath->InsertMoveTo(co)) return FALSE; break; case cdrfPATHCOORDTYPE_LINETO: // add a line to this coord to the path if(!pPath->InsertLineTo(co)) return FALSE; break; case cdrfPATHCOORDTYPE_CURVE: // check we have some control points for this curve // a control point cannot be the first coord, so it's OK to check against 0 if(Control1 == 0 || Control2 == 0) { TRACEUSER( "Ben", _T("No control points for curve element\n")); break; } // convert the control points cn1.x = CDRDATA_SWORD(Coords[Control1].X) * CDRCOORDS_TO_MILLIPOINTS; cn1.y = CDRDATA_SWORD(Coords[Control1].Y) * CDRCOORDS_TO_MILLIPOINTS; cn2.x = CDRDATA_SWORD(Coords[Control2].X) * CDRCOORDS_TO_MILLIPOINTS; cn2.y = CDRDATA_SWORD(Coords[Control2].Y) * CDRCOORDS_TO_MILLIPOINTS; // create the curve Flags.IsSelected = FALSE; Flags.IsSmooth = Flags.IsRotate = ((Types[c] & cdrfPATHCOORDATTR_SMOOTH) != 0)?TRUE:FALSE; Flags.IsEndPoint; // insert it into the path if(!pPath->InsertCurveTo(cn1, cn2, co, &Flags)) return FALSE; break; case cdrfPATHCOORDTYPE_CONTROL: // shuffle the control points we've already got and add the new one Control1 = Control2; Control2 = c; break; default: // can't get here as mask won't allow any other value than the ones above. break; } // is this a close subpath situtation? if((Types[c] & cdrfPATHCOORDATTR_CLOSE) != 0) { if(IsClosed != 0) (*IsClosed) = TRUE; // path has at least one closed element and should be filled // close the sub path if(CoordType != cdrfPATHCOORDTYPE_MOVE) { if(!pPath->CloseSubPath()) return FALSE; // ensure that the next coord is a moveto NeedMoveTo = TRUE; } } } return TRUE; }

BOOL CDRFilter::AddStandardColourSet (  Document *  pDocument  )  [static]

Adds the standard set of colours to a Corel file. / typedef struct { BYTE C, M, Y, K; TCHAR *Name; } StandardCDRColour; static StandardCDRColour StandardCDRColours[] = { {0, 0, 0, 100, "Black"}, {0, 0, 0, 90, "90% Black"}, {0, 0, 0, 80, "80% Black"}, {0, 0, 0, 70, "70% Black"}, {0, 0, 0, 60, "60% Black"}, {0, 0, 0, 50, "50% Black"}, {0, 0, 0, 40, "40% Black"}, {0, 0, 0, 30, "30% Black"}, {0, 0, 0, 20, "20% Black"}, {0, 0, 0, 10, "10% Black"}, {0, 0, 0, 0, "White"}, {100, 100, 0, 0, "Blue"}, {100, 0, 0, 0, "Cyan"}, {100, 0, 100, 0, "Green"}, {0, 0, 100, 0, "Yellow"}, {0, 100, 100, 0, "Red"}, {0, 100, 0, 0, "Magenta"}, {20, 80, 0, 20, "Purple"}, {0, 60, 100, 0, "Orange"}, {0, 40, 20, 0, "Pink"}, {0, 20, 20, 60, "Dark Brown"}, {20, 20, 0, 0, "Powder Blue"}, {40, 40, 0, 0, "Pastel Blue"}, {60, 40, 0, 0, "Baby Blue"}, {60, 60, 0, 0, "Electric Blue"}, {40, 40, 0, 20, "Twilight Blue"}, {60, 40, 0, 40, "Navy Blue"}, {40, 40, 0, 60, "Deep Navy Blue"}, {40, 20, 0, 40, "Desert Blue"}, {100, 20, 0, 0, "Sky Blue"}, {40, 0, 0, 0, "Ice Blue"}, {20, 0, 0, 20, "Light BlueGreen"}, {20, 0, 0, 40, "Ocean Green"}, {20, 0, 0, 60, "Moss Green"}, {20, 0, 0, 80, "Dark Green"}, {40, 0, 20, 60, "Forest Green"}, {60, 0, 40, 40, "Grass Green"}, {40, 0, 20, 40, "Kentucky Green"}, {60, 0, 40, 20, "Light Green"}, {60, 0, 60, 20, "Spring Green"}, {60, 0, 20, 0, "Turquoise"}, {60, 0, 20, 20, "Sea Green"}, {20, 0, 20, 20, "Faded Green"}, {20, 0, 20, 0, "Ghost Green"}, {40, 0, 40, 0, "Mint Green"}, {20, 0, 20, 40, "Army Green"}, {20, 0, 40, 40, "Avocado Green"}, {20, 0, 60, 20, "Martian Green"}, {20, 0, 40, 20, "Dull Green"}, {40, 0, 100, 0, "Chartreuse"}, {20, 0, 60, 0, "Moon Green"}, {0, 0, 20, 80, "Murky Green"}, {0, 0, 20, 60, "Olive Drab"}, {0, 0, 20, 40, "Khaki"}, {0, 0, 40, 40, "Olive"}, {0, 0, 60, 20, "Banana Yellow"}, {0, 0, 60, 0, "Light Yellow"}, {0, 0, 40, 0, "Chalk"}, {0, 0, 20, 0, "Pale Yellow"}, {0, 20, 40, 40, "Brown"}, {0, 40, 60, 20, "Red Brown"}, {0, 20, 60, 20, "Gold"}, {0, 60, 80, 0, "Autumn Orange"}, {0, 40, 80, 0, "Light Orange"}, {0, 40, 60, 0, "Peach"}, {0, 20, 100, 0, "Deep Yellow"}, {0, 20, 40, 0, "Sand"}, {0, 20, 40, 60, "Walnut"}, {0, 60, 60, 40, "Ruby Red"}, {0, 60, 80, 20, "Brick Red"}, {0, 60, 60, 0, "Tropical Pink"}, {0, 40, 40, 0, "Soft Pink"}, {0, 20, 20, 0, "Faded Pink"}, {0, 40, 20, 40, "Crimson"}, {0, 60, 40, 20, "Regal Red"}, {0, 60, 20, 20, "Deep Rose"}, {0, 100, 60, 0, "Neon Red"}, {0, 60, 40, 0, "Deep Pink"}, {0, 80, 40, 0, "Hot Pink"}, {0, 40, 20, 20, "Dusty Rose"}, {0, 40, 0, 60, "Plum"}, {0, 60, 0, 40, "Deep Violet"}, {0, 40, 0, 0, "Light Violet"}, {0, 40, 0, 20, "Violet"}, {0, 20, 0, 40, "Dusty Plum"}, {0, 20, 0, 20, "Pale Purple"}, {20, 60, 0, 20, "Majestic Purple"}, {20, 80, 0, 0, "Neon Purple"}, {20, 60, 0, 0, "Light Purple"}, {20, 40, 0, 20, "Twilight Violet"}, {20, 40, 0, 0, "Easter Purple"}, {20, 40, 0, 60, "Deep Purple"}, {20, 40, 0, 40, "Grape"}, {40, 60, 0, 0, "Blue Violet"}, {40, 100, 0, 0, "Blue Purple"}, {40, 80, 0, 20, "Deep River"}, {60, 80, 0, 0, "Deep Azure"}, {40, 60, 0, 40, "Storm Blue"}, {60, 80, 0, 20, "Deep Blue"}, {100, 100, 100, 100, "100C100M100Y100K"} }; /*! Author: Ben_Summers (Xara Group Ltd) <camelotdev@xara.com> Date: 05/06/95 Parameters: [INPUTS]  Returns: Definition at line 1322 of file cdroutl.cpp. { ColourListComponent *pColours = 0; DocComponent *pComponent = pDocument->EnumerateDocComponents(NULL); while (pComponent != NULL) { // If this is the colour component, remember it if (pComponent->GetRuntimeClass() == CC_RUNTIME_CLASS(ColourListComponent)) { pColours = (ColourListComponent *) pComponent; break; } // Look for next doc component pComponent = pDocument->EnumerateDocComponents(pComponent); } if(pColours == 0) return TRUE; // can't be bothered to complain nicely about this very unlikely error // get an importedcolours object ImportedColours *pNewColours = new ImportedColours(pColours, FALSE); if(pNewColours == 0 || !pNewColours->Init()) return FALSE; BOOL ok = TRUE; // add colours to it... ColourCMYK NewColour; for(INT32 l = 0; l < (sizeof(StandardCDRColours) / sizeof(StandardCDRColour)); l++) { NewColour.Cyan = ((double)StandardCDRColours[l].C) / 100; NewColour.Magenta = ((double)StandardCDRColours[l].M) / 100; NewColour.Yellow = ((double)StandardCDRColours[l].Y) / 100; NewColour.Key = ((double)StandardCDRColours[l].K) / 100; String_64 ColNameS(StandardCDRColours[l].Name); if(!pNewColours->AddColour(&ColNameS, &NewColour)) { ok = FALSE; break; } } // add the colours to the document if(ok) { pNewColours->AddColoursToDocument(); } else { pNewColours->DestroyColours(); } // delete the imported colours object delete pNewColours; return ok; }

BOOL CDRFilter::ApplyTextAttr (  Node *  ContextNode, const CDRTextStyle *  TS, const CDRTextStyle *  BasedOn )  [private]

Applies text attributes to a node from a CDRTextStyle. If BasedOn != 0 then the attributes will only be applied if they are different from those in *BasedOn. Author: Ben_Summers (Xara Group Ltd) <camelotdev@xara.com> Date: 27/04/95 Parameters: [INPUTS]  Returns: error flag See also: Definition at line 1623 of file cdrtext.cpp. { BOOL CheckExisting = FALSE; // if the node has children, then we want to check existing attributes if(ContextNode->FindFirstChild() != 0) CheckExisting = TRUE; // apply italicness if(BasedOn == 0 || TS->Italic != BasedOn->Italic) { // make a font size attribute TxtItalicAttribute Attr(TS->Italic); // attach if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; } // apply boldness if(BasedOn == 0 || TS->Bold != BasedOn->Bold) { // make a font size attribute TxtBoldAttribute Attr(TS->Bold); // attach if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; } // apply underline if(BasedOn == 0 || TS->Underline != BasedOn->Underline) { // make a font size attribute TxtUnderlineAttribute Attr(TS->Underline); // attach if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; } // apply the scriptness if(BasedOn == 0 || TS->Script != BasedOn->Script) { if(TS->Script != CDRSCRIPT_NONE) { TxtScriptAttribute Attr((TS->Script == CDRSCRIPT_SUB)?-0.1:0.33, 0.5); // attach if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; } } // apply font size if(BasedOn == 0 || TS->FontSize != BasedOn->FontSize) { // make a font size attribute TxtFontSizeAttribute Attr(TS->FontSize); // attach if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; } // apply font name // if(BasedOn == 0 || TS->FontName != BasedOn->FontName) if(BasedOn == 0 || TS->FontReference != BasedOn->FontReference) { // get a font handle WORD hTypeface = Fonts.GetHandleForReference(TS->FontReference); //WORD hTypeface = FONTMANAGER->GetFontHandle(&String_64(TS->FontName)); // make a typeface attribute TxtFontTypefaceAttribute Attr(hTypeface); // attach if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; } // apply the justification stuff if((BasedOn == 0 || TS->Just != BasedOn->Just) && TS->Just != JLEFT) { // make a justification attribute TxtJustificationAttribute Attr(TS->Just); // attach if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; } // slap on a aspect ratio thingy so it gets transformed OK TxtAspectRatioAttribute Attr(1); if(!ApplyTextAttrDoApply(ContextNode, &Attr, CheckExisting)) return FALSE; return TRUE; }

BOOL CDRFilter::ApplyTextAttrDoApply (  Node *  ContextNode, TxtBaseClassAttribute *  Attr, BOOL  CheckExisting )