cgi-bin/printers.c

   1 /*
   2  * "$Id: printers.c 6889 2007-08-29 22:23:35Z mike $"
   3  *
   4  *   Printer status CGI for the Common UNIX Printing System (CUPS).
   5  *
   6  *   Copyright 2007-2008 by Apple Inc.
   7  *   Copyright 1997-2006 by Easy Software Products.
   8  *
   9  *   These coded instructions, statements, and computer programs are the
  10  *   property of Apple Inc. and are protected by Federal copyright
  11  *   law.  Distribution and use rights are outlined in the file "LICENSE.txt"
  12  *   which should have been included with this file.  If this file is
  13  *   file is missing or damaged, see the license at "http://www.cups.org/".
  14  *
  15  * Contents:
  16  *
  17  *   main()              - Main entry for CGI.
  18  *   print_command()     - Send a print command to the printer.
  19  *   show_all_printers() - Show all printers...
  20  *   show_printer()      - Show a single printer.
  21  */
  22
  23 /*
  24  * Include necessary headers...
  25  */
  26
  27 #include "cgi-private.h"
  28 #include <errno.h>
  29
  30
  31 /*
  32  * Local functions...
  33  */
  34
  35 void    print_command(http_t *http, const char *printer, const char *command);
  36 void    show_all_printers(http_t *http, const char *username);
  37 void    show_printer(http_t *http, const char *printer);
  38
  39
  40 /*
  41  * 'main()' - Main entry for CGI.
  42  */
  43
  44 int                                     /* O - Exit status */
  45 main(int  argc,                         /* I - Number of command-line arguments */
  46      char *argv[])                      /* I - Command-line arguments */
  47 {
  48   const char    *printer;               /* Printer name */
  49   const char    *user;                  /* Username */
  50   http_t        *http;                  /* Connection to the server */
  51   ipp_t         *request,               /* IPP request */
  52                 *response;              /* IPP response */
  53   ipp_attribute_t *attr;                /* IPP attribute */
  54   const char    *op;                    /* Operation to perform, if any */
  55   static const char *def_attrs[] =      /* Attributes for default printer */
  56                 {
  57                   "printer-name",
  58                   "printer-uri-supported"
  59                 };
  60
  61
  62  /*
  63   * Get any form variables...
  64   */
  65
  66   cgiInitialize();
  67
  68   op = cgiGetVariable("OP");
  69
  70  /*
  71   * Set the web interface section...
  72   */
  73
  74   cgiSetVariable("SECTION", "printers");
  75
  76  /*
  77   * See if we are displaying a printer or all printers...
  78   */
  79
  80   if ((printer = getenv("PATH_INFO")) != NULL)
  81   {
  82     printer ++;
  83
  84     if (!*printer)
  85       printer = NULL;
  86   }
  87
  88  /*
  89   * See who is logged in...
  90   */
  91
  92   user = getenv("REMOTE_USER");
  93
  94  /*
  95   * Connect to the HTTP server...
  96   */
  97
  98   http = httpConnectEncrypt(cupsServer(), ippPort(), cupsEncryption());
  99
 100  /*
 101   * Get the default printer...
 102   */
 103
 104   if (!op || !cgiIsPOST())
 105   {
 106    /*
 107     * Get the default destination...
 108     */
 109
 110     request = ippNewRequest(CUPS_GET_DEFAULT);
 111
 112     ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
 113                   "requested-attributes",
 114                   sizeof(def_attrs) / sizeof(def_attrs[0]), NULL, def_attrs);
 115
 116     if ((response = cupsDoRequest(http, request, "/")) != NULL)
 117     {
 118       if ((attr = ippFindAttribute(response, "printer-name", IPP_TAG_NAME)) != NULL)
 119         cgiSetVariable("DEFAULT_NAME", attr->values[0].string.text);
 120
 121       if ((attr = ippFindAttribute(response, "printer-uri-supported", IPP_TAG_URI)) != NULL)
 122       {
 123         char    url[HTTP_MAX_URI];      /* New URL */
 124
 125
 126         cgiSetVariable("DEFAULT_URI",
 127                        cgiRewriteURL(attr->values[0].string.text,
 128                                      url, sizeof(url), NULL));
 129       }
 130
 131       ippDelete(response);
 132     }
 133
 134    /*
 135     * See if we need to show a list of printers or the status of a
 136     * single printer...
 137     */
 138
 139     if (!printer)
 140       show_all_printers(http, user);
 141     else
 142       show_printer(http, printer);
 143   }
 144   else if (!strcasecmp(op, "print-self-test-page") && printer)
 145     print_command(http, printer, "PrintSelfTestPage");
 146   else if (!strcasecmp(op, "clean-print-heads") && printer)
 147     print_command(http, printer, "Clean all");
 148   else if (!strcasecmp(op, "print-test-page") && printer)
 149     cgiPrintTestPage(http, printer);
 150   else if (!strcasecmp(op, "move-jobs") && printer)
 151     cgiMoveJobs(http, printer, 0);
 152   else
 153   {
 154    /*
 155     * Unknown/bad operation...
 156     */
 157
 158     if (printer)
 159       cgiStartHTML(printer);
 160     else
 161       cgiStartHTML(cgiText(_("Printers")));
 162
 163     cgiCopyTemplateLang("error-op.tmpl");
 164     cgiEndHTML();
 165   }
 166
 167  /*
 168   * Close the HTTP server connection...
 169   */
 170
 171   httpClose(http);
 172
 173  /*
 174   * Return with no errors...
 175   */
 176
 177   return (0);
 178 }
 179
 180
 181 /*
 182  * 'print_command()' - Send a print command to the printer.
 183  */
 184
 185 void
 186 print_command(http_t     *http,         /* I - Connection to server */
 187               const char *printer,      /* I - Printer */
 188               const char *command)      /* I - Command to send */
 189 {
 190   cups_file_t   *fp;                    /* File pointer */
 191   char          filename[1024];         /* Temporary file */
 192   ipp_t         *request,               /* IPP request */
 193                 *response;              /* IPP response */
 194   char          uri[HTTP_MAX_URI],      /* Printer URI */
 195                 resource[1024],         /* POST resource path */
 196                 refresh[1024];          /* Refresh URL */
 197   const char    *user;                  /* Username */
 198
 199
 200  /*
 201   * See who is logged in...
 202   */
 203
 204   if ((user = getenv("REMOTE_USER")) == NULL)
 205     user = "guest";
 206
 207  /*
 208   * Create the CUPS command file to print...
 209   */
 210
 211   if ((fp = cupsTempFile2(filename, sizeof(filename))) == NULL)
 212   {
 213     cgiStartHTML(cgiText(_("Printer Maintenance")));
 214     cgiSetVariable("MESSAGE", _("Unable to create temporary file:"));
 215     cgiSetVariable("ERROR", strerror(errno));
 216     cgiCopyTemplateLang("error.tmpl");
 217     cgiEndHTML();
 218     return;
 219   }
 220
 221   cupsFilePuts(fp, "#CUPS-COMMAND\n");
 222   cupsFilePrintf(fp, "%s\n", command);
 223   cupsFileClose(fp);
 224
 225  /*
 226   * Point to the printer...
 227   */
 228
 229   snprintf(resource, sizeof(resource), "/printers/%s", printer);
 230
 231   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
 232                    "localhost", ippPort(), "/printers/%s", printer);
 233
 234  /*
 235   * Build an IPP_PRINT_JOB request, which requires the following
 236   * attributes:
 237   *
 238   *    attributes-charset
 239   *    attributes-natural-language
 240   *    printer-uri
 241   *    requesting-user-name
 242   *    document-format
 243   */
 244
 245   request = ippNewRequest(IPP_PRINT_JOB);
 246
 247   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri",
 248                NULL, uri);
 249
 250   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
 251                "requesting-user-name", NULL, user);
 252
 253   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "job-name",
 254                NULL, "Printer Maintenance");
 255
 256   ippAddString(request, IPP_TAG_JOB, IPP_TAG_MIMETYPE, "document-format",
 257                NULL, "application/postscript");
 258
 259  /*
 260   * Do the request and get back a response...
 261   */
 262
 263   if ((response = cupsDoFileRequest(http, request, resource,
 264                                     filename)) != NULL)
 265   {
 266     cgiSetIPPVars(response, NULL, NULL, NULL, 0);
 267
 268     ippDelete(response);
 269   }
 270
 271   unlink(filename);
 272
 273   if (cupsLastError() <= IPP_OK_CONFLICT)
 274   {
 275    /*
 276     * Automatically reload the printer status page...
 277     */
 278
 279     cgiFormEncode(uri, resource, sizeof(uri));
 280     snprintf(refresh, sizeof(refresh), "2;URL=%s", uri);
 281     cgiSetVariable("refresh_page", refresh);
 282   }
 283   else if (cupsLastError() == IPP_NOT_AUTHORIZED)
 284   {
 285     puts("Status: 401\n");
 286     exit(0);
 287   }
 288
 289   cgiStartHTML(cgiText(_("Printer Maintenance")));
 290
 291   if (cupsLastError() > IPP_OK_CONFLICT)
 292     cgiShowIPPError(_("Unable to send maintenance job:"));
 293   else
 294   {
 295     cgiSetVariable("PRINTER_NAME", printer);
 296
 297     cgiCopyTemplateLang("maintenance.tmpl");
 298   }
 299
 300   cgiEndHTML();
 301 }
 302
 303
 304 /*
 305  * 'show_all_printers()' - Show all printers...
 306  */
 307
 308 void
 309 show_all_printers(http_t     *http,     /* I - Connection to server */
 310                   const char *user)     /* I - Username */
 311 {
 312   int                   i;              /* Looping var */
 313   ipp_t                 *request,       /* IPP request */
 314                         *response;      /* IPP response */
 315   cups_array_t          *printers;      /* Array of printer objects */
 316   ipp_attribute_t       *printer,       /* Printer object */
 317                         *attr;          /* Current attribute */
 318   int                   ascending,      /* Order of printers (0 = descending) */
 319                         first,          /* First printer to show */
 320                         count;          /* Number of printers */
 321   const char            *var;           /* Form variable */
 322   void                  *search;        /* Search data */
 323   char                  val[1024];      /* Form variable */
 324
 325
 326   fprintf(stderr, "DEBUG: show_all_printers(http=%p, user=\"%s\")\n",
 327           http, user ? user : "(null)");
 328
 329  /*
 330   * Show the standard header...
 331   */
 332
 333   cgiStartHTML(cgiText(_("Printers")));
 334
 335  /*
 336   * Build a CUPS_GET_PRINTERS request, which requires the following
 337   * attributes:
 338   *
 339   *    attributes-charset
 340   *    attributes-natural-language
 341   *    printer-type
 342   *    printer-type-mask
 343   *    requesting-user-name
 344   */
 345
 346   request = ippNewRequest(CUPS_GET_PRINTERS);
 347
 348   ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_ENUM,
 349                 "printer-type", 0);
 350   ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_ENUM,
 351                 "printer-type-mask", CUPS_PRINTER_CLASS);
 352
 353   if (user)
 354     ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
 355                  "requesting-user-name", NULL, user);
 356
 357   cgiGetAttributes(request, "printers.tmpl");
 358
 359  /*
 360   * Do the request and get back a response...
 361   */
 362
 363   if ((response = cupsDoRequest(http, request, "/")) != NULL)
 364   {
 365    /*
 366     * Get a list of matching job objects.
 367     */
 368
 369     if ((var = cgiGetVariable("QUERY")) != NULL &&
 370         !cgiGetVariable("CLEAR"))
 371       search = cgiCompileSearch(var);
 372     else
 373       search = NULL;
 374
 375     printers  = cgiGetIPPObjects(response, search);
 376     count     = cupsArrayCount(printers);
 377
 378     if (search)
 379       cgiFreeSearch(search);
 380
 381    /*
 382     * Figure out which printers to display...
 383     */
 384
 385     if ((var = cgiGetVariable("FIRST")) != NULL)
 386       first = atoi(var);
 387     else
 388       first = 0;
 389
 390     if (first >= count)
 391       first = count - CUPS_PAGE_MAX;
 392
 393     first = (first / CUPS_PAGE_MAX) * CUPS_PAGE_MAX;
 394
 395     if (first < 0)
 396       first = 0;
 397
 398     sprintf(val, "%d", count);
 399     cgiSetVariable("TOTAL", val);
 400
 401     if ((var = cgiGetVariable("ORDER")) != NULL)
 402       ascending = !strcasecmp(var, "asc");
 403     else
 404       ascending = 1;
 405
 406     if (ascending)
 407     {
 408       for (i = 0, printer = (ipp_attribute_t *)cupsArrayIndex(printers, first);
 409            i < CUPS_PAGE_MAX && printer;
 410            i ++, printer = (ipp_attribute_t *)cupsArrayNext(printers))
 411       {
 412         cgiSetIPPObjectVars(printer, NULL, i);
 413
 414         cgiSetArray("cupscommand", i, "0");
 415
 416         for (attr = printer; attr; attr = attr->next)
 417           if (attr->group_tag != IPP_TAG_PRINTER || !attr->name)
 418             break;
 419           else if (!strcmp(attr->name, "printer-type"))
 420           {
 421             if (attr->values[0].integer & CUPS_PRINTER_COMMANDS)
 422               cgiSetArray("cupscommand", i, "1");
 423             break;
 424           }
 425       }
 426     }
 427     else
 428     {
 429       for (i = 0, printer = (ipp_attribute_t *)cupsArrayIndex(printers, count - first - 1);
 430            i < CUPS_PAGE_MAX && printer;
 431            i ++, printer = (ipp_attribute_t *)cupsArrayPrev(printers))
 432       {
 433         cgiSetIPPObjectVars(printer, NULL, i);
 434
 435         cgiSetArray("cupscommand", i, "0");
 436
 437         for (attr = printer; attr; attr = attr->next)
 438           if (attr->group_tag == IPP_TAG_ZERO || !attr->name)
 439             break;
 440           else if (!strcmp(attr->name, "printer-type"))
 441           {
 442             if (attr->values[0].integer & CUPS_PRINTER_COMMANDS)
 443               cgiSetArray("cupscommand", i, "1");
 444             break;
 445           }
 446       }
 447     }
 448
 449    /*
 450     * Save navigation URLs...
 451     */
 452
 453     cgiSetVariable("THISURL", "/printers/");
 454
 455     if (first > 0)
 456     {
 457       sprintf(val, "%d", first - CUPS_PAGE_MAX);
 458       cgiSetVariable("PREV", val);
 459     }
 460
 461     if ((first + CUPS_PAGE_MAX) < count)
 462     {
 463       sprintf(val, "%d", first + CUPS_PAGE_MAX);
 464       cgiSetVariable("NEXT", val);
 465     }
 466
 467    /*
 468     * Then show everything...
 469     */
 470
 471     cgiCopyTemplateLang("search.tmpl");
 472
 473     cgiCopyTemplateLang("printers-header.tmpl");
 474
 475     if (count > 0)
 476       cgiCopyTemplateLang("pager.tmpl");
 477
 478     cgiCopyTemplateLang("printers.tmpl");
 479
 480     if (count > 0)
 481       cgiCopyTemplateLang("pager.tmpl");
 482
 483    /*
 484     * Delete the response...
 485     */
 486
 487     cupsArrayDelete(printers);
 488     ippDelete(response);
 489   }
 490   else
 491   {
 492    /*
 493     * Show the error...
 494     */
 495
 496     cgiShowIPPError(_("Unable to get printer list:"));
 497   }
 498
 499    cgiEndHTML();
 500 }
 501
 502
 503 /*
 504  * 'show_printer()' - Show a single printer.
 505  */
 506
 507 void
 508 show_printer(http_t     *http,          /* I - Connection to server */
 509              const char *printer)       /* I - Name of printer */
 510 {
 511   ipp_t         *request,               /* IPP request */
 512                 *response;              /* IPP response */
 513   ipp_attribute_t *attr;                /* IPP attribute */
 514   char          uri[HTTP_MAX_URI];      /* Printer URI */
 515   char          refresh[1024];          /* Refresh URL */
 516
 517
 518   fprintf(stderr, "DEBUG: show_printer(http=%p, printer=\"%s\")\n",
 519           http, printer ? printer : "(null)");
 520
 521  /*
 522   * Build an IPP_GET_PRINTER_ATTRIBUTES request, which requires the following
 523   * attributes:
 524   *
 525   *    attributes-charset
 526   *    attributes-natural-language
 527   *    printer-uri
 528   */
 529
 530   request = ippNewRequest(IPP_GET_PRINTER_ATTRIBUTES);
 531
 532   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
 533                    "localhost", 0, "/printers/%s", printer);
 534   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri", NULL,
 535                uri);
 536
 537   cgiGetAttributes(request, "printers.tmpl");
 538
 539  /*
 540   * Do the request and get back a response...
 541   */
 542
 543   if ((response = cupsDoRequest(http, request, "/")) != NULL)
 544   {
 545    /*
 546     * Got the result; set the CGI variables and check the status of a
 547     * single-queue request...
 548     */
 549
 550     cgiSetIPPVars(response, NULL, NULL, NULL, 0);
 551
 552     if ((attr = ippFindAttribute(response, "printer-type",
 553                                  IPP_TAG_ENUM)) != NULL)
 554     {
 555       cgiSetVariable("cupscommand",
 556                      (attr->values[0].integer & CUPS_PRINTER_COMMANDS) ?
 557                          "1" : "0");
 558     }
 559
 560     if (printer && (attr = ippFindAttribute(response, "printer-state",
 561                                             IPP_TAG_ENUM)) != NULL &&
 562         attr->values[0].integer == IPP_PRINTER_PROCESSING)
 563     {
 564      /*
 565       * Printer is processing - automatically refresh the page until we
 566       * are done printing...
 567       */
 568
 569       cgiFormEncode(uri, printer, sizeof(uri));
 570       snprintf(refresh, sizeof(refresh), "10;URL=/printers/%s", uri);
 571       cgiSetVariable("refresh_page", refresh);
 572     }
 573
 574    /*
 575     * Delete the response...
 576     */
 577
 578     ippDelete(response);
 579
 580    /*
 581     * Show the standard header...
 582     */
 583
 584     cgiStartHTML(printer);
 585
 586    /*
 587     * Show the printer status...
 588     */
 589
 590     cgiSetVariable("_SINGLE_DEST", "1");
 591     cgiCopyTemplateLang("printers.tmpl");
 592
 593    /*
 594     * Show jobs for the specified printer...
 595     */
 596
 597     cgiCopyTemplateLang("printer-jobs-header.tmpl");
 598     cgiShowJobs(http, printer);
 599   }
 600   else
 601   {
 602    /*
 603     * Show the IPP error...
 604     */
 605
 606     cgiStartHTML(printer);
 607     cgiShowIPPError(_("Unable to get printer status:"));
 608   }
 609
 610    cgiEndHTML();
 611 }
 612
 613
 614 /*
 615  * End of "$Id: printers.c 6889 2007-08-29 22:23:35Z mike $".
 616  */