windows-nt/Source/XPSP1/NT/drivers/tpg/hwx/bear/inc/lowlevel.h

1128 lines
49 KiB
C
Raw Normal View History

2020-09-26 03:20:57 -05:00
/**************************************************************************
* *
* LOWLEVEL.H Created: 28 May 1991. *
* *
* This file contains the items needed for the low word processing *
* part of the recognizer which are needed only in kernel variant. *
* *
**************************************************************************/
#ifndef LOW_LEVEL_INCLUDED
#define LOW_LEVEL_INCLUDED
#include "ams_mg.h"
#include "floats.h"
#define NEW_VERSION _TRUE /* New version - born in Sept.1992 */
#define LOW_INLINE _FALSE /* If small low-level functions should be */
/* expanded inline (as macros). */
#define USE_FRM_WORD _FALSE /* _TRUE - makes it able to provide */
/* formulas wordbreaking and */
/* recogn. enhancing by cost of */
/* code enlarging. */
/* _FALSE- no fromula wordbreaking and */
/* additional enhancement, but */
/* code size reduces. */
/**************************************************************************/
/* CODES OF SPECIAL POINTS */
/**************************************************************************/
/* */
#define EMPTY 0x00 /* empty mark */
#define MINW 0x01 /* wide minimum */
#define MINN 0x02 /* narrow minimum */
#define MAXW 0x03 /* wide maximum */
#define MAXN 0x04 /* narrow maximum */
#define _MINX 0x11 /* */
#define _MAXX 0x13 /* */
#define MINXY 0x21 /* */
#define MAXXY 0x23 /* */
#define MINYX 0x31 /* */
#define MAXYX 0x33 /* */
#define SHELF 0x05 /* shelf */
#define CROSS 0x06 /* crossing */
#define STROKE 0x07 /* stroke */
#define DOT 0x08 /* point */
#define STICK 0x09 /* hypothetical stick */
#define HATCH 0x0a /* crossing with the stroke */
/* #define BIRD 0x12 */ /* */
/* #define STAFF 0x21 */ /* */
#define ANGLE 0x0b /* angle */
#define BEG 0x10 /* beginning of unbroken group of points */
#define END 0x20 /* end of the unbroken group of points */
#define DROP 0x44 /* break */
//GIT - new marks for SDS
#define SDS_INTERSECTED 0x80
#define SDS_ISOLATE 0x81
/* */
/**************************************************************************/
/* Constants - direction setters for extrema searching. */
/* They are bits in the variable and may be combined using "|". */
/**************************************************************************/
#define EMPTY_DIR 0x0000
#define X_DIR 0x0001
#define Y_DIR 0x0002
#define XY_DIR 0x0004
#define YX_DIR 0x0008
/**************************************************************************/
/* CONSTANTS DEFINITION */
/**************************************************************************/
/* */
#define MAXBUF 8000 /* max size */
/* buffer of data */
#define LOWBUF (MAXBUF+3) /* size of buffer for */
/* lower level. */
#define SPECVAL 640 /* masssive measurity */
/* structure of special*/
/* points . */
#define N_GR_BORD 50 /* Size of an array of */
/* moveable SPECL elems*/
#define N_ABSNUM 50 /* Size of an array of */
/* moveable SPECL elems*/
#define UMSPC 50 /* */
/* */
#define N_SDS 200 /* Size of SDS array */
/* */
#define LENTH_E 64 /* */
/* */
#define LENTH_Q 64 /* */
/* */
#define LENTH_S 128 /* */
/* */
#define ALEF 32767 /* the biggest number */
/* y (for regime EGA ).*/
#define SQRT_ALEF 181 /* sqrt(ALEF) */
/* */
#define ELEM 0 /* the smallest */
/* bite number */
/* without sign */
#define BREAK -1 /* number-symbol of */
/* style break */
#define RIGHT 319 /* the most right point*/
/* */
#define CONSTVAL 8 /* max number of files */
/* with constants */
/* */
#define ABSENCE 1 /* */
/* */
#define NOABSENCE 0 /* */
/* */
#define CELLSIZE 7 /*size of rastre square*/
/* */
#define END_OF_WORDS 0xff /* End of list */
/* */
#define UNDEF -2 /* Undef value for in- */
/* dexes in arrays etc.*/
/* */
/* */
/***************************************************************************/
/* STRUCTURE OF DATA FOR LOW LEVEL */
/***************************************************************************/
/*------------------------------------------------------------------------*/
#if defined(FOR_GERMAN) || defined(FOR_FRENCH) || defined(FOR_INTERNATIONAL)
typedef struct
{
_SHORT GroupNum ;
_SHORT numMin ;
_CHAR tH ;
_CHAR bH ;
_CHAR UmEls ;
_CHAR ElsUm ;
_CHAR UmDot ;
_CHAR DotUm ;
_CHAR UmStr ;
_CHAR StrUm ;
_CHAR UmCom ;
_CHAR ComUm ;
_CHAR CrossFeature ;
_CHAR PositionFeature ;
}
_UM_MARKS ,
_PTR p_UM_MARKS ;
typedef struct
{
p_UM_MARKS pUmMarks ;
_SHORT Um_buf_Len ;
_SHORT tmpUMnumber ;
_SHORT termSpecl ;
_SHORT termSpecl1 ;
}
_UM_MARKS_CONTROL , _PTR p_UM_MARKS_CONTROL ;
#endif /* FOR_GERMAN... */
/********************************************************/
/* Lines description structures: */
/********************************************************/
typedef struct SDB_TYPE
{
_SHORT s ;
_SHORT a ;
_SHORT dL ;
_SHORT iLmax ;
_SHORT dR ;
_SHORT iRmax ;
_SHORT d ;
_SHORT imax ;
_LONG l ;
_SHORT cr ;
_SHORT ld ;
_SHORT lg ;
} _SAD ;
typedef _SAD _PTR p_SAD ;
/* cr == (BASE*d/s); "Curvity" */
/* ld == (BASE*l/s); */
/* lg == (BASE*l/(length of all part between breaks)); */
/* ooo "l" */
/* ooooooo | ooo */
/* ooo | o ooOO */
/* ooo | oo ooo */
/* oo | oo oo */
/* oo | "d" o o */
/* ------- OO -------------- | ---------- o --------- o ---------- */
/* ------- "s"| o o */
/* ------------ o o */
/* "a" - slope of this > --------OO oo */
/* (BASE*"dy"/"dx") oo oo */
/* ooo */
typedef struct _SDS_TYPE
{
_SHORT mark ;
_SHORT ibeg ;
_SHORT iend ;
_SHORT xmax ;
_SHORT xmin ;
_SHORT ymax ;
_SHORT ymin ;
_SAD des ;
} _SDS ;
typedef _SDS _PTR p_SDS ;
typedef struct _SDS_CONTROL_TYPE
{
_SHORT sizeSDS ;
_SHORT iBegLock_SDS ;
_SHORT lenSDS ;
p_SDS pSDS ;
}
_SDS_CONTROL ;
typedef _SDS_CONTROL _PTR p_C_SDS ;
/* links description structure */
typedef enum
{
ARC_UNKNOWN = 0 ,
ARC_LEFT ,
ARC_RIGHT ,
ARC_UP ,
ARC_DOWN ,
ARC_UP_LEFT ,
ARC_DOWN_LEFT ,
ARC_UP_RIGHT ,
ARC_DOWN_RIGHT ,
ARC_LINE_VERT ,
ARC_LINE_HOR ,
ARC_LINE_SLASH ,
ARC_LINE_BACKSLASH ,
ARC_S_LIKE ,
ARC_Z_LIKE ,
ARC_SHORT
}
_ARC_TYPE ;
/* new links description structure */
typedef enum
{
LINK_UNKNOWN = 0, // 0
LINK_HCR_CCW , // 1
LINK_LCR_CCW , // 2
LINK_MCR_CCW , // 3
LINK_SCR_CCW , // 4
LINK_TCR_CCW , // 5
LINK_LINE , // 6
LINK_TCR_CW , // 7
LINK_SCR_CW , // 8
LINK_MCR_CW , // 9
LINK_LCR_CW , // 10
LINK_HCR_CW , // 11
LINK_HS_LIKE , // 12
LINK_S_LIKE , // 13
LINK_Z_LIKE , // 14
LINK_HZ_LIKE // 15
}
_LINK_TYPE ;
/*--------------- SPECIAL POINTS DESCRIPTOR ------------------------------*/
typedef struct SPEC_TYPE
{
_UCHAR mark ;
_UCHAR code ;
_UCHAR attr ;
_UCHAR other ;
_SHORT ibeg ;
_SHORT iend ;
_SHORT ipoint0 ;
_SHORT ipoint1 ;
struct SPEC_TYPE near * next ;
struct SPEC_TYPE near * prev ;
} SPECL, _PTR p_FSPECL; /* grafy.h definitions */
typedef SPECL near* p_SPECL ;
/*--------------- LIST OF CONSTANTS --------------------------------------*/
typedef struct CON_TYPE /* table for interpolaton constants */
{
_SHORT horda ; /* chord of normalizaton */
_SHORT dlt0 ; /* */
_SHORT nsr ; /* */
_SHORT j_step ; /* beginning steps of crossings */
_SHORT i_step ; /* search */
_SHORT eps_y ; /* environs of extremums marking out*/
_SHORT eps_x ; /* and preliminary marking out */
/* of shelves */
_SHORT eps_py ; /* max.(vertical and horisontal) */
_SHORT eps_px ; /* sizes of 'points */
_SHORT eps_st ; /* max stroke legnth */
_SHORT a0 ; /* */
_SHORT b0 ; /* */
_SHORT lf0 ; /* */
_SHORT lz0 ; /* */
_SHORT a1 ; /* */
_SHORT b1 ; /* */
_SHORT lf1 ; /* */
_SHORT lz1 ; /* */
_SHORT a2 ; /* */
_SHORT b2 ; /* */
_SHORT lf2 ; /* */
_SHORT lz2 ; /* */
_SHORT a3 ; /* */
_SHORT b3 ; /* */
_SHORT lf3 ; /* */
_SHORT lz3 ; /* */
}
CONSTS ;
/*--------------- HEIGHTS ------------------------------------------------*/
typedef struct { /* If y<=y_US_, then height==_US_ */
_SHORT y_US1_ ;
_SHORT y_US2_ ;
_SHORT y_UE1_ ;
_SHORT y_UE2_ ;
_SHORT y_UI1_ ;
_SHORT y_UI2_ ;
_SHORT y_MD_ ;
_SHORT y_DI1_ ;
_SHORT y_DI2_ ;
_SHORT y_DE1_ ;
_SHORT y_DE2_ ;
_SHORT y_DS1_ ;
_SHORT y_DS2_ ;
}
HEIGHTS_DEF ;
/*--------------- BUFFER'S STRUCTURE -------------------------------------*/
typedef struct
{
p_SHORT ptr ; /* Pointer to buffer. */
_SHORT nSize ; /* # of _SHORTs in buffer. */
}
BUF_DESCR, _PTR p_BUF_DESCR ;
/*--------------- NUMBER OF BEGIN & END OF POINTS GROUP ------------------*/
typedef struct
{
_SHORT iBeg ;
_SHORT iEnd ;
_RECT GrBox ;
}
POINTS_GROUP, _PTR p_POINTS_GROUP ;
/*--------------- LOW LEVEL MAIN DATA STRUCTURE --------------------------*/
#define NUM_BUF 4 /* buffers quantity */
typedef struct
{
rc_type _PTR rc ;
BUF_DESCR buffers[NUM_BUF] ;
PS_point_type _PTR p_trace ;
_SHORT nLenXYBuf ;
p_SHORT xBuf ;
p_SHORT yBuf ;
p_SHORT x ;
p_SHORT y ;
_SHORT ii ;
p_SPECL specl ;
_SHORT nMaxLenSpecl ;
_SHORT len_specl ;
_SHORT LastSpeclIndex ;
p_SHORT pAbsnum ;
_SHORT lenabs ;
_SHORT rmAbsnum ;
p_POINTS_GROUP pGroupsBorder ;
_SHORT lenGrBord ;
_SHORT rmGrBord ;
_SHORT iBegBlankGroups ;
#if defined(FOR_GERMAN) || defined(FOR_FRENCH) || defined(FOR_INTERNATIONAL)
p_UM_MARKS_CONTROL pUmMarksControl ;
#endif
p_C_SDS p_cSDS ; /* array of geometric features */
_SHORT VertSticksNum ;
p_POINTS_GROUP pVS_Collector ;
_SHORT padding ;
_SHORT slope ;
_SHORT width_letter ;
_SHORT StepSure ;
_RECT box ;
/* the smallest and the biggest y */
/* the smallest and the biggest x */
HEIGHTS_DEF hght ;
_SHORT o_little ;
_SHORT z_little ;
}
low_type, _PTR p_low_type ;
typedef p_low_type p_LowData ;
#if PG_DEBUG
_VOID draw_SDS(p_low_type low_data);
#endif
_SHORT GetLinkBetweenThisAndNextXr(p_low_type low_data,p_SPECL pXr,
xrd_el_type _PTR xrd_elem);
_SHORT RecountBegEndInSDS(p_low_type low_data);
/* bCalc determines, whether or not to calculate some features in this function */
_SHORT iMostFarDoubleSide( p_SHORT xArray, p_SHORT yArray, p_SDS pSDS,
p_SHORT pxd, p_SHORT pyd, _BOOL bCalc ) ;
/***************************************************************************/
/* FUNCTIONS */
/***************************************************************************/
/*------------------------- module lk_begin ------------------------------*/
_SHORT lk_begin(low_type _PTR low_data); /*beginning working out of elem.*/
_SHORT get_last_in_specl(low_type _PTR low_data);
_SHORT Sort_specl(p_SPECL specl,_SHORT l_specl); /*sorting SPECL in time*/
_SHORT Clear_specl(p_SPECL specl,_SHORT len_specl);
_SHORT extremum(_UCHAR code,_SHORT beg,_SHORT end,_SHORT _PTR y);
/*------------------------ module lk_cross ------------------------------*/
_SHORT lk_cross(low_type _PTR low_data); /*sorting out of elem. crossings*/
/*------------------------ module lk_next ------------------------------*/
/* Parsing of different arcs on the ends: */
_SHORT lk_duga( low_type _PTR low_data );
/*------------------------ module low_3 -------------------------------*/
_SHORT FindDArcs ( low_type _PTR pld ) ; /* see fig. at the */
/* func. text */
/* Checks, if some _IU(D)_s should be _UU(D)_ and vice versa: */
_VOID Adjust_I_U ( low_type _PTR low_data ) ;
_BOOL FindSideExtr( low_type _PTR low_data ) ;
_BOOL PostFindSideExtr( low_type _PTR low_data );
_SHORT RestoreColons( low_type _PTR low_data );
#if !defined (FOR_GERMAN)
_BOOL RestoreApostroph(p_low_type low_data,p_SPECL pCurr); /*Eric*/
#endif
/*------------------------ module breaks -------------------------------*/
_SHORT xt_st_zz(low_type _PTR low_data); /* working out of tear-off parts */
_BOOL find_CROSS(p_low_type low_data,_SHORT ibeg_X,_SHORT iend_X,
p_SPECL _PTR pCross);
/*------------------------ module FILTER -------------------------------*/
_SHORT Filt( low_type _PTR pLowData ,
_SHORT t_horda , _SHORT fl_absence ) ;
_SHORT PreFilt( _SHORT t_horda , low_type _PTR p_low_data ) ;
_VOID Errorprov(low_type _PTR low_data) ; /* check tablete co-ordinates*/
/*------------------------ module INIT_GRF -------------------------------*/
_VOID AcceptEps( _SHORT a,_SHORT b,_SHORT lf,_SHORT lz,p_SHORT eps ) ;
_VOID AcceptNbcut (_VOID) ;
_VOID glob_low_init( _VOID ) ; /* initialisation of globals */
/*----------------------- module CHECK, PICT, CROSS ---------------------*/
_SHORT InitSpecl( low_type _PTR low_data, _SHORT n ) ;
_SHORT InitSpeclElement( SPECL _PTR specl ) ;
_SHORT Mark( low_type _PTR low_data ,
_UCHAR mark , _UCHAR code, _UCHAR attr , _UCHAR other ,
_SHORT begin, _SHORT end , _SHORT ipoint0, _SHORT ipoint1 ) ;
_SHORT MarkSpecl( low_type _PTR low_data , SPECL _PTR p_tmpSpecl ) ;
_BOOL NoteSpecl( low_type _PTR pLowData , SPECL _PTR pTmpSpecl ,
SPECL _PTR pSpecl , _SHORT _PTR pLspecl ,
_SHORT limSpecl ) ;
#if PG_DEBUG
_VOID PaintSpeclElement( low_type _PTR pLowData, SPECL _PTR pNewSpecl,
SPECL _PTR pSpecl , _SHORT _PTR pLspecl );
#endif
p_SPECL LastElemAnyKind ( p_SPECL pSpecl , _UCHAR kind_of_mark ) ;
p_SPECL FirstElemAnyKind ( p_SPECL pSpecl , _UCHAR kind_of_mark ) ;
_SHORT Pict( low_type _PTR low_data ) ;
_SHORT Surgeon( low_type _PTR pLowData ) ;
_SHORT OperateSpeclArray( low_type _PTR pLowData ) ;
#define NO_CONTACT 0x0000
#define END_RESTRICTION 0x0001
#define ANY_OCCUARANCE 0x0002
#define END_INSIDE 0x0004
#define IP0_INSIDE 0x0008
#define BEG_INSIDE 0x0010
#define TOTALY_INSIDE 0x0020
#define TOTALY_COVERED 0x0040
#define MOD_SKIP 0x0080
_SHORT SpcElemFirstOccArr( low_type _PTR pLowData, p_INT pModeWord ,
p_POINTS_GROUP pTrajectoryCut, _UCHAR mark ) ;
#define NREDUCTION 5
#define NREDUCTION_FOR_BORDER 0
_SHORT Extr( low_type _PTR low_data, _SHORT eps_fy,
_SHORT eps_fx , _SHORT eps_fxy , _SHORT eps_fyx ,
_SHORT nMaxReduct , _SHORT extr_axis ) ;
_SHORT Cross( low_type _PTR low_data ) ;
_SHORT Clash( _SHORT _PTR x, _SHORT _PTR y, _SHORT i, _SHORT j,
_SHORT of, _SHORT bf ) ;
/***************************************************************************/
/* module LOW_UTIL */
/***************************************************************************/
#define LEFT_OUTSIDE 1
#define RIGHT_OUTSIDE 2
#define LEFT_SHIFT 3
#define RIGHT_SHIFT 4
#define INSIDE 5
#define COVERS 6
_VOID SetXYToInitial ( low_type _PTR pLowData ) ;
_SHORT LowAlloc( _SHORT _PTR _PTR buffer,
_SHORT num_buffers , _SHORT len_buf ,
low_type _PTR pLowData ) ;
_SHORT low_dealloc( _SHORT _PTR _PTR buffer ) ;
_SHORT alloc_rastr( _ULONG _PTR _PTR rastr ,
_SHORT num_rastrs,_SHORT len_rastr ) ;
_SHORT dealloc_rastr( _ULONG _PTR _PTR rastr ) ;
_BOOL AllocSpecl ( p_SPECL _PTR ppSpecl, _SHORT nElements ) ;
_VOID DeallocSpecl ( p_SPECL _PTR ppSpecl ) ;
_BOOL CreateSDS ( low_type _PTR pLowData , _SHORT nSDS ) ;
_VOID DestroySDS( low_type _PTR pLowData ) ;
_SHORT MaxPointsGrown(
#ifdef FORMULA
_TRACE trace,
#endif /*FORMULA*/
_SHORT nPoints ) ;
/* Max # of points */
/* after "Errorprov" or oth-*/
/* er functions in "x" and */
/* "y" arrays. nPoints - */
/* initial value. */
_INT MaxesCount( p_SHORT xyArr, low_type _PTR pLowData ) ;
/* Counts (and returns) the total number of */
/* x- or y-maxima in the whole trajectory. */
_BOOL BorderForSpecSymbol ( low_type _PTR pLowData , rc_type _PTR rc );
/* If the trace looks like some special */
/* symbol (fraction line,"-","=","+"), then */
/* finds borders for it and returns _TRUE, */
/* otherwise does nothing and returns _FALSE. */
_LONG DistanceSquare ( _INT i1, _INT i2, p_SHORT xAr, p_SHORT yAr ) ;
/* The square of the distance between */
/* points #i1 and #i2. */
#if 0
#define PRESERVE_GLOB_EXTR _TRUE /* For usage as parameter */
/* "bPreserveGlobExtr" in funct- */
/* ion "SmoothXY". */
_BOOL SmoothXY ( p_SHORT x, p_SHORT y,
_INT iLeft, _INT iRight,
_INT nTimes, _BOOL bPreserveGlobExtr );
#endif
/* This function computes the square of the distance of the */
/* point (xPoint,yPoint) to the straight line going through */
/* (x1,y1) and (x2,y2). See figure in the function code. */
_LONG QDistFromChord ( _INT x1, _INT y1,
_INT x2, _INT y2,
_INT xPoint, _INT yPoint );
#define CURV_MAX (1000L)
#define CURV_NORMA (100L)
_SHORT CurvMeasure ( p_SHORT x, p_SHORT y,
_INT iBeg, _INT iEnd,
_INT iMostFar );
/* This function computes the distance whose "circle" */
/* is the 8-angles figure: */
_INT Distance8 ( _INT x1, _INT y1,
_INT x2, _INT y2 );
#if PG_DEBUG
_VOID SetNewAttr ( p_SPECL pElem, _UCHAR hght, _UCHAR fb_dir );
/* Clears attrs and sets */
/* specified height and cir- */
/* cle direction. */
#else
#define SetNewAttr(el,h,fb) (el)->attr = (((h)&_umd_) | ((fb)&_fb_))
#endif
#if (PG_DEBUG || PG_DEBUG_WIN)
p_SPECL BadSPECLPtr (_VOID);
#define REF(elem) ((elem)? (elem):BadSPECLPtr())
#define CHECK_PTR(p) {if ((p)==_NULL) BadSPECLPtr();}
#else
#define REF(elem) (elem)
#define CHECK_PTR(p) {}
#endif /*!(PG_DEBUG || PG_DEBUG_WIN)*/
#define ANY_CROSSING(pElem) ( REF(pElem)->mark==CROSS \
|| REF(pElem)->mark==HATCH \
|| REF(pElem)->mark==STICK )
#define IU_OR_ID(pElem) (REF(pElem)->code==_IU_ || REF(pElem)->code==_ID_)
/* #define SET_XTST_BITS(pElem) {SetBit(pElem,X_XT); SetBit(pElem,X_ST);}*/
#define NULL_OR_ZZ(pElem) ( (pElem)==_NULL \
|| REF(pElem)->code==_ZZZ_ \
|| REF(pElem)->code==_ZZ_ \
|| REF(pElem)->code==_Z_ \
|| REF(pElem)->code==_FF_ )
#define ANY_BREAK(pElem) ( REF(pElem)->code==_ZZZ_ \
|| REF(pElem)->code==_ZZ_ \
|| REF(pElem)->code==_Z_ \
|| REF(pElem)->code==_FF_ )
#define ANY_ARC_WITH_TAIL(pElem) ( REF(pElem)->code==_UUR_ \
|| REF(pElem)->code==_UUL_ \
|| REF(pElem)->code==_UDR_ \
|| REF(pElem)->code==_UDL_)
#define ANY_GAMMA_SMALL(pElem) ( REF(pElem)->code==_GUs_ \
|| REF(pElem)->code==_GDs_ \
|| REF(pElem)->code==_Gl_ \
|| REF(pElem)->code==_Gr_)
#define ANY_ANGLE(pElem) ( REF(pElem)->code==_ANl \
|| REF(pElem)->code==_ANr \
|| REF(pElem)->code==_AN_UR \
|| REF(pElem)->code==_AN_UL \
)
#define XT_OR_ST(pElem) ( REF(pElem)->code==_XT_ \
|| REF(pElem)->code==_ST_)
#define ANY_MOVEMENT(pElem) ( REF(pElem)->code==_TZ_ \
|| REF(pElem)->code==_TS_ \
|| REF(pElem)->code==_BL_ \
|| REF(pElem)->code==_BR_)
#if LOW_INLINE
#define IsAnyCrossing(e) ANY_CROSSING(e)
#define Is_IU_or_ID(e) IU_OR_ID(e)
#define NULL_or_ZZ_this(el) NULL_OR_ZZ(el)
#define NULL_or_ZZ_after(el) NULL_or_ZZ_this(REF(el)->next)
#define NULL_or_ZZ_before(el) NULL_or_ZZ_this(REF(el)->prev)
#define IsAnyBreak(el) ANY_BREAK(el)
#define IsAnyArcWithTail(el) ANY_ARC_WITH_TAIL(el)
#define IsAnyGsmall(el) ANY_GAMMA_SMALL(el)
#define IsAnyAngle(el) ANY_ANGLE(el)
#define IsXTorST(el) XT_OR_ST(el)
#define IsAnyMovement(el) ANY_MOVEMENT(el)
#else
_BOOL IsAnyCrossing ( p_SPECL pElem ); /* Checks if the "Elem" has the */
/* HATCH,CROSS or STICK mark. */
_BOOL IsAnyBreak( p_SPECL pElem ); /* Checks if the "Elem" is BREAK*/
_BOOL Is_IU_or_ID ( p_SPECL pElem );
/* _VOID SetXTSTBits ( p_SPECL pElem );*/ /* Sets both XT and ST bits */
/* (frequently used operation). */
_BOOL NULL_or_ZZ_this ( p_SPECL pElem );
_BOOL NULL_or_ZZ_after ( p_SPECL pElem );
_BOOL NULL_or_ZZ_before( p_SPECL pElem );
_BOOL IsAnyArcWithTail(p_SPECL pElem);
_BOOL IsAnyGsmall(p_SPECL pElem);
_BOOL IsAnyAngle(p_SPECL pElem);
_BOOL IsXTorST(p_SPECL pElem);
_BOOL IsAnyMovement(p_SPECL pElem);
#endif /*LOW_INLINE*/
p_SPECL SkipAnglesAfter ( p_SPECL pElem );
p_SPECL SkipAnglesBefore ( p_SPECL pElem );
p_SPECL FindStrongElemAfter ( p_SPECL pElem );
p_SPECL FindStrongElemBefore ( p_SPECL pElem );
_BOOL IsUpperElem ( p_SPECL pElem );
_BOOL IsLowerElem ( p_SPECL pElem );
_BOOL IsStrongElem ( p_SPECL pElem );
_BOOL X_IsBreak ( p_xrd_el_type pXr );
_BOOL X_IsStrongElem( p_xrd_el_type pXr );
_INT iRefPoint( p_SPECL pElem, p_SHORT y );
_UCHAR HeightInLine ( _SHORT y, /* Calculating height in */
low_type _PTR pLowData ); /* the line of the point */
/* with abs.coord "y". */
_UCHAR MidPointHeight ( p_SPECL pElem, low_type _PTR pLowData );
/* The height of the middle point */
/* of the "pElem" */
_INT iMidPointPlato ( _INT iFirst, _INT iToStop, p_SHORT val, p_SHORT y );
_BOOL GetBoxFromTrace ( _TRACE trace,
_INT iLeft, _INT iRight,
p_RECT pRect );
_VOID GetTraceBox ( p_SHORT xArray, p_SHORT yArray,
_INT iLeft, _INT iRight,
p_RECT pRect );
_BOOL GetTraceBoxInsideYZone ( p_SHORT x, p_SHORT y,
_INT ibeg, _INT iend,
_SHORT yUpZone, _SHORT yDnZone,
p_RECT pRect,
p_SHORT ixmax,p_SHORT ixmin,p_SHORT iymax,p_SHORT iymin);
#define size_cross(jb,je,x,y,pr) GetTraceBox((x),(y),(jb),(je),(pr))
/* Values of (*ptRetCod) after "ClosedSquare" worked: */
#define RETC_OK ((_SHORT)0)
#define RETC_NO_PTS_IN_TRAJECTORY ((_SHORT)1)
#define RETC_BREAK_WHERE_SHOULDNT ((_SHORT)2)
_LONG ClosedSquare( p_SHORT xTrace, p_SHORT yTrace,
_INT iBeg, _INT iEnd, p_SHORT ptRetCod );
_LONG TriangleSquare( p_SHORT x, p_SHORT y,
_INT i1, _INT i2, _INT i3 );
_SHORT CurvFromSquare( p_SHORT x, p_SHORT y,
_INT iBeg, _INT iEnd );
_LONG LengthOfTraj( p_SHORT xTrace, p_SHORT yTrace,
_INT iBeg, _INT iEnd, p_LONG pChord ,p_SHORT ptRetCod );
/* Calc. angle cos */
_LONG cos_pointvect ( _INT xbeg1, _INT ybeg1,
_INT xend1, _INT yend1,
_INT xbeg2, _INT ybeg2,
_INT xend2, _INT yend2 );
_LONG cos_vect( _INT beg1, _INT end1, /* beg and end first */
_INT beg2, _INT end2, /* and second vector's */
_SHORT _PTR x, _SHORT _PTR y);
_LONG cos_horizline ( _INT beg1, _INT end1,
_SHORT _PTR x, _SHORT _PTR y);
_LONG cos_normalslope ( _INT beg1, _INT end1,
_INT slope, _SHORT _PTR x, _SHORT _PTR y );
_UCHAR GetBit (p_SPECL elem,_SHORT bitnum);
_BOOL SetBit (p_SPECL elem, _SHORT bitnum);
_BOOL ClrBit (p_SPECL elem, _SHORT bitnum);
_INT ixMin ( _INT iStart, _INT iEnd, p_SHORT xArray, p_SHORT yArray );
_INT ixMax ( _INT iStart, _INT iEnd, p_SHORT xArray, p_SHORT yArray );
_INT iXYweighted_max_right ( p_SHORT xArray, p_SHORT yArray,
_INT iStart, _INT nDepth,
_INT xCoef, _INT yCoef );
_INT iXmax_right ( p_SHORT xArray, p_SHORT yArray,
_INT iStart, _INT nDepth );
_INT iXmin_right ( p_SHORT xArray, p_SHORT yArray,
_INT iStart, _INT nDepth );
_INT iXmax_left ( p_SHORT xArray, p_SHORT yArray,
_INT iStart, _INT nDepth );
_INT iXmin_left ( p_SHORT xArray, p_SHORT yArray,
_INT iStart, _INT nDepth );
#define iYup_right(y,iStart,nDepth) (iXmin_right((y),(y),(iStart),(nDepth)))
#define iYdown_right(y,iStart,nDepth) (iXmax_right((y),(y),(iStart),(nDepth)))
#define iYup_left(y,iStart,nDepth) (iXmin_left((y),(y),(iStart),(nDepth)))
#define iYdown_left(y,iStart,nDepth) (iXmax_left((y),(y),(iStart),(nDepth)))
_BOOL xMinMax ( _INT ibeg, _INT iend,
p_SHORT x, p_SHORT y,
p_SHORT pxMin, p_SHORT pxMax );
_BOOL yMinMax ( _INT ibeg, _INT iend,
p_SHORT y,
p_SHORT pyMin, p_SHORT pyMax );
_INT iyMin ( _INT iStart, _INT iEnd, p_SHORT yArray );
_INT iyMax ( _INT iStart, _INT iEnd, p_SHORT yArray );
_INT iYup_range ( p_SHORT yArray, _INT iStart, _INT iEnd );
_INT iYdown_range ( p_SHORT yArray, _INT iStart, _INT iEnd );
_INT iClosestToXY ( _INT iBeg, _INT iEnd,
p_SHORT xAr, p_SHORT yAr,
_SHORT xRef, _SHORT yRef );
_INT iClosestToY( p_SHORT yAr, _INT iBeg, _INT iEnd, _SHORT yVal );
_BOOL FindCrossPoint ( _SHORT x1, _SHORT y1, _SHORT x2, _SHORT y2,
_SHORT x3, _SHORT y3, _SHORT x4, _SHORT y4,
p_SHORT pxAnswer, p_SHORT pyAnswer );
_BOOL is_cross ( _SHORT x1, _SHORT y1, _SHORT x2, _SHORT y2,
_SHORT x3, _SHORT y3, _SHORT x4, _SHORT y4 );
_INT iMostFarFromChord ( p_SHORT xArray, p_SHORT yArray,
_INT iLeft, _INT iRight );
/* Constants - return values of the "SideExtr" */
/* function: */
/* "NO_SIDE_EXTR" Must be ZERO */
#define NO_SIDE_EXTR 0
#define SIDE_EXTR_LIKE_1ST 1
#define SIDE_EXTR_LIKE_2ND 2
#define SIDE_EXTR_LIKE_1ST_WEAK 3
#define SIDE_EXTR_LIKE_2ND_WEAK 4
#if defined(FOR_GERMAN) || defined(FOR_FRENCH)
#define SIDE_EXTR_TRACE_FOR_er 5
#endif /*FOR_GERMAN*/
/* Constant for usage as "bStrict" argument of "SideExtr": */
#define STRICT_ANGLE_STRUCTURE _TRUE
_INT SideExtr( p_SHORT x, p_SHORT y,
_INT iBeg, _INT iEnd,
_INT nSlope,
p_SHORT xBuf, p_SHORT yBuf,
p_SHORT ind_back,
p_INT piSideExtr,
_BOOL bStrict );
_INT iMostCurvedPoint( p_SHORT x, p_SHORT y,
_INT iBeg, _INT iEnd, _INT nCurvAll );
/* "CurrIndex" finds the current index of the point */
/* with the "ind_old" source index (i.e. on the un- */
/* modified trajectory). Or UNDEF, if this wasn't */
/* found. */
_SHORT CurrIndex ( p_SHORT indBack, _INT ind_old, _INT nIndexes );
_SHORT SlopeShiftDx ( _SHORT dy, _INT slope );
#define STRICT_OVERLAP _TRUE
_BOOL xHardOverlapRect ( p_RECT pr1, p_RECT pr2, _BOOL bStrict );
_BOOL yHardOverlapRect ( p_RECT pr1, p_RECT pr2, _BOOL bStrict );
_BOOL HardOverlapRect ( p_RECT pr1, p_RECT pr2, _BOOL bStrict );
#define STRICT_IN _TRUE
_BOOL SoftInRect ( p_RECT pr1, p_RECT pr2, _BOOL bStrict );
_BOOL IsRightGulfLikeIn3 ( p_SHORT x, p_SHORT y,
_INT iBeg, _INT iEnd,
p_INT piGulf );
_INT brk_right ( p_SHORT yArray,
_INT iStart, _INT iEnd );
_INT brk_left ( p_SHORT yArray,
_INT iStart, _INT iEnd );
_INT nobrk_right ( p_SHORT yArray,
_INT iStart, _INT iEnd );
_INT nobrk_left ( p_SHORT yArray,
_INT iStart, _INT iEnd );
#define _FIRST 0
#define _MEAD 1
#define _LAST 2
_SHORT NewIndex ( p_SHORT indBack , p_SHORT newY ,
_SHORT ind_old , _SHORT nIndexes , _SHORT fl ) ;
_SHORT R_ClosestToLine( p_SHORT xAr, p_SHORT yAr, PS_point_type _PTR pRef,
p_POINTS_GROUP pLine , p_SHORT p_iClosest ) ;
_VOID DefLineThresholds ( p_low_type pLowData ) ;
_LONG SquareDistance ( _SHORT xBeg , _SHORT yBeg,
_SHORT xEnd , _SHORT yEnd );
#define INIT 1
#define NOINIT 0
_SHORT InitGroupsBorder( low_type _PTR pLowData , _SHORT fl_BoxInit ) ;
_INT GetGroupNumber( low_type _PTR pLowData , _INT iPoint ) ;
_BOOL HeightMeasure( _INT iBeg, _INT iEnd, low_type _PTR pLowData ,
p_UCHAR pUpperHeight, p_UCHAR pLowerHeight ) ;
_SHORT IsPointCont( low_type _PTR pLowData, _INT iPoint, _UCHAR mark );
/* Return values of the function "DefineWritingStep": */
//with bUseMediana == _TRUE
#define STEP_INDEPENDENT 0
#define STEP_MEDIANA 1
#define STEP_COMBINED 2
//with bUseMediana == _FALSE
#define STEP_SURE STEP_INDEPENDENT
#define STEP_REJECT STEP_MEDIANA
#define STEP_UNSURE STEP_COMBINED
_SHORT DefineWritingStep( low_type _PTR low_data,
p_SHORT pxWrtStep,
_BOOL bUseMediana );
_BOOL IsInnerAngle ( p_SHORT xArray, p_SHORT yArray,
SPECL _PTR pFrst, SPECL _PTR pLast,
SPECL _PTR pAngle );
_INT CalcDistBetwXr(p_SHORT xTrace,p_SHORT yTrace,
_INT ibeg1,_INT iend1,_INT ibeg2,_INT iend2,
p_SHORT Retcod);
_BOOL CurveHasSelfCrossing( p_SHORT x, p_SHORT y,
_INT iBeg, _INT iEnd,
p_INT pInd1, p_INT pInd2,
_LONG lMinAbsSquare );
#define POINT_ON_BORDER 0
#define POINT_INSIDE 1
#define POINT_OUTSIDE 2
/* in case of moving those two prototypes below, move defines above with them */
_SHORT IsPointInsideArea(p_SHORT pxBorder,p_SHORT pyBorder,_INT NumPntsInBorder,
_SHORT xPoint,_SHORT yPoint,p_SHORT position);
_BOOL IsPointOnBorder(p_SHORT pxBorder,p_SHORT pyBorder,_INT Pnt1st,_INT Pnt2nd,
_SHORT xPoint,_SHORT yPoint,p_BOOL pbIsCross);
_BOOL GetTraceBoxWithoutXT_ST(p_low_type low_data,_INT ibeg,_INT iend,p_RECT pRect);
_BOOL IsPointBelongsToXT_ST(_INT iPoint,p_SPECL specl);
/***************************************************************************/
/* module TRANSFRM */
/***************************************************************************/
_SHORT transfrmN(low_type _PTR low_data); /* */
/***************************************************************************/
/* module OVER */
/***************************************************************************/
_SHORT measure_slope(low_type _PTR low_data); /* calculation of */
/* slope */
/* */
_SHORT def_over(low_type _PTR low_data); /* setting OVR */
/* */
/***************************************************************************/
/* module ANGLE */
/***************************************************************************/
_SHORT angl(low_type _PTR low_data); /* search for angles */
/* */
/* */
_SHORT angle_direction(_SHORT x0, /* calculate any angle direction */
_SHORT y0, /* vector of angle direction*/
_SHORT slope); /* script slope */
/* */
/***************************************************************************/
/* module LU_SPECL */
/***************************************************************************/
p_SPECL NewSPECLElem( low_type _PTR low_data );
_VOID DelFromSPECLList ( p_SPECL pElem );
_VOID DelThisAndNextFromSPECLList ( p_SPECL pElem );
_VOID DelCrossingFromSPECLList ( p_SPECL pElem );
_VOID SwapThisAndNext ( p_SPECL pElem );
_VOID Insert2ndAfter1st ( p_SPECL p1st, p_SPECL p2nd );
_VOID InsertCrossing2ndAfter1st ( p_SPECL p1st, p_SPECL p2nd );
_VOID Move2ndAfter1st ( p_SPECL p1st, p_SPECL p2nd );
_VOID MoveCrossing2ndAfter1st ( p_SPECL p1st, p_SPECL p2nd );
#define ATTACH_2nd_TO_1st(p1,p2) {if (p1) {(p1)->next=(p2); } if(p2)(p2)->prev=(p1);}
#define CROSS_IN_TIME(p1,p2) ( p1 && p2 && (p1)->iend >= (p2)->ibeg \
&& (p2)->iend >= (p1)->ibeg )
#define FIRST_IN_SECOND(p1,p2) ( p1 && p2 && (p1)->ibeg >= (p2)->ibeg \
&& (p1)->iend <= (p2)->iend )
#if LOW_INLINE
#define Attach2ndTo1st(p1,p2) ATTACH_2nd_TO_1st(p1,p2)
#define CrossInTime(p1,p2) CROSS_IN_TIME(p1,p2)
#define FirstBelongsTo2nd(p1,p2) FIRST_IN_SECOND(p1,p2)
#else
_VOID Attach2ndTo1st ( p_SPECL p1st, p_SPECL p2nd );
_BOOL CrossInTime ( p_SPECL p1st, p_SPECL p2nd ); /* TRUE if some part */
/* of trajectory belongs to */
/* both elems. */
_BOOL FirstBelongsTo2nd ( p_SPECL p1st, p_SPECL p2nd ); /* TRUE if all */
/* trajectory of the 1st elem */
/* is part of that of the 2nd */
/* one */
#endif /*LOW_INLINE*/
_VOID RefreshElem ( p_SPECL pElem,
_UCHAR mark, _UCHAR code, _UCHAR attr
#if !NEW_VERSION
, _SHORT bitToSet
#endif /*NEW_VERSION*/
); /* Set the fields of "pElem". */
p_SPECL FindMarkRight ( p_SPECL pElem, _UCHAR mark ); /* Goes "next" */
/* until "mark" is found or end */
/* of specl. If pElem->mark==mark*/
/* returns pElem. */
p_SPECL FindMarkLeft ( p_SPECL pElem, _UCHAR mark ); /* Same, but "prev" */
/***************************************************************************/
/* module CONVERT */
/***************************************************************************/
_SHORT exchange( low_type _PTR low_data,
xrdata_type _PTR xrd);
_SHORT form_pseudo_xr_data(low_type _PTR low_data, xrdata_type _PTR xrdata);
/***************************************************************************/
/* module CIRCLE */
/***************************************************************************/
_SHORT Circle(low_type _PTR low_data); /* */
/* */
/***************************************************************************/
/* module frm_word */
/***************************************************************************/
_BOOL MayBeFrline ( p_SHORT xArray, p_SHORT yArray,
_INT iBeg, _INT iEnd,
_SHORT xRange );
/* Possible return values of "chk_sign" function: */
#define SGN_NOT_SIGN 0 /* CHE: This MUST be zero !!! */
#define SGN_SOME 1 /* Some of the possible signs listed */
/* below in "#define"'s */
#define SGN_PLUS 2
#define SGN_EQUAL 3
_SHORT chk_sign ( p_SHORT xArray, p_SHORT yArray,
_INT iBeg, _INT iEnd,
_SHORT xRange, _SHORT yRange );
/* Definition for "chk_slash" function: */
#define WHOLE_TRAJECTORY _TRUE
_BOOL chk_slash (p_SHORT xArray, p_SHORT yArray,
_INT iLeft, _INT iRight,
_SHORT yRange, _BOOL bWholeTrj );
_VOID FindStraightPart ( p_SHORT xArray, p_SHORT yArray,
p_INT piBeg, p_INT piEnd);
_BOOL delta_interval ( p_SHORT xArray, p_SHORT yArray,
_INT iLeft, _INT iRight,
_INT nMaxRectRatio,
_INT nSlope,
p_LONG pldxSum, p_LONG pldySum,
p_LONG plNumIntervals,
_BOOL bThrowBigAndSmall );
#if USE_FRM_WORD
/* Constants for usage as "bIncrementalBreak" parameter values: */
#define INCREMENTAL_BREAK _TRUE
#define NOT_INCREMENTAL_BREAK (!INCREMENTAL_BREAK)
_SHORT FrmWordBreak ( _TRACE trace, _INT nPoints,
_BOOL bIncrementalBreak,
p_SHORT pn1stWrdPoints,
p_SHORT pnFrLinePoints );
_VOID ResetFrmWordBreak(_VOID); /* Should be called before the passing */
/* the first stroke of the new formula. */
/***************************************************************************/
/* module LOW_UTIL */
/***************************************************************************/
_INT brk_left_trace ( PS_point_type _PTR trace,
_INT iStart, _INT iEnd );
_INT nobrk_left_trace ( PS_point_type _PTR trace,
_INT iStart, _INT iEnd );
_INT brk_right_trace ( PS_point_type _PTR trace,
_INT iStart, _INT iEnd );
_INT nobrk_right_trace ( PS_point_type _PTR trace,
_INT iStart, _INT iEnd );
_SHORT Xmean_range ( p_SHORT xArray, p_SHORT yArray,
_INT iStart, _INT iEnd );
_SHORT Ymean_range ( p_SHORT yArray, _INT iStart, _INT iEnd );
_SHORT Yup_range ( p_SHORT yArray, _INT iStart, _INT iEnd );
_SHORT Ydown_range ( p_SHORT yArray, _INT iStart, _INT iEnd );
_VOID xy_to_trace ( p_SHORT xArray, p_SHORT yArray,
_INT nPoints, _TRACE trace );
#endif /*USE_FRM_WORD*/
_VOID trace_to_xy ( p_SHORT xArray, p_SHORT yArray,
_INT nPoints, _TRACE trace );
/***************************************************************************/
/* module SPECWIN */
/***************************************************************************/
_SHORT low_level(PS_point_type _PTR trace, /* completeness of low level */
xrdata_type _PTR xrdata, /* */
rc_type _PTR rc );
_INT BaselineAndScale(low_type _PTR pLowData);
_BOOL PrepareLowData(low_type _PTR pLowData,
PS_point_type _PTR trace,
rc_type _PTR rc,
p_SHORT _PTR pbuffer);
_VOID FillLowDataTrace(low_type _PTR pLowData,
PS_point_type _PTR trace);
_VOID GetLowDataRect (low_type _PTR pLowData);
_INT AnalyzeLowData(low_type _PTR pLowData,
PS_point_type _PTR trace);
/***************************************************************************/
#endif /* LOW_LEVEL_INCLUDED */
/***************************************************************************/