Logo ROOT  
Reference Guide
 
Loading...
Searching...
No Matches
TRootSecContext.cxx
Go to the documentation of this file.
1// @(#)root/auth:$Id$
2// Author: G. Ganis 08/07/2005
3
4/*************************************************************************
5 * Copyright (C) 1995-2005, Rene Brun and Fons Rademakers. *
6 * All rights reserved. *
7 * *
8 * For the licensing terms see $ROOTSYS/LICENSE. *
9 * For the list of contributors see $ROOTSYS/README/CREDITS. *
10 *************************************************************************/
11
12//////////////////////////////////////////////////////////////////////////
13// //
14// TRootSecContext //
15// //
16// Special implementation of TSecContext //
17// //
18//////////////////////////////////////////////////////////////////////////
19
20#include "RConfigure.h"
21
22#include <stdlib.h>
23
24#include "TError.h"
25#include "TRootSecContext.h"
26#include "TROOT.h"
27#include "TSocket.h"
28#include "TUrl.h"
29#include "TVirtualMutex.h"
30
32
33////////////////////////////////////////////////////////////////////////////////
34/// Ctor for SecContext object.
35
36 TRootSecContext::TRootSecContext(const char *user, const char *host, Int_t meth,
37 Int_t offset, const char *id,
38 const char *token, TDatime expdate,
39 void *ctx, Int_t key)
40 : TSecContext(user, host, meth, offset, id, token, expdate, ctx)
41{
43
44 fRSAKey = key;
46}
47
48////////////////////////////////////////////////////////////////////////////////
49/// Ctor for SecContext object.
50/// User and host from url = user@host .
51
52TRootSecContext::TRootSecContext(const char *url, Int_t meth, Int_t offset,
53 const char *id, const char *token,
54 TDatime expdate, void *ctx, Int_t key)
55 : TSecContext(url, meth, offset, id, token, expdate, ctx)
56{
58
59 fRSAKey = key;
61}
62
63////////////////////////////////////////////////////////////////////////////////
64/// Dtor: delete (deActivate, local/remote cleanup, list removal)
65/// all what is still active
66
68{
70}
71
72////////////////////////////////////////////////////////////////////////////////
73/// Set OffSet to -1 and expiring Date to default
74/// Remove from the list
75/// If Opt contains "C" or "c", ask for remote cleanup
76/// If Opt contains "R" or "r", remove from the list
77/// Default Opt="CR"
78
80{
81 // Ask remote cleanup of this context
82 Bool_t clean = (strstr(Opt,"C") || strstr(Opt,"c"));
83 if (clean && fOffSet > -1)
85
86 // Cleanup TPwdCtx object fro UsrPwd
88 if (fContext) {
89 delete (TPwdCtx *)fContext;
90 fContext = 0;
91 }
92
93 Bool_t remove = (strstr(Opt,"R") || strstr(Opt,"r"));
94 if (remove && fOffSet > -1){
96 // Remove from the global list
97 gROOT->GetListOfSecContexts()->Remove(this);
98 // Remove also from local lists in THostAuth objects
100 }
101
102 // Set inactive
103 fOffSet = -1;
105
106}
107
108////////////////////////////////////////////////////////////////////////////////
109/// Ask remote client to cleanup security context 'ctx'
110/// If 'all', all sec context with the same host as ctx
111/// are cleaned.
112
114{
115 Bool_t cleaned = kFALSE;
116
117 // Nothing to do if inactive ...
118 if (!IsActive())
119 return kTRUE;
120
121 // Contact remote services that used this context,
122 // starting from the last ...
124 TSecContextCleanup *nscc = 0;
125 while ((nscc = (TSecContextCleanup *)last()) && !cleaned) {
126
127 // First check if remote daemon supports cleaning
128 Int_t srvtyp = nscc->GetType();
129 Int_t rproto = nscc->GetProtocol();
130 Int_t level = 2;
131 if ((srvtyp == TSocket::kROOTD && rproto < 10) ||
132 (srvtyp == TSocket::kPROOFD && rproto < 9))
133 level = 1;
134 if ((srvtyp == TSocket::kROOTD && rproto < 8) ||
135 (srvtyp == TSocket::kPROOFD && rproto < 7))
136 level = 0;
137 if (level) {
138 Int_t port = nscc->GetPort();
139
140 TSocket *news = new TSocket(fHost.Data(),port,-1);
141
142 if (news && news->IsValid()) {
143 if (srvtyp == TSocket::kPROOFD) {
144 news->SetOption(kNoDelay, 1);
145 news->Send("cleaning request");
146 } else
147 news->SetOption(kNoDelay, 0);
148
149 // Backward compatibility: send socket size
150 if (srvtyp == TSocket::kROOTD && level == 1)
151 news->Send((Int_t)0, (Int_t)0);
152
153 if (all || level == 1) {
155 cleaned = kTRUE;
156 } else {
157 news->Send(Form("%d %d %d %s", TAuthenticate::fgProcessID, fMethod,
160 (char *)(fToken.Data())) == -1) {
161 Info("CleanupSecContext", "problems secure-sending token");
162 } else {
163 cleaned = kTRUE;
164 }
165 }
166 if (cleaned && gDebug > 2) {
167 char srvname[3][10] = {"sockd", "rootd", "proofd"};
168 Info("CleanupSecContext",
169 "remote %s notified for cleanup (%s,%d)",
170 srvname[srvtyp],fHost.Data(),port);
171 }
172 }
173 SafeDelete(news);
174 }
175 }
176
177 if (!cleaned)
178 if (gDebug > 2)
179 Info("CleanupSecContext",
180 "unable to open valid socket for cleanup for %s", fHost.Data());
181
182 return cleaned;
183}
184
185////////////////////////////////////////////////////////////////////////////////
186/// If opt is "F" (default) print object content.
187/// If opt is "<number>" print in special form for calls within THostAuth
188/// with cardinality <number>
189/// If opt is "S" prints short in-line form for calls within TFTP,
190/// TSlave, TProof ...
191
193{
194 // Check if option is numeric
195 Int_t ord = -1, i = 0;
196 for (; i < (Int_t)strlen(opt); i++) {
197 if (opt[i] < 48 || opt[i] > 57) {
198 ord = -2;
199 break;
200 }
201 }
202 // If numeric get the cardinality and prepare the strings
203 if (ord == -1)
204 ord = atoi(opt);
205
206 if (!strncasecmp(opt,"F",1)) {
207 Info("Print",
208 "+------------------------------------------------------+");
209 Info("Print",
210 "+ Host:%s Method:%d (%s) User:'%s'",
212 fUser.Data());
213 Info("Print",
214 "+ OffSet:%d Id: '%s'", fOffSet, fID.Data());
215 if (fOffSet > -1)
216 Info("Print",
217 "+ Expiration time: %s",fExpDate.AsString());
218 Info("Print",
219 "+------------------------------------------------------+");
220 } else if (!strncasecmp(opt,"S",1)) {
221 if (fOffSet > -1) {
222 if (fID.BeginsWith("AFS"))
223 Printf("Security context: Method: AFS, not reusable");
224 else
225 Printf("Security context: Method: %d (%s) expiring on %s",
228 } else {
229 Printf("Security context: Method: %d (%s) not reusable",
231 }
232 } else {
233 // special printing form for THostAuth
234 Info("PrintEstblshed","+ %d \t h:%s met:%d (%s) us:'%s'",
235 ord, GetHost(), fMethod, GetMethodName(),
236 fUser.Data());
237 Info("PrintEstblshed","+ \t offset:%d id: '%s'", fOffSet, fID.Data());
238 if (fOffSet > -1)
239 Info("PrintEstblshed","+ \t expiring: %s",fExpDate.AsString());
240 }
241}
242
243////////////////////////////////////////////////////////////////////////////////
244/// Returns short string with relevant information about this
245/// security context
246
248{
249 if (fOffSet > -1) {
250 if (fID.BeginsWith("AFS"))
251 out = Form("Method: AFS, not reusable");
252 else {
253 char expdate[32];
254 out = Form("Method: %d (%s) expiring on %s",
256 }
257 } else {
258 if (fOffSet == -1)
259 out = Form("Method: %d (%s) not reusable", fMethod, GetMethodName());
260 else if (fOffSet == -3)
261 out = Form("Method: %d (%s) authorized by /etc/hosts.equiv or $HOME/.rhosts",
263 else if (fOffSet == -4)
264 out = Form("No authentication required remotely");
265 }
266 return out.Data();
267}
@ kROOTD_CLEANUP
#define SafeDelete(p)
Definition RConfig.hxx:537
int Int_t
Definition RtypesCore.h:45
const Bool_t kFALSE
Definition RtypesCore.h:101
const Bool_t kTRUE
Definition RtypesCore.h:100
const char Option_t
Definition RtypesCore.h:66
#define ClassImp(name)
Definition Rtypes.h:364
const Bool_t kIterBackward
Definition TCollection.h:43
#define R__ASSERT(e)
Definition TError.h:118
XFontStruct * id
Definition TGX11.cxx:109
Int_t gDebug
Definition TROOT.cxx:592
R__EXTERN TVirtualMutex * gROOTMutex
Definition TROOT.h:63
#define gROOT
Definition TROOT.h:404
R__EXTERN const TDatime kROOTTZERO
Definition TSecContext.h:30
char * Form(const char *fmt,...)
void Printf(const char *fmt,...)
@ kNoDelay
Definition TSystem.h:221
#define R__LOCKGUARD(mutex)
static Int_t fgProcessID
static Int_t SecureSend(TSocket *Socket, Int_t enc, Int_t KeyType, const char *In)
Encode null terminated str using the session private key indicated by enc and sends it over the netwo...
static void RemoveSecContext(TRootSecContext *ctx)
Tool for removing SecContext ctx from THostAuth listed in fgAuthInfo or fgProofAuthInfo.
static const char * GetAuthMethod(Int_t idx)
Static method returning the method corresponding to idx.
This class stores the date and time with a precision of one second in an unsigned 32 bit word (950130...
Definition TDatime.h:37
const char * AsString() const
Return the date & time as a string (ctime() format).
Definition TDatime.cxx:102
virtual void Info(const char *method, const char *msgfmt,...) const
Issue info message.
Definition TObject.cxx:937
Bool_t CleanupSecContext(Bool_t all)
Ask remote client to cleanup security context 'ctx' If 'all', all sec context with the same host as c...
const char * AsString(TString &out)
Returns short string with relevant information about this security context.
void DeActivate(Option_t *opt="CR")
Set OffSet to -1 and expiring Date to default Remove from the list If Opt contains "C" or "c",...
virtual ~TRootSecContext()
Dtor: delete (deActivate, local/remote cleanup, list removal) all what is still active.
void Print(Option_t *option="F") const
If opt is "F" (default) print object content.
Int_t GetType() const
Int_t GetProtocol() const
Int_t GetPort() const
Bool_t IsActive() const
Check remote OffSet and expiring Date.
TString fMethodName
Definition TSecContext.h:47
void Cleanup()
Cleanup what is still active.
const char * GetHost() const
Definition TSecContext.h:75
const char * GetMethodName() const
Definition TSecContext.h:78
TString fID
Definition TSecContext.h:45
void * fContext
Definition TSecContext.h:41
TDatime fExpDate
Definition TSecContext.h:43
Int_t fMethod
Definition TSecContext.h:46
TString fUser
Definition TSecContext.h:50
friend class TRootSecContext
Definition TSecContext.h:38
Int_t fOffSet
Definition TSecContext.h:48
TString fToken
Definition TSecContext.h:49
TList * fCleanup
Definition TSecContext.h:42
TString fHost
Definition TSecContext.h:44
virtual Int_t SetOption(ESockOptions opt, Int_t val)
Set socket options.
Definition TSocket.cxx:1013
@ kROOTD
Definition TSocket.h:52
@ kPROOFD
Definition TSocket.h:52
virtual Bool_t IsValid() const
Definition TSocket.h:132
virtual Int_t Send(const TMessage &mess)
Send a TMessage object.
Definition TSocket.cxx:522
Basic string class.
Definition TString.h:136
const char * Data() const
Definition TString.h:369
Bool_t BeginsWith(const char *s, ECaseCompare cmp=kExact) const
Definition TString.h:615