]> git.ipfire.org Git - thirdparty/cups.git/blob - cups/http.c
projects / thirdparty / cups.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Automate creation of the libcups2.def file, since it is really out-of-date...
[thirdparty/cups.git] / cups / http.c
1 /*
2 * "$Id$"
3 *
4 * HTTP routines for CUPS.
5 *
6 * Copyright 2007-2014 by Apple Inc.
7 * Copyright 1997-2007 by Easy Software Products, all rights reserved.
8 *
9 * This file contains Kerberos support code, copyright 2006 by
10 * Jelmer Vernooij.
11 *
12 * These coded instructions, statements, and computer programs are the
13 * property of Apple Inc. and are protected by Federal copyright
14 * law. Distribution and use rights are outlined in the file "LICENSE.txt"
15 * which should have been included with this file. If this file is
16 * file is missing or damaged, see the license at "http://www.cups.org/".
17 *
18 * This file is subject to the Apple OS-Developed Software exception.
19 */
20
21 /*
22 * Include necessary headers...
23 */
24
25 #include "cups-private.h"
26 #include <fcntl.h>
27 #include <math.h>
28 #ifdef WIN32
29 # include <tchar.h>
30 #else
31 # include <signal.h>
32 # include <sys/time.h>
33 # include <sys/resource.h>
34 #endif /* WIN32 */
35 #ifdef HAVE_POLL
36 # include <poll.h>
37 #endif /* HAVE_POLL */
38
39
40 /*
41 * Local functions...
42 */
43
44 #ifdef HAVE_LIBZ
45 static void http_content_coding_finish(http_t *http);
46 static void http_content_coding_start(http_t *http,
47 const char *value);
48 #endif /* HAVE_LIBZ */
49 static http_t *http_create(const char *host, int port,
50 http_addrlist_t *addrlist, int family,
51 http_encryption_t encryption,
52 int blocking, _http_mode_t mode);
53 #ifdef DEBUG
54 static void http_debug_hex(const char *prefix, const char *buffer,
55 int bytes);
56 #endif /* DEBUG */
57 static ssize_t http_read(http_t *http, char *buffer, size_t length);
58 static ssize_t http_read_buffered(http_t *http, char *buffer, size_t length);
59 static ssize_t http_read_chunk(http_t *http, char *buffer, size_t length);
60 static int http_send(http_t *http, http_state_t request,
61 const char *uri);
62 static ssize_t http_write(http_t *http, const char *buffer,
63 size_t length);
64 static ssize_t http_write_chunk(http_t *http, const char *buffer,
65 size_t length);
66 static off_t http_set_length(http_t *http);
67 static void http_set_timeout(int fd, double timeout);
68 static void http_set_wait(http_t *http);
69
70 #ifdef HAVE_SSL
71 static int http_tls_upgrade(http_t *http);
72 #endif /* HAVE_SSL */
73
74
75 /*
76 * Local globals...
77 */
78
79 static const char * const http_fields[] =
80 {
81 "Accept-Language",
82 "Accept-Ranges",
83 "Authorization",
84 "Connection",
85 "Content-Encoding",
86 "Content-Language",
87 "Content-Length",
88 "Content-Location",
89 "Content-MD5",
90 "Content-Range",
91 "Content-Type",
92 "Content-Version",
93 "Date",
94 "Host",
95 "If-Modified-Since",
96 "If-Unmodified-since",
97 "Keep-Alive",
98 "Last-Modified",
99 "Link",
100 "Location",
101 "Range",
102 "Referer",
103 "Retry-After",
104 "Transfer-Encoding",
105 "Upgrade",
106 "User-Agent",
107 "WWW-Authenticate",
108 "Accept-Encoding",
109 "Allow",
110 "Server"
111 };
112
113
114 /*
115 * 'httpAcceptConnection()' - Accept a new HTTP client connection from the
116 * specified listening socket.
117 *
118 * @since CUPS 1.7/OS X 10.9@
119 */
120
121 http_t * /* O - HTTP connection or @code NULL@ */
122 httpAcceptConnection(int fd, /* I - Listen socket file descriptor */
123 int blocking) /* I - 1 if the connection should be
124 blocking, 0 otherwise */
125 {
126 http_t *http; /* HTTP connection */
127 http_addrlist_t addrlist; /* Dummy address list */
128 socklen_t addrlen; /* Length of address */
129 int val; /* Socket option value */
130
131
132 /*
133 * Range check input...
134 */
135
136 if (fd < 0)
137 return (NULL);
138
139 /*
140 * Create the client connection...
141 */
142
143 memset(&addrlist, 0, sizeof(addrlist));
144
145 if ((http = http_create(NULL, 0, &addrlist, AF_UNSPEC,
146 HTTP_ENCRYPTION_IF_REQUESTED, blocking,
147 _HTTP_MODE_SERVER)) == NULL)
148 return (NULL);
149
150 /*
151 * Accept the client and get the remote address...
152 */
153
154 addrlen = sizeof(http_addr_t);
155
156 if ((http->fd = accept(fd, (struct sockaddr *)&(http->addrlist->addr),
157 &addrlen)) < 0)
158 {
159 _cupsSetHTTPError(HTTP_STATUS_ERROR);
160 httpClose(http);
161
162 return (NULL);
163 }
164
165 http->hostaddr = &(http->addrlist->addr);
166
167 if (httpAddrLocalhost(http->hostaddr))
168 strlcpy(http->hostname, "localhost", sizeof(http->hostname));
169 else
170 httpAddrString(http->hostaddr, http->hostname, sizeof(http->hostname));
171
172 #ifdef SO_NOSIGPIPE
173 /*
174 * Disable SIGPIPE for this socket.
175 */
176
177 val = 1;
178 setsockopt(http->fd, SOL_SOCKET, SO_NOSIGPIPE, CUPS_SOCAST &val, sizeof(val));
179 #endif /* SO_NOSIGPIPE */
180
181 /*
182 * Using TCP_NODELAY improves responsiveness, especially on systems
183 * with a slow loopback interface. Since we write large buffers
184 * when sending print files and requests, there shouldn't be any
185 * performance penalty for this...
186 */
187
188 val = 1;
189 setsockopt(http->fd, IPPROTO_TCP, TCP_NODELAY, CUPS_SOCAST &val, sizeof(val));
190
191 #ifdef FD_CLOEXEC
192 /*
193 * Close this socket when starting another process...
194 */
195
196 fcntl(http->fd, F_SETFD, FD_CLOEXEC);
197 #endif /* FD_CLOEXEC */
198
199 return (http);
200 }
201
202
203 /*
204 * 'httpAddCredential()' - Allocates and adds a single credential to an array.
205 *
206 * Use @code cupsArrayNew(NULL, NULL)@ to create a credentials array.
207 *
208 * @since CUPS 1.5/OS X 10.7@
209 */
210
211 int /* O - 0 on success, -1 on error */
212 httpAddCredential(
213 cups_array_t *credentials, /* I - Credentials array */
214 const void *data, /* I - PEM-encoded X.509 data */
215 size_t datalen) /* I - Length of data */
216 {
217 http_credential_t *credential; /* Credential data */
218
219
220 if ((credential = malloc(sizeof(http_credential_t))) != NULL)
221 {
222 credential->datalen = datalen;
223
224 if ((credential->data = malloc(datalen)) != NULL)
225 {
226 memcpy(credential->data, data, datalen);
227 cupsArrayAdd(credentials, credential);
228 return (0);
229 }
230
231 free(credential);
232 }
233
234 return (-1);
235 }
236
237
238 /*
239 * 'httpBlocking()' - Set blocking/non-blocking behavior on a connection.
240 */
241
242 void
243 httpBlocking(http_t *http, /* I - HTTP connection */
244 int b) /* I - 1 = blocking, 0 = non-blocking */
245 {
246 if (http)
247 {
248 http->blocking = b;
249 http_set_wait(http);
250 }
251 }
252
253
254 /*
255 * 'httpCheck()' - Check to see if there is a pending response from the server.
256 */
257
258 int /* O - 0 = no data, 1 = data available */
259 httpCheck(http_t *http) /* I - HTTP connection */
260 {
261 return (httpWait(http, 0));
262 }
263
264
265 /*
266 * 'httpClearCookie()' - Clear the cookie value(s).
267 *
268 * @since CUPS 1.1.19/OS X 10.3@
269 */
270
271 void
272 httpClearCookie(http_t *http) /* I - HTTP connection */
273 {
274 if (!http)
275 return;
276
277 if (http->cookie)
278 {
279 free(http->cookie);
280 http->cookie = NULL;
281 }
282 }
283
284
285 /*
286 * 'httpClearFields()' - Clear HTTP request fields.
287 */
288
289 void
290 httpClearFields(http_t *http) /* I - HTTP connection */
291 {
292 DEBUG_printf(("httpClearFields(http=%p)", http));
293
294 if (http)
295 {
296 memset(http->fields, 0, sizeof(http->fields));
297
298 if (http->mode == _HTTP_MODE_CLIENT)
299 {
300 if (http->hostname[0] == '/')
301 httpSetField(http, HTTP_FIELD_HOST, "localhost");
302 else
303 httpSetField(http, HTTP_FIELD_HOST, http->hostname);
304 }
305
306 if (http->field_authorization)
307 {
308 free(http->field_authorization);
309 http->field_authorization = NULL;
310 }
311
312 if (http->accept_encoding)
313 {
314 _cupsStrFree(http->accept_encoding);
315 http->accept_encoding = NULL;
316 }
317
318 if (http->allow)
319 {
320 _cupsStrFree(http->allow);
321 http->allow = NULL;
322 }
323
324 if (http->server)
325 {
326 _cupsStrFree(http->server);
327 http->server = NULL;
328 }
329
330 http->expect = (http_status_t)0;
331 }
332 }
333
334
335 /*
336 * 'httpClose()' - Close an HTTP connection.
337 */
338
339 void
340 httpClose(http_t *http) /* I - HTTP connection */
341 {
342 #ifdef HAVE_GSSAPI
343 OM_uint32 minor_status; /* Minor status code */
344 #endif /* HAVE_GSSAPI */
345
346
347 DEBUG_printf(("httpClose(http=%p)", http));
348
349 /*
350 * Range check input...
351 */
352
353 if (!http)
354 return;
355
356 /*
357 * Close any open connection...
358 */
359
360 _httpDisconnect(http);
361
362 /*
363 * Free memory used...
364 */
365
366 httpAddrFreeList(http->addrlist);
367
368 if (http->cookie)
369 free(http->cookie);
370
371 #ifdef HAVE_GSSAPI
372 if (http->gssctx != GSS_C_NO_CONTEXT)
373 gss_delete_sec_context(&minor_status, &http->gssctx, GSS_C_NO_BUFFER);
374
375 if (http->gssname != GSS_C_NO_NAME)
376 gss_release_name(&minor_status, &http->gssname);
377 #endif /* HAVE_GSSAPI */
378
379 #ifdef HAVE_AUTHORIZATION_H
380 if (http->auth_ref)
381 AuthorizationFree(http->auth_ref, kAuthorizationFlagDefaults);
382 #endif /* HAVE_AUTHORIZATION_H */
383
384 httpClearFields(http);
385
386 if (http->authstring && http->authstring != http->_authstring)
387 free(http->authstring);
388
389 free(http);
390 }
391
392
393 /*
394 * 'httpCompareCredentials()' - Compare two sets of X.509 credentials.
395 *
396 * @since CUPS 2.0@
397 */
398
399 int /* O - 1 if they match, 0 if they do not */
400 httpCompareCredentials(
401 cups_array_t *cred1, /* I - First set of X.509 credentials */
402 cups_array_t *cred2) /* I - Second set of X.509 credentials */
403 {
404 http_credential_t *temp1, *temp2; /* Temporary credentials */
405
406
407 for (temp1 = (http_credential_t *)cupsArrayFirst(cred1), temp2 = (http_credential_t *)cupsArrayFirst(cred2); temp1 && temp2; temp1 = (http_credential_t *)cupsArrayNext(cred1), temp2 = (http_credential_t *)cupsArrayNext(cred2))
408 if (temp1->datalen != temp2->datalen)
409 return (0);
410 else if (memcmp(temp1->data, temp2->data, temp1->datalen))
411 return (0);
412
413 return (temp1 == temp2);
414 }
415
416
417 /*
418 * 'httpConnect()' - Connect to a HTTP server.
419 *
420 * This function is deprecated - use @link httpConnect2@ instead.
421 *
422 * @deprecated@
423 */
424
425 http_t * /* O - New HTTP connection */
426 httpConnect(const char *host, /* I - Host to connect to */
427 int port) /* I - Port number */
428 {
429 return (httpConnect2(host, port, NULL, AF_UNSPEC,
430 HTTP_ENCRYPTION_IF_REQUESTED, 1, 30000, NULL));
431 }
432
433
434 /*
435 * 'httpConnect2()' - Connect to a HTTP server.
436 *
437 * @since CUPS 1.7/OS X 10.9@
438 */
439
440 http_t * /* O - New HTTP connection */
441 httpConnect2(
442 const char *host, /* I - Host to connect to */
443 int port, /* I - Port number */
444 http_addrlist_t *addrlist, /* I - List of addresses or NULL to lookup */
445 int family, /* I - Address family to use or @code AF_UNSPEC@ for any */
446 http_encryption_t encryption, /* I - Type of encryption to use */
447 int blocking, /* I - 1 for blocking connection, 0 for non-blocking */
448 int msec, /* I - Connection timeout in milliseconds, 0 means don't connect */
449 int *cancel) /* I - Pointer to "cancel" variable */
450 {
451 http_t *http; /* New HTTP connection */
452
453
454 DEBUG_printf(("httpConnect2(host=\"%s\", port=%d, addrlist=%p, family=%d, "
455 "encryption=%d, blocking=%d, msec=%d, cancel=%p)", host, port,
456 addrlist, family, encryption, blocking, msec, cancel));
457
458 /*
459 * Create the HTTP structure...
460 */
461
462 if ((http = http_create(host, port, addrlist, family, encryption, blocking,
463 _HTTP_MODE_CLIENT)) == NULL)
464 return (NULL);
465
466 /*
467 * Optionally connect to the remote system...
468 */
469
470 if (msec == 0 || !httpReconnect2(http, msec, cancel))
471 return (http);
472
473 /*
474 * Could not connect to any known address - bail out!
475 */
476
477 httpClose(http);
478
479 return (NULL);
480 }
481
482
483 /*
484 * 'httpConnectEncrypt()' - Connect to a HTTP server using encryption.
485 *
486 * This function is now deprecated. Please use the @link httpConnect2@ function
487 * instead.
488 *
489 * @deprecated@
490 */
491
492 http_t * /* O - New HTTP connection */
493 httpConnectEncrypt(
494 const char *host, /* I - Host to connect to */
495 int port, /* I - Port number */
496 http_encryption_t encryption) /* I - Type of encryption to use */
497 {
498 DEBUG_printf(("httpConnectEncrypt(host=\"%s\", port=%d, encryption=%d)",
499 host, port, encryption));
500
501 return (httpConnect2(host, port, NULL, AF_UNSPEC, encryption, 1, 30000,
502 NULL));
503 }
504
505
506 /*
507 * 'httpDelete()' - Send a DELETE request to the server.
508 */
509
510 int /* O - Status of call (0 = success) */
511 httpDelete(http_t *http, /* I - HTTP connection */
512 const char *uri) /* I - URI to delete */
513 {
514 return (http_send(http, HTTP_STATE_DELETE, uri));
515 }
516
517
518 /*
519 * '_httpDisconnect()' - Disconnect a HTTP connection.
520 */
521
522 void
523 _httpDisconnect(http_t *http) /* I - HTTP connection */
524 {
525 #ifdef HAVE_SSL
526 if (http->tls)
527 _httpTLSStop(http);
528 #endif /* HAVE_SSL */
529
530 httpAddrClose(NULL, http->fd);
531
532 http->fd = -1;
533 }
534
535
536 /*
537 * 'httpEncryption()' - Set the required encryption on the link.
538 */
539
540 int /* O - -1 on error, 0 on success */
541 httpEncryption(http_t *http, /* I - HTTP connection */
542 http_encryption_t e) /* I - New encryption preference */
543 {
544 DEBUG_printf(("httpEncryption(http=%p, e=%d)", http, e));
545
546 #ifdef HAVE_SSL
547 if (!http)
548 return (0);
549
550 if (http->mode == _HTTP_MODE_CLIENT)
551 {
552 http->encryption = e;
553
554 if ((http->encryption == HTTP_ENCRYPTION_ALWAYS && !http->tls) ||
555 (http->encryption == HTTP_ENCRYPTION_NEVER && http->tls))
556 return (httpReconnect2(http, 30000, NULL));
557 else if (http->encryption == HTTP_ENCRYPTION_REQUIRED && !http->tls)
558 return (http_tls_upgrade(http));
559 else
560 return (0);
561 }
562 else
563 {
564 if (e == HTTP_ENCRYPTION_NEVER && http->tls)
565 return (-1);
566
567 http->encryption = e;
568 if (e != HTTP_ENCRYPTION_IF_REQUESTED && !http->tls)
569 return (_httpTLSStart(http));
570 else
571 return (0);
572 }
573 #else
574 if (e == HTTP_ENCRYPTION_ALWAYS || e == HTTP_ENCRYPTION_REQUIRED)
575 return (-1);
576 else
577 return (0);
578 #endif /* HAVE_SSL */
579 }
580
581
582 /*
583 * 'httpError()' - Get the last error on a connection.
584 */
585
586 int /* O - Error code (errno) value */
587 httpError(http_t *http) /* I - HTTP connection */
588 {
589 if (http)
590 return (http->error);
591 else
592 return (EINVAL);
593 }
594
595
596 /*
597 * 'httpFieldValue()' - Return the HTTP field enumeration value for a field
598 * name.
599 */
600
601 http_field_t /* O - Field index */
602 httpFieldValue(const char *name) /* I - String name */
603 {
604 int i; /* Looping var */
605
606
607 for (i = 0; i < HTTP_FIELD_MAX; i ++)
608 if (!_cups_strcasecmp(name, http_fields[i]))
609 return ((http_field_t)i);
610
611 return (HTTP_FIELD_UNKNOWN);
612 }
613
614
615 /*
616 * 'httpFlush()' - Flush data from a HTTP connection.
617 */
618
619 void
620 httpFlush(http_t *http) /* I - HTTP connection */
621 {
622 char buffer[8192]; /* Junk buffer */
623 int blocking; /* To block or not to block */
624 http_state_t oldstate; /* Old state */
625
626
627 DEBUG_printf(("httpFlush(http=%p), state=%s", http,
628 httpStateString(http->state)));
629
630 /*
631 * Nothing to do if we are in the "waiting" state...
632 */
633
634 if (http->state == HTTP_STATE_WAITING)
635 return;
636
637 /*
638 * Temporarily set non-blocking mode so we don't get stuck in httpRead()...
639 */
640
641 blocking = http->blocking;
642 http->blocking = 0;
643
644 /*
645 * Read any data we can...
646 */
647
648 oldstate = http->state;
649 while (httpRead2(http, buffer, sizeof(buffer)) > 0);
650
651 /*
652 * Restore blocking and reset the connection if we didn't get all of
653 * the remaining data...
654 */
655
656 http->blocking = blocking;
657
658 if (http->state == oldstate && http->state != HTTP_STATE_WAITING &&
659 http->fd >= 0)
660 {
661 /*
662 * Didn't get the data back, so close the current connection.
663 */
664
665 #ifdef HAVE_LIBZ
666 if (http->coding)
667 http_content_coding_finish(http);
668 #endif /* HAVE_LIBZ */
669
670 DEBUG_puts("1httpFlush: Setting state to HTTP_STATE_WAITING and closing.");
671
672 http->state = HTTP_STATE_WAITING;
673
674 #ifdef HAVE_SSL
675 if (http->tls)
676 _httpTLSStop(http);
677 #endif /* HAVE_SSL */
678
679 httpAddrClose(NULL, http->fd);
680
681 http->fd = -1;
682 }
683 }
684
685
686 /*
687 * 'httpFlushWrite()' - Flush data in write buffer.
688 *
689 * @since CUPS 1.2/OS X 10.5@
690 */
691
692 int /* O - Bytes written or -1 on error */
693 httpFlushWrite(http_t *http) /* I - HTTP connection */
694 {
695 ssize_t bytes; /* Bytes written */
696
697
698 DEBUG_printf(("httpFlushWrite(http=%p) data_encoding=%d", http,
699 http ? http->data_encoding : 100));
700
701 if (!http || !http->wused)
702 {
703 DEBUG_puts(http ? "1httpFlushWrite: Write buffer is empty." :
704 "1httpFlushWrite: No connection.");
705 return (0);
706 }
707
708 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
709 bytes = http_write_chunk(http, http->wbuffer, (size_t)http->wused);
710 else
711 bytes = http_write(http, http->wbuffer, (size_t)http->wused);
712
713 http->wused = 0;
714
715 DEBUG_printf(("1httpFlushWrite: Returning %d, errno=%d.", (int)bytes, errno));
716
717 return ((int)bytes);
718 }
719
720
721 /*
722 * 'httpFreeCredentials()' - Free an array of credentials.
723 */
724
725 void
726 httpFreeCredentials(
727 cups_array_t *credentials) /* I - Array of credentials */
728 {
729 http_credential_t *credential; /* Credential */
730
731
732 for (credential = (http_credential_t *)cupsArrayFirst(credentials);
733 credential;
734 credential = (http_credential_t *)cupsArrayNext(credentials))
735 {
736 cupsArrayRemove(credentials, credential);
737 free((void *)credential->data);
738 free(credential);
739 }
740
741 cupsArrayDelete(credentials);
742 }
743
744
745 /*
746 * 'httpGet()' - Send a GET request to the server.
747 */
748
749 int /* O - Status of call (0 = success) */
750 httpGet(http_t *http, /* I - HTTP connection */
751 const char *uri) /* I - URI to get */
752 {
753 return (http_send(http, HTTP_STATE_GET, uri));
754 }
755
756
757 /*
758 * 'httpGetActivity()' - Get the most recent activity for a connection.
759 *
760 * The return value is the UNIX time of the last read or write.
761 *
762 * @since CUPS 2.0@
763 */
764
765 time_t /* O - Time of last read or write */
766 httpGetActivity(http_t *http) /* I - HTTP connection */
767 {
768 return (http ? http->activity : 0);
769 }
770
771
772 /*
773 * 'httpGetAuthString()' - Get the current authorization string.
774 *
775 * The authorization string is set by cupsDoAuthentication() and
776 * httpSetAuthString(). Use httpGetAuthString() to retrieve the
777 * string to use with httpSetField() for the HTTP_FIELD_AUTHORIZATION
778 * value.
779 *
780 * @since CUPS 1.3/OS X 10.5@
781 */
782
783 char * /* O - Authorization string */
784 httpGetAuthString(http_t *http) /* I - HTTP connection */
785 {
786 if (http)
787 return (http->authstring);
788 else
789 return (NULL);
790 }
791
792
793 /*
794 * 'httpGetBlocking()' - Get the blocking/non-block state of a connection.
795 *
796 * @since CUPS 1.2/OS X 10.5@
797 */
798
799 int /* O - 1 if blocking, 0 if non-blocking */
800 httpGetBlocking(http_t *http) /* I - HTTP connection */
801 {
802 return (http ? http->blocking : 0);
803 }
804
805
806 /*
807 * 'httpGetContentEncoding()' - Get a common content encoding, if any, between
808 * the client and server.
809 *
810 * This function uses the value of the Accepts-Encoding HTTP header and must be
811 * called after receiving a response from the server or a request from the
812 * client. The value returned can be use in subsequent requests (for clients)
813 * or in the response (for servers) in order to compress the content stream.
814 *
815 * @since CUPS 1.7/OS X 10.9@
816 */
817
818 const char * /* O - Content-Coding value or
819 @code NULL@ for the identity
820 coding. */
821 httpGetContentEncoding(http_t *http) /* I - HTTP connection */
822 {
823 #ifdef HAVE_LIBZ
824 if (http && http->accept_encoding)
825 {
826 int i; /* Looping var */
827 char temp[HTTP_MAX_VALUE], /* Copy of Accepts-Encoding value */
828 *start, /* Start of coding value */
829 *end; /* End of coding value */
830 double qvalue; /* "qvalue" for coding */
831 struct lconv *loc = localeconv(); /* Locale data */
832 static const char * const codings[] =
833 { /* Supported content codings */
834 "deflate",
835 "gzip",
836 "x-deflate",
837 "x-gzip"
838 };
839
840 strlcpy(temp, http->accept_encoding, sizeof(temp));
841
842 for (start = temp; *start; start = end)
843 {
844 /*
845 * Find the end of the coding name...
846 */
847
848 qvalue = 1.0;
849 end = start;
850 while (*end && *end != ';' && *end != ',' && !isspace(*end & 255))
851 end ++;
852
853 if (*end == ';')
854 {
855 /*
856 * Grab the qvalue as needed...
857 */
858
859 if (!strncmp(end, ";q=", 3))
860 qvalue = _cupsStrScand(end + 3, NULL, loc);
861
862 /*
863 * Skip past all attributes...
864 */
865
866 *end++ = '\0';
867 while (*end && *end != ',' && !isspace(*end & 255))
868 end ++;
869 }
870 else if (*end)
871 *end++ = '\0';
872
873 while (*end && isspace(*end & 255))
874 end ++;
875
876 /*
877 * Check value if it matches something we support...
878 */
879
880 if (qvalue <= 0.0)
881 continue;
882
883 for (i = 0; i < (int)(sizeof(codings) / sizeof(codings[0])); i ++)
884 if (!strcmp(start, codings[i]))
885 return (codings[i]);
886 }
887 }
888 #endif /* HAVE_LIBZ */
889
890 return (NULL);
891 }
892
893
894 /*
895 * 'httpGetCookie()' - Get any cookie data from the response.
896 *
897 * @since CUPS 1.1.19/OS X 10.3@
898 */
899
900 const char * /* O - Cookie data or NULL */
901 httpGetCookie(http_t *http) /* I - HTTP connecion */
902 {
903 return (http ? http->cookie : NULL);
904 }
905
906
907 /*
908 * 'httpGetEncryption()' - Get the current encryption mode of a connection.
909 *
910 * This function returns the encryption mode for the connection. Use the
911 * @link httpIsEncrypted@ function to determine whether a TLS session has
912 * been established.
913 *
914 * @since CUPS 2.0@
915 */
916
917 http_encryption_t /* O - Current encryption mode */
918 httpGetEncryption(http_t *http) /* I - HTTP connection */
919 {
920 return (http ? http->encryption : HTTP_ENCRYPTION_IF_REQUESTED);
921 }
922
923
924 /*
925 * 'httpGetExpect()' - Get the value of the Expect header, if any.
926 *
927 * Returns @code HTTP_STATUS_NONE@ if there is no Expect header, otherwise
928 * returns the expected HTTP status code, typically @code HTTP_STATUS_CONTINUE@.
929 *
930 * @since CUPS 1.7/OS X 10.9@
931 */
932
933 http_status_t /* O - Expect: status, if any */
934 httpGetExpect(http_t *http) /* I - HTTP connection */
935 {
936 if (!http)
937 return (HTTP_STATUS_ERROR);
938 else
939 return (http->expect);
940 }
941
942
943 /*
944 * 'httpGetFd()' - Get the file descriptor associated with a connection.
945 *
946 * @since CUPS 1.2/OS X 10.5@
947 */
948
949 int /* O - File descriptor or -1 if none */
950 httpGetFd(http_t *http) /* I - HTTP connection */
951 {
952 return (http ? http->fd : -1);
953 }
954
955
956 /*
957 * 'httpGetField()' - Get a field value from a request/response.
958 */
959
960 const char * /* O - Field value */
961 httpGetField(http_t *http, /* I - HTTP connection */
962 http_field_t field) /* I - Field to get */
963 {
964 if (!http || field <= HTTP_FIELD_UNKNOWN || field >= HTTP_FIELD_MAX)
965 return (NULL);
966
967 switch (field)
968 {
969 case HTTP_FIELD_ACCEPT_ENCODING :
970 return (http->accept_encoding);
971
972 case HTTP_FIELD_ALLOW :
973 return (http->allow);
974
975 case HTTP_FIELD_SERVER :
976 return (http->server);
977
978 case HTTP_FIELD_AUTHORIZATION :
979 if (http->field_authorization)
980 {
981 /*
982 * Special case for WWW-Authenticate: as its contents can be
983 * longer than HTTP_MAX_VALUE...
984 */
985
986 return (http->field_authorization);
987 }
988
989 default :
990 return (http->fields[field]);
991 }
992 }
993
994
995 /*
996 * 'httpGetKeepAlive()' - Get the current Keep-Alive state of the connection.
997 *
998 * @since CUPS 2.0@
999 */
1000
1001 http_keepalive_t /* O - Keep-Alive state */
1002 httpGetKeepAlive(http_t *http) /* I - HTTP connection */
1003 {
1004 return (http ? http->keep_alive : HTTP_KEEPALIVE_OFF);
1005 }
1006
1007
1008 /*
1009 * 'httpGetLength()' - Get the amount of data remaining from the
1010 * content-length or transfer-encoding fields.
1011 *
1012 * This function is deprecated and will not return lengths larger than
1013 * 2^31 - 1; use httpGetLength2() instead.
1014 *
1015 * @deprecated@
1016 */
1017
1018 int /* O - Content length */
1019 httpGetLength(http_t *http) /* I - HTTP connection */
1020 {
1021 /*
1022 * Get the read content length and return the 32-bit value.
1023 */
1024
1025 if (http)
1026 {
1027 httpGetLength2(http);
1028
1029 return (http->_data_remaining);
1030 }
1031 else
1032 return (-1);
1033 }
1034
1035
1036 /*
1037 * 'httpGetLength2()' - Get the amount of data remaining from the
1038 * content-length or transfer-encoding fields.
1039 *
1040 * This function returns the complete content length, even for
1041 * content larger than 2^31 - 1.
1042 *
1043 * @since CUPS 1.2/OS X 10.5@
1044 */
1045
1046 off_t /* O - Content length */
1047 httpGetLength2(http_t *http) /* I - HTTP connection */
1048 {
1049 off_t remaining; /* Remaining length */
1050
1051
1052 DEBUG_printf(("2httpGetLength2(http=%p), state=%s", http,
1053 httpStateString(http->state)));
1054
1055 if (!http)
1056 return (-1);
1057
1058 if (!_cups_strcasecmp(http->fields[HTTP_FIELD_TRANSFER_ENCODING], "chunked"))
1059 {
1060 DEBUG_puts("4httpGetLength2: chunked request!");
1061 remaining = 0;
1062 }
1063 else
1064 {
1065 /*
1066 * The following is a hack for HTTP servers that don't send a
1067 * Content-Length or Transfer-Encoding field...
1068 *
1069 * If there is no Content-Length then the connection must close
1070 * after the transfer is complete...
1071 */
1072
1073 if (!http->fields[HTTP_FIELD_CONTENT_LENGTH][0])
1074 {
1075 /*
1076 * Default content length is 0 for errors and certain types of operations,
1077 * and 2^31-1 for other successful requests...
1078 */
1079
1080 if (http->status >= HTTP_STATUS_MULTIPLE_CHOICES ||
1081 http->state == HTTP_STATE_OPTIONS ||
1082 (http->state == HTTP_STATE_GET && http->mode == _HTTP_MODE_SERVER) ||
1083 http->state == HTTP_STATE_HEAD ||
1084 (http->state == HTTP_STATE_PUT && http->mode == _HTTP_MODE_CLIENT) ||
1085 http->state == HTTP_STATE_DELETE ||
1086 http->state == HTTP_STATE_TRACE ||
1087 http->state == HTTP_STATE_CONNECT)
1088 remaining = 0;
1089 else
1090 remaining = 2147483647;
1091 }
1092 else if ((remaining = strtoll(http->fields[HTTP_FIELD_CONTENT_LENGTH],
1093 NULL, 10)) < 0)
1094 remaining = -1;
1095
1096 DEBUG_printf(("4httpGetLength2: content_length=" CUPS_LLFMT,
1097 CUPS_LLCAST remaining));
1098 }
1099
1100 return (remaining);
1101 }
1102
1103
1104 /*
1105 * 'httpGetPending()' - Get the number of bytes that are buffered for writing.
1106 *
1107 * @since CUPS 2.0@
1108 */
1109
1110 size_t /* O - Number of bytes buffered */
1111 httpGetPending(http_t *http) /* I - HTTP connection */
1112 {
1113 return (http ? (size_t)http->wused : 0);
1114 }
1115
1116
1117 /*
1118 * 'httpGetReady()' - Get the number of bytes that can be read without blocking.
1119 *
1120 * @since CUPS 2.0@
1121 */
1122
1123 size_t /* O - Number of bytes available */
1124 httpGetReady(http_t *http) /* I - HTTP connection */
1125 {
1126 if (!http)
1127 return (0);
1128 else if (http->used > 0)
1129 return ((size_t)http->used);
1130 #ifdef HAVE_SSL
1131 else if (http->tls)
1132 return (_httpTLSPending(http));
1133 #endif /* HAVE_SSL */
1134
1135 return (0);
1136 }
1137
1138
1139 /*
1140 * 'httpGetRemaining()' - Get the number of remaining bytes in the message
1141 * body or current chunk.
1142 *
1143 * The @link httpIsChunked@ function can be used to determine whether the
1144 * message body is chunked or fixed-length.
1145 *
1146 * @since CUPS 2.0@
1147 */
1148
1149 size_t /* O - Remaining bytes */
1150 httpGetRemaining(http_t *http) /* I - HTTP connection */
1151 {
1152 return (http ? (size_t)http->data_remaining : 0);
1153 }
1154
1155
1156 /*
1157 * 'httpGets()' - Get a line of text from a HTTP connection.
1158 */
1159
1160 char * /* O - Line or NULL */
1161 httpGets(char *line, /* I - Line to read into */
1162 int length, /* I - Max length of buffer */
1163 http_t *http) /* I - HTTP connection */
1164 {
1165 char *lineptr, /* Pointer into line */
1166 *lineend, /* End of line */
1167 *bufptr, /* Pointer into input buffer */
1168 *bufend; /* Pointer to end of buffer */
1169 ssize_t bytes; /* Number of bytes read */
1170 int eol; /* End-of-line? */
1171
1172
1173 DEBUG_printf(("2httpGets(line=%p, length=%d, http=%p)", line, length, http));
1174
1175 if (!http || !line || length <= 1)
1176 return (NULL);
1177
1178 /*
1179 * Read a line from the buffer...
1180 */
1181
1182 http->error = 0;
1183 lineptr = line;
1184 lineend = line + length - 1;
1185 eol = 0;
1186
1187 while (lineptr < lineend)
1188 {
1189 /*
1190 * Pre-load the buffer as needed...
1191 */
1192
1193 #ifdef WIN32
1194 WSASetLastError(0);
1195 #else
1196 errno = 0;
1197 #endif /* WIN32 */
1198
1199 while (http->used == 0)
1200 {
1201 /*
1202 * No newline; see if there is more data to be read...
1203 */
1204
1205 while (!_httpWait(http, http->wait_value, 1))
1206 {
1207 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
1208 continue;
1209
1210 DEBUG_puts("3httpGets: Timed out!");
1211 #ifdef WIN32
1212 http->error = WSAETIMEDOUT;
1213 #else
1214 http->error = ETIMEDOUT;
1215 #endif /* WIN32 */
1216 return (NULL);
1217 }
1218
1219 bytes = http_read(http, http->buffer + http->used, (size_t)(HTTP_MAX_BUFFER - http->used));
1220
1221 DEBUG_printf(("4httpGets: read " CUPS_LLFMT " bytes.", CUPS_LLCAST bytes));
1222
1223 if (bytes < 0)
1224 {
1225 /*
1226 * Nope, can't get a line this time...
1227 */
1228
1229 #ifdef WIN32
1230 DEBUG_printf(("3httpGets: recv() error %d!", WSAGetLastError()));
1231
1232 if (WSAGetLastError() == WSAEINTR)
1233 continue;
1234 else if (WSAGetLastError() == WSAEWOULDBLOCK)
1235 {
1236 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
1237 continue;
1238
1239 http->error = WSAGetLastError();
1240 }
1241 else if (WSAGetLastError() != http->error)
1242 {
1243 http->error = WSAGetLastError();
1244 continue;
1245 }
1246
1247 #else
1248 DEBUG_printf(("3httpGets: recv() error %d!", errno));
1249
1250 if (errno == EINTR)
1251 continue;
1252 else if (errno == EWOULDBLOCK || errno == EAGAIN)
1253 {
1254 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
1255 continue;
1256 else if (!http->timeout_cb && errno == EAGAIN)
1257 continue;
1258
1259 http->error = errno;
1260 }
1261 else if (errno != http->error)
1262 {
1263 http->error = errno;
1264 continue;
1265 }
1266 #endif /* WIN32 */
1267
1268 return (NULL);
1269 }
1270 else if (bytes == 0)
1271 {
1272 http->error = EPIPE;
1273
1274 return (NULL);
1275 }
1276
1277 /*
1278 * Yup, update the amount used...
1279 */
1280
1281 http->used += (int)bytes;
1282 }
1283
1284 /*
1285 * Now copy as much of the current line as possible...
1286 */
1287
1288 for (bufptr = http->buffer, bufend = http->buffer + http->used;
1289 lineptr < lineend && bufptr < bufend;)
1290 {
1291 if (*bufptr == 0x0a)
1292 {
1293 eol = 1;
1294 bufptr ++;
1295 break;
1296 }
1297 else if (*bufptr == 0x0d)
1298 bufptr ++;
1299 else
1300 *lineptr++ = *bufptr++;
1301 }
1302
1303 http->used -= (int)(bufptr - http->buffer);
1304 if (http->used > 0)
1305 memmove(http->buffer, bufptr, (size_t)http->used);
1306
1307 if (eol)
1308 {
1309 /*
1310 * End of line...
1311 */
1312
1313 http->activity = time(NULL);
1314
1315 *lineptr = '\0';
1316
1317 DEBUG_printf(("3httpGets: Returning \"%s\"", line));
1318
1319 return (line);
1320 }
1321 }
1322
1323 DEBUG_puts("3httpGets: No new line available!");
1324
1325 return (NULL);
1326 }
1327
1328
1329 /*
1330 * 'httpGetState()' - Get the current state of the HTTP request.
1331 */
1332
1333 http_state_t /* O - HTTP state */
1334 httpGetState(http_t *http) /* I - HTTP connection */
1335 {
1336 return (http ? http->state : HTTP_STATE_ERROR);
1337 }
1338
1339
1340 /*
1341 * 'httpGetStatus()' - Get the status of the last HTTP request.
1342 *
1343 * @since CUPS 1.2/OS X 10.5@
1344 */
1345
1346 http_status_t /* O - HTTP status */
1347 httpGetStatus(http_t *http) /* I - HTTP connection */
1348 {
1349 return (http ? http->status : HTTP_STATUS_ERROR);
1350 }
1351
1352
1353 /*
1354 * 'httpGetSubField()' - Get a sub-field value.
1355 *
1356 * @deprecated@
1357 */
1358
1359 char * /* O - Value or NULL */
1360 httpGetSubField(http_t *http, /* I - HTTP connection */
1361 http_field_t field, /* I - Field index */
1362 const char *name, /* I - Name of sub-field */
1363 char *value) /* O - Value string */
1364 {
1365 return (httpGetSubField2(http, field, name, value, HTTP_MAX_VALUE));
1366 }
1367
1368
1369 /*
1370 * 'httpGetSubField2()' - Get a sub-field value.
1371 *
1372 * @since CUPS 1.2/OS X 10.5@
1373 */
1374
1375 char * /* O - Value or NULL */
1376 httpGetSubField2(http_t *http, /* I - HTTP connection */
1377 http_field_t field, /* I - Field index */
1378 const char *name, /* I - Name of sub-field */
1379 char *value, /* O - Value string */
1380 int valuelen) /* I - Size of value buffer */
1381 {
1382 const char *fptr; /* Pointer into field */
1383 char temp[HTTP_MAX_VALUE], /* Temporary buffer for name */
1384 *ptr, /* Pointer into string buffer */
1385 *end; /* End of value buffer */
1386
1387 DEBUG_printf(("2httpGetSubField2(http=%p, field=%d, name=\"%s\", value=%p, "
1388 "valuelen=%d)", http, field, name, value, valuelen));
1389
1390 if (!http || !name || !value || valuelen < 2 ||
1391 field <= HTTP_FIELD_UNKNOWN || field >= HTTP_FIELD_MAX)
1392 return (NULL);
1393
1394 end = value + valuelen - 1;
1395
1396 for (fptr = http->fields[field]; *fptr;)
1397 {
1398 /*
1399 * Skip leading whitespace...
1400 */
1401
1402 while (_cups_isspace(*fptr))
1403 fptr ++;
1404
1405 if (*fptr == ',')
1406 {
1407 fptr ++;
1408 continue;
1409 }
1410
1411 /*
1412 * Get the sub-field name...
1413 */
1414
1415 for (ptr = temp;
1416 *fptr && *fptr != '=' && !_cups_isspace(*fptr) &&
1417 ptr < (temp + sizeof(temp) - 1);
1418 *ptr++ = *fptr++);
1419
1420 *ptr = '\0';
1421
1422 DEBUG_printf(("4httpGetSubField2: name=\"%s\"", temp));
1423
1424 /*
1425 * Skip trailing chars up to the '='...
1426 */
1427
1428 while (_cups_isspace(*fptr))
1429 fptr ++;
1430
1431 if (!*fptr)
1432 break;
1433
1434 if (*fptr != '=')
1435 continue;
1436
1437 /*
1438 * Skip = and leading whitespace...
1439 */
1440
1441 fptr ++;
1442
1443 while (_cups_isspace(*fptr))
1444 fptr ++;
1445
1446 if (*fptr == '\"')
1447 {
1448 /*
1449 * Read quoted string...
1450 */
1451
1452 for (ptr = value, fptr ++;
1453 *fptr && *fptr != '\"' && ptr < end;
1454 *ptr++ = *fptr++);
1455
1456 *ptr = '\0';
1457
1458 while (*fptr && *fptr != '\"')
1459 fptr ++;
1460
1461 if (*fptr)
1462 fptr ++;
1463 }
1464 else
1465 {
1466 /*
1467 * Read unquoted string...
1468 */
1469
1470 for (ptr = value;
1471 *fptr && !_cups_isspace(*fptr) && *fptr != ',' && ptr < end;
1472 *ptr++ = *fptr++);
1473
1474 *ptr = '\0';
1475
1476 while (*fptr && !_cups_isspace(*fptr) && *fptr != ',')
1477 fptr ++;
1478 }
1479
1480 DEBUG_printf(("4httpGetSubField2: value=\"%s\"", value));
1481
1482 /*
1483 * See if this is the one...
1484 */
1485
1486 if (!strcmp(name, temp))
1487 {
1488 DEBUG_printf(("3httpGetSubField2: Returning \"%s\"", value));
1489 return (value);
1490 }
1491 }
1492
1493 value[0] = '\0';
1494
1495 DEBUG_puts("3httpGetSubField2: Returning NULL");
1496
1497 return (NULL);
1498 }
1499
1500
1501 /*
1502 * 'httpGetVersion()' - Get the HTTP version at the other end.
1503 */
1504
1505 http_version_t /* O - Version number */
1506 httpGetVersion(http_t *http) /* I - HTTP connection */
1507 {
1508 return (http ? http->version : HTTP_VERSION_1_0);
1509 }
1510
1511
1512 /*
1513 * 'httpHead()' - Send a HEAD request to the server.
1514 */
1515
1516 int /* O - Status of call (0 = success) */
1517 httpHead(http_t *http, /* I - HTTP connection */
1518 const char *uri) /* I - URI for head */
1519 {
1520 DEBUG_printf(("httpHead(http=%p, uri=\"%s\")", http, uri));
1521 return (http_send(http, HTTP_STATE_HEAD, uri));
1522 }
1523
1524
1525 /*
1526 * 'httpInitialize()' - Initialize the HTTP interface library and set the
1527 * default HTTP proxy (if any).
1528 */
1529
1530 void
1531 httpInitialize(void)
1532 {
1533 static int initialized = 0; /* Have we been called before? */
1534 #ifdef WIN32
1535 WSADATA winsockdata; /* WinSock data */
1536 #endif /* WIN32 */
1537
1538
1539 _cupsGlobalLock();
1540 if (initialized)
1541 {
1542 _cupsGlobalUnlock();
1543 return;
1544 }
1545
1546 #ifdef WIN32
1547 WSAStartup(MAKEWORD(2,2), &winsockdata);
1548
1549 #elif !defined(SO_NOSIGPIPE)
1550 /*
1551 * Ignore SIGPIPE signals...
1552 */
1553
1554 # ifdef HAVE_SIGSET
1555 sigset(SIGPIPE, SIG_IGN);
1556
1557 # elif defined(HAVE_SIGACTION)
1558 struct sigaction action; /* POSIX sigaction data */
1559
1560
1561 memset(&action, 0, sizeof(action));
1562 action.sa_handler = SIG_IGN;
1563 sigaction(SIGPIPE, &action, NULL);
1564
1565 # else
1566 signal(SIGPIPE, SIG_IGN);
1567 # endif /* !SO_NOSIGPIPE */
1568 #endif /* WIN32 */
1569
1570 # ifdef HAVE_SSL
1571 _httpTLSInitialize();
1572 # endif /* HAVE_SSL */
1573
1574 initialized = 1;
1575 _cupsGlobalUnlock();
1576 }
1577
1578
1579 /*
1580 * 'httpIsChunked()' - Report whether a message body is chunked.
1581 *
1582 * This function returns non-zero if the message body is composed of
1583 * variable-length chunks.
1584 *
1585 * @since CUPS 2.0@
1586 */
1587
1588 int /* O - 1 if chunked, 0 if not */
1589 httpIsChunked(http_t *http) /* I - HTTP connection */
1590 {
1591 return (http ? http->data_encoding == HTTP_ENCODING_CHUNKED : 0);
1592 }
1593
1594
1595 /*
1596 * 'httpIsEncrypted()' - Report whether a connection is encrypted.
1597 *
1598 * This function returns non-zero if the connection is currently encrypted.
1599 *
1600 * @since CUPS 2.0@
1601 */
1602
1603 int /* O - 1 if encrypted, 0 if not */
1604 httpIsEncrypted(http_t *http) /* I - HTTP connection */
1605 {
1606 return (http ? http->tls != NULL : 0);
1607 }
1608
1609
1610 /*
1611 * 'httpOptions()' - Send an OPTIONS request to the server.
1612 */
1613
1614 int /* O - Status of call (0 = success) */
1615 httpOptions(http_t *http, /* I - HTTP connection */
1616 const char *uri) /* I - URI for options */
1617 {
1618 return (http_send(http, HTTP_STATE_OPTIONS, uri));
1619 }
1620
1621
1622 /*
1623 * 'httpPeek()' - Peek at data from a HTTP connection.
1624 *
1625 * This function copies available data from the given HTTP connection, reading
1626 * a buffer as needed. The data is still available for reading using
1627 * @link httpRead@ or @link httpRead2@.
1628 *
1629 * For non-blocking connections the usual timeouts apply.
1630 *
1631 * @since CUPS 1.7/OS X 10.9@
1632 */
1633
1634 ssize_t /* O - Number of bytes copied */
1635 httpPeek(http_t *http, /* I - HTTP connection */
1636 char *buffer, /* I - Buffer for data */
1637 size_t length) /* I - Maximum number of bytes */
1638 {
1639 ssize_t bytes; /* Bytes read */
1640 char len[32]; /* Length string */
1641
1642
1643 DEBUG_printf(("httpPeek(http=%p, buffer=%p, length=" CUPS_LLFMT ")",
1644 http, buffer, CUPS_LLCAST length));
1645
1646 if (http == NULL || buffer == NULL)
1647 return (-1);
1648
1649 http->activity = time(NULL);
1650 http->error = 0;
1651
1652 if (length <= 0)
1653 return (0);
1654
1655 if (http->data_encoding == HTTP_ENCODING_CHUNKED &&
1656 http->data_remaining <= 0)
1657 {
1658 DEBUG_puts("2httpPeek: Getting chunk length...");
1659
1660 if (httpGets(len, sizeof(len), http) == NULL)
1661 {
1662 DEBUG_puts("1httpPeek: Could not get length!");
1663 return (0);
1664 }
1665
1666 if (!len[0])
1667 {
1668 DEBUG_puts("1httpPeek: Blank chunk length, trying again...");
1669 if (!httpGets(len, sizeof(len), http))
1670 {
1671 DEBUG_puts("1httpPeek: Could not get chunk length.");
1672 return (0);
1673 }
1674 }
1675
1676 http->data_remaining = strtoll(len, NULL, 16);
1677
1678 if (http->data_remaining < 0)
1679 {
1680 DEBUG_puts("1httpPeek: Negative chunk length!");
1681 return (0);
1682 }
1683 }
1684
1685 DEBUG_printf(("2httpPeek: data_remaining=" CUPS_LLFMT,
1686 CUPS_LLCAST http->data_remaining));
1687
1688 if (http->data_remaining <= 0 && http->data_encoding != HTTP_ENCODING_FIELDS)
1689 {
1690 /*
1691 * A zero-length chunk ends a transfer; unless we are reading POST
1692 * data, go idle...
1693 */
1694
1695 #ifdef HAVE_LIBZ
1696 if (http->coding >= _HTTP_CODING_GUNZIP)
1697 http_content_coding_finish(http);
1698 #endif /* HAVE_LIBZ */
1699
1700 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
1701 httpGets(len, sizeof(len), http);
1702
1703 if (http->state == HTTP_STATE_POST_RECV)
1704 http->state ++;
1705 else
1706 http->state = HTTP_STATE_STATUS;
1707
1708 DEBUG_printf(("1httpPeek: 0-length chunk, set state to %s.",
1709 httpStateString(http->state)));
1710
1711 /*
1712 * Prevent future reads for this request...
1713 */
1714
1715 http->data_encoding = HTTP_ENCODING_FIELDS;
1716
1717 return (0);
1718 }
1719 else if (length > (size_t)http->data_remaining)
1720 length = (size_t)http->data_remaining;
1721
1722 #ifdef HAVE_LIBZ
1723 if (http->used == 0 &&
1724 (http->coding == _HTTP_CODING_IDENTITY ||
1725 (http->coding >= _HTTP_CODING_GUNZIP && http->stream.avail_in == 0)))
1726 #else
1727 if (http->used == 0)
1728 #endif /* HAVE_LIBZ */
1729 {
1730 /*
1731 * Buffer small reads for better performance...
1732 */
1733
1734 ssize_t buflen; /* Length of read for buffer */
1735
1736 if (!http->blocking)
1737 {
1738 while (!httpWait(http, http->wait_value))
1739 {
1740 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
1741 continue;
1742
1743 return (0);
1744 }
1745 }
1746
1747 if ((size_t)http->data_remaining > sizeof(http->buffer))
1748 buflen = sizeof(http->buffer);
1749 else
1750 buflen = (ssize_t)http->data_remaining;
1751
1752 DEBUG_printf(("2httpPeek: Reading %d bytes into buffer.", (int)buflen));
1753 bytes = http_read(http, http->buffer, (size_t)buflen);
1754
1755 DEBUG_printf(("2httpPeek: Read " CUPS_LLFMT " bytes into buffer.",
1756 CUPS_LLCAST bytes));
1757 if (bytes > 0)
1758 {
1759 #ifdef DEBUG
1760 http_debug_hex("httpPeek", http->buffer, (int)bytes);
1761 #endif /* DEBUG */
1762
1763 http->used = (int)bytes;
1764 }
1765 }
1766
1767 #ifdef HAVE_LIBZ
1768 if (http->coding >= _HTTP_CODING_GUNZIP)
1769 {
1770 # ifdef HAVE_INFLATECOPY
1771 int zerr; /* Decompressor error */
1772 z_stream stream; /* Copy of decompressor stream */
1773
1774 if (http->used > 0 && http->stream.avail_in < HTTP_MAX_BUFFER)
1775 {
1776 size_t buflen = buflen = HTTP_MAX_BUFFER - http->stream.avail_in;
1777 /* Number of bytes to copy */
1778
1779 if (http->stream.avail_in > 0 &&
1780 http->stream.next_in > http->sbuffer)
1781 memmove(http->sbuffer, http->stream.next_in, http->stream.avail_in);
1782
1783 http->stream.next_in = http->sbuffer;
1784
1785 if (buflen > (size_t)http->data_remaining)
1786 buflen = (size_t)http->data_remaining;
1787
1788 if (buflen > (size_t)http->used)
1789 buflen = (size_t)http->used;
1790
1791 DEBUG_printf(("1httpPeek: Copying %d more bytes of data into "
1792 "decompression buffer.", (int)buflen));
1793
1794 memcpy(http->sbuffer + http->stream.avail_in, http->buffer, buflen);
1795 http->stream.avail_in += buflen;
1796 http->used -= buflen;
1797 http->data_remaining -= buflen;
1798
1799 if (http->used > 0)
1800 memmove(http->buffer, http->buffer + buflen, (size_t)http->used);
1801 }
1802
1803 DEBUG_printf(("2httpPeek: length=%d, avail_in=%d", (int)length,
1804 (int)http->stream.avail_in));
1805
1806 if (inflateCopy(&stream, &(http->stream)) != Z_OK)
1807 {
1808 DEBUG_puts("2httpPeek: Unable to copy decompressor stream.");
1809 http->error = ENOMEM;
1810 return (-1);
1811 }
1812
1813 stream.next_out = (Bytef *)buffer;
1814 stream.avail_out = (uInt)length;
1815
1816 zerr = inflate(&stream, Z_SYNC_FLUSH);
1817 inflateEnd(&stream);
1818
1819 if (zerr < Z_OK)
1820 {
1821 DEBUG_printf(("2httpPeek: zerr=%d", zerr));
1822 #ifdef DEBUG
1823 http_debug_hex("2httpPeek", (char *)http->sbuffer, (int)http->stream.avail_in);
1824 #endif /* DEBUG */
1825
1826 http->error = EIO;
1827 return (-1);
1828 }
1829
1830 bytes = (ssize_t)(length - http->stream.avail_out);
1831
1832 # else
1833 DEBUG_puts("2httpPeek: No inflateCopy on this platform, httpPeek does not "
1834 "work with compressed streams.");
1835 return (-1);
1836 # endif /* HAVE_INFLATECOPY */
1837 }
1838 else
1839 #endif /* HAVE_LIBZ */
1840 if (http->used > 0)
1841 {
1842 if (length > (size_t)http->used)
1843 length = (size_t)http->used;
1844
1845 bytes = (ssize_t)length;
1846
1847 DEBUG_printf(("2httpPeek: grabbing %d bytes from input buffer...",
1848 (int)bytes));
1849
1850 memcpy(buffer, http->buffer, length);
1851 }
1852 else
1853 bytes = 0;
1854
1855 if (bytes < 0)
1856 {
1857 #ifdef WIN32
1858 if (WSAGetLastError() == WSAEINTR || WSAGetLastError() == WSAEWOULDBLOCK)
1859 bytes = 0;
1860 else
1861 http->error = WSAGetLastError();
1862 #else
1863 if (errno == EINTR || errno == EAGAIN)
1864 bytes = 0;
1865 else
1866 http->error = errno;
1867 #endif /* WIN32 */
1868 }
1869 else if (bytes == 0)
1870 {
1871 http->error = EPIPE;
1872 return (0);
1873 }
1874
1875 return (bytes);
1876 }
1877
1878
1879 /*
1880 * 'httpPost()' - Send a POST request to the server.
1881 */
1882
1883 int /* O - Status of call (0 = success) */
1884 httpPost(http_t *http, /* I - HTTP connection */
1885 const char *uri) /* I - URI for post */
1886 {
1887 return (http_send(http, HTTP_STATE_POST, uri));
1888 }
1889
1890
1891 /*
1892 * 'httpPrintf()' - Print a formatted string to a HTTP connection.
1893 *
1894 * @private@
1895 */
1896
1897 int /* O - Number of bytes written */
1898 httpPrintf(http_t *http, /* I - HTTP connection */
1899 const char *format, /* I - printf-style format string */
1900 ...) /* I - Additional args as needed */
1901 {
1902 ssize_t bytes; /* Number of bytes to write */
1903 char buf[16384]; /* Buffer for formatted string */
1904 va_list ap; /* Variable argument pointer */
1905
1906
1907 DEBUG_printf(("2httpPrintf(http=%p, format=\"%s\", ...)", http, format));
1908
1909 va_start(ap, format);
1910 bytes = vsnprintf(buf, sizeof(buf), format, ap);
1911 va_end(ap);
1912
1913 DEBUG_printf(("3httpPrintf: (" CUPS_LLFMT " bytes) %s", CUPS_LLCAST bytes, buf));
1914
1915 if (http->data_encoding == HTTP_ENCODING_FIELDS)
1916 return ((int)httpWrite2(http, buf, (size_t)bytes));
1917 else
1918 {
1919 if (http->wused)
1920 {
1921 DEBUG_puts("4httpPrintf: flushing existing data...");
1922
1923 if (httpFlushWrite(http) < 0)
1924 return (-1);
1925 }
1926
1927 return ((int)http_write(http, buf, (size_t)bytes));
1928 }
1929 }
1930
1931
1932 /*
1933 * 'httpPut()' - Send a PUT request to the server.
1934 */
1935
1936 int /* O - Status of call (0 = success) */
1937 httpPut(http_t *http, /* I - HTTP connection */
1938 const char *uri) /* I - URI to put */
1939 {
1940 DEBUG_printf(("httpPut(http=%p, uri=\"%s\")", http, uri));
1941 return (http_send(http, HTTP_STATE_PUT, uri));
1942 }
1943
1944
1945 /*
1946 * 'httpRead()' - Read data from a HTTP connection.
1947 *
1948 * This function is deprecated. Use the httpRead2() function which can
1949 * read more than 2GB of data.
1950 *
1951 * @deprecated@
1952 */
1953
1954 int /* O - Number of bytes read */
1955 httpRead(http_t *http, /* I - HTTP connection */
1956 char *buffer, /* I - Buffer for data */
1957 int length) /* I - Maximum number of bytes */
1958 {
1959 return ((int)httpRead2(http, buffer, (size_t)length));
1960 }
1961
1962
1963 /*
1964 * 'httpRead2()' - Read data from a HTTP connection.
1965 *
1966 * @since CUPS 1.2/OS X 10.5@
1967 */
1968
1969 ssize_t /* O - Number of bytes read */
1970 httpRead2(http_t *http, /* I - HTTP connection */
1971 char *buffer, /* I - Buffer for data */
1972 size_t length) /* I - Maximum number of bytes */
1973 {
1974 ssize_t bytes; /* Bytes read */
1975
1976
1977 #ifdef HAVE_LIBZ
1978 DEBUG_printf(("httpRead2(http=%p, buffer=%p, length=" CUPS_LLFMT
1979 ") coding=%d data_encoding=%d data_remaining=" CUPS_LLFMT,
1980 http, buffer, CUPS_LLCAST length,
1981 http->coding,
1982 http->data_encoding, CUPS_LLCAST http->data_remaining));
1983 #else
1984 DEBUG_printf(("httpRead2(http=%p, buffer=%p, length=" CUPS_LLFMT
1985 ") data_encoding=%d data_remaining=" CUPS_LLFMT,
1986 http, buffer, CUPS_LLCAST length,
1987 http->data_encoding, CUPS_LLCAST http->data_remaining));
1988 #endif /* HAVE_LIBZ */
1989
1990 if (http == NULL || buffer == NULL)
1991 return (-1);
1992
1993 http->activity = time(NULL);
1994 http->error = 0;
1995
1996 if (length <= 0)
1997 return (0);
1998
1999 #ifdef HAVE_LIBZ
2000 if (http->coding >= _HTTP_CODING_GUNZIP)
2001 {
2002 do
2003 {
2004 if (http->stream.avail_in > 0)
2005 {
2006 int zerr; /* Decompressor error */
2007
2008 DEBUG_printf(("2httpRead2: avail_in=%d, avail_out=%d",
2009 (int)http->stream.avail_in, (int)length));
2010
2011 http->stream.next_out = (Bytef *)buffer;
2012 http->stream.avail_out = (uInt)length;
2013
2014 if ((zerr = inflate(&(http->stream), Z_SYNC_FLUSH)) < Z_OK)
2015 {
2016 DEBUG_printf(("2httpRead2: zerr=%d", zerr));
2017 #ifdef DEBUG
2018 http_debug_hex("2httpRead2", (char *)http->sbuffer, (int)http->stream.avail_in);
2019 #endif /* DEBUG */
2020
2021 http->error = EIO;
2022 return (-1);
2023 }
2024
2025 bytes = (ssize_t)(length - http->stream.avail_out);
2026
2027 DEBUG_printf(("2httpRead2: avail_in=%d, avail_out=%d, bytes=%d",
2028 http->stream.avail_in, http->stream.avail_out,
2029 (int)bytes));
2030 }
2031 else
2032 bytes = 0;
2033
2034 if (bytes == 0)
2035 {
2036 ssize_t buflen = HTTP_MAX_BUFFER - (ssize_t)http->stream.avail_in;
2037 /* Additional bytes for buffer */
2038
2039 if (buflen > 0)
2040 {
2041 if (http->stream.avail_in > 0 &&
2042 http->stream.next_in > http->sbuffer)
2043 memmove(http->sbuffer, http->stream.next_in, http->stream.avail_in);
2044
2045 http->stream.next_in = http->sbuffer;
2046
2047 DEBUG_printf(("1httpRead2: Reading up to %d more bytes of data into "
2048 "decompression buffer.", (int)buflen));
2049
2050 if (http->data_remaining > 0)
2051 {
2052 if (buflen > http->data_remaining)
2053 buflen = (ssize_t)http->data_remaining;
2054
2055 bytes = http_read_buffered(http, (char *)http->sbuffer + http->stream.avail_in, (size_t)buflen);
2056 }
2057 else if (http->data_encoding == HTTP_ENCODING_CHUNKED)
2058 bytes = http_read_chunk(http, (char *)http->sbuffer + http->stream.avail_in, (size_t)buflen);
2059 else
2060 bytes = 0;
2061
2062 if (bytes < 0)
2063 return (bytes);
2064 else if (bytes == 0)
2065 break;
2066
2067 DEBUG_printf(("1httpRead2: Adding " CUPS_LLFMT " bytes to "
2068 "decompression buffer.", CUPS_LLCAST bytes));
2069
2070 http->data_remaining -= bytes;
2071 http->stream.avail_in += (uInt)bytes;
2072
2073 if (http->data_remaining <= 0 &&
2074 http->data_encoding == HTTP_ENCODING_CHUNKED)
2075 {
2076 /*
2077 * Read the trailing blank line now...
2078 */
2079
2080 char len[32]; /* Length string */
2081
2082 httpGets(len, sizeof(len), http);
2083 }
2084
2085 bytes = 0;
2086 }
2087 else
2088 return (0);
2089 }
2090 }
2091 while (bytes == 0);
2092 }
2093 else
2094 #endif /* HAVE_LIBZ */
2095 if (http->data_remaining == 0 && http->data_encoding == HTTP_ENCODING_CHUNKED)
2096 {
2097 if ((bytes = http_read_chunk(http, buffer, length)) > 0)
2098 {
2099 http->data_remaining -= bytes;
2100
2101 if (http->data_remaining <= 0)
2102 {
2103 /*
2104 * Read the trailing blank line now...
2105 */
2106
2107 char len[32]; /* Length string */
2108
2109 httpGets(len, sizeof(len), http);
2110 }
2111 }
2112 }
2113 else if (http->data_remaining <= 0)
2114 {
2115 /*
2116 * No more data to read...
2117 */
2118
2119 return (0);
2120 }
2121 else
2122 {
2123 DEBUG_printf(("1httpRead2: Reading up to %d bytes into buffer.",
2124 (int)length));
2125
2126 if (length > (size_t)http->data_remaining)
2127 length = (size_t)http->data_remaining;
2128
2129 if ((bytes = http_read_buffered(http, buffer, length)) > 0)
2130 {
2131 http->data_remaining -= bytes;
2132
2133 if (http->data_remaining <= 0 &&
2134 http->data_encoding == HTTP_ENCODING_CHUNKED)
2135 {
2136 /*
2137 * Read the trailing blank line now...
2138 */
2139
2140 char len[32]; /* Length string */
2141
2142 httpGets(len, sizeof(len), http);
2143 }
2144 }
2145 }
2146
2147 if (
2148 #ifdef HAVE_LIBZ
2149 (http->coding == _HTTP_CODING_IDENTITY ||
2150 (http->coding >= _HTTP_CODING_GUNZIP && http->stream.avail_in == 0)) &&
2151 #endif /* HAVE_LIBZ */
2152 ((http->data_remaining <= 0 &&
2153 http->data_encoding == HTTP_ENCODING_LENGTH) ||
2154 (http->data_encoding == HTTP_ENCODING_CHUNKED && bytes == 0)))
2155 {
2156 #ifdef HAVE_LIBZ
2157 if (http->coding >= _HTTP_CODING_GUNZIP)
2158 http_content_coding_finish(http);
2159 #endif /* HAVE_LIBZ */
2160
2161 if (http->state == HTTP_STATE_POST_RECV)
2162 http->state ++;
2163 else if (http->state == HTTP_STATE_GET_SEND ||
2164 http->state == HTTP_STATE_POST_SEND)
2165 http->state = HTTP_STATE_WAITING;
2166 else
2167 http->state = HTTP_STATE_STATUS;
2168
2169 DEBUG_printf(("1httpRead2: End of content, set state to %s.",
2170 httpStateString(http->state)));
2171 }
2172
2173 return (bytes);
2174 }
2175
2176
2177 /*
2178 * 'httpReadRequest()' - Read a HTTP request from a connection.
2179 *
2180 * @since CUPS 1.7/OS X 10.9@
2181 */
2182
2183 http_state_t /* O - New state of connection */
2184 httpReadRequest(http_t *http, /* I - HTTP connection */
2185 char *uri, /* I - URI buffer */
2186 size_t urilen) /* I - Size of URI buffer */
2187 {
2188 char line[4096], /* HTTP request line */
2189 *req_method, /* HTTP request method */
2190 *req_uri, /* HTTP request URI */
2191 *req_version; /* HTTP request version number string */
2192
2193
2194 /*
2195 * Range check input...
2196 */
2197
2198 DEBUG_printf(("httpReadRequest(http=%p, uri=%p, urilen=" CUPS_LLFMT ")",
2199 http, uri, CUPS_LLCAST urilen));
2200
2201 if (uri)
2202 *uri = '\0';
2203
2204 if (!http || !uri || urilen < 1)
2205 {
2206 DEBUG_puts("1httpReadRequest: Bad arguments, returning HTTP_STATE_ERROR.");
2207 return (HTTP_STATE_ERROR);
2208 }
2209 else if (http->state != HTTP_STATE_WAITING)
2210 {
2211 DEBUG_printf(("1httpReadRequest: Bad state %s, returning HTTP_STATE_ERROR.",
2212 httpStateString(http->state)));
2213 return (HTTP_STATE_ERROR);
2214 }
2215
2216 /*
2217 * Reset state...
2218 */
2219
2220 httpClearFields(http);
2221
2222 http->activity = time(NULL);
2223 http->data_encoding = HTTP_ENCODING_FIELDS;
2224 http->data_remaining = 0;
2225 http->keep_alive = HTTP_KEEPALIVE_OFF;
2226 http->status = HTTP_STATUS_OK;
2227 http->version = HTTP_VERSION_1_1;
2228
2229 /*
2230 * Read a line from the socket...
2231 */
2232
2233 if (!httpGets(line, sizeof(line), http))
2234 {
2235 DEBUG_puts("1httpReadRequest: Unable to read, returning HTTP_STATE_ERROR");
2236 return (HTTP_STATE_ERROR);
2237 }
2238
2239 if (!line[0])
2240 {
2241 DEBUG_puts("1httpReadRequest: Blank line, returning HTTP_STATE_WAITING");
2242 return (HTTP_STATE_WAITING);
2243 }
2244
2245 DEBUG_printf(("1httpReadRequest: %s", line));
2246
2247 /*
2248 * Parse it...
2249 */
2250
2251 req_method = line;
2252 req_uri = line;
2253
2254 while (*req_uri && !isspace(*req_uri & 255))
2255 req_uri ++;
2256
2257 if (!*req_uri)
2258 {
2259 DEBUG_puts("1httpReadRequest: No request URI.");
2260 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("No request URI."), 1);
2261 return (HTTP_STATE_ERROR);
2262 }
2263
2264 *req_uri++ = '\0';
2265
2266 while (*req_uri && isspace(*req_uri & 255))
2267 req_uri ++;
2268
2269 req_version = req_uri;
2270
2271 while (*req_version && !isspace(*req_version & 255))
2272 req_version ++;
2273
2274 if (!*req_version)
2275 {
2276 DEBUG_puts("1httpReadRequest: No request protocol version.");
2277 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("No request protocol version."), 1);
2278 return (HTTP_STATE_ERROR);
2279 }
2280
2281 *req_version++ = '\0';
2282
2283 while (*req_version && isspace(*req_version & 255))
2284 req_version ++;
2285
2286 /*
2287 * Validate...
2288 */
2289
2290 if (!strcmp(req_method, "OPTIONS"))
2291 http->state = HTTP_STATE_OPTIONS;
2292 else if (!strcmp(req_method, "GET"))
2293 http->state = HTTP_STATE_GET;
2294 else if (!strcmp(req_method, "HEAD"))
2295 http->state = HTTP_STATE_HEAD;
2296 else if (!strcmp(req_method, "POST"))
2297 http->state = HTTP_STATE_POST;
2298 else if (!strcmp(req_method, "PUT"))
2299 http->state = HTTP_STATE_PUT;
2300 else if (!strcmp(req_method, "DELETE"))
2301 http->state = HTTP_STATE_DELETE;
2302 else if (!strcmp(req_method, "TRACE"))
2303 http->state = HTTP_STATE_TRACE;
2304 else if (!strcmp(req_method, "CONNECT"))
2305 http->state = HTTP_STATE_CONNECT;
2306 else
2307 {
2308 DEBUG_printf(("1httpReadRequest: Unknown method \"%s\".", req_method));
2309 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Unknown request method."), 1);
2310 return (HTTP_STATE_UNKNOWN_METHOD);
2311 }
2312
2313 DEBUG_printf(("1httpReadRequest: Set state to %s.",
2314 httpStateString(http->state)));
2315
2316 if (!strcmp(req_version, "HTTP/1.0"))
2317 {
2318 http->version = HTTP_VERSION_1_0;
2319 http->keep_alive = HTTP_KEEPALIVE_OFF;
2320 }
2321 else if (!strcmp(req_version, "HTTP/1.1"))
2322 {
2323 http->version = HTTP_VERSION_1_1;
2324 http->keep_alive = HTTP_KEEPALIVE_ON;
2325 }
2326 else
2327 {
2328 DEBUG_printf(("1httpReadRequest: Unknown version \"%s\".", req_version));
2329 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Unknown request version."), 1);
2330 return (HTTP_STATE_UNKNOWN_VERSION);
2331 }
2332
2333 DEBUG_printf(("1httpReadRequest: URI is \"%s\".", req_uri));
2334 strlcpy(uri, req_uri, urilen);
2335
2336 return (http->state);
2337 }
2338
2339
2340 /*
2341 * 'httpReconnect()' - Reconnect to a HTTP server.
2342 *
2343 * This function is deprecated. Please use the @link httpReconnect2@ function
2344 * instead.
2345 *
2346 * @deprecated@
2347 */
2348
2349 int /* O - 0 on success, non-zero on failure */
2350 httpReconnect(http_t *http) /* I - HTTP connection */
2351 {
2352 DEBUG_printf(("httpReconnect(http=%p)", http));
2353
2354 return (httpReconnect2(http, 30000, NULL));
2355 }
2356
2357
2358 /*
2359 * 'httpReconnect2()' - Reconnect to a HTTP server with timeout and optional
2360 * cancel.
2361 */
2362
2363 int /* O - 0 on success, non-zero on failure */
2364 httpReconnect2(http_t *http, /* I - HTTP connection */
2365 int msec, /* I - Timeout in milliseconds */
2366 int *cancel) /* I - Pointer to "cancel" variable */
2367 {
2368 http_addrlist_t *addr; /* Connected address */
2369 #ifdef DEBUG
2370 http_addrlist_t *current; /* Current address */
2371 char temp[256]; /* Temporary address string */
2372 #endif /* DEBUG */
2373
2374
2375 DEBUG_printf(("httpReconnect2(http=%p, msec=%d, cancel=%p)", http, msec,
2376 cancel));
2377
2378 if (!http)
2379 {
2380 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, strerror(EINVAL), 0);
2381 return (-1);
2382 }
2383
2384 #ifdef HAVE_SSL
2385 if (http->tls)
2386 {
2387 DEBUG_puts("2httpReconnect2: Shutting down SSL/TLS...");
2388 _httpTLSStop(http);
2389 }
2390 #endif /* HAVE_SSL */
2391
2392 /*
2393 * Close any previously open socket...
2394 */
2395
2396 if (http->fd >= 0)
2397 {
2398 DEBUG_printf(("2httpReconnect2: Closing socket %d...", http->fd));
2399
2400 httpAddrClose(NULL, http->fd);
2401
2402 http->fd = -1;
2403 }
2404
2405 /*
2406 * Reset all state (except fields, which may be reused)...
2407 */
2408
2409 http->state = HTTP_STATE_WAITING;
2410 http->version = HTTP_VERSION_1_1;
2411 http->keep_alive = HTTP_KEEPALIVE_OFF;
2412 memset(&http->_hostaddr, 0, sizeof(http->_hostaddr));
2413 http->data_encoding = HTTP_ENCODING_FIELDS;
2414 http->_data_remaining = 0;
2415 http->used = 0;
2416 http->data_remaining = 0;
2417 http->hostaddr = NULL;
2418 http->wused = 0;
2419
2420 /*
2421 * Connect to the server...
2422 */
2423
2424 #ifdef DEBUG
2425 for (current = http->addrlist; current; current = current->next)
2426 DEBUG_printf(("2httpReconnect2: Address %s:%d",
2427 httpAddrString(&(current->addr), temp, sizeof(temp)),
2428 httpAddrPort(&(current->addr))));
2429 #endif /* DEBUG */
2430
2431 if ((addr = httpAddrConnect2(http->addrlist, &(http->fd), msec,
2432 cancel)) == NULL)
2433 {
2434 /*
2435 * Unable to connect...
2436 */
2437
2438 #ifdef WIN32
2439 http->error = WSAGetLastError();
2440 #else
2441 http->error = errno;
2442 #endif /* WIN32 */
2443 http->status = HTTP_STATUS_ERROR;
2444
2445 DEBUG_printf(("1httpReconnect2: httpAddrConnect failed: %s",
2446 strerror(http->error)));
2447
2448 return (-1);
2449 }
2450
2451 DEBUG_printf(("2httpReconnect2: New socket=%d", http->fd));
2452
2453 if (http->timeout_value > 0)
2454 http_set_timeout(http->fd, http->timeout_value);
2455
2456 http->hostaddr = &(addr->addr);
2457 http->error = 0;
2458
2459 #ifdef HAVE_SSL
2460 if (http->encryption == HTTP_ENCRYPTION_ALWAYS)
2461 {
2462 /*
2463 * Always do encryption via SSL.
2464 */
2465
2466 if (_httpTLSStart(http) != 0)
2467 {
2468 httpAddrClose(NULL, http->fd);
2469
2470 return (-1);
2471 }
2472 }
2473 else if (http->encryption == HTTP_ENCRYPTION_REQUIRED && !http->tls_upgrade)
2474 return (http_tls_upgrade(http));
2475 #endif /* HAVE_SSL */
2476
2477 DEBUG_printf(("1httpReconnect2: Connected to %s:%d...",
2478 httpAddrString(http->hostaddr, temp, sizeof(temp)),
2479 httpAddrPort(http->hostaddr)));
2480
2481 return (0);
2482 }
2483
2484
2485 /*
2486 * 'httpSetAuthString()' - Set the current authorization string.
2487 *
2488 * This function just stores a copy of the current authorization string in
2489 * the HTTP connection object. You must still call httpSetField() to set
2490 * HTTP_FIELD_AUTHORIZATION prior to issuing a HTTP request using httpGet(),
2491 * httpHead(), httpOptions(), httpPost, or httpPut().
2492 *
2493 * @since CUPS 1.3/OS X 10.5@
2494 */
2495
2496 void
2497 httpSetAuthString(http_t *http, /* I - HTTP connection */
2498 const char *scheme, /* I - Auth scheme (NULL to clear it) */
2499 const char *data) /* I - Auth data (NULL for none) */
2500 {
2501 /*
2502 * Range check input...
2503 */
2504
2505 if (!http)
2506 return;
2507
2508 if (http->authstring && http->authstring != http->_authstring)
2509 free(http->authstring);
2510
2511 http->authstring = http->_authstring;
2512
2513 if (scheme)
2514 {
2515 /*
2516 * Set the current authorization string...
2517 */
2518
2519 size_t len = strlen(scheme) + (data ? strlen(data) + 1 : 0) + 1;
2520 char *temp;
2521
2522 if (len > sizeof(http->_authstring))
2523 {
2524 if ((temp = malloc(len)) == NULL)
2525 len = sizeof(http->_authstring);
2526 else
2527 http->authstring = temp;
2528 }
2529
2530 if (data)
2531 snprintf(http->authstring, len, "%s %s", scheme, data);
2532 else
2533 strlcpy(http->authstring, scheme, len);
2534 }
2535 else
2536 {
2537 /*
2538 * Clear the current authorization string...
2539 */
2540
2541 http->_authstring[0] = '\0';
2542 }
2543 }
2544
2545
2546 /*
2547 * 'httpSetCredentials()' - Set the credentials associated with an encrypted
2548 * connection.
2549 *
2550 * @since CUPS 1.5/OS X 10.7@
2551 */
2552
2553 int /* O - Status of call (0 = success) */
2554 httpSetCredentials(http_t *http, /* I - HTTP connection */
2555 cups_array_t *credentials) /* I - Array of credentials */
2556 {
2557 if (!http || cupsArrayCount(credentials) < 1)
2558 return (-1);
2559
2560 _httpFreeCredentials(http->tls_credentials);
2561
2562 http->tls_credentials = _httpCreateCredentials(credentials);
2563
2564 return (http->tls_credentials ? 0 : -1);
2565 }
2566
2567
2568 /*
2569 * 'httpSetCookie()' - Set the cookie value(s).
2570 *
2571 * @since CUPS 1.1.19/OS X 10.3@
2572 */
2573
2574 void
2575 httpSetCookie(http_t *http, /* I - Connection */
2576 const char *cookie) /* I - Cookie string */
2577 {
2578 if (!http)
2579 return;
2580
2581 if (http->cookie)
2582 free(http->cookie);
2583
2584 if (cookie)
2585 http->cookie = strdup(cookie);
2586 else
2587 http->cookie = NULL;
2588 }
2589
2590
2591 /*
2592 * 'httpSetDefaultField()' - Set the default value of an HTTP header.
2593 *
2594 * Currently only @code HTTP_FIELD_ACCEPT_ENCODING@, @code HTTP_FIELD_SERVER@,
2595 * and @code HTTP_FIELD_USER_AGENT@ can be set.
2596 *
2597 * @since CUPS 1.7/OS X 10.9@
2598 */
2599
2600 void
2601 httpSetDefaultField(http_t *http, /* I - HTTP connection */
2602 http_field_t field, /* I - Field index */
2603 const char *value)/* I - Value */
2604 {
2605 DEBUG_printf(("httpSetDefaultField(http=%p, field=%d(%s), value=\"%s\")",
2606 http, field, http_fields[field], value));
2607
2608 if (!http)
2609 return;
2610
2611 switch (field)
2612 {
2613 case HTTP_FIELD_ACCEPT_ENCODING :
2614 if (http->default_accept_encoding)
2615 _cupsStrFree(http->default_accept_encoding);
2616
2617 http->default_accept_encoding = value ? _cupsStrAlloc(value) : NULL;
2618 break;
2619
2620 case HTTP_FIELD_SERVER :
2621 if (http->default_server)
2622 _cupsStrFree(http->default_server);
2623
2624 http->default_server = value ? _cupsStrAlloc(value) : NULL;
2625 break;
2626
2627 case HTTP_FIELD_USER_AGENT :
2628 if (http->default_user_agent)
2629 _cupsStrFree(http->default_user_agent);
2630
2631 http->default_user_agent = value ? _cupsStrAlloc(value) : NULL;
2632 break;
2633
2634 default :
2635 DEBUG_puts("1httpSetDefaultField: Ignored.");
2636 break;
2637 }
2638 }
2639
2640
2641 /*
2642 * 'httpSetExpect()' - Set the Expect: header in a request.
2643 *
2644 * Currently only @code HTTP_STATUS_CONTINUE@ is supported for the "expect"
2645 * argument.
2646 *
2647 * @since CUPS 1.2/OS X 10.5@
2648 */
2649
2650 void
2651 httpSetExpect(http_t *http, /* I - HTTP connection */
2652 http_status_t expect) /* I - HTTP status to expect
2653 (@code HTTP_STATUS_CONTINUE@) */
2654 {
2655 DEBUG_printf(("httpSetExpect(http=%p, expect=%d)", http, expect));
2656
2657 if (http)
2658 http->expect = expect;
2659 }
2660
2661
2662 /*
2663 * 'httpSetField()' - Set the value of an HTTP header.
2664 */
2665
2666 void
2667 httpSetField(http_t *http, /* I - HTTP connection */
2668 http_field_t field, /* I - Field index */
2669 const char *value) /* I - Value */
2670 {
2671 DEBUG_printf(("httpSetField(http=%p, field=%d(%s), value=\"%s\")", http,
2672 field, http_fields[field], value));
2673
2674 if (http == NULL ||
2675 field < HTTP_FIELD_ACCEPT_LANGUAGE ||
2676 field >= HTTP_FIELD_MAX ||
2677 value == NULL)
2678 return;
2679
2680 switch (field)
2681 {
2682 case HTTP_FIELD_ACCEPT_ENCODING :
2683 if (http->accept_encoding)
2684 _cupsStrFree(http->accept_encoding);
2685
2686 http->accept_encoding = _cupsStrAlloc(value);
2687 break;
2688
2689 case HTTP_FIELD_ALLOW :
2690 if (http->allow)
2691 _cupsStrFree(http->allow);
2692
2693 http->allow = _cupsStrAlloc(value);
2694 break;
2695
2696 case HTTP_FIELD_SERVER :
2697 if (http->server)
2698 _cupsStrFree(http->server);
2699
2700 http->server = _cupsStrAlloc(value);
2701 break;
2702
2703 default :
2704 strlcpy(http->fields[field], value, HTTP_MAX_VALUE);
2705 break;
2706 }
2707
2708 if (field == HTTP_FIELD_AUTHORIZATION)
2709 {
2710 /*
2711 * Special case for Authorization: as its contents can be
2712 * longer than HTTP_MAX_VALUE
2713 */
2714
2715 if (http->field_authorization)
2716 free(http->field_authorization);
2717
2718 http->field_authorization = strdup(value);
2719 }
2720 else if (field == HTTP_FIELD_HOST)
2721 {
2722 /*
2723 * Special-case for Host: as we don't want a trailing "." on the hostname and
2724 * need to bracket IPv6 numeric addresses.
2725 */
2726
2727 char *ptr = strchr(value, ':');
2728
2729 if (value[0] != '[' && ptr && strchr(ptr + 1, ':'))
2730 {
2731 /*
2732 * Bracket IPv6 numeric addresses...
2733 *
2734 * This is slightly inefficient (basically copying twice), but is an edge
2735 * case and not worth optimizing...
2736 */
2737
2738 snprintf(http->fields[HTTP_FIELD_HOST],
2739 sizeof(http->fields[HTTP_FIELD_HOST]), "[%s]", value);
2740 }
2741 else
2742 {
2743 /*
2744 * Check for a trailing dot on the hostname...
2745 */
2746
2747 ptr = http->fields[HTTP_FIELD_HOST];
2748
2749 if (*ptr)
2750 {
2751 ptr += strlen(ptr) - 1;
2752
2753 if (*ptr == '.')
2754 *ptr = '\0';
2755 }
2756 }
2757 }
2758 #ifdef HAVE_LIBZ
2759 else if (field == HTTP_FIELD_CONTENT_ENCODING &&
2760 http->data_encoding != HTTP_ENCODING_FIELDS)
2761 {
2762 DEBUG_puts("1httpSetField: Calling http_content_coding_start.");
2763 http_content_coding_start(http, value);
2764 }
2765 #endif /* HAVE_LIBZ */
2766 }
2767
2768
2769 /*
2770 * 'httpSetKeepAlive()' - Set the current Keep-Alive state of a connection.
2771 *
2772 * @since CUPS 2.0@
2773 */
2774
2775 void
2776 httpSetKeepAlive(
2777 http_t *http, /* I - HTTP connection */
2778 http_keepalive_t keep_alive) /* I - New Keep-Alive value */
2779 {
2780 if (http)
2781 http->keep_alive = keep_alive;
2782 }
2783
2784
2785 /*
2786 * 'httpSetLength()' - Set the content-length and content-encoding.
2787 *
2788 * @since CUPS 1.2/OS X 10.5@
2789 */
2790
2791 void
2792 httpSetLength(http_t *http, /* I - HTTP connection */
2793 size_t length) /* I - Length (0 for chunked) */
2794 {
2795 DEBUG_printf(("httpSetLength(http=%p, length=" CUPS_LLFMT ")", http,
2796 CUPS_LLCAST length));
2797
2798 if (!http)
2799 return;
2800
2801 if (!length)
2802 {
2803 strlcpy(http->fields[HTTP_FIELD_TRANSFER_ENCODING], "chunked",
2804 HTTP_MAX_VALUE);
2805 http->fields[HTTP_FIELD_CONTENT_LENGTH][0] = '\0';
2806 }
2807 else
2808 {
2809 http->fields[HTTP_FIELD_TRANSFER_ENCODING][0] = '\0';
2810 snprintf(http->fields[HTTP_FIELD_CONTENT_LENGTH], HTTP_MAX_VALUE,
2811 CUPS_LLFMT, CUPS_LLCAST length);
2812 }
2813 }
2814
2815
2816 /*
2817 * 'httpSetTimeout()' - Set read/write timeouts and an optional callback.
2818 *
2819 * The optional timeout callback receives both the HTTP connection and a user
2820 * data pointer and must return 1 to continue or 0 to error (time) out.
2821 *
2822 * @since CUPS 1.5/OS X 10.7@
2823 */
2824
2825 void
2826 httpSetTimeout(
2827 http_t *http, /* I - HTTP connection */
2828 double timeout, /* I - Number of seconds for timeout,
2829 must be greater than 0 */
2830 http_timeout_cb_t cb, /* I - Callback function or NULL */
2831 void *user_data) /* I - User data pointer */
2832 {
2833 if (!http || timeout <= 0.0)
2834 return;
2835
2836 http->timeout_cb = cb;
2837 http->timeout_data = user_data;
2838 http->timeout_value = timeout;
2839
2840 if (http->fd >= 0)
2841 http_set_timeout(http->fd, timeout);
2842
2843 http_set_wait(http);
2844 }
2845
2846
2847 /*
2848 * 'httpShutdown()' - Shutdown one side of an HTTP connection.
2849 *
2850 * @since CUPS 2.0@
2851 */
2852
2853 void
2854 httpShutdown(http_t *http) /* I - HTTP connection */
2855 {
2856 if (!http || http->fd < 0)
2857 return;
2858
2859 if (http->tls)
2860 _httpTLSStop(http);
2861
2862 #ifdef WIN32
2863 shutdown(http->fd, SD_RECEIVE); /* Microsoft-ism... */
2864 #else
2865 shutdown(http->fd, SHUT_RD);
2866 #endif /* WIN32 */
2867 }
2868
2869
2870 /*
2871 * 'httpTrace()' - Send an TRACE request to the server.
2872 */
2873
2874 int /* O - Status of call (0 = success) */
2875 httpTrace(http_t *http, /* I - HTTP connection */
2876 const char *uri) /* I - URI for trace */
2877 {
2878 return (http_send(http, HTTP_STATE_TRACE, uri));
2879 }
2880
2881
2882 /*
2883 * '_httpUpdate()' - Update the current HTTP status for incoming data.
2884 *
2885 * Note: Unlike httpUpdate(), this function does not flush pending write data
2886 * and only retrieves a single status line from the HTTP connection.
2887 */
2888
2889 int /* O - 1 to continue, 0 to stop */
2890 _httpUpdate(http_t *http, /* I - HTTP connection */
2891 http_status_t *status) /* O - Current HTTP status */
2892 {
2893 char line[32768], /* Line from connection... */
2894 *value; /* Pointer to value on line */
2895 http_field_t field; /* Field index */
2896 int major, minor; /* HTTP version numbers */
2897
2898
2899 DEBUG_printf(("_httpUpdate(http=%p, status=%p), state=%s", http, status,
2900 httpStateString(http->state)));
2901
2902 /*
2903 * Grab a single line from the connection...
2904 */
2905
2906 if (!httpGets(line, sizeof(line), http))
2907 {
2908 *status = HTTP_STATUS_ERROR;
2909 return (0);
2910 }
2911
2912 DEBUG_printf(("2_httpUpdate: Got \"%s\"", line));
2913
2914 if (line[0] == '\0')
2915 {
2916 /*
2917 * Blank line means the start of the data section (if any). Return
2918 * the result code, too...
2919 *
2920 * If we get status 100 (HTTP_STATUS_CONTINUE), then we *don't* change
2921 * states. Instead, we just return HTTP_STATUS_CONTINUE to the caller and
2922 * keep on tryin'...
2923 */
2924
2925 if (http->status == HTTP_STATUS_CONTINUE)
2926 {
2927 *status = http->status;
2928 return (0);
2929 }
2930
2931 if (http->status < HTTP_STATUS_BAD_REQUEST)
2932 http->digest_tries = 0;
2933
2934 #ifdef HAVE_SSL
2935 if (http->status == HTTP_STATUS_SWITCHING_PROTOCOLS && !http->tls)
2936 {
2937 if (_httpTLSStart(http) != 0)
2938 {
2939 httpAddrClose(NULL, http->fd);
2940
2941 *status = http->status = HTTP_STATUS_ERROR;
2942 return (0);
2943 }
2944
2945 *status = HTTP_STATUS_CONTINUE;
2946 return (0);
2947 }
2948 #endif /* HAVE_SSL */
2949
2950 if (http_set_length(http) < 0)
2951 {
2952 DEBUG_puts("1_httpUpdate: Bad Content-Length.");
2953 http->error = EINVAL;
2954 http->status = *status = HTTP_STATUS_ERROR;
2955 return (0);
2956 }
2957
2958 switch (http->state)
2959 {
2960 case HTTP_STATE_GET :
2961 case HTTP_STATE_POST :
2962 case HTTP_STATE_POST_RECV :
2963 case HTTP_STATE_PUT :
2964 http->state ++;
2965
2966 DEBUG_printf(("1_httpUpdate: Set state to %s.",
2967 httpStateString(http->state)));
2968
2969 case HTTP_STATE_POST_SEND :
2970 case HTTP_STATE_HEAD :
2971 break;
2972
2973 default :
2974 http->state = HTTP_STATE_WAITING;
2975
2976 DEBUG_puts("1_httpUpdate: Reset state to HTTP_STATE_WAITING.");
2977 break;
2978 }
2979
2980 #ifdef HAVE_LIBZ
2981 DEBUG_puts("1_httpUpdate: Calling http_content_coding_start.");
2982 http_content_coding_start(http,
2983 httpGetField(http, HTTP_FIELD_CONTENT_ENCODING));
2984 #endif /* HAVE_LIBZ */
2985
2986 *status = http->status;
2987 return (0);
2988 }
2989 else if (!strncmp(line, "HTTP/", 5))
2990 {
2991 /*
2992 * Got the beginning of a response...
2993 */
2994
2995 int intstatus; /* Status value as an integer */
2996
2997 if (sscanf(line, "HTTP/%d.%d%d", &major, &minor, &intstatus) != 3)
2998 {
2999 *status = http->status = HTTP_STATUS_ERROR;
3000 return (0);
3001 }
3002
3003 httpClearFields(http);
3004
3005 http->version = (http_version_t)(major * 100 + minor);
3006 *status = http->status = (http_status_t)intstatus;
3007 }
3008 else if ((value = strchr(line, ':')) != NULL)
3009 {
3010 /*
3011 * Got a value...
3012 */
3013
3014 *value++ = '\0';
3015 while (_cups_isspace(*value))
3016 value ++;
3017
3018 DEBUG_printf(("1_httpUpdate: Header %s: %s", line, value));
3019
3020 /*
3021 * Be tolerants of servers that send unknown attribute fields...
3022 */
3023
3024 if (!_cups_strcasecmp(line, "expect"))
3025 {
3026 /*
3027 * "Expect: 100-continue" or similar...
3028 */
3029
3030 http->expect = (http_status_t)atoi(value);
3031 }
3032 else if (!_cups_strcasecmp(line, "cookie"))
3033 {
3034 /*
3035 * "Cookie: name=value[; name=value ...]" - replaces previous cookies...
3036 */
3037
3038 httpSetCookie(http, value);
3039 }
3040 else if ((field = httpFieldValue(line)) != HTTP_FIELD_UNKNOWN)
3041 httpSetField(http, field, value);
3042 #ifdef DEBUG
3043 else
3044 DEBUG_printf(("1_httpUpdate: unknown field %s seen!", line));
3045 #endif /* DEBUG */
3046 }
3047 else
3048 {
3049 DEBUG_printf(("1_httpUpdate: Bad response line \"%s\"!", line));
3050 http->error = EINVAL;
3051 http->status = *status = HTTP_STATUS_ERROR;
3052 return (0);
3053 }
3054
3055 return (1);
3056 }
3057
3058
3059 /*
3060 * 'httpUpdate()' - Update the current HTTP state for incoming data.
3061 */
3062
3063 http_status_t /* O - HTTP status */
3064 httpUpdate(http_t *http) /* I - HTTP connection */
3065 {
3066 http_status_t status; /* Request status */
3067
3068
3069 DEBUG_printf(("httpUpdate(http=%p), state=%s", http,
3070 httpStateString(http->state)));
3071
3072 /*
3073 * Flush pending data, if any...
3074 */
3075
3076 if (http->wused)
3077 {
3078 DEBUG_puts("2httpUpdate: flushing buffer...");
3079
3080 if (httpFlushWrite(http) < 0)
3081 return (HTTP_STATUS_ERROR);
3082 }
3083
3084 /*
3085 * If we haven't issued any commands, then there is nothing to "update"...
3086 */
3087
3088 if (http->state == HTTP_STATE_WAITING)
3089 return (HTTP_STATUS_CONTINUE);
3090
3091 /*
3092 * Grab all of the lines we can from the connection...
3093 */
3094
3095 while (_httpUpdate(http, &status));
3096
3097 /*
3098 * See if there was an error...
3099 */
3100
3101 if (http->error == EPIPE && http->status > HTTP_STATUS_CONTINUE)
3102 {
3103 DEBUG_printf(("1httpUpdate: Returning status %d...", http->status));
3104 return (http->status);
3105 }
3106
3107 if (http->error)
3108 {
3109 DEBUG_printf(("1httpUpdate: socket error %d - %s", http->error,
3110 strerror(http->error)));
3111 http->status = HTTP_STATUS_ERROR;
3112 return (HTTP_STATUS_ERROR);
3113 }
3114
3115 /*
3116 * Return the current status...
3117 */
3118
3119 return (status);
3120 }
3121
3122
3123 /*
3124 * '_httpWait()' - Wait for data available on a connection (no flush).
3125 */
3126
3127 int /* O - 1 if data is available, 0 otherwise */
3128 _httpWait(http_t *http, /* I - HTTP connection */
3129 int msec, /* I - Milliseconds to wait */
3130 int usessl) /* I - Use SSL context? */
3131 {
3132 #ifdef HAVE_POLL
3133 struct pollfd pfd; /* Polled file descriptor */
3134 #else
3135 fd_set input_set; /* select() input set */
3136 struct timeval timeout; /* Timeout */
3137 #endif /* HAVE_POLL */
3138 int nfds; /* Result from select()/poll() */
3139
3140
3141 DEBUG_printf(("4_httpWait(http=%p, msec=%d, usessl=%d)", http, msec, usessl));
3142
3143 if (http->fd < 0)
3144 {
3145 DEBUG_printf(("5_httpWait: Returning 0 since fd=%d", http->fd));
3146 return (0);
3147 }
3148
3149 /*
3150 * Check the SSL/TLS buffers for data first...
3151 */
3152
3153 #ifdef HAVE_SSL
3154 if (http->tls && _httpTLSPending(http))
3155 {
3156 DEBUG_puts("5_httpWait: Return 1 since there is pending TLS data.");
3157 return (1);
3158 }
3159 #endif /* HAVE_SSL */
3160
3161 /*
3162 * Then try doing a select() or poll() to poll the socket...
3163 */
3164
3165 #ifdef HAVE_POLL
3166 pfd.fd = http->fd;
3167 pfd.events = POLLIN;
3168
3169 do
3170 {
3171 nfds = poll(&pfd, 1, msec);
3172 }
3173 while (nfds < 0 && (errno == EINTR || errno == EAGAIN));
3174
3175 #else
3176 do
3177 {
3178 FD_ZERO(&input_set);
3179 FD_SET(http->fd, &input_set);
3180
3181 DEBUG_printf(("6_httpWait: msec=%d, http->fd=%d", msec, http->fd));
3182
3183 if (msec >= 0)
3184 {
3185 timeout.tv_sec = msec / 1000;
3186 timeout.tv_usec = (msec % 1000) * 1000;
3187
3188 nfds = select(http->fd + 1, &input_set, NULL, NULL, &timeout);
3189 }
3190 else
3191 nfds = select(http->fd + 1, &input_set, NULL, NULL, NULL);
3192
3193 DEBUG_printf(("6_httpWait: select() returned %d...", nfds));
3194 }
3195 # ifdef WIN32
3196 while (nfds < 0 && (WSAGetLastError() == WSAEINTR ||
3197 WSAGetLastError() == WSAEWOULDBLOCK));
3198 # else
3199 while (nfds < 0 && (errno == EINTR || errno == EAGAIN));
3200 # endif /* WIN32 */
3201 #endif /* HAVE_POLL */
3202
3203 DEBUG_printf(("5_httpWait: returning with nfds=%d, errno=%d...", nfds,
3204 errno));
3205
3206 return (nfds > 0);
3207 }
3208
3209
3210 /*
3211 * 'httpWait()' - Wait for data available on a connection.
3212 *
3213 * @since CUPS 1.1.19/OS X 10.3@
3214 */
3215
3216 int /* O - 1 if data is available, 0 otherwise */
3217 httpWait(http_t *http, /* I - HTTP connection */
3218 int msec) /* I - Milliseconds to wait */
3219 {
3220 /*
3221 * First see if there is data in the buffer...
3222 */
3223
3224 DEBUG_printf(("2httpWait(http=%p, msec=%d)", http, msec));
3225
3226 if (http == NULL)
3227 return (0);
3228
3229 if (http->used)
3230 {
3231 DEBUG_puts("3httpWait: Returning 1 since there is buffered data ready.");
3232 return (1);
3233 }
3234
3235 #ifdef HAVE_LIBZ
3236 if (http->coding >= _HTTP_CODING_GUNZIP && http->stream.avail_in > 0)
3237 {
3238 DEBUG_puts("3httpWait: Returning 1 since there is buffered data ready.");
3239 return (1);
3240 }
3241 #endif /* HAVE_LIBZ */
3242
3243 /*
3244 * Flush pending data, if any...
3245 */
3246
3247 if (http->wused)
3248 {
3249 DEBUG_puts("3httpWait: Flushing write buffer.");
3250
3251 if (httpFlushWrite(http) < 0)
3252 return (0);
3253 }
3254
3255 /*
3256 * If not, check the SSL/TLS buffers and do a select() on the connection...
3257 */
3258
3259 return (_httpWait(http, msec, 1));
3260 }
3261
3262
3263 /*
3264 * 'httpWrite()' - Write data to a HTTP connection.
3265 *
3266 * This function is deprecated. Use the httpWrite2() function which can
3267 * write more than 2GB of data.
3268 *
3269 * @deprecated@
3270 */
3271
3272 int /* O - Number of bytes written */
3273 httpWrite(http_t *http, /* I - HTTP connection */
3274 const char *buffer, /* I - Buffer for data */
3275 int length) /* I - Number of bytes to write */
3276 {
3277 return ((int)httpWrite2(http, buffer, (size_t)length));
3278 }
3279
3280
3281 /*
3282 * 'httpWrite2()' - Write data to a HTTP connection.
3283 *
3284 * @since CUPS 1.2/OS X 10.5@
3285 */
3286
3287 ssize_t /* O - Number of bytes written */
3288 httpWrite2(http_t *http, /* I - HTTP connection */
3289 const char *buffer, /* I - Buffer for data */
3290 size_t length) /* I - Number of bytes to write */
3291 {
3292 ssize_t bytes; /* Bytes written */
3293
3294
3295 DEBUG_printf(("httpWrite2(http=%p, buffer=%p, length=" CUPS_LLFMT ")", http,
3296 buffer, CUPS_LLCAST length));
3297
3298 /*
3299 * Range check input...
3300 */
3301
3302 if (!http || !buffer)
3303 {
3304 DEBUG_puts("1httpWrite2: Returning -1 due to bad input.");
3305 return (-1);
3306 }
3307
3308 /*
3309 * Mark activity on the connection...
3310 */
3311
3312 http->activity = time(NULL);
3313
3314 /*
3315 * Buffer small writes for better performance...
3316 */
3317
3318 #ifdef HAVE_LIBZ
3319 if (http->coding == _HTTP_CODING_GZIP || http->coding == _HTTP_CODING_DEFLATE)
3320 {
3321 DEBUG_printf(("1httpWrite2: http->coding=%d", http->coding));
3322
3323 if (length == 0)
3324 {
3325 http_content_coding_finish(http);
3326 bytes = 0;
3327 }
3328 else
3329 {
3330 size_t slen; /* Bytes to write */
3331 ssize_t sret; /* Bytes written */
3332
3333 http->stream.next_in = (Bytef *)buffer;
3334 http->stream.avail_in = (uInt)length;
3335
3336 while (deflate(&(http->stream), Z_NO_FLUSH) == Z_OK)
3337 {
3338 DEBUG_printf(("1httpWrite2: avail_out=%d", http->stream.avail_out));
3339
3340 if (http->stream.avail_out > 0)
3341 continue;
3342
3343 slen = _HTTP_MAX_SBUFFER - http->stream.avail_out;
3344
3345 DEBUG_printf(("1httpWrite2: Writing intermediate chunk, len=%d", (int)slen));
3346
3347 if (slen > 0 && http->data_encoding == HTTP_ENCODING_CHUNKED)
3348 sret = http_write_chunk(http, (char *)http->sbuffer, slen);
3349 else if (slen > 0)
3350 sret = http_write(http, (char *)http->sbuffer, slen);
3351 else
3352 sret = 0;
3353
3354 if (sret < 0)
3355 {
3356 DEBUG_puts("1httpWrite2: Unable to write, returning -1.");
3357 return (-1);
3358 }
3359
3360 http->stream.next_out = (Bytef *)http->sbuffer;
3361 http->stream.avail_out = (uInt)_HTTP_MAX_SBUFFER;
3362 }
3363
3364 bytes = (ssize_t)length;
3365 }
3366 }
3367 else
3368 #endif /* HAVE_LIBZ */
3369 if (length > 0)
3370 {
3371 if (http->wused && (length + (size_t)http->wused) > sizeof(http->wbuffer))
3372 {
3373 DEBUG_printf(("2httpWrite2: Flushing buffer (wused=%d, length="
3374 CUPS_LLFMT ")", http->wused, CUPS_LLCAST length));
3375
3376 httpFlushWrite(http);
3377 }
3378
3379 if ((length + (size_t)http->wused) <= sizeof(http->wbuffer) && length < sizeof(http->wbuffer))
3380 {
3381 /*
3382 * Write to buffer...
3383 */
3384
3385 DEBUG_printf(("2httpWrite2: Copying " CUPS_LLFMT " bytes to wbuffer...",
3386 CUPS_LLCAST length));
3387
3388 memcpy(http->wbuffer + http->wused, buffer, length);
3389 http->wused += (int)length;
3390 bytes = (ssize_t)length;
3391 }
3392 else
3393 {
3394 /*
3395 * Otherwise write the data directly...
3396 */
3397
3398 DEBUG_printf(("2httpWrite2: Writing " CUPS_LLFMT " bytes to socket...",
3399 CUPS_LLCAST length));
3400
3401 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
3402 bytes = (ssize_t)http_write_chunk(http, buffer, length);
3403 else
3404 bytes = (ssize_t)http_write(http, buffer, length);
3405
3406 DEBUG_printf(("2httpWrite2: Wrote " CUPS_LLFMT " bytes...",
3407 CUPS_LLCAST bytes));
3408 }
3409
3410 if (http->data_encoding == HTTP_ENCODING_LENGTH)
3411 http->data_remaining -= bytes;
3412 }
3413 else
3414 bytes = 0;
3415
3416 /*
3417 * Handle end-of-request processing...
3418 */
3419
3420 if ((http->data_encoding == HTTP_ENCODING_CHUNKED && length == 0) ||
3421 (http->data_encoding == HTTP_ENCODING_LENGTH && http->data_remaining == 0))
3422 {
3423 /*
3424 * Finished with the transfer; unless we are sending POST or PUT
3425 * data, go idle...
3426 */
3427
3428 #ifdef HAVE_LIBZ
3429 if (http->coding == _HTTP_CODING_GZIP || http->coding == _HTTP_CODING_DEFLATE)
3430 http_content_coding_finish(http);
3431 #endif /* HAVE_LIBZ */
3432
3433 if (http->wused)
3434 {
3435 if (httpFlushWrite(http) < 0)
3436 return (-1);
3437 }
3438
3439 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
3440 {
3441 /*
3442 * Send a 0-length chunk at the end of the request...
3443 */
3444
3445 http_write(http, "0\r\n\r\n", 5);
3446
3447 /*
3448 * Reset the data state...
3449 */
3450
3451 http->data_encoding = HTTP_ENCODING_FIELDS;
3452 http->data_remaining = 0;
3453 }
3454
3455 if (http->state == HTTP_STATE_POST_RECV)
3456 http->state ++;
3457 else if (http->state == HTTP_STATE_POST_SEND ||
3458 http->state == HTTP_STATE_GET_SEND)
3459 http->state = HTTP_STATE_WAITING;
3460 else
3461 http->state = HTTP_STATE_STATUS;
3462
3463 DEBUG_printf(("2httpWrite2: Changed state to %s.",
3464 httpStateString(http->state)));
3465 }
3466
3467 DEBUG_printf(("1httpWrite2: Returning " CUPS_LLFMT ".", CUPS_LLCAST bytes));
3468
3469 return (bytes);
3470 }
3471
3472
3473 /*
3474 * 'httpWriteResponse()' - Write a HTTP response to a client connection.
3475 *
3476 * @since CUPS 1.7/OS X 10.9@
3477 */
3478
3479 int /* O - 0 on success, -1 on error */
3480 httpWriteResponse(http_t *http, /* I - HTTP connection */
3481 http_status_t status) /* I - Status code */
3482 {
3483 http_encoding_t old_encoding; /* Old data_encoding value */
3484 off_t old_remaining; /* Old data_remaining value */
3485
3486
3487 /*
3488 * Range check input...
3489 */
3490
3491 DEBUG_printf(("httpWriteResponse(http=%p, status=%d)", http, status));
3492
3493 if (!http || status < HTTP_STATUS_CONTINUE)
3494 {
3495 DEBUG_puts("1httpWriteResponse: Bad input.");
3496 return (-1);
3497 }
3498
3499 /*
3500 * Set the various standard fields if they aren't already...
3501 */
3502
3503 if (!http->fields[HTTP_FIELD_DATE][0])
3504 httpSetField(http, HTTP_FIELD_DATE, httpGetDateString(time(NULL)));
3505
3506 if (status >= HTTP_STATUS_BAD_REQUEST && http->keep_alive)
3507 {
3508 http->keep_alive = HTTP_KEEPALIVE_OFF;
3509 httpSetField(http, HTTP_FIELD_KEEP_ALIVE, "");
3510 }
3511
3512 if (http->version == HTTP_VERSION_1_1)
3513 {
3514 if (!http->fields[HTTP_FIELD_CONNECTION][0])
3515 {
3516 if (http->keep_alive)
3517 httpSetField(http, HTTP_FIELD_CONNECTION, "Keep-Alive");
3518 else
3519 httpSetField(http, HTTP_FIELD_CONNECTION, "close");
3520 }
3521
3522 if (http->keep_alive && !http->fields[HTTP_FIELD_KEEP_ALIVE][0])
3523 httpSetField(http, HTTP_FIELD_KEEP_ALIVE, "timeout=10");
3524 }
3525
3526 #ifdef HAVE_SSL
3527 if (status == HTTP_STATUS_UPGRADE_REQUIRED ||
3528 status == HTTP_STATUS_SWITCHING_PROTOCOLS)
3529 {
3530 if (!http->fields[HTTP_FIELD_CONNECTION][0])
3531 httpSetField(http, HTTP_FIELD_CONNECTION, "Upgrade");
3532
3533 if (!http->fields[HTTP_FIELD_UPGRADE][0])
3534 httpSetField(http, HTTP_FIELD_UPGRADE, "TLS/1.2,TLS/1.1,TLS/1.0");
3535
3536 if (!http->fields[HTTP_FIELD_CONTENT_LENGTH][0])
3537 httpSetField(http, HTTP_FIELD_CONTENT_LENGTH, "0");
3538 }
3539 #endif /* HAVE_SSL */
3540
3541 if (!http->server)
3542 httpSetField(http, HTTP_FIELD_SERVER,
3543 http->default_server ? http->default_server : CUPS_MINIMAL);
3544
3545 /*
3546 * Set the Accept-Encoding field if it isn't already...
3547 */
3548
3549 if (!http->accept_encoding)
3550 httpSetField(http, HTTP_FIELD_ACCEPT_ENCODING,
3551 http->default_accept_encoding ? http->default_accept_encoding :
3552 #ifdef HAVE_LIBZ
3553 "gzip, deflate, identity");
3554 #else
3555 "identity");
3556 #endif /* HAVE_LIBZ */
3557
3558 /*
3559 * Send the response header...
3560 */
3561
3562 old_encoding = http->data_encoding;
3563 old_remaining = http->data_remaining;
3564 http->data_encoding = HTTP_ENCODING_FIELDS;
3565
3566 if (httpPrintf(http, "HTTP/%d.%d %d %s\r\n", http->version / 100,
3567 http->version % 100, (int)status, httpStatus(status)) < 0)
3568 {
3569 http->status = HTTP_STATUS_ERROR;
3570 return (-1);
3571 }
3572
3573 if (status != HTTP_STATUS_CONTINUE)
3574 {
3575 /*
3576 * 100 Continue doesn't have the rest of the response headers...
3577 */
3578
3579 int i; /* Looping var */
3580 const char *value; /* Field value */
3581
3582 for (i = 0; i < HTTP_FIELD_MAX; i ++)
3583 {
3584 if ((value = httpGetField(http, i)) != NULL && *value)
3585 {
3586 if (httpPrintf(http, "%s: %s\r\n", http_fields[i], value) < 1)
3587 {
3588 http->status = HTTP_STATUS_ERROR;
3589 return (-1);
3590 }
3591 }
3592 }
3593
3594 if (http->cookie)
3595 {
3596 if (httpPrintf(http, "Set-Cookie: %s path=/ httponly%s\r\n",
3597 http->cookie, http->tls ? " secure" : "") < 1)
3598 {
3599 http->status = HTTP_STATUS_ERROR;
3600 return (-1);
3601 }
3602 }
3603 }
3604
3605 if (httpWrite2(http, "\r\n", 2) < 2)
3606 {
3607 http->status = HTTP_STATUS_ERROR;
3608 return (-1);
3609 }
3610
3611 if (httpFlushWrite(http) < 0)
3612 {
3613 http->status = HTTP_STATUS_ERROR;
3614 return (-1);
3615 }
3616
3617 if (status == HTTP_STATUS_CONTINUE ||
3618 status == HTTP_STATUS_SWITCHING_PROTOCOLS)
3619 {
3620 /*
3621 * Restore the old data_encoding and data_length values...
3622 */
3623
3624 http->data_encoding = old_encoding;
3625 http->data_remaining = old_remaining;
3626
3627 if (old_remaining <= INT_MAX)
3628 http->_data_remaining = (int)old_remaining;
3629 else
3630 http->_data_remaining = INT_MAX;
3631 }
3632 else if (http->state == HTTP_STATE_OPTIONS ||
3633 http->state == HTTP_STATE_HEAD ||
3634 http->state == HTTP_STATE_PUT ||
3635 http->state == HTTP_STATE_TRACE ||
3636 http->state == HTTP_STATE_CONNECT ||
3637 http->state == HTTP_STATE_STATUS)
3638 {
3639 DEBUG_printf(("1httpWriteResponse: Resetting state to HTTP_STATE_WAITING, "
3640 "was %s.", httpStateString(http->state)));
3641 http->state = HTTP_STATE_WAITING;
3642 }
3643 else
3644 {
3645 /*
3646 * Force data_encoding and data_length to be set according to the response
3647 * headers...
3648 */
3649
3650 http_set_length(http);
3651
3652 if (http->data_encoding == HTTP_ENCODING_LENGTH && http->data_remaining == 0)
3653 {
3654 DEBUG_printf(("1httpWriteResponse: Resetting state to HTTP_STATE_WAITING, "
3655 "was %s.", httpStateString(http->state)));
3656 http->state = HTTP_STATE_WAITING;
3657 return (0);
3658 }
3659
3660 #ifdef HAVE_LIBZ
3661 /*
3662 * Then start any content encoding...
3663 */
3664
3665 DEBUG_puts("1httpWriteResponse: Calling http_content_coding_start.");
3666 http_content_coding_start(http,
3667 httpGetField(http, HTTP_FIELD_CONTENT_ENCODING));
3668 #endif /* HAVE_LIBZ */
3669
3670 }
3671
3672 return (0);
3673 }
3674
3675
3676 #ifdef HAVE_LIBZ
3677 /*
3678 * 'http_content_coding_finish()' - Finish doing any content encoding.
3679 */
3680
3681 static void
3682 http_content_coding_finish(
3683 http_t *http) /* I - HTTP connection */
3684 {
3685 int zerr; /* Compression status */
3686 Byte dummy[1]; /* Dummy read buffer */
3687 size_t bytes; /* Number of bytes to write */
3688
3689
3690 DEBUG_printf(("http_content_coding_finish(http=%p)", http));
3691 DEBUG_printf(("1http_content_coding_finishing: http->coding=%d", http->coding));
3692
3693 switch (http->coding)
3694 {
3695 case _HTTP_CODING_DEFLATE :
3696 case _HTTP_CODING_GZIP :
3697 http->stream.next_in = dummy;
3698 http->stream.avail_in = 0;
3699
3700 do
3701 {
3702 zerr = deflate(&(http->stream), Z_FINISH);
3703 bytes = _HTTP_MAX_SBUFFER - http->stream.avail_out;
3704
3705 if (bytes > 0)
3706 {
3707 DEBUG_printf(("1http_content_coding_finish: Writing trailing chunk, len=%d", (int)bytes));
3708
3709 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
3710 http_write_chunk(http, (char *)http->sbuffer, bytes);
3711 else
3712 http_write(http, (char *)http->sbuffer, bytes);
3713 }
3714
3715 http->stream.next_out = (Bytef *)http->sbuffer;
3716 http->stream.avail_out = (uInt)_HTTP_MAX_SBUFFER;
3717 }
3718 while (zerr == Z_OK);
3719
3720 deflateEnd(&(http->stream));
3721
3722 free(http->sbuffer);
3723 http->sbuffer = NULL;
3724
3725 if (http->wused)
3726 httpFlushWrite(http);
3727 break;
3728
3729 case _HTTP_CODING_INFLATE :
3730 case _HTTP_CODING_GUNZIP :
3731 inflateEnd(&(http->stream));
3732 free(http->sbuffer);
3733 http->sbuffer = NULL;
3734 break;
3735
3736 default :
3737 break;
3738 }
3739
3740 http->coding = _HTTP_CODING_IDENTITY;
3741 }
3742
3743
3744 /*
3745 * 'http_content_coding_start()' - Start doing content encoding.
3746 */
3747
3748 static void
3749 http_content_coding_start(
3750 http_t *http, /* I - HTTP connection */
3751 const char *value) /* I - Value of Content-Encoding */
3752 {
3753 int zerr; /* Error/status */
3754 _http_coding_t coding; /* Content coding value */
3755
3756
3757 DEBUG_printf(("http_content_coding_start(http=%p, value=\"%s\")", http,
3758 value));
3759
3760 if (http->coding != _HTTP_CODING_IDENTITY)
3761 {
3762 DEBUG_printf(("1http_content_coding_start: http->coding already %d.",
3763 http->coding));
3764 return;
3765 }
3766 else if (!strcmp(value, "x-gzip") || !strcmp(value, "gzip"))
3767 {
3768 if (http->state == HTTP_STATE_GET_SEND ||
3769 http->state == HTTP_STATE_POST_SEND)
3770 coding = http->mode == _HTTP_MODE_SERVER ? _HTTP_CODING_GZIP :
3771 _HTTP_CODING_GUNZIP;
3772 else if (http->state == HTTP_STATE_POST_RECV ||
3773 http->state == HTTP_STATE_PUT_RECV)
3774 coding = http->mode == _HTTP_MODE_CLIENT ? _HTTP_CODING_GZIP :
3775 _HTTP_CODING_GUNZIP;
3776 else
3777 {
3778 DEBUG_puts("1http_content_coding_start: Not doing content coding.");
3779 return;
3780 }
3781 }
3782 else if (!strcmp(value, "x-deflate") || !strcmp(value, "deflate"))
3783 {
3784 if (http->state == HTTP_STATE_GET_SEND ||
3785 http->state == HTTP_STATE_POST_SEND)
3786 coding = http->mode == _HTTP_MODE_SERVER ? _HTTP_CODING_DEFLATE :
3787 _HTTP_CODING_INFLATE;
3788 else if (http->state == HTTP_STATE_POST_RECV ||
3789 http->state == HTTP_STATE_PUT_RECV)
3790 coding = http->mode == _HTTP_MODE_CLIENT ? _HTTP_CODING_DEFLATE :
3791 _HTTP_CODING_INFLATE;
3792 else
3793 {
3794 DEBUG_puts("1http_content_coding_start: Not doing content coding.");
3795 return;
3796 }
3797 }
3798 else
3799 {
3800 DEBUG_puts("1http_content_coding_start: Not doing content coding.");
3801 return;
3802 }
3803
3804 memset(&(http->stream), 0, sizeof(http->stream));
3805
3806 switch (coding)
3807 {
3808 case _HTTP_CODING_DEFLATE :
3809 case _HTTP_CODING_GZIP :
3810 if (http->wused)
3811 httpFlushWrite(http);
3812
3813 if ((http->sbuffer = malloc(_HTTP_MAX_SBUFFER)) == NULL)
3814 {
3815 http->status = HTTP_STATUS_ERROR;
3816 http->error = errno;
3817 return;
3818 }
3819
3820 /*
3821 * Window size for compression is 11 bits - optimal based on PWG Raster
3822 * sample files on pwg.org. -11 is raw deflate, 27 is gzip, per ZLIB
3823 * documentation.
3824 */
3825
3826 if ((zerr = deflateInit2(&(http->stream), Z_DEFAULT_COMPRESSION,
3827 Z_DEFLATED,
3828 coding == _HTTP_CODING_DEFLATE ? -11 : 27, 7,
3829 Z_DEFAULT_STRATEGY)) < Z_OK)
3830 {
3831 http->status = HTTP_STATUS_ERROR;
3832 http->error = zerr == Z_MEM_ERROR ? ENOMEM : EINVAL;
3833 return;
3834 }
3835
3836 http->stream.next_out = (Bytef *)http->sbuffer;
3837 http->stream.avail_out = (uInt)_HTTP_MAX_SBUFFER;
3838 break;
3839
3840 case _HTTP_CODING_INFLATE :
3841 case _HTTP_CODING_GUNZIP :
3842 if ((http->sbuffer = malloc(_HTTP_MAX_SBUFFER)) == NULL)
3843 {
3844 http->status = HTTP_STATUS_ERROR;
3845 http->error = errno;
3846 return;
3847 }
3848
3849 /*
3850 * Window size for decompression is up to 15 bits (maximum supported).
3851 * -15 is raw inflate, 31 is gunzip, per ZLIB documentation.
3852 */
3853
3854 if ((zerr = inflateInit2(&(http->stream),
3855 coding == _HTTP_CODING_INFLATE ? -15 : 31))
3856 < Z_OK)
3857 {
3858 free(http->sbuffer);
3859 http->sbuffer = NULL;
3860 http->status = HTTP_STATUS_ERROR;
3861 http->error = zerr == Z_MEM_ERROR ? ENOMEM : EINVAL;
3862 return;
3863 }
3864
3865 http->stream.avail_in = 0;
3866 http->stream.next_in = http->sbuffer;
3867 break;
3868
3869 default :
3870 break;
3871 }
3872
3873 http->coding = coding;
3874
3875 DEBUG_printf(("1http_content_coding_start: http->coding now %d.",
3876 http->coding));
3877 }
3878 #endif /* HAVE_LIBZ */
3879
3880
3881 /*
3882 * 'http_create()' - Create an unconnected HTTP connection.
3883 */
3884
3885 static http_t * /* O - HTTP connection */
3886 http_create(
3887 const char *host, /* I - Hostname */
3888 int port, /* I - Port number */
3889 http_addrlist_t *addrlist, /* I - Address list or NULL */
3890 int family, /* I - Address family or AF_UNSPEC */
3891 http_encryption_t encryption, /* I - Encryption to use */
3892 int blocking, /* I - 1 for blocking mode */
3893 _http_mode_t mode) /* I - _HTTP_MODE_CLIENT or _SERVER */
3894 {
3895 http_t *http; /* New HTTP connection */
3896 char service[255]; /* Service name */
3897 http_addrlist_t *myaddrlist = NULL; /* My address list */
3898
3899
3900 DEBUG_printf(("4http_create(host=\"%s\", port=%d, addrlist=%p, family=%d, "
3901 "encryption=%d, blocking=%d, mode=%d)", host, port, addrlist,
3902 family, encryption, blocking, mode));
3903
3904 if (!host && mode == _HTTP_MODE_CLIENT)
3905 return (NULL);
3906
3907 httpInitialize();
3908
3909 /*
3910 * Lookup the host...
3911 */
3912
3913 if (addrlist)
3914 {
3915 myaddrlist = httpAddrCopyList(addrlist);
3916 }
3917 else
3918 {
3919 snprintf(service, sizeof(service), "%d", port);
3920
3921 myaddrlist = httpAddrGetList(host, family, service);
3922 }
3923
3924 if (!myaddrlist)
3925 return (NULL);
3926
3927 /*
3928 * Allocate memory for the structure...
3929 */
3930
3931 if ((http = calloc(sizeof(http_t), 1)) == NULL)
3932 {
3933 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, strerror(errno), 0);
3934 httpAddrFreeList(addrlist);
3935 return (NULL);
3936 }
3937
3938 /*
3939 * Initialize the HTTP data...
3940 */
3941
3942 http->mode = mode;
3943 http->activity = time(NULL);
3944 http->addrlist = myaddrlist;
3945 http->blocking = blocking;
3946 http->fd = -1;
3947 #ifdef HAVE_GSSAPI
3948 http->gssctx = GSS_C_NO_CONTEXT;
3949 http->gssname = GSS_C_NO_NAME;
3950 #endif /* HAVE_GSSAPI */
3951 http->status = HTTP_STATUS_CONTINUE;
3952 http->version = HTTP_VERSION_1_1;
3953
3954 if (host)
3955 strlcpy(http->hostname, host, sizeof(http->hostname));
3956
3957 if (port == 443) /* Always use encryption for https */
3958 http->encryption = HTTP_ENCRYPTION_ALWAYS;
3959 else
3960 http->encryption = encryption;
3961
3962 http_set_wait(http);
3963
3964 /*
3965 * Return the new structure...
3966 */
3967
3968 return (http);
3969 }
3970
3971
3972 #ifdef DEBUG
3973 /*
3974 * 'http_debug_hex()' - Do a hex dump of a buffer.
3975 */
3976
3977 static void
3978 http_debug_hex(const char *prefix, /* I - Prefix for line */
3979 const char *buffer, /* I - Buffer to dump */
3980 int bytes) /* I - Bytes to dump */
3981 {
3982 int i, j, /* Looping vars */
3983 ch; /* Current character */
3984 char line[255], /* Line buffer */
3985 *start, /* Start of line after prefix */
3986 *ptr; /* Pointer into line */
3987
3988
3989 if (_cups_debug_fd < 0 || _cups_debug_level < 6)
3990 return;
3991
3992 DEBUG_printf(("6%s: %d bytes:", prefix, bytes));
3993
3994 snprintf(line, sizeof(line), "6%s: ", prefix);
3995 start = line + strlen(line);
3996
3997 for (i = 0; i < bytes; i += 16)
3998 {
3999 for (j = 0, ptr = start; j < 16 && (i + j) < bytes; j ++, ptr += 2)
4000 sprintf(ptr, "%02X", buffer[i + j] & 255);
4001
4002 while (j < 16)
4003 {
4004 memcpy(ptr, " ", 3);
4005 ptr += 2;
4006 j ++;
4007 }
4008
4009 memcpy(ptr, " ", 3);
4010 ptr += 2;
4011
4012 for (j = 0; j < 16 && (i + j) < bytes; j ++)
4013 {
4014 ch = buffer[i + j] & 255;
4015
4016 if (ch < ' ' || ch >= 127)
4017 ch = '.';
4018
4019 *ptr++ = (char)ch;
4020 }
4021
4022 *ptr = '\0';
4023 DEBUG_puts(line);
4024 }
4025 }
4026 #endif /* DEBUG */
4027
4028
4029 /*
4030 * 'http_read()' - Read a buffer from a HTTP connection.
4031 *
4032 * This function does the low-level read from the socket, retrying and timing
4033 * out as needed.
4034 */
4035
4036 static ssize_t /* O - Number of bytes read or -1 on error */
4037 http_read(http_t *http, /* I - HTTP connection */
4038 char *buffer, /* I - Buffer */
4039 size_t length) /* I - Maximum bytes to read */
4040 {
4041 ssize_t bytes; /* Bytes read */
4042
4043
4044 DEBUG_printf(("http_read(http=%p, buffer=%p, length=" CUPS_LLFMT ")", http,
4045 buffer, CUPS_LLCAST length));
4046
4047 if (!http->blocking)
4048 {
4049 while (!httpWait(http, http->wait_value))
4050 {
4051 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
4052 continue;
4053
4054 DEBUG_puts("2http_read: Timeout.");
4055 return (0);
4056 }
4057 }
4058
4059 DEBUG_printf(("2http_read: Reading %d bytes into buffer.", (int)length));
4060
4061 do
4062 {
4063 #ifdef HAVE_SSL
4064 if (http->tls)
4065 bytes = _httpTLSRead(http, buffer, (int)length);
4066 else
4067 #endif /* HAVE_SSL */
4068 bytes = recv(http->fd, buffer, length, 0);
4069
4070 if (bytes < 0)
4071 {
4072 #ifdef WIN32
4073 if (WSAGetLastError() != WSAEINTR)
4074 {
4075 http->error = WSAGetLastError();
4076 return (-1);
4077 }
4078 else if (WSAGetLastError() == WSAEWOULDBLOCK)
4079 {
4080 if (!http->timeout_cb ||
4081 !(*http->timeout_cb)(http, http->timeout_data))
4082 {
4083 http->error = WSAEWOULDBLOCK;
4084 return (-1);
4085 }
4086 }
4087 #else
4088 DEBUG_printf(("2http_read: %s", strerror(errno)));
4089
4090 if (errno == EWOULDBLOCK || errno == EAGAIN)
4091 {
4092 if (http->timeout_cb && !(*http->timeout_cb)(http, http->timeout_data))
4093 {
4094 http->error = errno;
4095 return (-1);
4096 }
4097 else if (!http->timeout_cb && errno != EAGAIN)
4098 {
4099 http->error = errno;
4100 return (-1);
4101 }
4102 }
4103 else if (errno != EINTR)
4104 {
4105 http->error = errno;
4106 return (-1);
4107 }
4108 #endif /* WIN32 */
4109 }
4110 }
4111 while (bytes < 0);
4112
4113 DEBUG_printf(("2http_read: Read " CUPS_LLFMT " bytes into buffer.",
4114 CUPS_LLCAST bytes));
4115 #ifdef DEBUG
4116 if (bytes > 0)
4117 http_debug_hex("http_read", buffer, (int)bytes);
4118 #endif /* DEBUG */
4119
4120 if (bytes < 0)
4121 {
4122 #ifdef WIN32
4123 if (WSAGetLastError() == WSAEINTR)
4124 bytes = 0;
4125 else
4126 http->error = WSAGetLastError();
4127 #else
4128 if (errno == EINTR || (errno == EAGAIN && !http->timeout_cb))
4129 bytes = 0;
4130 else
4131 http->error = errno;
4132 #endif /* WIN32 */
4133 }
4134 else if (bytes == 0)
4135 {
4136 http->error = EPIPE;
4137 return (0);
4138 }
4139
4140 return (bytes);
4141 }
4142
4143
4144 /*
4145 * 'http_read_buffered()' - Do a buffered read from a HTTP connection.
4146 *
4147 * This function reads data from the HTTP buffer or from the socket, as needed.
4148 */
4149
4150 static ssize_t /* O - Number of bytes read or -1 on error */
4151 http_read_buffered(http_t *http, /* I - HTTP connection */
4152 char *buffer, /* I - Buffer */
4153 size_t length) /* I - Maximum bytes to read */
4154 {
4155 ssize_t bytes; /* Bytes read */
4156
4157
4158 DEBUG_printf(("http_read_buffered(http=%p, buffer=%p, length=" CUPS_LLFMT
4159 ") used=%d",
4160 http, buffer, CUPS_LLCAST length, http->used));
4161
4162 if (http->used > 0)
4163 {
4164 if (length > (size_t)http->used)
4165 bytes = (ssize_t)http->used;
4166 else
4167 bytes = (ssize_t)length;
4168
4169 DEBUG_printf(("2http_read: Grabbing %d bytes from input buffer.",
4170 (int)bytes));
4171
4172 memcpy(buffer, http->buffer, (size_t)bytes);
4173 http->used -= (int)bytes;
4174
4175 if (http->used > 0)
4176 memmove(http->buffer, http->buffer + bytes, (size_t)http->used);
4177 }
4178 else
4179 bytes = http_read(http, buffer, length);
4180
4181 return (bytes);
4182 }
4183
4184
4185 /*
4186 * 'http_read_chunk()' - Read a chunk from a HTTP connection.
4187 *
4188 * This function reads and validates the chunk length, then does a buffered read
4189 * returning the number of bytes placed in the buffer.
4190 */
4191
4192 static ssize_t /* O - Number of bytes read or -1 on error */
4193 http_read_chunk(http_t *http, /* I - HTTP connection */
4194 char *buffer, /* I - Buffer */
4195 size_t length) /* I - Maximum bytes to read */
4196 {
4197 DEBUG_printf(("http_read_chunk(http=%p, buffer=%p, length=" CUPS_LLFMT ")",
4198 http, buffer, CUPS_LLCAST length));
4199
4200 if (http->data_remaining <= 0)
4201 {
4202 char len[32]; /* Length string */
4203
4204 if (!httpGets(len, sizeof(len), http))
4205 {
4206 DEBUG_puts("1http_read_chunk: Could not get chunk length.");
4207 return (0);
4208 }
4209
4210 if (!len[0])
4211 {
4212 DEBUG_puts("1http_read_chunk: Blank chunk length, trying again...");
4213 if (!httpGets(len, sizeof(len), http))
4214 {
4215 DEBUG_puts("1http_read_chunk: Could not get chunk length.");
4216 return (0);
4217 }
4218 }
4219
4220 http->data_remaining = strtoll(len, NULL, 16);
4221
4222 if (http->data_remaining < 0)
4223 {
4224 DEBUG_printf(("1http_read_chunk: Negative chunk length \"%s\" ("
4225 CUPS_LLFMT ")", len, CUPS_LLCAST http->data_remaining));
4226 return (0);
4227 }
4228
4229 DEBUG_printf(("2http_read_chunk: Got chunk length \"%s\" (" CUPS_LLFMT ")",
4230 len, CUPS_LLCAST http->data_remaining));
4231
4232 if (http->data_remaining == 0)
4233 {
4234 /*
4235 * 0-length chunk, grab trailing blank line...
4236 */
4237
4238 httpGets(len, sizeof(len), http);
4239 }
4240 }
4241
4242 DEBUG_printf(("2http_read_chunk: data_remaining=" CUPS_LLFMT,
4243 CUPS_LLCAST http->data_remaining));
4244
4245 if (http->data_remaining <= 0)
4246 return (0);
4247 else if (length > (size_t)http->data_remaining)
4248 length = (size_t)http->data_remaining;
4249
4250 return (http_read_buffered(http, buffer, length));
4251 }
4252
4253
4254 /*
4255 * 'http_send()' - Send a request with all fields and the trailing blank line.
4256 */
4257
4258 static int /* O - 0 on success, non-zero on error */
4259 http_send(http_t *http, /* I - HTTP connection */
4260 http_state_t request, /* I - Request code */
4261 const char *uri) /* I - URI */
4262 {
4263 int i; /* Looping var */
4264 char buf[1024]; /* Encoded URI buffer */
4265 const char *value; /* Field value */
4266 static const char * const codes[] = /* Request code strings */
4267 {
4268 NULL,
4269 "OPTIONS",
4270 "GET",
4271 NULL,
4272 "HEAD",
4273 "POST",
4274 NULL,
4275 NULL,
4276 "PUT",
4277 NULL,
4278 "DELETE",
4279 "TRACE",
4280 "CLOSE",
4281 NULL,
4282 NULL
4283 };
4284
4285
4286 DEBUG_printf(("4http_send(http=%p, request=HTTP_%s, uri=\"%s\")",
4287 http, codes[request], uri));
4288
4289 if (http == NULL || uri == NULL)
4290 return (-1);
4291
4292 /*
4293 * Set the User-Agent field if it isn't already...
4294 */
4295
4296 if (!http->fields[HTTP_FIELD_USER_AGENT][0])
4297 {
4298 if (http->default_user_agent)
4299 httpSetField(http, HTTP_FIELD_USER_AGENT, http->default_user_agent);
4300 else
4301 httpSetField(http, HTTP_FIELD_USER_AGENT, cupsUserAgent());
4302 }
4303
4304 /*
4305 * Set the Accept-Encoding field if it isn't already...
4306 */
4307
4308 if (!http->accept_encoding && http->default_accept_encoding)
4309 httpSetField(http, HTTP_FIELD_ACCEPT_ENCODING,
4310 http->default_accept_encoding);
4311
4312 /*
4313 * Encode the URI as needed...
4314 */
4315
4316 _httpEncodeURI(buf, uri, sizeof(buf));
4317
4318 /*
4319 * See if we had an error the last time around; if so, reconnect...
4320 */
4321
4322 if (http->fd < 0 || http->status == HTTP_STATUS_ERROR ||
4323 http->status >= HTTP_STATUS_BAD_REQUEST)
4324 {
4325 DEBUG_printf(("5http_send: Reconnecting, fd=%d, status=%d, tls_upgrade=%d",
4326 http->fd, http->status, http->tls_upgrade));
4327
4328 if (httpReconnect2(http, 30000, NULL))
4329 return (-1);
4330 }
4331
4332 /*
4333 * Flush any written data that is pending...
4334 */
4335
4336 if (http->wused)
4337 {
4338 if (httpFlushWrite(http) < 0)
4339 if (httpReconnect2(http, 30000, NULL))
4340 return (-1);
4341 }
4342
4343 /*
4344 * Send the request header...
4345 */
4346
4347 http->state = request;
4348 http->data_encoding = HTTP_ENCODING_FIELDS;
4349
4350 if (request == HTTP_STATE_POST || request == HTTP_STATE_PUT)
4351 http->state ++;
4352
4353 http->status = HTTP_STATUS_CONTINUE;
4354
4355 #ifdef HAVE_SSL
4356 if (http->encryption == HTTP_ENCRYPTION_REQUIRED && !http->tls)
4357 {
4358 httpSetField(http, HTTP_FIELD_CONNECTION, "Upgrade");
4359 httpSetField(http, HTTP_FIELD_UPGRADE, "TLS/1.2,TLS/1.1,TLS/1.0");
4360 }
4361 #endif /* HAVE_SSL */
4362
4363 if (httpPrintf(http, "%s %s HTTP/1.1\r\n", codes[request], buf) < 1)
4364 {
4365 http->status = HTTP_STATUS_ERROR;
4366 return (-1);
4367 }
4368
4369 for (i = 0; i < HTTP_FIELD_MAX; i ++)
4370 if ((value = httpGetField(http, i)) != NULL && *value)
4371 {
4372 DEBUG_printf(("5http_send: %s: %s", http_fields[i], value));
4373
4374 if (i == HTTP_FIELD_HOST)
4375 {
4376 if (httpPrintf(http, "Host: %s:%d\r\n", value,
4377 httpAddrPort(http->hostaddr)) < 1)
4378 {
4379 http->status = HTTP_STATUS_ERROR;
4380 return (-1);
4381 }
4382 }
4383 else if (httpPrintf(http, "%s: %s\r\n", http_fields[i], value) < 1)
4384 {
4385 http->status = HTTP_STATUS_ERROR;
4386 return (-1);
4387 }
4388 }
4389
4390 if (http->cookie)
4391 if (httpPrintf(http, "Cookie: $Version=0; %s\r\n", http->cookie) < 1)
4392 {
4393 http->status = HTTP_STATUS_ERROR;
4394 return (-1);
4395 }
4396
4397 DEBUG_printf(("5http_send: expect=%d, mode=%d, state=%d", http->expect,
4398 http->mode, http->state));
4399
4400 if (http->expect == HTTP_STATUS_CONTINUE && http->mode == _HTTP_MODE_CLIENT &&
4401 (http->state == HTTP_STATE_POST_RECV ||
4402 http->state == HTTP_STATE_PUT_RECV))
4403 if (httpPrintf(http, "Expect: 100-continue\r\n") < 1)
4404 {
4405 http->status = HTTP_STATUS_ERROR;
4406 return (-1);
4407 }
4408
4409 if (httpPrintf(http, "\r\n") < 1)
4410 {
4411 http->status = HTTP_STATUS_ERROR;
4412 return (-1);
4413 }
4414
4415 if (httpFlushWrite(http) < 0)
4416 return (-1);
4417
4418 http_set_length(http);
4419 httpClearFields(http);
4420
4421 /*
4422 * The Kerberos and AuthRef authentication strings can only be used once...
4423 */
4424
4425 if (http->field_authorization && http->authstring &&
4426 (!strncmp(http->authstring, "Negotiate", 9) ||
4427 !strncmp(http->authstring, "AuthRef", 7)))
4428 {
4429 http->_authstring[0] = '\0';
4430
4431 if (http->authstring != http->_authstring)
4432 free(http->authstring);
4433
4434 http->authstring = http->_authstring;
4435 }
4436
4437 return (0);
4438 }
4439
4440
4441 /*
4442 * 'http_set_length()' - Set the data_encoding and data_remaining values.
4443 */
4444
4445 static off_t /* O - Remainder or -1 on error */
4446 http_set_length(http_t *http) /* I - Connection */
4447 {
4448 off_t remaining; /* Remainder */
4449
4450
4451 DEBUG_printf(("http_set_length(http=%p) mode=%d state=%s", http, http->mode,
4452 httpStateString(http->state)));
4453
4454 if ((remaining = httpGetLength2(http)) >= 0)
4455 {
4456 if (http->mode == _HTTP_MODE_SERVER &&
4457 http->state != HTTP_STATE_GET_SEND &&
4458 http->state != HTTP_STATE_PUT &&
4459 http->state != HTTP_STATE_POST &&
4460 http->state != HTTP_STATE_POST_SEND)
4461 {
4462 DEBUG_puts("1http_set_length: Not setting data_encoding/remaining.");
4463 return (remaining);
4464 }
4465
4466 if (!_cups_strcasecmp(http->fields[HTTP_FIELD_TRANSFER_ENCODING],
4467 "chunked"))
4468 {
4469 DEBUG_puts("1http_set_length: Setting data_encoding to "
4470 "HTTP_ENCODING_CHUNKED.");
4471 http->data_encoding = HTTP_ENCODING_CHUNKED;
4472 }
4473 else
4474 {
4475 DEBUG_puts("1http_set_length: Setting data_encoding to "
4476 "HTTP_ENCODING_LENGTH.");
4477 http->data_encoding = HTTP_ENCODING_LENGTH;
4478 }
4479
4480 DEBUG_printf(("1http_set_length: Setting data_remaining to " CUPS_LLFMT ".",
4481 CUPS_LLCAST remaining));
4482 http->data_remaining = remaining;
4483
4484 if (remaining <= INT_MAX)
4485 http->_data_remaining = (int)remaining;
4486 else
4487 http->_data_remaining = INT_MAX;
4488 }
4489
4490 return (remaining);
4491 }
4492
4493 /*
4494 * 'http_set_timeout()' - Set the socket timeout values.
4495 */
4496
4497 static void
4498 http_set_timeout(int fd, /* I - File descriptor */
4499 double timeout) /* I - Timeout in seconds */
4500 {
4501 #ifdef WIN32
4502 DWORD tv = (DWORD)(timeout * 1000);
4503 /* Timeout in milliseconds */
4504
4505 setsockopt(fd, SOL_SOCKET, SO_RCVTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4506 setsockopt(fd, SOL_SOCKET, SO_SNDTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4507
4508 #else
4509 struct timeval tv; /* Timeout in secs and usecs */
4510
4511 tv.tv_sec = (int)timeout;
4512 tv.tv_usec = (int)(1000000 * fmod(timeout, 1.0));
4513
4514 setsockopt(fd, SOL_SOCKET, SO_RCVTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4515 setsockopt(fd, SOL_SOCKET, SO_SNDTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4516 #endif /* WIN32 */
4517 }
4518
4519
4520 /*
4521 * 'http_set_wait()' - Set the default wait value for reads.
4522 */
4523
4524 static void
4525 http_set_wait(http_t *http) /* I - HTTP connection */
4526 {
4527 if (http->blocking)
4528 {
4529 http->wait_value = (int)(http->timeout_value * 1000);
4530
4531 if (http->wait_value <= 0)
4532 http->wait_value = 60000;
4533 }
4534 else
4535 http->wait_value = 10000;
4536 }
4537
4538
4539 #ifdef HAVE_SSL
4540 /*
4541 * 'http_tls_upgrade()' - Force upgrade to TLS encryption.
4542 */
4543
4544 static int /* O - Status of connection */
4545 http_tls_upgrade(http_t *http) /* I - HTTP connection */
4546 {
4547 int ret; /* Return value */
4548 http_t myhttp; /* Local copy of HTTP data */
4549
4550
4551 DEBUG_printf(("7http_tls_upgrade(%p)", http));
4552
4553 /*
4554 * Flush the connection to make sure any previous "Upgrade" message
4555 * has been read.
4556 */
4557
4558 httpFlush(http);
4559
4560 /*
4561 * Copy the HTTP data to a local variable so we can do the OPTIONS
4562 * request without interfering with the existing request data...
4563 */
4564
4565 memcpy(&myhttp, http, sizeof(myhttp));
4566
4567 /*
4568 * Send an OPTIONS request to the server, requiring SSL or TLS
4569 * encryption on the link...
4570 */
4571
4572 http->tls_upgrade = 1;
4573 http->field_authorization = NULL; /* Don't free the auth string */
4574
4575 httpClearFields(http);
4576 httpSetField(http, HTTP_FIELD_CONNECTION, "upgrade");
4577 httpSetField(http, HTTP_FIELD_UPGRADE, "TLS/1.2,TLS/1.1,TLS/1.0");
4578
4579 if ((ret = httpOptions(http, "*")) == 0)
4580 {
4581 /*
4582 * Wait for the secure connection...
4583 */
4584
4585 while (httpUpdate(http) == HTTP_STATUS_CONTINUE);
4586 }
4587
4588 /*
4589 * Restore the HTTP request data...
4590 */
4591
4592 memcpy(http->fields, myhttp.fields, sizeof(http->fields));
4593 http->data_encoding = myhttp.data_encoding;
4594 http->data_remaining = myhttp.data_remaining;
4595 http->_data_remaining = myhttp._data_remaining;
4596 http->expect = myhttp.expect;
4597 http->field_authorization = myhttp.field_authorization;
4598 http->digest_tries = myhttp.digest_tries;
4599 http->tls_upgrade = 0;
4600
4601 /*
4602 * See if we actually went secure...
4603 */
4604
4605 if (!http->tls)
4606 {
4607 /*
4608 * Server does not support HTTP upgrade...
4609 */
4610
4611 DEBUG_puts("8http_tls_upgrade: Server does not support HTTP upgrade!");
4612
4613 _cupsSetError(IPP_STATUS_ERROR_CUPS_PKI, _("Encryption is not supported."), 1);
4614 httpAddrClose(NULL, http->fd);
4615
4616 http->fd = -1;
4617
4618 return (-1);
4619 }
4620 else
4621 return (ret);
4622 }
4623 #endif /* HAVE_SSL */
4624
4625
4626 /*
4627 * 'http_write()' - Write a buffer to a HTTP connection.
4628 */
4629
4630 static ssize_t /* O - Number of bytes written */
4631 http_write(http_t *http, /* I - HTTP connection */
4632 const char *buffer, /* I - Buffer for data */
4633 size_t length) /* I - Number of bytes to write */
4634 {
4635 ssize_t tbytes, /* Total bytes sent */
4636 bytes; /* Bytes sent */
4637
4638
4639 DEBUG_printf(("2http_write(http=%p, buffer=%p, length=" CUPS_LLFMT ")", http,
4640 buffer, CUPS_LLCAST length));
4641 http->error = 0;
4642 tbytes = 0;
4643
4644 while (length > 0)
4645 {
4646 DEBUG_printf(("3http_write: About to write %d bytes.", (int)length));
4647
4648 if (http->timeout_cb)
4649 {
4650 #ifdef HAVE_POLL
4651 struct pollfd pfd; /* Polled file descriptor */
4652 #else
4653 fd_set output_set; /* Output ready for write? */
4654 struct timeval timeout; /* Timeout value */
4655 #endif /* HAVE_POLL */
4656 int nfds; /* Result from select()/poll() */
4657
4658 do
4659 {
4660 #ifdef HAVE_POLL
4661 pfd.fd = http->fd;
4662 pfd.events = POLLOUT;
4663
4664 while ((nfds = poll(&pfd, 1, http->wait_value)) < 0 &&
4665 (errno == EINTR || errno == EAGAIN))
4666 /* do nothing */;
4667
4668 #else
4669 do
4670 {
4671 FD_ZERO(&output_set);
4672 FD_SET(http->fd, &output_set);
4673
4674 timeout.tv_sec = http->wait_value / 1000;
4675 timeout.tv_usec = 1000 * (http->wait_value % 1000);
4676
4677 nfds = select(http->fd + 1, NULL, &output_set, NULL, &timeout);
4678 }
4679 # ifdef WIN32
4680 while (nfds < 0 && (WSAGetLastError() == WSAEINTR ||
4681 WSAGetLastError() == WSAEWOULDBLOCK));
4682 # else
4683 while (nfds < 0 && (errno == EINTR || errno == EAGAIN));
4684 # endif /* WIN32 */
4685 #endif /* HAVE_POLL */
4686
4687 if (nfds < 0)
4688 {
4689 http->error = errno;
4690 return (-1);
4691 }
4692 else if (nfds == 0 && !(*http->timeout_cb)(http, http->timeout_data))
4693 {
4694 #ifdef WIN32
4695 http->error = WSAEWOULDBLOCK;
4696 #else
4697 http->error = EWOULDBLOCK;
4698 #endif /* WIN32 */
4699 return (-1);
4700 }
4701 }
4702 while (nfds <= 0);
4703 }
4704
4705 #ifdef HAVE_SSL
4706 if (http->tls)
4707 bytes = _httpTLSWrite(http, buffer, (int)length);
4708 else
4709 #endif /* HAVE_SSL */
4710 bytes = send(http->fd, buffer, length, 0);
4711
4712 DEBUG_printf(("3http_write: Write of " CUPS_LLFMT " bytes returned "
4713 CUPS_LLFMT ".", CUPS_LLCAST length, CUPS_LLCAST bytes));
4714
4715 if (bytes < 0)
4716 {
4717 #ifdef WIN32
4718 if (WSAGetLastError() == WSAEINTR)
4719 continue;
4720 else if (WSAGetLastError() == WSAEWOULDBLOCK)
4721 {
4722 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
4723 continue;
4724
4725 http->error = WSAGetLastError();
4726 }
4727 else if (WSAGetLastError() != http->error &&
4728 WSAGetLastError() != WSAECONNRESET)
4729 {
4730 http->error = WSAGetLastError();
4731 continue;
4732 }
4733
4734 #else
4735 if (errno == EINTR)
4736 continue;
4737 else if (errno == EWOULDBLOCK || errno == EAGAIN)
4738 {
4739 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
4740 continue;
4741 else if (!http->timeout_cb && errno == EAGAIN)
4742 continue;
4743
4744 http->error = errno;
4745 }
4746 else if (errno != http->error && errno != ECONNRESET)
4747 {
4748 http->error = errno;
4749 continue;
4750 }
4751 #endif /* WIN32 */
4752
4753 DEBUG_printf(("3http_write: error writing data (%s).",
4754 strerror(http->error)));
4755
4756 return (-1);
4757 }
4758
4759 buffer += bytes;
4760 tbytes += bytes;
4761 length -= (size_t)bytes;
4762 }
4763
4764 #ifdef DEBUG
4765 http_debug_hex("http_write", buffer - tbytes, (int)tbytes);
4766 #endif /* DEBUG */
4767
4768 DEBUG_printf(("3http_write: Returning " CUPS_LLFMT ".", CUPS_LLCAST tbytes));
4769
4770 return (tbytes);
4771 }
4772
4773
4774 /*
4775 * 'http_write_chunk()' - Write a chunked buffer.
4776 */
4777
4778 static ssize_t /* O - Number bytes written */
4779 http_write_chunk(http_t *http, /* I - HTTP connection */
4780 const char *buffer, /* I - Buffer to write */
4781 size_t length) /* I - Length of buffer */
4782 {
4783 char header[16]; /* Chunk header */
4784 ssize_t bytes; /* Bytes written */
4785
4786
4787 DEBUG_printf(("7http_write_chunk(http=%p, buffer=%p, length=" CUPS_LLFMT ")",
4788 http, buffer, CUPS_LLCAST length));
4789
4790 /*
4791 * Write the chunk header, data, and trailer.
4792 */
4793
4794 snprintf(header, sizeof(header), "%x\r\n", (unsigned)length);
4795 if (http_write(http, header, strlen(header)) < 0)
4796 {
4797 DEBUG_puts("8http_write_chunk: http_write of length failed.");
4798 return (-1);
4799 }
4800
4801 if ((bytes = http_write(http, buffer, length)) < 0)
4802 {
4803 DEBUG_puts("8http_write_chunk: http_write of buffer failed.");
4804 return (-1);
4805 }
4806
4807 if (http_write(http, "\r\n", 2) < 0)
4808 {
4809 DEBUG_puts("8http_write_chunk: http_write of CR LF failed.");
4810 return (-1);
4811 }
4812
4813 return (bytes);
4814 }
4815
4816
4817 /*
4818 * End of "$Id$".
4819 */
Unnamed repository; edit this file 'description' to name the repository.