version incremented
[samba] / source / lib / account_pol.c
1 /* 
2  *  Unix SMB/CIFS implementation.
3  *  account policy storage
4  *  Copyright (C) Jean François Micouleau      1998-2001.
5  *  Copyright (C) Andrew Bartlett              2002
6  *  Copyright (C) Guenther Deschner            2004-2005
7  *  
8  *  This program is free software; you can redistribute it and/or modify
9  *  it under the terms of the GNU General Public License as published by
10  *  the Free Software Foundation; either version 2 of the License, or
11  *  (at your option) any later version.
12  *  
13  *  This program is distributed in the hope that it will be useful,
14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  *  GNU General Public License for more details.
17  *  
18  *  You should have received a copy of the GNU General Public License
19  *  along with this program; if not, write to the Free Software
20  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21  */
22
23 #include "includes.h"
24 static TDB_CONTEXT *tdb; 
25
26 /* cache all entries for 60 seconds for to save ldap-queries (cache is updated
27  * after this period if admins do not use pdbedit or usermanager but manipulate
28  * ldap directly) - gd */
29
30 #define DATABASE_VERSION        3
31 #define AP_LASTSET              "LAST_CACHE_UPDATE"
32 #define AP_TTL                  60
33
34
35 struct ap_table {
36         int field;
37         const char *string;
38         uint32 default_val;
39         const char *description;
40         const char *ldap_attr;
41 };
42
43 static const struct ap_table account_policy_names[] = {
44         {AP_MIN_PASSWORD_LEN, "min password length", MINPASSWDLENGTH, 
45                 "Minimal password length (default: 5)", 
46                 "sambaMinPwdLength" },
47
48         {AP_PASSWORD_HISTORY, "password history", 0,
49                 "Length of Password History Entries (default: 0 => off)", 
50                 "sambaPwdHistoryLength" },
51                 
52         {AP_USER_MUST_LOGON_TO_CHG_PASS, "user must logon to change password", 0,
53                 "Force Users to logon for password change (default: 0 => off, 2 => on)",
54                 "sambaLogonToChgPwd" },
55         
56         {AP_MAX_PASSWORD_AGE, "maximum password age", (uint32) -1,
57                 "Maximum password age, in seconds (default: -1 => never expire passwords)", 
58                 "sambaMaxPwdAge" },
59                 
60         {AP_MIN_PASSWORD_AGE,"minimum password age", 0,
61                 "Minimal password age, in seconds (default: 0 => allow immediate password change)", 
62                 "sambaMinPwdAge" },
63                 
64         {AP_LOCK_ACCOUNT_DURATION, "lockout duration", 30,
65                 "Lockout duration in minutes (default: 30, -1 => forever)",
66                 "sambaLockoutDuration" },
67                 
68         {AP_RESET_COUNT_TIME, "reset count minutes", 30,
69                 "Reset time after lockout in minutes (default: 30)", 
70                 "sambaLockoutObservationWindow" },
71                 
72         {AP_BAD_ATTEMPT_LOCKOUT, "bad lockout attempt", 0,
73                 "Lockout users after bad logon attempts (default: 0 => off)", 
74                 "sambaLockoutThreshold" },
75                 
76         {AP_TIME_TO_LOGOUT, "disconnect time", (uint32) -1,
77                 "Disconnect Users outside logon hours (default: -1 => off, 0 => on)", 
78                 "sambaForceLogoff" }, 
79                 
80         {AP_REFUSE_MACHINE_PW_CHANGE, "refuse machine password change", 0,
81                 "Allow Machine Password changes (default: 0 => off)",
82                 "sambaRefuseMachinePwdChange" },
83                 
84         {0, NULL, 0, "", NULL}
85 };
86
87 char *account_policy_names_list(void)
88 {
89         char *nl, *p;
90         int i;
91         size_t len = 0;
92
93         for (i=0; account_policy_names[i].string; i++) {
94                 len += strlen(account_policy_names[i].string) + 1;
95         }
96         len++;
97         nl = SMB_MALLOC(len);
98         if (!nl) {
99                 return NULL;
100         }
101         p = nl;
102         for (i=0; account_policy_names[i].string; i++) {
103                 memcpy(p, account_policy_names[i].string, strlen(account_policy_names[i].string) + 1);
104                 p[strlen(account_policy_names[i].string)] = '\n';
105                 p += strlen(account_policy_names[i].string) + 1;
106         }
107         *p = '\0';
108         return nl;
109 }
110
111 /****************************************************************************
112 Get the account policy name as a string from its #define'ed number
113 ****************************************************************************/
114
115 const char *decode_account_policy_name(int field)
116 {
117         int i;
118         for (i=0; account_policy_names[i].string; i++) {
119                 if (field == account_policy_names[i].field) {
120                         return account_policy_names[i].string;
121                 }
122         }
123         return NULL;
124 }
125
126 /****************************************************************************
127 Get the account policy LDAP attribute as a string from its #define'ed number
128 ****************************************************************************/
129
130 const char *get_account_policy_attr(int field)
131 {
132         int i;
133         for (i=0; account_policy_names[i].field; i++) {
134                 if (field == account_policy_names[i].field) {
135                         return account_policy_names[i].ldap_attr;
136                 }
137         }
138         return NULL;
139 }
140
141 /****************************************************************************
142 Get the account policy description as a string from its #define'ed number
143 ****************************************************************************/
144
145 const char *account_policy_get_desc(int field)
146 {
147         int i;
148         for (i=0; account_policy_names[i].string; i++) {
149                 if (field == account_policy_names[i].field) {
150                         return account_policy_names[i].description;
151                 }
152         }
153         return NULL;
154 }
155
156 /****************************************************************************
157 Get the account policy name as a string from its #define'ed number
158 ****************************************************************************/
159
160 int account_policy_name_to_fieldnum(const char *name)
161 {
162         int i;
163         for (i=0; account_policy_names[i].string; i++) {
164                 if (strcmp(name, account_policy_names[i].string) == 0) {
165                         return account_policy_names[i].field;
166                 }
167         }
168         return 0;
169 }
170
171 /*****************************************************************************
172 Update LAST-Set counter inside the cache
173 *****************************************************************************/
174
175 static BOOL account_policy_cache_timestamp(uint32 *value, BOOL update, 
176                                            const char *ap_name)
177 {
178         pstring key;
179         uint32 val = 0;
180         time_t now;
181
182         if (ap_name == NULL)
183                 return False;
184                 
185         slprintf(key, sizeof(key)-1, "%s/%s", ap_name, AP_LASTSET);
186
187         if (!init_account_policy()) {
188                 return False;
189         }
190
191         if (!tdb_fetch_uint32(tdb, key, &val) && !update) {
192                 DEBUG(10,("failed to get last set timestamp of cache\n"));
193                 return False;
194         }
195
196         *value = val;
197
198         DEBUG(10, ("account policy cache lastset was: %s\n", http_timestring(val)));
199
200         if (update) {
201
202                 now = time(NULL);
203
204                 if (!tdb_store_uint32(tdb, key, (uint32)now)) {
205                         DEBUG(1, ("tdb_store_uint32 failed for %s\n", key));
206                         return False;
207                 }
208                 DEBUG(10, ("account policy cache lastset now: %s\n", http_timestring(now)));
209                 *value = now;
210         }
211
212         return True;
213 }
214
215 /*****************************************************************************
216 Get default value for account policy
217 *****************************************************************************/
218
219 BOOL account_policy_get_default(int account_policy, uint32 *val)
220 {
221         int i;
222         for (i=0; account_policy_names[i].field; i++) {
223                 if (account_policy_names[i].field == account_policy) {
224                         *val = account_policy_names[i].default_val;
225                         return True;
226                 }
227         }
228         DEBUG(0,("no default for account_policy index %d found. This should never happen\n", 
229                 account_policy));
230         return False;
231 }
232
233 /*****************************************************************************
234  Set default for a field if it is empty
235 *****************************************************************************/
236
237 static BOOL account_policy_set_default_on_empty(int account_policy)
238 {
239
240         uint32 value;
241
242         if (!account_policy_get(account_policy, &value) && 
243             !account_policy_get_default(account_policy, &value)) {
244                 return False;
245         }
246
247         return account_policy_set(account_policy, value);
248 }
249
250 /*****************************************************************************
251  Open the account policy tdb.
252 ***`*************************************************************************/
253
254 BOOL init_account_policy(void)
255 {
256
257         const char *vstring = "INFO/version";
258         uint32 version;
259         int i;
260
261         if (tdb) {
262                 return True;
263         }
264
265         tdb = tdb_open_log(lock_path("account_policy.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
266         if (!tdb) {
267                 DEBUG(0,("Failed to open account policy database\n"));
268                 return False;
269         }
270
271         /* handle a Samba upgrade */
272         tdb_lock_bystring(tdb, vstring,0);
273         if (!tdb_fetch_uint32(tdb, vstring, &version) || version != DATABASE_VERSION) {
274
275                 tdb_store_uint32(tdb, vstring, DATABASE_VERSION);
276
277                 for (i=0; account_policy_names[i].field; i++) {
278
279                         if (!account_policy_set_default_on_empty(account_policy_names[i].field)) {
280                                 DEBUG(0,("failed to set default value in account policy tdb\n"));
281                                 return False;
282                         }
283                 }
284         }
285
286         tdb_unlock_bystring(tdb, vstring);
287
288         /* These exist by default on NT4 in [HKLM\SECURITY\Policy\Accounts] */
289
290         privilege_create_account( &global_sid_World );
291         privilege_create_account( &global_sid_Builtin_Administrators );
292         privilege_create_account( &global_sid_Builtin_Account_Operators );
293         privilege_create_account( &global_sid_Builtin_Server_Operators );
294         privilege_create_account( &global_sid_Builtin_Print_Operators );
295         privilege_create_account( &global_sid_Builtin_Backup_Operators );
296
297         return True;
298 }
299
300 /*****************************************************************************
301 Get an account policy (from tdb) 
302 *****************************************************************************/
303
304 BOOL account_policy_get(int field, uint32 *value)
305 {
306         fstring name;
307         uint32 regval;
308
309         if (!init_account_policy()) {
310                 return False;
311         }
312
313         if (value) {
314                 *value = 0;
315         }
316
317         fstrcpy(name, decode_account_policy_name(field));
318         if (!*name) {
319                 DEBUG(1, ("account_policy_get: Field %d is not a valid account policy type!  Cannot get, returning 0.\n", field));
320                 return False;
321         }
322         
323         if (!tdb_fetch_uint32(tdb, name, &regval)) {
324                 DEBUG(1, ("account_policy_get: tdb_fetch_uint32 failed for field %d (%s), returning 0\n", field, name));
325                 return False;
326         }
327         
328         if (value) {
329                 *value = regval;
330         }
331
332         DEBUG(10,("account_policy_get: name: %s, val: %d\n", name, regval));
333         return True;
334 }
335
336
337 /****************************************************************************
338 Set an account policy (in tdb) 
339 ****************************************************************************/
340
341 BOOL account_policy_set(int field, uint32 value)
342 {
343         fstring name;
344
345         if (!init_account_policy()) {
346                 return False;
347         }
348
349         fstrcpy(name, decode_account_policy_name(field));
350         if (!*name) {
351                 DEBUG(1, ("Field %d is not a valid account policy type!  Cannot set.\n", field));
352                 return False;
353         }
354
355         if (!tdb_store_uint32(tdb, name, value)) {
356                 DEBUG(1, ("tdb_store_uint32 failed for field %d (%s) on value %u\n", field, name, value));
357                 return False;
358         }
359
360         DEBUG(10,("account_policy_set: name: %s, value: %d\n", name, value));
361         
362         return True;
363 }
364
365 /****************************************************************************
366 Set an account policy in the cache 
367 ****************************************************************************/
368
369 BOOL cache_account_policy_set(int field, uint32 value)
370 {
371         uint32 lastset;
372         const char *policy_name = NULL;
373
374         policy_name = decode_account_policy_name(field);
375         if (policy_name == NULL) {
376                 DEBUG(0,("cache_account_policy_set: no policy found\n"));
377                 return False;
378         }
379
380         DEBUG(10,("cache_account_policy_set: updating account pol cache\n"));
381
382         if (!account_policy_set(field, value)) {
383                 return False;
384         }
385
386         if (!account_policy_cache_timestamp(&lastset, True, policy_name)) 
387         {
388                 DEBUG(10,("cache_account_policy_set: failed to get lastest cache update timestamp\n"));
389                 return False;
390         }
391
392         DEBUG(10,("cache_account_policy_set: cache valid until: %s\n", http_timestring(lastset+AP_TTL)));
393
394         return True;
395 }
396
397 /*****************************************************************************
398 Check whether account policies have been migrated to passdb
399 *****************************************************************************/
400
401 BOOL account_policy_migrated(BOOL init)
402 {
403         pstring key;
404         uint32 val;
405         time_t now;
406
407         slprintf(key, sizeof(key)-1, "AP_MIGRATED_TO_PASSDB");
408
409         if (!init_account_policy()) {
410                 return False;
411         }
412
413         if (init) {
414                 now = time(NULL);
415
416                 if (!tdb_store_uint32(tdb, key, (uint32)now)) {
417                         DEBUG(1, ("tdb_store_uint32 failed for %s\n", key));
418                         return False;
419                 }
420
421                 return True;
422         }
423
424         if (!tdb_fetch_uint32(tdb, key, &val)) {
425                 return False;
426         }
427
428         return True;
429 }
430
431 /*****************************************************************************
432  Remove marker that informs that account policies have been migrated to passdb
433 *****************************************************************************/
434
435 BOOL remove_account_policy_migrated(void)
436 {
437         if (!init_account_policy()) {
438                 return False;
439         }
440
441         return tdb_delete_bystring(tdb, "AP_MIGRATED_TO_PASSDB");
442 }
443
444
445 /*****************************************************************************
446 Get an account policy from the cache 
447 *****************************************************************************/
448
449 BOOL cache_account_policy_get(int field, uint32 *value)
450 {
451         uint32 lastset;
452
453         if (!account_policy_cache_timestamp(&lastset, False, 
454                                             decode_account_policy_name(field))) 
455         {
456                 DEBUG(10,("cache_account_policy_get: failed to get latest cache update timestamp\n"));
457                 return False;
458         }
459
460         if ((lastset + AP_TTL) < (uint32)time(NULL) ) {
461                 DEBUG(10,("cache_account_policy_get: no valid cache entry (cache expired)\n"));
462                 return False;
463         } 
464
465         return account_policy_get(field, value);
466 }
467
468
469 /****************************************************************************
470 ****************************************************************************/
471
472 TDB_CONTEXT *get_account_pol_tdb( void )
473 {
474
475         if ( !tdb ) {
476                 if ( !init_account_policy() ) {
477                         return NULL;
478                 }
479         }
480
481         return tdb;
482 }
483