RIP BOOL. Convert BOOL -> bool. I found a few interesting
[tprouty/samba.git] / source3 / printing / print_iprint.c
1 /*
2  * Support code for Novell iPrint using the Common UNIX Printing
3  * System ("CUPS") libraries
4  *
5  * Copyright 1999-2003 by Michael R Sweet.
6  * Portions Copyright 2005 by Joel J. Smith.
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 3 of the License, or
11  * (at your option) any later version.
12  * 
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  * 
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, see <http://www.gnu.org/licenses/>.
20  */
21
22 #include "includes.h"
23 #include "printing.h"
24
25 #ifdef HAVE_IPRINT
26 #include <cups/cups.h>
27 #include <cups/language.h>
28
29 #define OPERATION_NOVELL_LIST_PRINTERS          0x401A
30 #define OPERATION_NOVELL_MGMT                   0x401C
31 #define NOVELL_SERVER_SYSNAME                   "sysname="
32 #define NOVELL_SERVER_SYSNAME_NETWARE           "NetWare IA32"
33 #define NOVELL_SERVER_VERSION_STRING            "iprintserverversion="
34 #define NOVELL_SERVER_VERSION_OES_SP1           33554432
35
36 /*
37  * 'iprint_passwd_cb()' - The iPrint password callback...
38  */
39
40 static const char *                             /* O - Password or NULL */
41 iprint_passwd_cb(const char *prompt)    /* I - Prompt */
42 {
43        /*
44         * Always return NULL to indicate that no password is available...
45         */
46
47         return (NULL);
48 }
49
50 static const char *iprint_server(void)
51 {
52         if ((lp_iprint_server() != NULL) && (strlen(lp_iprint_server()) > 0)) {
53                 DEBUG(10, ("iprint server explicitly set to %s\n",
54                            lp_iprint_server()));
55                 return lp_iprint_server();
56         }
57
58         DEBUG(10, ("iprint server left to default %s\n", cupsServer()));
59         return cupsServer();
60 }
61
62 /*
63  * Pass in an already connected http_t*
64  * Returns the server version if one can be found, multiplied by
65  * -1 for all NetWare versions.  Returns 0 if a server version
66  * cannot be determined
67  */
68
69 static int iprint_get_server_version(http_t *http, char* serviceUri)
70 {
71         ipp_t           *request = NULL,        /* IPP Request */
72                         *response = NULL;       /* IPP Response */
73         ipp_attribute_t *attr;                  /* Current attribute */
74         cups_lang_t     *language = NULL;       /* Default language */
75         char            *ver;                   /* server version pointer */
76         char            *vertmp;                /* server version tmp pointer */
77         int             serverVersion = 0;      /* server version */
78         char            *os;                    /* server os */
79         int             osFlag = 0;             /* 0 for NetWare, 1 for anything else */
80         char            *temp;                  /* pointer for string manipulation */
81
82        /*
83         * Build an OPERATION_NOVELL_MGMT("get-server-version") request,
84         * which requires the following attributes:
85         *
86         *    attributes-charset
87         *    attributes-natural-language
88         *    operation-name
89         *    service-uri
90         */
91
92         request = ippNew();
93
94         request->request.op.operation_id = (ipp_op_t)OPERATION_NOVELL_MGMT;
95         request->request.op.request_id   = 1;
96
97         language = cupsLangDefault();
98
99         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
100                      "attributes-charset", NULL, "utf-8");
101
102         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
103                      "attributes-natural-language", NULL, language->language);
104
105         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
106                      "service-uri", NULL, serviceUri);
107
108         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
109                       "operation-name", NULL, "get-server-version");
110
111        /*
112         * Do the request and get back a response...
113         */
114
115         if (((response = cupsDoRequest(http, request, "/ipp/")) == NULL) ||
116             (response->request.status.status_code >= IPP_OK_CONFLICT))
117                 goto out;
118
119         if (((attr = ippFindAttribute(response, "server-version",
120                                       IPP_TAG_STRING)) != NULL)) {
121                 if ((ver = strstr(attr->values[0].string.text,
122                                   NOVELL_SERVER_VERSION_STRING)) != NULL) {
123                         ver += strlen(NOVELL_SERVER_VERSION_STRING);
124                        /*
125                         * Strangely, libcups stores a IPP_TAG_STRING (octet
126                         * string) as a null-terminated string with no length
127                         * even though it could be binary data with nulls in
128                         * it.  Luckily, in this case the value is not binary.
129                         */
130                         serverVersion = strtol(ver, &vertmp, 10);
131
132                         /* Check for not found, overflow or negative version */
133                         if ((ver == vertmp) || (serverVersion < 0))
134                                 serverVersion = 0;
135                 }
136
137                 if ((os = strstr(attr->values[0].string.text,
138                                   NOVELL_SERVER_SYSNAME)) != NULL) {
139                         os += strlen(NOVELL_SERVER_SYSNAME);
140                         if ((temp = strchr(os,'<')) != NULL)
141                                 *temp = '\0';
142                         if (strcmp(os,NOVELL_SERVER_SYSNAME_NETWARE))
143                                 osFlag = 1; /* 1 for non-NetWare systems */
144                 }
145         }
146
147  out:
148         if (response)
149                 ippDelete(response);
150
151         if (language)
152                 cupsLangFree(language);
153
154         if (osFlag == 0)
155                 serverVersion *= -1;
156
157         return serverVersion;
158 }
159
160
161 static int iprint_cache_add_printer(http_t *http,
162                                    int reqId,
163                                    char* url)
164 {
165         ipp_t           *request = NULL,        /* IPP Request */
166                         *response = NULL;       /* IPP Response */
167         ipp_attribute_t *attr;                  /* Current attribute */
168         cups_lang_t     *language = NULL;       /* Default language */
169         char            *name,                  /* printer-name attribute */
170                         *info,                  /* printer-info attribute */
171                         smb_enabled,            /* smb-enabled attribute */
172                         secure;                 /* security-enabled attrib. */
173
174         char            *httpPath;      /* path portion of the printer-uri */
175
176         static const char *pattrs[] =   /* Requested printer attributes */
177                         {
178                           "printer-name",
179                           "security-enabled",
180                           "printer-info",
181                           "smb-enabled"
182                         };       
183
184         request = ippNew();
185
186         request->request.op.operation_id = IPP_GET_PRINTER_ATTRIBUTES;
187         request->request.op.request_id   = reqId;
188
189         language = cupsLangDefault();
190
191         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
192                      "attributes-charset", NULL, "utf-8");
193
194         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
195                      "attributes-natural-language", NULL, language->language);
196
197         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, url);
198
199         ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
200                       "requested-attributes",
201                       (sizeof(pattrs) / sizeof(pattrs[0])),
202                       NULL, pattrs);
203
204         /*
205          * Do the request and get back a response...
206          */
207
208         if ((httpPath = strstr(url,"://")) == NULL ||
209                         (httpPath = strchr(httpPath+3,'/')) == NULL)
210         {
211                 ippDelete(request);
212                 request = NULL;
213                 goto out;
214         }
215
216         if ((response = cupsDoRequest(http, request, httpPath)) == NULL) {
217                 ipp_status_t lastErr = cupsLastError();
218
219                /*
220                 * Ignore printers that cannot be queried without credentials
221                 */
222                 if (lastErr == IPP_FORBIDDEN || 
223                     lastErr == IPP_NOT_AUTHENTICATED ||
224                     lastErr == IPP_NOT_AUTHORIZED)
225                         goto out;
226
227                 DEBUG(0,("Unable to get printer list - %s\n",
228                       ippErrorString(lastErr)));
229                 goto out;
230         }
231
232         for (attr = response->attrs; attr != NULL;) {
233                /*
234                 * Skip leading attributes until we hit a printer...
235                 */
236
237                 while (attr != NULL && attr->group_tag != IPP_TAG_PRINTER)
238                         attr = attr->next;
239
240                 if (attr == NULL)
241                         break;
242
243                /*
244                 * Pull the needed attributes from this printer...
245                 */
246
247                 name       = NULL;
248                 info       = NULL;
249                 smb_enabled= 1;
250                 secure     = 0;
251
252                 while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER) {
253                         if (strcmp(attr->name, "printer-name") == 0 &&
254                             attr->value_tag == IPP_TAG_NAME)
255                                 name = attr->values[0].string.text;
256
257                         if (strcmp(attr->name, "printer-info") == 0 &&
258                             (attr->value_tag == IPP_TAG_TEXT ||
259                             attr->value_tag == IPP_TAG_TEXTLANG))
260                                 info = attr->values[0].string.text;
261
262                        /*
263                         * If the smb-enabled attribute is present and the
264                         * value is set to 0, don't show the printer.
265                         * If the attribute is not present, assume that the
266                         * printer should show up
267                         */
268                         if (!strcmp(attr->name, "smb-enabled") &&
269                             ((attr->value_tag == IPP_TAG_INTEGER &&
270                             !attr->values[0].integer) ||
271                             (attr->value_tag == IPP_TAG_BOOLEAN &&
272                             !attr->values[0].boolean)))
273                                 smb_enabled = 0;
274
275                        /*
276                         * If the security-enabled attribute is present and the
277                         * value is set to 1, don't show the printer.
278                         * If the attribute is not present, assume that the
279                         * printer should show up
280                         */
281                         if (!strcmp(attr->name, "security-enabled") &&
282                             ((attr->value_tag == IPP_TAG_INTEGER &&
283                             attr->values[0].integer) ||
284                             (attr->value_tag == IPP_TAG_BOOLEAN &&
285                             attr->values[0].boolean)))
286                                 secure = 1;
287
288                         attr = attr->next;
289                 }
290
291                /*
292                 * See if we have everything needed...
293                 * Make sure the printer is not a secure printer
294                 * and make sure smb printing hasn't been explicitly
295                 * disabled for the printer
296                 */
297
298                 if (name != NULL && !secure && smb_enabled) 
299                         pcap_cache_add(name, info);
300         }
301
302  out:
303         if (response)
304                 ippDelete(response);
305         return(0);
306 }
307
308 bool iprint_cache_reload(void)
309 {
310         http_t          *http = NULL;           /* HTTP connection to server */
311         ipp_t           *request = NULL,        /* IPP Request */
312                         *response = NULL;       /* IPP Response */
313         ipp_attribute_t *attr;                  /* Current attribute */
314         cups_lang_t     *language = NULL;       /* Default language */
315         int             i;
316         bool ret = False;
317
318         DEBUG(5, ("reloading iprint printcap cache\n"));
319
320        /*
321         * Make sure we don't ask for passwords...
322         */
323
324         cupsSetPasswordCB(iprint_passwd_cb);
325
326        /*
327         * Try to connect to the server...
328         */
329
330         if ((http = httpConnect(iprint_server(), ippPort())) == NULL) {
331                 DEBUG(0,("Unable to connect to iPrint server %s - %s\n", 
332                          iprint_server(), strerror(errno)));
333                 goto out;
334         }
335
336        /*
337         * Build a OPERATION_NOVELL_LIST_PRINTERS request, which requires the following attributes:
338         *
339         *    attributes-charset
340         *    attributes-natural-language
341         */
342
343         request = ippNew();
344
345         request->request.op.operation_id =
346                 (ipp_op_t)OPERATION_NOVELL_LIST_PRINTERS;
347         request->request.op.request_id   = 1;
348
349         language = cupsLangDefault();
350
351         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
352                      "attributes-charset", NULL, "utf-8");
353
354         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
355                      "attributes-natural-language", NULL, language->language);
356
357         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
358                      "ipp-server", NULL, "ippSrvr");
359
360        /*
361         * Do the request and get back a response...
362         */
363
364         if ((response = cupsDoRequest(http, request, "/ipp")) == NULL) {
365                 DEBUG(0,("Unable to get printer list - %s\n",
366                          ippErrorString(cupsLastError())));
367                 goto out;
368         }
369
370         for (attr = response->attrs; attr != NULL;) {
371                /*
372                 * Skip leading attributes until we hit a printer...
373                 */
374
375                 while (attr != NULL && attr->group_tag != IPP_TAG_PRINTER)
376                         attr = attr->next;
377
378                 if (attr == NULL)
379                         break;
380
381                /*
382                 * Pull the needed attributes from this printer...
383                 */
384
385                 while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER)
386                 {
387                         if (strcmp(attr->name, "printer-name") == 0 &&
388                             (attr->value_tag == IPP_TAG_URI ||
389                              attr->value_tag == IPP_TAG_NAME ||
390                              attr->value_tag == IPP_TAG_TEXT ||
391                              attr->value_tag == IPP_TAG_NAMELANG ||
392                              attr->value_tag == IPP_TAG_TEXTLANG))
393                         {
394                                 for (i = 0; i<attr->num_values; i++)
395                                 {
396                                         char *url = attr->values[i].string.text;
397                                         if (!url || !strlen(url))
398                                                 continue;
399                                         iprint_cache_add_printer(http, i+2, url);
400                                 }
401                         }
402                         attr = attr->next;
403                 }
404         }
405
406         ret = True;
407
408  out:
409         if (response)
410                 ippDelete(response);
411
412         if (language)
413                 cupsLangFree(language);
414
415         if (http)
416                 httpClose(http);
417
418         return ret;
419 }
420
421
422 /*
423  * 'iprint_job_delete()' - Delete a job.
424  */
425
426 static int iprint_job_delete(const char *sharename, const char *lprm_command, struct printjob *pjob)
427 {
428         int             ret = 1;                /* Return value */
429         http_t          *http = NULL;           /* HTTP connection to server */
430         ipp_t           *request = NULL,        /* IPP Request */
431                         *response = NULL;       /* IPP Response */
432         cups_lang_t     *language = NULL;       /* Default language */
433         char            uri[HTTP_MAX_URI];      /* printer-uri attribute */
434         char            httpPath[HTTP_MAX_URI]; /* path portion of the printer-uri */
435
436
437         DEBUG(5,("iprint_job_delete(%s, %p (%d))\n", sharename, pjob, pjob->sysjob));
438
439        /*
440         * Make sure we don't ask for passwords...
441         */
442
443         cupsSetPasswordCB(iprint_passwd_cb);
444
445        /*
446         * Try to connect to the server...
447         */
448
449         if ((http = httpConnect(iprint_server(), ippPort())) == NULL) {
450                 DEBUG(0,("Unable to connect to iPrint server %s - %s\n", 
451                          iprint_server(), strerror(errno)));
452                 goto out;
453         }
454
455        /*
456         * Build an IPP_CANCEL_JOB request, which uses the following
457         * attributes:
458         *
459         *    attributes-charset
460         *    attributes-natural-language
461         *    printer-uri
462         *    job-id
463         *    requesting-user-name
464         */
465
466         request = ippNew();
467
468         request->request.op.operation_id = IPP_CANCEL_JOB;
469         request->request.op.request_id   = 1;
470
471         language = cupsLangDefault();
472
473         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
474                      "attributes-charset", NULL, "utf-8");
475
476         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
477                      "attributes-natural-language", NULL, language->language);
478
479         slprintf(uri, sizeof(uri) - 1, "ipp://%s/ipp/%s", iprint_server(), sharename);
480
481         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, uri);
482
483         ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_INTEGER, "job-id", pjob->sysjob);
484
485         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
486                      NULL, pjob->user);
487
488        /*
489         * Do the request and get back a response...
490         */
491
492         slprintf(httpPath, sizeof(httpPath) - 1, "/ipp/%s", sharename);
493
494         if ((response = cupsDoRequest(http, request, httpPath)) != NULL) {
495                 if (response->request.status.status_code >= IPP_OK_CONFLICT) {
496                         DEBUG(0,("Unable to cancel job %d - %s\n", pjob->sysjob,
497                                 ippErrorString(cupsLastError())));
498                 } else {
499                         ret = 0;
500                 }
501         } else {
502                 DEBUG(0,("Unable to cancel job %d - %s\n", pjob->sysjob,
503                         ippErrorString(cupsLastError())));
504         }
505
506  out:
507         if (response)
508                 ippDelete(response);
509
510         if (language)
511                 cupsLangFree(language);
512
513         if (http)
514                 httpClose(http);
515
516         return ret;
517 }
518
519
520 /*
521  * 'iprint_job_pause()' - Pause a job.
522  */
523
524 static int iprint_job_pause(int snum, struct printjob *pjob)
525 {
526         int             ret = 1;                /* Return value */
527         http_t          *http = NULL;           /* HTTP connection to server */
528         ipp_t           *request = NULL,        /* IPP Request */
529                         *response = NULL;       /* IPP Response */
530         cups_lang_t     *language = NULL;       /* Default language */
531         char            uri[HTTP_MAX_URI];      /* printer-uri attribute */
532         char            httpPath[HTTP_MAX_URI]; /* path portion of the printer-uri */
533
534
535         DEBUG(5,("iprint_job_pause(%d, %p (%d))\n", snum, pjob, pjob->sysjob));
536
537        /*
538         * Make sure we don't ask for passwords...
539         */
540
541         cupsSetPasswordCB(iprint_passwd_cb);
542
543        /*
544         * Try to connect to the server...
545         */
546
547         if ((http = httpConnect(iprint_server(), ippPort())) == NULL) {
548                 DEBUG(0,("Unable to connect to iPrint server %s - %s\n", 
549                          iprint_server(), strerror(errno)));
550                 goto out;
551         }
552
553        /*
554         * Build an IPP_HOLD_JOB request, which requires the following
555         * attributes:
556         *
557         *    attributes-charset
558         *    attributes-natural-language
559         *    printer-uri
560         *    job-id
561         *    requesting-user-name
562         */
563
564         request = ippNew();
565
566         request->request.op.operation_id = IPP_HOLD_JOB;
567         request->request.op.request_id   = 1;
568
569         language = cupsLangDefault();
570
571         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
572                      "attributes-charset", NULL, "utf-8");
573
574         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
575                      "attributes-natural-language", NULL, language->language);
576
577         slprintf(uri, sizeof(uri) - 1, "ipp://%s/ipp/%s", iprint_server(), PRINTERNAME(snum));
578
579         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, uri);
580
581         ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_INTEGER, "job-id", pjob->sysjob);
582
583         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
584                      NULL, pjob->user);
585
586        /*
587         * Do the request and get back a response...
588         */
589
590         slprintf(httpPath, sizeof(httpPath) - 1, "/ipp/%s", PRINTERNAME(snum));
591
592         if ((response = cupsDoRequest(http, request, httpPath)) != NULL) {
593                 if (response->request.status.status_code >= IPP_OK_CONFLICT) {
594                         DEBUG(0,("Unable to hold job %d - %s\n", pjob->sysjob,
595                                 ippErrorString(cupsLastError())));
596                 } else {
597                         ret = 0;
598                 }
599         } else {
600                 DEBUG(0,("Unable to hold job %d - %s\n", pjob->sysjob,
601                         ippErrorString(cupsLastError())));
602         }
603
604  out:
605         if (response)
606                 ippDelete(response);
607
608         if (language)
609                 cupsLangFree(language);
610
611         if (http)
612                 httpClose(http);
613
614         return ret;
615 }
616
617
618 /*
619  * 'iprint_job_resume()' - Resume a paused job.
620  */
621
622 static int iprint_job_resume(int snum, struct printjob *pjob)
623 {
624         int             ret = 1;                /* Return value */
625         http_t          *http = NULL;           /* HTTP connection to server */
626         ipp_t           *request = NULL,        /* IPP Request */
627                         *response = NULL;       /* IPP Response */
628         cups_lang_t     *language = NULL;       /* Default language */
629         char            uri[HTTP_MAX_URI];      /* printer-uri attribute */
630         char            httpPath[HTTP_MAX_URI]; /* path portion of the printer-uri */
631
632
633         DEBUG(5,("iprint_job_resume(%d, %p (%d))\n", snum, pjob, pjob->sysjob));
634
635        /*
636         * Make sure we don't ask for passwords...
637         */
638
639         cupsSetPasswordCB(iprint_passwd_cb);
640
641        /*
642         * Try to connect to the server...
643         */
644
645         if ((http = httpConnect(iprint_server(), ippPort())) == NULL) {
646                 DEBUG(0,("Unable to connect to iPrint server %s - %s\n", 
647                          iprint_server(), strerror(errno)));
648                 goto out;
649         }
650
651        /*
652         * Build an IPP_RELEASE_JOB request, which requires the following
653         * attributes:
654         *
655         *    attributes-charset
656         *    attributes-natural-language
657         *    printer-uri
658         *    job-id
659         *    requesting-user-name
660         */
661
662         request = ippNew();
663
664         request->request.op.operation_id = IPP_RELEASE_JOB;
665         request->request.op.request_id   = 1;
666
667         language = cupsLangDefault();
668
669         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
670                      "attributes-charset", NULL, "utf-8");
671
672         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
673                      "attributes-natural-language", NULL, language->language);
674
675         slprintf(uri, sizeof(uri) - 1, "ipp://%s/ipp/%s", iprint_server(), PRINTERNAME(snum));
676
677         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL, uri);
678
679         ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_INTEGER, "job-id", pjob->sysjob);
680
681         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
682                      NULL, pjob->user);
683
684        /*
685         * Do the request and get back a response...
686         */
687
688         slprintf(httpPath, sizeof(httpPath) - 1, "/ipp/%s", PRINTERNAME(snum));
689
690         if ((response = cupsDoRequest(http, request, httpPath)) != NULL) {
691                 if (response->request.status.status_code >= IPP_OK_CONFLICT) {
692                         DEBUG(0,("Unable to release job %d - %s\n", pjob->sysjob,
693                                 ippErrorString(cupsLastError())));
694                 } else {
695                         ret = 0;
696                 }
697         } else {
698                 DEBUG(0,("Unable to release job %d - %s\n", pjob->sysjob,
699                         ippErrorString(cupsLastError())));
700         }
701
702  out:
703         if (response)
704                 ippDelete(response);
705
706         if (language)
707                 cupsLangFree(language);
708
709         if (http)
710                 httpClose(http);
711
712         return ret;
713 }
714
715
716 /*
717  * 'iprint_job_submit()' - Submit a job for printing.
718  */
719
720 static int iprint_job_submit(int snum, struct printjob *pjob)
721 {
722         int             ret = 1;                /* Return value */
723         http_t          *http = NULL;           /* HTTP connection to server */
724         ipp_t           *request = NULL,        /* IPP Request */
725                         *response = NULL;       /* IPP Response */
726         ipp_attribute_t *attr;          /* Current attribute */
727         cups_lang_t     *language = NULL;       /* Default language */
728         char            uri[HTTP_MAX_URI]; /* printer-uri attribute */
729         const char      *clientname = NULL;     /* hostname of client for job-originating-host attribute */
730
731         DEBUG(5,("iprint_job_submit(%d, %p (%d))\n", snum, pjob, pjob->sysjob));
732
733        /*
734         * Make sure we don't ask for passwords...
735         */
736
737         cupsSetPasswordCB(iprint_passwd_cb);
738
739        /*
740         * Try to connect to the server...
741         */
742
743         if ((http = httpConnect(iprint_server(), ippPort())) == NULL) {
744                 DEBUG(0,("Unable to connect to iPrint server %s - %s\n", 
745                          iprint_server(), strerror(errno)));
746                 goto out;
747         }
748
749        /*
750         * Build an IPP_PRINT_JOB request, which requires the following
751         * attributes:
752         *
753         *    attributes-charset
754         *    attributes-natural-language
755         *    printer-uri
756         *    requesting-user-name
757         *    [document-data]
758         */
759
760         request = ippNew();
761
762         request->request.op.operation_id = IPP_PRINT_JOB;
763         request->request.op.request_id   = 1;
764
765         language = cupsLangDefault();
766
767         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
768                      "attributes-charset", NULL, "utf-8");
769
770         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
771                      "attributes-natural-language", NULL, language->language);
772
773         slprintf(uri, sizeof(uri) - 1, "ipp://%s/ipp/%s", iprint_server(), PRINTERNAME(snum));
774
775         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
776                      "printer-uri", NULL, uri);
777
778         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
779                      NULL, pjob->user);
780
781         clientname = client_name();
782         if (strcmp(clientname, "UNKNOWN") == 0) {
783                 clientname = client_addr();
784         }
785         
786         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
787                      "job-originating-host-name", NULL,
788                      clientname);
789
790         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "job-name", NULL,
791                      pjob->jobname);
792
793        /*
794         * Do the request and get back a response...
795         */
796
797         slprintf(uri, sizeof(uri) - 1, "/ipp/%s", PRINTERNAME(snum));
798
799         if ((response = cupsDoFileRequest(http, request, uri, pjob->filename)) != NULL) {
800                 if (response->request.status.status_code >= IPP_OK_CONFLICT) {
801                         DEBUG(0,("Unable to print file to %s - %s\n", PRINTERNAME(snum),
802                                  ippErrorString(cupsLastError())));
803                 } else {
804                         ret = 0;
805                 }
806         } else {
807                 DEBUG(0,("Unable to print file to `%s' - %s\n", PRINTERNAME(snum),
808                          ippErrorString(cupsLastError())));
809         }
810
811         if ( ret == 0 )
812                 unlink(pjob->filename);
813         /* else print_job_end will do it for us */
814
815         if ( ret == 0 ) {
816
817                 attr = ippFindAttribute(response, "job-id", IPP_TAG_INTEGER);
818                 if (attr != NULL && attr->group_tag == IPP_TAG_JOB)
819                 {
820                         pjob->sysjob = attr->values[0].integer;
821                 }
822         }
823
824  out:
825         if (response)
826                 ippDelete(response);
827
828         if (language)
829                 cupsLangFree(language);
830
831         if (http)
832                 httpClose(http);
833
834         return ret;
835 }
836
837 /*
838  * 'iprint_queue_get()' - Get all the jobs in the print queue.
839  */
840
841 static int iprint_queue_get(const char *sharename,
842                             enum printing_types printing_type,
843                             char *lpq_command,
844                             print_queue_struct **q, 
845                             print_status_struct *status)
846 {
847         fstring         printername;
848         http_t          *http = NULL;           /* HTTP connection to server */
849         ipp_t           *request = NULL,        /* IPP Request */
850                         *response = NULL;       /* IPP Response */
851         ipp_attribute_t *attr = NULL;           /* Current attribute */
852         cups_lang_t     *language = NULL;       /* Default language */
853         char            uri[HTTP_MAX_URI]; /* printer-uri attribute */
854         char            serviceUri[HTTP_MAX_URI]; /* service-uri attribute */
855         char            httpPath[HTTP_MAX_URI]; /* path portion of the uri */
856         int             jobUseUnixTime = 0;     /* Whether job times should
857                                                  * be assumed to be Unix time */
858         int             qcount = 0,             /* Number of active queue entries */
859                         qalloc = 0;             /* Number of queue entries allocated */
860         print_queue_struct *queue = NULL,       /* Queue entries */
861                         *temp;          /* Temporary pointer for queue */
862         const char      *user_name,     /* job-originating-user-name attribute */
863                         *job_name;      /* job-name attribute */
864         int             job_id;         /* job-id attribute */
865         int             job_k_octets;   /* job-k-octets attribute */
866         time_t          job_time;       /* time-at-creation attribute */
867         time_t          printer_current_time = 0;       /* printer's current time */
868         time_t          printer_up_time = 0;    /* printer's uptime */
869         ipp_jstate_t    job_status;     /* job-status attribute */
870         int             job_priority;   /* job-priority attribute */
871         static const char *jattrs[] =   /* Requested job attributes */
872                         {
873                           "job-id",
874                           "job-k-octets",
875                           "job-name",
876                           "job-originating-user-name",
877                           "job-priority",
878                           "job-state",
879                           "time-at-creation",
880                         };
881         static const char *pattrs[] =   /* Requested printer attributes */
882                         {
883                           "printer-state",
884                           "printer-state-message",
885                           "printer-current-time",
886                           "printer-up-time"
887                         };
888
889         *q = NULL;
890
891         /* HACK ALERT!!!  The porblem with support the 'printer name' 
892            option is that we key the tdb off the sharename.  So we will 
893            overload the lpq_command string to pass in the printername 
894            (which is basically what we do for non-cups printers ... using 
895            the lpq_command to get the queue listing). */
896
897         fstrcpy( printername, lpq_command );
898
899         DEBUG(5,("iprint_queue_get(%s, %p, %p)\n", printername, q, status));
900
901        /*
902         * Make sure we don't ask for passwords...
903         */
904
905         cupsSetPasswordCB(iprint_passwd_cb);
906
907        /*
908         * Try to connect to the server...
909         */
910
911         if ((http = httpConnect(iprint_server(), ippPort())) == NULL) {
912                 DEBUG(0,("Unable to connect to iPrint server %s - %s\n", 
913                          iprint_server(), strerror(errno)));
914                 goto out;
915         }
916
917        /*
918         * Generate the printer URI and the service URI that goes with it...
919         */
920
921         slprintf(uri, sizeof(uri) - 1, "ipp://%s/ipp/%s", iprint_server(), printername);
922         slprintf(serviceUri, sizeof(serviceUri) - 1, "ipp://%s/ipp/", iprint_server());
923
924        /*
925         * For Linux iPrint servers from OES SP1 on, the iPrint server
926         * uses Unix time for job start times unless it detects the iPrint
927         * client in an http User-Agent header.  (This was done to accomodate
928         * CUPS broken behavior.  According to RFC 2911, section 4.3.14, job
929         * start times are supposed to be relative to how long the printer has
930         * been up.)  Since libcups doesn't allow us to set that header before
931         * the request is sent, this ugly hack allows us to detect the server
932         * version and decide how to interpret the job time.
933         */
934         if (iprint_get_server_version(http, serviceUri) >=
935             NOVELL_SERVER_VERSION_OES_SP1)
936                 jobUseUnixTime = 1;
937
938         request = ippNew();
939
940         request->request.op.operation_id = IPP_GET_PRINTER_ATTRIBUTES;
941         request->request.op.request_id   = 2;
942
943         language = cupsLangDefault();
944
945         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
946                      "attributes-charset", NULL, "utf-8");
947
948         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
949                      "attributes-natural-language", NULL, language->language);
950
951         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
952                      "printer-uri", NULL, uri);
953
954         ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
955                       "requested-attributes",
956                       (sizeof(pattrs) / sizeof(pattrs[0])),
957                       NULL, pattrs);
958
959        /*
960         * Do the request and get back a response...
961         */
962
963         slprintf(httpPath, sizeof(httpPath) - 1, "/ipp/%s", printername);
964
965         if ((response = cupsDoRequest(http, request, httpPath)) == NULL) {
966                 DEBUG(0,("Unable to get printer status for %s - %s\n", printername,
967                          ippErrorString(cupsLastError())));
968                 *q = queue;
969                 goto out;
970         }
971
972         if (response->request.status.status_code >= IPP_OK_CONFLICT) {
973                 DEBUG(0,("Unable to get printer status for %s - %s\n", printername,
974                          ippErrorString(response->request.status.status_code)));
975                 *q = queue;
976                 goto out;
977         }
978
979        /*
980         * Get the current printer status and convert it to the SAMBA values.
981         */
982
983         if ((attr = ippFindAttribute(response, "printer-state", IPP_TAG_ENUM)) != NULL) {
984                 if (attr->values[0].integer == IPP_PRINTER_STOPPED)
985                         status->status = LPSTAT_STOPPED;
986                 else
987                         status->status = LPSTAT_OK;
988         }
989
990         if ((attr = ippFindAttribute(response, "printer-state-message",
991                                      IPP_TAG_TEXT)) != NULL)
992                 fstrcpy(status->message, attr->values[0].string.text);
993
994         if ((attr = ippFindAttribute(response, "printer-current-time",
995                                      IPP_TAG_DATE)) != NULL)
996                 printer_current_time = ippDateToTime(attr->values[0].date);
997
998         if ((attr = ippFindAttribute(response, "printer-up-time",
999                                      IPP_TAG_INTEGER)) != NULL)
1000                 printer_up_time = attr->values[0].integer;
1001
1002         ippDelete(response);
1003         response = NULL;
1004
1005        /*
1006         * Build an IPP_GET_JOBS request, which requires the following
1007         * attributes:
1008         *
1009         *    attributes-charset
1010         *    attributes-natural-language
1011         *    requested-attributes
1012         *    printer-uri
1013         */
1014
1015         request = ippNew();
1016
1017         request->request.op.operation_id = IPP_GET_JOBS;
1018         request->request.op.request_id   = 3;
1019
1020         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
1021                      "attributes-charset", NULL, "utf-8");
1022
1023         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
1024                      "attributes-natural-language", NULL, language->language);
1025
1026         ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
1027                      "printer-uri", NULL, uri);
1028
1029         ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
1030                       "requested-attributes",
1031                       (sizeof(jattrs) / sizeof(jattrs[0])),
1032                       NULL, jattrs);
1033
1034        /*
1035         * Do the request and get back a response...
1036         */
1037
1038         slprintf(httpPath, sizeof(httpPath) - 1, "/ipp/%s", printername);
1039
1040         if ((response = cupsDoRequest(http, request, httpPath)) == NULL) {
1041                 DEBUG(0,("Unable to get jobs for %s - %s\n", uri,
1042                          ippErrorString(cupsLastError())));
1043                 goto out;
1044         }
1045
1046         if (response->request.status.status_code >= IPP_OK_CONFLICT) {
1047                 DEBUG(0,("Unable to get jobs for %s - %s\n", uri,
1048                          ippErrorString(response->request.status.status_code)));
1049                 goto out;
1050         }
1051
1052        /*
1053         * Process the jobs...
1054         */
1055
1056         qcount = 0;
1057         qalloc = 0;
1058         queue  = NULL;
1059
1060         for (attr = response->attrs; attr != NULL; attr = attr->next) {
1061                /*
1062                 * Skip leading attributes until we hit a job...
1063                 */
1064
1065                 while (attr != NULL && attr->group_tag != IPP_TAG_JOB)
1066                         attr = attr->next;
1067
1068                 if (attr == NULL)
1069                         break;
1070
1071                /*
1072                 * Allocate memory as needed...
1073                 */
1074                 if (qcount >= qalloc) {
1075                         qalloc += 16;
1076
1077                         queue = SMB_REALLOC_ARRAY(queue, print_queue_struct, qalloc);
1078
1079                         if (queue == NULL) {
1080                                 DEBUG(0,("iprint_queue_get: Not enough memory!"));
1081                                 qcount = 0;
1082                                 goto out;
1083                         }
1084                 }
1085
1086                 temp = queue + qcount;
1087                 memset(temp, 0, sizeof(print_queue_struct));
1088
1089                /*
1090                 * Pull the needed attributes from this job...
1091                 */
1092
1093                 job_id       = 0;
1094                 job_priority = 50;
1095                 job_status   = IPP_JOB_PENDING;
1096                 job_time     = 0;
1097                 job_k_octets = 0;
1098                 user_name    = NULL;
1099                 job_name     = NULL;
1100
1101                 while (attr != NULL && attr->group_tag == IPP_TAG_JOB) {
1102                         if (attr->name == NULL) {
1103                                 attr = attr->next;
1104                                 break;
1105                         }
1106
1107                         if (strcmp(attr->name, "job-id") == 0 &&
1108                             attr->value_tag == IPP_TAG_INTEGER)
1109                                 job_id = attr->values[0].integer;
1110
1111                         if (strcmp(attr->name, "job-k-octets") == 0 &&
1112                             attr->value_tag == IPP_TAG_INTEGER)
1113                                 job_k_octets = attr->values[0].integer;
1114
1115                         if (strcmp(attr->name, "job-priority") == 0 &&
1116                             attr->value_tag == IPP_TAG_INTEGER)
1117                                 job_priority = attr->values[0].integer;
1118
1119                         if (strcmp(attr->name, "job-state") == 0 &&
1120                             attr->value_tag == IPP_TAG_ENUM)
1121                                 job_status = (ipp_jstate_t)(attr->values[0].integer);
1122
1123                         if (strcmp(attr->name, "time-at-creation") == 0 &&
1124                             attr->value_tag == IPP_TAG_INTEGER)
1125                         {
1126                                /*
1127                                 * If jobs times are in Unix time, the accuracy of the job
1128                                 * start time depends upon the iPrint server's time being
1129                                 * set correctly.  Otherwise, the accuracy depends upon
1130                                 * the Samba server's time being set correctly
1131                                 */
1132
1133                                 if (jobUseUnixTime)
1134                                         job_time = attr->values[0].integer; 
1135                                 else
1136                                         job_time = time(NULL) - printer_up_time + attr->values[0].integer;
1137                         }
1138
1139                         if (strcmp(attr->name, "job-name") == 0 &&
1140                             (attr->value_tag == IPP_TAG_NAMELANG ||
1141                              attr->value_tag == IPP_TAG_NAME))
1142                                 job_name = attr->values[0].string.text;
1143
1144                         if (strcmp(attr->name, "job-originating-user-name") == 0 &&
1145                             (attr->value_tag == IPP_TAG_NAMELANG ||
1146                              attr->value_tag == IPP_TAG_NAME))
1147                                 user_name = attr->values[0].string.text;
1148
1149                         attr = attr->next;
1150                 }
1151
1152                /*
1153                 * See if we have everything needed...
1154                 */
1155
1156                 if (user_name == NULL || job_name == NULL || job_id == 0) {
1157                         if (attr == NULL)
1158                                 break;
1159                         else
1160                                 continue;
1161                 }
1162
1163                 temp->job      = job_id;
1164                 temp->size     = job_k_octets * 1024;
1165                 temp->status   = job_status == IPP_JOB_PENDING ? LPQ_QUEUED :
1166                                  job_status == IPP_JOB_STOPPED ? LPQ_PAUSED :
1167                                  job_status == IPP_JOB_HELD ? LPQ_PAUSED :
1168                                  LPQ_PRINTING;
1169                 temp->priority = job_priority;
1170                 temp->time     = job_time;
1171                 strncpy(temp->fs_user, user_name, sizeof(temp->fs_user) - 1);
1172                 strncpy(temp->fs_file, job_name, sizeof(temp->fs_file) - 1);
1173
1174                 qcount ++;
1175
1176                 if (attr == NULL)
1177                         break;
1178         }
1179
1180        /*
1181         * Return the job queue...
1182         */
1183
1184         *q = queue;
1185
1186  out:
1187         if (response)
1188                 ippDelete(response);
1189
1190         if (language)
1191                 cupsLangFree(language);
1192
1193         if (http)
1194                 httpClose(http);
1195
1196         return qcount;
1197 }
1198
1199
1200 /*
1201  * 'iprint_queue_pause()' - Pause a print queue.
1202  */
1203
1204 static int iprint_queue_pause(int snum)
1205 {
1206         return(-1); /* Not supported without credentials */
1207 }
1208
1209
1210 /*
1211  * 'iprint_queue_resume()' - Restart a print queue.
1212  */
1213
1214 static int iprint_queue_resume(int snum)
1215 {
1216         return(-1); /* Not supported without credentials */
1217 }
1218
1219 /*******************************************************************
1220  * iPrint printing interface definitions...
1221  ******************************************************************/
1222
1223 struct printif  iprint_printif =
1224 {
1225         PRINT_IPRINT,
1226         iprint_queue_get,
1227         iprint_queue_pause,
1228         iprint_queue_resume,
1229         iprint_job_delete,
1230         iprint_job_pause,
1231         iprint_job_resume,
1232         iprint_job_submit,
1233 };
1234
1235 #else
1236  /* this keeps fussy compilers happy */
1237  void print_iprint_dummy(void);
1238  void print_iprint_dummy(void) {}
1239 #endif /* HAVE_IPRINT */