-- TemporaryBooting.mesa (last edited by: McJones on: April 17, 1980 10:34 AM)

DIRECTORY

File: FROM "File" USING [Capability, PageNumber, Type],
Volume: FROM "Volume" USING [ID];

TemporaryBooting: DEFINITIONS =

BEGIN

tBootFile: READONLY File.Type;

-- Only files of this type may be made bootable.

MakeBootable: PROCEDURE [file: File.Capability, firstPage: File.PageNumber ← 0];

-- Install the chaining links in the labels of the file pages starting with the specified first page and for the length of the contained Pilot boot file.

-- MakeBootable must be performed after contents are written and before file is passed to BootFrom.
-- InvalidParameters is raised if file is of wrong type or doesn’t contain Pilot boot file starting at firstPage.

MakeUnbootable: PROCEDURE [file: File.Capability, firstPage: File.PageNumber ← 0];

-- Remove the chaining links. May speed subsequent bulk access to the file.

InstallVolumeBootFile: PROCEDURE [file: File.Capability, firstPage: File.PageNumber ← 0];

-- Set up the file as the one gaining control when the containing (logical) volume is booted.

InstallPhysicalVolumeBootFile: PROCEDURE [file: File.Capability, firstPage: File.PageNumber ← 0];

-- Set up the (logical) volume as the one gaining control when the containing physical volume is booted.

--Switches: TYPE = PACKED ARRAY Switch OF BOOLEAN; (in Mesa 6.0)

Switch: TYPE = {zero, one, two, three, four, five, six, seven, eight, nine, a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z};

Switches: TYPE = RECORD [zero, one, two, three, four, five, six, seven, eight, nine, a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z: UpDown ← up];

UpDown: TYPE = {up, down};

defaultSwitches: Switches = [];

BootFromFile: PROCEDURE [file: File.Capability, firstPage: File.PageNumber ← 0, switches: Switches ← defaultSwitches];

-- Restart the system from the specified boot file. Improper arguments will likely result in an MP code and crash.

BootFromVolume: PROCEDURE [volume: Volume.ID, switches: Switches ← defaultSwitches];

-- Restart the system from the Pilot boot file installed on the specified volume.

BootFromPhysicalVolume: PROCEDURE [volume: Volume.ID, switches: Switches ← defaultSwitches];

-- Restart the system from the Pilot boot file installed on the physical volume containing the specified (logical) volume.

BootButton: PROCEDURE [switches: Switches ← defaultSwitches];

-- Restart the system as if its boot button had been pressed (may ignore switches).

InvalidParameters: ERROR;

END.

LOG

Time: September 14, 1979 2:45 PMBy: McJonesAction: Create file

Time: October 3, 1979 6:17 PMBy: McJonesAction: Add InstallAsBoot*

Time: January 25, 1980 10:58 AMBy: McJonesAction: InstallAsBootFile=>InstallVolumeBootFile; InstallAsBootVolume[vol]=>InstallPhysicalBootVolume[file]; add BootFromPhysicalVolume, Boot; add Switches to Boot*

Time: April 17, 1980 10:34 AMBy: McJonesAction: Default for firstPage to BootFrmFile missing