DIRECTORYIPDefs USING [Address],Rope USING [ROPE];IPName: CEDAR DEFINITIONS =BEGINNameState: TYPE = {bogus, down, aliasOk, mxOk, nameOk};AddressState: TYPE = {bogus, down, addressOk};LoadCacheFromName: PROC [name: Rope.ROPE, takeOld, needAddress: BOOL _ FALSE] RETURNS [state: NameState];LoadCacheFromAddress: PROC [address: IPDefs.Address, takeOld: BOOL _ FALSE] RETURNS [state: AddressState];NameToAddress: PROC [name: Rope.ROPE, mail: BOOL _ FALSE] RETURNS [addresses: LIST OF IPDefs.Address];NameToMXHostList: PROC [name: Rope.ROPE] RETURNS [hosts: LIST OF Rope.ROPE];AddressToName: PROC [address: IPDefs.Address] RETURNS [Rope.ROPE];AddressToRope: PROC [address: IPDefs.Address] RETURNS [Rope.ROPE];NormalizeName: PROC [name: Rope.ROPE] RETURNS [Rope.ROPE]; ExternalSourceCache: TYPE = {nameCache, aliasCache, mxCache, bogusNameCache, addressCache, bogusAddressCache, zoneCache};Source: PROC [name: Rope.ROPE, type: ExternalSourceCache] RETURNS [server: Rope.ROPE]; END.  Æ  Copyright (C) 1983, 1984, 1985 by Xerox Corporation. All rights reserved. The following program was created in 1983 but has not been published within the meaning of the copyright law, is furnished under license, and may not be used, copied and/or disclosed except in accordance with the terms of said license.IPName.mesa-- Facilities for translating between names and Internet addresses.Last Edited by: HGM, June 1, 1984 2:11:40 pm PDTLast Edited by: Nichols, August 31, 1983 3:54 pmLast Edited by: Taft, January 23, 1984 5:03:38 pm PSTHal Murray May 16, 1985 3:03:13 am PDTJohn Larson, July 16, 1987 3:06:25 pm PDTCache preloadingtakeOld TRUE will avoid cache refreshneedAddress TRUE causes extended lookup, all addresses loadedLookup operationsReturns a sorted list of addresses for the name or NIL if the name is not found. Case is ignored. name is allowed to be an Internet address constant of the form "[a.b.c.d]".mail TRUE will return MX record addresses.Returns sorted list of mail forwarding hosts if MX record exists. NIL otherwise.NIL if name is not found.Converts alias to official name. NIL if bogus nameReturns name of server responsible for data. Returns NIL if not in cache.Ê/  –"cedar" style˜ Icode2šœµ™µheadšœ™Ibody™CIcode™0J™0J™5J™&J™)šÏk	˜	Kšœœ˜Kšœœœ˜——šÏnœœœ˜Kš˜Kšœœ(˜7Kšœœ˜.K˜ —šÏl™šžœœœœœœ˜iK™ Kšœ%™%Kšœ=™=—Kš
žœœ$œœœ˜jK˜ —šŸ™šžœœœœœœœœ˜fK™ Kšœ3œw™­Kšœ*™*—šžœœœœ	œœœ˜LK™ Kšœ0œœ™P—šžœœœœ˜BK™ Kšœ™—Kšžœœœœ˜Bš
žœœœœœ˜;K™ KšÏc,œ™2K™ K™ K™ —Jšœœ`˜yš
žœœœœœ˜WK˜ Kš œ% œ œ	™IK™ —Kšœ˜—— …—    ä  
Ù  