1 /* 2 * @(#)screen.h 3.1 (Berkeley) 08/11/87 3 */ 4 5 #define INCLUDED_SCREEN 6 7 /* defines and defines to describe how to deal with the screen */ 8 9 #if !defined(MSDOS) 10 #define MAXNUMBERLINES 43 /* 3278-4 */ 11 #define MAXNUMBERCOLUMNS 132 /* 3278-5 */ 12 #define MAXSCREENSIZE 3564 /* (27*132) 3278-5 */ 13 #else /* !defined(MSDOS) */ /* MSDOS has memory constraints */ 14 #define MAXNUMBERLINES 25 /* XXX */ 15 #define MAXNUMBERCOLUMNS 80 16 #define MAXSCREENSIZE (MAXNUMBERLINES*MAXNUMBERCOLUMNS) 17 #endif /* !defined(MSDOS) */ /* MSDOS has memory constraints */ 18 #define LowestScreen() 0 19 #define HighestScreen() (ScreenSize-1) 20 21 #define ScreenLineOffset(x) ((x)%NumberColumns) 22 #define ScreenLine(x) ((int)((x)/NumberColumns)) 23 #define ScreenInc(x) (((x)==HighestScreen())? LowestScreen():x+1) 24 #define ScreenDec(x) (((x)==LowestScreen())? HighestScreen():x-1) 25 #define ScreenUp(x) (((x)+(ScreenSize-NumberColumns))%ScreenSize) 26 #define ScreenDown(x) (((x)+NumberColumns)%ScreenSize) 27 #define IsOrder(x) (Orders[x]) 28 #define BAIC(x) ((x)&0x3f) 29 #define CIAB(x) (CIABuffer[(x)&0x3f]) 30 #define BufferTo3270_0(x) (CIABuffer[(int)((x)/0x40)]) 31 #define BufferTo3270_1(x) (CIABuffer[(x)&0x3f]) 32 #define Addr3270(x,y) (BAIC(x)*64+BAIC(y)) 33 #define SetBufferAddress(x,y) ((x)*NumberColumns+(y)) 34 35 /* These know how fields are implemented... */ 36 37 #define WhereAttrByte(p) (IsStartField(p)? p: FieldDec(p)) 38 #define WhereHighByte(p) ScreenDec(FieldInc(p)) 39 #define WhereLowByte(p) ScreenInc(WhereAttrByte(p)) 40 #define FieldAttributes(x) (IsStartField(x)? GetHost(x) : \ 41 GetHost(WhereAttrByte(x))) 42 #define FieldAttributesPointer(p) (IsStartFieldPointer(p)? \ 43 GetHostPointer(p): \ 44 GetHost(WhereAttrByte((p)-&Host[0]))) 45 #define TurnOffMdt(x) ModifyHost(WhereAttrByte(x), &= ~ATTR_MDT) 46 #define TurnOnMdt(x) ModifyHost(WhereAttrByte(x), |= ATTR_MDT) 47 #define HasMdt(x) (GetHost(x)&ATTR_MDT) /* modified tag */ 48 49 /* 50 * Is the screen formatted? Some algorithms change depending 51 * on whether there are any attribute bytes lying around. 52 */ 53 #define FormattedScreen() \ 54 ((WhereAttrByte(0) != 0) || ((GetHost(0)&ATTR_MASK) == ATTR_MASK)) 55 56 /* field starts here */ 57 #define IsStartField(x) ((GetHost(x)&ATTR_MASK) == ATTR_MASK) 58 #define IsStartFieldPointer(p) ((GetHostPointer(p)&ATTR_MASK) == ATTR_MASK) 59 60 #define NewField(p,a) SetHost(p, (a)|ATTR_MASK) 61 #define DeleteField(p) SetHost(p, 0) 62 #define DeleteAllFields() 63 64 /* The following are independent of the implementation of fields */ 65 #define IsProtectedAttr(p,a) (IsStartField(p) || ((a)&ATTR_PROT)) 66 #define IsProtected(p) IsProtectedAttr(p,FieldAttributes(p)) 67 68 #define IsUnProtected(x) (!IsProtected(x)) 69 70 #define IsAutoSkip(x) (FieldAttributes(x)&ATTR_AUTO_SKIP) 71 72 #define IsNonDisplayAttr(c) (((c)&ATTR_DSPD_MASK) == ATTR_DSPD_NONDISPLAY) 73 #define IsNonDisplay(p) IsNonDisplayAttr(FieldAttributes(p)) 74 75 #define IsHighlightedAttr(c) \ 76 (((c)&ATTR_DSPD_MASK) == ATTR_DSPD_HIGH) 77 #define IsHighlighted(p) \ 78 (IsHighlightedAttr(FieldAttributes(p)) && !IsStartField(p)) 79 80 81 #define MAX(x,y) ((x)<(y)? (y):(x)) 82 #define MIN(x,y) ((x)<(y)? x:(y)) 83 84 typedef unsigned char ScreenImage; 85 86 extern int 87 FieldFind(); 88 89 extern char 90 CIABuffer[]; 91 92 #define GetGeneric(i,h) (h)[i] 93 #define GetGenericPointer(p) (*(p)) 94 #define SetGeneric(i,c,h) ((h)[i] = (c)) 95 #define ModifyGeneric(i,what,h) {(h)[i] what;} 96 97 #define GetHost(i) GetGeneric(i,Host) 98 #define GetHostPointer(p) GetGenericPointer(p) 99 #define SetHost(i,c) SetGeneric(i,c,Host) 100 #define ModifyHost(i,what) ModifyGeneric(i,what,Host) 101