cups/adminutil.c

   1 /*
   2  * "$Id: adminutil.c 181 2006-06-22 20:01:18Z jlovell $"
   3  *
   4  *   Administration utility API definitions for the Common UNIX Printing
   5  *   System (CUPS).
   6  *
   7  *   MANY OF THE FUNCTIONS IN THIS HEADER ARE PRIVATE AND SUBJECT TO
   8  *   CHANGE AT ANY TIME.  USE AT YOUR OWN RISK.
   9  *
  10  *   Copyright 2001-2006 by Easy Software Products.
  11  *
  12  *   These coded instructions, statements, and computer programs are the
  13  *   property of Easy Software Products and are protected by Federal
  14  *   copyright law.  Distribution and use rights are outlined in the file
  15  *   "LICENSE.txt" which should have been included with this file.  If this
  16  *   file is missing or damaged please contact Easy Software Products
  17  *   at:
  18  *
  19  *       Attn: CUPS Licensing Information
  20  *       Easy Software Products
  21  *       44141 Airport View Drive, Suite 204
  22  *       Hollywood, Maryland 20636 USA
  23  *
  24  *       Voice: (301) 373-9600
  25  *       EMail: cups-info@cups.org
  26  *         WWW: http://www.cups.org
  27  *
  28  *   This file is subject to the Apple OS-Developed Software exception.
  29  *
  30  * Contents:
  31  *
  32  *   cupsAdminCreateWindowsPPD()   - Create the Windows PPD file for a printer.
  33  *   cupsAdminExportSamba()        - Export a printer to Samba.
  34  *   _cupsAdminGetServerSettings() - Get settings from the server.
  35  *   _cupsAdminSetServerSettings() - Set settings on the server.
  36  *   do_samba_command()            - Do a SAMBA command.
  37  *   get_cupsd_conf()              - Get the current cupsd.conf file.
  38  *   invalidate_cupsd_cache()      - Invalidate the cached cupsd.conf settings.
  39  *   write_option()                - Write a CUPS option to a PPD file.
  40  */
  41
  42 /*
  43  * Include necessary headers...
  44  */
  45
  46 #include "adminutil.h"
  47 #include "globals.h"
  48 #include "debug.h"
  49 #include <errno.h>
  50 #include <fcntl.h>
  51 #include <unistd.h>
  52 #include <sys/stat.h>
  53 #include <sys/wait.h>
  54
  55
  56 /*
  57  * Local functions...
  58  */
  59
  60 static int              do_samba_command(const char *command,
  61                                          const char *address,
  62                                          const char *subcommand,
  63                                          const char *authfile,
  64                                          FILE *logfile);
  65 static http_status_t    get_cupsd_conf(http_t *http, _cups_globals_t *cg,
  66                                        time_t last_update, char *name,
  67                                        int namelen, int *remote);
  68 static void             invalidate_cupsd_cache(_cups_globals_t *cg);
  69 static void             write_option(cups_file_t *dstfp, int order,
  70                                      const char *name, const char *text,
  71                                      const char *attrname,
  72                                      ipp_attribute_t *suppattr,
  73                                      ipp_attribute_t *defattr, int defval,
  74                                      int valcount);
  75
  76
  77 /*
  78  * 'cupsAdminCreateWindowsPPD()' - Create the Windows PPD file for a printer.
  79  */
  80
  81 char *                                  /* O - PPD file or NULL */
  82 cupsAdminCreateWindowsPPD(
  83     http_t     *http,                   /* I - Connection to server */
  84     const char *dest,                   /* I - Printer or class */
  85     char       *buffer,                 /* I - Filename buffer */
  86     int        bufsize)                 /* I - Size of filename buffer */
  87 {
  88   const char            *src;           /* Source PPD filename */
  89   cups_file_t           *srcfp,         /* Source PPD file */
  90                         *dstfp;         /* Destination PPD file */
  91   ipp_t                 *request,       /* IPP request */
  92                         *response;      /* IPP response */
  93   ipp_attribute_t       *suppattr,      /* IPP -supported attribute */
  94                         *defattr;       /* IPP -default attribute */
  95   cups_lang_t           *language;      /* Current language */
  96   char                  line[256],      /* Line from PPD file */
  97                         junk[256],      /* Extra junk to throw away */
  98                         *ptr,           /* Pointer into line */
  99                         uri[1024],      /* Printer URI */
 100                         option[41],     /* Option */
 101                         choice[41];     /* Choice */
 102   int                   jcloption,      /* In a JCL option? */
 103                         linenum;        /* Current line number */
 104   time_t                curtime;        /* Current time */
 105   struct tm             *curdate;       /* Current date */
 106   static const char     *pattrs[] =     /* Printer attributes we want */
 107                         {
 108                           "job-hold-until-supported",
 109                           "job-hold-until-default",
 110                           "job-sheets-supported",
 111                           "job-sheets-default",
 112                           "job-priority-supported",
 113                           "job-priority-default"
 114                         };
 115
 116
 117  /*
 118   * Range check the input...
 119   */
 120
 121   if (buffer)
 122     *buffer = '\0';
 123
 124   if (!http || !dest || !buffer || bufsize < 2)
 125     return (NULL);
 126
 127  /*
 128   * Get the PPD file...
 129   */
 130
 131   if ((src = cupsGetPPD2(http, dest)) == NULL)
 132     return (NULL);
 133
 134  /*
 135   * Get the supported banner pages, etc. for the printer...
 136   */
 137
 138   request = ippNewRequest(IPP_GET_PRINTER_ATTRIBUTES);
 139
 140   httpAssembleURIf(HTTP_URI_CODING_ALL, uri, sizeof(uri), "ipp", NULL,
 141                    "localhost", 0, "/printers/%s", dest);
 142   ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
 143                "printer-uri", NULL, uri);
 144
 145   ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
 146                 "requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]),
 147                 NULL, pattrs);
 148
 149  /*
 150   * Do the request and get back a response...
 151   */
 152
 153   response = cupsDoRequest(http, request, "/");
 154   if (!response || cupsLastError() > IPP_OK_CONFLICT)
 155   {
 156     unlink(src);
 157     return (NULL);
 158   }
 159
 160  /*
 161   * Open the original PPD file...
 162   */
 163
 164   if ((srcfp = cupsFileOpen(src, "rb")) == NULL)
 165     return (NULL);
 166
 167  /*
 168   * Create a temporary output file using the destination buffer...
 169   */
 170
 171   if ((dstfp = cupsTempFile2(buffer, bufsize)) == NULL)
 172   {
 173     cupsFileClose(srcfp);
 174
 175     unlink(src);
 176
 177     return (NULL);
 178   }
 179
 180  /*
 181   * Write a new header explaining that this isn't the original PPD...
 182   */
 183
 184   cupsFilePuts(dstfp, "*PPD-Adobe: \"4.3\"\n");
 185
 186   curtime = time(NULL);
 187   curdate = gmtime(&curtime);
 188
 189   cupsFilePrintf(dstfp, "*%% Modified on %04d%02d%02d%02d%02d%02d+0000 "
 190                         "for CUPS Windows Driver\n",
 191                  curdate->tm_year + 1900, curdate->tm_mon + 1, curdate->tm_mday,
 192                  curdate->tm_hour, curdate->tm_min, curdate->tm_sec);
 193
 194  /*
 195   * Read the existing PPD file, converting all PJL commands to CUPS
 196   * job ticket comments...
 197   */
 198
 199   jcloption = 0;
 200   linenum   = 0;
 201   language  = cupsLangDefault();
 202
 203   while (cupsFileGets(srcfp, line, sizeof(line)))
 204   {
 205     linenum ++;
 206
 207     if (!strncmp(line, "*PPD-Adobe:", 11))
 208     {
 209      /*
 210       * Already wrote the PPD header...
 211       */
 212
 213       continue;
 214     }
 215     else if (!strncmp(line, "*JCLBegin:", 10) ||
 216              !strncmp(line, "*JCLToPSInterpreter:", 20) ||
 217              !strncmp(line, "*JCLEnd:", 8) ||
 218              !strncmp(line, "*Protocols:", 11))
 219     {
 220      /*
 221       * Don't use existing JCL keywords; we'll create our own, below...
 222       */
 223
 224       cupsFilePrintf(dstfp, "*%% Commented out for CUPS Windows Driver...\n"
 225                             "*%%%s\n", line + 1);
 226       continue;
 227     }
 228     else if (!strncmp(line, "*JCLOpenUI", 10))
 229     {
 230       jcloption = 1;
 231       cupsFilePrintf(dstfp, "%s\n", line);
 232     }
 233     else if (!strncmp(line, "*JCLCloseUI", 11))
 234     {
 235       jcloption = 0;
 236       cupsFilePrintf(dstfp, "%s\n", line);
 237     }
 238     else if (jcloption &&
 239              strncmp(line, "*End", 4) &&
 240              strncmp(line, "*Default", 8) &&
 241              strncmp(line, "*OrderDependency", 16))
 242     {
 243       if ((ptr = strchr(line, ':')) == NULL)
 244       {
 245         snprintf(line, sizeof(line),
 246                   _cupsLangString(language, _("Missing value on line %d!\n")),
 247                   linenum);
 248         _cupsSetError(IPP_DOCUMENT_FORMAT_ERROR, line);
 249
 250         cupsFileClose(srcfp);
 251         cupsFileClose(dstfp);
 252
 253         unlink(src);
 254         unlink(buffer);
 255
 256         *buffer = '\0';
 257
 258         return (NULL);
 259       }
 260
 261       if ((ptr = strchr(ptr, '\"')) == NULL)
 262       {
 263         snprintf(line, sizeof(line),
 264                  _cupsLangString(language,
 265                                  _("Missing double quote on line %d!\n")),
 266                  linenum);
 267         _cupsSetError(IPP_DOCUMENT_FORMAT_ERROR, line);
 268
 269         cupsFileClose(srcfp);
 270         cupsFileClose(dstfp);
 271
 272         unlink(src);
 273         unlink(buffer);
 274
 275         *buffer = '\0';
 276
 277         return (NULL);
 278       }
 279
 280       if (sscanf(line, "*%40s%*[ \t]%40[^/]", option, choice) != 2)
 281       {
 282         snprintf(line, sizeof(line),
 283                  _cupsLangString(language,
 284                                  _("Bad option + choice on line %d!\n")),
 285                  linenum);
 286         _cupsSetError(IPP_DOCUMENT_FORMAT_ERROR, line);
 287
 288         cupsFileClose(srcfp);
 289         cupsFileClose(dstfp);
 290
 291         unlink(src);
 292         unlink(buffer);
 293
 294         *buffer = '\0';
 295
 296         return (NULL);
 297       }
 298
 299       if (strchr(ptr + 1, '\"') == NULL)
 300       {
 301        /*
 302         * Skip remaining...
 303         */
 304
 305         while (cupsFileGets(srcfp, junk, sizeof(junk)) != NULL)
 306         {
 307           linenum ++;
 308
 309           if (!strncmp(junk, "*End", 4))
 310             break;
 311         }
 312       }
 313
 314       snprintf(ptr + 1, sizeof(line) - (ptr - line + 1),
 315                "%%cupsJobTicket: %s=%s\n\"\n*End", option, choice);
 316
 317       cupsFilePrintf(dstfp, "*%% Changed for CUPS Windows Driver...\n%s\n",
 318                      line);
 319     }
 320     else
 321       cupsFilePrintf(dstfp, "%s\n", line);
 322   }
 323
 324   cupsFileClose(srcfp);
 325   unlink(src);
 326
 327  /*
 328   * Now add the CUPS-specific attributes and options...
 329   */
 330
 331   cupsFilePuts(dstfp, "\n*% CUPS Job Ticket support and options...\n");
 332   cupsFilePuts(dstfp, "*Protocols: PJL\n");
 333   cupsFilePuts(dstfp, "*JCLBegin: \"%!PS-Adobe-3.0<0A>\"\n");
 334   cupsFilePuts(dstfp, "*JCLToPSInterpreter: \"\"\n");
 335   cupsFilePuts(dstfp, "*JCLEnd: \"\"\n");
 336
 337   cupsFilePuts(dstfp, "\n*OpenGroup: CUPS/CUPS Options\n\n");
 338
 339   if ((defattr = ippFindAttribute(response, "job-hold-until-default",
 340                                   IPP_TAG_ZERO)) != NULL &&
 341       (suppattr = ippFindAttribute(response, "job-hold-until-supported",
 342                                    IPP_TAG_ZERO)) != NULL)
 343     write_option(dstfp, 10, "cupsJobHoldUntil", "Hold Until", "job-hold-until",
 344                  suppattr, defattr, 0, 1);
 345
 346   if ((defattr = ippFindAttribute(response, "job-priority-default",
 347                                   IPP_TAG_INTEGER)) != NULL &&
 348       (suppattr = ippFindAttribute(response, "job-priority-supported",
 349                                    IPP_TAG_RANGE)) != NULL)
 350     write_option(dstfp, 11, "cupsJobPriority", "Priority", "job-priority",
 351                  suppattr, defattr, 0, 1);
 352
 353   if ((defattr = ippFindAttribute(response, "job-sheets-default",
 354                                   IPP_TAG_ZERO)) != NULL &&
 355       (suppattr = ippFindAttribute(response, "job-sheets-supported",
 356                                    IPP_TAG_ZERO)) != NULL)
 357   {
 358     write_option(dstfp, 20, "cupsJobSheetsStart", "Start Banner",
 359                  "job-sheets", suppattr, defattr, 0, 2);
 360     write_option(dstfp, 21, "cupsJobSheetsEnd", "End Banner",
 361                  "job-sheets", suppattr, defattr, 1, 2);
 362   }
 363
 364   cupsFilePuts(dstfp, "*CloseGroup: CUPS\n");
 365   cupsFileClose(dstfp);
 366
 367   ippDelete(response);
 368
 369   return (buffer);
 370 }
 371
 372
 373 /*
 374  * 'cupsAdminExportSamba()' - Export a printer to Samba.
 375  */
 376
 377 int                                     /* O - 1 on success, 0 on failure */
 378 cupsAdminExportSamba(
 379     const char *dest,                   /* I - Destination to export */
 380     const char *ppd,                    /* I - PPD file */
 381     const char *samba_server,           /* I - Samba server */
 382     const char *samba_user,             /* I - Samba username */
 383     const char *samba_password,         /* I - Samba password */
 384     FILE       *logfile)                /* I - Log file, if any */
 385 {
 386   int                   status;         /* Status of Samba commands */
 387   int                   have_drivers;   /* Have drivers? */
 388   char                  file[1024],     /* File to test for */
 389                         authfile[1024], /* Temporary authentication file */
 390                         address[1024],  /* Address for command */
 391                         subcmd[1024],   /* Sub-command */
 392                         message[1024];  /* Error message */
 393   cups_file_t           *fp;            /* Authentication file */
 394   cups_lang_t           *language;      /* Current language */
 395   _cups_globals_t       *cg = _cupsGlobals();
 396                                         /* Global data */
 397
 398
 399  /*
 400   * Range check input...
 401   */
 402
 403   if (!dest || !ppd || !samba_server || !samba_user || !samba_password)
 404   {
 405     _cupsSetError(IPP_INTERNAL_ERROR, NULL);
 406     return (0);
 407   }
 408
 409  /*
 410   * Create a temporary authentication file for Samba...
 411   */
 412
 413   if ((fp = cupsTempFile2(authfile, sizeof(authfile))) == NULL)
 414   {
 415     _cupsSetError(IPP_INTERNAL_ERROR, strerror(errno));
 416     return (0);
 417   }
 418
 419   cupsFilePrintf(fp, "username = %s\n", samba_user);
 420   cupsFilePrintf(fp, "password = %s\n", samba_password);
 421   cupsFileClose(fp);
 422
 423  /*
 424   * See which drivers are available; the new CUPS v6 and Adobe drivers
 425   * depend on the Windows 2k PS driver, so copy that driver first:
 426   *
 427   * Files:
 428   *
 429   *     ps5ui.dll
 430   *     pscript.hlp
 431   *     pscript.ntf
 432   *     pscript5.dll
 433   */
 434
 435   have_drivers = 0;
 436   language     = cupsLangDefault();
 437
 438   snprintf(file, sizeof(file), "%s/drivers/pscript5.dll", cg->cups_datadir);
 439   if (!access(file, 0))
 440   {
 441     have_drivers |= 1;
 442
 443    /*
 444     * Windows 2k driver is installed; do the smbclient commands needed
 445     * to copy the Win2k drivers over...
 446     */
 447
 448     snprintf(address, sizeof(address), "//%s/print$", samba_server);
 449
 450     snprintf(subcmd, sizeof(subcmd),
 451              "mkdir W32X86;"
 452              "put %s W32X86/%s.ppd;"
 453              "put %s/drivers/ps5ui.dll W32X86/ps5ui.dll;"
 454              "put %s/drivers/pscript.hlp W32X86/pscript.hlp;"
 455              "put %s/drivers/pscript.ntf W32X86/pscript.ntf;"
 456              "put %s/drivers/pscript5.dll W32X86/pscript5.dll",
 457              ppd, dest, cg->cups_datadir, cg->cups_datadir,
 458              cg->cups_datadir, cg->cups_datadir);
 459
 460     if ((status = do_samba_command("smbclient", address, subcmd,
 461                                    authfile, logfile)) != 0)
 462     {
 463       snprintf(message, sizeof(message),
 464                _cupsLangString(language,
 465                                _("Unable to copy Windows 2000 printer "
 466                                  "driver files (%d)!")), status);
 467
 468       _cupsSetError(IPP_INTERNAL_ERROR, message);
 469
 470       if (logfile)
 471         _cupsLangPrintf(logfile, "%s\n", message);
 472
 473       unlink(authfile);
 474
 475       return (0);
 476     }
 477
 478    /*
 479     * See if we also have the CUPS driver files; if so, use them!
 480     */
 481
 482     snprintf(file, sizeof(file), "%s/drivers/cupsps6.dll", cg->cups_datadir);
 483     if (!access(file, 0))
 484     {
 485      /*
 486       * Copy the CUPS driver files over...
 487       */
 488
 489       snprintf(subcmd, sizeof(subcmd),
 490                "put %s/drivers/cups6.ini W32X86/cups6.ini;"
 491                "put %s/drivers/cupsps6.dll W32X86/cupsps6.dll;"
 492                "put %s/drivers/cupsui6.dll W32X86/cupsui6.dll",
 493                cg->cups_datadir, cg->cups_datadir, cg->cups_datadir);
 494
 495       if ((status = do_samba_command("smbclient", address, subcmd,
 496                                      authfile, logfile)) != 0)
 497       {
 498         snprintf(message, sizeof(message),
 499                  _cupsLangString(language,
 500                                  _("Unable to copy CUPS printer driver "
 501                                    "files (%d)!")), status);
 502
 503         _cupsSetError(IPP_INTERNAL_ERROR, message);
 504
 505         if (logfile)
 506           _cupsLangPrintf(logfile, "%s\n", message);
 507
 508         unlink(authfile);
 509
 510         return (0);
 511       }
 512
 513      /*
 514       * Do the rpcclient command needed for the CUPS drivers...
 515       */
 516
 517       snprintf(subcmd, sizeof(subcmd),
 518                "adddriver \"Windows NT x86\" \"%s:"
 519                "pscript5.dll:%s.ppd:ps5ui.dll:pscript.hlp:NULL:RAW:"
 520                "pscript5.dll,%s.ppd,ps5ui.dll,pscript.hlp,pscript.ntf,"
 521                "cups6.ini,cupsps6.dll,cupsui6.dll\"",
 522                dest, dest, dest);
 523     }
 524     else
 525     {
 526      /*
 527       * Don't have the CUPS drivers, so just use the standard Windows
 528       * drivers...
 529       */
 530
 531       snprintf(subcmd, sizeof(subcmd),
 532                "adddriver \"Windows NT x86\" \"%s:"
 533                "pscript5.dll:%s.ppd:ps5ui.dll:pscript.hlp:NULL:RAW:"
 534                "pscript5.dll,%s.ppd,ps5ui.dll,pscript.hlp,pscript.ntf\"",
 535                dest, dest, dest);
 536     }
 537
 538     if ((status = do_samba_command("rpcclient", samba_server, subcmd,
 539                                    authfile, logfile)) != 0)
 540     {
 541       snprintf(message, sizeof(message),
 542                _cupsLangString(language,
 543                                _("Unable to install Windows 2000 printer "
 544                                  "driver files (%d)!")), status);
 545
 546       _cupsSetError(IPP_INTERNAL_ERROR, message);
 547
 548       if (logfile)
 549         _cupsLangPrintf(logfile, "%s\n", message);
 550
 551       unlink(authfile);
 552
 553       return (0);
 554     }
 555   }
 556
 557   snprintf(file, sizeof(file), "%s/drivers/ADOBEPS4.DRV", cg->cups_datadir);
 558   if (!access(file, 0))
 559   {
 560     have_drivers |= 2;
 561
 562    /*
 563     * Do the smbclient commands needed for the Adobe Win9x drivers...
 564     */
 565
 566     snprintf(address, sizeof(address), "//%s/print$", samba_server);
 567
 568     snprintf(subcmd, sizeof(subcmd),
 569              "mkdir WIN40;"
 570              "put %s WIN40/%s.PPD;"
 571              "put %s/drivers/ADFONTS.MFM WIN40/ADFONTS.MFM;"
 572              "put %s/drivers/ADOBEPS4.DRV WIN40/ADOBEPS4.DRV;"
 573              "put %s/drivers/ADOBEPS4.HLP WIN40/ADOBEPS4.HLP;"
 574              "put %s/drivers/ICONLIB.DLL WIN40/ICONLIB.DLL;"
 575              "put %s/drivers/PSMON.DLL WIN40/PSMON.DLL;",
 576              ppd, dest, cg->cups_datadir, cg->cups_datadir,
 577              cg->cups_datadir, cg->cups_datadir, cg->cups_datadir);
 578
 579     if ((status = do_samba_command("smbclient", address, subcmd,
 580                                    authfile, logfile)) != 0)
 581     {
 582       snprintf(message, sizeof(message),
 583                _cupsLangString(language,
 584                                _("Unable to copy Windows 9x printer "
 585                                  "driver files (%d)!")), status);
 586
 587       _cupsSetError(IPP_INTERNAL_ERROR, message);
 588
 589       if (logfile)
 590         _cupsLangPrintf(logfile, "%s\n", message);
 591
 592       unlink(authfile);
 593
 594       return (0);
 595     }
 596
 597    /*
 598     * Do the rpcclient commands needed for the Adobe Win9x drivers...
 599     */
 600
 601     snprintf(subcmd, sizeof(subcmd),
 602              "adddriver \"Windows 4.0\" \"%s:ADOBEPS4.DRV:%s.PPD:NULL:"
 603              "ADOBEPS4.HLP:PSMON.DLL:RAW:"
 604              "ADOBEPS4.DRV,%s.PPD,ADOBEPS4.HLP,PSMON.DLL,ADFONTS.MFM,"
 605              "ICONLIB.DLL\"",
 606              dest, dest, dest);
 607
 608     if ((status = do_samba_command("rpcclient", samba_server, subcmd,
 609                                    authfile, logfile)) != 0)
 610     {
 611       snprintf(message, sizeof(message),
 612                _cupsLangString(language,
 613                                _("Unable to install Windows 9x printer "
 614                                  "driver files (%d)!")), status);
 615
 616       _cupsSetError(IPP_INTERNAL_ERROR, message);
 617
 618       if (logfile)
 619         _cupsLangPrintf(logfile, "%s\n", message);
 620
 621       unlink(authfile);
 622
 623       return (0);
 624     }
 625   }
 626
 627   if (logfile && !(have_drivers & 1))
 628   {
 629     if (!have_drivers)
 630       strlcpy(message,
 631               _cupsLangString(language,
 632                               _("No Windows printer drivers are installed!")),
 633               sizeof(message));
 634     else
 635       strlcpy(message,
 636               _cupsLangString(language,
 637                               _("Warning, no Windows 2000 printer drivers "
 638                                 "are installed!")),
 639               sizeof(message));
 640
 641     _cupsSetError(IPP_INTERNAL_ERROR, message);
 642     _cupsLangPrintf(logfile, "%s\n", message);
 643   }
 644
 645   if (have_drivers == 0)
 646     return (0);
 647
 648  /*
 649   * Finally, associate the drivers we just added with the queue...
 650   */
 651
 652   snprintf(subcmd, sizeof(subcmd), "setdriver %s %s", dest, dest);
 653
 654   if ((status = do_samba_command("rpcclient", samba_server, subcmd,
 655                                  authfile, logfile)) != 0)
 656   {
 657     snprintf(message, sizeof(message),
 658              _cupsLangString(language,
 659                              _("Unable to set Windows printer driver (%d)!\n")),
 660                              status);
 661
 662     _cupsSetError(IPP_INTERNAL_ERROR, message);
 663
 664     if (logfile)
 665       _cupsLangPrintf(logfile, "%s\n", message);
 666
 667     unlink(authfile);
 668
 669     return (0);
 670   }
 671
 672   unlink(authfile);
 673
 674   return (1);
 675 }
 676
 677
 678 /*
 679  * '_cupsAdminGetServerSettings()' - Get settings from the server.
 680  *
 681  * The returned settings should be freed with cupsFreeOptions() when
 682  * you are done with them.
 683  *
 684  * @since CUPS 1.2@
 685  */
 686
 687 int                                     /* O - 1 on success, 0 on failure */
 688 _cupsAdminGetServerSettings(
 689     http_t        *http,                /* I - Connection to server */
 690     int           *num_settings,        /* O - Number of settings */
 691     cups_option_t **settings)           /* O - Settings */
 692 {
 693   int           i;                      /* Looping var */
 694   cups_file_t   *cupsd;                 /* cupsd.conf file */
 695   char          cupsdconf[1024];        /* cupsd.conf filename */
 696   int           remote;                 /* Remote cupsd.conf file? */
 697   http_status_t status;                 /* Status of getting cupsd.conf */
 698   char          line[1024],             /* Line from cupsd.conf file */
 699                 *value;                 /* Value on line */
 700   cups_option_t *setting;               /* Current setting */
 701   _cups_globals_t *cg = _cupsGlobals(); /* Global data */
 702
 703
 704  /*
 705   * Range check input...
 706   */
 707
 708   if (!http || !num_settings || !settings)
 709   {
 710     _cupsSetError(IPP_INTERNAL_ERROR, NULL);
 711
 712     if (num_settings)
 713       *num_settings = 0;
 714
 715     if (settings)
 716       *settings = NULL;
 717
 718     return (0);
 719   }
 720
 721   *num_settings = 0;
 722   *settings     = NULL;
 723
 724  /*
 725   * Get the cupsd.conf file...
 726   */
 727
 728   if ((status = get_cupsd_conf(http, cg, cg->cupsd_update, cupsdconf,
 729                                sizeof(cupsdconf), &remote)) == HTTP_OK)
 730   {
 731     if ((cupsd = cupsFileOpen(cupsdconf, "r")) == NULL)
 732     {
 733       char      message[1024];          /* Message string */
 734
 735
 736       snprintf(message, sizeof(message),
 737                _cupsLangString(cupsLangDefault(), _("open of %s failed: %s")),
 738                cupsdconf, strerror(errno));
 739       _cupsSetError(IPP_INTERNAL_ERROR, message);
 740     }
 741   }
 742   else
 743     cupsd = NULL;
 744
 745   if (cupsd)
 746   {
 747    /*
 748     * Read the file, keeping track of what settings are enabled...
 749     */
 750
 751     int         remote_access = 0,      /* Remote access allowed? */
 752                 remote_admin = 0,       /* Remote administration allowed? */
 753                 browsing = 1,           /* Browsing enabled? */
 754                 browse_allow = 1,       /* Browse address set? */
 755                 browse_address = 0,     /* Browse address set? */
 756                 cancel_policy = 1,      /* Cancel-job policy set? */
 757                 debug_logging = 0;      /* LogLevel debug set? */
 758     int         linenum = 0,            /* Line number in file */
 759                 in_location = 0,        /* In a location section? */
 760                 in_policy = 0,          /* In a policy section? */
 761                 in_cancel_job = 0,      /* In a cancel-job section? */
 762                 in_admin_location = 0;  /* In the /admin location? */
 763
 764
 765     invalidate_cupsd_cache(cg);
 766
 767     cg->cupsd_update = time(NULL);
 768     httpGetHostname(http, cg->cupsd_hostname, sizeof(cg->cupsd_hostname));
 769
 770     while (cupsFileGetConf(cupsd, line, sizeof(line), &value, &linenum))
 771     {
 772       if (!value)
 773         continue;
 774
 775       if (!strcasecmp(line, "Port"))
 776       {
 777         remote_access = 1;
 778       }
 779       else if (!strcasecmp(line, "Listen"))
 780       {
 781         char    *port;                  /* Pointer to port number, if any */
 782
 783
 784         if ((port = strrchr(value, ':')) != NULL)
 785           *port = '\0';
 786
 787         if (strcasecmp(value, "localhost") && strcmp(value, "127.0.0.1"))
 788           remote_access = 1;
 789       }
 790       else if (!strcasecmp(line, "Browsing"))
 791       {
 792         browsing = !strcasecmp(value, "yes") || !strcasecmp(value, "on") ||
 793                    !strcasecmp(value, "true");
 794       }
 795       else if (!strcasecmp(line, "BrowseAddress"))
 796       {
 797         browse_address = 1;
 798       }
 799       else if (!strcasecmp(line, "BrowseAllow"))
 800       {
 801         browse_allow = 1;
 802       }
 803       else if (!strcasecmp(line, "BrowseOrder"))
 804       {
 805         browse_allow = !strncasecmp(value, "deny,", 5);
 806       }
 807       else if (!strcasecmp(line, "LogLevel"))
 808       {
 809         debug_logging = !strncasecmp(value, "debug", 5);
 810       }
 811       else if (!strcasecmp(line, "<Policy") && !strcasecmp(value, "default"))
 812       {
 813         in_policy = 1;
 814       }
 815       else if (!strcasecmp(line, "</Policy>"))
 816       {
 817         in_policy = 0;
 818       }
 819       else if (!strcasecmp(line, "<Limit") && in_policy)
 820       {
 821        /*
 822         * See if the policy limit is for the Cancel-Job operation...
 823         */
 824
 825         char    *valptr;                /* Pointer into value */
 826
 827
 828         while (*value)
 829         {
 830           for (valptr = value; !isspace(*valptr & 255) && *valptr; valptr ++);
 831
 832           if (*valptr)
 833             *valptr++ = '\0';
 834
 835           if (!strcasecmp(value, "cancel-job") || !strcasecmp(value, "all"))
 836           {
 837             in_cancel_job = 1;
 838             break;
 839           }
 840
 841           for (value = valptr; isspace(*value & 255); value ++);
 842         }
 843       }
 844       else if (!strcasecmp(line, "</Limit>"))
 845       {
 846         in_cancel_job = 0;
 847       }
 848       else if (!strcasecmp(line, "Require") && in_cancel_job)
 849       {
 850         cancel_policy = 0;
 851       }
 852       else if (!strcasecmp(line, "<Location"))
 853       {
 854         in_admin_location = !strcasecmp(value, "/admin");
 855         in_location       = 1;
 856       }
 857       else if (!strcasecmp(line, "</Location>"))
 858       {
 859         in_admin_location = 0;
 860         in_location       = 0;
 861       }
 862       else if (!strcasecmp(line, "Allow") && in_admin_location &&
 863                strcasecmp(value, "localhost") && strcasecmp(value, "127.0.0.1"))
 864       {
 865         remote_admin = 1;
 866       }
 867       else if (line[0] != '<' && !in_location && !in_policy)
 868         cg->cupsd_num_settings = cupsAddOption(line, value,
 869                                                cg->cupsd_num_settings,
 870                                                &(cg->cupsd_settings));
 871     }
 872
 873     cupsFileClose(cupsd);
 874
 875     cg->cupsd_num_settings = cupsAddOption(CUPS_SERVER_DEBUG_LOGGING,
 876                                            debug_logging ? "1" : "0",
 877                                            cg->cupsd_num_settings,
 878                                            &(cg->cupsd_settings));
 879
 880     cg->cupsd_num_settings = cupsAddOption(CUPS_SERVER_REMOTE_ADMIN,
 881                                            (remote_access && remote_admin) ?
 882                                                "1" : "0",
 883                                            cg->cupsd_num_settings,
 884                                            &(cg->cupsd_settings));
 885
 886     cg->cupsd_num_settings = cupsAddOption(CUPS_SERVER_REMOTE_PRINTERS,
 887                                            (browsing && browse_allow) ?
 888                                                "1" : "0",
 889                                            cg->cupsd_num_settings,
 890                                            &(cg->cupsd_settings));
 891
 892     cg->cupsd_num_settings = cupsAddOption(CUPS_SERVER_SHARE_PRINTERS,
 893                                            (remote_access && browsing &&
 894                                             browse_address) ? "1" : "0",
 895                                            cg->cupsd_num_settings,
 896                                            &(cg->cupsd_settings));
 897
 898     cg->cupsd_num_settings = cupsAddOption(CUPS_SERVER_USER_CANCEL_ANY,
 899                                            cancel_policy ? "1" : "0",
 900                                            cg->cupsd_num_settings,
 901                                            &(cg->cupsd_settings));
 902   }
 903   else if (status != HTTP_NOT_MODIFIED)
 904     invalidate_cupsd_cache(cg);
 905
 906  /*
 907   * Remove any temporary files and copy the settings array...
 908   */
 909
 910   if (remote)
 911     unlink(cupsdconf);
 912
 913   for (i = cg->cupsd_num_settings, setting = cg->cupsd_settings;
 914        i > 0;
 915        i --, setting ++)
 916     *num_settings = cupsAddOption(setting->name, setting->value,
 917                                   *num_settings, settings);
 918
 919   return (cg->cupsd_num_settings > 0);
 920 }
 921
 922
 923 /*
 924  * '_cupsAdminSetServerSettings()' - Set settings on the server.
 925  *
 926  * @since CUPS 1.2@
 927  */
 928
 929 int                                     /* O - 1 on success, 0 on failure */
 930 _cupsAdminSetServerSettings(
 931     http_t        *http,                /* I - Connection to server */
 932     int           num_settings,         /* I - Number of settings */
 933     cups_option_t *settings)            /* I - Settings */
 934 {
 935   int           i;                      /* Looping var */
 936   http_status_t status;                 /* GET/PUT status */
 937   cups_file_t   *cupsd;                 /* cupsd.conf file */
 938   char          cupsdconf[1024];        /* cupsd.conf filename */
 939   int           remote;                 /* Remote cupsd.conf file? */
 940   char          tempfile[1024];         /* Temporary new cupsd.conf */
 941   cups_file_t   *temp;                  /* Temporary file */
 942   char          line[1024],             /* Line from cupsd.conf file */
 943                 *value;                 /* Value on line */
 944   int           linenum,                /* Line number in file */
 945                 in_location,            /* In a location section? */
 946                 in_policy,              /* In a policy section? */
 947                 in_default_policy,      /* In the default policy section? */
 948                 in_cancel_job,          /* In a cancel-job section? */
 949                 in_admin_location,      /* In the /admin location? */
 950                 in_conf_location,       /* In the /admin/conf location? */
 951                 in_root_location;       /* In the / location? */
 952   const char    *val;                   /* Setting value */
 953   int           remote_printers,        /* Show remote printers */
 954                 share_printers,         /* Share local printers */
 955                 remote_admin,           /* Remote administration allowed? */
 956                 user_cancel_any,        /* Cancel-job policy set? */
 957                 debug_logging;          /* LogLevel debug set? */
 958   int           wrote_port_listen,      /* Wrote the port/listen lines? */
 959                 wrote_browsing,         /* Wrote the browsing lines? */
 960                 wrote_policy,           /* Wrote the policy? */
 961                 wrote_loglevel,         /* Wrote the LogLevel line? */
 962                 wrote_admin_location,   /* Wrote the /admin location? */
 963                 wrote_conf_location,    /* Wrote the /admin/conf location? */
 964                 wrote_root_location;    /* Wrote the / location? */
 965   int           indent;                 /* Indentation */
 966   int           cupsd_num_settings;     /* New number of settings */
 967   cups_option_t *cupsd_settings,        /* New settings */
 968                 *setting;               /* Current setting */
 969   _cups_globals_t *cg = _cupsGlobals(); /* Global data */
 970
 971
 972  /*
 973   * Range check input...
 974   */
 975
 976   if (!http || !num_settings || !settings)
 977   {
 978     _cupsSetError(IPP_INTERNAL_ERROR, NULL);
 979
 980     return (0);
 981   }
 982
 983  /*
 984   * Get the cupsd.conf file...
 985   */
 986
 987   if ((status = get_cupsd_conf(http, cg, 0, cupsdconf, sizeof(cupsdconf),
 988                                &remote)) == HTTP_OK)
 989   {
 990     if ((cupsd = cupsFileOpen(cupsdconf, "r")) == NULL)
 991     {
 992       _cupsSetError(IPP_INTERNAL_ERROR, strerror(errno));
 993       return (0);
 994     }
 995   }
 996   else
 997     return (0);
 998
 999  /*
1000   * Get basic settings...
1001   */
1002
1003   if ((val = cupsGetOption(CUPS_SERVER_DEBUG_LOGGING, num_settings,
1004                            settings)) != NULL)
1005     debug_logging = atoi(val);
1006   else
1007     debug_logging = 0;
1008
1009   if ((val = cupsGetOption(CUPS_SERVER_REMOTE_ADMIN, num_settings,
1010                            settings)) != NULL)
1011     remote_admin = atoi(val);
1012   else
1013     remote_admin = 0;
1014
1015   if ((val = cupsGetOption(CUPS_SERVER_REMOTE_PRINTERS, num_settings,
1016                            settings)) != NULL)
1017     remote_printers = atoi(val);
1018   else
1019     remote_printers = 1;
1020
1021   if ((val = cupsGetOption(CUPS_SERVER_SHARE_PRINTERS, num_settings,
1022                            settings)) != NULL)
1023     share_printers = atoi(val);
1024   else
1025     share_printers = 0;
1026
1027   if ((val = cupsGetOption(CUPS_SERVER_USER_CANCEL_ANY, num_settings,
1028                            settings)) != NULL)
1029     user_cancel_any = atoi(val);
1030   else
1031     user_cancel_any = 0;
1032
1033  /*
1034   * Create a temporary file for the new cupsd.conf file...
1035   */
1036
1037   if ((temp = cupsTempFile2(tempfile, sizeof(tempfile))) == NULL)
1038   {
1039     cupsFileClose(cupsd);
1040
1041     if (remote)
1042       unlink(cupsdconf);
1043
1044     _cupsSetError(IPP_INTERNAL_ERROR, strerror(errno));
1045     return (0);
1046   }
1047
1048  /*
1049   * Copy the old file to the new, making changes along the way...
1050   */
1051
1052   cupsd_num_settings   = 0;
1053   in_admin_location    = 0;
1054   in_cancel_job        = 0;
1055   in_conf_location     = 0;
1056   in_default_policy    = 0;
1057   in_location          = 0;
1058   in_policy            = 0;
1059   in_root_location     = 0;
1060   linenum              = 0;
1061   wrote_admin_location = 0;
1062   wrote_browsing       = 0;
1063   wrote_conf_location  = 0;
1064   wrote_loglevel       = 0;
1065   wrote_policy         = 0;
1066   wrote_port_listen    = 0;
1067   wrote_root_location  = 0;
1068   indent               = 0;
1069
1070   while (cupsFileGetConf(cupsd, line, sizeof(line), &value, &linenum))
1071   {
1072     if (!strcasecmp(line, "Port") || !strcasecmp(line, "Listen"))
1073     {
1074       if (!wrote_port_listen)
1075       {
1076         wrote_port_listen = 1;
1077
1078         if (share_printers || remote_admin)
1079         {
1080           cupsFilePuts(temp, "# Allow remote access\n");
1081           cupsFilePrintf(temp, "Port %d\n", ippPort());
1082         }
1083         else
1084         {
1085           cupsFilePuts(temp, "# Only listen for connections from the local "
1086                              "machine.\n");
1087           cupsFilePrintf(temp, "Listen 127.0.0.1:%d\n", ippPort());
1088         }
1089
1090 #ifdef CUPS_DEFAULT_DOMAINSOCKET
1091         if (!access(CUPS_DEFAULT_DOMAINSOCKET, 0))
1092           cupsFilePuts(temp, "Listen " CUPS_DEFAULT_DOMAINSOCKET "\n");
1093 #endif /* CUPS_DEFAULT_DOMAINSOCKET */
1094       }
1095     }
1096     else if (!strcasecmp(line, "Browsing") ||
1097              !strcasecmp(line, "BrowseAddress") ||
1098              !strcasecmp(line, "BrowseAllow") ||
1099              !strcasecmp(line, "BrowseDeny") ||
1100              !strcasecmp(line, "BrowseOrder"))
1101     {
1102       if (!wrote_browsing)
1103       {
1104         wrote_browsing = 1;
1105
1106         if (remote_printers || share_printers)
1107         {
1108           if (remote_printers && share_printers)
1109             cupsFilePuts(temp,
1110                          "# Enable printer sharing and shared printers.\n");
1111           else if (remote_printers)
1112             cupsFilePuts(temp,
1113                          "# Show shared printers on the local network.\n");
1114           else
1115             cupsFilePuts(temp,
1116                          "# Share local printers on the local network.\n");
1117
1118           cupsFilePuts(temp, "Browsing On\n");
1119           cupsFilePuts(temp, "BrowseOrder allow,deny\n");
1120
1121           if (remote_printers)
1122             cupsFilePuts(temp, "BrowseAllow @LOCAL\n");
1123
1124           if (share_printers)
1125             cupsFilePuts(temp, "BrowseAddress @LOCAL\n");
1126         }
1127         else
1128         {
1129           cupsFilePuts(temp,
1130                        "# Disable printer sharing and shared printers.\n");
1131           cupsFilePuts(temp, "Browsing Off\n");
1132         }
1133       }
1134     }
1135     else if (!strcasecmp(line, "LogLevel"))
1136     {
1137       wrote_loglevel = 1;
1138
1139       if (debug_logging)
1140       {
1141         cupsFilePuts(temp,
1142                      "# Show troubleshooting information in error_log.\n");
1143         cupsFilePuts(temp, "LogLevel debug\n");
1144       }
1145       else
1146       {
1147         cupsFilePuts(temp, "# Show general information in error_log.\n");
1148         cupsFilePuts(temp, "LogLevel info\n");
1149       }
1150     }
1151     else if (!strcasecmp(line, "<Policy"))
1152     {
1153       in_default_policy = !strcasecmp(value, "default");
1154       in_policy         = 1;
1155
1156       cupsFilePrintf(temp, "%s %s>\n", line, value);
1157       indent += 2;
1158     }
1159     else if (!strcasecmp(line, "</Policy>"))
1160     {
1161       indent -= 2;
1162       if (!wrote_policy && in_default_policy)
1163       {
1164         wrote_policy = 1;
1165
1166         if (!user_cancel_any)
1167           cupsFilePuts(temp, "  # Only the owner or an administrator can "
1168                              "cancel a job...\n"
1169                              "  <Limit Cancel-Job>\n"
1170                              "    Order deny,allow\n"
1171                              "    Allow @SYSTEM\n"
1172                              "    Allow @OWNER\n"
1173                              "  </Limit>\n");
1174       }
1175
1176       in_policy         = 0;
1177       in_default_policy = 0;
1178
1179       cupsFilePuts(temp, "</Policy>\n");
1180     }
1181     else if (!strcasecmp(line, "<Location"))
1182     {
1183       in_location = 1;
1184       indent += 2;
1185       if (!strcmp(value, "/admin"))
1186         in_admin_location = 1;
1187       if (!strcmp(value, "/admin/conf"))
1188         in_conf_location = 1;
1189       else if (!strcmp(value, "/"))
1190         in_root_location = 1;
1191
1192       cupsFilePrintf(temp, "%s %s>\n", line, value);
1193     }
1194     else if (!strcasecmp(line, "</Location>"))
1195     {
1196       in_location = 0;
1197       indent -= 2;
1198       if (in_admin_location)
1199       {
1200         wrote_admin_location = 1;
1201
1202         if (remote_admin)
1203           cupsFilePuts(temp, "  # Allow remote administration...\n");
1204         else
1205           cupsFilePuts(temp, "  # Restrict access to the admin pages...\n");
1206
1207         cupsFilePuts(temp, "  Order allow,deny\n");
1208
1209         if (remote_admin)
1210           cupsFilePuts(temp, "  Allow @LOCAL\n");
1211         else
1212           cupsFilePuts(temp, "  Allow localhost\n");
1213       }
1214       else if (in_conf_location)
1215       {
1216         wrote_conf_location = 1;
1217
1218         if (remote_admin)
1219           cupsFilePuts(temp, "  # Allow remote access to the configuration "
1220                              "files...\n");
1221         else
1222           cupsFilePuts(temp, "  # Restrict access to the configuration "
1223                              "files...\n");
1224
1225         cupsFilePuts(temp, "  Order allow,deny\n");
1226
1227         if (remote_admin)
1228           cupsFilePuts(temp, "  Allow @LOCAL\n");
1229         else
1230           cupsFilePuts(temp, "  Allow localhost\n");
1231       }
1232       else if (in_root_location)
1233       {
1234         wrote_root_location = 1;
1235
1236         if (remote_admin && share_printers)
1237           cupsFilePuts(temp, "  # Allow shared printing and remote "
1238                              "administration...\n");
1239         else if (remote_admin)
1240           cupsFilePuts(temp, "  # Allow remote administration...\n");
1241         else if (share_printers)
1242           cupsFilePuts(temp, "  # Allow shared printing...\n");
1243         else
1244           cupsFilePuts(temp, "  # Restrict access to the server...\n");
1245
1246         cupsFilePuts(temp, "  Order allow,deny\n");
1247
1248         if (remote_admin || share_printers)
1249           cupsFilePuts(temp, "  Allow @LOCAL\n");
1250         else
1251           cupsFilePuts(temp, "  Allow localhost\n");
1252       }
1253
1254       in_admin_location = 0;
1255       in_conf_location  = 0;
1256       in_root_location  = 0;
1257
1258       cupsFilePuts(temp, "</Location>\n");
1259     }
1260     else if (!strcasecmp(line, "<Limit") && in_default_policy)
1261     {
1262      /*
1263       * See if the policy limit is for the Cancel-Job operation...
1264       */
1265
1266       char      *valptr;                /* Pointer into value */
1267
1268
1269       indent += 2;
1270
1271       if (!strcasecmp(value, "cancel-job"))
1272       {
1273        /*
1274         * Don't write anything for this limit section...
1275         */
1276
1277         in_cancel_job = 2;
1278       }
1279       else
1280       {
1281         cupsFilePrintf(temp, "  %s", line);
1282
1283         while (*value)
1284         {
1285           for (valptr = value; !isspace(*valptr & 255) && *valptr; valptr ++);
1286
1287           if (*valptr)
1288             *valptr++ = '\0';
1289
1290           if (!strcasecmp(value, "cancel-job"))
1291           {
1292            /*
1293             * Write everything except for this definition...
1294             */
1295
1296             in_cancel_job = 1;
1297           }
1298           else
1299             cupsFilePrintf(temp, " %s", value);
1300
1301           for (value = valptr; isspace(*value & 255); value ++);
1302         }
1303
1304         cupsFilePuts(temp, ">\n");
1305       }
1306     }
1307     else if (!strcasecmp(line, "</Limit>") && in_cancel_job)
1308     {
1309       indent -= 2;
1310
1311       if (in_cancel_job == 1)
1312         cupsFilePuts(temp, "  </Limit>\n");
1313
1314       wrote_policy = 1;
1315
1316       if (!user_cancel_any)
1317         cupsFilePuts(temp, "  # Only the owner or an administrator can cancel "
1318                            "a job...\n"
1319                            "  <Limit Cancel-Job>\n"
1320                            "    Order deny,allow\n"
1321                            "    Require user @OWNER @SYSTEM\n"
1322                            "  </Limit>\n");
1323
1324       in_cancel_job = 0;
1325     }
1326     else if ((in_admin_location || in_conf_location || in_root_location) &&
1327              (!strcasecmp(line, "Allow") || !strcasecmp(line, "Deny") ||
1328               !strcasecmp(line, "Order")))
1329       continue;
1330     else if (in_cancel_job == 2)
1331       continue;
1332     else if (!strcasecmp(line, "<Limit")  && value)
1333       cupsFilePrintf(temp, "  %s %s>\n", line, value);
1334     else if (line[0] == '<')
1335     {
1336       if (value)
1337       {
1338         cupsFilePrintf(temp, "%*s%s %s>\n", indent, "", line, value);
1339         indent += 2;
1340       }
1341       else
1342       {
1343         if (line[1] == '/')
1344           indent -= 2;
1345
1346         cupsFilePrintf(temp, "%*s%s\n", indent, "", line);
1347       }
1348     }
1349     else if (!in_policy && !in_location &&
1350              (val = cupsGetOption(line, num_settings, settings)) != NULL &&
1351              !cupsGetOption(line, cupsd_num_settings, cupsd_settings))
1352     {
1353      /*
1354       * Add this directive to the list of directives we have written...
1355       */
1356
1357       cupsd_num_settings = cupsAddOption(line, value, cupsd_num_settings,
1358                                          &cupsd_settings);
1359
1360      /*
1361       * Write the new value in its place, without indentation since we
1362       * only support setting root directives, not in sections...
1363       */
1364
1365       cupsFilePrintf(temp, "%s %s\n", line, value);
1366     }
1367     else if (value)
1368     {
1369       if (!in_policy && !in_location)
1370       {
1371        /*
1372         * Record the non-policy, non-location directives that we find
1373         * in the server settings, since we cache this info and record it
1374         * in _cupsAdminGetServerSettings()...
1375         */
1376
1377         cupsd_num_settings = cupsAddOption(line, value, cupsd_num_settings,
1378                                            &cupsd_settings);
1379       }
1380
1381       cupsFilePrintf(temp, "%*s%s %s\n", indent, "", line, value);
1382     }
1383     else
1384       cupsFilePrintf(temp, "%*s%s\n", indent, "", line);
1385   }
1386
1387  /*
1388   * Write any missing info...
1389   */
1390
1391   if (!wrote_browsing)
1392   {
1393     if (remote_printers || share_printers)
1394     {
1395       if (remote_printers && share_printers)
1396         cupsFilePuts(temp, "# Enable printer sharing and shared printers.\n");
1397       else if (remote_printers)
1398         cupsFilePuts(temp, "# Show shared printers on the local network.\n");
1399       else
1400         cupsFilePuts(temp, "# Share local printers on the local network.\n");
1401
1402       cupsFilePuts(temp, "Browsing On\n");
1403       cupsFilePuts(temp, "BrowseOrder allow,deny\n");
1404
1405       if (remote_printers)
1406         cupsFilePuts(temp, "BrowseAllow @LOCAL\n");
1407
1408       if (share_printers)
1409         cupsFilePuts(temp, "BrowseAddress @LOCAL\n");
1410     }
1411     else
1412     {
1413       cupsFilePuts(temp, "# Disable printer sharing and shared printers.\n");
1414       cupsFilePuts(temp, "Browsing Off\n");
1415     }
1416   }
1417
1418   if (!wrote_loglevel)
1419   {
1420     if (debug_logging)
1421     {
1422       cupsFilePuts(temp, "# Show troubleshooting information in error_log.\n");
1423       cupsFilePuts(temp, "LogLevel debug\n");
1424     }
1425     else
1426     {
1427       cupsFilePuts(temp, "# Show general information in error_log.\n");
1428       cupsFilePuts(temp, "LogLevel info\n");
1429     }
1430   }
1431
1432   if (!wrote_port_listen)
1433   {
1434     if (share_printers || remote_admin)
1435     {
1436       cupsFilePuts(temp, "# Allow remote access\n");
1437       cupsFilePrintf(temp, "Port %d\n", ippPort());
1438     }
1439     else
1440     {
1441       cupsFilePuts(temp,
1442                    "# Only listen for connections from the local machine.\n");
1443       cupsFilePrintf(temp, "Listen 127.0.0.1:%d\n", ippPort());
1444     }
1445
1446 #ifdef CUPS_DEFAULT_DOMAINSOCKET
1447     if (!access(CUPS_DEFAULT_DOMAINSOCKET, 0))
1448       cupsFilePuts(temp, "Listen " CUPS_DEFAULT_DOMAINSOCKET "\n");
1449 #endif /* CUPS_DEFAULT_DOMAINSOCKET */
1450   }
1451
1452   if (!wrote_root_location)
1453   {
1454     if (remote_admin && share_printers)
1455       cupsFilePuts(temp,
1456                    "# Allow shared printing and remote administration...\n");
1457     else if (remote_admin)
1458       cupsFilePuts(temp, "# Allow remote administration...\n");
1459     else if (share_printers)
1460       cupsFilePuts(temp, "# Allow shared printing...\n");
1461     else
1462       cupsFilePuts(temp, "# Restrict access to the server...\n");
1463
1464     cupsFilePuts(temp, "<Location />\n"
1465                        "  Order allow,deny\n");
1466
1467     if (remote_admin || share_printers)
1468       cupsFilePuts(temp, "  Allow @LOCAL\n");
1469     else
1470       cupsFilePuts(temp, "  Allow localhost\n");
1471
1472     cupsFilePuts(temp, "</Location>\n");
1473   }
1474
1475   if (!wrote_admin_location)
1476   {
1477     if (remote_admin)
1478       cupsFilePuts(temp, "# Allow remote administration...\n");
1479     else
1480       cupsFilePuts(temp, "# Restrict access to the admin pages...\n");
1481
1482     cupsFilePuts(temp, "<Location /admin>\n"
1483                        "  Order allow,deny\n");
1484
1485     if (remote_admin)
1486       cupsFilePuts(temp, "  Allow @LOCAL\n");
1487     else
1488       cupsFilePuts(temp, "  Allow localhost\n");
1489
1490     cupsFilePuts(temp, "</Location>\n");
1491   }
1492
1493   if (!wrote_conf_location)
1494   {
1495     if (remote_admin)
1496       cupsFilePuts(temp,
1497                    "# Allow remote access to the configuration files...\n");
1498     else
1499       cupsFilePuts(temp, "# Restrict access to the configuration files...\n");
1500
1501     cupsFilePuts(temp, "<Location /admin/conf>\n"
1502                        "  AuthType Basic\n"
1503                        "  Require user @SYSTEM\n"
1504                        "  Order allow,deny\n");
1505
1506     if (remote_admin)
1507       cupsFilePuts(temp, "  Allow @LOCAL\n");
1508     else
1509       cupsFilePuts(temp, "  Allow localhost\n");
1510
1511     cupsFilePuts(temp, "</Location>\n");
1512   }
1513
1514   if (!wrote_policy)
1515   {
1516     cupsFilePuts(temp, "<Policy default>\n"
1517                        "  # Job-related operations must be done by the owner "
1518                        "or an adminstrator...\n"
1519                        "  <Limit Send-Document Send-URI Hold-Job Release-Job "
1520                        "Restart-Job Purge-Jobs Set-Job-Attributes "
1521                        "Create-Job-Subscription Renew-Subscription "
1522                        "Cancel-Subscription Get-Notifications Reprocess-Job "
1523                        "Cancel-Current-Job Suspend-Current-Job Resume-Job "
1524                        "CUPS-Move-Job>\n"
1525                        "    Require user @OWNER @SYSTEM\n"
1526                        "    Order deny,allow\n"
1527                        "  </Limit>\n"
1528                        "  # All administration operations require an "
1529                        "adminstrator to authenticate...\n"
1530                        "  <Limit Pause-Printer Resume-Printer "
1531                        "Set-Printer-Attributes Enable-Printer "
1532                        "Disable-Printer Pause-Printer-After-Current-Job "
1533                        "Hold-New-Jobs Release-Held-New-Jobs Deactivate-Printer "
1534                        "Activate-Printer Restart-Printer Shutdown-Printer "
1535                        "Startup-Printer Promote-Job Schedule-Job-After "
1536                        "CUPS-Add-Printer CUPS-Delete-Printer "
1537                        "CUPS-Add-Class CUPS-Delete-Class "
1538                        "CUPS-Accept-Jobs CUPS-Reject-Jobs "
1539                        "CUPS-Set-Default CUPS-Add-Device CUPS-Delete-Device>\n"
1540                        "    AuthType Basic\n"
1541                        "    Require user @SYSTEM\n"
1542                        "    Order deny,allow\n"
1543                        "</Limit>\n");
1544
1545     if (!user_cancel_any)
1546       cupsFilePuts(temp, "  # Only the owner or an administrator can cancel "
1547                          "a job...\n"
1548                          "  <Limit Cancel-Job>\n"
1549                          "    Require user @OWNER @SYSTEM\n"
1550                          "    Order deny,allow\n"
1551                          "  </Limit>\n");
1552
1553     cupsFilePuts(temp, "  <Limit All>\n"
1554                        "  Order deny,allow\n"
1555                        "  </Limit>\n"
1556                        "</Policy>\n");
1557   }
1558
1559   for (i = num_settings, setting = settings; i > 0; i --, setting ++)
1560     if (setting->name[0] != '_' &&
1561         !cupsGetOption(setting->name, cupsd_num_settings, cupsd_settings))
1562     {
1563      /*
1564       * Add this directive to the list of directives we have written...
1565       */
1566
1567       cupsd_num_settings = cupsAddOption(setting->name, setting->value,
1568                                          cupsd_num_settings, &cupsd_settings);
1569
1570      /*
1571       * Write the new value in its place, without indentation since we
1572       * only support setting root directives, not in sections...
1573       */
1574
1575       cupsFilePrintf(temp, "%s %s\n", setting->name, setting->value);
1576     }
1577
1578   cupsFileClose(cupsd);
1579   cupsFileClose(temp);
1580
1581  /*
1582   * Upload the configuration file to the server...
1583   */
1584
1585   status = cupsPutFile(http, "/admin/conf/cupsd.conf", tempfile);
1586
1587   if (status == HTTP_CREATED)
1588   {
1589    /*
1590     * Updated OK, add the basic settings...
1591     */
1592
1593     cupsd_num_settings = cupsAddOption(CUPS_SERVER_DEBUG_LOGGING,
1594                                        debug_logging ? "1" : "0",
1595                                        cupsd_num_settings, &cupsd_settings);
1596     cupsd_num_settings = cupsAddOption(CUPS_SERVER_REMOTE_ADMIN,
1597                                        remote_admin ? "1" : "0",
1598                                        cupsd_num_settings, &cupsd_settings);
1599     cupsd_num_settings = cupsAddOption(CUPS_SERVER_REMOTE_PRINTERS,
1600                                        remote_printers ? "1" : "0",
1601                                        cupsd_num_settings, &cupsd_settings);
1602     cupsd_num_settings = cupsAddOption(CUPS_SERVER_SHARE_PRINTERS,
1603                                        share_printers ? "1" : "0",
1604                                        cupsd_num_settings, &cupsd_settings);
1605     cupsd_num_settings = cupsAddOption(CUPS_SERVER_USER_CANCEL_ANY,
1606                                        user_cancel_any ? "1" : "0",
1607                                        cupsd_num_settings, &cupsd_settings);
1608
1609    /*
1610     * Save the new values...
1611     */
1612
1613     invalidate_cupsd_cache(cg);
1614
1615     cg->cupsd_num_settings = cupsd_num_settings;
1616     cg->cupsd_settings     = cupsd_settings;
1617     cg->cupsd_update       = time(NULL);
1618
1619     httpGetHostname(http, cg->cupsd_hostname, sizeof(cg->cupsd_hostname));
1620   }
1621   else
1622     cupsFreeOptions(cupsd_num_settings, cupsd_settings);
1623
1624  /*
1625   * Remote our temp files and return...
1626   */
1627
1628   if (remote)
1629     unlink(cupsdconf);
1630
1631   unlink(tempfile);
1632
1633   return (status == HTTP_CREATED);
1634 }
1635
1636
1637 /*
1638  * 'do_samba_command()' - Do a SAMBA command.
1639  */
1640
1641 static int                              /* O - Status of command */
1642 do_samba_command(const char *command,   /* I - Command to run */
1643                  const char *address,   /* I - Address for command */
1644                  const char *subcmd,    /* I - Sub-command */
1645                  const char *authfile,  /* I - Samba authentication file */
1646                  FILE *logfile)         /* I - Optional log file */
1647 {
1648   int           status;                 /* Status of command */
1649   int           pid;                    /* Process ID of child */
1650
1651
1652   if (logfile)
1653     _cupsLangPrintf(logfile,
1654                     _("Running command: %s %s -N -A %s -c \'%s\'\n"),
1655                     command, address, authfile, subcmd);
1656
1657   if ((pid = fork()) == 0)
1658   {
1659    /*
1660     * Child goes here, redirect stdin/out/err and execute the command...
1661     */
1662
1663     close(0);
1664     open("/dev/null", O_RDONLY);
1665
1666     close(1);
1667
1668     if (logfile)
1669       dup(fileno(logfile));
1670     else
1671       open("/dev/null", O_WRONLY);
1672
1673     close(2);
1674     dup(1);
1675
1676     execlp(command, command, address, "-N", "-A", authfile, "-c", subcmd,
1677            (char *)0);
1678     exit(errno);
1679   }
1680   else if (pid < 0)
1681   {
1682     status = -1;
1683
1684     _cupsLangPrintf(stderr, _("cupsaddsmb: Unable to run \"%s\": %s\n"),
1685                     command, strerror(errno));
1686   }
1687   else
1688   {
1689    /*
1690     * Wait for the process to complete...
1691     */
1692
1693     while (wait(&status) != pid);
1694   }
1695
1696   if (logfile)
1697     _cupsLangPuts(logfile, "\n");
1698
1699   DEBUG_printf(("status=%d\n", status));
1700
1701   if (WIFEXITED(status))
1702     return (WEXITSTATUS(status));
1703   else
1704     return (-WTERMSIG(status));
1705 }
1706
1707
1708 /*
1709  * 'get_cupsd_conf()' - Get the current cupsd.conf file.
1710  */
1711
1712 static http_status_t                    /* O - Status of request */
1713 get_cupsd_conf(
1714     http_t          *http,              /* I - Connection to server */
1715     _cups_globals_t *cg,                /* I - Global data */
1716     time_t          last_update,        /* I - Last update time for file */
1717     char            *name,              /* I - Filename buffer */
1718     int             namesize,           /* I - Size of filename buffer */
1719     int             *remote)            /* O - Remote file? */
1720 {
1721   int           fd;                     /* Temporary file descriptor */
1722   struct stat   info;                   /* cupsd.conf file information */
1723   http_status_t status;                 /* Status of getting cupsd.conf */
1724   char          host[HTTP_MAX_HOST];    /* Hostname for connection */
1725
1726
1727  /*
1728   * See if we already have the data we need...
1729   */
1730
1731   httpGetHostname(http, host, sizeof(host));
1732
1733   if (strcasecmp(cg->cupsd_hostname, host))
1734     invalidate_cupsd_cache(cg);
1735
1736   snprintf(name, namesize, "%s/cupsd.conf", cg->cups_serverroot);
1737   *remote = 0;
1738
1739   if (!strcasecmp(host, "localhost") && !access(name, R_OK))
1740   {
1741    /*
1742     * Read the local file rather than using HTTP...
1743     */
1744
1745     if (stat(name, &info))
1746     {
1747       char      message[1024];          /* Message string */
1748
1749
1750       snprintf(message, sizeof(message),
1751                _cupsLangString(cupsLangDefault(), _("stat of %s failed: %s")),
1752                name, strerror(errno));
1753       _cupsSetError(IPP_INTERNAL_ERROR, message);
1754
1755       *name = '\0';
1756
1757       return (HTTP_SERVER_ERROR);
1758     }
1759     else if (last_update && info.st_mtime <= last_update)
1760       status = HTTP_NOT_MODIFIED;
1761     else
1762       status = HTTP_OK;
1763   }
1764   else
1765   {
1766    /*
1767     * Read cupsd.conf via a HTTP GET request...
1768     */
1769
1770     if ((fd = cupsTempFd(name, sizeof(name))) < 0)
1771     {
1772       *name = '\0';
1773
1774       _cupsSetError(IPP_INTERNAL_ERROR, strerror(errno));
1775
1776       invalidate_cupsd_cache(cg);
1777
1778       return (HTTP_SERVER_ERROR);
1779     }
1780
1781     *remote = 1;
1782
1783     httpClearFields(http);
1784
1785     if (last_update)
1786       httpSetField(http, HTTP_FIELD_IF_MODIFIED_SINCE,
1787                    httpGetDateString(last_update));
1788
1789     status = cupsGetFd(http, "/admin/conf/cupsd.conf", fd);
1790
1791     close(fd);
1792
1793     if (status != HTTP_OK)
1794     {
1795       unlink(name);
1796       *name = '\0';
1797     }
1798   }
1799
1800   return (status);
1801 }
1802
1803
1804 /*
1805  * 'invalidate_cupsd_cache()' - Invalidate the cached cupsd.conf settings.
1806  */
1807
1808 static void
1809 invalidate_cupsd_cache(
1810     _cups_globals_t *cg)                /* I - Global data */
1811 {
1812   cupsFreeOptions(cg->cupsd_num_settings, cg->cupsd_settings);
1813
1814   cg->cupsd_hostname[0]  = '\0';
1815   cg->cupsd_update       = 0;
1816   cg->cupsd_num_settings = 0;
1817   cg->cupsd_settings     = NULL;
1818 }
1819
1820
1821 /*
1822  * 'write_option()' - Write a CUPS option to a PPD file.
1823  */
1824
1825 static void
1826 write_option(cups_file_t     *dstfp,    /* I - PPD file */
1827              int             order,     /* I - Order dependency */
1828              const char      *name,     /* I - Option name */
1829              const char      *text,     /* I - Option text */
1830              const char      *attrname, /* I - Attribute name */
1831              ipp_attribute_t *suppattr, /* I - IPP -supported attribute */
1832              ipp_attribute_t *defattr,  /* I - IPP -default attribute */
1833              int             defval,    /* I - Default value number */
1834              int             valcount)  /* I - Number of values */
1835 {
1836   int   i;                              /* Looping var */
1837
1838
1839   cupsFilePrintf(dstfp, "*JCLOpenUI *%s/%s: PickOne\n"
1840                         "*OrderDependency: %d JCLSetup *%s\n",
1841                  name, text, order, name);
1842
1843   if (defattr->value_tag == IPP_TAG_INTEGER)
1844   {
1845    /*
1846     * Do numeric options with a range or list...
1847     */
1848
1849     cupsFilePrintf(dstfp, "*Default%s: %d\n", name,
1850                    defattr->values[defval].integer);
1851
1852     if (suppattr->value_tag == IPP_TAG_RANGE)
1853     {
1854      /*
1855       * List each number in the range...
1856       */
1857
1858       for (i = suppattr->values[0].range.lower;
1859            i <= suppattr->values[0].range.upper;
1860            i ++)
1861       {
1862         cupsFilePrintf(dstfp, "*%s %d: \"", name, i);
1863
1864         if (valcount == 1)
1865           cupsFilePrintf(dstfp, "%%cupsJobTicket: %s=%d\n\"\n*End\n",
1866                          attrname, i);
1867         else if (defval == 0)
1868           cupsFilePrintf(dstfp, "%%cupsJobTicket: %s=%d\"\n", attrname, i);
1869         else if (defval < (valcount - 1))
1870           cupsFilePrintf(dstfp, ",%d\"\n", i);
1871         else
1872           cupsFilePrintf(dstfp, ",%d\n\"\n*End\n", i);
1873       }
1874     }
1875     else
1876     {
1877      /*
1878       * List explicit numbers...
1879       */
1880
1881       for (i = 0; i < suppattr->num_values; i ++)
1882       {
1883         cupsFilePrintf(dstfp, "*%s %d: \"", name, suppattr->values[i].integer);
1884
1885         if (valcount == 1)
1886           cupsFilePrintf(dstfp, "%%cupsJobTicket: %s=%d\n\"\n*End\n", attrname,
1887                   suppattr->values[i].integer);
1888         else if (defval == 0)
1889           cupsFilePrintf(dstfp, "%%cupsJobTicket: %s=%d\"\n", attrname,
1890                   suppattr->values[i].integer);
1891         else if (defval < (valcount - 1))
1892           cupsFilePrintf(dstfp, ",%d\"\n", suppattr->values[i].integer);
1893         else
1894           cupsFilePrintf(dstfp, ",%d\n\"\n*End\n", suppattr->values[i].integer);
1895       }
1896     }
1897   }
1898   else
1899   {
1900    /*
1901     * Do text options with a list...
1902     */
1903
1904     cupsFilePrintf(dstfp, "*Default%s: %s\n", name,
1905                    defattr->values[defval].string.text);
1906
1907     for (i = 0; i < suppattr->num_values; i ++)
1908     {
1909       cupsFilePrintf(dstfp, "*%s %s: \"", name,
1910                      suppattr->values[i].string.text);
1911
1912       if (valcount == 1)
1913         cupsFilePrintf(dstfp, "%%cupsJobTicket: %s=%s\n\"\n*End\n", attrname,
1914                 suppattr->values[i].string.text);
1915       else if (defval == 0)
1916         cupsFilePrintf(dstfp, "%%cupsJobTicket: %s=%s\"\n", attrname,
1917                 suppattr->values[i].string.text);
1918       else if (defval < (valcount - 1))
1919         cupsFilePrintf(dstfp, ",%s\"\n", suppattr->values[i].string.text);
1920       else
1921         cupsFilePrintf(dstfp, ",%s\n\"\n*End\n",
1922                        suppattr->values[i].string.text);
1923     }
1924   }
1925
1926   cupsFilePrintf(dstfp, "*JCLCloseUI: *%s\n\n", name);
1927 }
1928
1929
1930 /*
1931  * End of "$Id: adminutil.c 181 2006-06-22 20:01:18Z jlovell $".
1932  */