2 Unix SMB/CIFS implementation.
3 Share Database of available printers.
4 Copyright (C) Simo Sorce 2010
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 #include "system/filesys.h"
22 #include "dbwrap/dbwrap.h"
23 #include "dbwrap/dbwrap_open.h"
25 #include "printer_list.h"
27 #define PL_DB_NAME() lock_path("printer_list.tdb")
28 #define PL_KEY_PREFIX "PRINTERLIST/PRN/"
29 #define PL_KEY_FORMAT PL_KEY_PREFIX"%s"
30 #define PL_TIMESTAMP_KEY "PRINTERLIST/GLOBAL/LAST_REFRESH"
31 #define PL_DATA_FORMAT "ddPPP"
32 #define PL_TSTAMP_FORMAT "dd"
34 static struct db_context *get_printer_list_db(void)
36 static struct db_context *db;
41 db = db_open(NULL, PL_DB_NAME(), 0,
42 TDB_DEFAULT|TDB_CLEAR_IF_FIRST|TDB_INCOMPATIBLE_HASH,
43 O_RDWR|O_CREAT, 0644, DBWRAP_LOCK_ORDER_1,
48 bool printer_list_parent_init(void)
50 struct db_context *db;
53 * Open the tdb in the parent process (smbd) so that our
54 * CLEAR_IF_FIRST optimization in tdb_reopen_all can properly
58 db = get_printer_list_db();
60 DEBUG(1, ("could not open Printer List Database: %s\n",
67 NTSTATUS printer_list_get_printer(TALLOC_CTX *mem_ctx,
70 const char **location,
73 struct db_context *db;
76 uint32_t time_h, time_l;
83 db = get_printer_list_db();
85 return NT_STATUS_INTERNAL_DB_CORRUPTION;
88 key = talloc_asprintf(mem_ctx, PL_KEY_FORMAT, name);
90 DEBUG(0, ("Failed to allocate key name!\n"));
91 return NT_STATUS_NO_MEMORY;
94 status = dbwrap_fetch_bystring_upper(db, key, key, &data);
95 if (!NT_STATUS_IS_OK(status)) {
96 DEBUG(6, ("Failed to fetch record! "
97 "The printer database is empty?\n"));
101 ret = tdb_unpack(data.dptr, data.dsize,
103 &time_h, &time_l, &nstr, &cstr, &lstr);
105 DEBUG(1, ("Failed to un pack printer data"));
106 status = NT_STATUS_INTERNAL_DB_CORRUPTION;
111 *last_refresh = (time_t)(((uint64_t)time_h << 32) + time_l);
115 *comment = talloc_strdup(mem_ctx, cstr);
117 DEBUG(1, ("Failed to strdup comment!\n"));
118 status = NT_STATUS_NO_MEMORY;
124 *location = talloc_strdup(mem_ctx, lstr);
125 if (*location == NULL) {
126 DEBUG(1, ("Failed to strdup location!\n"));
127 status = NT_STATUS_NO_MEMORY;
132 status = NT_STATUS_OK;
141 NTSTATUS printer_list_set_printer(TALLOC_CTX *mem_ctx,
144 const char *location,
147 struct db_context *db;
151 uint32_t time_h, time_l;
155 db = get_printer_list_db();
157 return NT_STATUS_INTERNAL_DB_CORRUPTION;
160 key = talloc_asprintf(mem_ctx, PL_KEY_FORMAT, name);
162 DEBUG(0, ("Failed to allocate key name!\n"));
163 return NT_STATUS_NO_MEMORY;
166 if (comment == NULL) {
170 if (location == NULL) {
174 time_64 = last_refresh;
175 time_l = time_64 & 0xFFFFFFFFL;
176 time_h = time_64 >> 32;
178 len = tdb_pack(NULL, 0,
186 data.dptr = talloc_array(key, uint8_t, len);
188 DEBUG(0, ("Failed to allocate tdb data buffer!\n"));
189 status = NT_STATUS_NO_MEMORY;
194 len = tdb_pack(data.dptr, data.dsize,
202 status = dbwrap_store_bystring_upper(db, key, data, TDB_REPLACE);
209 NTSTATUS printer_list_get_last_refresh(time_t *last_refresh)
211 struct db_context *db;
213 uint32_t time_h, time_l;
217 db = get_printer_list_db();
219 return NT_STATUS_INTERNAL_DB_CORRUPTION;
224 status = dbwrap_fetch_bystring(db, talloc_tos(), PL_TIMESTAMP_KEY, &data);
225 if (!NT_STATUS_IS_OK(status)) {
226 DEBUG(1, ("Failed to fetch record!\n"));
230 ret = tdb_unpack(data.dptr, data.dsize,
231 PL_TSTAMP_FORMAT, &time_h, &time_l);
233 DEBUG(1, ("Failed to un pack printer data"));
234 status = NT_STATUS_INTERNAL_DB_CORRUPTION;
238 *last_refresh = (time_t)(((uint64_t)time_h << 32) + time_l);
239 status = NT_STATUS_OK;
245 NTSTATUS printer_list_mark_reload(void)
247 struct db_context *db;
249 uint32_t time_h, time_l;
250 time_t now = time_mono(NULL);
254 db = get_printer_list_db();
256 return NT_STATUS_INTERNAL_DB_CORRUPTION;
259 time_l = ((uint64_t)now) & 0xFFFFFFFFL;
260 time_h = ((uint64_t)now) >> 32;
262 len = tdb_pack(NULL, 0, PL_TSTAMP_FORMAT, time_h, time_l);
264 data.dptr = talloc_array(talloc_tos(), uint8_t, len);
266 DEBUG(0, ("Failed to allocate tdb data buffer!\n"));
267 status = NT_STATUS_NO_MEMORY;
272 len = tdb_pack(data.dptr, data.dsize,
273 PL_TSTAMP_FORMAT, time_h, time_l);
275 status = dbwrap_store_bystring(db, PL_TIMESTAMP_KEY,
279 TALLOC_FREE(data.dptr);
283 typedef int (printer_list_trv_fn_t)(struct db_record *, void *);
285 static NTSTATUS printer_list_traverse(printer_list_trv_fn_t *fn,
288 struct db_context *db;
291 db = get_printer_list_db();
293 return NT_STATUS_INTERNAL_DB_CORRUPTION;
296 status = dbwrap_traverse(db, fn, private_data, NULL);
301 struct printer_list_clean_state {
306 static int printer_list_clean_fn(struct db_record *rec, void *private_data)
308 struct printer_list_clean_state *state =
309 (struct printer_list_clean_state *)private_data;
310 uint32_t time_h, time_l;
319 key = dbwrap_record_get_key(rec);
321 /* skip anything that does not contain PL_DATA_FORMAT data */
322 if (strncmp((char *)key.dptr,
323 PL_KEY_PREFIX, sizeof(PL_KEY_PREFIX)-1)) {
327 value = dbwrap_record_get_value(rec);
329 ret = tdb_unpack(value.dptr, value.dsize,
330 PL_DATA_FORMAT, &time_h, &time_l, &name, &comment,
333 DEBUG(1, ("Failed to un pack printer data"));
334 state->status = NT_STATUS_INTERNAL_DB_CORRUPTION;
342 refresh = (time_t)(((uint64_t)time_h << 32) + time_l);
344 if (refresh < state->last_refresh) {
345 state->status = dbwrap_record_delete(rec);
346 if (!NT_STATUS_IS_OK(state->status)) {
354 NTSTATUS printer_list_clean_old(void)
356 struct printer_list_clean_state state;
359 status = printer_list_get_last_refresh(&state.last_refresh);
360 if (!NT_STATUS_IS_OK(status)) {
364 state.status = NT_STATUS_OK;
366 status = printer_list_traverse(printer_list_clean_fn, &state);
367 if (NT_STATUS_EQUAL(status, NT_STATUS_UNSUCCESSFUL) &&
368 !NT_STATUS_IS_OK(state.status)) {
369 status = state.status;
375 struct printer_list_exec_state {
376 void (*fn)(const char *, const char *, const char *, void *);
381 static int printer_list_exec_fn(struct db_record *rec, void *private_data)
383 struct printer_list_exec_state *state =
384 (struct printer_list_exec_state *)private_data;
385 uint32_t time_h, time_l;
393 key = dbwrap_record_get_key(rec);
395 /* always skip PL_TIMESTAMP_KEY key */
396 if (strequal((const char *)key.dptr, PL_TIMESTAMP_KEY)) {
400 value = dbwrap_record_get_value(rec);
402 ret = tdb_unpack(value.dptr, value.dsize,
403 PL_DATA_FORMAT, &time_h, &time_l, &name, &comment,
406 DEBUG(1, ("Failed to un pack printer data"));
407 state->status = NT_STATUS_INTERNAL_DB_CORRUPTION;
411 state->fn(name, comment, location, state->private_data);
419 NTSTATUS printer_list_run_fn(void (*fn)(const char *, const char *, const char *, void *),
422 struct printer_list_exec_state state;
426 state.private_data = private_data;
427 state.status = NT_STATUS_OK;
429 status = printer_list_traverse(printer_list_exec_fn, &state);
430 if (NT_STATUS_EQUAL(status, NT_STATUS_UNSUCCESSFUL) &&
431 !NT_STATUS_IS_OK(state.status)) {
432 status = state.status;