AFS :: ktc_token. AFS :: ktc_token ist eine perl-Klasse, um die AFS-Struktur KTC_TOKE zu behandeln.
Jetzt downloaden

AFS :: ktc_token. Ranking & Zusammenfassung

AFS :: ktc_token. Stichworte

Struktur Perl-Modul Afs AFS-Struktur Griff AFS.

AFS :: ktc_token. Beschreibung

AFS :: KTC_TOKEN ist ein Perl-Klasse, um die AFS-Struktur ktc_token zu handhaben. AFS :: KTC_TOKEN ist ein Perl-Klasse, um die AFS-Struktur ktc_token.SYNOPSIS Verwendung AFS :: KTC_TOKEN zu behandeln; Verwendung AFS :: KTC_PRINCIPAL; Verwendung AFS :: KTC_EKEY; Verwendung AFS :: Zelle qw (localcell); my $ token = AFS :: KTC_TOKEN-> nulltoken; drucken "Starttime =" $ Token-> Startzeit, "n"; drucken "EndTime =" $ Token-> endTime, "n"; drucken "SessionKey =" $ Token-> sessionKey, "n"; drucken "KVNO =" $ Token-> KVNO, "n"; drucken "TicketLen =" $ Token-> ticketLen, "n"; drucken "Ticket =" $ Token-> Ticket "n"; drucken "String =" $ Token-> string "n"; my $ index = 0; my $ service = AFS :: KTC_PRINCIPAL-> ListTokens ($ index); drucken "service =" $ service-> Haupt, "n"; ($ Token, mein $ user) = AFS :: KTC_TOKEN-> GetToken ($ service); drucken "client =" $ user -> Haupt, "n"; drucken "Starttime =" $ Token-> Startzeit, "n"; drucken "EndTime =" $ Token-> endTime, "n"; drucken "SessionKey =" $ Token-> sessionKey, "n"; drucken "KVNO =" $ Token-> KVNO, "n"; drucken "TicketLen =" $ Token-> ticketLen, "n"; drucken "Ticket =" $ Token-> Ticket "n"; drucken "String =" $ Token-> string "n"; $ Service = AFS :: KTC_PRINCIPAL-> new ( "afs", "", localcell); ($ Token, $ user) = AFS :: KTC_TOKEN-> GetToken ($ service); AFS :: KTC_TOKEN-> ForgetAllTokens (); AFS :: KTC_TOKEN-> setToken ($ service, $ Token, $ user, 0); mein $ string = $ Token-> string; $ Token = AFS :: KTC_TOKEN-> vonString ($ string); drucken "Starttime =" $ Token-> Startzeit, "n"; drucken "EndTime =" $ Token-> endTime, "n"; my $ user = AFS :: KTC_PRINCIPAL-> new ( 'nog', '', localcell); my $ key = AFS :: KTC_EKEY-> ReadPassword ( 'nog Passwort:'); my $ ok = AFS :: KTC_TOKEN-> GetAuthToken ($ user, $ key, 600); $ Service = AFS :: KTC_PRINCIPAL-> new ( "afs", "", localcell); $ Token = AFS :: KTC_TOKEN-> GetServerToken ($ service, 600, 1); $ User = AFS :: KTC_PRINCIPAL-> new ( 'nog', '', localcell); $ Key = AFS :: KTC_EKEY-> ReadPassword ( 'nog Passwort:'); $ Token = AFS :: KTC_TOKEN-> GetAdminToken ($ user, $ key, 300); $ User = AFS :: KTC_PRINCIPAL-> new ( 'nog'); $ Password = AFS :: KTC_EKEY-> UserReadPassword ( "Passwort:"); my $ pwexp = 0; my $ reason = ''; $ Ok = AFS :: KTC_TOKEN-> UserAuthenticateGeneral ($ user, $ password, 300, AFS :: KA_USERAUTH_VERSION | AFS :: KA_USERAUTH_DOSETPAG, $ pwexp, $ Grund); AFS :: KTC_TOKEN-> ForgetAllTokens (); HINWEIS: Die folgenden Zeilen sind 'Version 1' style: alle Namen standardmäßig exportiert werden. Dieser Stil ist veraltet !!! AFS verwenden; # Importieren alle AFS-Namen verwenden AFS @AFS :: KA; # Import nur die ka-Namen verwenden AFS @AFS :: KTC; # Import nur die ktc namesThis-Klasse bietet Methoden, um die AFS-Struktur ktc_token zu handhaben. Diese Struktur enthält Informationen über Token und wird in der Kernel-Token-Cache (KTC) verwendet wird, die einen Teil des Cache Manager.It ist dient zum Erstellen, Ändern und ktc_token Instanzen für verschiedene Dienste abzurufen. Es verfügt über Methoden zum Abrufen und die ktc_token Attribute zurückgesetzt werden. Um eine ordnungsgemäße Verwendung dieser Methoden zu machen, ist es notwendig, den Zugang zu AFS haben :: KTC_PRINCIPAL Objekte und AFS :: KTC_EKEY Objekte. Anforderungen: · Perl.

AFS :: ktc_token. Zugehörige Software