DIRECTORYYggEnvironment,YggInternal,YggCoordinator,YggDummyProcess USING [Seconds];YggCoordinatorInternal: CEDAR DEFINITIONS LOCKS c USING c: Handle =BEGINVolumeID: TYPE = YggEnvironment.VolumeID;Handle: TYPE = YggCoordinator.Handle;WorkerHandle: TYPE = YggCoordinator.WorkerHandle;Call: TYPE = YggCoordinator.Call;Results: TYPE = YggCoordinator.Results;SecondsTimeoutForResultsReturned: YggDummyProcess.Seconds = 5;SecondsWaitAfterCommFailure: INT = 15;PassParms: PROC [p: Parms];Parms: TYPE = RECORD [proc: Call, -- the proc to callc: Handle, -- to pass transID and to monitor return of resultsw: WorkerHandle, -- the worker to callnewTrans: YggEnvironment.TransID, -- used by proc = prepare onlyrequiredOutcome: YggEnvironment.CommitOrAbort -- used by proc = finish only];ReturnResults: ENTRY PROC [c: Handle, w: WorkerHandle, r: Results] = TRUSTED INLINE {w.first.resultsOfMostRecentCall _ r;w.first.callInProgress _ none;NOTIFY c.resultsReturned;};NoticeCoordinatorBegin: PROC [trans: YggEnvironment.TransID];InitTransIDGenerator: PROC [fileStore: VolumeID];NextTransID: PROC [c: Handle];END.CHANGE LOG  ú  YggCoordinatorInternal.mesaCopyright Ó 1984, 1988 Xerox CorporationProcedures internal to coordinator implementation.Last edited byMBrown on November 4, 1982 11:50 amKupfer, July 18, 1984 2:38:20 pm PDTCarl Hauser, July 12, 1985 10:00:24 am PDTBob Hagmann April 21, 1988 4:05:04 pm PDTCaller holds coordinator monitor for p.c.Caller holds no monitor.Called during analysis pass of recovery for each CoordinatorBegin record seen.Supplies implicit parameters to InitTransIDGenerator below.Must be called before calling NextTransID.Atomically generates the next trans ID and writes a coordinatorBegin log record containing it.  As a side-effect, fills in the transID and forceRecord fields of c.Edited on July 18, 1984 2:37:19 pm PDT, by KupferChange the value of MaxCoordinators to 50.Carl Hauser, July 12, 1985 9:59:37 am PDTchanges to: CoordinatorInternal imported MaxCoordinators so it can be shared with LogBasicCoreImpl to establish a buffer zone at the end of the log of appropriate size. Ê  ˜ Icodešœ™Kšœ(™(Kšœ2™2šœ™Kšœ#™#J™$K™*K™)—˜ šÏk	˜	Kšœ˜Kšœ˜Kšœ˜Kšœœ˜ K˜ ——šœœœœ˜CKš˜Kšœ
œ˜)Kšœœ˜%Kšœœ˜1Kšœœ˜!Kšœ	œ˜'K˜ Kšœ>˜>Kšœœ˜&K˜ šÏn	œœ˜Kšœ)™)K˜ —šœœœ˜KšœÏc˜KšœŸ3˜>KšœŸ˜&Kšœ"Ÿ˜@Kšœ.Ÿ˜KK˜K˜ —šžœœœ,œ˜UKšœ™K˜$K˜Kšœ˜K˜K˜ —šžœœ!˜=KšœN™NKšœ;™;K˜ —šžœœ˜1Kšœ*™*K˜ —šžœœ˜Kšœ£™£K˜ —Kšœ˜Kšœ˜
šœ1™1Kšœ*™*——™)KšœÏrœ
 œ œF™¨—K™ — …—    ~  
|  