2 Unix SMB/CIFS implementation.
3 session handling for utmp and PAM
5 Copyright (C) tridge@samba.org 2001
6 Copyright (C) abartlet@samba.org 2001
7 Copyright (C) Gerald (Jerry) Carter 2006
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>.
23 /* a "session" is claimed when we do a SessionSetupX operation
24 and is yielded when the corresponding vuid is destroyed.
26 sessions are used to populate utmp and PAM session structures
31 /********************************************************************
32 ********************************************************************/
34 static struct db_context
*session_db_ctx(void)
36 static struct db_context
*ctx
;
41 ctx
= db_open(NULL
, lock_path("sessionid.tdb"), 0,
42 TDB_CLEAR_IF_FIRST
|TDB_DEFAULT
,
43 O_RDWR
| O_CREAT
, 0644);
47 bool session_init(void)
49 if (session_db_ctx() == NULL
) {
50 DEBUG(1,("session_init: failed to open sessionid tdb\n"));
57 /********************************************************************
58 called when a session is created
59 ********************************************************************/
61 bool session_claim(user_struct
*vuser
)
65 struct sessionid sessionid
;
66 struct server_id pid
= procid_self();
68 const char * hostname
;
69 struct db_context
*ctx
;
70 struct db_record
*rec
;
72 char addr
[INET6_ADDRSTRLEN
];
74 vuser
->session_keystr
= NULL
;
76 /* don't register sessions for the guest user - its just too
77 expensive to go through pam session code for browsing etc */
78 if (vuser
->server_info
->guest
) {
82 if (!(ctx
= session_db_ctx())) {
86 ZERO_STRUCT(sessionid
);
93 for (i
=1;i
<MAX_SESSION_ID
;i
++) {
96 * This is very inefficient and needs fixing -- vl
99 struct server_id sess_pid
;
101 snprintf(keystr
, sizeof(keystr
), "ID/%d", i
);
102 key
= string_term_tdb_data(keystr
);
104 rec
= ctx
->fetch_locked(ctx
, NULL
, key
);
107 DEBUG(1, ("Could not lock \"%s\"\n", keystr
));
111 if (rec
->value
.dsize
!= sizeof(sessionid
)) {
112 DEBUG(1, ("Re-using invalid record\n"));
117 ((char *)rec
->value
.dptr
)
118 + offsetof(struct sessionid
, pid
),
121 if (!process_exists(sess_pid
)) {
122 DEBUG(5, ("%s has died -- re-using session\n",
123 procid_str_static(&sess_pid
)));
130 if (i
== MAX_SESSION_ID
) {
131 SMB_ASSERT(rec
== NULL
);
132 DEBUG(1,("session_claim: out of session IDs "
133 "(max is %d)\n", MAX_SESSION_ID
));
137 snprintf(sessionid
.id_str
, sizeof(sessionid
.id_str
),
138 SESSION_UTMP_TEMPLATE
, i
);
141 snprintf(keystr
, sizeof(keystr
), "ID/%s/%u",
142 procid_str_static(&pid
), vuser
->vuid
);
143 key
= string_term_tdb_data(keystr
);
145 rec
= ctx
->fetch_locked(ctx
, NULL
, key
);
148 DEBUG(1, ("Could not lock \"%s\"\n", keystr
));
152 snprintf(sessionid
.id_str
, sizeof(sessionid
.id_str
),
153 SESSION_TEMPLATE
, (long unsigned int)sys_getpid(),
157 SMB_ASSERT(rec
!= NULL
);
159 /* If 'hostname lookup' == yes, then do the DNS lookup. This is
160 needed because utmp and PAM both expect DNS names
162 client_name() handles this case internally.
165 hostname
= client_name(get_client_fd());
166 if (strcmp(hostname
, "UNKNOWN") == 0) {
167 hostname
= client_addr(get_client_fd(),addr
,sizeof(addr
));
170 fstrcpy(sessionid
.username
, vuser
->server_info
->unix_name
);
171 fstrcpy(sessionid
.hostname
, hostname
);
172 sessionid
.id_num
= i
; /* Only valid for utmp sessions */
174 sessionid
.uid
= vuser
->server_info
->utok
.uid
;
175 sessionid
.gid
= vuser
->server_info
->utok
.gid
;
176 fstrcpy(sessionid
.remote_machine
, get_remote_machine_name());
177 fstrcpy(sessionid
.ip_addr_str
,
178 client_addr(get_client_fd(),addr
,sizeof(addr
)));
179 sessionid
.connect_start
= time(NULL
);
181 if (!smb_pam_claim_session(sessionid
.username
, sessionid
.id_str
,
182 sessionid
.hostname
)) {
183 DEBUG(1,("pam_session rejected the session for %s [%s]\n",
184 sessionid
.username
, sessionid
.id_str
));
190 data
.dptr
= (uint8
*)&sessionid
;
191 data
.dsize
= sizeof(sessionid
);
193 status
= rec
->store(rec
, data
, TDB_REPLACE
);
197 if (!NT_STATUS_IS_OK(status
)) {
198 DEBUG(1,("session_claim: unable to create session id "
199 "record: %s\n", nt_errstr(status
)));
204 sys_utmp_claim(sessionid
.username
, sessionid
.hostname
,
205 sessionid
.ip_addr_str
,
206 sessionid
.id_str
, sessionid
.id_num
);
209 vuser
->session_keystr
= talloc_strdup(vuser
, keystr
);
210 if (!vuser
->session_keystr
) {
211 DEBUG(0, ("session_claim: talloc_strdup() failed for session_keystr\n"));
217 /********************************************************************
218 called when a session is destroyed
219 ********************************************************************/
221 void session_yield(user_struct
*vuser
)
224 struct sessionid sessionid
;
225 struct db_context
*ctx
;
226 struct db_record
*rec
;
228 if (!(ctx
= session_db_ctx())) return;
230 if (!vuser
->session_keystr
) {
234 key
= string_term_tdb_data(vuser
->session_keystr
);
236 if (!(rec
= ctx
->fetch_locked(ctx
, NULL
, key
))) {
240 if (rec
->value
.dsize
!= sizeof(sessionid
))
243 memcpy(&sessionid
, rec
->value
.dptr
, sizeof(sessionid
));
246 sys_utmp_yield(sessionid
.username
, sessionid
.hostname
,
247 sessionid
.ip_addr_str
,
248 sessionid
.id_str
, sessionid
.id_num
);
251 smb_pam_close_session(sessionid
.username
, sessionid
.id_str
,
254 rec
->delete_rec(rec
);
259 /********************************************************************
260 ********************************************************************/
262 static bool session_traverse(int (*fn
)(struct db_record
*db
,
266 struct db_context
*ctx
;
268 if (!(ctx
= session_db_ctx())) {
269 DEBUG(3, ("No tdb opened\n"));
273 ctx
->traverse_read(ctx
, fn
, private_data
);
277 /********************************************************************
278 ********************************************************************/
280 struct session_list
{
283 struct sessionid
*sessions
;
286 static int gather_sessioninfo(struct db_record
*rec
, void *state
)
288 struct session_list
*sesslist
= (struct session_list
*) state
;
289 const struct sessionid
*current
=
290 (const struct sessionid
*) rec
->value
.dptr
;
292 sesslist
->sessions
= TALLOC_REALLOC_ARRAY(
293 sesslist
->mem_ctx
, sesslist
->sessions
, struct sessionid
,
296 if (!sesslist
->sessions
) {
301 memcpy(&sesslist
->sessions
[sesslist
->count
], current
,
302 sizeof(struct sessionid
));
306 DEBUG(7,("gather_sessioninfo session from %s@%s\n",
307 current
->username
, current
->remote_machine
));
312 /********************************************************************
313 ********************************************************************/
315 int list_sessions(TALLOC_CTX
*mem_ctx
, struct sessionid
**session_list
)
317 struct session_list sesslist
;
319 sesslist
.mem_ctx
= mem_ctx
;
321 sesslist
.sessions
= NULL
;
323 if (!session_traverse(gather_sessioninfo
, (void *) &sesslist
)) {
324 DEBUG(3, ("Session traverse failed\n"));
325 SAFE_FREE(sesslist
.sessions
);
326 *session_list
= NULL
;
330 *session_list
= sesslist
.sessions
;
331 return sesslist
.count
;