
DIRECTORY
Rope;

BridgeDriver: CEDAR DEFINITIONS
~ {
ROPE: TYPE ~ Rope.ROPE;

EachSession: TYPE ~ PROC [sessionName: ROPE, userName: ROPE, class: ATOM] RETURNS [quit: BOOL м FALSE];	

NameAndPasswordProc: TYPE ~ PROC RETURNS [userName: ROPE, passwd: ROPE];

StartSession: PROC [sessionName: ROPE, nameAndPasswordProc: NameAndPasswordProc, cmd: ROPE м NIL, transportClass: ATOM м NIL] RETURNS [excuse: ROPE м NIL];

SessionNameFromHostNameEtc: PROC [hostName: ROPE, etc: ROPE] RETURNS [sessionName: ROPE];

HostNameFromSessionName: PROC [sessionName: ROPE] RETURNS [hostName: ROPE];

CmdFromListOfRope: PROC [list: LIST OF ROPE] RETURNS[cmd: ROPE];

ListOfRopeFromCmd: PROC [cmd: ROPE] RETURNS [list: LIST OF ROPE];

FixUserNameForUnix: PROC [name: ROPE] RETURNS [fixedName: ROPE];

UpdateDefaultTransportClass: PROC [newClass: ATOM м NIL]
RETURNS [oldClass: ATOM];

GetCurrentCredentials: PROC [machineName: ROPE, useGV: BOOL]
RETURNS [name: ROPE, password: ROPE];
SetCurrentCredentials: PROC [machineName: ROPE, name: ROPE, password: ROPE];
KillSession: PROC [sessionName: ROPE, userName: ROPE м NIL] RETURNS [excuse: ROPE м NIL];

EnumerateSessions: PROC [procToApply: EachSession];

}.

     
BridgeDriver.mesa
Copyright ╙ 1992 by Xerox Corporation.  All rights reserved.
Demers, May 9, 1990 10:34 am PDT
Last changed by Pavel on September 12, 1989 4:04:43 pm PDT

Note: Bridge and NetworkStream disagree about the meaning of "transport class" .  For Bridge, "transport class" denotes a protocol stack like $XNS, $ARPA, etc.  For NetworkStream, "transport class" denotes a kind of stream functionality like $BasicStream or in this case $SPP, while the term "protocol family" is reserved for protocol stacks: $XNS, $ARPA, etc.  This is all very confusing ...

Enumeration procedure.
Returns [NIL, NIL] if can't determine one.
Construct cmd rope (suitable for StartSession) with appropriate separator/terminator conventions.
Parse a cmd rope (suitable for StartSession) using appropriate separator/terminator conventions.
Convert to Unix conventions -- 8-chars all lower case.
Gets the current credentials for Bridge use for the currently logged-in user for the given machine (a session name is acceptable).  If no translation is found, the defaults are used (if any).
If the defaults are empty and NOT useGV, then the results are [NIL, NIL].
If the defaults are empty and useGV, then the results are manufactured from the grapevine credentials (via UserCredentials.Get).

Sets the current credentials for the current logged-in user for the given machine.
If machineName = NIL or machineName = "*", then the given name and password become the defaults.

If userName is NIL, then kill all sessions with the given sessionName.
 Э╩й  ХNewlineDelimiter
Ц(cedarcode) styleЩ codeЩKЪЬ
╧eЬ1Щ<KЩ KЩ:KЩ KЩИKЩ KШ ЧЪ╧k	Ш	KЪЬШKШ ЧЪ╧nЬЮЬЮШKЪЬШKЪЮЬЮЬЮЬШKШ ЪЯЬЮЬЮЬЮЬЮЬ	ЮЬЮЬЮЬЮЬШhKЩЧKШ ЪЯЬЮЬЮЬЮЬЮЬ
ЮЬШHKЩ*KШ ЧЪЯЬЮЬЮЬ1ЮЬЮЬЮЬЮЬЮЬ
ЮЬЮЬШЫKШ ЧЪЯЬЮЬЮЬЮЬЮЬЮЬШYKШ ЧЪ
ЯЬЮЬЮЬЮЬЮЬШKKШ ЧЪЯЬЮЬЮЬЮЬЮЬЮЬЮЬШ@KЩaKШ ЧЪЯЬЮЬЮЬЮЬЮЬЮЬЮЬШAKЩ`KШ ЧЪЯЬЮЬЮЬЮЬЮЬЯШ@KЩ6KШ ЧKЪЯЬЮЬЮЬЮЬЮЬЮЬШRKШ ЪЯЬЮЬЮЬ	ЮЬЮЬЮЬЮЬШbKЩ┐KЪЬIЩIKЪЬАЩАKЩ ЧЪ
ЯЬЮЬЮЬЮЬЮЬШLKЪЬRЩRKЪЬ`Щ`KЩ ЧЪЯЬЮЬЮЬЮЬЮЬЮЬ
ЮЬЮЬШYKЪЬFЩFKШ ЧЪЯЬЮЬШ3KШ ЧKШЧKШ Ч ЕЧ    и  S  