mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2025-01-01 11:29:27 +00:00
4325cdcc78
Resource forks are included only for .rsrc files. These are DeRezzed into their data fork. 'ckid' resources, from the Projector VCS, are not included. The Tools directory, containing mostly junk, is also excluded.
208 lines
7.2 KiB
Plaintext
208 lines
7.2 KiB
Plaintext
;
|
|
; File: StandardFilePriv.a
|
|
;
|
|
; Contains: Private equates for the Standard File package
|
|
;
|
|
; Written by: Ernie Beernick, Erich Ringewald, John Meier, Nick Kledzik
|
|
;
|
|
; Copyright: © 1988-1992 by Apple Computer, Inc., all rights reserved.
|
|
;
|
|
; Change History (most recent first):
|
|
;
|
|
; <2> 4/3/92 FM #1022940 Make Standard file respect invisible volumes.
|
|
; Unfortunately High Sierra and ISO drivers that are currently
|
|
; shipping set the invisible bit by mistake. Therefore we have to
|
|
; special case them IF their FSTs are version 2.0.3 (We can check
|
|
; this by looking at the gestalt selector'hscd'.
|
|
; <1> 10/1/91 JSM first checked in
|
|
; <0> 10/1/91 JSM Created from StandardFile3Priv.a.
|
|
;
|
|
; Modification history from StandardFile3Priv.a below:
|
|
;
|
|
; <17> 12/13/90 ngk Added constant for "original in trash" error
|
|
; <16> 11/28/90 ngk Fix isStatAwareBit constant
|
|
; <15> 8/31/90 ngk add rGenericFileTypeMapTableID and sfCommandKeys
|
|
; <14> 8/21/90 ngk added locked file constants
|
|
; <13> 8/5/90 ngk repack fields in FileEntry
|
|
; <12> 7/23/90 ngk Correct isStatAwareBIt constant
|
|
; <11> 7/2/90 ngk renumber dialog IDs because of conflict with Disk Init
|
|
; <10> 6/6/90 ngk Moved generic icon definitions to IconUtilsPriv. Moved
|
|
; stackframe into StandardFile.PACK.a
|
|
; <9> 5/23/90 ngk Conditionally, use popup CDEF
|
|
; <8> 5/2/90 ngk Moved type select definintions into IntlUtilsPriv.a
|
|
; <7> 4/30/90 ngk add new typeselect structures
|
|
; <6> 4/10/90 ngk Added local variables for NewFolder button and dialog. Added
|
|
; constants for renumbered resource IDs. Added virtual item codes.
|
|
; <5> 3/28/90 ngk Fix stationery bit.
|
|
; <3+> 3/19/90 JRM add stationery warning for old apps
|
|
; <3> 3/13/90 ngk Add variable for current volParms
|
|
; <2> 2/25/90 ngk Added error for saving and trying to replace a folder. Defined
|
|
; templates for parameters in calls 1-4 and 5-8 whose values are
|
|
; moved into unified locals.
|
|
; <1> 2/17/90 ngk Massive changes. See header in StandardFile3.PACK.a Lots of
|
|
; renaming to better symbolic names. Better use of RECORD
|
|
; templates.
|
|
;
|
|
; split into StandardFile3Priv.a and StandardFile2Priv.a
|
|
; <3> 2/2/90 ngk added chClear and chDelete equates
|
|
; <1+> 1/22/90 JRM add equate for mail icon
|
|
; <2.7> 12/7/89 dba added equates for Escapce
|
|
; <2.6> 11/30/89 RLC Took over the lUnused byte (made lBalloonUp) for use w/ Help
|
|
; Mgr.
|
|
; <2.5> 11/29/89 ngk added lTERect to stack frame
|
|
; <2.4> 11/29/89 JRM add BootDrive to stack frame
|
|
; <2.3> 11/14/89 ngk Change FileEntry record to a real record structure
|
|
; <2.2> 11/14/89 JRM add startup vref to stack frame
|
|
; <2.1> 10/31/89 JRM add openAliasParent item
|
|
; <2.0> 10/30/89 JRM added global for system script, equates for iocn base
|
|
; <1.9> 10/13/89 ngk Removed macro for _ResolveAlias
|
|
; <1.8> 10/4/89 ngk Added sfPopUpIcon
|
|
; <1.7> 10/1/89 ngk Added lUseCallBack and lSelector
|
|
; <1.6> 9/13/89 ngk expanded a6 frame to include parameters. Added string to hold
|
|
; "open" button title. Added extra locals to support new calls.
|
|
; <1.5> 8/29/89 JRM add missing 0 after RECORD for new SFReply record
|
|
; <1.4> 8/11/89 JRM Add back in 604 conditionals that Darin said I could take out
|
|
; <1.3> 8/8/89 JRM 7.10d10 release
|
|
; <1.2> 6/8/89 JRM conditionals for big bang and 604
|
|
; <1.1> 6/5/89 JRM big bang standard file - see StandardFilePACK.a
|
|
; <1.0> 11/16/88 CCH Added to EASE.
|
|
;
|
|
|
|
|
|
;------------------------------------------------------
|
|
;
|
|
; Constants used for special casing CD's from
|
|
; disappearing on the invisible bit
|
|
|
|
kHighSierraCDFST equ 'hscd'
|
|
|
|
;------------------------------------------------------
|
|
;
|
|
; StyledString is used to draw strings with styles and scripts
|
|
;
|
|
StyledString RECORD 0
|
|
script DS.W 1 ; script id of text
|
|
font DS.W 1 ; font id for text
|
|
dimmed DS.B 1 ; boolean whether to grey out text
|
|
style DS.B 1 ; style for text
|
|
size DS.W 1 ; size for text
|
|
text DS.B 64 ; Str63
|
|
ENDR
|
|
|
|
;-------------------------------------------------------------------
|
|
;
|
|
; Generic file list entry. Record is cut back to just hold filename
|
|
;
|
|
; dirID and type fields are overlapped
|
|
|
|
FileEntry RECORD 0
|
|
feTypeOrDirID DS.L 1 ; file type for files, dirID of folders, desktop dirID for volumes
|
|
feDrive DS.W 1 ; drive number
|
|
feVRefNum DS.W 1 ; vRefNum
|
|
feParID DS.L 1 ; parent dirID
|
|
feFLAttr DS.B 1 ; file attribute byte
|
|
feFLPriv DS.B 1 ; access privileges byte
|
|
feFndrFlags DS.W 1 ; 16 bits of finder flags
|
|
feIcon DS.W 1 ; icon resource ID
|
|
feIconLeft DS.B 1 ; Boolean, icon on left or right
|
|
feJust DS.B 1 ; How to justify text, normally, teJustLeft
|
|
feIconColor DS.W 1 ; entry in color Pallete in userHandle
|
|
feFile DS StyledString ; styled filename
|
|
size EQU *
|
|
ENDR
|
|
|
|
|
|
|
|
;-------------------------------------------------------------------
|
|
; new access privileges returned in getcatinfo call
|
|
; wierd polarity is so that local HFS default of zero means all privileges
|
|
; these are the bits used in FileEntry.feFLPriv
|
|
mNoEject EQU 128 ; set if user cannot eject disk
|
|
mOpenable EQU 8 ; set if user cannot open this folder
|
|
mNoWrite EQU 4 ; set if missing write
|
|
mNoRead EQU 2 ; set if missing read
|
|
mNoSearch EQU 1 ; set if missing search
|
|
bNoEject EQU 7 ; set if user cannot eject disk
|
|
bOpenable EQU 3 ; set if user cannot open this folder
|
|
bNoWrite EQU 2 ; set if missing write
|
|
bNoRead EQU 1 ; set if missing read
|
|
bNoSearch EQU 0 ; set if missing search
|
|
|
|
; bits in ioFlAttrib
|
|
isLockedFile EQU 0 ; file is finder locked
|
|
|
|
; bits in finder flags
|
|
mInvisible EQU $4000 ; mask for invisible bit in finder bytes
|
|
isAliasBit EQU 15 ; file is an alias
|
|
isInvisible EQU 14 ; file is invisible
|
|
isStationeryBit EQU 11 ; file is stationery
|
|
isLetter EQU 9 ; folder is a letter
|
|
|
|
; bit in second byte of app's size resource
|
|
isStatAwareBit EQU 4
|
|
|
|
sfFndrScript EQU $8 ; offset into FndrXInfo of script
|
|
ioACUser EQU 31 ; offset into CatInfo for permissions byte
|
|
|
|
|
|
; icon positioning
|
|
iconWidth EQU 16
|
|
iconPad EQU 3
|
|
|
|
|
|
;; resources
|
|
|
|
sfPopUpMenuID EQU -4000
|
|
|
|
; dialog IDs of old dialogs
|
|
rStandardFileOldPutID EQU -3999
|
|
rStandardFileOldGetID EQU -4000
|
|
|
|
; DLOG's, ALRT's, and DITL's
|
|
rSFNewFolderDialogID EQU -6046
|
|
rSFReplaceExistingDialogID EQU -6045
|
|
rSFOKDialogID EQU -6044
|
|
rStandardFilePutID EQU -6043
|
|
rStandardFileGetID EQU -6042
|
|
rSFStationeryWrnDialogID EQU -6041
|
|
rSFLockedWrnDialogID EQU -6040
|
|
|
|
; PICT's
|
|
rNewFolderPictID EQU -6046
|
|
rGrayRectPictID EQU -6045
|
|
|
|
; STR#'s
|
|
rStandardFileStringsID EQU -6046
|
|
rStandardFileHelpStringsID EQU -6045
|
|
|
|
; CNTL's
|
|
rNewFolderControlID EQU -6046
|
|
|
|
; 'picb'
|
|
rNewFolderPictButtonID EQU -6046
|
|
|
|
; 'fmap'
|
|
rGenericFileTypeMapTableID EQU -6046 ; for converting file types to icon ID's
|
|
|
|
|
|
; indices into rStandardFileStringsID STR#
|
|
sfDesktopName EQU 1
|
|
sfTrashName EQU 2
|
|
sfOpenName EQU 3
|
|
sfErrDiskLocked EQU 4
|
|
sfErrNoPrivileges EQU 5
|
|
sfErrBadFilename EQU 6
|
|
sfErrSystemError EQU 7
|
|
sfErrBadAlias EQU 8
|
|
sfErrSaveOnFolder EQU 9
|
|
sfFolderNameExists EQU 10
|
|
sfCommandKeys EQU 11
|
|
sfErrTrashAlias EQU 12
|
|
|
|
|
|
; indexes into help strings
|
|
hsiPopUpMenu EQU 1
|
|
hsiOpen EQU 8
|
|
|
|
|