This is GKText.c in view mode; [Download] [Up]
/* ./GKText.c generated from GKText.psw
by unix pswrap V1.009 Wed Apr 19 17:50:24 PDT 1989
*/
#include <dpsclient/dpsfriends.h>
#include <string.h>
#line 1 "GKText.psw"
#line 10 "./GKText.c"
void GKTextSetUp()
{
typedef struct {
unsigned char tokenType;
unsigned char topLevelCount;
unsigned short nBytes;
DPSBinObjGeneric obj0;
DPSBinObjGeneric obj1;
DPSBinObjGeneric obj2;
DPSBinObjGeneric obj3;
DPSBinObjGeneric obj4;
DPSBinObjGeneric obj5;
DPSBinObjGeneric obj6;
DPSBinObjGeneric obj7;
DPSBinObjGeneric obj8;
DPSBinObjGeneric obj9;
DPSBinObjGeneric obj10;
DPSBinObjGeneric obj11;
DPSBinObjGeneric obj12;
DPSBinObjGeneric obj13;
DPSBinObjGeneric obj14;
DPSBinObjGeneric obj15;
DPSBinObjGeneric obj16;
DPSBinObjGeneric obj17;
DPSBinObjGeneric obj18;
DPSBinObjGeneric obj19;
DPSBinObjGeneric obj20;
DPSBinObjGeneric obj21;
DPSBinObjReal obj22;
DPSBinObjGeneric obj23;
DPSBinObjGeneric obj24;
DPSBinObjGeneric obj25;
DPSBinObjGeneric obj26;
DPSBinObjGeneric obj27;
DPSBinObjGeneric obj28;
DPSBinObjGeneric obj29;
DPSBinObjGeneric obj30;
DPSBinObjGeneric obj31;
DPSBinObjGeneric obj32;
DPSBinObjGeneric obj33;
DPSBinObjGeneric obj34;
DPSBinObjGeneric obj35;
DPSBinObjGeneric obj36;
DPSBinObjGeneric obj37;
DPSBinObjGeneric obj38;
DPSBinObjGeneric obj39;
DPSBinObjGeneric obj40;
DPSBinObjGeneric obj41;
DPSBinObjGeneric obj42;
DPSBinObjGeneric obj43;
DPSBinObjGeneric obj44;
DPSBinObjGeneric obj45;
DPSBinObjGeneric obj46;
DPSBinObjGeneric obj47;
DPSBinObjGeneric obj48;
DPSBinObjGeneric obj49;
DPSBinObjGeneric obj50;
DPSBinObjGeneric obj51;
DPSBinObjGeneric obj52;
DPSBinObjGeneric obj53;
DPSBinObjGeneric obj54;
DPSBinObjGeneric obj55;
DPSBinObjGeneric obj56;
DPSBinObjGeneric obj57;
DPSBinObjGeneric obj58;
DPSBinObjGeneric obj59;
DPSBinObjReal obj60;
DPSBinObjGeneric obj61;
DPSBinObjGeneric obj62;
DPSBinObjGeneric obj63;
DPSBinObjGeneric obj64;
DPSBinObjGeneric obj65;
DPSBinObjGeneric obj66;
DPSBinObjGeneric obj67;
DPSBinObjGeneric obj68;
DPSBinObjGeneric obj69;
DPSBinObjGeneric obj70;
DPSBinObjGeneric obj71;
DPSBinObjGeneric obj72;
DPSBinObjGeneric obj73;
DPSBinObjGeneric obj74;
DPSBinObjGeneric obj75;
DPSBinObjGeneric obj76;
DPSBinObjGeneric obj77;
DPSBinObjGeneric obj78;
DPSBinObjGeneric obj79;
DPSBinObjGeneric obj80;
DPSBinObjGeneric obj81;
DPSBinObjGeneric obj82;
DPSBinObjGeneric obj83;
DPSBinObjGeneric obj84;
DPSBinObjGeneric obj85;
DPSBinObjGeneric obj86;
DPSBinObjGeneric obj87;
DPSBinObjGeneric obj88;
DPSBinObjGeneric obj89;
DPSBinObjGeneric obj90;
DPSBinObjGeneric obj91;
DPSBinObjGeneric obj92;
DPSBinObjGeneric obj93;
DPSBinObjGeneric obj94;
DPSBinObjGeneric obj95;
DPSBinObjGeneric obj96;
DPSBinObjGeneric obj97;
DPSBinObjGeneric obj98;
DPSBinObjGeneric obj99;
DPSBinObjGeneric obj100;
DPSBinObjGeneric obj101;
DPSBinObjGeneric obj102;
DPSBinObjGeneric obj103;
DPSBinObjGeneric obj104;
DPSBinObjGeneric obj105;
DPSBinObjGeneric obj106;
DPSBinObjGeneric obj107;
DPSBinObjGeneric obj108;
DPSBinObjGeneric obj109;
DPSBinObjGeneric obj110;
DPSBinObjGeneric obj111;
DPSBinObjGeneric obj112;
DPSBinObjGeneric obj113;
DPSBinObjGeneric obj114;
DPSBinObjGeneric obj115;
char obj116[5];
char obj117[6];
char obj118[3];
char obj119[5];
char obj120[5];
char obj121[10];
char obj122[6];
} _dpsQ;
static _dpsQ _dpsF = {
DPS_DEF_TOKENTYPE, 6, 972,
{DPS_LITERAL|DPS_NAME, 0, 6, 962}, /* gkbbox */
{DPS_EXEC|DPS_ARRAY, 0, 48, 544},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 10, 952}, /* gkdrawtext */
{DPS_EXEC|DPS_ARRAY, 0, 62, 48},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 3, 939}, /* str */
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135}, /* roll */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 5, 942}, /* ylate */
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135}, /* roll */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 5, 947}, /* xlate */
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135}, /* roll */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78}, /* gsave */
{DPS_LITERAL|DPS_REAL, 0, 0, 0.0},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150}, /* setgray */
{DPS_EXEC|DPS_NAME, 0, 5, 947}, /* xlate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_EXEC|DPS_NAME, 0, 5, 942}, /* ylate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
{DPS_LITERAL|DPS_STRING, 0, 3, 939},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160}, /* show */
{DPS_EXEC|DPS_NAME, 0, 5, 947}, /* xlate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_EXEC|DPS_NAME, 0, 5, 942}, /* ylate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
{DPS_LITERAL|DPS_STRING, 0, 3, 939},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160}, /* show */
{DPS_EXEC|DPS_NAME, 0, 5, 947}, /* xlate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, 5, 942}, /* ylate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
{DPS_LITERAL|DPS_STRING, 0, 3, 939},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160}, /* show */
{DPS_EXEC|DPS_NAME, 0, 5, 947}, /* xlate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, 5, 942}, /* ylate */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
{DPS_LITERAL|DPS_STRING, 0, 3, 939},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160}, /* show */
{DPS_LITERAL|DPS_REAL, 0, 0, 1.0},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150}, /* setgray */
{DPS_EXEC|DPS_NAME, 0, 5, 947}, /* xlate */
{DPS_EXEC|DPS_NAME, 0, 5, 942}, /* ylate */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
{DPS_LITERAL|DPS_STRING, 0, 3, 939},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160}, /* show */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77}, /* grestore */
{DPS_LITERAL|DPS_NAME, 0, 3, 939}, /* str */
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135}, /* roll */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111}, /* newpath */
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
{DPS_LITERAL|DPS_STRING, 0, 3, 939},
{DPS_LITERAL|DPS_BOOL, 0, 0, 0},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 17}, /* charpath */
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
{DPS_LITERAL|DPS_STRING, 0, 3, 939},
{DPS_LITERAL|DPS_BOOL, 0, 0, 0},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 17}, /* charpath */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 115}, /* pathbbox */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62}, /* exch */
{DPS_LITERAL|DPS_INT, 0, 0, 3},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88}, /* index */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62}, /* exch */
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88}, /* index */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_LITERAL|DPS_INT, 0, 0, 4},
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135}, /* roll */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_LITERAL|DPS_INT, 0, 0, 4},
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135}, /* roll */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
{DPS_LITERAL|DPS_INT, 0, 0, 4},
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135}, /* roll */
{DPS_EXEC|DPS_NAME, 0, 6, 933}, /* height */
{DPS_EXEC|DPS_NAME, 0, 5, 928}, /* width */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 426}, /* y */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 425}, /* x */
{'w','i','d','t','h'},
{'h','e','i','g','h','t'},
{'s','t','r'},
{'y','l','a','t','e'},
{'x','l','a','t','e'},
{'g','k','d','r','a','w','t','e','x','t'},
{'g','k','b','b','o','x'},
}; /* _dpsQ */
register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
char pad[3];
DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,972);
if (0) *pad = 0; /* quiets compiler warnings */
}
#line 39 "GKText.psw"
#line 275 "./GKText.c"
void GKborderedTextBoundingBox(str, x, y, width, height)
char *str; float *x; float *y; float *width; float *height;
{
typedef struct {
unsigned char tokenType;
unsigned char sizeFlag;
unsigned short topLevelCount;
unsigned long nBytes;
DPSBinObjGeneric obj0;
DPSBinObjGeneric obj1;
DPSBinObjGeneric obj2;
DPSBinObjGeneric obj3;
DPSBinObjGeneric obj4;
DPSBinObjGeneric obj5;
DPSBinObjGeneric obj6;
DPSBinObjGeneric obj7;
DPSBinObjGeneric obj8;
DPSBinObjGeneric obj9;
DPSBinObjGeneric obj10;
DPSBinObjGeneric obj11;
DPSBinObjGeneric obj12;
DPSBinObjGeneric obj13;
DPSBinObjGeneric obj14;
DPSBinObjGeneric obj15;
char obj16[6];
} _dpsQ;
static _dpsQ _dpsF = {
DPS_DEF_TOKENTYPE, 0, 16, 142,
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78}, /* gsave */
{DPS_EXEC|DPS_NAME, 0, 0, 134}, /* param str */
{DPS_EXEC|DPS_NAME, 0, 6, 128}, /* gkbbox */
{DPS_LITERAL|DPS_INT, 0, 0, 3},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
{DPS_LITERAL|DPS_INT, 0, 0, 2},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
{DPS_LITERAL|DPS_INT, 0, 0, 1},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77}, /* grestore */
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_LITERAL|DPS_INT, 0, 0, 4},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119}, /* printobject */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 70}, /* flush */
{'g','k','b','b','o','x'},
}; /* _dpsQ */
register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
char pad[3];
register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
register int _dps_offset = 134;
static DPSResultsRec _dpsR[] = {
{ dps_tFloat, -1 },
{ dps_tFloat, -1 },
{ dps_tFloat, -1 },
{ dps_tFloat, -1 },
};
_dpsR[0].value = (char *)x;
_dpsR[1].value = (char *)y;
_dpsR[2].value = (char *)width;
_dpsR[3].value = (char *)height;
_dpsP[1].length = strlen(str);
_dpsP[1].val.stringVal = _dps_offset;
_dps_offset += (_dpsP[1].length + 3) & ~3;
_dpsF.nBytes = _dps_offset+8;
DPSSetResultTable(_dpsCurCtxt, _dpsR, 4);
DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,142);
DPSWriteStringChars(_dpsCurCtxt, (char *)str, _dpsP[1].length);
DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[1].length + 3) & 3);
DPSAwaitReturnValues(_dpsCurCtxt);
if (0) *pad = 0; /* quiets compiler warnings */
}
#line 49 "GKText.psw"
#line 353 "./GKText.c"
void GKdrawBorderedText(xlate, ylate, str)
float xlate; float ylate; char *str;
{
typedef struct {
unsigned char tokenType;
unsigned char sizeFlag;
unsigned short topLevelCount;
unsigned long nBytes;
DPSBinObjReal obj0;
DPSBinObjReal obj1;
DPSBinObjGeneric obj2;
DPSBinObjGeneric obj3;
char obj4[10];
} _dpsQ;
static _dpsQ _dpsF = {
DPS_DEF_TOKENTYPE, 0, 4, 50,
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: xlate */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: ylate */
{DPS_EXEC|DPS_NAME, 0, 0, 42}, /* param str */
{DPS_EXEC|DPS_NAME, 0, 10, 32}, /* gkdrawtext */
{'g','k','d','r','a','w','t','e','x','t'},
}; /* _dpsQ */
register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
char pad[3];
register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
register int _dps_offset = 42;
_dpsP[0].val.realVal = xlate;
_dpsP[1].val.realVal = ylate;
_dpsP[2].length = strlen(str);
_dpsP[2].val.stringVal = _dps_offset;
_dps_offset += (_dpsP[2].length + 3) & ~3;
_dpsF.nBytes = _dps_offset+8;
DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,50);
DPSWriteStringChars(_dpsCurCtxt, (char *)str, _dpsP[2].length);
DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[2].length + 3) & 3);
if (0) *pad = 0; /* quiets compiler warnings */
}
#line 57 "GKText.psw"
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.