Resources(3) User Contributed Perl Documentation Resources(3)NAMEMac::Resources - Macintosh Toolbox Interface to the Resource Manager
SYNOPSIS
use Mac::Memory;
use Mac::Resources;
DESCRIPTION
Access to Inside Macintosh is essential for proper use of these
functions. Explanations of terms, processes and procedures are
provided there. Any attempt to use these functions without guidance
can cause severe errors in your machine, including corruption of data.
You have been warned.
Constants
resSysHeap
resPurgeable
resLocked
resProtected
resPreload
resChanged
Resource flags.
mapReadOnly
mapCompact
mapChanged
Resource map flags.
kResFileNotOpened
Returned after an unsuccessful call to "OpenResFile()".
kSystemResFile
The resource file reference number of the system file.
Functions
CloseResFile RFD
Given a file reference number for a file whose resource fork is
open, the CloseResFile procedure performs four tasks. First, it
updates the file by calling the &UpdateResFile procedure. Second,
it releases the memory occupied by each resource in the resource
fork by calling the &DisposeHandle procedure. Third, it releases
the memory occupied by the resource map. The fourth task is to
close the resource fork.
CurResFile
The CurResFile function returns the file reference number
associated with the current resource file. You can call this
function when your application starts up (before opening the
resource fork of any other file) to get the file reference number
of your application's resource fork.
$RFD = CurResFile;
HomeResFile RESOURCE
Given a handle to a resource, the HomeResFile function returns the
file reference number for the resource fork containing the
specified resource. If the given handle isn't a handle to a
resource, HomeResFile returns ‐1, and the &ResError function
returns the result code resNotFound. If HomeResFile returns 0, the
resource is in the System file's resource fork. If HomeResFile
returns 1, the resource is ROM-resident.
$RFD = HomeResFile($Resource);
CreateResFile NAME
Mac OS only.
The CreateResFile procedure creates an empty resource file.
if ( CreateResFile("Resource.rsrc")) {
# error occurred
} else {
# proceed
}
OpenResFile NAME
Mac OS only.
The OpenResFile function opens an existing resource file. It also
makes this file the current resource file.
if ( defined($RFD = OpenResFile("Resource.rsrc")) ) {
# proceed
} else {
# error occurred
}
UseResFile RFD
The UseResFile procedure searches the list of files whose resource
forks have been opened for the file specified by the RFD parameter.
If the specified file is found, the Resource Manager sets the
current resource file to the specified file. If there's no resource
fork open for a file with that reference number, UseResFile does
nothing. To set the current resource file to the System file, use 0
for the refNum parameter.
if (UseResFile($RFD)) {
# error occurred
} else {
# proceed
}
CountTypes
Count1Types
The CountTypes (Count1Types) function reads the resource maps in
memory for all resource forks (the current resource fork) open to
your application. It returns an integer representing the total
number of unique resource types.
$types = Count1Types;
GetIndType INDEX
Get1IndType INDEX
Given an index number from 1 to the number of resource types in all
resource forks (the current resource fork) open to your application
(as returned by CountTypes), the GetIndType procedure returns a
resource type. You can call GetIndType repeatedly over the entire
range of the index to get all the resource types available in all
resource forks open to your application. If the given index isn't
in the range from 1 to the number of resource types as returned by
CountTypes, undef() is returned.
# Load up @resourceTypes with the types from the current file.
for (1 .. Count1Types) {
$resourceTypes[$_-1] = Get1IndType($_);
}
SetResLoad BOOL
Enable and disable automatic loading of resource data into memory
for routines that return handles to resources.
CountResources TYPE
Count1Resources TYPE
Get the total number of available resources of a given type.
Count1Resources looks only at the current resource fork.
$totalDialogsAvailable = CountResources "DITL";
GetIndResource TYPE, INDEX
Get1IndResource TYPE, INDEX
Given an index ranging from 1 to the number of resources of a given
type returned by &CountResources (&Count1Resources) (that is, the
number of resources of that type in all resource forks open to your
application), the GetIndResource function returns a handle to a
resource of the given type. If you call GetIndResource repeatedly
over the entire range of the index, it returns handles to all
resources of the given type in all resource forks open to your
application.
# Load up handles of this type of resource
for (1 .. CountResources("DITL")) {
$dialogs[$_] = GetIndResource("DITL", $_);
}
GetResource TYPE, ID
Get1Resource TYPE, ID
Get resource data for a resource specified by resource type and
resource ID.
$SFGdialog = GetResource("DITL", 6042);
if ( defined $SFGdialog ) {
# proceed
}
GetNamedResource TYPE, NAME
Get1NamedResource TYPE, NAME
The GetNamedResource (Get1NamedResource) function searches the
resource maps in memory for the resource specified by the
parameters $TYPE and $NAME.
$SFGdialog = GetNamedResource("DITL", "Standard Get");
if ( defined $SFGdialog ) {
# proceed
}
LoadResource HANDLE
Given a handle to a resource, LoadResource reads the resource data
into memory. If the HANDLE parameter doesn't contain a handle to a
resource, then LoadResource returns undef.
if (LoadResource($HANDLE) ) {
# proceed
} else {
# error occurred
}
ReleaseResource HANDLE
Given a handle to a resource, ReleaseResource releases the memory
occupied by the resource data, if any, and sets the master pointer
of the resource's handle in the resource map in memory to NIL. If
your application previously obtained a handle to that resource, the
handle is no longer valid. If your application subsequently calls
the Resource Manager to get the released resource, the Resource
Manager assigns a new handle.
if ( ReleaseResource($HANDLE) ) {
# proceed
} else {
# error occurred
}
DetachResource HANDLE
Given a handle to a resource, ReleaseResource releases the memory
occupied by the resource data, if any, and sets the master pointer
of the resource's handle in the resource map in memory to NIL. If
your application previously obtained a handle to that resource, the
handle is no longer valid. If your application subsequently calls
the Resource Manager to get the released resource, the Resource
Manager assigns a new handle.
if ( DetachResource($HANDLE) ) {
# proceed
} else {
# error occurred
}
UniqueID TYPE
Unique1ID TYPE
The UniqueID function returns as its function result a resource ID
greater than 0 that isn't currently assigned to any resource of the
specified type in any open resource fork. You should use this
function before adding a new resource to ensure that you don't
duplicate a resource ID and override an existing resource.
Unique1ID ensures uniqueness within the current resource fork.
$id = Unique1ID("DITL");
GetResAttrs HANDLE
Given a handle to a resource, the GetResAttrs function returns the
resource's attributes as recorded in its entry in the resource map
in memory. If the value of the theResource parameter isn't a handle
to a valid resource, undef is returned.
$resAttrs = GetResAttrs($HANDLE);
if ( defined $resAttrs ) {
# proceed
}
GetResInfo HANDLE
Given a handle to a resource, the GetResInfo procedure returns the
resource's resource ID, resource type, and resource name. If the
handle isn't a valid handle to a resource, undef is returned.
($id, $type, $name) = GetResInfo($HANDLE);
if ( defined $id ) {
# proceed
}
SetResInfo HANDLE, ID, NAME
Given a handle to a resource, SetResInfo changes the resource ID
and the resource name of the specified resource to the values given
in ID and NAME. If you pass an empty string for the name parameter,
the resource name is not changed.
AddResource HANDLE, TYPE, ID, NAME
Given a handle to any type of data in memory (but not a handle to
an existing resource), AddResource adds the given handle, resource
type, resource ID, and resource name to the current resource file's
resource map in memory. The AddResource procedure sets the
resChanged attribute to 1; it does not set any of the resource's
other attributesN~that is, all other attributes are set to 0.
GetResourceSizeOnDisk HANDLE
Given a handle to a resource, the GetResourceSizeOnDisk function
checks the resource on disk (not in memory) and returns its exact
size, in bytes. If the handle isn't a handle to a valid resource,
undef is returned.
$size = GetResourceSizeOnDisk($HANDLE);
if ( defined $size ) {
# proceed
}
GetMaxResourceSize HANDLE
Like &GetResourceSizeOnDisk, GetMaxResourceSize takes a handle and
returns the size of the corresponding resource. However,
GetMaxResourceSize does not check the resource on disk; instead, it
either checks the resource size in memory or, if the resource is
not in memory, calculates its size, in bytes, on the basis of
information in the resource map in memory. This gives you an
approximate size for the resource that you can count on as the
resource's maximum size. It's possible that the resource is
actually smaller than the offsets in the resource map indicate
because the file has not yet been compacted. If you want the exact
size of a resource on disk, either call &GetResourceSizeOnDisk or
call &UpdateResFile before calling GetMaxResourceSize.
$size = GetMaxResourceSize($HANDLE);
if ( defined $size ) {
# proceed
}
RsrcMapEntry HANDLE
Mac OS only.
Given a handle to a resource, RsrcMapEntry returns the offset of
the specified resource's entry from the beginning of the resource
map in memory. If it doesn't find the resource entry, RsrcMapEntry
returns 0, and the ResError function returns the result code
resNotFound. If you pass a handle whose value is NIL, RsrcMapEntry
returns arbitrary data.
$offset = RsrcMapEntry($HANDLE);
if ( defined $offset ) {
# proceed
}
SetResAttrs HANDLE, ATTRS
Given a handle to a resource, SetResAttrs changes the resource
attributes of the resource to those specified in the attrs
parameter. The SetResAttrs procedure changes the information in the
resource map in memory, not in the file on disk. The resProtected
attribute changes immediately. Other attribute changes take effect
the next time the specified resource is read into memory but are
not made permanent until the Resource Manager updates the resource
fork.
if ( SetResAttrs($HANDLE, $ATTRS) ) {
# proceed
} else {
# error
}
ChangedResource HANDLE
Given a handle to a resource, the ChangedResource procedure sets
the resChanged attribute for that resource in the resource map in
memory. If the resChanged attribute for a resource has been set and
your application calls &UpdateResFile or quits, the Resource
Manager writes the resource data for that resource (and for all
other resources whose resChanged attribute is set) and the entire
resource map to the resource fork of the corresponding file on
disk. If the resChanged attribute for a resource has been set and
your application calls &WriteResource, the Resource Manager writes
only the resource data for that resource to disk.
if ( ChangedResource($HANDLE) ) {
# proceed
} else {
# error
}
RemoveResource HANDLE
Given a handle to a resource in the current resource file,
RemoveResource removes the resource entry (resource type, resource
ID, resource name, if any, and resource attributes) from the
current resource file's resource map in memory.
if ( RemoveResource($HANDLE) ) {
# proceed
} else {
# error
}
UpdateResFile RFD
Given the reference number of a file whose resource fork is open,
UpdateResFile performs three tasks. The first task is to change,
add, or remove resource data in the file's resource fork to match
the resource map in memory. Changed resource data for each resource
is written only if that resource's resChanged bit has been set by a
successful call to &ChangedResource or &AddResource. The
UpdateResFile procedure calls the &WriteResource procedure to write
changed or added resources to the resource fork.
if ( UpdateResFile($RFD) ) {
# proceed
} else {
# error
}
WriteResource HANDLE
Given a handle to a resource, WriteResource checks the resChanged
attribute of that resource. If the resChanged attribute is set to 1
(after a successful call to the &ChangedResource or &AddResource
procedure), WriteResource writes the resource data in memory to the
resource fork, then clears the resChanged attribute in the
resource's resource map in memory.
if ( WriteResource($HANDLE) ) {
# proceed
} else {
# error
}
SetResPurge INSTALL
Specify TRUE in the install parameter to make the Memory Manager
pass the handle for a resource to the Resource Manager before
purging the resource data to which the handle points. The Resource
Manager determines whether the handle points to a resource in the
application heap. It also checks if the resource's resChanged
attribute is set to 1. If these two conditions are met, the
Resource Manager calls the &WriteResource procedure to write the
resource's resource data to the resource fork before returning
control to the Memory Manager.
Specify FALSE in the install parameter to restore the normal state,
so that the Memory Manager purges resource data when it needs to
without calling the Resource Manager.
if ( SetResPurge(1) ) {
# proceed
} else {
# error
}
GetResFileAttrs RFD
Given a file reference number, the GetResFileAttrs function returns
the attributes of the file's resource fork. Specify 0 in $RFD to
get the attributes of the System file's resource fork. If there's
no open resource fork for the given file reference number, undef is
returned.
$rfa = GetResFileAttrs($RFD);
if ( defined $rfa ) {
# proceed
}
SetResFileAttrs RFD, ATTRS
Given a file reference number, the SetResFileAttrs procedure sets
the attributes of the file's resource fork to those specified in
the attrs parameter. If the refNum parameter is 0, it represents
the System file's resource fork. However, you shouldn't change the
attributes of the System file's resource fork. If there's no
resource fork with the given reference number, SetResFileAttrs does
nothing, and the ResError function returns the result code noErr.
if ( SetResFileAttrs($RFD, $ATTRS) ) {
# proceed
} else {
# error
}
RGetResource TYPE, ID
Mac OS only.
The RGetResource function searches the resource maps in memory for
the resource specified by the parameters $TYPE and $ID. The
resource maps in memory, which represent all open resource forks,
are arranged as a linked list. The RGetResource function first uses
GetResource to search this list. The GetResource function starts
with the current resource file and progresses through the list in
order (that is, in reverse chronological order in which the
resource forks were opened) until it finds the resource's entry in
one of the resource maps. If GetResource doesn't find the specified
resource in its search of the resource maps of open resource forks
(which includes the System file's resource fork), RGetResource sets
the global variable RomMapInsert to TRUE, then calls GetResource
again. In response, GetResource performs the same search, but this
time it looks in the resource map of the ROM-resident resources
before searching the resource map of the System file.
$handle = RGetResource("DITL", 6042);
if ( defined $handle ) {
# proceed
}
FSpOpenResFile SPEC, PERMISSION
The FSpOpenResFile function opens the resource fork of the file
identified by the spec parameter. It also makes this file the
current resource file.
$sp = FSpOpenResFile($SPEC);
if ( defined $sp ) {
# proceed
}
In addition to opening the resource fork for the file with the
specified name, FSpOpenResFile lets you specify in the permission
parameter the read/write permission of the resource fork the first
time it is opened.
FSOpenResourceFile REF, FORKNAME, PERMISSION
Mac OS X only.
The FSOpenResourceFile function is like FSpOpenResFile, except that
it can open a resource file using the data fork or resource fork.
$REF is the path to the resource file. $FORKNAME is "rsrc" for a
resource fork; else the data fork will be used. It also makes this
file the current resource file.
FSpCreateResFile SPEC, CREATOR, FILETYPE, SCRIPTTAG
The FSpCreateResFile procedure creates an empty resource fork for a
file with the specified $FILETYPE, $CREATOR, and $SCRIPTTAG in the
location and with the name designated by the spec parameter. (An
empty resource fork contains no resource data but does include a
resource map.)
if ( FSpCreateResFile($SPEC, $CREATOR, $FILETYPE, $SCRIPTTAG) ) {
# proceed
} else {
# error
}
FSCreateResourceFile PARENTREF, FILENAME, FORKNAME
Mac OS X only.
The FSCreateResourceFile procedure is like FSpCreateResFile, except
that it can create a resource file in the data fork or resource
fork. $PARENTREF is the oath of the directory where the new
$FILENAME will be located. $FORKNAME is "rsrc" for a resource
fork; else the data fork will be used.
ReadPartialResource HANDLE, OFFSET, BYTECOUNT
The ReadPartialResource procedure reads the resource subsection
identified by the theResource, offset, and count parameters.
$data = ReadPartialResource($rsrc, 2000, 256);
WritePartialResource HANDLE, OFFSET, DATA
The WritePartialResource procedure writes the data specified by
DATA to the resource subsection identified by the HANDLE and OFFSET
parameters.
if ( WritePartialResource($HANDLE, $OFFSET, $DATA) ) {
# proceed
} else {
# error
}
SetResourceSize HANDLE, SIZE
Given a handle to a resource, SetResourceSize sets the size field
of the specified resource on disk without writing the resource
data. You can change the size of any resource, regardless of the
amount of memory you have available.
if ( SetResource($HANDLE, $SIZE) ) {
# proceed
} else {
# error
}
AUTHOR
Written by Matthias Ulrich Neeracher <neeracher@mac.com>, documentation
by Bob Dalgleish <bob.dalgleish@sasknet.sk.ca>. Currently maintained
by Chris Nandor <pudge@pobox.com>.
perl v5.16.2 2013-08-25 Resources(3)
