]> 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
The web interface now protects against frame "click-jacking" attacks (STR #4492)
[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/OS 10.10@
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/OS 10.10@
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/OS 10.10@
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/OS 10.10@
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/OS 10.10@
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/OS 10.10@
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/OS 10.10@
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/OS 10.10@
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/OS 10.10@
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 -= (int)buflen;
1797 http->data_remaining -= (off_t)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 #ifdef HAVE_SSL
2561 _httpFreeCredentials(http->tls_credentials);
2562
2563 http->tls_credentials = _httpCreateCredentials(credentials);
2564 #endif /* HAVE_SSL */
2565
2566 return (http->tls_credentials ? 0 : -1);
2567 }
2568
2569
2570 /*
2571 * 'httpSetCookie()' - Set the cookie value(s).
2572 *
2573 * @since CUPS 1.1.19/OS X 10.3@
2574 */
2575
2576 void
2577 httpSetCookie(http_t *http, /* I - Connection */
2578 const char *cookie) /* I - Cookie string */
2579 {
2580 if (!http)
2581 return;
2582
2583 if (http->cookie)
2584 free(http->cookie);
2585
2586 if (cookie)
2587 http->cookie = strdup(cookie);
2588 else
2589 http->cookie = NULL;
2590 }
2591
2592
2593 /*
2594 * 'httpSetDefaultField()' - Set the default value of an HTTP header.
2595 *
2596 * Currently only @code HTTP_FIELD_ACCEPT_ENCODING@, @code HTTP_FIELD_SERVER@,
2597 * and @code HTTP_FIELD_USER_AGENT@ can be set.
2598 *
2599 * @since CUPS 1.7/OS X 10.9@
2600 */
2601
2602 void
2603 httpSetDefaultField(http_t *http, /* I - HTTP connection */
2604 http_field_t field, /* I - Field index */
2605 const char *value)/* I - Value */
2606 {
2607 DEBUG_printf(("httpSetDefaultField(http=%p, field=%d(%s), value=\"%s\")",
2608 http, field, http_fields[field], value));
2609
2610 if (!http)
2611 return;
2612
2613 switch (field)
2614 {
2615 case HTTP_FIELD_ACCEPT_ENCODING :
2616 if (http->default_accept_encoding)
2617 _cupsStrFree(http->default_accept_encoding);
2618
2619 http->default_accept_encoding = value ? _cupsStrAlloc(value) : NULL;
2620 break;
2621
2622 case HTTP_FIELD_SERVER :
2623 if (http->default_server)
2624 _cupsStrFree(http->default_server);
2625
2626 http->default_server = value ? _cupsStrAlloc(value) : NULL;
2627 break;
2628
2629 case HTTP_FIELD_USER_AGENT :
2630 if (http->default_user_agent)
2631 _cupsStrFree(http->default_user_agent);
2632
2633 http->default_user_agent = value ? _cupsStrAlloc(value) : NULL;
2634 break;
2635
2636 default :
2637 DEBUG_puts("1httpSetDefaultField: Ignored.");
2638 break;
2639 }
2640 }
2641
2642
2643 /*
2644 * 'httpSetExpect()' - Set the Expect: header in a request.
2645 *
2646 * Currently only @code HTTP_STATUS_CONTINUE@ is supported for the "expect"
2647 * argument.
2648 *
2649 * @since CUPS 1.2/OS X 10.5@
2650 */
2651
2652 void
2653 httpSetExpect(http_t *http, /* I - HTTP connection */
2654 http_status_t expect) /* I - HTTP status to expect
2655 (@code HTTP_STATUS_CONTINUE@) */
2656 {
2657 DEBUG_printf(("httpSetExpect(http=%p, expect=%d)", http, expect));
2658
2659 if (http)
2660 http->expect = expect;
2661 }
2662
2663
2664 /*
2665 * 'httpSetField()' - Set the value of an HTTP header.
2666 */
2667
2668 void
2669 httpSetField(http_t *http, /* I - HTTP connection */
2670 http_field_t field, /* I - Field index */
2671 const char *value) /* I - Value */
2672 {
2673 DEBUG_printf(("httpSetField(http=%p, field=%d(%s), value=\"%s\")", http,
2674 field, http_fields[field], value));
2675
2676 if (http == NULL ||
2677 field < HTTP_FIELD_ACCEPT_LANGUAGE ||
2678 field >= HTTP_FIELD_MAX ||
2679 value == NULL)
2680 return;
2681
2682 switch (field)
2683 {
2684 case HTTP_FIELD_ACCEPT_ENCODING :
2685 if (http->accept_encoding)
2686 _cupsStrFree(http->accept_encoding);
2687
2688 http->accept_encoding = _cupsStrAlloc(value);
2689 break;
2690
2691 case HTTP_FIELD_ALLOW :
2692 if (http->allow)
2693 _cupsStrFree(http->allow);
2694
2695 http->allow = _cupsStrAlloc(value);
2696 break;
2697
2698 case HTTP_FIELD_SERVER :
2699 if (http->server)
2700 _cupsStrFree(http->server);
2701
2702 http->server = _cupsStrAlloc(value);
2703 break;
2704
2705 default :
2706 strlcpy(http->fields[field], value, HTTP_MAX_VALUE);
2707 break;
2708 }
2709
2710 if (field == HTTP_FIELD_AUTHORIZATION)
2711 {
2712 /*
2713 * Special case for Authorization: as its contents can be
2714 * longer than HTTP_MAX_VALUE
2715 */
2716
2717 if (http->field_authorization)
2718 free(http->field_authorization);
2719
2720 http->field_authorization = strdup(value);
2721 }
2722 else if (field == HTTP_FIELD_HOST)
2723 {
2724 /*
2725 * Special-case for Host: as we don't want a trailing "." on the hostname and
2726 * need to bracket IPv6 numeric addresses.
2727 */
2728
2729 char *ptr = strchr(value, ':');
2730
2731 if (value[0] != '[' && ptr && strchr(ptr + 1, ':'))
2732 {
2733 /*
2734 * Bracket IPv6 numeric addresses...
2735 *
2736 * This is slightly inefficient (basically copying twice), but is an edge
2737 * case and not worth optimizing...
2738 */
2739
2740 snprintf(http->fields[HTTP_FIELD_HOST],
2741 sizeof(http->fields[HTTP_FIELD_HOST]), "[%s]", value);
2742 }
2743 else
2744 {
2745 /*
2746 * Check for a trailing dot on the hostname...
2747 */
2748
2749 ptr = http->fields[HTTP_FIELD_HOST];
2750
2751 if (*ptr)
2752 {
2753 ptr += strlen(ptr) - 1;
2754
2755 if (*ptr == '.')
2756 *ptr = '\0';
2757 }
2758 }
2759 }
2760 #ifdef HAVE_LIBZ
2761 else if (field == HTTP_FIELD_CONTENT_ENCODING &&
2762 http->data_encoding != HTTP_ENCODING_FIELDS)
2763 {
2764 DEBUG_puts("1httpSetField: Calling http_content_coding_start.");
2765 http_content_coding_start(http, value);
2766 }
2767 #endif /* HAVE_LIBZ */
2768 }
2769
2770
2771 /*
2772 * 'httpSetKeepAlive()' - Set the current Keep-Alive state of a connection.
2773 *
2774 * @since CUPS 2.0/OS 10.10@
2775 */
2776
2777 void
2778 httpSetKeepAlive(
2779 http_t *http, /* I - HTTP connection */
2780 http_keepalive_t keep_alive) /* I - New Keep-Alive value */
2781 {
2782 if (http)
2783 http->keep_alive = keep_alive;
2784 }
2785
2786
2787 /*
2788 * 'httpSetLength()' - Set the content-length and content-encoding.
2789 *
2790 * @since CUPS 1.2/OS X 10.5@
2791 */
2792
2793 void
2794 httpSetLength(http_t *http, /* I - HTTP connection */
2795 size_t length) /* I - Length (0 for chunked) */
2796 {
2797 DEBUG_printf(("httpSetLength(http=%p, length=" CUPS_LLFMT ")", http,
2798 CUPS_LLCAST length));
2799
2800 if (!http)
2801 return;
2802
2803 if (!length)
2804 {
2805 strlcpy(http->fields[HTTP_FIELD_TRANSFER_ENCODING], "chunked",
2806 HTTP_MAX_VALUE);
2807 http->fields[HTTP_FIELD_CONTENT_LENGTH][0] = '\0';
2808 }
2809 else
2810 {
2811 http->fields[HTTP_FIELD_TRANSFER_ENCODING][0] = '\0';
2812 snprintf(http->fields[HTTP_FIELD_CONTENT_LENGTH], HTTP_MAX_VALUE,
2813 CUPS_LLFMT, CUPS_LLCAST length);
2814 }
2815 }
2816
2817
2818 /*
2819 * 'httpSetTimeout()' - Set read/write timeouts and an optional callback.
2820 *
2821 * The optional timeout callback receives both the HTTP connection and a user
2822 * data pointer and must return 1 to continue or 0 to error (time) out.
2823 *
2824 * @since CUPS 1.5/OS X 10.7@
2825 */
2826
2827 void
2828 httpSetTimeout(
2829 http_t *http, /* I - HTTP connection */
2830 double timeout, /* I - Number of seconds for timeout,
2831 must be greater than 0 */
2832 http_timeout_cb_t cb, /* I - Callback function or NULL */
2833 void *user_data) /* I - User data pointer */
2834 {
2835 if (!http || timeout <= 0.0)
2836 return;
2837
2838 http->timeout_cb = cb;
2839 http->timeout_data = user_data;
2840 http->timeout_value = timeout;
2841
2842 if (http->fd >= 0)
2843 http_set_timeout(http->fd, timeout);
2844
2845 http_set_wait(http);
2846 }
2847
2848
2849 /*
2850 * 'httpShutdown()' - Shutdown one side of an HTTP connection.
2851 *
2852 * @since CUPS 2.0/OS 10.10@
2853 */
2854
2855 void
2856 httpShutdown(http_t *http) /* I - HTTP connection */
2857 {
2858 if (!http || http->fd < 0)
2859 return;
2860
2861 #ifdef HAVE_SSL
2862 if (http->tls)
2863 _httpTLSStop(http);
2864 #endif /* HAVE_SSL */
2865
2866 #ifdef WIN32
2867 shutdown(http->fd, SD_RECEIVE); /* Microsoft-ism... */
2868 #else
2869 shutdown(http->fd, SHUT_RD);
2870 #endif /* WIN32 */
2871 }
2872
2873
2874 /*
2875 * 'httpTrace()' - Send an TRACE request to the server.
2876 */
2877
2878 int /* O - Status of call (0 = success) */
2879 httpTrace(http_t *http, /* I - HTTP connection */
2880 const char *uri) /* I - URI for trace */
2881 {
2882 return (http_send(http, HTTP_STATE_TRACE, uri));
2883 }
2884
2885
2886 /*
2887 * '_httpUpdate()' - Update the current HTTP status for incoming data.
2888 *
2889 * Note: Unlike httpUpdate(), this function does not flush pending write data
2890 * and only retrieves a single status line from the HTTP connection.
2891 */
2892
2893 int /* O - 1 to continue, 0 to stop */
2894 _httpUpdate(http_t *http, /* I - HTTP connection */
2895 http_status_t *status) /* O - Current HTTP status */
2896 {
2897 char line[32768], /* Line from connection... */
2898 *value; /* Pointer to value on line */
2899 http_field_t field; /* Field index */
2900 int major, minor; /* HTTP version numbers */
2901
2902
2903 DEBUG_printf(("_httpUpdate(http=%p, status=%p), state=%s", http, status,
2904 httpStateString(http->state)));
2905
2906 /*
2907 * Grab a single line from the connection...
2908 */
2909
2910 if (!httpGets(line, sizeof(line), http))
2911 {
2912 *status = HTTP_STATUS_ERROR;
2913 return (0);
2914 }
2915
2916 DEBUG_printf(("2_httpUpdate: Got \"%s\"", line));
2917
2918 if (line[0] == '\0')
2919 {
2920 /*
2921 * Blank line means the start of the data section (if any). Return
2922 * the result code, too...
2923 *
2924 * If we get status 100 (HTTP_STATUS_CONTINUE), then we *don't* change
2925 * states. Instead, we just return HTTP_STATUS_CONTINUE to the caller and
2926 * keep on tryin'...
2927 */
2928
2929 if (http->status == HTTP_STATUS_CONTINUE)
2930 {
2931 *status = http->status;
2932 return (0);
2933 }
2934
2935 if (http->status < HTTP_STATUS_BAD_REQUEST)
2936 http->digest_tries = 0;
2937
2938 #ifdef HAVE_SSL
2939 if (http->status == HTTP_STATUS_SWITCHING_PROTOCOLS && !http->tls)
2940 {
2941 if (_httpTLSStart(http) != 0)
2942 {
2943 httpAddrClose(NULL, http->fd);
2944
2945 *status = http->status = HTTP_STATUS_ERROR;
2946 return (0);
2947 }
2948
2949 *status = HTTP_STATUS_CONTINUE;
2950 return (0);
2951 }
2952 #endif /* HAVE_SSL */
2953
2954 if (http_set_length(http) < 0)
2955 {
2956 DEBUG_puts("1_httpUpdate: Bad Content-Length.");
2957 http->error = EINVAL;
2958 http->status = *status = HTTP_STATUS_ERROR;
2959 return (0);
2960 }
2961
2962 switch (http->state)
2963 {
2964 case HTTP_STATE_GET :
2965 case HTTP_STATE_POST :
2966 case HTTP_STATE_POST_RECV :
2967 case HTTP_STATE_PUT :
2968 http->state ++;
2969
2970 DEBUG_printf(("1_httpUpdate: Set state to %s.",
2971 httpStateString(http->state)));
2972
2973 case HTTP_STATE_POST_SEND :
2974 case HTTP_STATE_HEAD :
2975 break;
2976
2977 default :
2978 http->state = HTTP_STATE_WAITING;
2979
2980 DEBUG_puts("1_httpUpdate: Reset state to HTTP_STATE_WAITING.");
2981 break;
2982 }
2983
2984 #ifdef HAVE_LIBZ
2985 DEBUG_puts("1_httpUpdate: Calling http_content_coding_start.");
2986 http_content_coding_start(http,
2987 httpGetField(http, HTTP_FIELD_CONTENT_ENCODING));
2988 #endif /* HAVE_LIBZ */
2989
2990 *status = http->status;
2991 return (0);
2992 }
2993 else if (!strncmp(line, "HTTP/", 5))
2994 {
2995 /*
2996 * Got the beginning of a response...
2997 */
2998
2999 int intstatus; /* Status value as an integer */
3000
3001 if (sscanf(line, "HTTP/%d.%d%d", &major, &minor, &intstatus) != 3)
3002 {
3003 *status = http->status = HTTP_STATUS_ERROR;
3004 return (0);
3005 }
3006
3007 httpClearFields(http);
3008
3009 http->version = (http_version_t)(major * 100 + minor);
3010 *status = http->status = (http_status_t)intstatus;
3011 }
3012 else if ((value = strchr(line, ':')) != NULL)
3013 {
3014 /*
3015 * Got a value...
3016 */
3017
3018 *value++ = '\0';
3019 while (_cups_isspace(*value))
3020 value ++;
3021
3022 DEBUG_printf(("1_httpUpdate: Header %s: %s", line, value));
3023
3024 /*
3025 * Be tolerants of servers that send unknown attribute fields...
3026 */
3027
3028 if (!_cups_strcasecmp(line, "expect"))
3029 {
3030 /*
3031 * "Expect: 100-continue" or similar...
3032 */
3033
3034 http->expect = (http_status_t)atoi(value);
3035 }
3036 else if (!_cups_strcasecmp(line, "cookie"))
3037 {
3038 /*
3039 * "Cookie: name=value[; name=value ...]" - replaces previous cookies...
3040 */
3041
3042 httpSetCookie(http, value);
3043 }
3044 else if ((field = httpFieldValue(line)) != HTTP_FIELD_UNKNOWN)
3045 httpSetField(http, field, value);
3046 #ifdef DEBUG
3047 else
3048 DEBUG_printf(("1_httpUpdate: unknown field %s seen!", line));
3049 #endif /* DEBUG */
3050 }
3051 else
3052 {
3053 DEBUG_printf(("1_httpUpdate: Bad response line \"%s\"!", line));
3054 http->error = EINVAL;
3055 http->status = *status = HTTP_STATUS_ERROR;
3056 return (0);
3057 }
3058
3059 return (1);
3060 }
3061
3062
3063 /*
3064 * 'httpUpdate()' - Update the current HTTP state for incoming data.
3065 */
3066
3067 http_status_t /* O - HTTP status */
3068 httpUpdate(http_t *http) /* I - HTTP connection */
3069 {
3070 http_status_t status; /* Request status */
3071
3072
3073 DEBUG_printf(("httpUpdate(http=%p), state=%s", http,
3074 httpStateString(http->state)));
3075
3076 /*
3077 * Flush pending data, if any...
3078 */
3079
3080 if (http->wused)
3081 {
3082 DEBUG_puts("2httpUpdate: flushing buffer...");
3083
3084 if (httpFlushWrite(http) < 0)
3085 return (HTTP_STATUS_ERROR);
3086 }
3087
3088 /*
3089 * If we haven't issued any commands, then there is nothing to "update"...
3090 */
3091
3092 if (http->state == HTTP_STATE_WAITING)
3093 return (HTTP_STATUS_CONTINUE);
3094
3095 /*
3096 * Grab all of the lines we can from the connection...
3097 */
3098
3099 while (_httpUpdate(http, &status));
3100
3101 /*
3102 * See if there was an error...
3103 */
3104
3105 if (http->error == EPIPE && http->status > HTTP_STATUS_CONTINUE)
3106 {
3107 DEBUG_printf(("1httpUpdate: Returning status %d...", http->status));
3108 return (http->status);
3109 }
3110
3111 if (http->error)
3112 {
3113 DEBUG_printf(("1httpUpdate: socket error %d - %s", http->error,
3114 strerror(http->error)));
3115 http->status = HTTP_STATUS_ERROR;
3116 return (HTTP_STATUS_ERROR);
3117 }
3118
3119 /*
3120 * Return the current status...
3121 */
3122
3123 return (status);
3124 }
3125
3126
3127 /*
3128 * '_httpWait()' - Wait for data available on a connection (no flush).
3129 */
3130
3131 int /* O - 1 if data is available, 0 otherwise */
3132 _httpWait(http_t *http, /* I - HTTP connection */
3133 int msec, /* I - Milliseconds to wait */
3134 int usessl) /* I - Use SSL context? */
3135 {
3136 #ifdef HAVE_POLL
3137 struct pollfd pfd; /* Polled file descriptor */
3138 #else
3139 fd_set input_set; /* select() input set */
3140 struct timeval timeout; /* Timeout */
3141 #endif /* HAVE_POLL */
3142 int nfds; /* Result from select()/poll() */
3143
3144
3145 DEBUG_printf(("4_httpWait(http=%p, msec=%d, usessl=%d)", http, msec, usessl));
3146
3147 if (http->fd < 0)
3148 {
3149 DEBUG_printf(("5_httpWait: Returning 0 since fd=%d", http->fd));
3150 return (0);
3151 }
3152
3153 /*
3154 * Check the SSL/TLS buffers for data first...
3155 */
3156
3157 #ifdef HAVE_SSL
3158 if (http->tls && _httpTLSPending(http))
3159 {
3160 DEBUG_puts("5_httpWait: Return 1 since there is pending TLS data.");
3161 return (1);
3162 }
3163 #endif /* HAVE_SSL */
3164
3165 /*
3166 * Then try doing a select() or poll() to poll the socket...
3167 */
3168
3169 #ifdef HAVE_POLL
3170 pfd.fd = http->fd;
3171 pfd.events = POLLIN;
3172
3173 do
3174 {
3175 nfds = poll(&pfd, 1, msec);
3176 }
3177 while (nfds < 0 && (errno == EINTR || errno == EAGAIN));
3178
3179 #else
3180 do
3181 {
3182 FD_ZERO(&input_set);
3183 FD_SET(http->fd, &input_set);
3184
3185 DEBUG_printf(("6_httpWait: msec=%d, http->fd=%d", msec, http->fd));
3186
3187 if (msec >= 0)
3188 {
3189 timeout.tv_sec = msec / 1000;
3190 timeout.tv_usec = (msec % 1000) * 1000;
3191
3192 nfds = select(http->fd + 1, &input_set, NULL, NULL, &timeout);
3193 }
3194 else
3195 nfds = select(http->fd + 1, &input_set, NULL, NULL, NULL);
3196
3197 DEBUG_printf(("6_httpWait: select() returned %d...", nfds));
3198 }
3199 # ifdef WIN32
3200 while (nfds < 0 && (WSAGetLastError() == WSAEINTR ||
3201 WSAGetLastError() == WSAEWOULDBLOCK));
3202 # else
3203 while (nfds < 0 && (errno == EINTR || errno == EAGAIN));
3204 # endif /* WIN32 */
3205 #endif /* HAVE_POLL */
3206
3207 DEBUG_printf(("5_httpWait: returning with nfds=%d, errno=%d...", nfds,
3208 errno));
3209
3210 return (nfds > 0);
3211 }
3212
3213
3214 /*
3215 * 'httpWait()' - Wait for data available on a connection.
3216 *
3217 * @since CUPS 1.1.19/OS X 10.3@
3218 */
3219
3220 int /* O - 1 if data is available, 0 otherwise */
3221 httpWait(http_t *http, /* I - HTTP connection */
3222 int msec) /* I - Milliseconds to wait */
3223 {
3224 /*
3225 * First see if there is data in the buffer...
3226 */
3227
3228 DEBUG_printf(("2httpWait(http=%p, msec=%d)", http, msec));
3229
3230 if (http == NULL)
3231 return (0);
3232
3233 if (http->used)
3234 {
3235 DEBUG_puts("3httpWait: Returning 1 since there is buffered data ready.");
3236 return (1);
3237 }
3238
3239 #ifdef HAVE_LIBZ
3240 if (http->coding >= _HTTP_CODING_GUNZIP && http->stream.avail_in > 0)
3241 {
3242 DEBUG_puts("3httpWait: Returning 1 since there is buffered data ready.");
3243 return (1);
3244 }
3245 #endif /* HAVE_LIBZ */
3246
3247 /*
3248 * Flush pending data, if any...
3249 */
3250
3251 if (http->wused)
3252 {
3253 DEBUG_puts("3httpWait: Flushing write buffer.");
3254
3255 if (httpFlushWrite(http) < 0)
3256 return (0);
3257 }
3258
3259 /*
3260 * If not, check the SSL/TLS buffers and do a select() on the connection...
3261 */
3262
3263 return (_httpWait(http, msec, 1));
3264 }
3265
3266
3267 /*
3268 * 'httpWrite()' - Write data to a HTTP connection.
3269 *
3270 * This function is deprecated. Use the httpWrite2() function which can
3271 * write more than 2GB of data.
3272 *
3273 * @deprecated@
3274 */
3275
3276 int /* O - Number of bytes written */
3277 httpWrite(http_t *http, /* I - HTTP connection */
3278 const char *buffer, /* I - Buffer for data */
3279 int length) /* I - Number of bytes to write */
3280 {
3281 return ((int)httpWrite2(http, buffer, (size_t)length));
3282 }
3283
3284
3285 /*
3286 * 'httpWrite2()' - Write data to a HTTP connection.
3287 *
3288 * @since CUPS 1.2/OS X 10.5@
3289 */
3290
3291 ssize_t /* O - Number of bytes written */
3292 httpWrite2(http_t *http, /* I - HTTP connection */
3293 const char *buffer, /* I - Buffer for data */
3294 size_t length) /* I - Number of bytes to write */
3295 {
3296 ssize_t bytes; /* Bytes written */
3297
3298
3299 DEBUG_printf(("httpWrite2(http=%p, buffer=%p, length=" CUPS_LLFMT ")", http,
3300 buffer, CUPS_LLCAST length));
3301
3302 /*
3303 * Range check input...
3304 */
3305
3306 if (!http || !buffer)
3307 {
3308 DEBUG_puts("1httpWrite2: Returning -1 due to bad input.");
3309 return (-1);
3310 }
3311
3312 /*
3313 * Mark activity on the connection...
3314 */
3315
3316 http->activity = time(NULL);
3317
3318 /*
3319 * Buffer small writes for better performance...
3320 */
3321
3322 #ifdef HAVE_LIBZ
3323 if (http->coding == _HTTP_CODING_GZIP || http->coding == _HTTP_CODING_DEFLATE)
3324 {
3325 DEBUG_printf(("1httpWrite2: http->coding=%d", http->coding));
3326
3327 if (length == 0)
3328 {
3329 http_content_coding_finish(http);
3330 bytes = 0;
3331 }
3332 else
3333 {
3334 size_t slen; /* Bytes to write */
3335 ssize_t sret; /* Bytes written */
3336
3337 http->stream.next_in = (Bytef *)buffer;
3338 http->stream.avail_in = (uInt)length;
3339
3340 while (deflate(&(http->stream), Z_NO_FLUSH) == Z_OK)
3341 {
3342 DEBUG_printf(("1httpWrite2: avail_out=%d", http->stream.avail_out));
3343
3344 if (http->stream.avail_out > 0)
3345 continue;
3346
3347 slen = _HTTP_MAX_SBUFFER - http->stream.avail_out;
3348
3349 DEBUG_printf(("1httpWrite2: Writing intermediate chunk, len=%d", (int)slen));
3350
3351 if (slen > 0 && http->data_encoding == HTTP_ENCODING_CHUNKED)
3352 sret = http_write_chunk(http, (char *)http->sbuffer, slen);
3353 else if (slen > 0)
3354 sret = http_write(http, (char *)http->sbuffer, slen);
3355 else
3356 sret = 0;
3357
3358 if (sret < 0)
3359 {
3360 DEBUG_puts("1httpWrite2: Unable to write, returning -1.");
3361 return (-1);
3362 }
3363
3364 http->stream.next_out = (Bytef *)http->sbuffer;
3365 http->stream.avail_out = (uInt)_HTTP_MAX_SBUFFER;
3366 }
3367
3368 bytes = (ssize_t)length;
3369 }
3370 }
3371 else
3372 #endif /* HAVE_LIBZ */
3373 if (length > 0)
3374 {
3375 if (http->wused && (length + (size_t)http->wused) > sizeof(http->wbuffer))
3376 {
3377 DEBUG_printf(("2httpWrite2: Flushing buffer (wused=%d, length="
3378 CUPS_LLFMT ")", http->wused, CUPS_LLCAST length));
3379
3380 httpFlushWrite(http);
3381 }
3382
3383 if ((length + (size_t)http->wused) <= sizeof(http->wbuffer) && length < sizeof(http->wbuffer))
3384 {
3385 /*
3386 * Write to buffer...
3387 */
3388
3389 DEBUG_printf(("2httpWrite2: Copying " CUPS_LLFMT " bytes to wbuffer...",
3390 CUPS_LLCAST length));
3391
3392 memcpy(http->wbuffer + http->wused, buffer, length);
3393 http->wused += (int)length;
3394 bytes = (ssize_t)length;
3395 }
3396 else
3397 {
3398 /*
3399 * Otherwise write the data directly...
3400 */
3401
3402 DEBUG_printf(("2httpWrite2: Writing " CUPS_LLFMT " bytes to socket...",
3403 CUPS_LLCAST length));
3404
3405 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
3406 bytes = (ssize_t)http_write_chunk(http, buffer, length);
3407 else
3408 bytes = (ssize_t)http_write(http, buffer, length);
3409
3410 DEBUG_printf(("2httpWrite2: Wrote " CUPS_LLFMT " bytes...",
3411 CUPS_LLCAST bytes));
3412 }
3413
3414 if (http->data_encoding == HTTP_ENCODING_LENGTH)
3415 http->data_remaining -= bytes;
3416 }
3417 else
3418 bytes = 0;
3419
3420 /*
3421 * Handle end-of-request processing...
3422 */
3423
3424 if ((http->data_encoding == HTTP_ENCODING_CHUNKED && length == 0) ||
3425 (http->data_encoding == HTTP_ENCODING_LENGTH && http->data_remaining == 0))
3426 {
3427 /*
3428 * Finished with the transfer; unless we are sending POST or PUT
3429 * data, go idle...
3430 */
3431
3432 #ifdef HAVE_LIBZ
3433 if (http->coding == _HTTP_CODING_GZIP || http->coding == _HTTP_CODING_DEFLATE)
3434 http_content_coding_finish(http);
3435 #endif /* HAVE_LIBZ */
3436
3437 if (http->wused)
3438 {
3439 if (httpFlushWrite(http) < 0)
3440 return (-1);
3441 }
3442
3443 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
3444 {
3445 /*
3446 * Send a 0-length chunk at the end of the request...
3447 */
3448
3449 http_write(http, "0\r\n\r\n", 5);
3450
3451 /*
3452 * Reset the data state...
3453 */
3454
3455 http->data_encoding = HTTP_ENCODING_FIELDS;
3456 http->data_remaining = 0;
3457 }
3458
3459 if (http->state == HTTP_STATE_POST_RECV)
3460 http->state ++;
3461 else if (http->state == HTTP_STATE_POST_SEND ||
3462 http->state == HTTP_STATE_GET_SEND)
3463 http->state = HTTP_STATE_WAITING;
3464 else
3465 http->state = HTTP_STATE_STATUS;
3466
3467 DEBUG_printf(("2httpWrite2: Changed state to %s.",
3468 httpStateString(http->state)));
3469 }
3470
3471 DEBUG_printf(("1httpWrite2: Returning " CUPS_LLFMT ".", CUPS_LLCAST bytes));
3472
3473 return (bytes);
3474 }
3475
3476
3477 /*
3478 * 'httpWriteResponse()' - Write a HTTP response to a client connection.
3479 *
3480 * @since CUPS 1.7/OS X 10.9@
3481 */
3482
3483 int /* O - 0 on success, -1 on error */
3484 httpWriteResponse(http_t *http, /* I - HTTP connection */
3485 http_status_t status) /* I - Status code */
3486 {
3487 http_encoding_t old_encoding; /* Old data_encoding value */
3488 off_t old_remaining; /* Old data_remaining value */
3489
3490
3491 /*
3492 * Range check input...
3493 */
3494
3495 DEBUG_printf(("httpWriteResponse(http=%p, status=%d)", http, status));
3496
3497 if (!http || status < HTTP_STATUS_CONTINUE)
3498 {
3499 DEBUG_puts("1httpWriteResponse: Bad input.");
3500 return (-1);
3501 }
3502
3503 /*
3504 * Set the various standard fields if they aren't already...
3505 */
3506
3507 if (!http->fields[HTTP_FIELD_DATE][0])
3508 httpSetField(http, HTTP_FIELD_DATE, httpGetDateString(time(NULL)));
3509
3510 if (status >= HTTP_STATUS_BAD_REQUEST && http->keep_alive)
3511 {
3512 http->keep_alive = HTTP_KEEPALIVE_OFF;
3513 httpSetField(http, HTTP_FIELD_KEEP_ALIVE, "");
3514 }
3515
3516 if (http->version == HTTP_VERSION_1_1)
3517 {
3518 if (!http->fields[HTTP_FIELD_CONNECTION][0])
3519 {
3520 if (http->keep_alive)
3521 httpSetField(http, HTTP_FIELD_CONNECTION, "Keep-Alive");
3522 else
3523 httpSetField(http, HTTP_FIELD_CONNECTION, "close");
3524 }
3525
3526 if (http->keep_alive && !http->fields[HTTP_FIELD_KEEP_ALIVE][0])
3527 httpSetField(http, HTTP_FIELD_KEEP_ALIVE, "timeout=10");
3528 }
3529
3530 #ifdef HAVE_SSL
3531 if (status == HTTP_STATUS_UPGRADE_REQUIRED ||
3532 status == HTTP_STATUS_SWITCHING_PROTOCOLS)
3533 {
3534 if (!http->fields[HTTP_FIELD_CONNECTION][0])
3535 httpSetField(http, HTTP_FIELD_CONNECTION, "Upgrade");
3536
3537 if (!http->fields[HTTP_FIELD_UPGRADE][0])
3538 httpSetField(http, HTTP_FIELD_UPGRADE, "TLS/1.2,TLS/1.1,TLS/1.0");
3539
3540 if (!http->fields[HTTP_FIELD_CONTENT_LENGTH][0])
3541 httpSetField(http, HTTP_FIELD_CONTENT_LENGTH, "0");
3542 }
3543 #endif /* HAVE_SSL */
3544
3545 if (!http->server)
3546 httpSetField(http, HTTP_FIELD_SERVER,
3547 http->default_server ? http->default_server : CUPS_MINIMAL);
3548
3549 /*
3550 * Set the Accept-Encoding field if it isn't already...
3551 */
3552
3553 if (!http->accept_encoding)
3554 httpSetField(http, HTTP_FIELD_ACCEPT_ENCODING,
3555 http->default_accept_encoding ? http->default_accept_encoding :
3556 #ifdef HAVE_LIBZ
3557 "gzip, deflate, identity");
3558 #else
3559 "identity");
3560 #endif /* HAVE_LIBZ */
3561
3562 /*
3563 * Send the response header...
3564 */
3565
3566 old_encoding = http->data_encoding;
3567 old_remaining = http->data_remaining;
3568 http->data_encoding = HTTP_ENCODING_FIELDS;
3569
3570 if (httpPrintf(http, "HTTP/%d.%d %d %s\r\n", http->version / 100,
3571 http->version % 100, (int)status, httpStatus(status)) < 0)
3572 {
3573 http->status = HTTP_STATUS_ERROR;
3574 return (-1);
3575 }
3576
3577 if (status != HTTP_STATUS_CONTINUE)
3578 {
3579 /*
3580 * 100 Continue doesn't have the rest of the response headers...
3581 */
3582
3583 int i; /* Looping var */
3584 const char *value; /* Field value */
3585
3586 for (i = 0; i < HTTP_FIELD_MAX; i ++)
3587 {
3588 if ((value = httpGetField(http, i)) != NULL && *value)
3589 {
3590 if (httpPrintf(http, "%s: %s\r\n", http_fields[i], value) < 1)
3591 {
3592 http->status = HTTP_STATUS_ERROR;
3593 return (-1);
3594 }
3595 }
3596 }
3597
3598 if (http->cookie)
3599 {
3600 if (strchr(http->cookie, ';'))
3601 {
3602 if (httpPrintf(http, "Set-Cookie: %s\r\n", http->cookie) < 1)
3603 {
3604 http->status = HTTP_STATUS_ERROR;
3605 return (-1);
3606 }
3607 }
3608 else if (httpPrintf(http, "Set-Cookie: %s; path=/; httponly;%s\r\n", http->cookie, http->tls ? " secure;" : "") < 1)
3609 {
3610 http->status = HTTP_STATUS_ERROR;
3611 return (-1);
3612 }
3613 }
3614
3615 /*
3616 * "Click-jacking" defense (STR #4492)...
3617 */
3618
3619 if (httpPrintf(http, "X-Frame-Options: DENY\r\n"
3620 "Content-Security-Policy: frame-ancestors 'none'\r\n") < 1)
3621 {
3622 http->status = HTTP_STATUS_ERROR;
3623 return (-1);
3624 }
3625 }
3626
3627 if (httpWrite2(http, "\r\n", 2) < 2)
3628 {
3629 http->status = HTTP_STATUS_ERROR;
3630 return (-1);
3631 }
3632
3633 if (httpFlushWrite(http) < 0)
3634 {
3635 http->status = HTTP_STATUS_ERROR;
3636 return (-1);
3637 }
3638
3639 if (status == HTTP_STATUS_CONTINUE ||
3640 status == HTTP_STATUS_SWITCHING_PROTOCOLS)
3641 {
3642 /*
3643 * Restore the old data_encoding and data_length values...
3644 */
3645
3646 http->data_encoding = old_encoding;
3647 http->data_remaining = old_remaining;
3648
3649 if (old_remaining <= INT_MAX)
3650 http->_data_remaining = (int)old_remaining;
3651 else
3652 http->_data_remaining = INT_MAX;
3653 }
3654 else if (http->state == HTTP_STATE_OPTIONS ||
3655 http->state == HTTP_STATE_HEAD ||
3656 http->state == HTTP_STATE_PUT ||
3657 http->state == HTTP_STATE_TRACE ||
3658 http->state == HTTP_STATE_CONNECT ||
3659 http->state == HTTP_STATE_STATUS)
3660 {
3661 DEBUG_printf(("1httpWriteResponse: Resetting state to HTTP_STATE_WAITING, "
3662 "was %s.", httpStateString(http->state)));
3663 http->state = HTTP_STATE_WAITING;
3664 }
3665 else
3666 {
3667 /*
3668 * Force data_encoding and data_length to be set according to the response
3669 * headers...
3670 */
3671
3672 http_set_length(http);
3673
3674 if (http->data_encoding == HTTP_ENCODING_LENGTH && http->data_remaining == 0)
3675 {
3676 DEBUG_printf(("1httpWriteResponse: Resetting state to HTTP_STATE_WAITING, "
3677 "was %s.", httpStateString(http->state)));
3678 http->state = HTTP_STATE_WAITING;
3679 return (0);
3680 }
3681
3682 #ifdef HAVE_LIBZ
3683 /*
3684 * Then start any content encoding...
3685 */
3686
3687 DEBUG_puts("1httpWriteResponse: Calling http_content_coding_start.");
3688 http_content_coding_start(http,
3689 httpGetField(http, HTTP_FIELD_CONTENT_ENCODING));
3690 #endif /* HAVE_LIBZ */
3691
3692 }
3693
3694 return (0);
3695 }
3696
3697
3698 #ifdef HAVE_LIBZ
3699 /*
3700 * 'http_content_coding_finish()' - Finish doing any content encoding.
3701 */
3702
3703 static void
3704 http_content_coding_finish(
3705 http_t *http) /* I - HTTP connection */
3706 {
3707 int zerr; /* Compression status */
3708 Byte dummy[1]; /* Dummy read buffer */
3709 size_t bytes; /* Number of bytes to write */
3710
3711
3712 DEBUG_printf(("http_content_coding_finish(http=%p)", http));
3713 DEBUG_printf(("1http_content_coding_finishing: http->coding=%d", http->coding));
3714
3715 switch (http->coding)
3716 {
3717 case _HTTP_CODING_DEFLATE :
3718 case _HTTP_CODING_GZIP :
3719 http->stream.next_in = dummy;
3720 http->stream.avail_in = 0;
3721
3722 do
3723 {
3724 zerr = deflate(&(http->stream), Z_FINISH);
3725 bytes = _HTTP_MAX_SBUFFER - http->stream.avail_out;
3726
3727 if (bytes > 0)
3728 {
3729 DEBUG_printf(("1http_content_coding_finish: Writing trailing chunk, len=%d", (int)bytes));
3730
3731 if (http->data_encoding == HTTP_ENCODING_CHUNKED)
3732 http_write_chunk(http, (char *)http->sbuffer, bytes);
3733 else
3734 http_write(http, (char *)http->sbuffer, bytes);
3735 }
3736
3737 http->stream.next_out = (Bytef *)http->sbuffer;
3738 http->stream.avail_out = (uInt)_HTTP_MAX_SBUFFER;
3739 }
3740 while (zerr == Z_OK);
3741
3742 deflateEnd(&(http->stream));
3743
3744 free(http->sbuffer);
3745 http->sbuffer = NULL;
3746
3747 if (http->wused)
3748 httpFlushWrite(http);
3749 break;
3750
3751 case _HTTP_CODING_INFLATE :
3752 case _HTTP_CODING_GUNZIP :
3753 inflateEnd(&(http->stream));
3754 free(http->sbuffer);
3755 http->sbuffer = NULL;
3756 break;
3757
3758 default :
3759 break;
3760 }
3761
3762 http->coding = _HTTP_CODING_IDENTITY;
3763 }
3764
3765
3766 /*
3767 * 'http_content_coding_start()' - Start doing content encoding.
3768 */
3769
3770 static void
3771 http_content_coding_start(
3772 http_t *http, /* I - HTTP connection */
3773 const char *value) /* I - Value of Content-Encoding */
3774 {
3775 int zerr; /* Error/status */
3776 _http_coding_t coding; /* Content coding value */
3777
3778
3779 DEBUG_printf(("http_content_coding_start(http=%p, value=\"%s\")", http,
3780 value));
3781
3782 if (http->coding != _HTTP_CODING_IDENTITY)
3783 {
3784 DEBUG_printf(("1http_content_coding_start: http->coding already %d.",
3785 http->coding));
3786 return;
3787 }
3788 else if (!strcmp(value, "x-gzip") || !strcmp(value, "gzip"))
3789 {
3790 if (http->state == HTTP_STATE_GET_SEND ||
3791 http->state == HTTP_STATE_POST_SEND)
3792 coding = http->mode == _HTTP_MODE_SERVER ? _HTTP_CODING_GZIP :
3793 _HTTP_CODING_GUNZIP;
3794 else if (http->state == HTTP_STATE_POST_RECV ||
3795 http->state == HTTP_STATE_PUT_RECV)
3796 coding = http->mode == _HTTP_MODE_CLIENT ? _HTTP_CODING_GZIP :
3797 _HTTP_CODING_GUNZIP;
3798 else
3799 {
3800 DEBUG_puts("1http_content_coding_start: Not doing content coding.");
3801 return;
3802 }
3803 }
3804 else if (!strcmp(value, "x-deflate") || !strcmp(value, "deflate"))
3805 {
3806 if (http->state == HTTP_STATE_GET_SEND ||
3807 http->state == HTTP_STATE_POST_SEND)
3808 coding = http->mode == _HTTP_MODE_SERVER ? _HTTP_CODING_DEFLATE :
3809 _HTTP_CODING_INFLATE;
3810 else if (http->state == HTTP_STATE_POST_RECV ||
3811 http->state == HTTP_STATE_PUT_RECV)
3812 coding = http->mode == _HTTP_MODE_CLIENT ? _HTTP_CODING_DEFLATE :
3813 _HTTP_CODING_INFLATE;
3814 else
3815 {
3816 DEBUG_puts("1http_content_coding_start: Not doing content coding.");
3817 return;
3818 }
3819 }
3820 else
3821 {
3822 DEBUG_puts("1http_content_coding_start: Not doing content coding.");
3823 return;
3824 }
3825
3826 memset(&(http->stream), 0, sizeof(http->stream));
3827
3828 switch (coding)
3829 {
3830 case _HTTP_CODING_DEFLATE :
3831 case _HTTP_CODING_GZIP :
3832 if (http->wused)
3833 httpFlushWrite(http);
3834
3835 if ((http->sbuffer = malloc(_HTTP_MAX_SBUFFER)) == NULL)
3836 {
3837 http->status = HTTP_STATUS_ERROR;
3838 http->error = errno;
3839 return;
3840 }
3841
3842 /*
3843 * Window size for compression is 11 bits - optimal based on PWG Raster
3844 * sample files on pwg.org. -11 is raw deflate, 27 is gzip, per ZLIB
3845 * documentation.
3846 */
3847
3848 if ((zerr = deflateInit2(&(http->stream), Z_DEFAULT_COMPRESSION,
3849 Z_DEFLATED,
3850 coding == _HTTP_CODING_DEFLATE ? -11 : 27, 7,
3851 Z_DEFAULT_STRATEGY)) < Z_OK)
3852 {
3853 http->status = HTTP_STATUS_ERROR;
3854 http->error = zerr == Z_MEM_ERROR ? ENOMEM : EINVAL;
3855 return;
3856 }
3857
3858 http->stream.next_out = (Bytef *)http->sbuffer;
3859 http->stream.avail_out = (uInt)_HTTP_MAX_SBUFFER;
3860 break;
3861
3862 case _HTTP_CODING_INFLATE :
3863 case _HTTP_CODING_GUNZIP :
3864 if ((http->sbuffer = malloc(_HTTP_MAX_SBUFFER)) == NULL)
3865 {
3866 http->status = HTTP_STATUS_ERROR;
3867 http->error = errno;
3868 return;
3869 }
3870
3871 /*
3872 * Window size for decompression is up to 15 bits (maximum supported).
3873 * -15 is raw inflate, 31 is gunzip, per ZLIB documentation.
3874 */
3875
3876 if ((zerr = inflateInit2(&(http->stream),
3877 coding == _HTTP_CODING_INFLATE ? -15 : 31))
3878 < Z_OK)
3879 {
3880 free(http->sbuffer);
3881 http->sbuffer = NULL;
3882 http->status = HTTP_STATUS_ERROR;
3883 http->error = zerr == Z_MEM_ERROR ? ENOMEM : EINVAL;
3884 return;
3885 }
3886
3887 http->stream.avail_in = 0;
3888 http->stream.next_in = http->sbuffer;
3889 break;
3890
3891 default :
3892 break;
3893 }
3894
3895 http->coding = coding;
3896
3897 DEBUG_printf(("1http_content_coding_start: http->coding now %d.",
3898 http->coding));
3899 }
3900 #endif /* HAVE_LIBZ */
3901
3902
3903 /*
3904 * 'http_create()' - Create an unconnected HTTP connection.
3905 */
3906
3907 static http_t * /* O - HTTP connection */
3908 http_create(
3909 const char *host, /* I - Hostname */
3910 int port, /* I - Port number */
3911 http_addrlist_t *addrlist, /* I - Address list or NULL */
3912 int family, /* I - Address family or AF_UNSPEC */
3913 http_encryption_t encryption, /* I - Encryption to use */
3914 int blocking, /* I - 1 for blocking mode */
3915 _http_mode_t mode) /* I - _HTTP_MODE_CLIENT or _SERVER */
3916 {
3917 http_t *http; /* New HTTP connection */
3918 char service[255]; /* Service name */
3919 http_addrlist_t *myaddrlist = NULL; /* My address list */
3920
3921
3922 DEBUG_printf(("4http_create(host=\"%s\", port=%d, addrlist=%p, family=%d, "
3923 "encryption=%d, blocking=%d, mode=%d)", host, port, addrlist,
3924 family, encryption, blocking, mode));
3925
3926 if (!host && mode == _HTTP_MODE_CLIENT)
3927 return (NULL);
3928
3929 httpInitialize();
3930
3931 /*
3932 * Lookup the host...
3933 */
3934
3935 if (addrlist)
3936 {
3937 myaddrlist = httpAddrCopyList(addrlist);
3938 }
3939 else
3940 {
3941 snprintf(service, sizeof(service), "%d", port);
3942
3943 myaddrlist = httpAddrGetList(host, family, service);
3944 }
3945
3946 if (!myaddrlist)
3947 return (NULL);
3948
3949 /*
3950 * Allocate memory for the structure...
3951 */
3952
3953 if ((http = calloc(sizeof(http_t), 1)) == NULL)
3954 {
3955 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, strerror(errno), 0);
3956 httpAddrFreeList(addrlist);
3957 return (NULL);
3958 }
3959
3960 /*
3961 * Initialize the HTTP data...
3962 */
3963
3964 http->mode = mode;
3965 http->activity = time(NULL);
3966 http->addrlist = myaddrlist;
3967 http->blocking = blocking;
3968 http->fd = -1;
3969 #ifdef HAVE_GSSAPI
3970 http->gssctx = GSS_C_NO_CONTEXT;
3971 http->gssname = GSS_C_NO_NAME;
3972 #endif /* HAVE_GSSAPI */
3973 http->status = HTTP_STATUS_CONTINUE;
3974 http->version = HTTP_VERSION_1_1;
3975
3976 if (host)
3977 strlcpy(http->hostname, host, sizeof(http->hostname));
3978
3979 if (port == 443) /* Always use encryption for https */
3980 http->encryption = HTTP_ENCRYPTION_ALWAYS;
3981 else
3982 http->encryption = encryption;
3983
3984 http_set_wait(http);
3985
3986 /*
3987 * Return the new structure...
3988 */
3989
3990 return (http);
3991 }
3992
3993
3994 #ifdef DEBUG
3995 /*
3996 * 'http_debug_hex()' - Do a hex dump of a buffer.
3997 */
3998
3999 static void
4000 http_debug_hex(const char *prefix, /* I - Prefix for line */
4001 const char *buffer, /* I - Buffer to dump */
4002 int bytes) /* I - Bytes to dump */
4003 {
4004 int i, j, /* Looping vars */
4005 ch; /* Current character */
4006 char line[255], /* Line buffer */
4007 *start, /* Start of line after prefix */
4008 *ptr; /* Pointer into line */
4009
4010
4011 if (_cups_debug_fd < 0 || _cups_debug_level < 6)
4012 return;
4013
4014 DEBUG_printf(("6%s: %d bytes:", prefix, bytes));
4015
4016 snprintf(line, sizeof(line), "6%s: ", prefix);
4017 start = line + strlen(line);
4018
4019 for (i = 0; i < bytes; i += 16)
4020 {
4021 for (j = 0, ptr = start; j < 16 && (i + j) < bytes; j ++, ptr += 2)
4022 sprintf(ptr, "%02X", buffer[i + j] & 255);
4023
4024 while (j < 16)
4025 {
4026 memcpy(ptr, " ", 3);
4027 ptr += 2;
4028 j ++;
4029 }
4030
4031 memcpy(ptr, " ", 3);
4032 ptr += 2;
4033
4034 for (j = 0; j < 16 && (i + j) < bytes; j ++)
4035 {
4036 ch = buffer[i + j] & 255;
4037
4038 if (ch < ' ' || ch >= 127)
4039 ch = '.';
4040
4041 *ptr++ = (char)ch;
4042 }
4043
4044 *ptr = '\0';
4045 DEBUG_puts(line);
4046 }
4047 }
4048 #endif /* DEBUG */
4049
4050
4051 /*
4052 * 'http_read()' - Read a buffer from a HTTP connection.
4053 *
4054 * This function does the low-level read from the socket, retrying and timing
4055 * out as needed.
4056 */
4057
4058 static ssize_t /* O - Number of bytes read or -1 on error */
4059 http_read(http_t *http, /* I - HTTP connection */
4060 char *buffer, /* I - Buffer */
4061 size_t length) /* I - Maximum bytes to read */
4062 {
4063 ssize_t bytes; /* Bytes read */
4064
4065
4066 DEBUG_printf(("http_read(http=%p, buffer=%p, length=" CUPS_LLFMT ")", http,
4067 buffer, CUPS_LLCAST length));
4068
4069 if (!http->blocking)
4070 {
4071 while (!httpWait(http, http->wait_value))
4072 {
4073 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
4074 continue;
4075
4076 DEBUG_puts("2http_read: Timeout.");
4077 return (0);
4078 }
4079 }
4080
4081 DEBUG_printf(("2http_read: Reading %d bytes into buffer.", (int)length));
4082
4083 do
4084 {
4085 #ifdef HAVE_SSL
4086 if (http->tls)
4087 bytes = _httpTLSRead(http, buffer, (int)length);
4088 else
4089 #endif /* HAVE_SSL */
4090 bytes = recv(http->fd, buffer, length, 0);
4091
4092 if (bytes < 0)
4093 {
4094 #ifdef WIN32
4095 if (WSAGetLastError() != WSAEINTR)
4096 {
4097 http->error = WSAGetLastError();
4098 return (-1);
4099 }
4100 else if (WSAGetLastError() == WSAEWOULDBLOCK)
4101 {
4102 if (!http->timeout_cb ||
4103 !(*http->timeout_cb)(http, http->timeout_data))
4104 {
4105 http->error = WSAEWOULDBLOCK;
4106 return (-1);
4107 }
4108 }
4109 #else
4110 DEBUG_printf(("2http_read: %s", strerror(errno)));
4111
4112 if (errno == EWOULDBLOCK || errno == EAGAIN)
4113 {
4114 if (http->timeout_cb && !(*http->timeout_cb)(http, http->timeout_data))
4115 {
4116 http->error = errno;
4117 return (-1);
4118 }
4119 else if (!http->timeout_cb && errno != EAGAIN)
4120 {
4121 http->error = errno;
4122 return (-1);
4123 }
4124 }
4125 else if (errno != EINTR)
4126 {
4127 http->error = errno;
4128 return (-1);
4129 }
4130 #endif /* WIN32 */
4131 }
4132 }
4133 while (bytes < 0);
4134
4135 DEBUG_printf(("2http_read: Read " CUPS_LLFMT " bytes into buffer.",
4136 CUPS_LLCAST bytes));
4137 #ifdef DEBUG
4138 if (bytes > 0)
4139 http_debug_hex("http_read", buffer, (int)bytes);
4140 #endif /* DEBUG */
4141
4142 if (bytes < 0)
4143 {
4144 #ifdef WIN32
4145 if (WSAGetLastError() == WSAEINTR)
4146 bytes = 0;
4147 else
4148 http->error = WSAGetLastError();
4149 #else
4150 if (errno == EINTR || (errno == EAGAIN && !http->timeout_cb))
4151 bytes = 0;
4152 else
4153 http->error = errno;
4154 #endif /* WIN32 */
4155 }
4156 else if (bytes == 0)
4157 {
4158 http->error = EPIPE;
4159 return (0);
4160 }
4161
4162 return (bytes);
4163 }
4164
4165
4166 /*
4167 * 'http_read_buffered()' - Do a buffered read from a HTTP connection.
4168 *
4169 * This function reads data from the HTTP buffer or from the socket, as needed.
4170 */
4171
4172 static ssize_t /* O - Number of bytes read or -1 on error */
4173 http_read_buffered(http_t *http, /* I - HTTP connection */
4174 char *buffer, /* I - Buffer */
4175 size_t length) /* I - Maximum bytes to read */
4176 {
4177 ssize_t bytes; /* Bytes read */
4178
4179
4180 DEBUG_printf(("http_read_buffered(http=%p, buffer=%p, length=" CUPS_LLFMT
4181 ") used=%d",
4182 http, buffer, CUPS_LLCAST length, http->used));
4183
4184 if (http->used > 0)
4185 {
4186 if (length > (size_t)http->used)
4187 bytes = (ssize_t)http->used;
4188 else
4189 bytes = (ssize_t)length;
4190
4191 DEBUG_printf(("2http_read: Grabbing %d bytes from input buffer.",
4192 (int)bytes));
4193
4194 memcpy(buffer, http->buffer, (size_t)bytes);
4195 http->used -= (int)bytes;
4196
4197 if (http->used > 0)
4198 memmove(http->buffer, http->buffer + bytes, (size_t)http->used);
4199 }
4200 else
4201 bytes = http_read(http, buffer, length);
4202
4203 return (bytes);
4204 }
4205
4206
4207 /*
4208 * 'http_read_chunk()' - Read a chunk from a HTTP connection.
4209 *
4210 * This function reads and validates the chunk length, then does a buffered read
4211 * returning the number of bytes placed in the buffer.
4212 */
4213
4214 static ssize_t /* O - Number of bytes read or -1 on error */
4215 http_read_chunk(http_t *http, /* I - HTTP connection */
4216 char *buffer, /* I - Buffer */
4217 size_t length) /* I - Maximum bytes to read */
4218 {
4219 DEBUG_printf(("http_read_chunk(http=%p, buffer=%p, length=" CUPS_LLFMT ")",
4220 http, buffer, CUPS_LLCAST length));
4221
4222 if (http->data_remaining <= 0)
4223 {
4224 char len[32]; /* Length string */
4225
4226 if (!httpGets(len, sizeof(len), http))
4227 {
4228 DEBUG_puts("1http_read_chunk: Could not get chunk length.");
4229 return (0);
4230 }
4231
4232 if (!len[0])
4233 {
4234 DEBUG_puts("1http_read_chunk: Blank chunk length, trying again...");
4235 if (!httpGets(len, sizeof(len), http))
4236 {
4237 DEBUG_puts("1http_read_chunk: Could not get chunk length.");
4238 return (0);
4239 }
4240 }
4241
4242 http->data_remaining = strtoll(len, NULL, 16);
4243
4244 if (http->data_remaining < 0)
4245 {
4246 DEBUG_printf(("1http_read_chunk: Negative chunk length \"%s\" ("
4247 CUPS_LLFMT ")", len, CUPS_LLCAST http->data_remaining));
4248 return (0);
4249 }
4250
4251 DEBUG_printf(("2http_read_chunk: Got chunk length \"%s\" (" CUPS_LLFMT ")",
4252 len, CUPS_LLCAST http->data_remaining));
4253
4254 if (http->data_remaining == 0)
4255 {
4256 /*
4257 * 0-length chunk, grab trailing blank line...
4258 */
4259
4260 httpGets(len, sizeof(len), http);
4261 }
4262 }
4263
4264 DEBUG_printf(("2http_read_chunk: data_remaining=" CUPS_LLFMT,
4265 CUPS_LLCAST http->data_remaining));
4266
4267 if (http->data_remaining <= 0)
4268 return (0);
4269 else if (length > (size_t)http->data_remaining)
4270 length = (size_t)http->data_remaining;
4271
4272 return (http_read_buffered(http, buffer, length));
4273 }
4274
4275
4276 /*
4277 * 'http_send()' - Send a request with all fields and the trailing blank line.
4278 */
4279
4280 static int /* O - 0 on success, non-zero on error */
4281 http_send(http_t *http, /* I - HTTP connection */
4282 http_state_t request, /* I - Request code */
4283 const char *uri) /* I - URI */
4284 {
4285 int i; /* Looping var */
4286 char buf[1024]; /* Encoded URI buffer */
4287 const char *value; /* Field value */
4288 static const char * const codes[] = /* Request code strings */
4289 {
4290 NULL,
4291 "OPTIONS",
4292 "GET",
4293 NULL,
4294 "HEAD",
4295 "POST",
4296 NULL,
4297 NULL,
4298 "PUT",
4299 NULL,
4300 "DELETE",
4301 "TRACE",
4302 "CLOSE",
4303 NULL,
4304 NULL
4305 };
4306
4307
4308 DEBUG_printf(("4http_send(http=%p, request=HTTP_%s, uri=\"%s\")",
4309 http, codes[request], uri));
4310
4311 if (http == NULL || uri == NULL)
4312 return (-1);
4313
4314 /*
4315 * Set the User-Agent field if it isn't already...
4316 */
4317
4318 if (!http->fields[HTTP_FIELD_USER_AGENT][0])
4319 {
4320 if (http->default_user_agent)
4321 httpSetField(http, HTTP_FIELD_USER_AGENT, http->default_user_agent);
4322 else
4323 httpSetField(http, HTTP_FIELD_USER_AGENT, cupsUserAgent());
4324 }
4325
4326 /*
4327 * Set the Accept-Encoding field if it isn't already...
4328 */
4329
4330 if (!http->accept_encoding && http->default_accept_encoding)
4331 httpSetField(http, HTTP_FIELD_ACCEPT_ENCODING,
4332 http->default_accept_encoding);
4333
4334 /*
4335 * Encode the URI as needed...
4336 */
4337
4338 _httpEncodeURI(buf, uri, sizeof(buf));
4339
4340 /*
4341 * See if we had an error the last time around; if so, reconnect...
4342 */
4343
4344 if (http->fd < 0 || http->status == HTTP_STATUS_ERROR ||
4345 http->status >= HTTP_STATUS_BAD_REQUEST)
4346 {
4347 DEBUG_printf(("5http_send: Reconnecting, fd=%d, status=%d, tls_upgrade=%d",
4348 http->fd, http->status, http->tls_upgrade));
4349
4350 if (httpReconnect2(http, 30000, NULL))
4351 return (-1);
4352 }
4353
4354 /*
4355 * Flush any written data that is pending...
4356 */
4357
4358 if (http->wused)
4359 {
4360 if (httpFlushWrite(http) < 0)
4361 if (httpReconnect2(http, 30000, NULL))
4362 return (-1);
4363 }
4364
4365 /*
4366 * Send the request header...
4367 */
4368
4369 http->state = request;
4370 http->data_encoding = HTTP_ENCODING_FIELDS;
4371
4372 if (request == HTTP_STATE_POST || request == HTTP_STATE_PUT)
4373 http->state ++;
4374
4375 http->status = HTTP_STATUS_CONTINUE;
4376
4377 #ifdef HAVE_SSL
4378 if (http->encryption == HTTP_ENCRYPTION_REQUIRED && !http->tls)
4379 {
4380 httpSetField(http, HTTP_FIELD_CONNECTION, "Upgrade");
4381 httpSetField(http, HTTP_FIELD_UPGRADE, "TLS/1.2,TLS/1.1,TLS/1.0");
4382 }
4383 #endif /* HAVE_SSL */
4384
4385 if (httpPrintf(http, "%s %s HTTP/1.1\r\n", codes[request], buf) < 1)
4386 {
4387 http->status = HTTP_STATUS_ERROR;
4388 return (-1);
4389 }
4390
4391 for (i = 0; i < HTTP_FIELD_MAX; i ++)
4392 if ((value = httpGetField(http, i)) != NULL && *value)
4393 {
4394 DEBUG_printf(("5http_send: %s: %s", http_fields[i], value));
4395
4396 if (i == HTTP_FIELD_HOST)
4397 {
4398 if (httpPrintf(http, "Host: %s:%d\r\n", value,
4399 httpAddrPort(http->hostaddr)) < 1)
4400 {
4401 http->status = HTTP_STATUS_ERROR;
4402 return (-1);
4403 }
4404 }
4405 else if (httpPrintf(http, "%s: %s\r\n", http_fields[i], value) < 1)
4406 {
4407 http->status = HTTP_STATUS_ERROR;
4408 return (-1);
4409 }
4410 }
4411
4412 if (http->cookie)
4413 if (httpPrintf(http, "Cookie: $Version=0; %s\r\n", http->cookie) < 1)
4414 {
4415 http->status = HTTP_STATUS_ERROR;
4416 return (-1);
4417 }
4418
4419 DEBUG_printf(("5http_send: expect=%d, mode=%d, state=%d", http->expect,
4420 http->mode, http->state));
4421
4422 if (http->expect == HTTP_STATUS_CONTINUE && http->mode == _HTTP_MODE_CLIENT &&
4423 (http->state == HTTP_STATE_POST_RECV ||
4424 http->state == HTTP_STATE_PUT_RECV))
4425 if (httpPrintf(http, "Expect: 100-continue\r\n") < 1)
4426 {
4427 http->status = HTTP_STATUS_ERROR;
4428 return (-1);
4429 }
4430
4431 if (httpPrintf(http, "\r\n") < 1)
4432 {
4433 http->status = HTTP_STATUS_ERROR;
4434 return (-1);
4435 }
4436
4437 if (httpFlushWrite(http) < 0)
4438 return (-1);
4439
4440 http_set_length(http);
4441 httpClearFields(http);
4442
4443 /*
4444 * The Kerberos and AuthRef authentication strings can only be used once...
4445 */
4446
4447 if (http->field_authorization && http->authstring &&
4448 (!strncmp(http->authstring, "Negotiate", 9) ||
4449 !strncmp(http->authstring, "AuthRef", 7)))
4450 {
4451 http->_authstring[0] = '\0';
4452
4453 if (http->authstring != http->_authstring)
4454 free(http->authstring);
4455
4456 http->authstring = http->_authstring;
4457 }
4458
4459 return (0);
4460 }
4461
4462
4463 /*
4464 * 'http_set_length()' - Set the data_encoding and data_remaining values.
4465 */
4466
4467 static off_t /* O - Remainder or -1 on error */
4468 http_set_length(http_t *http) /* I - Connection */
4469 {
4470 off_t remaining; /* Remainder */
4471
4472
4473 DEBUG_printf(("http_set_length(http=%p) mode=%d state=%s", http, http->mode,
4474 httpStateString(http->state)));
4475
4476 if ((remaining = httpGetLength2(http)) >= 0)
4477 {
4478 if (http->mode == _HTTP_MODE_SERVER &&
4479 http->state != HTTP_STATE_GET_SEND &&
4480 http->state != HTTP_STATE_PUT &&
4481 http->state != HTTP_STATE_POST &&
4482 http->state != HTTP_STATE_POST_SEND)
4483 {
4484 DEBUG_puts("1http_set_length: Not setting data_encoding/remaining.");
4485 return (remaining);
4486 }
4487
4488 if (!_cups_strcasecmp(http->fields[HTTP_FIELD_TRANSFER_ENCODING],
4489 "chunked"))
4490 {
4491 DEBUG_puts("1http_set_length: Setting data_encoding to "
4492 "HTTP_ENCODING_CHUNKED.");
4493 http->data_encoding = HTTP_ENCODING_CHUNKED;
4494 }
4495 else
4496 {
4497 DEBUG_puts("1http_set_length: Setting data_encoding to "
4498 "HTTP_ENCODING_LENGTH.");
4499 http->data_encoding = HTTP_ENCODING_LENGTH;
4500 }
4501
4502 DEBUG_printf(("1http_set_length: Setting data_remaining to " CUPS_LLFMT ".",
4503 CUPS_LLCAST remaining));
4504 http->data_remaining = remaining;
4505
4506 if (remaining <= INT_MAX)
4507 http->_data_remaining = (int)remaining;
4508 else
4509 http->_data_remaining = INT_MAX;
4510 }
4511
4512 return (remaining);
4513 }
4514
4515 /*
4516 * 'http_set_timeout()' - Set the socket timeout values.
4517 */
4518
4519 static void
4520 http_set_timeout(int fd, /* I - File descriptor */
4521 double timeout) /* I - Timeout in seconds */
4522 {
4523 #ifdef WIN32
4524 DWORD tv = (DWORD)(timeout * 1000);
4525 /* Timeout in milliseconds */
4526
4527 setsockopt(fd, SOL_SOCKET, SO_RCVTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4528 setsockopt(fd, SOL_SOCKET, SO_SNDTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4529
4530 #else
4531 struct timeval tv; /* Timeout in secs and usecs */
4532
4533 tv.tv_sec = (int)timeout;
4534 tv.tv_usec = (int)(1000000 * fmod(timeout, 1.0));
4535
4536 setsockopt(fd, SOL_SOCKET, SO_RCVTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4537 setsockopt(fd, SOL_SOCKET, SO_SNDTIMEO, CUPS_SOCAST &tv, sizeof(tv));
4538 #endif /* WIN32 */
4539 }
4540
4541
4542 /*
4543 * 'http_set_wait()' - Set the default wait value for reads.
4544 */
4545
4546 static void
4547 http_set_wait(http_t *http) /* I - HTTP connection */
4548 {
4549 if (http->blocking)
4550 {
4551 http->wait_value = (int)(http->timeout_value * 1000);
4552
4553 if (http->wait_value <= 0)
4554 http->wait_value = 60000;
4555 }
4556 else
4557 http->wait_value = 10000;
4558 }
4559
4560
4561 #ifdef HAVE_SSL
4562 /*
4563 * 'http_tls_upgrade()' - Force upgrade to TLS encryption.
4564 */
4565
4566 static int /* O - Status of connection */
4567 http_tls_upgrade(http_t *http) /* I - HTTP connection */
4568 {
4569 int ret; /* Return value */
4570 http_t myhttp; /* Local copy of HTTP data */
4571
4572
4573 DEBUG_printf(("7http_tls_upgrade(%p)", http));
4574
4575 /*
4576 * Flush the connection to make sure any previous "Upgrade" message
4577 * has been read.
4578 */
4579
4580 httpFlush(http);
4581
4582 /*
4583 * Copy the HTTP data to a local variable so we can do the OPTIONS
4584 * request without interfering with the existing request data...
4585 */
4586
4587 memcpy(&myhttp, http, sizeof(myhttp));
4588
4589 /*
4590 * Send an OPTIONS request to the server, requiring SSL or TLS
4591 * encryption on the link...
4592 */
4593
4594 http->tls_upgrade = 1;
4595 http->field_authorization = NULL; /* Don't free the auth string */
4596
4597 httpClearFields(http);
4598 httpSetField(http, HTTP_FIELD_CONNECTION, "upgrade");
4599 httpSetField(http, HTTP_FIELD_UPGRADE, "TLS/1.2,TLS/1.1,TLS/1.0");
4600
4601 if ((ret = httpOptions(http, "*")) == 0)
4602 {
4603 /*
4604 * Wait for the secure connection...
4605 */
4606
4607 while (httpUpdate(http) == HTTP_STATUS_CONTINUE);
4608 }
4609
4610 /*
4611 * Restore the HTTP request data...
4612 */
4613
4614 memcpy(http->fields, myhttp.fields, sizeof(http->fields));
4615 http->data_encoding = myhttp.data_encoding;
4616 http->data_remaining = myhttp.data_remaining;
4617 http->_data_remaining = myhttp._data_remaining;
4618 http->expect = myhttp.expect;
4619 http->field_authorization = myhttp.field_authorization;
4620 http->digest_tries = myhttp.digest_tries;
4621 http->tls_upgrade = 0;
4622
4623 /*
4624 * See if we actually went secure...
4625 */
4626
4627 if (!http->tls)
4628 {
4629 /*
4630 * Server does not support HTTP upgrade...
4631 */
4632
4633 DEBUG_puts("8http_tls_upgrade: Server does not support HTTP upgrade!");
4634
4635 _cupsSetError(IPP_STATUS_ERROR_CUPS_PKI, _("Encryption is not supported."), 1);
4636 httpAddrClose(NULL, http->fd);
4637
4638 http->fd = -1;
4639
4640 return (-1);
4641 }
4642 else
4643 return (ret);
4644 }
4645 #endif /* HAVE_SSL */
4646
4647
4648 /*
4649 * 'http_write()' - Write a buffer to a HTTP connection.
4650 */
4651
4652 static ssize_t /* O - Number of bytes written */
4653 http_write(http_t *http, /* I - HTTP connection */
4654 const char *buffer, /* I - Buffer for data */
4655 size_t length) /* I - Number of bytes to write */
4656 {
4657 ssize_t tbytes, /* Total bytes sent */
4658 bytes; /* Bytes sent */
4659
4660
4661 DEBUG_printf(("2http_write(http=%p, buffer=%p, length=" CUPS_LLFMT ")", http,
4662 buffer, CUPS_LLCAST length));
4663 http->error = 0;
4664 tbytes = 0;
4665
4666 while (length > 0)
4667 {
4668 DEBUG_printf(("3http_write: About to write %d bytes.", (int)length));
4669
4670 if (http->timeout_cb)
4671 {
4672 #ifdef HAVE_POLL
4673 struct pollfd pfd; /* Polled file descriptor */
4674 #else
4675 fd_set output_set; /* Output ready for write? */
4676 struct timeval timeout; /* Timeout value */
4677 #endif /* HAVE_POLL */
4678 int nfds; /* Result from select()/poll() */
4679
4680 do
4681 {
4682 #ifdef HAVE_POLL
4683 pfd.fd = http->fd;
4684 pfd.events = POLLOUT;
4685
4686 while ((nfds = poll(&pfd, 1, http->wait_value)) < 0 &&
4687 (errno == EINTR || errno == EAGAIN))
4688 /* do nothing */;
4689
4690 #else
4691 do
4692 {
4693 FD_ZERO(&output_set);
4694 FD_SET(http->fd, &output_set);
4695
4696 timeout.tv_sec = http->wait_value / 1000;
4697 timeout.tv_usec = 1000 * (http->wait_value % 1000);
4698
4699 nfds = select(http->fd + 1, NULL, &output_set, NULL, &timeout);
4700 }
4701 # ifdef WIN32
4702 while (nfds < 0 && (WSAGetLastError() == WSAEINTR ||
4703 WSAGetLastError() == WSAEWOULDBLOCK));
4704 # else
4705 while (nfds < 0 && (errno == EINTR || errno == EAGAIN));
4706 # endif /* WIN32 */
4707 #endif /* HAVE_POLL */
4708
4709 if (nfds < 0)
4710 {
4711 http->error = errno;
4712 return (-1);
4713 }
4714 else if (nfds == 0 && !(*http->timeout_cb)(http, http->timeout_data))
4715 {
4716 #ifdef WIN32
4717 http->error = WSAEWOULDBLOCK;
4718 #else
4719 http->error = EWOULDBLOCK;
4720 #endif /* WIN32 */
4721 return (-1);
4722 }
4723 }
4724 while (nfds <= 0);
4725 }
4726
4727 #ifdef HAVE_SSL
4728 if (http->tls)
4729 bytes = _httpTLSWrite(http, buffer, (int)length);
4730 else
4731 #endif /* HAVE_SSL */
4732 bytes = send(http->fd, buffer, length, 0);
4733
4734 DEBUG_printf(("3http_write: Write of " CUPS_LLFMT " bytes returned "
4735 CUPS_LLFMT ".", CUPS_LLCAST length, CUPS_LLCAST bytes));
4736
4737 if (bytes < 0)
4738 {
4739 #ifdef WIN32
4740 if (WSAGetLastError() == WSAEINTR)
4741 continue;
4742 else if (WSAGetLastError() == WSAEWOULDBLOCK)
4743 {
4744 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
4745 continue;
4746
4747 http->error = WSAGetLastError();
4748 }
4749 else if (WSAGetLastError() != http->error &&
4750 WSAGetLastError() != WSAECONNRESET)
4751 {
4752 http->error = WSAGetLastError();
4753 continue;
4754 }
4755
4756 #else
4757 if (errno == EINTR)
4758 continue;
4759 else if (errno == EWOULDBLOCK || errno == EAGAIN)
4760 {
4761 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
4762 continue;
4763 else if (!http->timeout_cb && errno == EAGAIN)
4764 continue;
4765
4766 http->error = errno;
4767 }
4768 else if (errno != http->error && errno != ECONNRESET)
4769 {
4770 http->error = errno;
4771 continue;
4772 }
4773 #endif /* WIN32 */
4774
4775 DEBUG_printf(("3http_write: error writing data (%s).",
4776 strerror(http->error)));
4777
4778 return (-1);
4779 }
4780
4781 buffer += bytes;
4782 tbytes += bytes;
4783 length -= (size_t)bytes;
4784 }
4785
4786 #ifdef DEBUG
4787 http_debug_hex("http_write", buffer - tbytes, (int)tbytes);
4788 #endif /* DEBUG */
4789
4790 DEBUG_printf(("3http_write: Returning " CUPS_LLFMT ".", CUPS_LLCAST tbytes));
4791
4792 return (tbytes);
4793 }
4794
4795
4796 /*
4797 * 'http_write_chunk()' - Write a chunked buffer.
4798 */
4799
4800 static ssize_t /* O - Number bytes written */
4801 http_write_chunk(http_t *http, /* I - HTTP connection */
4802 const char *buffer, /* I - Buffer to write */
4803 size_t length) /* I - Length of buffer */
4804 {
4805 char header[16]; /* Chunk header */
4806 ssize_t bytes; /* Bytes written */
4807
4808
4809 DEBUG_printf(("7http_write_chunk(http=%p, buffer=%p, length=" CUPS_LLFMT ")",
4810 http, buffer, CUPS_LLCAST length));
4811
4812 /*
4813 * Write the chunk header, data, and trailer.
4814 */
4815
4816 snprintf(header, sizeof(header), "%x\r\n", (unsigned)length);
4817 if (http_write(http, header, strlen(header)) < 0)
4818 {
4819 DEBUG_puts("8http_write_chunk: http_write of length failed.");
4820 return (-1);
4821 }
4822
4823 if ((bytes = http_write(http, buffer, length)) < 0)
4824 {
4825 DEBUG_puts("8http_write_chunk: http_write of buffer failed.");
4826 return (-1);
4827 }
4828
4829 if (http_write(http, "\r\n", 2) < 0)
4830 {
4831 DEBUG_puts("8http_write_chunk: http_write of CR LF failed.");
4832 return (-1);
4833 }
4834
4835 return (bytes);
4836 }
4837
4838
4839 /*
4840 * End of "$Id$".
4841 */
Unnamed repository; edit this file 'description' to name the repository.