You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
472 lines
13 KiB
472 lines
13 KiB
#include "lsmem.h"
|
|
#include "limits.h"
|
|
#include "hih.h"
|
|
#include "objhelp.h"
|
|
#include "lscbk.h"
|
|
#include "lsdevres.h"
|
|
#include "pdobj.h"
|
|
#include "objdim.h"
|
|
#include "plssubl.h"
|
|
#include "plsdnode.h"
|
|
#include "pilsobj.h"
|
|
#include "lscrsubl.h"
|
|
#include "lssubset.h"
|
|
#include "lsdnset.h"
|
|
#include "zqfromza.h"
|
|
#include "lsdocinf.h"
|
|
#include "fmti.h"
|
|
#include "posichnk.h"
|
|
#include "locchnk.h"
|
|
#include "lsdnfin.h"
|
|
#include "brko.h"
|
|
#include "lspap.h"
|
|
#include "plspap.h"
|
|
#include "lsqsubl.h"
|
|
#include "dispi.h"
|
|
#include "lsdssubl.h"
|
|
#include "lsems.h"
|
|
#include "dispmisc.h"
|
|
#include "sobjhelp.h"
|
|
|
|
#define HIH_ESC_CNT 1
|
|
|
|
|
|
struct ilsobj
|
|
{
|
|
POLS pols;
|
|
LSCBK lscbk;
|
|
PLSC plsc;
|
|
PFNHIHENUM pfnEnum;
|
|
LSESC lsescHih;
|
|
};
|
|
|
|
|
|
struct dobj
|
|
{
|
|
SOBJHELP sobjhelp; /* common area for simple objects */
|
|
PILSOBJ pilsobj; /* ILS object */
|
|
LSCP cpStart; /* Starting LS cp for object */
|
|
PLSSUBL plssubl; /* Handle to second line */
|
|
};
|
|
|
|
|
|
/* H I H F R E E D O B J */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihFreeDobj
|
|
%%Contact: antons
|
|
|
|
Free all resources associated with Hih dobj.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
static LSERR HihFreeDobj (PDOBJ pdobj)
|
|
{
|
|
LSERR lserr = lserrNone;
|
|
|
|
PILSOBJ pilsobj = pdobj->pilsobj;
|
|
|
|
if (pdobj->plssubl != NULL)
|
|
{
|
|
lserr = LsDestroySubline(pdobj->plssubl);
|
|
}
|
|
|
|
pilsobj->lscbk.pfnDisposePtr(pilsobj->pols, pdobj);
|
|
|
|
return lserr;
|
|
}
|
|
|
|
|
|
/* H I H C R E A T E I L S O B J */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihCreateILSObj
|
|
%%Contact: ricksa
|
|
|
|
CreateILSObj
|
|
|
|
Create the ILS object for all Hih objects.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihCreateILSObj(
|
|
POLS pols, /* (IN): client application context */
|
|
PLSC plsc, /* (IN): LS context */
|
|
PCLSCBK pclscbk, /* (IN): callbacks to client application */
|
|
DWORD idObj, /* (IN): id of the object */
|
|
PILSOBJ *ppilsobj) /* (OUT): object ilsobj */
|
|
{
|
|
PILSOBJ pilsobj;
|
|
LSERR lserr;
|
|
HIHINIT hihinit;
|
|
hihinit.dwVersion = HIH_VERSION;
|
|
|
|
/* Get initialization data */
|
|
lserr = pclscbk->pfnGetObjectHandlerInfo(pols, idObj, &hihinit);
|
|
|
|
if (lserr != lserrNone)
|
|
{
|
|
return lserr;
|
|
}
|
|
|
|
pilsobj = pclscbk->pfnNewPtr(pols, sizeof(*pilsobj));
|
|
|
|
if (NULL == pilsobj)
|
|
{
|
|
return lserrOutOfMemory;
|
|
}
|
|
|
|
pilsobj->pols = pols;
|
|
pilsobj->lscbk = *pclscbk;
|
|
pilsobj->plsc = plsc;
|
|
pilsobj->lsescHih.wchFirst = hihinit.wchEndHih;
|
|
pilsobj->lsescHih.wchLast = hihinit.wchEndHih;
|
|
pilsobj->pfnEnum = hihinit.pfnEnum;
|
|
*ppilsobj = pilsobj;
|
|
return lserrNone;
|
|
}
|
|
|
|
/* H I H D E S T R O Y I L S O B J */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihDestroyILSObj
|
|
%%Contact: ricksa
|
|
|
|
DestroyILSObj
|
|
|
|
Free all resources assocaiated with Hih ILS object.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihDestroyILSObj(
|
|
PILSOBJ pilsobj) /* (IN): object ilsobj */
|
|
{
|
|
pilsobj->lscbk.pfnDisposePtr(pilsobj->pols, pilsobj);
|
|
return lserrNone;
|
|
}
|
|
|
|
/* H I H S E T D O C */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihSetDoc
|
|
%%Contact: ricksa
|
|
|
|
SetDoc
|
|
|
|
Keep track of device information for scaling purposes.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihSetDoc(
|
|
PILSOBJ pilsobj, /* (IN): object ilsobj */
|
|
PCLSDOCINF pclsdocinf) /* (IN): initialization data of the document level */
|
|
{
|
|
Unreferenced(pilsobj);
|
|
Unreferenced(pclsdocinf);
|
|
return lserrNone;
|
|
}
|
|
|
|
|
|
/* H I H C R E A T E L N O B J */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihCreateLNObj
|
|
%%Contact: ricksa
|
|
|
|
CreateLNObj
|
|
|
|
Create the Line Object for the Hih. No real need for a line
|
|
object so don't allocated it.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihCreateLNObj(
|
|
PCILSOBJ pcilsobj, /* (IN): object ilsobj */
|
|
PLNOBJ *pplnobj) /* (OUT): object lnobj */
|
|
{
|
|
*pplnobj = (PLNOBJ) pcilsobj;
|
|
return lserrNone;
|
|
}
|
|
|
|
/* H I H D E S T R O Y L N O B J */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihDestroyLNObj
|
|
%%Contact: ricksa
|
|
|
|
DestroyLNObj
|
|
|
|
Frees resources associated with the Hih line object. Since
|
|
there isn't any this is a no-op.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihDestroyLNObj(
|
|
PLNOBJ plnobj) /* (OUT): object lnobj */
|
|
|
|
{
|
|
Unreferenced(plnobj);
|
|
return lserrNone;
|
|
}
|
|
|
|
/* H I H F M T */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihFmt
|
|
%%Contact: ricksa
|
|
|
|
Fmt
|
|
|
|
Format the Hih object.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihFmt(
|
|
PLNOBJ plnobj, /* (IN): object lnobj */
|
|
PCFMTIN pcfmtin, /* (IN): formatting input */
|
|
FMTRES *pfmtres) /* (OUT): formatting result */
|
|
{
|
|
PDOBJ pdobj;
|
|
LSERR lserr;
|
|
PILSOBJ pilsobj = (PILSOBJ) plnobj;
|
|
POLS pols = pilsobj->pols;
|
|
LSCP cpStartMain = pcfmtin->lsfgi.cpFirst + 1;
|
|
LSCP cpOut;
|
|
FMTRES fmtres;
|
|
FMTRES fmtr = fmtrCompletedRun;
|
|
|
|
/*
|
|
* Allocate the DOBJ
|
|
*/
|
|
|
|
pdobj = pilsobj->lscbk.pfnNewPtr(pols, sizeof(*pdobj));
|
|
|
|
if (NULL == pdobj)
|
|
{
|
|
return lserrOutOfMemory;
|
|
}
|
|
|
|
ZeroMemory(pdobj, sizeof(*pdobj));
|
|
pdobj->pilsobj = pilsobj;
|
|
pdobj->cpStart = pcfmtin->lsfgi.cpFirst;
|
|
|
|
/*
|
|
* Build main line of text
|
|
*/
|
|
|
|
lserr = FormatLine(pilsobj->plsc, cpStartMain, LONG_MAX, pcfmtin->lsfgi.lstflow,
|
|
&pdobj->plssubl, HIH_ESC_CNT, &pilsobj->lsescHih,
|
|
&pdobj->sobjhelp.objdimAll, &cpOut, NULL, NULL, &fmtres);
|
|
|
|
if (lserr != lserrNone)
|
|
{
|
|
HihFreeDobj(pdobj); /* do not need to check return error code */
|
|
|
|
return lserr;
|
|
}
|
|
|
|
/*
|
|
* Note: the + 2 in the following is because cpStartMain is + 1 from the
|
|
* actual start of the object (it is the cpStartMain of the Hih
|
|
* data) and additional + 1 for the escape character at the end of the
|
|
* tatenakayoko.
|
|
*/
|
|
|
|
Assert (fmtres != fmtrExceededMargin);
|
|
|
|
pdobj->sobjhelp.dcp = cpOut - cpStartMain + 2;
|
|
|
|
lserr = LsdnFinishRegular(pilsobj->plsc, pdobj->sobjhelp.dcp,
|
|
pcfmtin->lsfrun.plsrun, pcfmtin->lsfrun.plschp, pdobj,
|
|
&pdobj->sobjhelp.objdimAll);
|
|
|
|
if (lserr != lserrNone)
|
|
{
|
|
HihFreeDobj(pdobj); /* do not need to check return error code */
|
|
|
|
return lserr;
|
|
}
|
|
|
|
if (pcfmtin->lsfgi.urPen + pdobj->sobjhelp.objdimAll.dur > pcfmtin->lsfgi.urColumnMax)
|
|
{
|
|
fmtr = fmtrExceededMargin;
|
|
}
|
|
|
|
*pfmtres = fmtr;
|
|
|
|
return lserrNone;
|
|
}
|
|
|
|
|
|
|
|
/* H I H G E T S P E C I A L E F F E C T S I N S I D E */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihGetSpecialEffectsInside
|
|
%%Contact: ricksa
|
|
|
|
GetSpecialEffectsInside
|
|
|
|
.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihGetSpecialEffectsInside(
|
|
PDOBJ pdobj, /* (IN): dobj */
|
|
UINT *pEffectsFlags) /* (OUT): Special effects for this object */
|
|
{
|
|
return LsGetSpecialEffectsSubline(pdobj->plssubl, pEffectsFlags);
|
|
}
|
|
|
|
/* H I H C A L C P R E S E N T A T I O N */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihCalcPresentation
|
|
%%Contact: ricksa
|
|
|
|
CalcPresentation
|
|
|
|
This has three jobs. First it distributes space to the shorter string
|
|
if so requested. Next it prepares each line for presentation. Finally,
|
|
it calculates the positions of the lines in output device coordinates.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihCalcPresentation(
|
|
PDOBJ pdobj, /* (IN): dobj */
|
|
long dup, /* (IN): dup of dobj */
|
|
LSKJUST lskjust, /* (IN): Justification type */
|
|
BOOL fLastVisibleOnLine ) /* (IN): Is this object last visible on line? */
|
|
{
|
|
Unreferenced (fLastVisibleOnLine);
|
|
Unreferenced(dup);
|
|
Unreferenced (lskjust);
|
|
return LsMatchPresSubline(pdobj->plssubl);
|
|
|
|
}
|
|
|
|
/* H I H Q U E R Y P O I N T P C P */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihQueryPointPcp
|
|
%%Contact: ricksa
|
|
|
|
Map dup to dcp
|
|
|
|
Just call through to Query result helper.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihQueryPointPcp(
|
|
PDOBJ pdobj, /*(IN): dobj to query */
|
|
PCPOINTUV ppointuvQuery, /*(IN): query point (uQuery,vQuery) */
|
|
PCLSQIN plsqin, /*(IN): query input */
|
|
PLSQOUT plsqout) /*(OUT): query output */
|
|
{
|
|
Unreferenced(ppointuvQuery);
|
|
return CreateQueryResult(pdobj->plssubl, 0, 0, plsqin, plsqout);
|
|
}
|
|
|
|
/* H I H Q U E R Y C P P P O I N T */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihQueryCpPpoint
|
|
%%Contact: ricksa
|
|
|
|
Map dcp to dup
|
|
|
|
Just call through to Query result helper.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihQueryCpPpoint(
|
|
PDOBJ pdobj, /*(IN): dobj to query, */
|
|
LSDCP dcp, /*(IN): dcp for the query */
|
|
PCLSQIN plsqin, /*(IN): query input */
|
|
PLSQOUT plsqout) /*(OUT): query output */
|
|
{
|
|
Unreferenced(dcp);
|
|
return CreateQueryResult(pdobj->plssubl, 0, 0, plsqin, plsqout);
|
|
}
|
|
|
|
|
|
/* H I H D I S P L A Y */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihDisplay
|
|
%%Contact: ricksa
|
|
|
|
Display
|
|
|
|
This calculates the positions of the various lines for the
|
|
display and then displays them.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihDisplay(
|
|
PDOBJ pdobj, /*(IN): dobj to display */
|
|
PCDISPIN pcdispin) /*(IN): info for display */
|
|
{
|
|
|
|
/* display the Hih line */
|
|
return LsDisplaySubline(pdobj->plssubl, &pcdispin->ptPen, pcdispin->kDispMode,
|
|
pcdispin->prcClip);
|
|
}
|
|
|
|
/* H I H D E S T R O Y D O B J */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihDestroyDobj
|
|
%%Contact: ricksa
|
|
|
|
DestroyDobj
|
|
|
|
Free all resources connected with the input dobj.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihDestroyDobj(
|
|
PDOBJ pdobj) /*(IN): dobj to destroy */
|
|
{
|
|
return HihFreeDobj(pdobj);
|
|
}
|
|
|
|
/* H I H E N U M */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihEnum
|
|
%%Contact: ricksa
|
|
|
|
Enumeration callback - passed to client.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI HihEnum(
|
|
PDOBJ pdobj, /*(IN): dobj to enumerate */
|
|
PLSRUN plsrun, /*(IN): from DNODE */
|
|
PCLSCHP plschp, /*(IN): from DNODE */
|
|
LSCP cp, /*(IN): from DNODE */
|
|
LSDCP dcp, /*(IN): from DNODE */
|
|
LSTFLOW lstflow, /*(IN): text flow*/
|
|
BOOL fReverse, /*(IN): enumerate in reverse order */
|
|
BOOL fGeometryNeeded, /*(IN): */
|
|
const POINT* pt, /*(IN): starting position (top left), iff fGeometryNeeded */
|
|
PCHEIGHTS pcheights, /*(IN): from DNODE, relevant iff fGeometryNeeded */
|
|
long dupRun) /*(IN): from DNODE, relevant iff fGeometryNeeded */
|
|
{
|
|
return pdobj->pilsobj->pfnEnum(pdobj->pilsobj->pols, plsrun, plschp, cp,
|
|
dcp, lstflow, fReverse, fGeometryNeeded, pt, pcheights, dupRun,
|
|
pdobj->plssubl);
|
|
}
|
|
|
|
|
|
/* H I H H A N D L E R I N I T */
|
|
/*----------------------------------------------------------------------------
|
|
%%Function: HihHandlerInit
|
|
%%Contact: ricksa
|
|
|
|
Initialize global Hih data and return LSIMETHODS.
|
|
|
|
----------------------------------------------------------------------------*/
|
|
LSERR WINAPI LsGetHihLsimethods(
|
|
LSIMETHODS *plsim)
|
|
{
|
|
plsim->pfnCreateILSObj = HihCreateILSObj;
|
|
plsim->pfnDestroyILSObj = HihDestroyILSObj;
|
|
plsim->pfnSetDoc = HihSetDoc;
|
|
plsim->pfnCreateLNObj = HihCreateLNObj;
|
|
plsim->pfnDestroyLNObj = HihDestroyLNObj;
|
|
plsim->pfnFmt = HihFmt;
|
|
plsim->pfnFmtResume = ObjHelpFmtResume;
|
|
plsim->pfnGetModWidthPrecedingChar = ObjHelpGetModWidthChar;
|
|
plsim->pfnGetModWidthFollowingChar = ObjHelpGetModWidthChar;
|
|
plsim->pfnTruncateChunk = SobjTruncateChunk;
|
|
plsim->pfnFindPrevBreakChunk = SobjFindPrevBreakChunk;
|
|
plsim->pfnFindNextBreakChunk = SobjFindNextBreakChunk;
|
|
plsim->pfnForceBreakChunk = SobjForceBreakChunk;
|
|
plsim->pfnSetBreak = ObjHelpSetBreak;
|
|
plsim->pfnGetSpecialEffectsInside = HihGetSpecialEffectsInside;
|
|
plsim->pfnFExpandWithPrecedingChar = ObjHelpFExpandWithPrecedingChar;
|
|
plsim->pfnFExpandWithFollowingChar = ObjHelpFExpandWithFollowingChar;
|
|
plsim->pfnCalcPresentation = HihCalcPresentation;
|
|
plsim->pfnQueryPointPcp = HihQueryPointPcp;
|
|
plsim->pfnQueryCpPpoint = HihQueryCpPpoint;
|
|
plsim->pfnDisplay = HihDisplay;
|
|
plsim->pfnDestroyDObj = HihDestroyDobj;
|
|
plsim->pfnEnum = HihEnum;
|
|
return lserrNone;
|
|
}
|
|
|
|
|