mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-12 20:29:12 +00:00
261 lines
11 KiB
Plaintext
261 lines
11 KiB
Plaintext
|
;
|
|||
|
|
; File: PrPrivate.a
|
|||
|
|
;
|
|||
|
|
; Contains: xxx put contents here xxx
|
|||
|
|
;
|
|||
|
|
; Written by: xxx put writers here xxx
|
|||
|
|
;
|
|||
|
|
; Copyright: © 1991 by Apple Computer, Inc., all rights reserved.
|
|||
|
|
;
|
|||
|
|
; Change History (most recent first):
|
|||
|
|
;
|
|||
|
|
; <5> 1/30/91 gbm sab, #38: Change the ‘already including this file’ variable to
|
|||
|
|
; all uppercase (for security reasons)
|
|||
|
|
;
|
|||
|
|
; To Do:
|
|||
|
|
;
|
|||
|
|
|
|||
|
|
; Version: 3.13
|
|||
|
|
; Created: Friday, October 20, 1989 at 9:41:45 PM
|
|||
|
|
;
|
|||
|
|
;File: PrPrivate (Owned and maintained soley by the Print Shop)
|
|||
|
|
; Copyright © 1984, 1985, 1986 Apple Computer, Inc.
|
|||
|
|
;
|
|||
|
|
;_______________________________________________________________________
|
|||
|
|
;
|
|||
|
|
; Printing Equates -- This file supplements the high-level equates for the
|
|||
|
|
; Macintosh printing software in PrEqu. These equates are private
|
|||
|
|
; to Apple Computer, Inc. and should be used solely for building system
|
|||
|
|
; software such as Apple printer drivers. The lines commented out
|
|||
|
|
; reflect equates which appear in PrEqu and are included here just for
|
|||
|
|
; convenience.
|
|||
|
|
;
|
|||
|
|
; 1.0 CCH 11/ 9/1988 Adding to EASE.
|
|||
|
|
; END EASE MODIFICATION HISTORY
|
|||
|
|
;•1.1 CCH 9/14/1988 Updated EASE with the current rev of this file.
|
|||
|
|
;_______________________________________________________________________
|
|||
|
|
|
|||
|
|
IF &TYPE('__INCLUDINGPRPRIVATE__') = 'UNDEFINED' THEN
|
|||
|
|
__INCLUDINGPRPRIVATE__ SET 1
|
|||
|
|
|
|||
|
|
; Printing Code Constants
|
|||
|
|
|
|||
|
|
; These are the PrDrvr constants.
|
|||
|
|
|
|||
|
|
lPrLFSixth EQU -1 ; The PrDevCtl Proc's CParam for 1/6 th inch paper advance
|
|||
|
|
lPrLFEighth EQU -2 ; The PrDevCtl Proc's CParam for 1/8 th inch paper advance
|
|||
|
|
iPrDocOpen EQU 1 ; The PrDevCtl Proc's CParam for doc begin
|
|||
|
|
iPrPageClose EQU 2 ; The PrDevCtl Proc's CParam for page end
|
|||
|
|
;iPrLineFeed equ 3 ; The PrDevCtl Proc's CParam for paper advance
|
|||
|
|
iPrPageOpen EQU 4 ; The PrDevCtl Proc's CParam for page begin
|
|||
|
|
iPrDocClose EQU 5 ; The PrDevCtl Proc's CParam for doc end
|
|||
|
|
iPrLFStd EQU -1 ; The PrDevCtl Proc's CParam for std paper advance
|
|||
|
|
iMscCtl EQU 9 ; Msc Text state / Drvr State ctl number
|
|||
|
|
iPvtCtl EQU 10 ; Private Ctls start here
|
|||
|
|
|
|||
|
|
; State Constants
|
|||
|
|
|
|||
|
|
bPrDevOpen EQU 1 ; The DevOpen State Indicator
|
|||
|
|
bPrDocOpen EQU 2 ; The DocOpen State Indicator
|
|||
|
|
bPrPageOpen EQU 3 ; The PageOpen State Indicator
|
|||
|
|
bPrPrinting EQU 4 ; The Printing State Indicator
|
|||
|
|
bPrPageClose EQU 5 ; The PageClose State Indicator
|
|||
|
|
bPrDocClose EQU 6 ; The DocClose State Indicator
|
|||
|
|
bPrDevClose EQU 0 ; The DevClose State Indicator
|
|||
|
|
|
|||
|
|
; These are misc Alert & Dialog constants
|
|||
|
|
|
|||
|
|
iOK EQU 1 ; OK Button
|
|||
|
|
iCancel EQU 2 ; Cancel Button
|
|||
|
|
iPrStlDlg EQU $E000 ; {-8192} Style Dialog
|
|||
|
|
iPrJobDlg EQU $E001 ; {-8191} Job Dialog
|
|||
|
|
iPrCfgDlg EQU $E002 ; {-8190} Configuration Dialog
|
|||
|
|
iPgFeedAx EQU $E00A ; {-8182} Page Feed Dialog
|
|||
|
|
iPicSizAx EQU $E00B ; {-8181} Pic Size Alert
|
|||
|
|
iIOAbrtAx EQU $E00C ; {-8180} IO Timeout Alert
|
|||
|
|
iPrPgFst EQU 1
|
|||
|
|
iPrPgMax EQU 9999
|
|||
|
|
iPrSavPFil EQU $FFFF ; Abort but save print file
|
|||
|
|
|
|||
|
|
; Printing data structures
|
|||
|
|
|
|||
|
|
; Print Info data structure
|
|||
|
|
; The parameters needed for page composition.
|
|||
|
|
|
|||
|
|
|
|||
|
|
;iDev already defined in PrEqu.a
|
|||
|
|
;iDev EQU 0 ; Font mgr/QuickDraw device code [word]
|
|||
|
|
|
|||
|
|
iVRes EQU 2 ; V Resolution of device, in device coord.[word]
|
|||
|
|
iHRes EQU 4 ; H resolution [word]
|
|||
|
|
iPrInfoSize EQU 14 ; The PrInfo size.[14]
|
|||
|
|
|
|||
|
|
|
|||
|
|
; Printer Style data structure
|
|||
|
|
; The printer configuration and usage information.
|
|||
|
|
|
|||
|
|
;wDev EQU 0 ; The drvr #, Hi byte=RefNum, Lo byte=variant [word]
|
|||
|
|
bPort EQU 6 ; The IO port number [byte]
|
|||
|
|
iPrStlSize EQU 8 ; The PrStl size.[8]
|
|||
|
|
|
|||
|
|
|
|||
|
|
; Print eXtra Info data structure
|
|||
|
|
; The print time eXtra information.
|
|||
|
|
|
|||
|
|
iRowBytes EQU 0 ; The Band's rowBytes. [word]
|
|||
|
|
iBandV EQU 2 ; V Size of band, in device coordinates [word]
|
|||
|
|
iBandH EQU 4 ; H size of band [word]
|
|||
|
|
iBands EQU 8 ; Number of bands per page.
|
|||
|
|
bPatScale EQU 10 ; Pattern scaling [byte]
|
|||
|
|
bULThick EQU 11 ; 3 Underscoring parameters [byte]
|
|||
|
|
bULOffset EQU 12 ; [byte]
|
|||
|
|
bULShadow EQU 13 ; [byte]
|
|||
|
|
scan EQU 14 ; Band scan direction [byte]
|
|||
|
|
bXInfoX EQU 15 ; An eXtra byte. [byte]
|
|||
|
|
iPrXInfoSize EQU 16 ; The PrXInfo size.[16 bytes]
|
|||
|
|
|
|||
|
|
|
|||
|
|
; Print Job data structure
|
|||
|
|
; Print "form" for a single print request.
|
|||
|
|
|
|||
|
|
;iFstPage EQU 0 ; Page Range [word]
|
|||
|
|
;iLstPage EQU 2 ; [word]
|
|||
|
|
;iCopies EQU 4 ; # copies [word]
|
|||
|
|
;bJDocLoop EQU 6 ; Draft quality print flag [byte]
|
|||
|
|
;fFromApp EQU 7 ; Printing from an App (not PrApp) flag [byte]
|
|||
|
|
;pIdleProc EQU 8 ; Idle Proc [pointer]
|
|||
|
|
;pFileName EQU 12 ; Spool File Name: NIL for default [pointer]
|
|||
|
|
;iFileVol EQU 16 ; Spool File vol [word]
|
|||
|
|
;bFileVers EQU 18 ; Spool File version [byte]
|
|||
|
|
bJobX EQU 19 ; An eXtra byte [byte]
|
|||
|
|
;iPrJobSize EQU 20 ; The PrJob size.[20]
|
|||
|
|
|
|||
|
|
|
|||
|
|
; Print Port structure
|
|||
|
|
; A graf port, its procs, plus some extra.
|
|||
|
|
|
|||
|
|
;gPort EQU 0 ; The Printer's graf port
|
|||
|
|
gProcs EQU 108 ; ..and its procs [13 pointers]
|
|||
|
|
lGParam1 EQU 160 ; Some params: Our relocatable stuff etc [long]
|
|||
|
|
lGParam2 EQU 164 ; [long]
|
|||
|
|
lGParam3 EQU 168 ; [long]
|
|||
|
|
lGParam4 EQU 172 ; [long]
|
|||
|
|
fOurPtr EQU 176 ; PrPort allocation done by us? [byte]
|
|||
|
|
fOurBits EQU 177 ; BitMap allocation done by us? [byte]
|
|||
|
|
;iPrPortSize EQU 178 ; The PrPort size.[178]
|
|||
|
|
|
|||
|
|
|
|||
|
|
; Print Status data structure
|
|||
|
|
|
|||
|
|
;iTotPages EQU 0 ; Total pages in Print File [word]
|
|||
|
|
;iCurPage EQU 2 ; Current page number [word]
|
|||
|
|
;iTotCopies EQU 4 ; Total copies requested [word]
|
|||
|
|
;iCurCopy EQU 6 ; Current copy number [word]
|
|||
|
|
;iTotBands EQU 8 ; Total bands per page [word]
|
|||
|
|
;iCurBand EQU 10 ; Current band number [word]
|
|||
|
|
;fPgDirty EQU 12 ; current page has been written to? [byte]
|
|||
|
|
;fImaging EQU 13 ; in band's DrawPic call? [byte]
|
|||
|
|
;hPrint EQU 14 ; active Printer record [handle]
|
|||
|
|
;pPrPort EQU 18 ; active PrPort [pointer]
|
|||
|
|
hPic EQU 22 ; active Picture [handle]
|
|||
|
|
;iPrStatSize EQU 26 ; The PrStatus size[26 bytes]
|
|||
|
|
|
|||
|
|
|
|||
|
|
; Print dialog
|
|||
|
|
|
|||
|
|
dlg EQU 0 ; DialogWindow
|
|||
|
|
pFltrProc EQU 170 ; filter Proc [pointer]
|
|||
|
|
pItemProc EQU 174 ; item evaluating proc [pointer]
|
|||
|
|
hPrintUsr EQU 178 ; user's print record [handle]
|
|||
|
|
fDoIt EQU 182 ; Boolean
|
|||
|
|
fDone EQU 183 ; Boolean
|
|||
|
|
lPrDlg1 EQU 184 ; users to hang global data [long]
|
|||
|
|
lPrDlg2 EQU 188 ; [long]
|
|||
|
|
lPrDlg3 EQU 192 ; [long]
|
|||
|
|
lPrDlg4 EQU 196 ; [long]
|
|||
|
|
iPrDlgSz EQU 200
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
; Less common print code stuff
|
|||
|
|
|
|||
|
|
; These are the definitions for the Print code
|
|||
|
|
|
|||
|
|
fPrDbgOK EQU 1 ; Debug enable
|
|||
|
|
iPrSystemError EQU 29 ; Printcode System Error
|
|||
|
|
|
|||
|
|
; The Private Print Globals; 16 bytes located at [SysEqu] PrintVars
|
|||
|
|
|
|||
|
|
PrintVars EQU $944 ; print code variables [16 bytes]
|
|||
|
|
PrintErr EQU $944 ; Current Printer Error
|
|||
|
|
;ChooserBits EQU $946 ; bit 7 = 0 don't run; bit 6 = 0 gray out AppleTalk
|
|||
|
|
iPrErr EQU 0 ; Offset to current print error. Set to iPrAbort to abort printing.
|
|||
|
|
bDocLoop EQU 2 ; The Doc style: Draft, Spool, .., and ..
|
|||
|
|
; Currently use low 2 bits; the upper 6 are for flags.
|
|||
|
|
bUser1 EQU 3
|
|||
|
|
lUser1 EQU 4
|
|||
|
|
lUser2 EQU 8
|
|||
|
|
lUser3 EQU 12
|
|||
|
|
iPrResFileRefNum EQU 14 ; The current print driver's resource file refnum
|
|||
|
|
iPrVarSize EQU 16 ; The PrVar's size.[16]
|
|||
|
|
iPrError EQU PrintVars+iPrErr ; abs loc of PrintError
|
|||
|
|
bPrFlags EQU PrintVars+bDocLoop ; abs loc of pr flags
|
|||
|
|
bPrType EQU PrintVars+bUser1 ; abs loc of pr type field = -bDev [default = imagewriter = FF]
|
|||
|
|
fNewRunBit EQU 2 ; Bit 2 (3rd bit) in bDocLoop: new JobRun indicator
|
|||
|
|
fHiResOK EQU 3 ; Bit 3 (4th bit) is hi res indicator for paint
|
|||
|
|
fWeOpenedRF EQU 4 ; Bit 4 (5th bit) is set if driver opend the prres file.
|
|||
|
|
iPrRefNum EQU PrintVars+iPrResFileRefNum
|
|||
|
|
; abs loc of the current print driver's resource file refnum
|
|||
|
|
|
|||
|
|
; Printer Type Constants (each new printer has its own index value)
|
|||
|
|
|
|||
|
|
bDevCItoh EQU 1 ; Imagewriter
|
|||
|
|
bDevDaisy EQU 2 ; Daisy wheel printer (scrapped)
|
|||
|
|
bDevLaser EQU 3 ; LaserWriter
|
|||
|
|
|
|||
|
|
; Miscellaneous constants.
|
|||
|
|
|
|||
|
|
scanTB EQU 0 ; scan top-bottom
|
|||
|
|
scanBT EQU 1 ; scan bottom-top
|
|||
|
|
scanLR EQU 2 ; scan left-right
|
|||
|
|
scanRL EQU 3 ; scan right-left
|
|||
|
|
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
; These are the constants for using resources to swap in the non-driver
|
|||
|
|
; print code. Three numbers are needed:
|
|||
|
|
; ResType
|
|||
|
|
; ResID
|
|||
|
|
; Offset into the seg's jump table
|
|||
|
|
;
|
|||
|
|
; The offset is really a formatted Long that contains three fields:
|
|||
|
|
; Frame Size; Unlock flag; Offset into the seg's jump table
|
|||
|
|
; We could use the topmost byte for further stuff: a stack adjust for
|
|||
|
|
; storing the registers needed by the link code so that it would be re-entrant.
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
|
|||
|
|
lPDefType EQU $50444546 ; Pr Resource TYPE: "PDEF"
|
|||
|
|
iPrDraftID EQU 0 ; Pr Draft Resource ID
|
|||
|
|
iPrSpoolID EQU 1 ; Pr Spool Resource ID
|
|||
|
|
iPrUser1ID EQU 2 ; Pr Spare1 Resource ID
|
|||
|
|
iPrUser2ID EQU 3 ; Pr Spare2 Resource ID
|
|||
|
|
lOpenDoc EQU $000C0000 ; PrOpenDoc JumpTable offset
|
|||
|
|
lCloseDoc EQU $00048004 ; PrCloseDoc JumpTable offset
|
|||
|
|
lOpenPage EQU $00080008 ; PrOpenPage JumpTable offset
|
|||
|
|
lClosePage EQU $0004000C ; PrClosePage JumpTable offset
|
|||
|
|
iPrDlgsID EQU 4 ; Pr Dialogs Resource ID
|
|||
|
|
lDefault EQU $00048000 ; PrintDefault JumpTable offset
|
|||
|
|
lStlDialog EQU $00048004 ; PrStlDialog JumpTable offset
|
|||
|
|
lJobDialog EQU $00048008 ; PrJobDialog JumpTable offset
|
|||
|
|
lStlInit EQU $0004000C ; PrStlInit JumpTable offset
|
|||
|
|
lJobInit EQU $00040010 ; PrJobInit JumpTable offset
|
|||
|
|
lDlgMain EQU $00088014 ; PrDlgMain JumpTable offset
|
|||
|
|
lPrValidate EQU $00048018 ; PrintValidate JumpTable offset
|
|||
|
|
lPrJobMerge EQU $0008801C ; PrintValidate JumpTable offset
|
|||
|
|
iPrPicID EQU 5 ; Pic Printing Resource ID
|
|||
|
|
lPrPicFile EQU $00148000 ; PrPicFile JumpTable offset
|
|||
|
|
iCfgDlgID EQU 6 ; Configuration proc Resource ID
|
|||
|
|
lCfgDialog EQU $00008000 ; PrCfgDialog JumpTable offset
|
|||
|
|
iPrHackID EQU 7 ; The "Oops, I Forgot" Resource ID
|
|||
|
|
lPrHack EQU $000C8000 ; PrHack JumpTable offset
|
|||
|
|
|
|||
|
|
ENDIF ; ...already included
|