s4-kcc: Remove also deleted objects that are not in the Deleted Object container
[mat/samba.git] / source4 / dsdb / kcc / kcc_deleted.c
1 /*
2    Unix SMB/CIFS implementation.
3
4    handle removal of deleted objects
5
6    Copyright (C) 2009 Andrew Tridgell
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 3 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, see <http://www.gnu.org/licenses/>.
20
21 */
22
23 #include "includes.h"
24 #include "lib/events/events.h"
25 #include "dsdb/samdb/samdb.h"
26 #include "auth/auth.h"
27 #include "smbd/service.h"
28 #include "lib/messaging/irpc.h"
29 #include "dsdb/kcc/kcc_connection.h"
30 #include "dsdb/kcc/kcc_service.h"
31 #include <ldb_errors.h>
32 #include "../lib/util/dlinklist.h"
33 #include "librpc/gen_ndr/ndr_misc.h"
34 #include "librpc/gen_ndr/ndr_drsuapi.h"
35 #include "librpc/gen_ndr/ndr_drsblobs.h"
36 #include "param/param.h"
37 #include "dsdb/common/util.h"
38
39 /*
40   check to see if any deleted objects need scavenging
41  */
42 NTSTATUS kccsrv_check_deleted(struct kccsrv_service *s, TALLOC_CTX *mem_ctx)
43 {
44         struct kccsrv_partition *part;
45         int ret;
46         uint32_t tombstoneLifetime;
47
48         time_t interval = lpcfg_parm_int(s->task->lp_ctx, NULL, "kccsrv",
49                                                     "check_deleted_full_scan_interval", 86400);
50         time_t t = time(NULL);
51
52         if (t - s->last_deleted_check < lpcfg_parm_int(s->task->lp_ctx, NULL, "kccsrv",
53                                                     "check_deleted_interval", 600)) {
54                 return NT_STATUS_OK;
55         }
56         s->last_deleted_check = t;
57
58         ret = dsdb_tombstone_lifetime(s->samdb, &tombstoneLifetime);
59         if (ret != LDB_SUCCESS) {
60                 DEBUG(1,(__location__ ": Failed to get tombstone lifetime\n"));
61                 return NT_STATUS_INTERNAL_DB_CORRUPTION;
62         }
63         if (s->last_full_scan_deleted_check > 0 && ((t - s->last_full_scan_deleted_check) > interval )) {
64                 do_fs = true;
65                 s->last_full_scan_deleted_check = t;
66         }
67
68         if (s->last_full_scan_deleted_check == 0) {
69                 /*
70                  * If we never made a full scan set the last full scan event to be in the past
71                  * and that 9/10 of the full scan interval has already passed.
72                  * This is done to avoid the full scan to fire just at the begining of samba
73                  * or a couple of minutes after the start.
74                  * With this "setup" and default values of interval, the full scan will fire
75                  * 2.4 hours after the start of samba
76                  */
77                 s->last_full_scan_deleted_check = t - ((9 * interval) / 10);
78         }
79
80         for (part=s->partitions; part; part=part->next) {
81                 struct ldb_dn *do_dn;
82                 struct ldb_result *res;
83                 const char *attrs[] = { "whenChanged", NULL };
84                 unsigned int i;
85
86                 ret = dsdb_get_deleted_objects_dn(s->samdb, mem_ctx, part->dn, &do_dn);
87                 if (ret != LDB_SUCCESS) {
88                         /* some partitions have no Deleted Objects
89                            container */
90                         continue;
91                 }
92
93                 if (!do_fs && ldb_dn_compare(ldb_get_config_basedn(s->samdb), part->dn)) {
94                         ret = dsdb_search(s->samdb, do_dn, &res, do_dn, LDB_SCOPE_ONELEVEL, attrs,
95                                         DSDB_SEARCH_SHOW_RECYCLED, NULL);
96                 } else {
97                         if (do_fs) {
98                                 DEBUG(1, ("Doing a full scan on %s and looking for deleted object\n",
99                                                 ldb_dn_get_linearized(part->dn)));
100                         }
101                         ret = dsdb_search(s->samdb, part->dn, &res, part->dn, LDB_SCOPE_SUBTREE, attrs,
102                                         DSDB_SEARCH_SHOW_RECYCLED, "(isDeleted=TRUE)");
103                 }
104
105                 if (ret != LDB_SUCCESS) {
106                         DEBUG(1,(__location__ ": Failed to search for deleted objects in %s\n",
107                                  ldb_dn_get_linearized(do_dn)));
108                         talloc_free(do_dn);
109                         continue;
110                 }
111
112                 for (i=0; i<res->count; i++) {
113                         const char *tstring;
114                         time_t whenChanged = 0;
115
116                         if (ldb_dn_compare(do_dn, res->msgs[i]->dn) == 0) {
117                                 /* Skip the Deleted Object Container */
118                                 continue;
119                         }
120                         tstring = ldb_msg_find_attr_as_string(res->msgs[i], "whenChanged", NULL);
121                         if (tstring) {
122                                 whenChanged = ldb_string_to_time(tstring);
123                         }
124                         if (t - whenChanged > tombstoneLifetime*60*60*24) {
125                                 ret = dsdb_delete(s->samdb, res->msgs[i]->dn, DSDB_SEARCH_SHOW_DELETED);
126                                 if (ret != LDB_SUCCESS) {
127                                         DEBUG(1,(__location__ ": Failed to remove deleted object %s\n",
128                                                  ldb_dn_get_linearized(res->msgs[i]->dn)));
129                                 } else {
130                                         DEBUG(4,("Removed deleted object %s\n",
131                                                  ldb_dn_get_linearized(res->msgs[i]->dn)));
132                                 }
133                         }
134                 }
135
136                 talloc_free(do_dn);
137         }
138
139         return NT_STATUS_OK;
140 }