c02587e387778417a378fba2419bc9cf2adf1b64
[ddiss/samba.git] / source3 / printing / printspoolss.c
1 /*
2    Unix SMB/CIFS implementation.
3    Printing routines that bridge to spoolss
4    Copyright (C) Simo Sorce 2010
5
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.
10
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.
15
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/>.
18 */
19
20 #include "includes.h"
21 #include "printing.h"
22 #include "rpc_client/rpc_client.h"
23 #include "../librpc/gen_ndr/ndr_spoolss_c.h"
24 #include "rpc_server/rpc_ncacn_np.h"
25 #include "smbd/globals.h"
26 #include "../libcli/security/security.h"
27
28 struct print_file_data {
29         char *svcname;
30         char *docname;
31         char *filename;
32         struct policy_handle handle;
33         uint32_t jobid;
34         uint16 rap_jobid;
35 };
36
37 uint16_t print_spool_rap_jobid(struct print_file_data *print_file)
38 {
39         if (print_file == NULL) {
40                 return 0;
41         }
42
43         return print_file->rap_jobid;
44 }
45
46 void print_spool_terminate(struct connection_struct *conn,
47                            struct print_file_data *print_file);
48
49 /***************************************************************************
50  * Open a Document over spoolss
51  ***************************************************************************/
52
53 #define DOCNAME_DEFAULT "Remote Downlevel Document"
54 #ifndef PRINT_SPOOL_PREFIX
55 #define PRINT_SPOOL_PREFIX "smbprn."
56 #endif
57
58 NTSTATUS print_spool_open(files_struct *fsp,
59                           const char *fname,
60                           uint64_t current_vuid)
61 {
62         NTSTATUS status;
63         TALLOC_CTX *tmp_ctx;
64         struct print_file_data *pf;
65         struct dcerpc_binding_handle *b = NULL;
66         struct spoolss_DevmodeContainer devmode_ctr;
67         union spoolss_DocumentInfo info;
68         int fd = -1;
69         WERROR werr;
70
71         tmp_ctx = talloc_new(fsp);
72         if (!tmp_ctx) {
73                 return NT_STATUS_NO_MEMORY;
74         }
75
76         pf = talloc_zero(fsp, struct print_file_data);
77         if (!pf) {
78                 status = NT_STATUS_NO_MEMORY;
79                 goto done;
80         }
81         pf->svcname = talloc_strdup(pf, lp_servicename(SNUM(fsp->conn)));
82
83         /* the document name is derived from the file name.
84          * "Remote Downlevel Document" is added in front to
85          * mimic what windows does in this case */
86         pf->docname = talloc_strdup(pf, DOCNAME_DEFAULT);
87         if (!pf->docname) {
88                 status = NT_STATUS_NO_MEMORY;
89                 goto done;
90         }
91         if (fname) {
92                 const char *p = strrchr(fname, '/');
93                 if (!p) {
94                         p = fname;
95                 }
96                 pf->docname = talloc_asprintf_append(pf->docname, " %s", p);
97                 if (!pf->docname) {
98                         status = NT_STATUS_NO_MEMORY;
99                         goto done;
100                 }
101         }
102
103         /* Ok, now we have to open an actual file.
104          * Here is the reason:
105          * We want to write the spool job to this file in
106          * smbd for scalability reason (and also because
107          * apparently window printer drivers can seek when
108          * spooling to a file).
109          * So we first create a file, and then we pass it
110          * to spoolss in output_file so it can monitor and
111          * take over once we call EndDocPrinter().
112          * Of course we will not start writing until
113          * StartDocPrinter() actually gives the ok. */
114
115         pf->filename = talloc_asprintf(pf, "%s/%s.XXXXXX",
116                                         lp_pathname(SNUM(fsp->conn)),
117                                         PRINT_SPOOL_PREFIX);
118         if (!pf->filename) {
119                 status = NT_STATUS_NO_MEMORY;
120                 goto done;
121         }
122         errno = 0;
123         fd = mkstemp(pf->filename);
124         if (fd == -1) {
125                 if (errno == EACCES) {
126                         /* Common setup error, force a report. */
127                         DEBUG(0, ("Insufficient permissions "
128                                   "to open spool file %s.\n",
129                                   pf->filename));
130                 } else {
131                         /* Normal case, report at level 3 and above. */
132                         DEBUG(3, ("can't open spool file %s,\n",
133                                   pf->filename));
134                         DEBUGADD(3, ("errno = %d (%s).\n",
135                                      errno, strerror(errno)));
136                 }
137                 status = map_nt_error_from_unix(errno);
138                 goto done;
139         }
140
141         /* now open a document over spoolss so that it does
142          * all printer verification, and eventually assigns
143          * a job id */
144
145         status = rpc_pipe_open_interface(fsp->conn,
146                                          &ndr_table_spoolss.syntax_id,
147                                          fsp->conn->session_info,
148                                          fsp->conn->sconn->remote_address,
149                                          fsp->conn->sconn->msg_ctx,
150                                          &fsp->conn->spoolss_pipe);
151         if (!NT_STATUS_IS_OK(status)) {
152                 goto done;
153         }
154         b = fsp->conn->spoolss_pipe->binding_handle;
155
156         ZERO_STRUCT(devmode_ctr);
157
158         status = dcerpc_spoolss_OpenPrinter(b, pf, pf->svcname,
159                                             "RAW", devmode_ctr,
160                                             SEC_FLAG_MAXIMUM_ALLOWED,
161                                             &pf->handle, &werr);
162         if (!NT_STATUS_IS_OK(status)) {
163                 goto done;
164         }
165         if (!W_ERROR_IS_OK(werr)) {
166                 status = werror_to_ntstatus(werr);
167                 goto done;
168         }
169
170         info.info1 = talloc(tmp_ctx, struct spoolss_DocumentInfo1);
171         if (!info.info1) {
172                 status = NT_STATUS_NO_MEMORY;
173                 goto done;
174         }
175         info.info1->document_name = pf->docname;
176         info.info1->output_file = pf->filename;
177         info.info1->datatype = "RAW";
178
179         status = dcerpc_spoolss_StartDocPrinter(b, tmp_ctx, &pf->handle,
180                                                 1, info, &pf->jobid, &werr);
181         if (!NT_STATUS_IS_OK(status)) {
182                 goto done;
183         }
184         if (!W_ERROR_IS_OK(werr)) {
185                 status = werror_to_ntstatus(werr);
186                 goto done;
187         }
188
189         /* Convert to RAP id. */
190         pf->rap_jobid = pjobid_to_rap(pf->svcname, pf->jobid);
191         if (pf->rap_jobid == 0) {
192                 /* No errno around here */
193                 status = NT_STATUS_ACCESS_DENIED;
194                 goto done;
195         }
196
197         /* setup a full fsp */
198         status = create_synthetic_smb_fname(fsp, pf->filename, NULL,
199                                             NULL, &fsp->fsp_name);
200         if (!NT_STATUS_IS_OK(status)) {
201                 goto done;
202         }
203
204         if (sys_fstat(fd, &fsp->fsp_name->st, false) != 0) {
205                 status = map_nt_error_from_unix(errno);
206                 goto done;
207         }
208
209         fsp->file_id = vfs_file_id_from_sbuf(fsp->conn, &fsp->fsp_name->st);
210         fsp->fh->fd = fd;
211
212         fsp->vuid = current_vuid;
213         fsp->can_lock = false;
214         fsp->can_read = false;
215         fsp->access_mask = FILE_GENERIC_WRITE;
216         fsp->can_write = true;
217         fsp->modified = false;
218         fsp->oplock_type = NO_OPLOCK;
219         fsp->sent_oplock_break = NO_BREAK_SENT;
220         fsp->is_directory = false;
221
222         fsp->print_file = pf;
223
224         status = NT_STATUS_OK;
225 done:
226         if (!NT_STATUS_IS_OK(status)) {
227                 if (fd != -1) {
228                         close(fd);
229                         if (fsp->print_file) {
230                                 unlink(fsp->print_file->filename);
231                         }
232                 }
233                 /* We need to delete the job from spoolss too */
234                 if (pf->jobid) {
235                         print_spool_terminate(fsp->conn, pf);
236                 }
237         }
238         talloc_free(tmp_ctx);
239         return status;
240 }
241
242 int print_spool_write(files_struct *fsp,
243                       const char *data, uint32_t size,
244                       off_t offset, uint32_t *written)
245 {
246         SMB_STRUCT_STAT st;
247         ssize_t n;
248         int ret;
249
250         *written = 0;
251
252         /* first of all stat file to find out if it is still there.
253          * spoolss may have deleted it to signal someone has killed
254          * the job through it's interface */
255
256         if (sys_fstat(fsp->fh->fd, &st, false) != 0) {
257                 ret = errno;
258                 DEBUG(3, ("printfile_offset: sys_fstat failed on %s (%s)\n",
259                           fsp_str_dbg(fsp), strerror(ret)));
260                 return ret;
261         }
262
263         /* check if the file is unlinked, this will signal spoolss has
264          * killed it, just return an error and close the file */
265         if (st.st_ex_nlink == 0) {
266                 close(fsp->fh->fd);
267                 return EBADF;
268         }
269
270         /* When print files go beyond 4GB, the 32-bit offset sent in
271          * old SMBwrite calls is relative to the current 4GB chunk
272          * we're writing to.
273          *    Discovered by Sebastian Kloska <oncaphillis@snafu.de>.
274          */
275         if (offset < 0xffffffff00000000LL) {
276                 offset = (st.st_ex_size & 0xffffffff00000000LL) + offset;
277         }
278
279         n = write_data_at_offset(fsp->fh->fd, data, size, offset);
280         if (n == -1) {
281                 ret = errno;
282                 print_spool_terminate(fsp->conn, fsp->print_file);
283         } else {
284                 *written = n;
285                 ret = 0;
286         }
287
288         return ret;
289 }
290
291 void print_spool_end(files_struct *fsp, enum file_close_type close_type)
292 {
293         NTSTATUS status;
294         WERROR werr;
295         struct dcerpc_binding_handle *b = NULL;
296
297         b = fsp->conn->spoolss_pipe->binding_handle;
298
299         switch (close_type) {
300         case NORMAL_CLOSE:
301         case SHUTDOWN_CLOSE:
302                 /* this also automatically calls spoolss_EndDocPrinter */
303                 status = dcerpc_spoolss_ClosePrinter(b, fsp->print_file,
304                                                 &fsp->print_file->handle,
305                                                 &werr);
306                 if (!NT_STATUS_IS_OK(status) ||
307                     !NT_STATUS_IS_OK(status = werror_to_ntstatus(werr))) {
308                         DEBUG(3, ("Failed to close printer %s [%s]\n",
309                               fsp->print_file->svcname, nt_errstr(status)));
310                 }
311                 break;
312         case ERROR_CLOSE:
313                 print_spool_terminate(fsp->conn, fsp->print_file);
314                 break;
315         }
316 }
317
318
319 void print_spool_terminate(struct connection_struct *conn,
320                            struct print_file_data *print_file)
321 {
322         NTSTATUS status;
323         WERROR werr;
324         struct dcerpc_binding_handle *b = NULL;
325
326         rap_jobid_delete(print_file->svcname, print_file->jobid);
327
328         status = rpc_pipe_open_interface(conn,
329                                          &ndr_table_spoolss.syntax_id,
330                                          conn->session_info,
331                                          conn->sconn->remote_address,
332                                          conn->sconn->msg_ctx,
333                                          &conn->spoolss_pipe);
334         if (!NT_STATUS_IS_OK(status)) {
335                 DEBUG(0, ("print_spool_terminate: "
336                           "Failed to get spoolss pipe [%s]\n",
337                           nt_errstr(status)));
338                 return;
339         }
340         b = conn->spoolss_pipe->binding_handle;
341
342         status = dcerpc_spoolss_SetJob(b, print_file,
343                                         &print_file->handle,
344                                         print_file->jobid,
345                                         NULL, SPOOLSS_JOB_CONTROL_DELETE,
346                                         &werr);
347         if (!NT_STATUS_IS_OK(status) ||
348             !NT_STATUS_IS_OK(status = werror_to_ntstatus(werr))) {
349                 DEBUG(3, ("Failed to delete job %d [%s]\n",
350                           print_file->jobid, nt_errstr(status)));
351                 return;
352         }
353         status = dcerpc_spoolss_ClosePrinter(b, print_file,
354                                              &print_file->handle,
355                                              &werr);
356         if (!NT_STATUS_IS_OK(status) ||
357             !NT_STATUS_IS_OK(status = werror_to_ntstatus(werr))) {
358                 DEBUG(3, ("Failed to close printer %s [%s]\n",
359                           print_file->svcname, nt_errstr(status)));
360                 return;
361         }
362 }