]> git.ipfire.org Git - thirdparty/cups.git/blob - cups/tls-darwin.c
projects / thirdparty / cups.git / blob
? search:


7cc006dbf468a496f62a5c26d8fc5215cfa5091f
[thirdparty/cups.git] / cups / tls-darwin.c
1 /*
2 * TLS support code for CUPS on macOS.
3 *
4 * Copyright 2007-2017 by Apple Inc.
5 * Copyright 1997-2007 by Easy Software Products, all rights reserved.
6 *
7 * These coded instructions, statements, and computer programs are the
8 * property of Apple Inc. and are protected by Federal copyright
9 * law. Distribution and use rights are outlined in the file "LICENSE.txt"
10 * which should have been included with this file. If this file is
11 * missing or damaged, see the license at "http://www.cups.org/".
12 *
13 * This file is subject to the Apple OS-Developed Software exception.
14 */
15
16 /**** This file is included from tls.c ****/
17
18 /*
19 * Include necessary headers...
20 */
21
22 #include <spawn.h>
23
24 extern char **environ; /* @private@ */
25
26
27 /*
28 * Constants, very secure stuff...
29 */
30
31 #define _CUPS_CDSA_PASSWORD "42" /* CUPS keychain password */
32 #define _CUPS_CDSA_PASSLEN 2 /* Length of keychain password */
33
34
35 /*
36 * Local globals...
37 */
38
39 static int tls_auto_create = 0;
40 /* Auto-create self-signed certs? */
41 static char *tls_common_name = NULL;
42 /* Default common name */
43 #ifdef HAVE_SECKEYCHAINOPEN
44 static int tls_cups_keychain = 0;
45 /* Opened the CUPS keychain? */
46 static SecKeychainRef tls_keychain = NULL;
47 /* Server cert keychain */
48 #else
49 static SecIdentityRef tls_selfsigned = NULL;
50 /* Temporary self-signed cert */
51 #endif /* HAVE_SECKEYCHAINOPEN */
52 static char *tls_keypath = NULL;
53 /* Server cert keychain path */
54 static _cups_mutex_t tls_mutex = _CUPS_MUTEX_INITIALIZER;
55 /* Mutex for keychain/certs */
56 static int tls_options = -1,/* Options for TLS connections */
57 tls_min_version = _HTTP_TLS_1_0,
58 tls_max_version = _HTTP_TLS_MAX;
59
60
61 /*
62 * Local functions...
63 */
64
65 static CFArrayRef http_cdsa_copy_server(const char *common_name);
66 static SecCertificateRef http_cdsa_create_credential(http_credential_t *credential);
67 #ifdef HAVE_SECKEYCHAINOPEN
68 static const char *http_cdsa_default_path(char *buffer, size_t bufsize);
69 static SecKeychainRef http_cdsa_open_keychain(const char *path, char *filename, size_t filesize);
70 static SecKeychainRef http_cdsa_open_system_keychain(void);
71 #endif /* HAVE_SECKEYCHAINOPEN */
72 static OSStatus http_cdsa_read(SSLConnectionRef connection, void *data, size_t *dataLength);
73 static int http_cdsa_set_credentials(http_t *http);
74 static OSStatus http_cdsa_write(SSLConnectionRef connection, const void *data, size_t *dataLength);
75
76
77 /*
78 * 'cupsMakeServerCredentials()' - Make a self-signed certificate and private key pair.
79 *
80 * @since CUPS 2.0/OS 10.10@
81 */
82
83 int /* O - 1 on success, 0 on failure */
84 cupsMakeServerCredentials(
85 const char *path, /* I - Keychain path or @code NULL@ for default */
86 const char *common_name, /* I - Common name */
87 int num_alt_names, /* I - Number of subject alternate names */
88 const char **alt_names, /* I - Subject Alternate Names */
89 time_t expiration_date) /* I - Expiration date */
90 {
91 #if defined(HAVE_SECGENERATESELFSIGNEDCERTIFICATE)
92 int status = 0; /* Return status */
93 OSStatus err; /* Error code (if any) */
94 CFStringRef cfcommon_name = NULL;
95 /* CF string for server name */
96 SecIdentityRef ident = NULL; /* Identity */
97 SecKeyRef publicKey = NULL,
98 /* Public key */
99 privateKey = NULL;
100 /* Private key */
101 SecCertificateRef cert = NULL; /* Self-signed certificate */
102 CFMutableDictionaryRef keyParams = NULL;
103 /* Key generation parameters */
104
105
106 DEBUG_printf(("cupsMakeServerCredentials(path=\"%s\", common_name=\"%s\", num_alt_names=%d, alt_names=%p, expiration_date=%d)", path, common_name, num_alt_names, alt_names, (int)expiration_date));
107
108 (void)path;
109 (void)num_alt_names;
110 (void)alt_names;
111 (void)expiration_date;
112
113 if (path)
114 {
115 DEBUG_puts("1cupsMakeServerCredentials: No keychain support compiled in, returning 0.");
116 return (0);
117 }
118
119 if (tls_selfsigned)
120 {
121 DEBUG_puts("1cupsMakeServerCredentials: Using existing self-signed cert.");
122 return (1);
123 }
124
125 cfcommon_name = CFStringCreateWithCString(kCFAllocatorDefault, common_name, kCFStringEncodingUTF8);
126 if (!cfcommon_name)
127 {
128 DEBUG_puts("1cupsMakeServerCredentials: Unable to create CF string of common name.");
129 goto cleanup;
130 }
131
132 /*
133 * Create a public/private key pair...
134 */
135
136 keyParams = CFDictionaryCreateMutable(kCFAllocatorDefault, 0, &kCFTypeDictionaryKeyCallBacks, &kCFTypeDictionaryValueCallBacks);
137 if (!keyParams)
138 {
139 DEBUG_puts("1cupsMakeServerCredentials: Unable to create key parameters dictionary.");
140 goto cleanup;
141 }
142
143 CFDictionaryAddValue(keyParams, kSecAttrKeyType, kSecAttrKeyTypeRSA);
144 CFDictionaryAddValue(keyParams, kSecAttrKeySizeInBits, CFSTR("2048"));
145 CFDictionaryAddValue(keyParams, kSecAttrLabel, cfcommon_name);
146
147 err = SecKeyGeneratePair(keyParams, &publicKey, &privateKey);
148 if (err != noErr)
149 {
150 DEBUG_printf(("1cupsMakeServerCredentials: Unable to generate key pair: %d.", (int)err));
151 goto cleanup;
152 }
153
154 /*
155 * Create a self-signed certificate using the public/private key pair...
156 */
157
158 CFIndex usageInt = kSecKeyUsageAll;
159 CFNumberRef usage = CFNumberCreate(kCFAllocatorDefault, kCFNumberCFIndexType, &usageInt);
160 CFIndex lenInt = 0;
161 CFNumberRef len = CFNumberCreate(kCFAllocatorDefault, kCFNumberCFIndexType, &lenInt);
162 CFTypeRef certKeys[] = { kSecCSRBasicContraintsPathLen, kSecSubjectAltName, kSecCertificateKeyUsage };
163 CFTypeRef certValues[] = { len, cfcommon_name, usage };
164 CFDictionaryRef certParams = CFDictionaryCreate(kCFAllocatorDefault, certKeys, certValues, sizeof(certKeys) / sizeof(certKeys[0]), &kCFTypeDictionaryKeyCallBacks, &kCFTypeDictionaryValueCallBacks);
165 CFRelease(usage);
166 CFRelease(len);
167
168 const void *ca_o[] = { kSecOidOrganization, CFSTR("") };
169 const void *ca_cn[] = { kSecOidCommonName, cfcommon_name };
170 CFArrayRef ca_o_dn = CFArrayCreate(kCFAllocatorDefault, ca_o, 2, NULL);
171 CFArrayRef ca_cn_dn = CFArrayCreate(kCFAllocatorDefault, ca_cn, 2, NULL);
172 const void *ca_dn_array[2];
173
174 ca_dn_array[0] = CFArrayCreate(kCFAllocatorDefault, (const void **)&ca_o_dn, 1, NULL);
175 ca_dn_array[1] = CFArrayCreate(kCFAllocatorDefault, (const void **)&ca_cn_dn, 1, NULL);
176
177 CFArrayRef subject = CFArrayCreate(kCFAllocatorDefault, ca_dn_array, 2, NULL);
178
179 cert = SecGenerateSelfSignedCertificate(subject, certParams, publicKey, privateKey);
180
181 CFRelease(subject);
182 CFRelease(certParams);
183
184 if (!cert)
185 {
186 DEBUG_puts("1cupsMakeServerCredentials: Unable to create self-signed certificate.");
187 goto cleanup;
188 }
189
190 ident = SecIdentityCreate(kCFAllocatorDefault, cert, privateKey);
191
192 if (ident)
193 {
194 _cupsMutexLock(&tls_mutex);
195
196 if (tls_selfsigned)
197 CFRelease(ident);
198 else
199 tls_selfsigned = ident;
200
201 _cupsMutexLock(&tls_mutex);
202
203 # if 0 /* Someday perhaps SecItemCopyMatching will work for identities, at which point */
204 CFTypeRef itemKeys[] = { kSecClass, kSecAttrLabel, kSecValueRef };
205 CFTypeRef itemValues[] = { kSecClassIdentity, cfcommon_name, ident };
206 CFDictionaryRef itemAttrs = CFDictionaryCreate(kCFAllocatorDefault, itemKeys, itemValues, sizeof(itemKeys) / sizeof(itemKeys[0]), &kCFTypeDictionaryKeyCallBacks, &kCFTypeDictionaryValueCallBacks);
207
208 err = SecItemAdd(itemAttrs, NULL);
209 /* SecItemAdd consumes itemAttrs... */
210
211 CFRelease(ident);
212
213 if (err != noErr)
214 {
215 DEBUG_printf(("1cupsMakeServerCredentials: Unable to add identity to keychain: %d.", (int)err));
216 goto cleanup;
217 }
218 # endif /* 0 */
219
220 status = 1;
221 }
222 else
223 DEBUG_puts("1cupsMakeServerCredentials: Unable to create identity from cert and keys.");
224
225 /*
226 * Cleanup and return...
227 */
228
229 cleanup:
230
231 if (cfcommon_name)
232 CFRelease(cfcommon_name);
233
234 if (keyParams)
235 CFRelease(keyParams);
236
237 if (cert)
238 CFRelease(cert);
239
240 if (publicKey)
241 CFRelease(publicKey);
242
243 if (privateKey)
244 CFRelease(privateKey);
245
246 DEBUG_printf(("1cupsMakeServerCredentials: Returning %d.", status));
247
248 return (status);
249
250 #else /* !HAVE_SECGENERATESELFSIGNEDCERTIFICATE */
251 int pid, /* Process ID of command */
252 status, /* Status of command */
253 i; /* Looping var */
254 char command[1024], /* Command */
255 *argv[5], /* Command-line arguments */
256 *envp[1000], /* Environment variables */
257 days[32], /* CERTTOOL_EXPIRATION_DAYS env var */
258 keychain[1024], /* Keychain argument */
259 infofile[1024], /* Type-in information for cert */
260 filename[1024]; /* Default keychain path */
261 cups_file_t *fp; /* Seed/info file */
262
263
264 DEBUG_printf(("cupsMakeServerCredentials(path=\"%s\", common_name=\"%s\", num_alt_names=%d, alt_names=%p, expiration_date=%d)", path, common_name, num_alt_names, (void *)alt_names, (int)expiration_date));
265
266 (void)num_alt_names;
267 (void)alt_names;
268
269 if (!path)
270 path = http_cdsa_default_path(filename, sizeof(filename));
271
272 /*
273 * Run the "certtool" command to generate a self-signed certificate...
274 */
275
276 if (!cupsFileFind("certtool", getenv("PATH"), 1, command, sizeof(command)))
277 return (-1);
278
279 /*
280 * Create a file with the certificate information fields...
281 *
282 * Note: This assumes that the default questions are asked by the certtool
283 * command...
284 */
285
286 if ((fp = cupsTempFile2(infofile, sizeof(infofile))) == NULL)
287 return (-1);
288
289 cupsFilePrintf(fp,
290 "CUPS Self-Signed Certificate\n"
291 /* Enter key and certificate label */
292 "r\n" /* Generate RSA key pair */
293 "2048\n" /* 2048 bit encryption key */
294 "y\n" /* OK (y = yes) */
295 "b\n" /* Usage (b=signing/encryption) */
296 "2\n" /* Sign with SHA256 */
297 "y\n" /* OK (y = yes) */
298 "%s\n" /* Common name */
299 "\n" /* Country (default) */
300 "\n" /* Organization (default) */
301 "\n" /* Organizational unit (default) */
302 "\n" /* State/Province (default) */
303 "\n" /* Email address */
304 "y\n", /* OK (y = yes) */
305 common_name);
306 cupsFileClose(fp);
307
308 snprintf(keychain, sizeof(keychain), "k=%s", path);
309
310 argv[0] = "certtool";
311 argv[1] = "c";
312 argv[2] = keychain;
313 argv[3] = NULL;
314
315 snprintf(days, sizeof(days), "CERTTOOL_EXPIRATION_DAYS=%d", (int)((expiration_date - time(NULL) + 86399) / 86400));
316 envp[0] = days;
317 for (i = 0; i < (int)(sizeof(envp) / sizeof(envp[0]) - 2) && environ[i]; i ++)
318 envp[i + 1] = environ[i];
319 envp[i] = NULL;
320
321 posix_spawn_file_actions_t actions; /* File actions */
322
323 posix_spawn_file_actions_init(&actions);
324 posix_spawn_file_actions_addclose(&actions, 0);
325 posix_spawn_file_actions_addopen(&actions, 0, infofile, O_RDONLY, 0);
326 posix_spawn_file_actions_addclose(&actions, 1);
327 posix_spawn_file_actions_addopen(&actions, 1, "/dev/null", O_WRONLY, 0);
328 posix_spawn_file_actions_addclose(&actions, 2);
329 posix_spawn_file_actions_addopen(&actions, 2, "/dev/null", O_WRONLY, 0);
330
331 if (posix_spawn(&pid, command, &actions, NULL, argv, envp))
332 {
333 unlink(infofile);
334 return (-1);
335 }
336
337 posix_spawn_file_actions_destroy(&actions);
338
339 unlink(infofile);
340
341 while (waitpid(pid, &status, 0) < 0)
342 if (errno != EINTR)
343 {
344 status = -1;
345 break;
346 }
347
348 return (!status);
349 #endif /* HAVE_SECGENERATESELFSIGNEDCERTIFICATE && HAVE_SECKEYCHAINOPEN */
350 }
351
352
353 /*
354 * 'cupsSetServerCredentials()' - Set the default server credentials.
355 *
356 * Note: The server credentials are used by all threads in the running process.
357 * This function is threadsafe.
358 *
359 * @since CUPS 2.0/macOS 10.10@
360 */
361
362 int /* O - 1 on success, 0 on failure */
363 cupsSetServerCredentials(
364 const char *path, /* I - Keychain path or @code NULL@ for default */
365 const char *common_name, /* I - Default common name for server */
366 int auto_create) /* I - 1 = automatically create self-signed certificates */
367 {
368 DEBUG_printf(("cupsSetServerCredentials(path=\"%s\", common_name=\"%s\", auto_create=%d)", path, common_name, auto_create));
369
370 #ifdef HAVE_SECKEYCHAINOPEN
371 char filename[1024]; /* Keychain filename */
372 SecKeychainRef keychain = http_cdsa_open_keychain(path, filename, sizeof(filename));
373
374 if (!keychain)
375 {
376 DEBUG_puts("1cupsSetServerCredentials: Unable to open keychain.");
377 return (0);
378 }
379
380 _cupsMutexLock(&tls_mutex);
381
382 /*
383 * Close any keychain that is currently open...
384 */
385
386 if (tls_keychain)
387 CFRelease(tls_keychain);
388
389 if (tls_keypath)
390 _cupsStrFree(tls_keypath);
391
392 if (tls_common_name)
393 _cupsStrFree(tls_common_name);
394
395 /*
396 * Save the new keychain...
397 */
398
399 tls_keychain = keychain;
400 tls_keypath = _cupsStrAlloc(filename);
401 tls_auto_create = auto_create;
402 tls_common_name = _cupsStrAlloc(common_name);
403
404 _cupsMutexUnlock(&tls_mutex);
405
406 DEBUG_puts("1cupsSetServerCredentials: Opened keychain, returning 1.");
407 return (1);
408
409 #else
410 if (path)
411 {
412 DEBUG_puts("1cupsSetServerCredentials: No keychain support compiled in, returning 0.");
413 return (0);
414 }
415
416 tls_auto_create = auto_create;
417 tls_common_name = _cupsStrAlloc(common_name);
418
419 return (1);
420 #endif /* HAVE_SECKEYCHAINOPEN */
421 }
422
423
424 /*
425 * 'httpCopyCredentials()' - Copy the credentials associated with the peer in
426 * an encrypted connection.
427 *
428 * @since CUPS 1.5/macOS 10.7@
429 */
430
431 int /* O - Status of call (0 = success) */
432 httpCopyCredentials(
433 http_t *http, /* I - Connection to server */
434 cups_array_t **credentials) /* O - Array of credentials */
435 {
436 OSStatus error; /* Error code */
437 SecTrustRef peerTrust; /* Peer trust reference */
438 CFIndex count; /* Number of credentials */
439 SecCertificateRef secCert; /* Certificate reference */
440 CFDataRef data; /* Certificate data */
441 int i; /* Looping var */
442
443
444 DEBUG_printf(("httpCopyCredentials(http=%p, credentials=%p)", (void *)http, (void *)credentials));
445
446 if (credentials)
447 *credentials = NULL;
448
449 if (!http || !http->tls || !credentials)
450 return (-1);
451
452 if (!(error = SSLCopyPeerTrust(http->tls, &peerTrust)) && peerTrust)
453 {
454 DEBUG_printf(("2httpCopyCredentials: Peer provided %d certificates.", (int)SecTrustGetCertificateCount(peerTrust)));
455
456 if ((*credentials = cupsArrayNew(NULL, NULL)) != NULL)
457 {
458 count = SecTrustGetCertificateCount(peerTrust);
459
460 for (i = 0; i < count; i ++)
461 {
462 secCert = SecTrustGetCertificateAtIndex(peerTrust, i);
463
464 #ifdef DEBUG
465 CFStringRef cf_name = SecCertificateCopySubjectSummary(secCert);
466 char name[1024];
467 if (cf_name)
468 CFStringGetCString(cf_name, name, sizeof(name), kCFStringEncodingUTF8);
469 else
470 strlcpy(name, "unknown", sizeof(name));
471
472 DEBUG_printf(("2httpCopyCredentials: Certificate %d name is \"%s\".", i, name));
473 #endif /* DEBUG */
474
475 if ((data = SecCertificateCopyData(secCert)) != NULL)
476 {
477 DEBUG_printf(("2httpCopyCredentials: Adding %d byte certificate blob.", (int)CFDataGetLength(data)));
478
479 httpAddCredential(*credentials, CFDataGetBytePtr(data), (size_t)CFDataGetLength(data));
480 CFRelease(data);
481 }
482 }
483 }
484
485 CFRelease(peerTrust);
486 }
487
488 return (error);
489 }
490
491
492 /*
493 * '_httpCreateCredentials()' - Create credentials in the internal format.
494 */
495
496 http_tls_credentials_t /* O - Internal credentials */
497 _httpCreateCredentials(
498 cups_array_t *credentials) /* I - Array of credentials */
499 {
500 CFMutableArrayRef peerCerts; /* Peer credentials reference */
501 SecCertificateRef secCert; /* Certificate reference */
502 http_credential_t *credential; /* Credential data */
503
504
505 if (!credentials)
506 return (NULL);
507
508 if ((peerCerts = CFArrayCreateMutable(kCFAllocatorDefault,
509 cupsArrayCount(credentials),
510 &kCFTypeArrayCallBacks)) == NULL)
511 return (NULL);
512
513 for (credential = (http_credential_t *)cupsArrayFirst(credentials);
514 credential;
515 credential = (http_credential_t *)cupsArrayNext(credentials))
516 {
517 if ((secCert = http_cdsa_create_credential(credential)) != NULL)
518 {
519 CFArrayAppendValue(peerCerts, secCert);
520 CFRelease(secCert);
521 }
522 }
523
524 return (peerCerts);
525 }
526
527
528 /*
529 * 'httpCredentialsAreValidForName()' - Return whether the credentials are valid for the given name.
530 *
531 * @since CUPS 2.0/macOS 10.10@
532 */
533
534 int /* O - 1 if valid, 0 otherwise */
535 httpCredentialsAreValidForName(
536 cups_array_t *credentials, /* I - Credentials */
537 const char *common_name) /* I - Name to check */
538 {
539 SecCertificateRef secCert; /* Certificate reference */
540 CFStringRef cfcert_name = NULL;
541 /* Certificate's common name (CF string) */
542 char cert_name[256]; /* Certificate's common name (C string) */
543 int valid = 1; /* Valid name? */
544
545
546 if ((secCert = http_cdsa_create_credential((http_credential_t *)cupsArrayFirst(credentials))) == NULL)
547 return (0);
548
549 /*
550 * Compare the common names...
551 */
552
553 if ((cfcert_name = SecCertificateCopySubjectSummary(secCert)) == NULL)
554 {
555 /*
556 * Can't get common name, cannot be valid...
557 */
558
559 valid = 0;
560 }
561 else if (CFStringGetCString(cfcert_name, cert_name, sizeof(cert_name), kCFStringEncodingUTF8) &&
562 _cups_strcasecmp(common_name, cert_name))
563 {
564 /*
565 * Not an exact match for the common name, check for wildcard certs...
566 */
567
568 const char *domain = strchr(common_name, '.');
569 /* Domain in common name */
570
571 if (strncmp(cert_name, "*.", 2) || !domain || _cups_strcasecmp(domain, cert_name + 1))
572 {
573 /*
574 * Not a wildcard match.
575 */
576
577 /* TODO: Check subject alternate names */
578 valid = 0;
579 }
580 }
581
582 if (cfcert_name)
583 CFRelease(cfcert_name);
584
585 CFRelease(secCert);
586
587 return (valid);
588 }
589
590
591 /*
592 * 'httpCredentialsGetTrust()' - Return the trust of credentials.
593 *
594 * @since CUPS 2.0/macOS 10.10@
595 */
596
597 http_trust_t /* O - Level of trust */
598 httpCredentialsGetTrust(
599 cups_array_t *credentials, /* I - Credentials */
600 const char *common_name) /* I - Common name for trust lookup */
601 {
602 SecCertificateRef secCert; /* Certificate reference */
603 http_trust_t trust = HTTP_TRUST_OK;
604 /* Trusted? */
605 cups_array_t *tcreds = NULL; /* Trusted credentials */
606 _cups_globals_t *cg = _cupsGlobals();
607 /* Per-thread globals */
608
609
610 if (!common_name)
611 {
612 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("No common name specified."), 1);
613 return (HTTP_TRUST_UNKNOWN);
614 }
615
616 if ((secCert = http_cdsa_create_credential((http_credential_t *)cupsArrayFirst(credentials))) == NULL)
617 {
618 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Unable to create credentials from array."), 1);
619 return (HTTP_TRUST_UNKNOWN);
620 }
621
622 if (cg->any_root < 0)
623 _cupsSetDefaults();
624
625 /*
626 * Look this common name up in the default keychains...
627 */
628
629 httpLoadCredentials(NULL, &tcreds, common_name);
630
631 if (tcreds)
632 {
633 char credentials_str[1024], /* String for incoming credentials */
634 tcreds_str[1024]; /* String for saved credentials */
635
636 httpCredentialsString(credentials, credentials_str, sizeof(credentials_str));
637 httpCredentialsString(tcreds, tcreds_str, sizeof(tcreds_str));
638
639 if (strcmp(credentials_str, tcreds_str))
640 {
641 /*
642 * Credentials don't match, let's look at the expiration date of the new
643 * credentials and allow if the new ones have a later expiration...
644 */
645
646 if (!cg->trust_first)
647 {
648 /*
649 * Do not trust certificates on first use...
650 */
651
652 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Trust on first use is disabled."), 1);
653
654 trust = HTTP_TRUST_INVALID;
655 }
656 else if (httpCredentialsGetExpiration(credentials) <= httpCredentialsGetExpiration(tcreds))
657 {
658 /*
659 * The new credentials are not newly issued...
660 */
661
662 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("New credentials are older than stored credentials."), 1);
663
664 trust = HTTP_TRUST_INVALID;
665 }
666 else if (!httpCredentialsAreValidForName(credentials, common_name))
667 {
668 /*
669 * The common name does not match the issued certificate...
670 */
671
672 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("New credentials are not valid for name."), 1);
673
674 trust = HTTP_TRUST_INVALID;
675 }
676 else if (httpCredentialsGetExpiration(tcreds) < time(NULL))
677 {
678 /*
679 * Save the renewed credentials...
680 */
681
682 trust = HTTP_TRUST_RENEWED;
683
684 httpSaveCredentials(NULL, credentials, common_name);
685 }
686 }
687
688 httpFreeCredentials(tcreds);
689 }
690 else if (cg->validate_certs && !httpCredentialsAreValidForName(credentials, common_name))
691 {
692 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("No stored credentials, not valid for name."), 1);
693 trust = HTTP_TRUST_INVALID;
694 }
695 else if (!cg->trust_first)
696 {
697 /*
698 * See if we have a site CA certificate we can compare...
699 */
700
701 if (!httpLoadCredentials(NULL, &tcreds, "site"))
702 {
703 if (cupsArrayCount(credentials) != (cupsArrayCount(tcreds) + 1))
704 {
705 /*
706 * Certificate isn't directly generated from the CA cert...
707 */
708
709 trust = HTTP_TRUST_INVALID;
710 }
711 else
712 {
713 /*
714 * Do a tail comparison of the two certificates...
715 */
716
717 http_credential_t *a, *b; /* Certificates */
718
719 for (a = (http_credential_t *)cupsArrayFirst(tcreds), b = (http_credential_t *)cupsArrayIndex(credentials, 1);
720 a && b;
721 a = (http_credential_t *)cupsArrayNext(tcreds), b = (http_credential_t *)cupsArrayNext(credentials))
722 if (a->datalen != b->datalen || memcmp(a->data, b->data, a->datalen))
723 break;
724
725 if (a || b)
726 trust = HTTP_TRUST_INVALID;
727 }
728
729 if (trust != HTTP_TRUST_OK)
730 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Credentials do not validate against site CA certificate."), 1);
731 }
732 else
733 {
734 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Trust on first use is disabled."), 1);
735 trust = HTTP_TRUST_INVALID;
736 }
737 }
738
739 if (trust == HTTP_TRUST_OK && !cg->expired_certs && !SecCertificateIsValid(secCert, CFAbsoluteTimeGetCurrent()))
740 {
741 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Credentials have expired."), 1);
742 trust = HTTP_TRUST_EXPIRED;
743 }
744
745 if (trust == HTTP_TRUST_OK && !cg->any_root && cupsArrayCount(credentials) == 1)
746 {
747 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Self-signed credentials are blocked."), 1);
748 trust = HTTP_TRUST_INVALID;
749 }
750
751 CFRelease(secCert);
752
753 return (trust);
754 }
755
756
757 /*
758 * 'httpCredentialsGetExpiration()' - Return the expiration date of the credentials.
759 *
760 * @since CUPS 2.0/macOS 10.10@
761 */
762
763 time_t /* O - Expiration date of credentials */
764 httpCredentialsGetExpiration(
765 cups_array_t *credentials) /* I - Credentials */
766 {
767 SecCertificateRef secCert; /* Certificate reference */
768 time_t expiration; /* Expiration date */
769
770
771 if ((secCert = http_cdsa_create_credential((http_credential_t *)cupsArrayFirst(credentials))) == NULL)
772 return (0);
773
774 expiration = (time_t)(SecCertificateNotValidAfter(secCert) + kCFAbsoluteTimeIntervalSince1970);
775
776 CFRelease(secCert);
777
778 return (expiration);
779 }
780
781
782 /*
783 * 'httpCredentialsString()' - Return a string representing the credentials.
784 *
785 * @since CUPS 2.0/macOS 10.10@
786 */
787
788 size_t /* O - Total size of credentials string */
789 httpCredentialsString(
790 cups_array_t *credentials, /* I - Credentials */
791 char *buffer, /* I - Buffer or @code NULL@ */
792 size_t bufsize) /* I - Size of buffer */
793 {
794 http_credential_t *first; /* First certificate */
795 SecCertificateRef secCert; /* Certificate reference */
796
797
798 DEBUG_printf(("httpCredentialsString(credentials=%p, buffer=%p, bufsize=" CUPS_LLFMT ")", (void *)credentials, (void *)buffer, CUPS_LLCAST bufsize));
799
800 if (!buffer)
801 return (0);
802
803 if (buffer && bufsize > 0)
804 *buffer = '\0';
805
806 if ((first = (http_credential_t *)cupsArrayFirst(credentials)) != NULL &&
807 (secCert = http_cdsa_create_credential(first)) != NULL)
808 {
809 CFStringRef cf_name; /* CF common name string */
810 char name[256]; /* Common name associated with cert */
811 time_t expiration; /* Expiration date of cert */
812 unsigned char md5_digest[16]; /* MD5 result */
813
814 if ((cf_name = SecCertificateCopySubjectSummary(secCert)) != NULL)
815 {
816 CFStringGetCString(cf_name, name, (CFIndex)sizeof(name), kCFStringEncodingUTF8);
817 CFRelease(cf_name);
818 }
819 else
820 strlcpy(name, "unknown", sizeof(name));
821
822 expiration = (time_t)(SecCertificateNotValidAfter(secCert) + kCFAbsoluteTimeIntervalSince1970);
823
824 cupsHashData("md5", first->data, first->datalen, md5_digest, sizeof(md5_digest));
825
826 snprintf(buffer, bufsize, "%s / %s / %02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X%02X", name, httpGetDateString(expiration), md5_digest[0], md5_digest[1], md5_digest[2], md5_digest[3], md5_digest[4], md5_digest[5], md5_digest[6], md5_digest[7], md5_digest[8], md5_digest[9], md5_digest[10], md5_digest[11], md5_digest[12], md5_digest[13], md5_digest[14], md5_digest[15]);
827
828 CFRelease(secCert);
829 }
830
831 DEBUG_printf(("1httpCredentialsString: Returning \"%s\".", buffer));
832
833 return (strlen(buffer));
834 }
835
836
837 /*
838 * '_httpFreeCredentials()' - Free internal credentials.
839 */
840
841 void
842 _httpFreeCredentials(
843 http_tls_credentials_t credentials) /* I - Internal credentials */
844 {
845 if (!credentials)
846 return;
847
848 CFRelease(credentials);
849 }
850
851
852 /*
853 * 'httpLoadCredentials()' - Load X.509 credentials from a keychain file.
854 *
855 * @since CUPS 2.0/OS 10.10@
856 */
857
858 int /* O - 0 on success, -1 on error */
859 httpLoadCredentials(
860 const char *path, /* I - Keychain path or @code NULL@ for default */
861 cups_array_t **credentials, /* IO - Credentials */
862 const char *common_name) /* I - Common name for credentials */
863 {
864 OSStatus err; /* Error info */
865 #ifdef HAVE_SECKEYCHAINOPEN
866 char filename[1024]; /* Filename for keychain */
867 SecKeychainRef keychain = NULL,/* Keychain reference */
868 syschain = NULL;/* System keychain */
869 CFArrayRef list; /* Keychain list */
870 #endif /* HAVE_SECKEYCHAINOPEN */
871 SecCertificateRef cert = NULL; /* Certificate */
872 CFDataRef data; /* Certificate data */
873 SecPolicyRef policy = NULL; /* Policy ref */
874 CFStringRef cfcommon_name = NULL;
875 /* Server name */
876 CFMutableDictionaryRef query = NULL; /* Query qualifiers */
877
878
879 DEBUG_printf(("httpLoadCredentials(path=\"%s\", credentials=%p, common_name=\"%s\")", path, (void *)credentials, common_name));
880
881 if (!credentials)
882 return (-1);
883
884 *credentials = NULL;
885
886 #ifdef HAVE_SECKEYCHAINOPEN
887 keychain = http_cdsa_open_keychain(path, filename, sizeof(filename));
888
889 if (!keychain)
890 goto cleanup;
891
892 syschain = http_cdsa_open_system_keychain();
893
894 #else
895 if (path)
896 return (-1);
897 #endif /* HAVE_SECKEYCHAINOPEN */
898
899 cfcommon_name = CFStringCreateWithCString(kCFAllocatorDefault, common_name, kCFStringEncodingUTF8);
900
901 policy = SecPolicyCreateSSL(1, cfcommon_name);
902
903 if (cfcommon_name)
904 CFRelease(cfcommon_name);
905
906 if (!policy)
907 goto cleanup;
908
909 if (!(query = CFDictionaryCreateMutable(kCFAllocatorDefault, 0, &kCFTypeDictionaryKeyCallBacks, &kCFTypeDictionaryValueCallBacks)))
910 goto cleanup;
911
912 CFDictionaryAddValue(query, kSecClass, kSecClassCertificate);
913 CFDictionaryAddValue(query, kSecMatchPolicy, policy);
914 CFDictionaryAddValue(query, kSecReturnRef, kCFBooleanTrue);
915 CFDictionaryAddValue(query, kSecMatchLimit, kSecMatchLimitOne);
916
917 #ifdef HAVE_SECKEYCHAINOPEN
918 if (syschain)
919 {
920 const void *values[2] = { syschain, keychain };
921
922 list = CFArrayCreate(kCFAllocatorDefault, (const void **)values, 2, &kCFTypeArrayCallBacks);
923 }
924 else
925 list = CFArrayCreate(kCFAllocatorDefault, (const void **)&keychain, 1, &kCFTypeArrayCallBacks);
926 CFDictionaryAddValue(query, kSecMatchSearchList, list);
927 CFRelease(list);
928 #endif /* HAVE_SECKEYCHAINOPEN */
929
930 err = SecItemCopyMatching(query, (CFTypeRef *)&cert);
931
932 if (err)
933 goto cleanup;
934
935 if (CFGetTypeID(cert) != SecCertificateGetTypeID())
936 goto cleanup;
937
938 if ((data = SecCertificateCopyData(cert)) != NULL)
939 {
940 DEBUG_printf(("1httpLoadCredentials: Adding %d byte certificate blob.", (int)CFDataGetLength(data)));
941
942 *credentials = cupsArrayNew(NULL, NULL);
943 httpAddCredential(*credentials, CFDataGetBytePtr(data), (size_t)CFDataGetLength(data));
944 CFRelease(data);
945 }
946
947 cleanup :
948
949 #ifdef HAVE_SECKEYCHAINOPEN
950 if (keychain)
951 CFRelease(keychain);
952
953 if (syschain)
954 CFRelease(syschain);
955 #endif /* HAVE_SECKEYCHAINOPEN */
956 if (cert)
957 CFRelease(cert);
958 if (policy)
959 CFRelease(policy);
960 if (query)
961 CFRelease(query);
962
963 DEBUG_printf(("1httpLoadCredentials: Returning %d.", *credentials ? 0 : -1));
964
965 return (*credentials ? 0 : -1);
966 }
967
968
969 /*
970 * 'httpSaveCredentials()' - Save X.509 credentials to a keychain file.
971 *
972 * @since CUPS 2.0/OS 10.10@
973 */
974
975 int /* O - -1 on error, 0 on success */
976 httpSaveCredentials(
977 const char *path, /* I - Keychain path or @code NULL@ for default */
978 cups_array_t *credentials, /* I - Credentials */
979 const char *common_name) /* I - Common name for credentials */
980 {
981 int ret = -1; /* Return value */
982 OSStatus err; /* Error info */
983 #ifdef HAVE_SECKEYCHAINOPEN
984 char filename[1024]; /* Filename for keychain */
985 SecKeychainRef keychain = NULL;/* Keychain reference */
986 CFArrayRef list; /* Keychain list */
987 #endif /* HAVE_SECKEYCHAINOPEN */
988 SecCertificateRef cert = NULL; /* Certificate */
989 CFMutableDictionaryRef attrs = NULL; /* Attributes for add */
990
991
992 DEBUG_printf(("httpSaveCredentials(path=\"%s\", credentials=%p, common_name=\"%s\")", path, (void *)credentials, common_name));
993 if (!credentials)
994 goto cleanup;
995
996 if (!httpCredentialsAreValidForName(credentials, common_name))
997 {
998 DEBUG_puts("1httpSaveCredentials: Common name does not match.");
999 return (-1);
1000 }
1001
1002 if ((cert = http_cdsa_create_credential((http_credential_t *)cupsArrayFirst(credentials))) == NULL)
1003 {
1004 DEBUG_puts("1httpSaveCredentials: Unable to create certificate.");
1005 goto cleanup;
1006 }
1007
1008 #ifdef HAVE_SECKEYCHAINOPEN
1009 keychain = http_cdsa_open_keychain(path, filename, sizeof(filename));
1010
1011 if (!keychain)
1012 goto cleanup;
1013
1014 #else
1015 if (path)
1016 return (-1);
1017 #endif /* HAVE_SECKEYCHAINOPEN */
1018
1019 if ((attrs = CFDictionaryCreateMutable(kCFAllocatorDefault, 0, &kCFTypeDictionaryKeyCallBacks, &kCFTypeDictionaryValueCallBacks)) == NULL)
1020 {
1021 DEBUG_puts("1httpSaveCredentials: Unable to create dictionary.");
1022 goto cleanup;
1023 }
1024
1025 CFDictionaryAddValue(attrs, kSecClass, kSecClassCertificate);
1026 CFDictionaryAddValue(attrs, kSecValueRef, cert);
1027
1028 #ifdef HAVE_SECKEYCHAINOPEN
1029 if ((list = CFArrayCreate(kCFAllocatorDefault, (const void **)&keychain, 1, &kCFTypeArrayCallBacks)) == NULL)
1030 {
1031 DEBUG_puts("1httpSaveCredentials: Unable to create list of keychains.");
1032 goto cleanup;
1033 }
1034 CFDictionaryAddValue(attrs, kSecMatchSearchList, list);
1035 CFRelease(list);
1036 #endif /* HAVE_SECKEYCHAINOPEN */
1037
1038 /* Note: SecItemAdd consumes "attrs"... */
1039 err = SecItemAdd(attrs, NULL);
1040 DEBUG_printf(("1httpSaveCredentials: SecItemAdd returned %d.", (int)err));
1041
1042 cleanup :
1043
1044 #ifdef HAVE_SECKEYCHAINOPEN
1045 if (keychain)
1046 CFRelease(keychain);
1047 #endif /* HAVE_SECKEYCHAINOPEN */
1048 if (cert)
1049 CFRelease(cert);
1050
1051 DEBUG_printf(("1httpSaveCredentials: Returning %d.", ret));
1052
1053 return (ret);
1054 }
1055
1056
1057 /*
1058 * '_httpTLSInitialize()' - Initialize the TLS stack.
1059 */
1060
1061 void
1062 _httpTLSInitialize(void)
1063 {
1064 /*
1065 * Nothing to do...
1066 */
1067 }
1068
1069
1070 /*
1071 * '_httpTLSPending()' - Return the number of pending TLS-encrypted bytes.
1072 */
1073
1074 size_t
1075 _httpTLSPending(http_t *http) /* I - HTTP connection */
1076 {
1077 size_t bytes; /* Bytes that are available */
1078
1079
1080 if (!SSLGetBufferedReadSize(http->tls, &bytes))
1081 return (bytes);
1082
1083 return (0);
1084 }
1085
1086
1087 /*
1088 * '_httpTLSRead()' - Read from a SSL/TLS connection.
1089 */
1090
1091 int /* O - Bytes read */
1092 _httpTLSRead(http_t *http, /* I - HTTP connection */
1093 char *buf, /* I - Buffer to store data */
1094 int len) /* I - Length of buffer */
1095 {
1096 int result; /* Return value */
1097 OSStatus error; /* Error info */
1098 size_t processed; /* Number of bytes processed */
1099
1100
1101 error = SSLRead(http->tls, buf, (size_t)len, &processed);
1102 DEBUG_printf(("6_httpTLSRead: error=%d, processed=%d", (int)error,
1103 (int)processed));
1104 switch (error)
1105 {
1106 case 0 :
1107 result = (int)processed;
1108 break;
1109
1110 case errSSLWouldBlock :
1111 if (processed)
1112 result = (int)processed;
1113 else
1114 {
1115 result = -1;
1116 errno = EINTR;
1117 }
1118 break;
1119
1120 case errSSLClosedGraceful :
1121 default :
1122 if (processed)
1123 result = (int)processed;
1124 else
1125 {
1126 result = -1;
1127 errno = EPIPE;
1128 }
1129 break;
1130 }
1131
1132 return (result);
1133 }
1134
1135
1136 /*
1137 * '_httpTLSSetOptions()' - Set TLS protocol and cipher suite options.
1138 */
1139
1140 void
1141 _httpTLSSetOptions(int options, /* I - Options */
1142 int min_version, /* I - Minimum TLS version */
1143 int max_version) /* I - Maximum TLS version */
1144 {
1145 if (!(options & _HTTP_TLS_SET_DEFAULT) || tls_options < 0)
1146 {
1147 tls_options = options;
1148 tls_min_version = min_version;
1149 tls_max_version = max_version;
1150 }
1151 }
1152
1153
1154 /*
1155 * '_httpTLSStart()' - Set up SSL/TLS support on a connection.
1156 */
1157
1158 int /* O - 0 on success, -1 on failure */
1159 _httpTLSStart(http_t *http) /* I - HTTP connection */
1160 {
1161 char hostname[256], /* Hostname */
1162 *hostptr; /* Pointer into hostname */
1163 _cups_globals_t *cg = _cupsGlobals();
1164 /* Pointer to library globals */
1165 OSStatus error; /* Error code */
1166 const char *message = NULL;/* Error message */
1167 cups_array_t *credentials; /* Credentials array */
1168 cups_array_t *names; /* CUPS distinguished names */
1169 CFArrayRef dn_array; /* CF distinguished names array */
1170 CFIndex count; /* Number of credentials */
1171 CFDataRef data; /* Certificate data */
1172 int i; /* Looping var */
1173 http_credential_t *credential; /* Credential data */
1174
1175
1176 DEBUG_printf(("3_httpTLSStart(http=%p)", (void *)http));
1177
1178 if (tls_options < 0)
1179 {
1180 DEBUG_puts("4_httpTLSStart: Setting defaults.");
1181 _cupsSetDefaults();
1182 DEBUG_printf(("4_httpTLSStart: tls_options=%x, tls_min_version=%d, tls_max_version=%d", tls_options, tls_min_version, tls_max_version));
1183 }
1184
1185 #ifdef HAVE_SECKEYCHAINOPEN
1186 if (http->mode == _HTTP_MODE_SERVER && !tls_keychain)
1187 {
1188 DEBUG_puts("4_httpTLSStart: cupsSetServerCredentials not called.");
1189 http->error = errno = EINVAL;
1190 http->status = HTTP_STATUS_ERROR;
1191 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Server credentials not set."), 1);
1192
1193 return (-1);
1194 }
1195 #endif /* HAVE_SECKEYCHAINOPEN */
1196
1197 if ((http->tls = SSLCreateContext(kCFAllocatorDefault, http->mode == _HTTP_MODE_CLIENT ? kSSLClientSide : kSSLServerSide, kSSLStreamType)) == NULL)
1198 {
1199 DEBUG_puts("4_httpTLSStart: SSLCreateContext failed.");
1200 http->error = errno = ENOMEM;
1201 http->status = HTTP_STATUS_ERROR;
1202 _cupsSetHTTPError(HTTP_STATUS_ERROR);
1203
1204 return (-1);
1205 }
1206
1207 error = SSLSetConnection(http->tls, http);
1208 DEBUG_printf(("4_httpTLSStart: SSLSetConnection, error=%d", (int)error));
1209
1210 if (!error)
1211 {
1212 error = SSLSetIOFuncs(http->tls, http_cdsa_read, http_cdsa_write);
1213 DEBUG_printf(("4_httpTLSStart: SSLSetIOFuncs, error=%d", (int)error));
1214 }
1215
1216 if (!error)
1217 {
1218 error = SSLSetSessionOption(http->tls, kSSLSessionOptionBreakOnServerAuth,
1219 true);
1220 DEBUG_printf(("4_httpTLSStart: SSLSetSessionOption, error=%d", (int)error));
1221 }
1222
1223 if (!error)
1224 {
1225 static const SSLProtocol protocols[] = /* Min/max protocol versions */
1226 {
1227 kSSLProtocol3,
1228 kTLSProtocol1,
1229 kTLSProtocol11,
1230 kTLSProtocol12,
1231 kTLSProtocol13,
1232 kTLSProtocolMaxSupported
1233 };
1234
1235 error = SSLSetProtocolVersionMin(http->tls, protocols[tls_min_version]);
1236 DEBUG_printf(("4_httpTLSStart: SSLSetProtocolVersionMin(%d), error=%d", protocols[tls_min_version], (int)error));
1237
1238 if (!error)
1239 {
1240 error = SSLSetProtocolVersionMax(http->tls, protocols[tls_max_version]);
1241 DEBUG_printf(("4_httpTLSStart: SSLSetProtocolVersionMax(%d), error=%d", protocols[tls_max_version], (int)error));
1242 }
1243 }
1244
1245 # if HAVE_SSLSETENABLEDCIPHERS
1246 if (!error)
1247 {
1248 SSLCipherSuite supported[100]; /* Supported cipher suites */
1249 size_t num_supported; /* Number of supported cipher suites */
1250 SSLCipherSuite enabled[100]; /* Cipher suites to enable */
1251 size_t num_enabled; /* Number of cipher suites to enable */
1252
1253 num_supported = sizeof(supported) / sizeof(supported[0]);
1254 error = SSLGetSupportedCiphers(http->tls, supported, &num_supported);
1255
1256 if (!error)
1257 {
1258 DEBUG_printf(("4_httpTLSStart: %d cipher suites supported.", (int)num_supported));
1259
1260 for (i = 0, num_enabled = 0; i < (int)num_supported && num_enabled < (sizeof(enabled) / sizeof(enabled[0])); i ++)
1261 {
1262 switch (supported[i])
1263 {
1264 /* Obviously insecure cipher suites that we never want to use */
1265 case SSL_NULL_WITH_NULL_NULL :
1266 case SSL_RSA_WITH_NULL_MD5 :
1267 case SSL_RSA_WITH_NULL_SHA :
1268 case SSL_RSA_EXPORT_WITH_RC4_40_MD5 :
1269 case SSL_RSA_EXPORT_WITH_RC2_CBC_40_MD5 :
1270 case SSL_RSA_EXPORT_WITH_DES40_CBC_SHA :
1271 case SSL_RSA_WITH_DES_CBC_SHA :
1272 case SSL_DH_DSS_EXPORT_WITH_DES40_CBC_SHA :
1273 case SSL_DH_DSS_WITH_DES_CBC_SHA :
1274 case SSL_DH_RSA_EXPORT_WITH_DES40_CBC_SHA :
1275 case SSL_DH_RSA_WITH_DES_CBC_SHA :
1276 case SSL_DHE_DSS_EXPORT_WITH_DES40_CBC_SHA :
1277 case SSL_DHE_DSS_WITH_DES_CBC_SHA :
1278 case SSL_DHE_RSA_EXPORT_WITH_DES40_CBC_SHA :
1279 case SSL_DHE_RSA_WITH_DES_CBC_SHA :
1280 case SSL_DH_anon_EXPORT_WITH_RC4_40_MD5 :
1281 case SSL_DH_anon_WITH_RC4_128_MD5 :
1282 case SSL_DH_anon_EXPORT_WITH_DES40_CBC_SHA :
1283 case SSL_DH_anon_WITH_DES_CBC_SHA :
1284 case SSL_DH_anon_WITH_3DES_EDE_CBC_SHA :
1285 case SSL_FORTEZZA_DMS_WITH_NULL_SHA :
1286 case TLS_DH_anon_WITH_AES_128_CBC_SHA :
1287 case TLS_DH_anon_WITH_AES_256_CBC_SHA :
1288 case TLS_ECDH_ECDSA_WITH_NULL_SHA :
1289 case TLS_ECDHE_RSA_WITH_NULL_SHA :
1290 case TLS_ECDH_anon_WITH_NULL_SHA :
1291 case TLS_ECDH_anon_WITH_RC4_128_SHA :
1292 case TLS_ECDH_anon_WITH_3DES_EDE_CBC_SHA :
1293 case TLS_ECDH_anon_WITH_AES_128_CBC_SHA :
1294 case TLS_ECDH_anon_WITH_AES_256_CBC_SHA :
1295 case TLS_RSA_WITH_NULL_SHA256 :
1296 case TLS_DH_anon_WITH_AES_128_CBC_SHA256 :
1297 case TLS_DH_anon_WITH_AES_256_CBC_SHA256 :
1298 case TLS_PSK_WITH_NULL_SHA :
1299 case TLS_DHE_PSK_WITH_NULL_SHA :
1300 case TLS_RSA_PSK_WITH_NULL_SHA :
1301 case TLS_DH_anon_WITH_AES_128_GCM_SHA256 :
1302 case TLS_DH_anon_WITH_AES_256_GCM_SHA384 :
1303 case TLS_PSK_WITH_NULL_SHA256 :
1304 case TLS_PSK_WITH_NULL_SHA384 :
1305 case TLS_DHE_PSK_WITH_NULL_SHA256 :
1306 case TLS_DHE_PSK_WITH_NULL_SHA384 :
1307 case TLS_RSA_PSK_WITH_NULL_SHA256 :
1308 case TLS_RSA_PSK_WITH_NULL_SHA384 :
1309 case SSL_RSA_WITH_DES_CBC_MD5 :
1310 DEBUG_printf(("4_httpTLSStart: Excluding insecure cipher suite %d", supported[i]));
1311 break;
1312
1313 /* RC4 cipher suites that should only be used as a last resort */
1314 case SSL_RSA_WITH_RC4_128_MD5 :
1315 case SSL_RSA_WITH_RC4_128_SHA :
1316 case TLS_ECDH_ECDSA_WITH_RC4_128_SHA :
1317 case TLS_ECDHE_ECDSA_WITH_RC4_128_SHA :
1318 case TLS_ECDH_RSA_WITH_RC4_128_SHA :
1319 case TLS_ECDHE_RSA_WITH_RC4_128_SHA :
1320 case TLS_PSK_WITH_RC4_128_SHA :
1321 case TLS_DHE_PSK_WITH_RC4_128_SHA :
1322 case TLS_RSA_PSK_WITH_RC4_128_SHA :
1323 if (tls_options & _HTTP_TLS_ALLOW_RC4)
1324 enabled[num_enabled ++] = supported[i];
1325 else
1326 DEBUG_printf(("4_httpTLSStart: Excluding RC4 cipher suite %d", supported[i]));
1327 break;
1328
1329 /* DH/DHE cipher suites that are problematic with parameters < 1024 bits */
1330 case TLS_DH_DSS_WITH_AES_128_CBC_SHA :
1331 case TLS_DH_RSA_WITH_AES_128_CBC_SHA :
1332 case TLS_DHE_DSS_WITH_AES_128_CBC_SHA :
1333 case TLS_DHE_RSA_WITH_AES_128_CBC_SHA :
1334 case TLS_DH_DSS_WITH_AES_256_CBC_SHA :
1335 case TLS_DH_RSA_WITH_AES_256_CBC_SHA :
1336 case TLS_DHE_DSS_WITH_AES_256_CBC_SHA :
1337 case TLS_DHE_RSA_WITH_AES_256_CBC_SHA :
1338 case TLS_DH_DSS_WITH_3DES_EDE_CBC_SHA :
1339 case TLS_DH_RSA_WITH_3DES_EDE_CBC_SHA :
1340 case TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA :
1341 case TLS_DH_DSS_WITH_AES_128_CBC_SHA256 :
1342 case TLS_DH_RSA_WITH_AES_128_CBC_SHA256 :
1343 case TLS_DHE_DSS_WITH_AES_128_CBC_SHA256 :
1344 case TLS_DHE_RSA_WITH_AES_128_CBC_SHA256 :
1345 case TLS_DH_DSS_WITH_AES_256_CBC_SHA256 :
1346 case TLS_DH_RSA_WITH_AES_256_CBC_SHA256 :
1347 case TLS_DHE_DSS_WITH_AES_256_CBC_SHA256 :
1348 case TLS_DHE_RSA_WITH_AES_256_CBC_SHA256 :
1349 case TLS_DHE_PSK_WITH_3DES_EDE_CBC_SHA :
1350 case TLS_DHE_PSK_WITH_AES_128_CBC_SHA :
1351 case TLS_DHE_PSK_WITH_AES_256_CBC_SHA :
1352 case TLS_DHE_PSK_WITH_AES_128_CBC_SHA256 :
1353 case TLS_DHE_PSK_WITH_AES_256_CBC_SHA384 :
1354 if (tls_options & _HTTP_TLS_DENY_CBC)
1355 {
1356 DEBUG_printf(("4_httpTLSStart: Excluding CBC cipher suite %d", supported[i]));
1357 break;
1358 }
1359
1360 // case TLS_DHE_RSA_WITH_AES_128_GCM_SHA256 :
1361 // case TLS_DHE_RSA_WITH_AES_256_GCM_SHA384 :
1362 case TLS_DH_RSA_WITH_AES_128_GCM_SHA256 :
1363 case TLS_DH_RSA_WITH_AES_256_GCM_SHA384 :
1364 // case TLS_DHE_DSS_WITH_AES_128_GCM_SHA256 :
1365 // case TLS_DHE_DSS_WITH_AES_256_GCM_SHA384 :
1366 case TLS_DH_DSS_WITH_AES_128_GCM_SHA256 :
1367 case TLS_DH_DSS_WITH_AES_256_GCM_SHA384 :
1368 case TLS_DHE_PSK_WITH_AES_128_GCM_SHA256 :
1369 case TLS_DHE_PSK_WITH_AES_256_GCM_SHA384 :
1370 if (tls_options & _HTTP_TLS_ALLOW_DH)
1371 enabled[num_enabled ++] = supported[i];
1372 else
1373 DEBUG_printf(("4_httpTLSStart: Excluding DH/DHE cipher suite %d", supported[i]));
1374 break;
1375
1376 case TLS_DHE_DSS_WITH_3DES_EDE_CBC_SHA :
1377 case TLS_ECDHE_ECDSA_WITH_AES_128_CBC_SHA256 :
1378 case TLS_ECDHE_ECDSA_WITH_AES_256_CBC_SHA384 :
1379 case TLS_ECDH_ECDSA_WITH_AES_128_CBC_SHA256 :
1380 case TLS_ECDH_ECDSA_WITH_AES_256_CBC_SHA384 :
1381 case TLS_ECDHE_RSA_WITH_AES_128_CBC_SHA256 :
1382 case TLS_ECDHE_RSA_WITH_AES_256_CBC_SHA384 :
1383 case TLS_ECDH_RSA_WITH_AES_128_CBC_SHA256 :
1384 case TLS_ECDH_RSA_WITH_AES_256_CBC_SHA384 :
1385 case TLS_RSA_WITH_3DES_EDE_CBC_SHA :
1386 case TLS_RSA_WITH_AES_128_CBC_SHA :
1387 case TLS_RSA_WITH_AES_256_CBC_SHA :
1388 if (tls_options & _HTTP_TLS_DENY_CBC)
1389 {
1390 DEBUG_printf(("4_httpTLSStart: Excluding CBC cipher suite %d", supported[i]));
1391 break;
1392 }
1393
1394 /* Anything else we'll assume is "secure" */
1395 default :
1396 enabled[num_enabled ++] = supported[i];
1397 break;
1398 }
1399 }
1400
1401 DEBUG_printf(("4_httpTLSStart: %d cipher suites enabled.", (int)num_enabled));
1402 error = SSLSetEnabledCiphers(http->tls, enabled, num_enabled);
1403 }
1404 }
1405 #endif /* HAVE_SSLSETENABLEDCIPHERS */
1406
1407 if (!error && http->mode == _HTTP_MODE_CLIENT)
1408 {
1409 /*
1410 * Client: set client-side credentials, if any...
1411 */
1412
1413 if (cg->client_cert_cb)
1414 {
1415 error = SSLSetSessionOption(http->tls,
1416 kSSLSessionOptionBreakOnCertRequested, true);
1417 DEBUG_printf(("4_httpTLSStart: kSSLSessionOptionBreakOnCertRequested, "
1418 "error=%d", (int)error));
1419 }
1420 else
1421 {
1422 error = http_cdsa_set_credentials(http);
1423 DEBUG_printf(("4_httpTLSStart: http_cdsa_set_credentials, error=%d",
1424 (int)error));
1425 }
1426 }
1427 else if (!error)
1428 {
1429 /*
1430 * Server: find/create a certificate for TLS...
1431 */
1432
1433 if (http->fields[HTTP_FIELD_HOST][0])
1434 {
1435 /*
1436 * Use hostname for TLS upgrade...
1437 */
1438
1439 strlcpy(hostname, http->fields[HTTP_FIELD_HOST], sizeof(hostname));
1440 }
1441 else
1442 {
1443 /*
1444 * Resolve hostname from connection address...
1445 */
1446
1447 http_addr_t addr; /* Connection address */
1448 socklen_t addrlen; /* Length of address */
1449
1450 addrlen = sizeof(addr);
1451 if (getsockname(http->fd, (struct sockaddr *)&addr, &addrlen))
1452 {
1453 DEBUG_printf(("4_httpTLSStart: Unable to get socket address: %s", strerror(errno)));
1454 hostname[0] = '\0';
1455 }
1456 else if (httpAddrLocalhost(&addr))
1457 hostname[0] = '\0';
1458 else
1459 {
1460 httpAddrLookup(&addr, hostname, sizeof(hostname));
1461 DEBUG_printf(("4_httpTLSStart: Resolved socket address to \"%s\".", hostname));
1462 }
1463 }
1464
1465 if (isdigit(hostname[0] & 255) || hostname[0] == '[')
1466 hostname[0] = '\0'; /* Don't allow numeric addresses */
1467
1468 if (hostname[0])
1469 http->tls_credentials = http_cdsa_copy_server(hostname);
1470 else if (tls_common_name)
1471 http->tls_credentials = http_cdsa_copy_server(tls_common_name);
1472
1473 if (!http->tls_credentials && tls_auto_create && (hostname[0] || tls_common_name))
1474 {
1475 DEBUG_printf(("4_httpTLSStart: Auto-create credentials for \"%s\".", hostname[0] ? hostname : tls_common_name));
1476
1477 if (!cupsMakeServerCredentials(tls_keypath, hostname[0] ? hostname : tls_common_name, 0, NULL, time(NULL) + 365 * 86400))
1478 {
1479 DEBUG_puts("4_httpTLSStart: cupsMakeServerCredentials failed.");
1480 http->error = errno = EINVAL;
1481 http->status = HTTP_STATUS_ERROR;
1482 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Unable to create server credentials."), 1);
1483
1484 return (-1);
1485 }
1486
1487 http->tls_credentials = http_cdsa_copy_server(hostname[0] ? hostname : tls_common_name);
1488 }
1489
1490 if (!http->tls_credentials)
1491 {
1492 DEBUG_puts("4_httpTLSStart: Unable to find server credentials.");
1493 http->error = errno = EINVAL;
1494 http->status = HTTP_STATUS_ERROR;
1495 _cupsSetError(IPP_STATUS_ERROR_INTERNAL, _("Unable to find server credentials."), 1);
1496
1497 return (-1);
1498 }
1499
1500 error = SSLSetCertificate(http->tls, http->tls_credentials);
1501
1502 DEBUG_printf(("4_httpTLSStart: SSLSetCertificate, error=%d", (int)error));
1503 }
1504
1505 DEBUG_printf(("4_httpTLSStart: tls_credentials=%p", (void *)http->tls_credentials));
1506
1507 /*
1508 * Let the server know which hostname/domain we are trying to connect to
1509 * in case it wants to serve up a certificate with a matching common name.
1510 */
1511
1512 if (!error && http->mode == _HTTP_MODE_CLIENT)
1513 {
1514 /*
1515 * Client: get the hostname to use for TLS...
1516 */
1517
1518 if (httpAddrLocalhost(http->hostaddr))
1519 {
1520 strlcpy(hostname, "localhost", sizeof(hostname));
1521 }
1522 else
1523 {
1524 /*
1525 * Otherwise make sure the hostname we have does not end in a trailing dot.
1526 */
1527
1528 strlcpy(hostname, http->hostname, sizeof(hostname));
1529 if ((hostptr = hostname + strlen(hostname) - 1) >= hostname &&
1530 *hostptr == '.')
1531 *hostptr = '\0';
1532 }
1533
1534 error = SSLSetPeerDomainName(http->tls, hostname, strlen(hostname));
1535
1536 DEBUG_printf(("4_httpTLSStart: SSLSetPeerDomainName, error=%d", (int)error));
1537 }
1538
1539 if (!error)
1540 {
1541 int done = 0; /* Are we done yet? */
1542
1543 while (!error && !done)
1544 {
1545 error = SSLHandshake(http->tls);
1546
1547 DEBUG_printf(("4_httpTLSStart: SSLHandshake returned %d.", (int)error));
1548
1549 switch (error)
1550 {
1551 case noErr :
1552 done = 1;
1553 break;
1554
1555 case errSSLWouldBlock :
1556 error = noErr; /* Force a retry */
1557 usleep(1000); /* in 1 millisecond */
1558 break;
1559
1560 case errSSLServerAuthCompleted :
1561 error = 0;
1562 if (cg->server_cert_cb)
1563 {
1564 error = httpCopyCredentials(http, &credentials);
1565 if (!error)
1566 {
1567 error = (cg->server_cert_cb)(http, http->tls, credentials,
1568 cg->server_cert_data);
1569 httpFreeCredentials(credentials);
1570 }
1571
1572 DEBUG_printf(("4_httpTLSStart: Server certificate callback "
1573 "returned %d.", (int)error));
1574 }
1575 break;
1576
1577 case errSSLClientCertRequested :
1578 error = 0;
1579
1580 if (cg->client_cert_cb)
1581 {
1582 names = NULL;
1583 if (!(error = SSLCopyDistinguishedNames(http->tls, &dn_array)) &&
1584 dn_array)
1585 {
1586 if ((names = cupsArrayNew(NULL, NULL)) != NULL)
1587 {
1588 for (i = 0, count = CFArrayGetCount(dn_array); i < count; i++)
1589 {
1590 data = (CFDataRef)CFArrayGetValueAtIndex(dn_array, i);
1591
1592 if ((credential = malloc(sizeof(*credential))) != NULL)
1593 {
1594 credential->datalen = (size_t)CFDataGetLength(data);
1595 if ((credential->data = malloc(credential->datalen)))
1596 {
1597 memcpy((void *)credential->data, CFDataGetBytePtr(data),
1598 credential->datalen);
1599 cupsArrayAdd(names, credential);
1600 }
1601 else
1602 free(credential);
1603 }
1604 }
1605 }
1606
1607 CFRelease(dn_array);
1608 }
1609
1610 if (!error)
1611 {
1612 error = (cg->client_cert_cb)(http, http->tls, names,
1613 cg->client_cert_data);
1614
1615 DEBUG_printf(("4_httpTLSStart: Client certificate callback "
1616 "returned %d.", (int)error));
1617 }
1618
1619 httpFreeCredentials(names);
1620 }
1621 break;
1622
1623 case errSSLUnknownRootCert :
1624 message = _("Unable to establish a secure connection to host "
1625 "(untrusted certificate).");
1626 break;
1627
1628 case errSSLNoRootCert :
1629 message = _("Unable to establish a secure connection to host "
1630 "(self-signed certificate).");
1631 break;
1632
1633 case errSSLCertExpired :
1634 message = _("Unable to establish a secure connection to host "
1635 "(expired certificate).");
1636 break;
1637
1638 case errSSLCertNotYetValid :
1639 message = _("Unable to establish a secure connection to host "
1640 "(certificate not yet valid).");
1641 break;
1642
1643 case errSSLHostNameMismatch :
1644 message = _("Unable to establish a secure connection to host "
1645 "(host name mismatch).");
1646 break;
1647
1648 case errSSLXCertChainInvalid :
1649 message = _("Unable to establish a secure connection to host "
1650 "(certificate chain invalid).");
1651 break;
1652
1653 case errSSLConnectionRefused :
1654 message = _("Unable to establish a secure connection to host "
1655 "(peer dropped connection before responding).");
1656 break;
1657
1658 default :
1659 break;
1660 }
1661 }
1662 }
1663
1664 if (error)
1665 {
1666 http->error = error;
1667 http->status = HTTP_STATUS_ERROR;
1668 errno = ECONNREFUSED;
1669
1670 CFRelease(http->tls);
1671 http->tls = NULL;
1672
1673 /*
1674 * If an error string wasn't set by the callbacks use a generic one...
1675 */
1676
1677 if (!message)
1678 #ifdef HAVE_CSSMERRORSTRING
1679 message = cssmErrorString(error);
1680 #else
1681 message = _("Unable to establish a secure connection to host.");
1682 #endif /* HAVE_CSSMERRORSTRING */
1683
1684 _cupsSetError(IPP_STATUS_ERROR_CUPS_PKI, message, 1);
1685
1686 return (-1);
1687 }
1688
1689 return (0);
1690 }
1691
1692
1693 /*
1694 * '_httpTLSStop()' - Shut down SSL/TLS on a connection.
1695 */
1696
1697 void
1698 _httpTLSStop(http_t *http) /* I - HTTP connection */
1699 {
1700 while (SSLClose(http->tls) == errSSLWouldBlock)
1701 usleep(1000);
1702
1703 CFRelease(http->tls);
1704
1705 if (http->tls_credentials)
1706 CFRelease(http->tls_credentials);
1707
1708 http->tls = NULL;
1709 http->tls_credentials = NULL;
1710 }
1711
1712
1713 /*
1714 * '_httpTLSWrite()' - Write to a SSL/TLS connection.
1715 */
1716
1717 int /* O - Bytes written */
1718 _httpTLSWrite(http_t *http, /* I - HTTP connection */
1719 const char *buf, /* I - Buffer holding data */
1720 int len) /* I - Length of buffer */
1721 {
1722 ssize_t result; /* Return value */
1723 OSStatus error; /* Error info */
1724 size_t processed; /* Number of bytes processed */
1725
1726
1727 DEBUG_printf(("2_httpTLSWrite(http=%p, buf=%p, len=%d)", (void *)http, (void *)buf, len));
1728
1729 error = SSLWrite(http->tls, buf, (size_t)len, &processed);
1730
1731 switch (error)
1732 {
1733 case 0 :
1734 result = (int)processed;
1735 break;
1736
1737 case errSSLWouldBlock :
1738 if (processed)
1739 {
1740 result = (int)processed;
1741 }
1742 else
1743 {
1744 result = -1;
1745 errno = EINTR;
1746 }
1747 break;
1748
1749 case errSSLClosedGraceful :
1750 default :
1751 if (processed)
1752 {
1753 result = (int)processed;
1754 }
1755 else
1756 {
1757 result = -1;
1758 errno = EPIPE;
1759 }
1760 break;
1761 }
1762
1763 DEBUG_printf(("3_httpTLSWrite: Returning %d.", (int)result));
1764
1765 return ((int)result);
1766 }
1767
1768
1769 /*
1770 * 'http_cdsa_copy_server()' - Find and copy server credentials from the keychain.
1771 */
1772
1773 static CFArrayRef /* O - Array of certificates or NULL */
1774 http_cdsa_copy_server(
1775 const char *common_name) /* I - Server's hostname */
1776 {
1777 #ifdef HAVE_SECKEYCHAINOPEN
1778 OSStatus err; /* Error info */
1779 SecIdentityRef identity = NULL;/* Identity */
1780 CFArrayRef certificates = NULL;
1781 /* Certificate array */
1782 SecPolicyRef policy = NULL; /* Policy ref */
1783 CFStringRef cfcommon_name = NULL;
1784 /* Server name */
1785 CFMutableDictionaryRef query = NULL; /* Query qualifiers */
1786 CFArrayRef list = NULL; /* Keychain list */
1787 SecKeychainRef syschain = NULL;/* System keychain */
1788 SecKeychainStatus status = 0; /* Keychain status */
1789
1790
1791 DEBUG_printf(("3http_cdsa_copy_server(common_name=\"%s\")", common_name));
1792
1793 cfcommon_name = CFStringCreateWithCString(kCFAllocatorDefault, common_name, kCFStringEncodingUTF8);
1794
1795 policy = SecPolicyCreateSSL(1, cfcommon_name);
1796
1797 if (!policy)
1798 {
1799 DEBUG_puts("4http_cdsa_copy_server: Unable to create SSL policy.");
1800 goto cleanup;
1801 }
1802
1803 if (!(query = CFDictionaryCreateMutable(kCFAllocatorDefault, 0, &kCFTypeDictionaryKeyCallBacks, &kCFTypeDictionaryValueCallBacks)))
1804 {
1805 DEBUG_puts("4http_cdsa_copy_server: Unable to create query dictionary.");
1806 goto cleanup;
1807 }
1808
1809 _cupsMutexLock(&tls_mutex);
1810
1811 err = SecKeychainGetStatus(tls_keychain, &status);
1812
1813 if (err == noErr && !(status & kSecUnlockStateStatus) && tls_cups_keychain)
1814 SecKeychainUnlock(tls_keychain, _CUPS_CDSA_PASSLEN, _CUPS_CDSA_PASSWORD, TRUE);
1815
1816 CFDictionaryAddValue(query, kSecClass, kSecClassIdentity);
1817 CFDictionaryAddValue(query, kSecMatchPolicy, policy);
1818 CFDictionaryAddValue(query, kSecReturnRef, kCFBooleanTrue);
1819 CFDictionaryAddValue(query, kSecMatchLimit, kSecMatchLimitOne);
1820
1821 syschain = http_cdsa_open_system_keychain();
1822
1823 if (syschain)
1824 {
1825 const void *values[2] = { syschain, tls_keychain };
1826
1827 list = CFArrayCreate(kCFAllocatorDefault, (const void **)values, 2, &kCFTypeArrayCallBacks);
1828 }
1829 else
1830 list = CFArrayCreate(kCFAllocatorDefault, (const void **)&tls_keychain, 1, &kCFTypeArrayCallBacks);
1831
1832 CFDictionaryAddValue(query, kSecMatchSearchList, list);
1833 CFRelease(list);
1834
1835 err = SecItemCopyMatching(query, (CFTypeRef *)&identity);
1836
1837 _cupsMutexUnlock(&tls_mutex);
1838
1839 if (err != noErr)
1840 {
1841 DEBUG_printf(("4http_cdsa_copy_server: SecItemCopyMatching failed with status %d.", (int)err));
1842 goto cleanup;
1843 }
1844
1845 if (CFGetTypeID(identity) != SecIdentityGetTypeID())
1846 {
1847 DEBUG_puts("4http_cdsa_copy_server: Search returned something that is not an identity.");
1848 goto cleanup;
1849 }
1850
1851 if ((certificates = CFArrayCreate(NULL, (const void **)&identity, 1, &kCFTypeArrayCallBacks)) == NULL)
1852 {
1853 DEBUG_puts("4http_cdsa_copy_server: Unable to create array of certificates.");
1854 goto cleanup;
1855 }
1856
1857 cleanup :
1858
1859 if (syschain)
1860 CFRelease(syschain);
1861 if (identity)
1862 CFRelease(identity);
1863 if (policy)
1864 CFRelease(policy);
1865 if (cfcommon_name)
1866 CFRelease(cfcommon_name);
1867 if (query)
1868 CFRelease(query);
1869
1870 DEBUG_printf(("4http_cdsa_copy_server: Returning %p.", (void *)certificates));
1871
1872 return (certificates);
1873 #else
1874
1875 if (!tls_selfsigned)
1876 return (NULL);
1877
1878 return (CFArrayCreate(NULL, (const void **)&tls_selfsigned, 1, &kCFTypeArrayCallBacks));
1879 #endif /* HAVE_SECKEYCHAINOPEN */
1880 }
1881
1882
1883 /*
1884 * 'http_cdsa_create_credential()' - Create a single credential in the internal format.
1885 */
1886
1887 static SecCertificateRef /* O - Certificate */
1888 http_cdsa_create_credential(
1889 http_credential_t *credential) /* I - Credential */
1890 {
1891 if (!credential)
1892 return (NULL);
1893
1894 return (SecCertificateCreateWithBytes(kCFAllocatorDefault, credential->data, (CFIndex)credential->datalen));
1895 }
1896
1897
1898 #ifdef HAVE_SECKEYCHAINOPEN
1899 /*
1900 * 'http_cdsa_default_path()' - Get the default keychain path.
1901 */
1902
1903 static const char * /* O - Keychain path */
1904 http_cdsa_default_path(char *buffer, /* I - Path buffer */
1905 size_t bufsize) /* I - Size of buffer */
1906 {
1907 const char *home = getenv("HOME"); /* HOME environment variable */
1908
1909
1910 /*
1911 * Determine the default keychain path. Note that the login and system
1912 * keychains are no longer accessible to user applications starting in macOS
1913 * 10.11.4 (!), so we need to create our own keychain just for CUPS.
1914 */
1915
1916 if (getuid() && home)
1917 snprintf(buffer, bufsize, "%s/.cups/ssl.keychain", home);
1918 else
1919 strlcpy(buffer, "/etc/cups/ssl.keychain", bufsize);
1920
1921 DEBUG_printf(("1http_cdsa_default_path: Using default path \"%s\".", buffer));
1922
1923 return (buffer);
1924 }
1925
1926
1927 /*
1928 * 'http_cdsa_open_keychain()' - Open (or create) a keychain.
1929 */
1930
1931 static SecKeychainRef /* O - Keychain or NULL */
1932 http_cdsa_open_keychain(
1933 const char *path, /* I - Path to keychain */
1934 char *filename, /* I - Keychain filename */
1935 size_t filesize) /* I - Size of filename buffer */
1936 {
1937 SecKeychainRef keychain = NULL;/* Temporary keychain */
1938 OSStatus err; /* Error code */
1939 Boolean interaction; /* Interaction allowed? */
1940 SecKeychainStatus status = 0; /* Keychain status */
1941
1942
1943 /*
1944 * Get the keychain filename...
1945 */
1946
1947 if (!path)
1948 {
1949 path = http_cdsa_default_path(filename, filesize);
1950 tls_cups_keychain = 1;
1951 }
1952 else
1953 {
1954 strlcpy(filename, path, filesize);
1955 tls_cups_keychain = 0;
1956 }
1957
1958 /*
1959 * Save the interaction setting and disable while we open the keychain...
1960 */
1961
1962 SecKeychainGetUserInteractionAllowed(&interaction);
1963 SecKeychainSetUserInteractionAllowed(FALSE);
1964
1965 if (access(path, R_OK) && tls_cups_keychain)
1966 {
1967 /*
1968 * Create a new keychain at the given path...
1969 */
1970
1971 err = SecKeychainCreate(path, _CUPS_CDSA_PASSLEN, _CUPS_CDSA_PASSWORD, FALSE, NULL, &keychain);
1972 }
1973 else
1974 {
1975 /*
1976 * Open the existing keychain and unlock as needed...
1977 */
1978
1979 err = SecKeychainOpen(path, &keychain);
1980
1981 if (err == noErr)
1982 err = SecKeychainGetStatus(keychain, &status);
1983
1984 if (err == noErr && !(status & kSecUnlockStateStatus) && tls_cups_keychain)
1985 err = SecKeychainUnlock(keychain, _CUPS_CDSA_PASSLEN, _CUPS_CDSA_PASSWORD, TRUE);
1986 }
1987
1988 /*
1989 * Restore interaction setting...
1990 */
1991
1992 SecKeychainSetUserInteractionAllowed(interaction);
1993
1994 /*
1995 * Release the keychain if we had any errors...
1996 */
1997
1998 if (err != noErr)
1999 {
2000 /* TODO: Set cups last error string */
2001 DEBUG_printf(("4http_cdsa_open_keychain: Unable to open keychain (%d), returning NULL.", (int)err));
2002
2003 if (keychain)
2004 {
2005 CFRelease(keychain);
2006 keychain = NULL;
2007 }
2008 }
2009
2010 /*
2011 * Return the keychain or NULL...
2012 */
2013
2014 return (keychain);
2015 }
2016
2017
2018 /*
2019 * 'http_cdsa_open_system_keychain()' - Open the System keychain.
2020 */
2021
2022 static SecKeychainRef
2023 http_cdsa_open_system_keychain(void)
2024 {
2025 SecKeychainRef keychain = NULL;/* Temporary keychain */
2026 OSStatus err; /* Error code */
2027 Boolean interaction; /* Interaction allowed? */
2028 SecKeychainStatus status = 0; /* Keychain status */
2029
2030
2031 /*
2032 * Save the interaction setting and disable while we open the keychain...
2033 */
2034
2035 SecKeychainGetUserInteractionAllowed(&interaction);
2036 SecKeychainSetUserInteractionAllowed(TRUE);
2037
2038 err = SecKeychainOpen("/Library/Keychains/System.keychain", &keychain);
2039
2040 if (err == noErr)
2041 err = SecKeychainGetStatus(keychain, &status);
2042
2043 if (err == noErr && !(status & kSecUnlockStateStatus))
2044 err = errSecInteractionNotAllowed;
2045
2046 /*
2047 * Restore interaction setting...
2048 */
2049
2050 SecKeychainSetUserInteractionAllowed(interaction);
2051
2052 /*
2053 * Release the keychain if we had any errors...
2054 */
2055
2056 if (err != noErr)
2057 {
2058 /* TODO: Set cups last error string */
2059 DEBUG_printf(("4http_cdsa_open_system_keychain: Unable to open keychain (%d), returning NULL.", (int)err));
2060
2061 if (keychain)
2062 {
2063 CFRelease(keychain);
2064 keychain = NULL;
2065 }
2066 }
2067
2068 /*
2069 * Return the keychain or NULL...
2070 */
2071
2072 return (keychain);
2073 }
2074 #endif /* HAVE_SECKEYCHAINOPEN */
2075
2076
2077 /*
2078 * 'http_cdsa_read()' - Read function for the CDSA library.
2079 */
2080
2081 static OSStatus /* O - -1 on error, 0 on success */
2082 http_cdsa_read(
2083 SSLConnectionRef connection, /* I - SSL/TLS connection */
2084 void *data, /* I - Data buffer */
2085 size_t *dataLength) /* IO - Number of bytes */
2086 {
2087 OSStatus result; /* Return value */
2088 ssize_t bytes; /* Number of bytes read */
2089 http_t *http; /* HTTP connection */
2090
2091
2092 http = (http_t *)connection;
2093
2094 if (!http->blocking)
2095 {
2096 /*
2097 * Make sure we have data before we read...
2098 */
2099
2100 while (!_httpWait(http, http->wait_value, 0))
2101 {
2102 if (http->timeout_cb && (*http->timeout_cb)(http, http->timeout_data))
2103 continue;
2104
2105 http->error = ETIMEDOUT;
2106 return (-1);
2107 }
2108 }
2109
2110 do
2111 {
2112 bytes = recv(http->fd, data, *dataLength, 0);
2113 }
2114 while (bytes == -1 && (errno == EINTR || errno == EAGAIN));
2115
2116 if ((size_t)bytes == *dataLength)
2117 {
2118 result = 0;
2119 }
2120 else if (bytes > 0)
2121 {
2122 *dataLength = (size_t)bytes;
2123 result = errSSLWouldBlock;
2124 }
2125 else
2126 {
2127 *dataLength = 0;
2128
2129 if (bytes == 0)
2130 result = errSSLClosedGraceful;
2131 else if (errno == EAGAIN)
2132 result = errSSLWouldBlock;
2133 else
2134 result = errSSLClosedAbort;
2135 }
2136
2137 return (result);
2138 }
2139
2140
2141 /*
2142 * 'http_cdsa_set_credentials()' - Set the TLS credentials.
2143 */
2144
2145 static int /* O - Status of connection */
2146 http_cdsa_set_credentials(http_t *http) /* I - HTTP connection */
2147 {
2148 _cups_globals_t *cg = _cupsGlobals(); /* Pointer to library globals */
2149 OSStatus error = 0; /* Error code */
2150 http_tls_credentials_t credentials = NULL;
2151 /* TLS credentials */
2152
2153
2154 DEBUG_printf(("7http_tls_set_credentials(%p)", (void *)http));
2155
2156 /*
2157 * Prefer connection specific credentials...
2158 */
2159
2160 if ((credentials = http->tls_credentials) == NULL)
2161 credentials = cg->tls_credentials;
2162
2163 if (credentials)
2164 {
2165 error = SSLSetCertificate(http->tls, credentials);
2166 DEBUG_printf(("4http_tls_set_credentials: SSLSetCertificate, error=%d",
2167 (int)error));
2168 }
2169 else
2170 DEBUG_puts("4http_tls_set_credentials: No credentials to set.");
2171
2172 return (error);
2173 }
2174
2175
2176 /*
2177 * 'http_cdsa_write()' - Write function for the CDSA library.
2178 */
2179
2180 static OSStatus /* O - -1 on error, 0 on success */
2181 http_cdsa_write(
2182 SSLConnectionRef connection, /* I - SSL/TLS connection */
2183 const void *data, /* I - Data buffer */
2184 size_t *dataLength) /* IO - Number of bytes */
2185 {
2186 OSStatus result; /* Return value */
2187 ssize_t bytes; /* Number of bytes read */
2188 http_t *http; /* HTTP connection */
2189
2190
2191 http = (http_t *)connection;
2192
2193 do
2194 {
2195 bytes = write(http->fd, data, *dataLength);
2196 }
2197 while (bytes == -1 && (errno == EINTR || errno == EAGAIN));
2198
2199 if ((size_t)bytes == *dataLength)
2200 {
2201 result = 0;
2202 }
2203 else if (bytes >= 0)
2204 {
2205 *dataLength = (size_t)bytes;
2206 result = errSSLWouldBlock;
2207 }
2208 else
2209 {
2210 *dataLength = 0;
2211
2212 if (errno == EAGAIN)
2213 result = errSSLWouldBlock;
2214 else
2215 result = errSSLClosedAbort;
2216 }
2217
2218 return (result);
2219 }
Unnamed repository; edit this file 'description' to name the repository.