cups/request.c

   1 /*
   2  * "$Id: request.c 7946 2008-09-16 23:27:54Z mike $"
   3  *
   4  *   IPP utilities for the Common UNIX Printing System (CUPS).
   5  *
   6  *   Copyright 2007-2009 by Apple Inc.
   7  *   Copyright 1997-2007 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  *   This file is subject to the Apple OS-Developed Software exception.
  16  *
  17  * Contents:
  18  *
  19  *   cupsDoFileRequest()    - Do an IPP request with a file.
  20  *   cupsDoIORequest()      - Do an IPP request with file descriptors.
  21  *   cupsDoRequest()        - Do an IPP request.
  22  *   cupsGetResponse()      - Get a response to an IPP request.
  23  *   cupsReadResponseData() - Read additional data after the IPP response.
  24  *   cupsSendRequest()      - Send an IPP request.
  25  *   cupsWriteRequestData() - Write additional data after an IPP request.
  26  *   _cupsSetError()        - Set the last IPP status code and status-message.
  27  *   _cupsSetHTTPError()    - Set the last error using the HTTP status.
  28  */
  29
  30 /*
  31  * Include necessary headers...
  32  */
  33
  34 #include "globals.h"
  35 #include "debug.h"
  36 #include <stdlib.h>
  37 #include <errno.h>
  38 #include <fcntl.h>
  39 #include <sys/stat.h>
  40 #if defined(WIN32) || defined(__EMX__)
  41 #  include <io.h>
  42 #else
  43 #  include <unistd.h>
  44 #endif /* WIN32 || __EMX__ */
  45 #ifndef O_BINARY
  46 #  define O_BINARY 0
  47 #endif /* O_BINARY */
  48
  49
  50 /*
  51  * 'cupsDoFileRequest()' - Do an IPP request with a file.
  52  *
  53  * This function sends the IPP request to the specified server, retrying
  54  * and authenticating as necessary.  The request is freed with @link ippDelete@
  55  * after receiving a valid IPP response.
  56  */
  57
  58 ipp_t *                                 /* O - Response data */
  59 cupsDoFileRequest(http_t     *http,     /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
  60                   ipp_t      *request,  /* I - IPP request */
  61                   const char *resource, /* I - HTTP resource for POST */
  62                   const char *filename) /* I - File to send or @code NULL@ for none */
  63 {
  64   ipp_t         *response;              /* IPP response data */
  65   int           infile;                 /* Input file */
  66
  67
  68   DEBUG_printf(("cupsDoFileRequest(http=%p, request=%p(%s), resource=\"%s\", "
  69                 "filename=\"%s\")", http, request,
  70                 request ? ippOpString(request->request.op.operation_id) : "?",
  71                 resource, filename));
  72
  73   if (filename)
  74   {
  75     if ((infile = open(filename, O_RDONLY | O_BINARY)) < 0)
  76     {
  77      /*
  78       * Can't get file information!
  79       */
  80
  81       _cupsSetError(errno == ENOENT ? IPP_NOT_FOUND : IPP_NOT_AUTHORIZED,
  82                     NULL, 0);
  83
  84       ippDelete(request);
  85
  86       return (NULL);
  87     }
  88   }
  89   else
  90     infile = -1;
  91
  92   response = cupsDoIORequest(http, request, resource, infile, -1);
  93
  94   if (infile >= 0)
  95     close(infile);
  96
  97   return (response);
  98 }
  99
 100
 101 /*
 102  * 'cupsDoIORequest()' - Do an IPP request with file descriptors.
 103  *
 104  * This function sends the IPP request to the specified server, retrying
 105  * and authenticating as necessary.  The request is freed with ippDelete()
 106  * after receiving a valid IPP response.
 107  *
 108  * If "infile" is a valid file descriptor, cupsDoIORequest() copies
 109  * all of the data from the file after the IPP request message.
 110  *
 111  * If "outfile" is a valid file descriptor, cupsDoIORequest() copies
 112  * all of the data after the IPP response message to the file.
 113  *
 114  * @since CUPS 1.3/Mac OS X 10.5@
 115  */
 116
 117 ipp_t *                                 /* O - Response data */
 118 cupsDoIORequest(http_t     *http,       /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
 119                 ipp_t      *request,    /* I - IPP request */
 120                 const char *resource,   /* I - HTTP resource for POST */
 121                 int        infile,      /* I - File to read from or -1 for none */
 122                 int        outfile)     /* I - File to write to or -1 for none */
 123 {
 124   ipp_t         *response = NULL;       /* IPP response data */
 125   size_t        length = 0;             /* Content-Length value */
 126   http_status_t status;                 /* Status of HTTP request */
 127   struct stat   fileinfo;               /* File information */
 128   int           bytes;                  /* Number of bytes read/written */
 129   char          buffer[32768];          /* Output buffer */
 130
 131
 132   DEBUG_printf(("cupsDoIORequest(http=%p, request=%p(%s), resource=\"%s\", "
 133                 "infile=%d, outfile=%d)", http, request,
 134                 request ? ippOpString(request->request.op.operation_id) : "?",
 135                 resource, infile, outfile));
 136
 137  /*
 138   * Range check input...
 139   */
 140
 141   if (!request || !resource)
 142   {
 143     ippDelete(request);
 144
 145     _cupsSetError(IPP_INTERNAL_ERROR, strerror(EINVAL), 0);
 146
 147     return (NULL);
 148   }
 149
 150  /*
 151   * Get the default connection as needed...
 152   */
 153
 154   if (!http)
 155     if ((http = _cupsConnect()) == NULL)
 156       return (NULL);
 157
 158  /*
 159   * See if we have a file to send...
 160   */
 161
 162   if (infile >= 0)
 163   {
 164     if (fstat(infile, &fileinfo))
 165     {
 166      /*
 167       * Can't get file information!
 168       */
 169
 170       _cupsSetError(errno == EBADF ? IPP_NOT_FOUND : IPP_NOT_AUTHORIZED,
 171                     NULL, 0);
 172
 173       ippDelete(request);
 174
 175       return (NULL);
 176     }
 177
 178 #ifdef WIN32
 179     if (fileinfo.st_mode & _S_IFDIR)
 180 #else
 181     if (S_ISDIR(fileinfo.st_mode))
 182 #endif /* WIN32 */
 183     {
 184      /*
 185       * Can't send a directory...
 186       */
 187
 188       ippDelete(request);
 189
 190       _cupsSetError(IPP_NOT_POSSIBLE, strerror(EISDIR), 0);
 191
 192       return (NULL);
 193     }
 194
 195 #ifndef WIN32
 196     if (!S_ISREG(fileinfo.st_mode))
 197       length = 0;                       /* Chunk when piping */
 198     else
 199 #endif /* !WIN32 */
 200     length = ippLength(request) + fileinfo.st_size;
 201   }
 202   else
 203     length = ippLength(request);
 204
 205   DEBUG_printf(("2cupsDoIORequest: Request length=%ld, total length=%ld",
 206                 (long)ippLength(request), (long)length));
 207
 208  /*
 209   * Clear any "Local" authentication data since it is probably stale...
 210   */
 211
 212   if (http->authstring && !strncmp(http->authstring, "Local ", 6))
 213     httpSetAuthString(http, NULL, NULL);
 214
 215  /*
 216   * Loop until we can send the request without authorization problems.
 217   */
 218
 219   while (response == NULL)
 220   {
 221     DEBUG_puts("2cupsDoIORequest: setup...");
 222
 223    /*
 224     * Send the request...
 225     */
 226
 227     status = cupsSendRequest(http, request, resource, length);
 228
 229     DEBUG_printf(("2cupsDoIORequest: status=%d", status));
 230
 231     if (status == HTTP_CONTINUE && request->state == IPP_DATA && infile >= 0)
 232     {
 233       DEBUG_puts("2cupsDoIORequest: file write...");
 234
 235      /*
 236       * Send the file with the request...
 237       */
 238
 239 #ifndef WIN32
 240       if (S_ISREG(fileinfo.st_mode))
 241 #endif /* WIN32 */
 242       lseek(infile, 0, SEEK_SET);
 243
 244       while ((bytes = (int)read(infile, buffer, sizeof(buffer))) > 0)
 245       {
 246         if (httpCheck(http))
 247         {
 248           if ((status = httpUpdate(http)) != HTTP_CONTINUE)
 249             break;
 250         }
 251
 252         if (httpWrite2(http, buffer, bytes) < bytes)
 253           break;
 254       }
 255     }
 256
 257    /*
 258     * Get the server's response...
 259     */
 260
 261     if (status == HTTP_CONTINUE || status == HTTP_OK)
 262     {
 263       response = cupsGetResponse(http, resource);
 264       status   = http->status;
 265     }
 266
 267     if (status == HTTP_FORBIDDEN || status == HTTP_ERROR ||
 268         status >= HTTP_SERVER_ERROR)
 269     {
 270       _cupsSetHTTPError(status);
 271       break;
 272     }
 273
 274     if (response)
 275     {
 276       if (outfile >= 0)
 277       {
 278        /*
 279         * Write trailing data to file...
 280         */
 281
 282         while ((bytes = (int)httpRead2(http, buffer, sizeof(buffer))) > 0)
 283           if (write(outfile, buffer, bytes) < bytes)
 284             break;
 285       }
 286       else
 287       {
 288        /*
 289         * Flush any remaining data...
 290         */
 291
 292         httpFlush(http);
 293       }
 294     }
 295   }
 296
 297  /*
 298   * Delete the original request and return the response...
 299   */
 300
 301   ippDelete(request);
 302
 303   return (response);
 304 }
 305
 306
 307 /*
 308  * 'cupsDoRequest()' - Do an IPP request.
 309  *
 310  * This function sends the IPP request to the specified server, retrying
 311  * and authenticating as necessary.  The request is freed with ippDelete()
 312  * after receiving a valid IPP response.
 313  */
 314
 315 ipp_t *                                 /* O - Response data */
 316 cupsDoRequest(http_t     *http,         /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
 317               ipp_t      *request,      /* I - IPP request */
 318               const char *resource)     /* I - HTTP resource for POST */
 319 {
 320   DEBUG_printf(("cupsDoRequest(http=%p, request=%p(%s), resource=\"%s\")",
 321                 http, request,
 322                 request ? ippOpString(request->request.op.operation_id) : "?",
 323                 resource));
 324
 325   return (cupsDoIORequest(http, request, resource, -1, -1));
 326 }
 327
 328
 329 /*
 330  * 'cupsGetResponse()' - Get a response to an IPP request.
 331  *
 332  * Use this function to get the response for an IPP request sent using
 333  * cupsSendDocument() or cupsSendRequest(). For requests that return
 334  * additional data, use httpRead() after getting a successful response.
 335  *
 336  * @since CUPS 1.4@
 337  */
 338
 339 ipp_t *                                 /* O - Response or @code NULL@ on HTTP error */
 340 cupsGetResponse(http_t     *http,       /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
 341                 const char *resource)   /* I - HTTP resource for POST */
 342 {
 343   http_status_t status;                 /* HTTP status */
 344   ipp_state_t   state;                  /* IPP read state */
 345   ipp_t         *response = NULL;       /* IPP response */
 346
 347
 348   DEBUG_printf(("cupsGetResponse(http=%p, resource=\"%s\")", http, resource));
 349
 350  /*
 351   * Connect to the default server as needed...
 352   */
 353
 354   if (!http)
 355     http = _cupsConnect();
 356
 357   if (!http || (http->state != HTTP_POST_RECV && http->state != HTTP_POST_SEND))
 358     return (NULL);
 359
 360  /*
 361   * Check for an unfinished chunked request...
 362   */
 363
 364   if (http->data_encoding == HTTP_ENCODE_CHUNKED)
 365   {
 366    /*
 367     * Send a 0-length chunk to finish off the request...
 368     */
 369
 370     DEBUG_puts("2cupsGetResponse: Finishing chunked POST...");
 371
 372     if (httpWrite2(http, "", 0) < 0)
 373       return (NULL);
 374   }
 375
 376  /*
 377   * Wait for a response from the server...
 378   */
 379
 380   DEBUG_printf(("2cupsGetResponse: Update loop, http->status=%d...",
 381                 http->status));
 382
 383   status = http->status;
 384   while (status == HTTP_CONTINUE)
 385     status = httpUpdate(http);
 386
 387   DEBUG_printf(("2cupsGetResponse: status=%d", status));
 388
 389   if (status == HTTP_OK)
 390   {
 391    /*
 392     * Get the IPP response...
 393     */
 394
 395     response = ippNew();
 396
 397     while ((state = ippRead(http, response)) != IPP_DATA)
 398       if (state == IPP_ERROR)
 399         break;
 400
 401     if (state == IPP_ERROR)
 402     {
 403      /*
 404       * Delete the response...
 405       */
 406
 407       DEBUG_puts("1cupsGetResponse: IPP read error!");
 408
 409       ippDelete(response);
 410       response = NULL;
 411
 412       _cupsSetError(IPP_SERVICE_UNAVAILABLE, NULL, 0);
 413     }
 414   }
 415   else if (status != HTTP_ERROR)
 416   {
 417    /*
 418     * Flush any error message...
 419     */
 420
 421     httpFlush(http);
 422
 423    /*
 424     * Then handle encryption and authentication...
 425     */
 426
 427     if (status == HTTP_UNAUTHORIZED)
 428     {
 429      /*
 430       * See if we can do authentication...
 431       */
 432
 433       DEBUG_puts("2cupsGetResponse: Need authorization...");
 434
 435       if (!cupsDoAuthentication(http, "POST", resource))
 436         httpReconnect(http);
 437     }
 438
 439 #ifdef HAVE_SSL
 440     else if (status == HTTP_UPGRADE_REQUIRED)
 441     {
 442      /*
 443       * Force a reconnect with encryption...
 444       */
 445
 446       DEBUG_puts("2cupsGetResponse: Need encryption...");
 447
 448       if (!httpReconnect(http))
 449         httpEncryption(http, HTTP_ENCRYPT_REQUIRED);
 450     }
 451 #endif /* HAVE_SSL */
 452   }
 453
 454   if (response)
 455   {
 456     ipp_attribute_t     *attr;          /* status-message attribute */
 457
 458
 459     attr = ippFindAttribute(response, "status-message", IPP_TAG_TEXT);
 460
 461     DEBUG_printf(("1cupsGetResponse: status-code=%s, status-message=\"%s\"",
 462                   ippErrorString(response->request.status.status_code),
 463                   attr ? attr->values[0].string.text : ""));
 464
 465     _cupsSetError(response->request.status.status_code,
 466                   attr ? attr->values[0].string.text :
 467                       ippErrorString(response->request.status.status_code), 0);
 468   }
 469   else if (status != HTTP_OK)
 470     _cupsSetHTTPError(status);
 471
 472   return (response);
 473 }
 474
 475
 476 /*
 477  * 'cupsReadResponseData()' - Read additional data after the IPP response.
 478  *
 479  * This function is used after cupsGetResponse() to read the PPD or document
 480  * files for CUPS_GET_PPD and CUPS_GET_DOCUMENT requests, respectively.
 481  *
 482  * @since CUPS 1.4@
 483  */
 484
 485 ssize_t                                 /* O - Bytes read, 0 on EOF, -1 on error */
 486 cupsReadResponseData(
 487     http_t *http,                       /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
 488     char   *buffer,                     /* I - Buffer to use */
 489     size_t length)                      /* I - Number of bytes to read */
 490 {
 491  /*
 492   * Get the default connection as needed...
 493   */
 494
 495   DEBUG_printf(("cupsReadResponseData(http=%p, buffer=%p, "
 496                 "length=" CUPS_LLFMT ")", http, buffer, CUPS_LLCAST length));
 497
 498   if (!http)
 499   {
 500     _cups_globals_t *cg = _cupsGlobals();
 501                                         /* Pointer to library globals */
 502
 503     if ((http = cg->http) == NULL)
 504     {
 505       _cupsSetError(IPP_INTERNAL_ERROR, _("No active connection"), 1);
 506       return (-1);
 507     }
 508   }
 509
 510  /*
 511   * Then read from the HTTP connection...
 512   */
 513
 514   return (httpRead2(http, buffer, length));
 515 }
 516
 517
 518 /*
 519  * 'cupsSendRequest()' - Send an IPP request.
 520  *
 521  * Use httpWrite() to write any additional data (document, PPD file, etc.)
 522  * for the request, cupsGetResponse() to get the IPP response, and httpRead()
 523  * to read any additional data following the response. Only one request can be
 524  * sent/queued at a time.
 525  *
 526  * Unlike cupsDoFileRequest(), cupsDoIORequest(), and cupsDoRequest(), the
 527  * request is not freed.
 528  *
 529  * @since CUPS 1.4@
 530  */
 531
 532 http_status_t                           /* O - Initial HTTP status */
 533 cupsSendRequest(http_t     *http,       /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
 534                 ipp_t      *request,    /* I - IPP request */
 535                 const char *resource,   /* I - Resource path */
 536                 size_t     length)      /* I - Length of data to follow or @code CUPS_LENGTH_VARIABLE@ */
 537 {
 538   http_status_t status;                 /* Status of HTTP request */
 539   int           got_status;             /* Did we get the status? */
 540   ipp_state_t   state;                  /* State of IPP processing */
 541   http_status_t expect;                 /* Expect: header to use */
 542
 543
 544   DEBUG_printf(("cupsSendRequest(http=%p, request=%p(%s), resource=\"%s\", "
 545                 "length=" CUPS_LLFMT ")", http, request,
 546                 request ? ippOpString(request->request.op.operation_id) : "?",
 547                 resource, CUPS_LLCAST length));
 548
 549  /*
 550   * Range check input...
 551   */
 552
 553   if (!request || !resource)
 554   {
 555     _cupsSetError(IPP_INTERNAL_ERROR, strerror(EINVAL), 0);
 556
 557     return (HTTP_ERROR);
 558   }
 559
 560  /*
 561   * Get the default connection as needed...
 562   */
 563
 564   if (!http)
 565     if ((http = _cupsConnect()) == NULL)
 566       return (HTTP_SERVICE_UNAVAILABLE);
 567
 568 #ifdef HAVE_SSL
 569  /*
 570   * See if we have an auth-info attribute and are communicating over
 571   * a non-local link.  If so, encrypt the link so that we can pass
 572   * the authentication information securely...
 573   */
 574
 575   if (ippFindAttribute(request, "auth-info", IPP_TAG_TEXT) &&
 576       !httpAddrLocalhost(http->hostaddr) && !http->tls &&
 577       httpEncryption(http, HTTP_ENCRYPT_REQUIRED))
 578   {
 579     _cupsSetError(IPP_SERVICE_UNAVAILABLE, NULL, 0);
 580     return (HTTP_SERVICE_UNAVAILABLE);
 581   }
 582 #endif /* HAVE_SSL */
 583
 584  /*
 585   * Reconnect if the last response had a "Connection: close"...
 586   */
 587
 588   if (!strcasecmp(http->fields[HTTP_FIELD_CONNECTION], "close"))
 589     if (httpReconnect(http))
 590     {
 591       _cupsSetError(IPP_SERVICE_UNAVAILABLE, NULL, 0);
 592       return (HTTP_SERVICE_UNAVAILABLE);
 593     }
 594
 595  /*
 596   * Loop until we can send the request without authorization problems.
 597   */
 598
 599   expect = HTTP_CONTINUE;
 600
 601   for (;;)
 602   {
 603     DEBUG_puts("2cupsSendRequest: Setup...");
 604
 605    /*
 606     * Setup the HTTP variables needed...
 607     */
 608
 609     httpClearFields(http);
 610     httpSetLength(http, length);
 611     httpSetField(http, HTTP_FIELD_CONTENT_TYPE, "application/ipp");
 612     httpSetField(http, HTTP_FIELD_AUTHORIZATION, http->authstring);
 613     httpSetExpect(http, expect);
 614
 615     DEBUG_printf(("2cupsSendRequest: authstring=\"%s\"", http->authstring));
 616
 617    /*
 618     * Try the request...
 619     */
 620
 621     DEBUG_puts("2cupsSendRequest: Sending HTTP POST...");
 622
 623     if (httpPost(http, resource))
 624     {
 625       if (httpReconnect(http))
 626       {
 627         _cupsSetError(IPP_SERVICE_UNAVAILABLE, NULL, 0);
 628         return (HTTP_SERVICE_UNAVAILABLE);
 629       }
 630       else
 631         continue;
 632     }
 633
 634    /*
 635     * Send the IPP data...
 636     */
 637
 638     DEBUG_puts("2cupsSendRequest: Writing IPP request...");
 639
 640     request->state = IPP_IDLE;
 641     status         = HTTP_CONTINUE;
 642     got_status     = 0;
 643
 644     while ((state = ippWrite(http, request)) != IPP_DATA)
 645       if (state == IPP_ERROR)
 646         break;
 647       else if (httpCheck(http))
 648       {
 649         got_status = 1;
 650
 651         if ((status = httpUpdate(http)) != HTTP_CONTINUE)
 652           break;
 653       }
 654
 655    /*
 656     * Wait up to 1 second to get the 100-continue response as needed...
 657     */
 658
 659     if (!got_status && expect == HTTP_CONTINUE)
 660     {
 661       DEBUG_puts("2cupsSendRequest: Waiting for 100-continue...");
 662
 663       if (httpWait(http, 1000))
 664         status = httpUpdate(http);
 665     }
 666     else if (httpCheck(http))
 667       status = httpUpdate(http);
 668
 669     DEBUG_printf(("2cupsSendRequest: status=%d", status));
 670
 671    /*
 672     * Process the current HTTP status...
 673     */
 674
 675     switch (status)
 676     {
 677       case HTTP_ERROR :
 678       case HTTP_CONTINUE :
 679       case HTTP_OK :
 680           return (status);
 681
 682       case HTTP_UNAUTHORIZED :
 683           if (!cupsDoAuthentication(http, "POST", resource))
 684             if (httpReconnect(http))
 685             {
 686               _cupsSetError(IPP_SERVICE_UNAVAILABLE, NULL, 0);
 687               return (HTTP_SERVICE_UNAVAILABLE);
 688             }
 689
 690           return (status);
 691
 692 #ifdef HAVE_SSL
 693       case HTTP_UPGRADE_REQUIRED :
 694          /*
 695           * Flush any error message, reconnect, and then upgrade with
 696           * encryption...
 697           */
 698
 699           if (httpReconnect(http))
 700           {
 701             _cupsSetError(IPP_SERVICE_UNAVAILABLE, NULL, 0);
 702             return (HTTP_SERVICE_UNAVAILABLE);
 703           }
 704
 705           httpEncryption(http, HTTP_ENCRYPT_REQUIRED);
 706
 707           return (status);
 708 #endif /* HAVE_SSL */
 709
 710       case HTTP_EXPECTATION_FAILED :
 711          /*
 712           * Don't try using the Expect: header the next time around...
 713           */
 714
 715           expect = (http_status_t)0;
 716
 717           if (httpReconnect(http))
 718           {
 719             _cupsSetError(IPP_SERVICE_UNAVAILABLE, NULL, 0);
 720             return (HTTP_SERVICE_UNAVAILABLE);
 721           }
 722           break;
 723
 724       default :
 725          /*
 726           * Some other error...
 727           */
 728
 729           return (status);
 730     }
 731   }
 732 }
 733
 734
 735 /*
 736  * 'cupsWriteRequestData()' - Write additional data after an IPP request.
 737  *
 738  * This function is used after @link cupsSendRequest@ to provide a PPD and
 739  * after @link cupsStartDocument@ to provide a document file.
 740  *
 741  * @since CUPS 1.4@
 742  */
 743
 744 http_status_t                           /* O - @code HTTP_CONTINUE@ if OK or HTTP status on error */
 745 cupsWriteRequestData(
 746     http_t     *http,                   /* I - Connection to server or @code CUPS_HTTP_DEFAULT@ */
 747     const char *buffer,                 /* I - Bytes to write */
 748     size_t     length)                  /* I - Number of bytes to write */
 749 {
 750   int   wused;                          /* Previous bytes in buffer */
 751
 752
 753  /*
 754   * Get the default connection as needed...
 755   */
 756
 757   DEBUG_printf(("cupsWriteRequestData(http=%p, buffer=%p, "
 758                 "length=" CUPS_LLFMT ")", http, buffer, CUPS_LLCAST length));
 759
 760   if (!http)
 761   {
 762     _cups_globals_t *cg = _cupsGlobals();
 763                                         /* Pointer to library globals */
 764
 765     if ((http = cg->http) == NULL)
 766     {
 767       _cupsSetError(IPP_INTERNAL_ERROR, _("No active connection"), 1);
 768       return (HTTP_ERROR);
 769     }
 770   }
 771
 772  /*
 773   * Then write to the HTTP connection...
 774   */
 775
 776   wused = http->wused;
 777
 778   if (httpWrite2(http, buffer, length) < 0)
 779     return (HTTP_ERROR);
 780
 781  /*
 782   * Finally, check if we have any pending data from the server...
 783   */
 784
 785   if (length > HTTP_MAX_BUFFER ||
 786       http->wused < wused ||
 787       (wused > 0 && http->wused == length))
 788   {
 789    /*
 790     * We've written something to the server, so check for response data...
 791     */
 792
 793     if (_httpWait(http, 0, 1))
 794       return (httpUpdate(http));
 795   }
 796
 797   return (HTTP_CONTINUE);
 798 }
 799
 800
 801 /*
 802  * '_cupsSetError()' - Set the last IPP status code and status-message.
 803  */
 804
 805 void
 806 _cupsSetError(ipp_status_t status,      /* I - IPP status code */
 807               const char   *message,    /* I - status-message value */
 808               int          localize)    /* I - Localize the message? */
 809 {
 810   _cups_globals_t       *cg;            /* Global data */
 811
 812
 813   if (!message && errno)
 814   {
 815     message  = strerror(errno);
 816     localize = 0;
 817   }
 818
 819   cg             = _cupsGlobals();
 820   cg->last_error = status;
 821
 822   if (cg->last_status_message)
 823   {
 824     _cupsStrFree(cg->last_status_message);
 825
 826     cg->last_status_message = NULL;
 827   }
 828
 829   if (message)
 830   {
 831     if (localize)
 832     {
 833      /*
 834       * Get the message catalog...
 835       */
 836
 837       if (!cg->lang_default)
 838         cg->lang_default = cupsLangDefault();
 839
 840       cg->last_status_message = _cupsStrAlloc(_cupsLangString(cg->lang_default,
 841                                                               message));
 842     }
 843     else
 844       cg->last_status_message = _cupsStrAlloc(message);
 845   }
 846
 847   DEBUG_printf(("4_cupsSetError: last_error=%s, last_status_message=\"%s\"",
 848                 ippErrorString(cg->last_error), cg->last_status_message));
 849 }
 850
 851
 852 /*
 853  * '_cupsSetHTTPError()' - Set the last error using the HTTP status.
 854  */
 855
 856 void
 857 _cupsSetHTTPError(http_status_t status) /* I - HTTP status code */
 858 {
 859   switch (status)
 860   {
 861     case HTTP_NOT_FOUND :
 862         _cupsSetError(IPP_NOT_FOUND, httpStatus(status), 0);
 863         break;
 864
 865     case HTTP_UNAUTHORIZED :
 866         _cupsSetError(IPP_NOT_AUTHORIZED, httpStatus(status), 0);
 867         break;
 868
 869     case HTTP_FORBIDDEN :
 870         _cupsSetError(IPP_FORBIDDEN, httpStatus(status), 0);
 871         break;
 872
 873     case HTTP_BAD_REQUEST :
 874         _cupsSetError(IPP_BAD_REQUEST, httpStatus(status), 0);
 875         break;
 876
 877     case HTTP_REQUEST_TOO_LARGE :
 878         _cupsSetError(IPP_REQUEST_VALUE, httpStatus(status), 0);
 879         break;
 880
 881     case HTTP_NOT_IMPLEMENTED :
 882         _cupsSetError(IPP_OPERATION_NOT_SUPPORTED, httpStatus(status), 0);
 883         break;
 884
 885     case HTTP_NOT_SUPPORTED :
 886         _cupsSetError(IPP_VERSION_NOT_SUPPORTED, httpStatus(status), 0);
 887         break;
 888
 889     default :
 890         DEBUG_printf(("4_cupsSetHTTPError: HTTP error %d mapped to "
 891                       "IPP_SERVICE_UNAVAILABLE!", status));
 892         _cupsSetError(IPP_SERVICE_UNAVAILABLE, httpStatus(status), 0);
 893         break;
 894   }
 895 }
 896
 897
 898 /*
 899  * End of "$Id: request.c 7946 2008-09-16 23:27:54Z mike $".
 900  */