2 Unix SMB/Netbios implementation.
4 printing backend routines
5 Copyright (C) Andrew Tridgell 1992-2000
6 Copyright (C) Jeremy Allison 2002
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.
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.
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/>.
23 #include "system/syslog.h"
24 #include "system/filesys.h"
26 #include "../librpc/gen_ndr/ndr_spoolss.h"
27 #include "nt_printing.h"
28 #include "../librpc/gen_ndr/netlogon.h"
29 #include "printing/notify.h"
30 #include "printing/pcap.h"
31 #include "printing/printer_list.h"
32 #include "printing/queue_process.h"
34 #include "smbd/smbd.h"
38 #include "lib/param/loadparm.h"
40 extern struct current_user current_user
;
41 extern userdom_struct current_user_info
;
43 /* Current printer interface */
44 static bool remove_from_jobs_added(const char* sharename
, uint32 jobid
);
47 the printing backend revolves around a tdb database that stores the
48 SMB view of the print queue
50 The key for this database is a jobid - a internally generated number that
51 uniquely identifies a print job
53 reading the print queue involves two steps:
54 - possibly running lpq and updating the internal database from that
55 - reading entries from the database
57 jobids are assigned when a job starts spooling.
60 static TDB_CONTEXT
*rap_tdb
;
61 static uint16 next_rap_jobid
;
62 struct rap_jobid_key
{
67 /***************************************************************************
68 Nightmare. LANMAN jobid's are 16 bit numbers..... We must map them to 32
69 bit RPC jobids.... JRA.
70 ***************************************************************************/
72 uint16
pjobid_to_rap(const char* sharename
, uint32 jobid
)
76 struct rap_jobid_key jinfo
;
79 DEBUG(10,("pjobid_to_rap: called.\n"));
82 /* Create the in-memory tdb. */
83 rap_tdb
= tdb_open_log(NULL
, 0, TDB_INTERNAL
, (O_RDWR
|O_CREAT
), 0644);
89 fstrcpy( jinfo
.sharename
, sharename
);
91 key
.dptr
= (uint8
*)&jinfo
;
92 key
.dsize
= sizeof(jinfo
);
94 data
= tdb_fetch_compat(rap_tdb
, key
);
95 if (data
.dptr
&& data
.dsize
== sizeof(uint16
)) {
96 rap_jobid
= SVAL(data
.dptr
, 0);
98 DEBUG(10,("pjobid_to_rap: jobid %u maps to RAP jobid %u\n",
99 (unsigned int)jobid
, (unsigned int)rap_jobid
));
102 SAFE_FREE(data
.dptr
);
103 /* Not found - create and store mapping. */
104 rap_jobid
= ++next_rap_jobid
;
106 rap_jobid
= ++next_rap_jobid
;
107 SSVAL(buf
,0,rap_jobid
);
109 data
.dsize
= sizeof(rap_jobid
);
110 tdb_store(rap_tdb
, key
, data
, TDB_REPLACE
);
111 tdb_store(rap_tdb
, data
, key
, TDB_REPLACE
);
113 DEBUG(10,("pjobid_to_rap: created jobid %u maps to RAP jobid %u\n",
114 (unsigned int)jobid
, (unsigned int)rap_jobid
));
118 bool rap_to_pjobid(uint16 rap_jobid
, fstring sharename
, uint32
*pjobid
)
123 DEBUG(10,("rap_to_pjobid called.\n"));
128 SSVAL(buf
,0,rap_jobid
);
130 key
.dsize
= sizeof(rap_jobid
);
131 data
= tdb_fetch_compat(rap_tdb
, key
);
132 if ( data
.dptr
&& data
.dsize
== sizeof(struct rap_jobid_key
) )
134 struct rap_jobid_key
*jinfo
= (struct rap_jobid_key
*)data
.dptr
;
135 if (sharename
!= NULL
) {
136 fstrcpy( sharename
, jinfo
->sharename
);
138 *pjobid
= jinfo
->jobid
;
139 DEBUG(10,("rap_to_pjobid: jobid %u maps to RAP jobid %u\n",
140 (unsigned int)*pjobid
, (unsigned int)rap_jobid
));
141 SAFE_FREE(data
.dptr
);
145 DEBUG(10,("rap_to_pjobid: Failed to lookup RAP jobid %u\n",
146 (unsigned int)rap_jobid
));
147 SAFE_FREE(data
.dptr
);
151 void rap_jobid_delete(const char* sharename
, uint32 jobid
)
155 struct rap_jobid_key jinfo
;
158 DEBUG(10,("rap_jobid_delete: called.\n"));
163 ZERO_STRUCT( jinfo
);
164 fstrcpy( jinfo
.sharename
, sharename
);
166 key
.dptr
= (uint8
*)&jinfo
;
167 key
.dsize
= sizeof(jinfo
);
169 data
= tdb_fetch_compat(rap_tdb
, key
);
170 if (!data
.dptr
|| (data
.dsize
!= sizeof(uint16
))) {
171 DEBUG(10,("rap_jobid_delete: cannot find jobid %u\n",
172 (unsigned int)jobid
));
173 SAFE_FREE(data
.dptr
);
177 DEBUG(10,("rap_jobid_delete: deleting jobid %u\n",
178 (unsigned int)jobid
));
180 rap_jobid
= SVAL(data
.dptr
, 0);
181 SAFE_FREE(data
.dptr
);
182 SSVAL(buf
,0,rap_jobid
);
184 data
.dsize
= sizeof(rap_jobid
);
185 tdb_delete(rap_tdb
, key
);
186 tdb_delete(rap_tdb
, data
);
189 static int get_queue_status(const char* sharename
, print_status_struct
*);
191 /****************************************************************************
192 Initialise the printing backend. Called once at startup before the fork().
193 ****************************************************************************/
195 bool print_backend_init(struct messaging_context
*msg_ctx
)
197 const char *sversion
= "INFO/version";
198 int services
= lp_numservices();
201 char *print_cache_path
;
203 if (!printer_list_parent_init()) {
207 print_cache_path
= cache_path("printing");
208 if (print_cache_path
== NULL
) {
211 ok
= directory_create_or_exist(print_cache_path
, 0755);
212 TALLOC_FREE(print_cache_path
);
217 print_cache_path
= cache_path("printing.tdb");
218 if (print_cache_path
== NULL
) {
221 unlink(print_cache_path
);
222 TALLOC_FREE(print_cache_path
);
224 /* handle a Samba upgrade */
226 for (snum
= 0; snum
< services
; snum
++) {
227 struct tdb_print_db
*pdb
;
228 if (!lp_printable(snum
))
231 pdb
= get_print_db_byname(lp_const_servicename(snum
));
234 if (tdb_lock_bystring(pdb
->tdb
, sversion
) != 0) {
235 DEBUG(0,("print_backend_init: Failed to open printer %s database\n", lp_const_servicename(snum
) ));
236 release_print_db(pdb
);
239 if (tdb_fetch_int32(pdb
->tdb
, sversion
) != PRINT_DATABASE_VERSION
) {
240 tdb_wipe_all(pdb
->tdb
);
241 tdb_store_int32(pdb
->tdb
, sversion
, PRINT_DATABASE_VERSION
);
243 tdb_unlock_bystring(pdb
->tdb
, sversion
);
244 release_print_db(pdb
);
247 close_all_print_db(); /* Don't leave any open. */
249 /* do NT print initialization... */
250 return nt_printing_init(msg_ctx
);
253 /****************************************************************************
254 Shut down printing backend. Called once at shutdown to close the tdb.
255 ****************************************************************************/
257 void printing_end(void)
259 close_all_print_db(); /* Don't leave any open. */
262 /****************************************************************************
263 Retrieve the set of printing functions for a given service. This allows
264 us to set the printer function table based on the value of the 'printing'
267 Use the generic interface as the default and only use cups interface only
268 when asked for (and only when supported)
269 ****************************************************************************/
271 static struct printif
*get_printer_fns_from_type( enum printing_types type
)
273 struct printif
*printer_fns
= &generic_printif
;
276 if ( type
== PRINT_CUPS
) {
277 printer_fns
= &cups_printif
;
279 #endif /* HAVE_CUPS */
282 if ( type
== PRINT_IPRINT
) {
283 printer_fns
= &iprint_printif
;
285 #endif /* HAVE_IPRINT */
287 printer_fns
->type
= type
;
292 static struct printif
*get_printer_fns( int snum
)
294 return get_printer_fns_from_type( (enum printing_types
)lp_printing(snum
) );
298 /****************************************************************************
299 Useful function to generate a tdb key.
300 ****************************************************************************/
302 static TDB_DATA
print_key(uint32 jobid
, uint32
*tmp
)
306 SIVAL(tmp
, 0, jobid
);
307 ret
.dptr
= (uint8
*)tmp
;
308 ret
.dsize
= sizeof(*tmp
);
312 /****************************************************************************
313 Pack the devicemode to store it in a tdb.
314 ****************************************************************************/
315 static int pack_devicemode(struct spoolss_DeviceMode
*devmode
, uint8
*buf
, int buflen
)
317 enum ndr_err_code ndr_err
;
322 ndr_err
= ndr_push_struct_blob(&blob
, talloc_tos(),
324 (ndr_push_flags_fn_t
)
325 ndr_push_spoolss_DeviceMode
);
326 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err
)) {
327 DEBUG(10, ("pack_devicemode: "
328 "error encoding spoolss_DeviceMode\n"));
335 len
= tdb_pack(buf
, buflen
, "B", blob
.length
, blob
.data
);
338 DEBUG(8, ("Packed devicemode [%s]\n", devmode
->formname
));
345 /****************************************************************************
346 Unpack the devicemode to store it in a tdb.
347 ****************************************************************************/
348 static int unpack_devicemode(TALLOC_CTX
*mem_ctx
,
349 const uint8
*buf
, int buflen
,
350 struct spoolss_DeviceMode
**devmode
)
352 struct spoolss_DeviceMode
*dm
;
353 enum ndr_err_code ndr_err
;
361 len
= tdb_unpack(buf
, buflen
, "B", &data_len
, &data
);
366 dm
= talloc_zero(mem_ctx
, struct spoolss_DeviceMode
);
371 blob
= data_blob_const(data
, data_len
);
373 ndr_err
= ndr_pull_struct_blob(&blob
, dm
, dm
,
374 (ndr_pull_flags_fn_t
)ndr_pull_spoolss_DeviceMode
);
375 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err
)) {
376 DEBUG(10, ("unpack_devicemode: "
377 "error parsing spoolss_DeviceMode\n"));
381 DEBUG(8, ("Unpacked devicemode [%s](%s)\n",
382 dm
->devicename
, dm
->formname
));
383 if (dm
->driverextra_data
.data
) {
384 DEBUG(8, ("with a private section of %d bytes\n",
385 dm
->__driverextra_length
));
395 /***********************************************************************
396 unpack a pjob from a tdb buffer
397 ***********************************************************************/
399 static int unpack_pjob(TALLOC_CTX
*mem_ctx
, uint8
*buf
, int buflen
,
400 struct printjob
*pjob
)
404 uint32 pjpid
, pjjobid
, pjsysjob
, pjfd
, pjstarttime
, pjstatus
;
405 uint32 pjsize
, pjpage_count
, pjspooled
, pjsmbjob
;
411 len
+= tdb_unpack(buf
+len
, buflen
-len
, "ddddddddddfffff",
432 used
= unpack_devicemode(mem_ctx
, buf
+len
, buflen
-len
, &pjob
->devmode
);
440 pjob
->jobid
= pjjobid
;
441 pjob
->sysjob
= pjsysjob
;
443 pjob
->starttime
= pjstarttime
;
444 pjob
->status
= pjstatus
;
446 pjob
->page_count
= pjpage_count
;
447 pjob
->spooled
= pjspooled
;
448 pjob
->smbjob
= pjsmbjob
;
454 /****************************************************************************
455 Useful function to find a print job in the database.
456 ****************************************************************************/
458 static struct printjob
*print_job_find(TALLOC_CTX
*mem_ctx
,
459 const char *sharename
,
462 struct printjob
*pjob
;
465 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
467 DEBUG(10,("print_job_find: looking up job %u for share %s\n",
468 (unsigned int)jobid
, sharename
));
474 ret
= tdb_fetch_compat(pdb
->tdb
, print_key(jobid
, &tmp
));
475 release_print_db(pdb
);
478 DEBUG(10, ("print_job_find: failed to find jobid %u.\n",
483 pjob
= talloc_zero(mem_ctx
, struct printjob
);
488 if (unpack_pjob(mem_ctx
, ret
.dptr
, ret
.dsize
, pjob
) == -1) {
489 DEBUG(10, ("failed to unpack jobid %u.\n", jobid
));
495 DEBUG(10,("print_job_find: returning system job %d for jobid %u.\n",
496 pjob
->sysjob
, jobid
));
497 SMB_ASSERT(pjob
->jobid
== jobid
);
504 struct job_traverse_state
{
509 /* find spoolss jobid based on sysjob */
510 static int sysjob_to_jobid_traverse_fn(TDB_CONTEXT
*the_tdb
, TDB_DATA key
,
511 TDB_DATA data
, void *private_data
)
513 struct printjob
*pjob
;
514 struct job_traverse_state
*state
=
515 (struct job_traverse_state
*)private_data
;
517 if (!data
.dptr
|| data
.dsize
== 0)
520 pjob
= (struct printjob
*)data
.dptr
;
521 if (key
.dsize
!= sizeof(uint32
))
524 if (state
->sysjob
== pjob
->sysjob
) {
525 state
->jobid
= pjob
->jobid
;
532 uint32
sysjob_to_jobid_pdb(struct tdb_print_db
*pdb
, int sysjob
)
534 struct job_traverse_state state
;
536 state
.sysjob
= sysjob
;
537 state
.jobid
= (uint32_t)-1;
539 tdb_traverse(pdb
->tdb
, sysjob_to_jobid_traverse_fn
, &state
);
544 /****************************************************************************
545 This is a *horribly expensive call as we have to iterate through all the
546 current printer tdb's. Don't do this often ! JRA.
547 ****************************************************************************/
549 uint32
sysjob_to_jobid(int unix_jobid
)
551 int services
= lp_numservices();
553 struct job_traverse_state state
;
555 state
.sysjob
= unix_jobid
;
556 state
.jobid
= (uint32_t)-1;
558 for (snum
= 0; snum
< services
; snum
++) {
559 struct tdb_print_db
*pdb
;
560 if (!lp_printable(snum
))
562 pdb
= get_print_db_byname(lp_const_servicename(snum
));
566 tdb_traverse(pdb
->tdb
, sysjob_to_jobid_traverse_fn
, &state
);
567 release_print_db(pdb
);
568 if (state
.jobid
!= (uint32_t)-1)
574 /* find sysjob based on spoolss jobid */
575 static int jobid_to_sysjob_traverse_fn(TDB_CONTEXT
*the_tdb
, TDB_DATA key
,
576 TDB_DATA data
, void *private_data
)
578 struct printjob
*pjob
;
579 struct job_traverse_state
*state
=
580 (struct job_traverse_state
*)private_data
;
582 if (!data
.dptr
|| data
.dsize
== 0)
585 pjob
= (struct printjob
*)data
.dptr
;
586 if (key
.dsize
!= sizeof(uint32_t))
589 if (state
->jobid
== pjob
->jobid
) {
590 state
->sysjob
= pjob
->sysjob
;
597 int jobid_to_sysjob_pdb(struct tdb_print_db
*pdb
, uint32_t jobid
)
599 struct job_traverse_state state
;
604 tdb_traverse(pdb
->tdb
, jobid_to_sysjob_traverse_fn
, &state
);
609 /****************************************************************************
610 Send notifications based on what has changed after a pjob_store.
611 ****************************************************************************/
613 static const struct {
615 uint32_t spoolss_status
;
616 } lpq_to_spoolss_status_map
[] = {
617 { LPQ_QUEUED
, JOB_STATUS_QUEUED
},
618 { LPQ_PAUSED
, JOB_STATUS_PAUSED
},
619 { LPQ_SPOOLING
, JOB_STATUS_SPOOLING
},
620 { LPQ_PRINTING
, JOB_STATUS_PRINTING
},
621 { LPQ_DELETING
, JOB_STATUS_DELETING
},
622 { LPQ_OFFLINE
, JOB_STATUS_OFFLINE
},
623 { LPQ_PAPEROUT
, JOB_STATUS_PAPEROUT
},
624 { LPQ_PRINTED
, JOB_STATUS_PRINTED
},
625 { LPQ_DELETED
, JOB_STATUS_DELETED
},
626 { LPQ_BLOCKED
, JOB_STATUS_BLOCKED_DEVQ
},
627 { LPQ_USER_INTERVENTION
, JOB_STATUS_USER_INTERVENTION
},
631 /* Convert a lpq status value stored in printing.tdb into the
632 appropriate win32 API constant. */
634 static uint32
map_to_spoolss_status(uint32 lpq_status
)
638 while (lpq_to_spoolss_status_map
[i
].lpq_status
!= -1) {
639 if (lpq_to_spoolss_status_map
[i
].lpq_status
== lpq_status
)
640 return lpq_to_spoolss_status_map
[i
].spoolss_status
;
647 /***************************************************************************
648 Append a jobid to the 'jobs changed' list.
649 ***************************************************************************/
651 static bool add_to_jobs_changed(struct tdb_print_db
*pdb
, uint32_t jobid
)
654 uint32_t store_jobid
;
656 SIVAL(&store_jobid
, 0, jobid
);
657 data
.dptr
= (uint8
*) &store_jobid
;
660 DEBUG(10,("add_to_jobs_added: Added jobid %u\n", (unsigned int)jobid
));
662 return (tdb_append(pdb
->tdb
, string_tdb_data("INFO/jobs_changed"),
666 /***************************************************************************
667 Remove a jobid from the 'jobs changed' list.
668 ***************************************************************************/
670 static bool remove_from_jobs_changed(const char* sharename
, uint32_t jobid
)
672 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
676 bool gotlock
= False
;
684 key
= string_tdb_data("INFO/jobs_changed");
686 if (tdb_chainlock_with_timeout(pdb
->tdb
, key
, 5) != 0)
691 data
= tdb_fetch_compat(pdb
->tdb
, key
);
693 if (data
.dptr
== NULL
|| data
.dsize
== 0 || (data
.dsize
% 4 != 0))
696 job_count
= data
.dsize
/ 4;
697 for (i
= 0; i
< job_count
; i
++) {
700 ch_jobid
= IVAL(data
.dptr
, i
*4);
701 if (ch_jobid
== jobid
) {
702 if (i
< job_count
-1 )
703 memmove(data
.dptr
+ (i
*4), data
.dptr
+ (i
*4) + 4, (job_count
- i
- 1)*4 );
705 if (tdb_store(pdb
->tdb
, key
, data
, TDB_REPLACE
) != 0)
715 tdb_chainunlock(pdb
->tdb
, key
);
716 SAFE_FREE(data
.dptr
);
717 release_print_db(pdb
);
719 DEBUG(10,("remove_from_jobs_changed: removed jobid %u\n", (unsigned int)jobid
));
721 DEBUG(10,("remove_from_jobs_changed: Failed to remove jobid %u\n", (unsigned int)jobid
));
725 static void pjob_store_notify(struct tevent_context
*ev
,
726 struct messaging_context
*msg_ctx
,
727 const char* sharename
, uint32 jobid
,
728 struct printjob
*old_data
,
729 struct printjob
*new_data
,
732 bool new_job
= false;
733 bool changed
= false;
735 if (old_data
== NULL
) {
739 /* ACHTUNG! Due to a bug in Samba's spoolss parsing of the
740 NOTIFY_INFO_DATA buffer, we *have* to send the job submission
741 time first or else we'll end up with potential alignment
742 errors. I don't think the systemtime should be spooled as
743 a string, but this gets us around that error.
744 --jerry (i'll feel dirty for this) */
747 notify_job_submitted(ev
, msg_ctx
,
748 sharename
, jobid
, new_data
->starttime
);
749 notify_job_username(ev
, msg_ctx
,
750 sharename
, jobid
, new_data
->user
);
751 notify_job_name(ev
, msg_ctx
,
752 sharename
, jobid
, new_data
->jobname
);
753 notify_job_status(ev
, msg_ctx
,
754 sharename
, jobid
, map_to_spoolss_status(new_data
->status
));
755 notify_job_total_bytes(ev
, msg_ctx
,
756 sharename
, jobid
, new_data
->size
);
757 notify_job_total_pages(ev
, msg_ctx
,
758 sharename
, jobid
, new_data
->page_count
);
760 if (!strequal(old_data
->jobname
, new_data
->jobname
)) {
761 notify_job_name(ev
, msg_ctx
, sharename
,
762 jobid
, new_data
->jobname
);
766 if (old_data
->status
!= new_data
->status
) {
767 notify_job_status(ev
, msg_ctx
,
769 map_to_spoolss_status(new_data
->status
));
772 if (old_data
->size
!= new_data
->size
) {
773 notify_job_total_bytes(ev
, msg_ctx
,
774 sharename
, jobid
, new_data
->size
);
777 if (old_data
->page_count
!= new_data
->page_count
) {
778 notify_job_total_pages(ev
, msg_ctx
,
780 new_data
->page_count
);
787 /****************************************************************************
788 Store a job structure back to the database.
789 ****************************************************************************/
791 static bool pjob_store(struct tevent_context
*ev
,
792 struct messaging_context
*msg_ctx
,
793 const char* sharename
, uint32 jobid
,
794 struct printjob
*pjob
)
797 TDB_DATA old_data
, new_data
;
799 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
801 int len
, newlen
, buflen
;
809 old_data
= tdb_fetch_compat(pdb
->tdb
, print_key(jobid
, &tmp
));
811 /* Doh! Now we have to pack/unpack data since the NT_DEVICEMODE was added */
818 len
+= tdb_pack(buf
+len
, buflen
-len
, "ddddddddddfffff",
821 (uint32
)pjob
->sysjob
,
823 (uint32
)pjob
->starttime
,
824 (uint32
)pjob
->status
,
826 (uint32
)pjob
->page_count
,
827 (uint32
)pjob
->spooled
,
828 (uint32
)pjob
->smbjob
,
835 len
+= pack_devicemode(pjob
->devmode
, buf
+len
, buflen
-len
);
838 buf
= (uint8
*)SMB_REALLOC(buf
, len
);
840 DEBUG(0,("pjob_store: failed to enlarge buffer!\n"));
845 } while ( buflen
!= len
);
851 new_data
.dsize
= len
;
852 ret
= (tdb_store(pdb
->tdb
, print_key(jobid
, &tmp
), new_data
,
855 /* Send notify updates for what has changed */
858 bool changed
= false;
859 struct printjob old_pjob
;
861 if (old_data
.dsize
) {
862 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
866 len
= unpack_pjob(tmp_ctx
, old_data
.dptr
,
867 old_data
.dsize
, &old_pjob
);
869 pjob_store_notify(ev
,
871 sharename
, jobid
, &old_pjob
,
875 add_to_jobs_changed(pdb
, jobid
);
878 talloc_free(tmp_ctx
);
882 pjob_store_notify(ev
, msg_ctx
,
883 sharename
, jobid
, NULL
, pjob
,
889 release_print_db(pdb
);
890 SAFE_FREE( old_data
.dptr
);
896 /****************************************************************************
897 Remove a job structure from the database.
898 ****************************************************************************/
900 static void pjob_delete(struct tevent_context
*ev
,
901 struct messaging_context
*msg_ctx
,
902 const char* sharename
, uint32 jobid
)
905 struct printjob
*pjob
;
906 uint32 job_status
= 0;
907 struct tdb_print_db
*pdb
;
908 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
909 if (tmp_ctx
== NULL
) {
913 pdb
= get_print_db_byname(sharename
);
918 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
920 DEBUG(5, ("we were asked to delete nonexistent job %u\n",
925 /* We must cycle through JOB_STATUS_DELETING and
926 JOB_STATUS_DELETED for the port monitor to delete the job
929 job_status
= JOB_STATUS_DELETING
|JOB_STATUS_DELETED
;
930 notify_job_status(ev
, msg_ctx
, sharename
, jobid
, job_status
);
932 /* Remove from printing.tdb */
934 tdb_delete(pdb
->tdb
, print_key(jobid
, &tmp
));
935 remove_from_jobs_added(sharename
, jobid
);
936 rap_jobid_delete(sharename
, jobid
);
938 release_print_db(pdb
);
940 talloc_free(tmp_ctx
);
943 /****************************************************************************
944 List a unix job in the print database.
945 ****************************************************************************/
947 static void print_unix_job(struct tevent_context
*ev
,
948 struct messaging_context
*msg_ctx
,
949 const char *sharename
, print_queue_struct
*q
,
952 struct printjob pj
, *old_pj
;
953 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
954 if (tmp_ctx
== NULL
) {
958 if (jobid
== (uint32
)-1) {
959 jobid
= q
->sysjob
+ UNIX_JOB_START
;
962 /* Preserve the timestamp on an existing unix print job */
964 old_pj
= print_job_find(tmp_ctx
, sharename
, jobid
);
970 pj
.sysjob
= q
->sysjob
;
972 pj
.starttime
= old_pj
? old_pj
->starttime
: q
->time
;
973 pj
.status
= q
->status
;
976 fstrcpy(pj
.filename
, old_pj
? old_pj
->filename
: "");
977 if (jobid
< UNIX_JOB_START
) {
979 fstrcpy(pj
.jobname
, old_pj
? old_pj
->jobname
: "Remote Downlevel Document");
982 fstrcpy(pj
.jobname
, old_pj
? old_pj
->jobname
: q
->fs_file
);
984 fstrcpy(pj
.user
, old_pj
? old_pj
->user
: q
->fs_user
);
985 fstrcpy(pj
.queuename
, old_pj
? old_pj
->queuename
: sharename
);
987 pjob_store(ev
, msg_ctx
, sharename
, jobid
, &pj
);
988 talloc_free(tmp_ctx
);
992 struct traverse_struct
{
993 print_queue_struct
*queue
;
994 int qcount
, snum
, maxcount
, total_jobs
;
995 const char *sharename
;
997 const char *lprm_command
;
998 struct printif
*print_if
;
999 struct tevent_context
*ev
;
1000 struct messaging_context
*msg_ctx
;
1001 TALLOC_CTX
*mem_ctx
;
1004 /****************************************************************************
1005 Utility fn to delete any jobs that are no longer active.
1006 ****************************************************************************/
1008 static int traverse_fn_delete(TDB_CONTEXT
*t
, TDB_DATA key
, TDB_DATA data
, void *state
)
1010 struct traverse_struct
*ts
= (struct traverse_struct
*)state
;
1011 struct printjob pjob
;
1015 if ( key
.dsize
!= sizeof(jobid
) )
1018 if (unpack_pjob(ts
->mem_ctx
, data
.dptr
, data
.dsize
, &pjob
) == -1)
1020 talloc_free(pjob
.devmode
);
1024 /* remove a unix job if it isn't in the system queue any more */
1025 for (i
=0;i
<ts
->qcount
;i
++) {
1026 if (ts
->queue
[i
].sysjob
== pjob
.sysjob
) {
1030 if (i
== ts
->qcount
) {
1031 DEBUG(10,("traverse_fn_delete: pjob %u deleted due to !smbjob\n",
1032 (unsigned int)jobid
));
1033 pjob_delete(ts
->ev
, ts
->msg_ctx
,
1034 ts
->sharename
, jobid
);
1038 /* need to continue the the bottom of the function to
1039 save the correct attributes */
1042 /* maybe it hasn't been spooled yet */
1043 if (!pjob
.spooled
) {
1044 /* if a job is not spooled and the process doesn't
1045 exist then kill it. This cleans up after smbd
1047 if (!process_exists_by_pid(pjob
.pid
)) {
1048 DEBUG(10,("traverse_fn_delete: pjob %u deleted due to !process_exists (%u)\n",
1049 (unsigned int)jobid
, (unsigned int)pjob
.pid
));
1050 pjob_delete(ts
->ev
, ts
->msg_ctx
,
1051 ts
->sharename
, jobid
);
1057 /* this check only makes sense for jobs submitted from Windows clients */
1060 for (i
=0;i
<ts
->qcount
;i
++) {
1061 if ( pjob
.status
== LPQ_DELETED
)
1064 if (ts
->queue
[i
].sysjob
== pjob
.sysjob
) {
1066 /* try to clean up any jobs that need to be deleted */
1068 if ( pjob
.status
== LPQ_DELETING
) {
1071 result
= (*(ts
->print_if
->job_delete
))(
1072 ts
->sharename
, ts
->lprm_command
, &pjob
);
1074 if ( result
!= 0 ) {
1075 /* if we can't delete, then reset the job status */
1076 pjob
.status
= LPQ_QUEUED
;
1077 pjob_store(ts
->ev
, ts
->msg_ctx
,
1078 ts
->sharename
, jobid
, &pjob
);
1081 /* if we deleted the job, the remove the tdb record */
1084 ts
->sharename
, jobid
);
1085 pjob
.status
= LPQ_DELETED
;
1095 /* The job isn't in the system queue - we have to assume it has
1096 completed, so delete the database entry. */
1098 if (i
== ts
->qcount
) {
1100 /* A race can occur between the time a job is spooled and
1101 when it appears in the lpq output. This happens when
1102 the job is added to printing.tdb when another smbd
1103 running print_queue_update() has completed a lpq and
1104 is currently traversing the printing tdb and deleting jobs.
1105 Don't delete the job if it was submitted after the lpq_time. */
1107 if (pjob
.starttime
< ts
->lpq_time
) {
1108 DEBUG(10,("traverse_fn_delete: pjob %u deleted due to pjob.starttime (%u) < ts->lpq_time (%u)\n",
1109 (unsigned int)jobid
,
1110 (unsigned int)pjob
.starttime
,
1111 (unsigned int)ts
->lpq_time
));
1112 pjob_delete(ts
->ev
, ts
->msg_ctx
,
1113 ts
->sharename
, jobid
);
1119 /* Save the pjob attributes we will store. */
1120 ts
->queue
[i
].sysjob
= pjob
.sysjob
;
1121 ts
->queue
[i
].size
= pjob
.size
;
1122 ts
->queue
[i
].page_count
= pjob
.page_count
;
1123 ts
->queue
[i
].status
= pjob
.status
;
1124 ts
->queue
[i
].priority
= 1;
1125 ts
->queue
[i
].time
= pjob
.starttime
;
1126 fstrcpy(ts
->queue
[i
].fs_user
, pjob
.user
);
1127 fstrcpy(ts
->queue
[i
].fs_file
, pjob
.jobname
);
1134 /****************************************************************************
1135 Check if the print queue has been updated recently enough.
1136 ****************************************************************************/
1138 static void print_cache_flush(const char *sharename
)
1141 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
1145 slprintf(key
, sizeof(key
)-1, "CACHE/%s", sharename
);
1146 tdb_store_int32(pdb
->tdb
, key
, -1);
1147 release_print_db(pdb
);
1150 /****************************************************************************
1151 Check if someone already thinks they are doing the update.
1152 ****************************************************************************/
1154 static pid_t
get_updating_pid(const char *sharename
)
1159 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
1163 slprintf(keystr
, sizeof(keystr
)-1, "UPDATING/%s", sharename
);
1164 key
= string_tdb_data(keystr
);
1166 data
= tdb_fetch_compat(pdb
->tdb
, key
);
1167 release_print_db(pdb
);
1168 if (!data
.dptr
|| data
.dsize
!= sizeof(pid_t
)) {
1169 SAFE_FREE(data
.dptr
);
1173 updating_pid
= IVAL(data
.dptr
, 0);
1174 SAFE_FREE(data
.dptr
);
1176 if (process_exists_by_pid(updating_pid
))
1177 return updating_pid
;
1182 /****************************************************************************
1183 Set the fact that we're doing the update, or have finished doing the update
1185 ****************************************************************************/
1187 static void set_updating_pid(const fstring sharename
, bool updating
)
1192 pid_t updating_pid
= getpid();
1195 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
1200 slprintf(keystr
, sizeof(keystr
)-1, "UPDATING/%s", sharename
);
1201 key
= string_tdb_data(keystr
);
1203 DEBUG(5, ("set_updating_pid: %supdating lpq cache for print share %s\n",
1204 updating
? "" : "not ",
1208 tdb_delete(pdb
->tdb
, key
);
1209 release_print_db(pdb
);
1213 SIVAL( buffer
, 0, updating_pid
);
1215 data
.dsize
= 4; /* we always assume this is a 4 byte value */
1217 tdb_store(pdb
->tdb
, key
, data
, TDB_REPLACE
);
1218 release_print_db(pdb
);
1221 /****************************************************************************
1222 Sort print jobs by submittal time.
1223 ****************************************************************************/
1225 static int printjob_comp(print_queue_struct
*j1
, print_queue_struct
*j2
)
1236 /* Sort on job start time */
1238 if (j1
->time
== j2
->time
)
1240 return (j1
->time
> j2
->time
) ? 1 : -1;
1243 /****************************************************************************
1244 Store the sorted queue representation for later portmon retrieval.
1246 ****************************************************************************/
1248 static void store_queue_struct(struct tdb_print_db
*pdb
, struct traverse_struct
*pts
)
1251 int max_reported_jobs
= lp_max_reported_print_jobs(pts
->snum
);
1252 print_queue_struct
*queue
= pts
->queue
;
1255 unsigned int qcount
;
1257 if (max_reported_jobs
&& (max_reported_jobs
< pts
->qcount
))
1258 pts
->qcount
= max_reported_jobs
;
1261 /* Work out the size. */
1263 data
.dsize
+= tdb_pack(NULL
, 0, "d", qcount
);
1265 for (i
= 0; i
< pts
->qcount
; i
++) {
1266 if ( queue
[i
].status
== LPQ_DELETED
)
1270 data
.dsize
+= tdb_pack(NULL
, 0, "ddddddff",
1271 (uint32
)queue
[i
].sysjob
,
1272 (uint32
)queue
[i
].size
,
1273 (uint32
)queue
[i
].page_count
,
1274 (uint32
)queue
[i
].status
,
1275 (uint32
)queue
[i
].priority
,
1276 (uint32
)queue
[i
].time
,
1281 if ((data
.dptr
= (uint8
*)SMB_MALLOC(data
.dsize
)) == NULL
)
1285 len
+= tdb_pack(data
.dptr
+ len
, data
.dsize
- len
, "d", qcount
);
1286 for (i
= 0; i
< pts
->qcount
; i
++) {
1287 if ( queue
[i
].status
== LPQ_DELETED
)
1290 len
+= tdb_pack(data
.dptr
+ len
, data
.dsize
- len
, "ddddddff",
1291 (uint32
)queue
[i
].sysjob
,
1292 (uint32
)queue
[i
].size
,
1293 (uint32
)queue
[i
].page_count
,
1294 (uint32
)queue
[i
].status
,
1295 (uint32
)queue
[i
].priority
,
1296 (uint32
)queue
[i
].time
,
1301 tdb_store(pdb
->tdb
, string_tdb_data("INFO/linear_queue_array"), data
,
1303 SAFE_FREE(data
.dptr
);
1307 static TDB_DATA
get_jobs_added_data(struct tdb_print_db
*pdb
)
1313 data
= tdb_fetch_compat(pdb
->tdb
, string_tdb_data("INFO/jobs_added"));
1314 if (data
.dptr
== NULL
|| data
.dsize
== 0 || (data
.dsize
% 4 != 0)) {
1315 SAFE_FREE(data
.dptr
);
1322 static void check_job_added(const char *sharename
, TDB_DATA data
, uint32 jobid
)
1325 unsigned int job_count
= data
.dsize
/ 4;
1327 for (i
= 0; i
< job_count
; i
++) {
1330 ch_jobid
= IVAL(data
.dptr
, i
*4);
1331 if (ch_jobid
== jobid
)
1332 remove_from_jobs_added(sharename
, jobid
);
1336 /****************************************************************************
1337 Check if the print queue has been updated recently enough.
1338 ****************************************************************************/
1340 static bool print_cache_expired(const char *sharename
, bool check_pending
)
1343 time_t last_qscan_time
, time_now
= time(NULL
);
1344 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
1345 bool result
= False
;
1350 snprintf(key
, sizeof(key
), "CACHE/%s", sharename
);
1351 last_qscan_time
= (time_t)tdb_fetch_int32(pdb
->tdb
, key
);
1354 * Invalidate the queue for 3 reasons.
1355 * (1). last queue scan time == -1.
1356 * (2). Current time - last queue scan time > allowed cache time.
1357 * (3). last queue scan time > current time + MAX_CACHE_VALID_TIME (1 hour by default).
1358 * This last test picks up machines for which the clock has been moved
1359 * forward, an lpq scan done and then the clock moved back. Otherwise
1360 * that last lpq scan would stay around for a loooong loooong time... :-). JRA.
1363 if (last_qscan_time
== ((time_t)-1)
1364 || (time_now
- last_qscan_time
) >= lp_lpq_cache_time()
1365 || last_qscan_time
> (time_now
+ MAX_CACHE_VALID_TIME
))
1368 time_t msg_pending_time
;
1370 DEBUG(4, ("print_cache_expired: cache expired for queue %s "
1371 "(last_qscan_time = %d, time now = %d, qcachetime = %d)\n",
1372 sharename
, (int)last_qscan_time
, (int)time_now
,
1373 (int)lp_lpq_cache_time() ));
1375 /* check if another smbd has already sent a message to update the
1376 queue. Give the pending message one minute to clear and
1377 then send another message anyways. Make sure to check for
1378 clocks that have been run forward and then back again. */
1380 snprintf(key
, sizeof(key
), "MSG_PENDING/%s", sharename
);
1383 && tdb_fetch_uint32( pdb
->tdb
, key
, &u
)
1384 && (msg_pending_time
=u
) > 0
1385 && msg_pending_time
<= time_now
1386 && (time_now
- msg_pending_time
) < 60 )
1388 DEBUG(4,("print_cache_expired: message already pending for %s. Accepting cache\n",
1397 release_print_db(pdb
);
1401 /****************************************************************************
1402 main work for updating the lpq cache for a printer queue
1403 ****************************************************************************/
1405 static void print_queue_update_internal(struct tevent_context
*ev
,
1406 struct messaging_context
*msg_ctx
,
1407 const char *sharename
,
1408 struct printif
*current_printif
,
1409 char *lpq_command
, char *lprm_command
)
1412 print_queue_struct
*queue
= NULL
;
1413 print_status_struct status
;
1414 print_status_struct old_status
;
1415 struct printjob
*pjob
;
1416 struct traverse_struct tstruct
;
1419 fstring keystr
, cachestr
;
1420 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
1421 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
1423 if ((pdb
== NULL
) || (tmp_ctx
== NULL
)) {
1427 DEBUG(5,("print_queue_update_internal: printer = %s, type = %d, lpq command = [%s]\n",
1428 sharename
, current_printif
->type
, lpq_command
));
1431 * Update the cache time FIRST ! Stops others even
1432 * attempting to get the lock and doing this
1433 * if the lpq takes a long time.
1436 slprintf(cachestr
, sizeof(cachestr
)-1, "CACHE/%s", sharename
);
1437 tdb_store_int32(pdb
->tdb
, cachestr
, (int)time(NULL
));
1439 /* get the current queue using the appropriate interface */
1440 ZERO_STRUCT(status
);
1442 qcount
= (*(current_printif
->queue_get
))(sharename
,
1443 current_printif
->type
,
1444 lpq_command
, &queue
, &status
);
1446 DEBUG(3, ("print_queue_update_internal: %d job%s in queue for %s\n",
1447 qcount
, (qcount
!= 1) ? "s" : "", sharename
));
1449 /* Sort the queue by submission time otherwise they are displayed
1452 TYPESAFE_QSORT(queue
, qcount
, printjob_comp
);
1455 any job in the internal database that is marked as spooled
1456 and doesn't exist in the system queue is considered finished
1457 and removed from the database
1459 any job in the system database but not in the internal database
1460 is added as a unix job
1462 fill in any system job numbers as we go
1464 jcdata
= get_jobs_added_data(pdb
);
1466 for (i
=0; i
<qcount
; i
++) {
1467 uint32 jobid
= sysjob_to_jobid_pdb(pdb
, queue
[i
].sysjob
);
1468 if (jobid
== (uint32
)-1) {
1469 /* assume its a unix print job */
1470 print_unix_job(ev
, msg_ctx
,
1471 sharename
, &queue
[i
], jobid
);
1475 /* we have an active SMB print job - update its status */
1476 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
1478 /* err, somethings wrong. Probably smbd was restarted
1479 with jobs in the queue. All we can do is treat them
1480 like unix jobs. Pity. */
1481 DEBUG(1, ("queued print job %d not found in jobs list, "
1482 "assuming unix job\n", jobid
));
1483 print_unix_job(ev
, msg_ctx
,
1484 sharename
, &queue
[i
], jobid
);
1488 /* don't reset the status on jobs to be deleted */
1490 if ( pjob
->status
!= LPQ_DELETING
)
1491 pjob
->status
= queue
[i
].status
;
1493 pjob_store(ev
, msg_ctx
, sharename
, jobid
, pjob
);
1495 check_job_added(sharename
, jcdata
, jobid
);
1498 SAFE_FREE(jcdata
.dptr
);
1500 /* now delete any queued entries that don't appear in the
1502 tstruct
.queue
= queue
;
1503 tstruct
.qcount
= qcount
;
1505 tstruct
.total_jobs
= 0;
1506 tstruct
.lpq_time
= time(NULL
);
1507 tstruct
.sharename
= sharename
;
1508 tstruct
.lprm_command
= lprm_command
;
1509 tstruct
.print_if
= current_printif
;
1511 tstruct
.msg_ctx
= msg_ctx
;
1512 tstruct
.mem_ctx
= tmp_ctx
;
1514 tdb_traverse(pdb
->tdb
, traverse_fn_delete
, (void *)&tstruct
);
1516 /* Store the linearised queue, max jobs only. */
1517 store_queue_struct(pdb
, &tstruct
);
1519 SAFE_FREE(tstruct
.queue
);
1520 talloc_free(tmp_ctx
);
1522 DEBUG(10,("print_queue_update_internal: printer %s INFO/total_jobs = %d\n",
1523 sharename
, tstruct
.total_jobs
));
1525 tdb_store_int32(pdb
->tdb
, "INFO/total_jobs", tstruct
.total_jobs
);
1527 get_queue_status(sharename
, &old_status
);
1528 if (old_status
.qcount
!= qcount
)
1529 DEBUG(10,("print_queue_update_internal: queue status change %d jobs -> %d jobs for printer %s\n",
1530 old_status
.qcount
, qcount
, sharename
));
1532 /* store the new queue status structure */
1533 slprintf(keystr
, sizeof(keystr
)-1, "STATUS/%s", sharename
);
1534 key
= string_tdb_data(keystr
);
1536 status
.qcount
= qcount
;
1537 data
.dptr
= (uint8
*)&status
;
1538 data
.dsize
= sizeof(status
);
1539 tdb_store(pdb
->tdb
, key
, data
, TDB_REPLACE
);
1542 * Update the cache time again. We want to do this call
1543 * as little as possible...
1546 slprintf(keystr
, sizeof(keystr
)-1, "CACHE/%s", sharename
);
1547 tdb_store_int32(pdb
->tdb
, keystr
, (int32
)time(NULL
));
1549 /* clear the msg pending record for this queue */
1551 snprintf(keystr
, sizeof(keystr
), "MSG_PENDING/%s", sharename
);
1553 if ( !tdb_store_uint32( pdb
->tdb
, keystr
, 0 ) ) {
1554 /* log a message but continue on */
1556 DEBUG(0,("print_queue_update: failed to store MSG_PENDING flag for [%s]!\n",
1560 release_print_db( pdb
);
1565 /****************************************************************************
1566 Update the internal database from the system print queue for a queue.
1567 obtain a lock on the print queue before proceeding (needed when mutiple
1568 smbd processes maytry to update the lpq cache concurrently).
1569 ****************************************************************************/
1571 static void print_queue_update_with_lock( struct tevent_context
*ev
,
1572 struct messaging_context
*msg_ctx
,
1573 const char *sharename
,
1574 struct printif
*current_printif
,
1575 char *lpq_command
, char *lprm_command
)
1578 struct tdb_print_db
*pdb
;
1580 DEBUG(5,("print_queue_update_with_lock: printer share = %s\n", sharename
));
1581 pdb
= get_print_db_byname(sharename
);
1585 if ( !print_cache_expired(sharename
, False
) ) {
1586 DEBUG(5,("print_queue_update_with_lock: print cache for %s is still ok\n", sharename
));
1587 release_print_db(pdb
);
1592 * Check to see if someone else is doing this update.
1593 * This is essentially a mutex on the update.
1596 if (get_updating_pid(sharename
) != -1) {
1597 release_print_db(pdb
);
1601 /* Lock the queue for the database update */
1603 slprintf(keystr
, sizeof(keystr
) - 1, "LOCK/%s", sharename
);
1604 /* Only wait 10 seconds for this. */
1605 if (tdb_lock_bystring_with_timeout(pdb
->tdb
, keystr
, 10) != 0) {
1606 DEBUG(0,("print_queue_update_with_lock: Failed to lock printer %s database\n", sharename
));
1607 release_print_db(pdb
);
1612 * Ensure that no one else got in here.
1613 * If the updating pid is still -1 then we are
1617 if (get_updating_pid(sharename
) != -1) {
1619 * Someone else is doing the update, exit.
1621 tdb_unlock_bystring(pdb
->tdb
, keystr
);
1622 release_print_db(pdb
);
1627 * We're going to do the update ourselves.
1630 /* Tell others we're doing the update. */
1631 set_updating_pid(sharename
, True
);
1634 * Allow others to enter and notice we're doing
1638 tdb_unlock_bystring(pdb
->tdb
, keystr
);
1640 /* do the main work now */
1642 print_queue_update_internal(ev
, msg_ctx
,
1643 sharename
, current_printif
,
1644 lpq_command
, lprm_command
);
1646 /* Delete our pid from the db. */
1647 set_updating_pid(sharename
, False
);
1648 release_print_db(pdb
);
1651 /****************************************************************************
1652 this is the receive function of the background lpq updater
1653 ****************************************************************************/
1654 void print_queue_receive(struct messaging_context
*msg
,
1657 struct server_id server_id
,
1661 char *lpqcommand
= NULL
, *lprmcommand
= NULL
;
1665 len
= tdb_unpack( (uint8
*)data
->data
, data
->length
, "fdPP",
1672 SAFE_FREE(lpqcommand
);
1673 SAFE_FREE(lprmcommand
);
1674 DEBUG(0,("print_queue_receive: Got invalid print queue update message\n"));
1678 print_queue_update_with_lock(server_event_context(), msg
, sharename
,
1679 get_printer_fns_from_type((enum printing_types
)printing_type
),
1680 lpqcommand
, lprmcommand
);
1682 SAFE_FREE(lpqcommand
);
1683 SAFE_FREE(lprmcommand
);
1687 /****************************************************************************
1688 update the internal database from the system print queue for a queue
1689 ****************************************************************************/
1691 extern pid_t background_lpq_updater_pid
;
1693 static void print_queue_update(struct messaging_context
*msg_ctx
,
1694 int snum
, bool force
)
1698 char *lpqcommand
= NULL
;
1699 char *lprmcommand
= NULL
;
1700 uint8
*buffer
= NULL
;
1703 struct tdb_print_db
*pdb
;
1705 struct printif
*current_printif
;
1706 TALLOC_CTX
*ctx
= talloc_tos();
1708 fstrcpy( sharename
, lp_const_servicename(snum
));
1710 /* don't strip out characters like '$' from the printername */
1712 lpqcommand
= talloc_string_sub2(ctx
,
1713 lp_lpq_command(talloc_tos(), snum
),
1715 lp_printername(talloc_tos(), snum
),
1716 false, false, false);
1720 lpqcommand
= talloc_sub_advanced(ctx
,
1721 lp_servicename(talloc_tos(), snum
),
1722 current_user_info
.unix_name
,
1724 current_user
.ut
.gid
,
1725 get_current_username(),
1726 current_user_info
.domain
,
1732 lprmcommand
= talloc_string_sub2(ctx
,
1733 lp_lprm_command(talloc_tos(), snum
),
1735 lp_printername(talloc_tos(), snum
),
1736 false, false, false);
1740 lprmcommand
= talloc_sub_advanced(ctx
,
1741 lp_servicename(talloc_tos(), snum
),
1742 current_user_info
.unix_name
,
1744 current_user
.ut
.gid
,
1745 get_current_username(),
1746 current_user_info
.domain
,
1753 * Make sure that the background queue process exists.
1754 * Otherwise just do the update ourselves
1757 if ( force
|| background_lpq_updater_pid
== -1 ) {
1758 DEBUG(4,("print_queue_update: updating queue [%s] myself\n", sharename
));
1759 current_printif
= get_printer_fns( snum
);
1760 print_queue_update_with_lock(server_event_context(), msg_ctx
,
1761 sharename
, current_printif
,
1762 lpqcommand
, lprmcommand
);
1767 type
= lp_printing(snum
);
1769 /* get the length */
1771 len
= tdb_pack( NULL
, 0, "fdPP",
1777 buffer
= SMB_XMALLOC_ARRAY( uint8
, len
);
1779 /* now pack the buffer */
1780 newlen
= tdb_pack( buffer
, len
, "fdPP",
1786 SMB_ASSERT( newlen
== len
);
1788 DEBUG(10,("print_queue_update: Sending message -> printer = %s, "
1789 "type = %d, lpq command = [%s] lprm command = [%s]\n",
1790 sharename
, type
, lpqcommand
, lprmcommand
));
1792 /* here we set a msg pending record for other smbd processes
1793 to throttle the number of duplicate print_queue_update msgs
1796 pdb
= get_print_db_byname(sharename
);
1802 snprintf(key
, sizeof(key
), "MSG_PENDING/%s", sharename
);
1804 if ( !tdb_store_uint32( pdb
->tdb
, key
, time(NULL
) ) ) {
1805 /* log a message but continue on */
1807 DEBUG(0,("print_queue_update: failed to store MSG_PENDING flag for [%s]!\n",
1811 release_print_db( pdb
);
1813 /* finally send the message */
1815 messaging_send_buf(msg_ctx
, pid_to_procid(background_lpq_updater_pid
),
1816 MSG_PRINTER_UPDATE
, (uint8
*)buffer
, len
);
1818 SAFE_FREE( buffer
);
1823 /****************************************************************************
1824 Create/Update an entry in the print tdb that will allow us to send notify
1825 updates only to interested smbd's.
1826 ****************************************************************************/
1828 bool print_notify_register_pid(int snum
)
1831 struct tdb_print_db
*pdb
= NULL
;
1832 TDB_CONTEXT
*tdb
= NULL
;
1833 const char *printername
;
1834 uint32_t mypid
= (uint32_t)getpid();
1838 /* if (snum == -1), then the change notify request was
1839 on a print server handle and we need to register on
1844 int num_services
= lp_numservices();
1847 for ( idx
=0; idx
<num_services
; idx
++ ) {
1848 if (lp_snum_ok(idx
) && lp_printable(idx
) )
1849 print_notify_register_pid(idx
);
1854 else /* register for a specific printer */
1856 printername
= lp_const_servicename(snum
);
1857 pdb
= get_print_db_byname(printername
);
1863 if (tdb_lock_bystring_with_timeout(tdb
, NOTIFY_PID_LIST_KEY
, 10) != 0) {
1864 DEBUG(0,("print_notify_register_pid: Failed to lock printer %s\n",
1867 release_print_db(pdb
);
1871 data
= get_printer_notify_pid_list( tdb
, printername
, True
);
1873 /* Add ourselves and increase the refcount. */
1875 for (i
= 0; i
< data
.dsize
; i
+= 8) {
1876 if (IVAL(data
.dptr
,i
) == mypid
) {
1877 uint32 new_refcount
= IVAL(data
.dptr
, i
+4) + 1;
1878 SIVAL(data
.dptr
, i
+4, new_refcount
);
1883 if (i
== data
.dsize
) {
1884 /* We weren't in the list. Realloc. */
1885 data
.dptr
= (uint8
*)SMB_REALLOC(data
.dptr
, data
.dsize
+ 8);
1887 DEBUG(0,("print_notify_register_pid: Relloc fail for printer %s\n",
1892 SIVAL(data
.dptr
,data
.dsize
- 8,mypid
);
1893 SIVAL(data
.dptr
,data
.dsize
- 4,1); /* Refcount. */
1896 /* Store back the record. */
1897 if (tdb_store_bystring(tdb
, NOTIFY_PID_LIST_KEY
, data
, TDB_REPLACE
) != 0) {
1898 DEBUG(0,("print_notify_register_pid: Failed to update pid \
1899 list for printer %s\n", printername
));
1907 tdb_unlock_bystring(tdb
, NOTIFY_PID_LIST_KEY
);
1909 release_print_db(pdb
);
1910 SAFE_FREE(data
.dptr
);
1914 /****************************************************************************
1915 Update an entry in the print tdb that will allow us to send notify
1916 updates only to interested smbd's.
1917 ****************************************************************************/
1919 bool print_notify_deregister_pid(int snum
)
1922 struct tdb_print_db
*pdb
= NULL
;
1923 TDB_CONTEXT
*tdb
= NULL
;
1924 const char *printername
;
1925 uint32_t mypid
= (uint32_t)getpid();
1929 /* if ( snum == -1 ), we are deregister a print server handle
1930 which means to deregister on all print queues */
1934 int num_services
= lp_numservices();
1937 for ( idx
=0; idx
<num_services
; idx
++ ) {
1938 if ( lp_snum_ok(idx
) && lp_printable(idx
) )
1939 print_notify_deregister_pid(idx
);
1944 else /* deregister a specific printer */
1946 printername
= lp_const_servicename(snum
);
1947 pdb
= get_print_db_byname(printername
);
1953 if (tdb_lock_bystring_with_timeout(tdb
, NOTIFY_PID_LIST_KEY
, 10) != 0) {
1954 DEBUG(0,("print_notify_register_pid: Failed to lock \
1955 printer %s database\n", printername
));
1957 release_print_db(pdb
);
1961 data
= get_printer_notify_pid_list( tdb
, printername
, True
);
1963 /* Reduce refcount. Remove ourselves if zero. */
1965 for (i
= 0; i
< data
.dsize
; ) {
1966 if (IVAL(data
.dptr
,i
) == mypid
) {
1967 uint32 refcount
= IVAL(data
.dptr
, i
+4);
1971 if (refcount
== 0) {
1972 if (data
.dsize
- i
> 8)
1973 memmove( &data
.dptr
[i
], &data
.dptr
[i
+8], data
.dsize
- i
- 8);
1977 SIVAL(data
.dptr
, i
+4, refcount
);
1983 if (data
.dsize
== 0)
1984 SAFE_FREE(data
.dptr
);
1986 /* Store back the record. */
1987 if (tdb_store_bystring(tdb
, NOTIFY_PID_LIST_KEY
, data
, TDB_REPLACE
) != 0) {
1988 DEBUG(0,("print_notify_register_pid: Failed to update pid \
1989 list for printer %s\n", printername
));
1997 tdb_unlock_bystring(tdb
, NOTIFY_PID_LIST_KEY
);
1999 release_print_db(pdb
);
2000 SAFE_FREE(data
.dptr
);
2004 /****************************************************************************
2005 Check if a jobid is valid. It is valid if it exists in the database.
2006 ****************************************************************************/
2008 bool print_job_exists(const char* sharename
, uint32 jobid
)
2010 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
2016 ret
= tdb_exists(pdb
->tdb
, print_key(jobid
, &tmp
));
2017 release_print_db(pdb
);
2021 /****************************************************************************
2022 Return the device mode asigned to a specific print job.
2023 Only valid for the process doing the spooling and when the job
2024 has not been spooled.
2025 ****************************************************************************/
2027 struct spoolss_DeviceMode
*print_job_devmode(TALLOC_CTX
*mem_ctx
,
2028 const char *sharename
,
2031 struct printjob
*pjob
= print_job_find(mem_ctx
, sharename
, jobid
);
2036 return pjob
->devmode
;
2039 /****************************************************************************
2040 Set the name of a job. Only possible for owner.
2041 ****************************************************************************/
2043 bool print_job_set_name(struct tevent_context
*ev
,
2044 struct messaging_context
*msg_ctx
,
2045 const char *sharename
, uint32 jobid
, const char *name
)
2047 struct printjob
*pjob
;
2049 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
2050 if (tmp_ctx
== NULL
) {
2054 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2055 if (!pjob
|| pjob
->pid
!= getpid()) {
2060 fstrcpy(pjob
->jobname
, name
);
2061 ret
= pjob_store(ev
, msg_ctx
, sharename
, jobid
, pjob
);
2063 talloc_free(tmp_ctx
);
2067 /****************************************************************************
2068 Get the name of a job. Only possible for owner.
2069 ****************************************************************************/
2071 bool print_job_get_name(TALLOC_CTX
*mem_ctx
, const char *sharename
, uint32_t jobid
, char **name
)
2073 struct printjob
*pjob
;
2075 pjob
= print_job_find(mem_ctx
, sharename
, jobid
);
2076 if (!pjob
|| pjob
->pid
!= getpid()) {
2080 *name
= pjob
->jobname
;
2085 /***************************************************************************
2086 Remove a jobid from the 'jobs added' list.
2087 ***************************************************************************/
2089 static bool remove_from_jobs_added(const char* sharename
, uint32 jobid
)
2091 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
2093 size_t job_count
, i
;
2095 bool gotlock
= False
;
2103 key
= string_tdb_data("INFO/jobs_added");
2105 if (tdb_chainlock_with_timeout(pdb
->tdb
, key
, 5) != 0)
2110 data
= tdb_fetch_compat(pdb
->tdb
, key
);
2112 if (data
.dptr
== NULL
|| data
.dsize
== 0 || (data
.dsize
% 4 != 0))
2115 job_count
= data
.dsize
/ 4;
2116 for (i
= 0; i
< job_count
; i
++) {
2119 ch_jobid
= IVAL(data
.dptr
, i
*4);
2120 if (ch_jobid
== jobid
) {
2121 if (i
< job_count
-1 )
2122 memmove(data
.dptr
+ (i
*4), data
.dptr
+ (i
*4) + 4, (job_count
- i
- 1)*4 );
2124 if (tdb_store(pdb
->tdb
, key
, data
, TDB_REPLACE
) != 0)
2134 tdb_chainunlock(pdb
->tdb
, key
);
2135 SAFE_FREE(data
.dptr
);
2136 release_print_db(pdb
);
2138 DEBUG(10,("remove_from_jobs_added: removed jobid %u\n", (unsigned int)jobid
));
2140 DEBUG(10,("remove_from_jobs_added: Failed to remove jobid %u\n", (unsigned int)jobid
));
2144 /****************************************************************************
2145 Delete a print job - don't update queue.
2146 ****************************************************************************/
2148 static bool print_job_delete1(struct tevent_context
*ev
,
2149 struct messaging_context
*msg_ctx
,
2150 int snum
, uint32 jobid
)
2152 const char* sharename
= lp_const_servicename(snum
);
2153 struct printjob
*pjob
;
2155 struct printif
*current_printif
= get_printer_fns( snum
);
2157 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
2158 if (tmp_ctx
== NULL
) {
2162 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2169 * If already deleting just return.
2172 if (pjob
->status
== LPQ_DELETING
) {
2177 /* Hrm - we need to be able to cope with deleting a job before it
2178 has reached the spooler. Just mark it as LPQ_DELETING and
2179 let the print_queue_update() code rmeove the record */
2182 if (pjob
->sysjob
== -1) {
2183 DEBUG(5, ("attempt to delete job %u not seen by lpr\n", (unsigned int)jobid
));
2186 /* Set the tdb entry to be deleting. */
2188 pjob
->status
= LPQ_DELETING
;
2189 pjob_store(ev
, msg_ctx
, sharename
, jobid
, pjob
);
2191 if (pjob
->spooled
&& pjob
->sysjob
!= -1)
2193 result
= (*(current_printif
->job_delete
))(
2194 lp_printername(talloc_tos(), snum
),
2195 lp_lprm_command(talloc_tos(), snum
),
2198 /* Delete the tdb entry if the delete succeeded or the job hasn't
2202 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
2209 pjob_delete(ev
, msg_ctx
, sharename
, jobid
);
2210 /* Ensure we keep a rough count of the number of total jobs... */
2211 tdb_change_int32_atomic(pdb
->tdb
, "INFO/total_jobs", &njobs
, -1);
2212 release_print_db(pdb
);
2216 remove_from_jobs_added( sharename
, jobid
);
2218 ret
= (result
== 0);
2220 talloc_free(tmp_ctx
);
2224 /****************************************************************************
2225 Return true if the current user owns the print job.
2226 ****************************************************************************/
2228 static bool is_owner(const struct auth_session_info
*server_info
,
2229 const char *servicename
,
2232 struct printjob
*pjob
;
2234 TALLOC_CTX
*tmp_ctx
= talloc_new(server_info
);
2235 if (tmp_ctx
== NULL
) {
2239 pjob
= print_job_find(tmp_ctx
, servicename
, jobid
);
2240 if (!pjob
|| !server_info
) {
2245 ret
= strequal(pjob
->user
, server_info
->unix_info
->sanitized_username
);
2247 talloc_free(tmp_ctx
);
2251 /****************************************************************************
2253 ****************************************************************************/
2255 WERROR
print_job_delete(const struct auth_session_info
*server_info
,
2256 struct messaging_context
*msg_ctx
,
2257 int snum
, uint32_t jobid
)
2259 const char* sharename
= lp_const_servicename(snum
);
2260 struct printjob
*pjob
;
2263 TALLOC_CTX
*tmp_ctx
= talloc_new(msg_ctx
);
2264 if (tmp_ctx
== NULL
) {
2265 return WERR_NOT_ENOUGH_MEMORY
;
2268 owner
= is_owner(server_info
, lp_const_servicename(snum
), jobid
);
2270 /* Check access against security descriptor or whether the user
2274 !W_ERROR_IS_OK(print_access_check(server_info
, msg_ctx
, snum
,
2275 JOB_ACCESS_ADMINISTER
))) {
2276 DEBUG(0, ("print job delete denied."
2277 "User name: %s, Printer name: %s.",
2278 uidtoname(server_info
->unix_token
->uid
),
2279 lp_printername(tmp_ctx
, snum
)));
2281 werr
= WERR_ACCESS_DENIED
;
2286 * get the spooled filename of the print job
2287 * if this works, then the file has not been spooled
2288 * to the underlying print system. Just delete the
2289 * spool file & return.
2292 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2293 if (!pjob
|| pjob
->spooled
|| pjob
->pid
!= getpid()) {
2294 DEBUG(10, ("Skipping spool file removal for job %u\n", jobid
));
2296 DEBUG(10, ("Removing spool file [%s]\n", pjob
->filename
));
2297 if (unlink(pjob
->filename
) == -1) {
2298 werr
= map_werror_from_unix(errno
);
2303 if (!print_job_delete1(server_event_context(), msg_ctx
, snum
, jobid
)) {
2304 werr
= WERR_ACCESS_DENIED
;
2308 /* force update the database and say the delete failed if the
2311 print_queue_update(msg_ctx
, snum
, True
);
2313 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2314 if (pjob
&& (pjob
->status
!= LPQ_DELETING
)) {
2315 werr
= WERR_ACCESS_DENIED
;
2318 werr
= WERR_PRINTER_HAS_JOBS_QUEUED
;
2321 talloc_free(tmp_ctx
);
2325 /****************************************************************************
2327 ****************************************************************************/
2329 WERROR
print_job_pause(const struct auth_session_info
*server_info
,
2330 struct messaging_context
*msg_ctx
,
2331 int snum
, uint32 jobid
)
2333 const char* sharename
= lp_const_servicename(snum
);
2334 struct printjob
*pjob
;
2336 struct printif
*current_printif
= get_printer_fns( snum
);
2338 TALLOC_CTX
*tmp_ctx
= talloc_new(msg_ctx
);
2339 if (tmp_ctx
== NULL
) {
2340 return WERR_NOT_ENOUGH_MEMORY
;
2343 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2344 if (!pjob
|| !server_info
) {
2345 DEBUG(10, ("print_job_pause: no pjob or user for jobid %u\n",
2346 (unsigned int)jobid
));
2347 werr
= WERR_INVALID_PARAM
;
2351 if (!pjob
->spooled
|| pjob
->sysjob
== -1) {
2352 DEBUG(10, ("print_job_pause: not spooled or bad sysjob = %d for jobid %u\n",
2353 (int)pjob
->sysjob
, (unsigned int)jobid
));
2354 werr
= WERR_INVALID_PARAM
;
2358 if (!is_owner(server_info
, lp_const_servicename(snum
), jobid
) &&
2359 !W_ERROR_IS_OK(print_access_check(server_info
, msg_ctx
, snum
,
2360 JOB_ACCESS_ADMINISTER
))) {
2361 DEBUG(0, ("print job pause denied."
2362 "User name: %s, Printer name: %s.",
2363 uidtoname(server_info
->unix_token
->uid
),
2364 lp_printername(tmp_ctx
, snum
)));
2366 werr
= WERR_ACCESS_DENIED
;
2370 /* need to pause the spooled entry */
2371 ret
= (*(current_printif
->job_pause
))(snum
, pjob
);
2374 werr
= WERR_INVALID_PARAM
;
2378 /* force update the database */
2379 print_cache_flush(lp_const_servicename(snum
));
2381 /* Send a printer notify message */
2383 notify_job_status(server_event_context(), msg_ctx
, sharename
, jobid
,
2386 /* how do we tell if this succeeded? */
2389 talloc_free(tmp_ctx
);
2393 /****************************************************************************
2395 ****************************************************************************/
2397 WERROR
print_job_resume(const struct auth_session_info
*server_info
,
2398 struct messaging_context
*msg_ctx
,
2399 int snum
, uint32 jobid
)
2401 const char *sharename
= lp_const_servicename(snum
);
2402 struct printjob
*pjob
;
2404 struct printif
*current_printif
= get_printer_fns( snum
);
2406 TALLOC_CTX
*tmp_ctx
= talloc_new(msg_ctx
);
2407 if (tmp_ctx
== NULL
)
2408 return WERR_NOT_ENOUGH_MEMORY
;
2410 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2411 if (!pjob
|| !server_info
) {
2412 DEBUG(10, ("print_job_resume: no pjob or user for jobid %u\n",
2413 (unsigned int)jobid
));
2414 werr
= WERR_INVALID_PARAM
;
2418 if (!pjob
->spooled
|| pjob
->sysjob
== -1) {
2419 DEBUG(10, ("print_job_resume: not spooled or bad sysjob = %d for jobid %u\n",
2420 (int)pjob
->sysjob
, (unsigned int)jobid
));
2421 werr
= WERR_INVALID_PARAM
;
2425 if (!is_owner(server_info
, lp_const_servicename(snum
), jobid
) &&
2426 !W_ERROR_IS_OK(print_access_check(server_info
, msg_ctx
, snum
,
2427 JOB_ACCESS_ADMINISTER
))) {
2428 DEBUG(0, ("print job resume denied."
2429 "User name: %s, Printer name: %s.",
2430 uidtoname(server_info
->unix_token
->uid
),
2431 lp_printername(tmp_ctx
, snum
)));
2433 werr
= WERR_ACCESS_DENIED
;
2437 ret
= (*(current_printif
->job_resume
))(snum
, pjob
);
2440 werr
= WERR_INVALID_PARAM
;
2444 /* force update the database */
2445 print_cache_flush(lp_const_servicename(snum
));
2447 /* Send a printer notify message */
2449 notify_job_status(server_event_context(), msg_ctx
, sharename
, jobid
,
2454 talloc_free(tmp_ctx
);
2458 /****************************************************************************
2459 Write to a print file.
2460 ****************************************************************************/
2462 ssize_t
print_job_write(struct tevent_context
*ev
,
2463 struct messaging_context
*msg_ctx
,
2464 int snum
, uint32 jobid
, const char *buf
, size_t size
)
2466 const char* sharename
= lp_const_servicename(snum
);
2467 ssize_t return_code
;
2468 struct printjob
*pjob
;
2469 TALLOC_CTX
*tmp_ctx
= talloc_new(ev
);
2470 if (tmp_ctx
== NULL
) {
2474 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2480 /* don't allow another process to get this info - it is meaningless */
2481 if (pjob
->pid
!= getpid()) {
2486 /* if SMBD is spooling this can't be allowed */
2487 if (pjob
->status
== PJOB_SMBD_SPOOLING
) {
2492 return_code
= write_data(pjob
->fd
, buf
, size
);
2493 if (return_code
> 0) {
2495 pjob_store(ev
, msg_ctx
, sharename
, jobid
, pjob
);
2498 talloc_free(tmp_ctx
);
2502 /****************************************************************************
2503 Get the queue status - do not update if db is out of date.
2504 ****************************************************************************/
2506 static int get_queue_status(const char* sharename
, print_status_struct
*status
)
2510 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
2514 ZERO_STRUCTP(status
);
2521 fstr_sprintf(keystr
, "STATUS/%s", sharename
);
2522 data
= tdb_fetch_compat(pdb
->tdb
, string_tdb_data(keystr
));
2524 if (data
.dsize
== sizeof(print_status_struct
))
2525 /* this memcpy is ok since the status struct was
2526 not packed before storing it in the tdb */
2527 memcpy(status
, data
.dptr
, sizeof(print_status_struct
));
2528 SAFE_FREE(data
.dptr
);
2531 len
= tdb_fetch_int32(pdb
->tdb
, "INFO/total_jobs");
2532 release_print_db(pdb
);
2533 return (len
== -1 ? 0 : len
);
2536 /****************************************************************************
2537 Determine the number of jobs in a queue.
2538 ****************************************************************************/
2540 int print_queue_length(struct messaging_context
*msg_ctx
, int snum
,
2541 print_status_struct
*pstatus
)
2543 const char* sharename
= lp_const_servicename( snum
);
2544 print_status_struct status
;
2547 ZERO_STRUCT( status
);
2549 /* make sure the database is up to date */
2550 if (print_cache_expired(lp_const_servicename(snum
), True
))
2551 print_queue_update(msg_ctx
, snum
, False
);
2553 /* also fetch the queue status */
2554 memset(&status
, 0, sizeof(status
));
2555 len
= get_queue_status(sharename
, &status
);
2563 /***************************************************************************
2564 Allocate a jobid. Hold the lock for as short a time as possible.
2565 ***************************************************************************/
2567 static WERROR
allocate_print_jobid(struct tdb_print_db
*pdb
, int snum
,
2568 const char *sharename
, uint32
*pjobid
)
2572 enum TDB_ERROR terr
;
2575 *pjobid
= (uint32
)-1;
2577 for (i
= 0; i
< 3; i
++) {
2578 /* Lock the database - only wait 20 seconds. */
2579 ret
= tdb_lock_bystring_with_timeout(pdb
->tdb
,
2580 "INFO/nextjob", 20);
2582 DEBUG(0, ("allocate_print_jobid: "
2583 "Failed to lock printing database %s\n",
2585 terr
= tdb_error(pdb
->tdb
);
2586 return ntstatus_to_werror(map_nt_error_from_tdb(terr
));
2589 if (!tdb_fetch_uint32(pdb
->tdb
, "INFO/nextjob", &jobid
)) {
2590 terr
= tdb_error(pdb
->tdb
);
2591 if (terr
!= TDB_ERR_NOEXIST
) {
2592 DEBUG(0, ("allocate_print_jobid: "
2593 "Failed to fetch INFO/nextjob "
2594 "for print queue %s\n", sharename
));
2595 tdb_unlock_bystring(pdb
->tdb
, "INFO/nextjob");
2596 return ntstatus_to_werror(map_nt_error_from_tdb(terr
));
2598 DEBUG(10, ("allocate_print_jobid: "
2599 "No existing jobid in %s\n", sharename
));
2603 DEBUG(10, ("allocate_print_jobid: "
2604 "Read jobid %u from %s\n", jobid
, sharename
));
2606 jobid
= NEXT_JOBID(jobid
);
2608 ret
= tdb_store_int32(pdb
->tdb
, "INFO/nextjob", jobid
);
2610 terr
= tdb_error(pdb
->tdb
);
2611 DEBUG(3, ("allocate_print_jobid: "
2612 "Failed to store INFO/nextjob.\n"));
2613 tdb_unlock_bystring(pdb
->tdb
, "INFO/nextjob");
2614 return ntstatus_to_werror(map_nt_error_from_tdb(terr
));
2617 /* We've finished with the INFO/nextjob lock. */
2618 tdb_unlock_bystring(pdb
->tdb
, "INFO/nextjob");
2620 if (!print_job_exists(sharename
, jobid
)) {
2623 DEBUG(10, ("allocate_print_jobid: "
2624 "Found jobid %u in %s\n", jobid
, sharename
));
2628 DEBUG(0, ("allocate_print_jobid: "
2629 "Failed to allocate a print job for queue %s\n",
2631 /* Probably full... */
2632 return WERR_NO_SPOOL_SPACE
;
2635 /* Store a dummy placeholder. */
2641 if (tdb_store(pdb
->tdb
, print_key(jobid
, &tmp
), dum
,
2643 DEBUG(3, ("allocate_print_jobid: "
2644 "jobid (%d) failed to store placeholder.\n",
2646 terr
= tdb_error(pdb
->tdb
);
2647 return ntstatus_to_werror(map_nt_error_from_tdb(terr
));
2655 /***************************************************************************
2656 Append a jobid to the 'jobs added' list.
2657 ***************************************************************************/
2659 static bool add_to_jobs_added(struct tdb_print_db
*pdb
, uint32 jobid
)
2664 SIVAL(&store_jobid
, 0, jobid
);
2665 data
.dptr
= (uint8
*)&store_jobid
;
2668 DEBUG(10,("add_to_jobs_added: Added jobid %u\n", (unsigned int)jobid
));
2670 return (tdb_append(pdb
->tdb
, string_tdb_data("INFO/jobs_added"),
2675 /***************************************************************************
2676 Do all checks needed to determine if we can start a job.
2677 ***************************************************************************/
2679 static WERROR
print_job_checks(const struct auth_session_info
*server_info
,
2680 struct messaging_context
*msg_ctx
,
2681 int snum
, int *njobs
)
2683 const char *sharename
= lp_const_servicename(snum
);
2684 uint64_t dspace
, dsize
;
2688 if (!W_ERROR_IS_OK(print_access_check(server_info
, msg_ctx
, snum
,
2689 PRINTER_ACCESS_USE
))) {
2690 DEBUG(3, ("print_job_checks: "
2691 "job start denied by security descriptor\n"));
2692 return WERR_ACCESS_DENIED
;
2695 if (!print_time_access_check(server_info
, msg_ctx
, sharename
)) {
2696 DEBUG(3, ("print_job_checks: "
2697 "job start denied by time check\n"));
2698 return WERR_ACCESS_DENIED
;
2701 /* see if we have sufficient disk space */
2702 if (lp_min_print_space(snum
)) {
2703 minspace
= lp_min_print_space(snum
);
2704 ret
= sys_fsusage(lp_path(talloc_tos(), snum
), &dspace
, &dsize
);
2705 if (ret
== 0 && dspace
< 2*minspace
) {
2706 DEBUG(3, ("print_job_checks: "
2707 "disk space check failed.\n"));
2708 return WERR_NO_SPOOL_SPACE
;
2712 /* for autoloaded printers, check that the printcap entry still exists */
2713 if (lp_autoloaded(snum
) && !pcap_printername_ok(sharename
)) {
2714 DEBUG(3, ("print_job_checks: printer name %s check failed.\n",
2716 return WERR_ACCESS_DENIED
;
2719 /* Insure the maximum queue size is not violated */
2720 *njobs
= print_queue_length(msg_ctx
, snum
, NULL
);
2721 if (*njobs
> lp_maxprintjobs(snum
)) {
2722 DEBUG(3, ("print_job_checks: Queue %s number of jobs (%d) "
2723 "larger than max printjobs per queue (%d).\n",
2724 sharename
, *njobs
, lp_maxprintjobs(snum
)));
2725 return WERR_NO_SPOOL_SPACE
;
2731 /***************************************************************************
2733 ***************************************************************************/
2735 static WERROR
print_job_spool_file(int snum
, uint32_t jobid
,
2736 const char *output_file
,
2737 struct printjob
*pjob
)
2745 /* if this file is within the printer path, it means that smbd
2746 * is spooling it and will pass us control when it is finished.
2747 * Verify that the file name is ok, within path, and it is
2748 * already already there */
2750 path
= lp_path(talloc_tos(), snum
);
2752 if (strncmp(output_file
, path
, len
) == 0 &&
2753 (output_file
[len
- 1] == '/' || output_file
[len
] == '/')) {
2755 /* verify path is not too long */
2756 if (strlen(output_file
) >= sizeof(pjob
->filename
)) {
2757 return WERR_INVALID_NAME
;
2760 /* verify that the file exists */
2761 if (sys_stat(output_file
, &st
, false) != 0) {
2762 return WERR_INVALID_NAME
;
2765 fstrcpy(pjob
->filename
, output_file
);
2767 DEBUG(3, ("print_job_spool_file:"
2768 "External spooling activated\n"));
2770 /* we do not open the file until spooling is done */
2772 pjob
->status
= PJOB_SMBD_SPOOLING
;
2778 slprintf(pjob
->filename
, sizeof(pjob
->filename
)-1,
2779 "%s/%sXXXXXX", lp_path(talloc_tos(), snum
),
2780 PRINT_SPOOL_PREFIX
);
2781 mask
= umask(S_IRWXO
| S_IRWXG
);
2782 pjob
->fd
= mkstemp(pjob
->filename
);
2785 if (pjob
->fd
== -1) {
2786 werr
= map_werror_from_unix(errno
);
2787 if (W_ERROR_EQUAL(werr
, WERR_ACCESS_DENIED
)) {
2788 /* Common setup error, force a report. */
2789 DEBUG(0, ("print_job_spool_file: "
2790 "insufficient permissions to open spool "
2791 "file %s.\n", pjob
->filename
));
2793 /* Normal case, report at level 3 and above. */
2794 DEBUG(3, ("print_job_spool_file: "
2795 "can't open spool file %s\n",
2804 /***************************************************************************
2805 Start spooling a job - return the jobid.
2806 ***************************************************************************/
2808 WERROR
print_job_start(const struct auth_session_info
*server_info
,
2809 struct messaging_context
*msg_ctx
,
2810 const char *clientmachine
,
2811 int snum
, const char *docname
, const char *filename
,
2812 struct spoolss_DeviceMode
*devmode
, uint32_t *_jobid
)
2816 struct printjob pjob
;
2817 const char *sharename
= lp_const_servicename(snum
);
2818 struct tdb_print_db
*pdb
= get_print_db_byname(sharename
);
2823 return WERR_INTERNAL_DB_CORRUPTION
;
2826 path
= lp_path(talloc_tos(), snum
);
2828 werr
= print_job_checks(server_info
, msg_ctx
, snum
, &njobs
);
2829 if (!W_ERROR_IS_OK(werr
)) {
2830 release_print_db(pdb
);
2834 DEBUG(10, ("print_job_start: "
2835 "Queue %s number of jobs (%d), max printjobs = %d\n",
2836 sharename
, njobs
, lp_maxprintjobs(snum
)));
2838 werr
= allocate_print_jobid(pdb
, snum
, sharename
, &jobid
);
2839 if (!W_ERROR_IS_OK(werr
)) {
2843 /* create the database entry */
2847 pjob
.pid
= getpid();
2851 pjob
.starttime
= time(NULL
);
2852 pjob
.status
= LPQ_SPOOLING
;
2854 pjob
.spooled
= False
;
2856 pjob
.devmode
= devmode
;
2858 fstrcpy(pjob
.jobname
, docname
);
2860 fstrcpy(pjob
.clientmachine
, clientmachine
);
2862 fstrcpy(pjob
.user
, lp_printjob_username(snum
));
2863 standard_sub_advanced(sharename
, server_info
->unix_info
->sanitized_username
,
2864 path
, server_info
->unix_token
->gid
,
2865 server_info
->unix_info
->sanitized_username
,
2866 server_info
->info
->domain_name
,
2867 pjob
.user
, sizeof(pjob
.user
));
2869 fstrcpy(pjob
.queuename
, lp_const_servicename(snum
));
2871 /* we have a job entry - now create the spool file */
2872 werr
= print_job_spool_file(snum
, jobid
, filename
, &pjob
);
2873 if (!W_ERROR_IS_OK(werr
)) {
2877 pjob_store(server_event_context(), msg_ctx
, sharename
, jobid
, &pjob
);
2879 /* Update the 'jobs added' entry used by print_queue_status. */
2880 add_to_jobs_added(pdb
, jobid
);
2882 /* Ensure we keep a rough count of the number of total jobs... */
2883 tdb_change_int32_atomic(pdb
->tdb
, "INFO/total_jobs", &njobs
, 1);
2885 release_print_db(pdb
);
2892 pjob_delete(server_event_context(), msg_ctx
, sharename
, jobid
);
2895 release_print_db(pdb
);
2897 DEBUG(3, ("print_job_start: returning fail. "
2898 "Error = %s\n", win_errstr(werr
)));
2902 /****************************************************************************
2903 Update the number of pages spooled to jobid
2904 ****************************************************************************/
2906 void print_job_endpage(struct messaging_context
*msg_ctx
,
2907 int snum
, uint32 jobid
)
2909 const char* sharename
= lp_const_servicename(snum
);
2910 struct printjob
*pjob
;
2911 TALLOC_CTX
*tmp_ctx
= talloc_new(msg_ctx
);
2912 if (tmp_ctx
== NULL
) {
2916 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2920 /* don't allow another process to get this info - it is meaningless */
2921 if (pjob
->pid
!= getpid()) {
2926 pjob_store(server_event_context(), msg_ctx
, sharename
, jobid
, pjob
);
2928 talloc_free(tmp_ctx
);
2931 /****************************************************************************
2932 Print a file - called on closing the file. This spools the job.
2933 If normal close is false then we're tearing down the jobs - treat as an
2935 ****************************************************************************/
2937 NTSTATUS
print_job_end(struct messaging_context
*msg_ctx
, int snum
,
2938 uint32 jobid
, enum file_close_type close_type
)
2940 const char* sharename
= lp_const_servicename(snum
);
2941 struct printjob
*pjob
;
2943 SMB_STRUCT_STAT sbuf
;
2944 struct printif
*current_printif
= get_printer_fns(snum
);
2945 NTSTATUS status
= NT_STATUS_UNSUCCESSFUL
;
2947 TALLOC_CTX
*tmp_ctx
= talloc_new(msg_ctx
);
2948 if (tmp_ctx
== NULL
) {
2949 return NT_STATUS_NO_MEMORY
;
2952 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
2954 status
= NT_STATUS_PRINT_CANCELLED
;
2958 if (pjob
->spooled
|| pjob
->pid
!= getpid()) {
2959 status
= NT_STATUS_ACCESS_DENIED
;
2963 if (close_type
== NORMAL_CLOSE
|| close_type
== SHUTDOWN_CLOSE
) {
2964 if (pjob
->status
== PJOB_SMBD_SPOOLING
) {
2965 /* take over the file now, smbd is done */
2966 if (sys_stat(pjob
->filename
, &sbuf
, false) != 0) {
2967 status
= map_nt_error_from_unix(errno
);
2968 DEBUG(3, ("print_job_end: "
2969 "stat file failed for jobid %d\n",
2974 pjob
->status
= LPQ_SPOOLING
;
2978 if ((sys_fstat(pjob
->fd
, &sbuf
, false) != 0)) {
2979 status
= map_nt_error_from_unix(errno
);
2981 DEBUG(3, ("print_job_end: "
2982 "stat file failed for jobid %d\n",
2990 pjob
->size
= sbuf
.st_ex_size
;
2994 * Not a normal close, something has gone wrong. Cleanup.
2996 if (pjob
->fd
!= -1) {
3002 /* Technically, this is not quite right. If the printer has a separator
3003 * page turned on, the NT spooler prints the separator page even if the
3004 * print job is 0 bytes. 010215 JRR */
3005 if (pjob
->size
== 0 || pjob
->status
== LPQ_DELETING
) {
3006 /* don't bother spooling empty files or something being deleted. */
3007 DEBUG(5,("print_job_end: canceling spool of %s (%s)\n",
3008 pjob
->filename
, pjob
->size
? "deleted" : "zero length" ));
3009 unlink(pjob
->filename
);
3010 pjob_delete(server_event_context(), msg_ctx
, sharename
, jobid
);
3011 return NT_STATUS_OK
;
3014 /* don't strip out characters like '$' from the printername */
3015 lpq_cmd
= talloc_string_sub2(tmp_ctx
,
3016 lp_lpq_command(talloc_tos(), snum
),
3018 lp_printername(talloc_tos(), snum
),
3019 false, false, false);
3020 if (lpq_cmd
== NULL
) {
3021 status
= NT_STATUS_PRINT_CANCELLED
;
3024 lpq_cmd
= talloc_sub_advanced(tmp_ctx
,
3025 lp_servicename(talloc_tos(), snum
),
3026 current_user_info
.unix_name
,
3028 current_user
.ut
.gid
,
3029 get_current_username(),
3030 current_user_info
.domain
,
3032 if (lpq_cmd
== NULL
) {
3033 status
= NT_STATUS_PRINT_CANCELLED
;
3037 ret
= (*(current_printif
->job_submit
))(snum
, pjob
,
3038 current_printif
->type
, lpq_cmd
);
3040 status
= NT_STATUS_PRINT_CANCELLED
;
3044 /* The print job has been successfully handed over to the back-end */
3046 pjob
->spooled
= True
;
3047 pjob
->status
= LPQ_QUEUED
;
3048 pjob_store(server_event_context(), msg_ctx
, sharename
, jobid
, pjob
);
3050 /* make sure the database is up to date */
3051 if (print_cache_expired(lp_const_servicename(snum
), True
))
3052 print_queue_update(msg_ctx
, snum
, False
);
3054 return NT_STATUS_OK
;
3058 /* The print job was not successfully started. Cleanup */
3059 /* Still need to add proper error return propagation! 010122:JRR */
3061 unlink(pjob
->filename
);
3062 pjob_delete(server_event_context(), msg_ctx
, sharename
, jobid
);
3064 talloc_free(tmp_ctx
);
3068 /****************************************************************************
3069 Get a snapshot of jobs in the system without traversing.
3070 ****************************************************************************/
3072 static bool get_stored_queue_info(struct messaging_context
*msg_ctx
,
3073 struct tdb_print_db
*pdb
, int snum
,
3074 int *pcount
, print_queue_struct
**ppqueue
)
3076 TDB_DATA data
, cgdata
, jcdata
;
3077 print_queue_struct
*queue
= NULL
;
3079 uint32 extra_count
= 0;
3080 uint32_t changed_count
= 0;
3081 int total_count
= 0;
3084 int max_reported_jobs
= lp_max_reported_print_jobs(snum
);
3086 const char* sharename
= lp_servicename(talloc_tos(), snum
);
3087 TALLOC_CTX
*tmp_ctx
= talloc_new(msg_ctx
);
3088 if (tmp_ctx
== NULL
) {
3092 /* make sure the database is up to date */
3093 if (print_cache_expired(lp_const_servicename(snum
), True
))
3094 print_queue_update(msg_ctx
, snum
, False
);
3100 ZERO_STRUCT(cgdata
);
3102 /* Get the stored queue data. */
3103 data
= tdb_fetch_compat(pdb
->tdb
, string_tdb_data("INFO/linear_queue_array"));
3105 if (data
.dptr
&& data
.dsize
>= sizeof(qcount
))
3106 len
+= tdb_unpack(data
.dptr
+ len
, data
.dsize
- len
, "d", &qcount
);
3108 /* Get the added jobs list. */
3109 cgdata
= tdb_fetch_compat(pdb
->tdb
, string_tdb_data("INFO/jobs_added"));
3110 if (cgdata
.dptr
!= NULL
&& (cgdata
.dsize
% 4 == 0))
3111 extra_count
= cgdata
.dsize
/4;
3113 /* Get the changed jobs list. */
3114 jcdata
= tdb_fetch_compat(pdb
->tdb
, string_tdb_data("INFO/jobs_changed"));
3115 if (jcdata
.dptr
!= NULL
&& (jcdata
.dsize
% 4 == 0))
3116 changed_count
= jcdata
.dsize
/ 4;
3118 DEBUG(5,("get_stored_queue_info: qcount = %u, extra_count = %u\n", (unsigned int)qcount
, (unsigned int)extra_count
));
3120 /* Allocate the queue size. */
3121 if (qcount
== 0 && extra_count
== 0)
3124 if ((queue
= SMB_MALLOC_ARRAY(print_queue_struct
, qcount
+ extra_count
)) == NULL
)
3127 /* Retrieve the linearised queue data. */
3129 for(i
= 0; i
< qcount
; i
++) {
3130 uint32 qjob
, qsize
, qpage_count
, qstatus
, qpriority
, qtime
;
3131 len
+= tdb_unpack(data
.dptr
+ len
, data
.dsize
- len
, "ddddddff",
3140 queue
[i
].sysjob
= qjob
;
3141 queue
[i
].size
= qsize
;
3142 queue
[i
].page_count
= qpage_count
;
3143 queue
[i
].status
= qstatus
;
3144 queue
[i
].priority
= qpriority
;
3145 queue
[i
].time
= qtime
;
3148 total_count
= qcount
;
3150 /* Add new jobids to the queue. */
3151 for (i
= 0; i
< extra_count
; i
++) {
3153 struct printjob
*pjob
;
3155 jobid
= IVAL(cgdata
.dptr
, i
*4);
3156 DEBUG(5,("get_stored_queue_info: added job = %u\n", (unsigned int)jobid
));
3157 pjob
= print_job_find(tmp_ctx
, lp_const_servicename(snum
), jobid
);
3159 DEBUG(5,("get_stored_queue_info: failed to find added job = %u\n", (unsigned int)jobid
));
3160 remove_from_jobs_added(sharename
, jobid
);
3164 queue
[total_count
].sysjob
= pjob
->sysjob
;
3165 queue
[total_count
].size
= pjob
->size
;
3166 queue
[total_count
].page_count
= pjob
->page_count
;
3167 queue
[total_count
].status
= pjob
->status
;
3168 queue
[total_count
].priority
= 1;
3169 queue
[total_count
].time
= pjob
->starttime
;
3170 fstrcpy(queue
[total_count
].fs_user
, pjob
->user
);
3171 fstrcpy(queue
[total_count
].fs_file
, pjob
->jobname
);
3176 /* Update the changed jobids. */
3177 for (i
= 0; i
< changed_count
; i
++) {
3178 uint32_t jobid
= IVAL(jcdata
.dptr
, i
* 4);
3179 struct printjob
*pjob
;
3183 pjob
= print_job_find(tmp_ctx
, sharename
, jobid
);
3185 DEBUG(5,("get_stored_queue_info: failed to find "
3186 "changed job = %u\n",
3187 (unsigned int)jobid
));
3188 remove_from_jobs_changed(sharename
, jobid
);
3192 for (j
= 0; j
< total_count
; j
++) {
3193 if (queue
[j
].sysjob
== pjob
->sysjob
) {
3200 DEBUG(5,("get_stored_queue_info: changed job: %u\n",
3201 (unsigned int)jobid
));
3203 queue
[j
].sysjob
= pjob
->sysjob
;
3204 queue
[j
].size
= pjob
->size
;
3205 queue
[j
].page_count
= pjob
->page_count
;
3206 queue
[j
].status
= pjob
->status
;
3207 queue
[j
].priority
= 1;
3208 queue
[j
].time
= pjob
->starttime
;
3209 fstrcpy(queue
[j
].fs_user
, pjob
->user
);
3210 fstrcpy(queue
[j
].fs_file
, pjob
->jobname
);
3213 DEBUG(5,("updated queue[%u], jobid: %u, sysjob: %u, "
3215 (unsigned int)j
, (unsigned int)jobid
,
3216 (unsigned int)queue
[j
].sysjob
, pjob
->jobname
));
3219 remove_from_jobs_changed(sharename
, jobid
);
3222 /* Sort the queue by submission time otherwise they are displayed
3225 TYPESAFE_QSORT(queue
, total_count
, printjob_comp
);
3227 DEBUG(5,("get_stored_queue_info: total_count = %u\n", (unsigned int)total_count
));
3229 if (max_reported_jobs
&& total_count
> max_reported_jobs
)
3230 total_count
= max_reported_jobs
;
3233 *pcount
= total_count
;
3239 SAFE_FREE(data
.dptr
);
3240 SAFE_FREE(cgdata
.dptr
);
3241 talloc_free(tmp_ctx
);
3245 /****************************************************************************
3246 Get a printer queue listing.
3247 set queue = NULL and status = NULL if you just want to update the cache
3248 ****************************************************************************/
3250 int print_queue_status(struct messaging_context
*msg_ctx
, int snum
,
3251 print_queue_struct
**ppqueue
,
3252 print_status_struct
*status
)
3256 const char *sharename
;
3257 struct tdb_print_db
*pdb
;
3260 /* make sure the database is up to date */
3262 if (print_cache_expired(lp_const_servicename(snum
), True
))
3263 print_queue_update(msg_ctx
, snum
, False
);
3265 /* return if we are done */
3266 if ( !ppqueue
|| !status
)
3270 sharename
= lp_const_servicename(snum
);
3271 pdb
= get_print_db_byname(sharename
);
3277 * Fetch the queue status. We must do this first, as there may
3278 * be no jobs in the queue.
3281 ZERO_STRUCTP(status
);
3282 slprintf(keystr
, sizeof(keystr
)-1, "STATUS/%s", sharename
);
3283 key
= string_tdb_data(keystr
);
3285 data
= tdb_fetch_compat(pdb
->tdb
, key
);
3287 if (data
.dsize
== sizeof(*status
)) {
3288 /* this memcpy is ok since the status struct was
3289 not packed before storing it in the tdb */
3290 memcpy(status
, data
.dptr
, sizeof(*status
));
3292 SAFE_FREE(data
.dptr
);
3296 * Now, fetch the print queue information. We first count the number
3297 * of entries, and then only retrieve the queue if necessary.
3300 if (!get_stored_queue_info(msg_ctx
, pdb
, snum
, &count
, ppqueue
)) {
3301 release_print_db(pdb
);
3305 release_print_db(pdb
);
3309 /****************************************************************************
3311 ****************************************************************************/
3313 WERROR
print_queue_pause(const struct auth_session_info
*server_info
,
3314 struct messaging_context
*msg_ctx
, int snum
)
3317 struct printif
*current_printif
= get_printer_fns( snum
);
3319 if (!W_ERROR_IS_OK(print_access_check(server_info
, msg_ctx
, snum
,
3320 PRINTER_ACCESS_ADMINISTER
))) {
3321 return WERR_ACCESS_DENIED
;
3327 ret
= (*(current_printif
->queue_pause
))(snum
);
3332 return WERR_INVALID_PARAM
;
3335 /* force update the database */
3336 print_cache_flush(lp_const_servicename(snum
));
3338 /* Send a printer notify message */
3340 notify_printer_status(server_event_context(), msg_ctx
, snum
,
3341 PRINTER_STATUS_PAUSED
);
3346 /****************************************************************************
3348 ****************************************************************************/
3350 WERROR
print_queue_resume(const struct auth_session_info
*server_info
,
3351 struct messaging_context
*msg_ctx
, int snum
)
3354 struct printif
*current_printif
= get_printer_fns( snum
);
3356 if (!W_ERROR_IS_OK(print_access_check(server_info
, msg_ctx
, snum
,
3357 PRINTER_ACCESS_ADMINISTER
))) {
3358 return WERR_ACCESS_DENIED
;
3363 ret
= (*(current_printif
->queue_resume
))(snum
);
3368 return WERR_INVALID_PARAM
;
3371 /* make sure the database is up to date */
3372 if (print_cache_expired(lp_const_servicename(snum
), True
))
3373 print_queue_update(msg_ctx
, snum
, True
);
3375 /* Send a printer notify message */
3377 notify_printer_status(server_event_context(), msg_ctx
, snum
,
3383 /****************************************************************************
3384 Purge a queue - implemented by deleting all jobs that we can delete.
3385 ****************************************************************************/
3387 WERROR
print_queue_purge(const struct auth_session_info
*server_info
,
3388 struct messaging_context
*msg_ctx
, int snum
)
3390 print_queue_struct
*queue
;
3391 print_status_struct status
;
3395 /* Force and update so the count is accurate (i.e. not a cached count) */
3396 print_queue_update(msg_ctx
, snum
, True
);
3398 can_job_admin
= W_ERROR_IS_OK(print_access_check(server_info
,
3401 JOB_ACCESS_ADMINISTER
));
3402 njobs
= print_queue_status(msg_ctx
, snum
, &queue
, &status
);
3404 if ( can_job_admin
)
3407 for (i
= 0; i
< njobs
; i
++) {
3408 struct tdb_print_db
*pdb
;
3411 pdb
= get_print_db_byname(lp_const_servicename(snum
));
3413 DEBUG(1, ("failed to find printdb for %s\n",
3414 lp_const_servicename(snum
)));
3417 jobid
= sysjob_to_jobid_pdb(pdb
, queue
[i
].sysjob
);
3418 if (jobid
== (uint32_t)-1) {
3419 DEBUG(2, ("jobid for system job %d not found\n",
3421 continue; /* unix job */
3423 owner
= is_owner(server_info
, lp_const_servicename(snum
),
3426 if (owner
|| can_job_admin
) {
3427 print_job_delete1(server_event_context(), msg_ctx
,
3432 if ( can_job_admin
)
3435 /* update the cache */
3436 print_queue_update(msg_ctx
, snum
, True
);