[331] | 1 | /***************************************************************************
|
---|
| 2 | * _ _ ____ _
|
---|
| 3 | * Project ___| | | | _ \| |
|
---|
| 4 | * / __| | | | |_) | |
|
---|
| 5 | * | (__| |_| | _ <| |___
|
---|
| 6 | * \___|\___/|_| \_\_____|
|
---|
| 7 | *
|
---|
| 8 | * Copyright (C) 1998 - 2016, Daniel Stenberg, <daniel@haxx.se>, et al.
|
---|
| 9 | *
|
---|
| 10 | * This software is licensed as described in the file COPYING, which
|
---|
| 11 | * you should have received as part of this distribution. The terms
|
---|
| 12 | * are also available at https://curl.haxx.se/docs/copyright.html.
|
---|
| 13 | *
|
---|
| 14 | * You may opt to use, copy, modify, merge, publish, distribute and/or sell
|
---|
| 15 | * copies of the Software, and permit persons to whom the Software is
|
---|
| 16 | * furnished to do so, under the terms of the COPYING file.
|
---|
| 17 | *
|
---|
| 18 | * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
---|
| 19 | * KIND, either express or implied.
|
---|
| 20 | *
|
---|
| 21 | ***************************************************************************/
|
---|
| 22 |
|
---|
| 23 | #include "curl_setup.h"
|
---|
| 24 |
|
---|
| 25 | #if defined(USE_GSKIT) || defined(USE_NSS) || defined(USE_GNUTLS) || \
|
---|
| 26 | defined(USE_CYASSL) || defined(USE_SCHANNEL)
|
---|
| 27 |
|
---|
| 28 | #include <curl/curl.h>
|
---|
| 29 | #include "urldata.h"
|
---|
| 30 | #include "strcase.h"
|
---|
| 31 | #include "hostcheck.h"
|
---|
| 32 | #include "vtls/vtls.h"
|
---|
| 33 | #include "sendf.h"
|
---|
| 34 | #include "inet_pton.h"
|
---|
| 35 | #include "curl_base64.h"
|
---|
| 36 | #include "x509asn1.h"
|
---|
| 37 |
|
---|
| 38 | /* The last 3 #include files should be in this order */
|
---|
| 39 | #include "curl_printf.h"
|
---|
| 40 | #include "curl_memory.h"
|
---|
| 41 | #include "memdebug.h"
|
---|
| 42 |
|
---|
| 43 | /* For overflow checks. */
|
---|
| 44 | #define CURL_SIZE_T_MAX ((size_t)-1)
|
---|
| 45 |
|
---|
| 46 |
|
---|
| 47 | /* ASN.1 OIDs. */
|
---|
| 48 | static const char cnOID[] = "2.5.4.3"; /* Common name. */
|
---|
| 49 | static const char sanOID[] = "2.5.29.17"; /* Subject alternative name. */
|
---|
| 50 |
|
---|
| 51 | static const curl_OID OIDtable[] = {
|
---|
| 52 | { "1.2.840.10040.4.1", "dsa" },
|
---|
| 53 | { "1.2.840.10040.4.3", "dsa-with-sha1" },
|
---|
| 54 | { "1.2.840.10045.2.1", "ecPublicKey" },
|
---|
| 55 | { "1.2.840.10045.3.0.1", "c2pnb163v1" },
|
---|
| 56 | { "1.2.840.10045.4.1", "ecdsa-with-SHA1" },
|
---|
| 57 | { "1.2.840.10046.2.1", "dhpublicnumber" },
|
---|
| 58 | { "1.2.840.113549.1.1.1", "rsaEncryption" },
|
---|
| 59 | { "1.2.840.113549.1.1.2", "md2WithRSAEncryption" },
|
---|
| 60 | { "1.2.840.113549.1.1.4", "md5WithRSAEncryption" },
|
---|
| 61 | { "1.2.840.113549.1.1.5", "sha1WithRSAEncryption" },
|
---|
| 62 | { "1.2.840.113549.1.1.10", "RSASSA-PSS" },
|
---|
| 63 | { "1.2.840.113549.1.1.14", "sha224WithRSAEncryption" },
|
---|
| 64 | { "1.2.840.113549.1.1.11", "sha256WithRSAEncryption" },
|
---|
| 65 | { "1.2.840.113549.1.1.12", "sha384WithRSAEncryption" },
|
---|
| 66 | { "1.2.840.113549.1.1.13", "sha512WithRSAEncryption" },
|
---|
| 67 | { "1.2.840.113549.2.2", "md2" },
|
---|
| 68 | { "1.2.840.113549.2.5", "md5" },
|
---|
| 69 | { "1.3.14.3.2.26", "sha1" },
|
---|
| 70 | { cnOID, "CN" },
|
---|
| 71 | { "2.5.4.4", "SN" },
|
---|
| 72 | { "2.5.4.5", "serialNumber" },
|
---|
| 73 | { "2.5.4.6", "C" },
|
---|
| 74 | { "2.5.4.7", "L" },
|
---|
| 75 | { "2.5.4.8", "ST" },
|
---|
| 76 | { "2.5.4.9", "streetAddress" },
|
---|
| 77 | { "2.5.4.10", "O" },
|
---|
| 78 | { "2.5.4.11", "OU" },
|
---|
| 79 | { "2.5.4.12", "title" },
|
---|
| 80 | { "2.5.4.13", "description" },
|
---|
| 81 | { "2.5.4.17", "postalCode" },
|
---|
| 82 | { "2.5.4.41", "name" },
|
---|
| 83 | { "2.5.4.42", "givenName" },
|
---|
| 84 | { "2.5.4.43", "initials" },
|
---|
| 85 | { "2.5.4.44", "generationQualifier" },
|
---|
| 86 | { "2.5.4.45", "X500UniqueIdentifier" },
|
---|
| 87 | { "2.5.4.46", "dnQualifier" },
|
---|
| 88 | { "2.5.4.65", "pseudonym" },
|
---|
| 89 | { "1.2.840.113549.1.9.1", "emailAddress" },
|
---|
| 90 | { "2.5.4.72", "role" },
|
---|
| 91 | { sanOID, "subjectAltName" },
|
---|
| 92 | { "2.5.29.18", "issuerAltName" },
|
---|
| 93 | { "2.5.29.19", "basicConstraints" },
|
---|
| 94 | { "2.16.840.1.101.3.4.2.4", "sha224" },
|
---|
| 95 | { "2.16.840.1.101.3.4.2.1", "sha256" },
|
---|
| 96 | { "2.16.840.1.101.3.4.2.2", "sha384" },
|
---|
| 97 | { "2.16.840.1.101.3.4.2.3", "sha512" },
|
---|
| 98 | { (const char *) NULL, (const char *) NULL }
|
---|
| 99 | };
|
---|
| 100 |
|
---|
| 101 | /*
|
---|
| 102 | * Lightweight ASN.1 parser.
|
---|
| 103 | * In particular, it does not check for syntactic/lexical errors.
|
---|
| 104 | * It is intended to support certificate information gathering for SSL backends
|
---|
| 105 | * that offer a mean to get certificates as a whole, but do not supply
|
---|
| 106 | * entry points to get particular certificate sub-fields.
|
---|
| 107 | * Please note there is no pretention here to rewrite a full SSL library.
|
---|
| 108 | */
|
---|
| 109 |
|
---|
| 110 |
|
---|
| 111 | const char *Curl_getASN1Element(curl_asn1Element *elem,
|
---|
| 112 | const char *beg, const char *end)
|
---|
| 113 | {
|
---|
| 114 | unsigned char b;
|
---|
| 115 | unsigned long len;
|
---|
| 116 | curl_asn1Element lelem;
|
---|
| 117 |
|
---|
| 118 | /* Get a single ASN.1 element into `elem', parse ASN.1 string at `beg'
|
---|
| 119 | ending at `end'.
|
---|
| 120 | Returns a pointer in source string after the parsed element, or NULL
|
---|
| 121 | if an error occurs. */
|
---|
| 122 | if(!beg || !end || beg >= end || !*beg ||
|
---|
| 123 | (size_t)(end - beg) > CURL_ASN1_MAX)
|
---|
| 124 | return (const char *) NULL;
|
---|
| 125 |
|
---|
| 126 | /* Process header byte. */
|
---|
| 127 | elem->header = beg;
|
---|
| 128 | b = (unsigned char) *beg++;
|
---|
| 129 | elem->constructed = (b & 0x20) != 0;
|
---|
| 130 | elem->class = (b >> 6) & 3;
|
---|
| 131 | b &= 0x1F;
|
---|
| 132 | if(b == 0x1F)
|
---|
| 133 | return (const char *) NULL; /* Long tag values not supported here. */
|
---|
| 134 | elem->tag = b;
|
---|
| 135 |
|
---|
| 136 | /* Process length. */
|
---|
| 137 | if(beg >= end)
|
---|
| 138 | return (const char *) NULL;
|
---|
| 139 | b = (unsigned char) *beg++;
|
---|
| 140 | if(!(b & 0x80))
|
---|
| 141 | len = b;
|
---|
| 142 | else if(!(b &= 0x7F)) {
|
---|
| 143 | /* Unspecified length. Since we have all the data, we can determine the
|
---|
| 144 | effective length by skipping element until an end element is found. */
|
---|
| 145 | if(!elem->constructed)
|
---|
| 146 | return (const char *) NULL;
|
---|
| 147 | elem->beg = beg;
|
---|
| 148 | while(beg < end && *beg) {
|
---|
| 149 | beg = Curl_getASN1Element(&lelem, beg, end);
|
---|
| 150 | if(!beg)
|
---|
| 151 | return (const char *) NULL;
|
---|
| 152 | }
|
---|
| 153 | if(beg >= end)
|
---|
| 154 | return (const char *) NULL;
|
---|
| 155 | elem->end = beg;
|
---|
| 156 | return beg + 1;
|
---|
| 157 | }
|
---|
| 158 | else if((unsigned)b > (size_t)(end - beg))
|
---|
| 159 | return (const char *) NULL; /* Does not fit in source. */
|
---|
| 160 | else {
|
---|
| 161 | /* Get long length. */
|
---|
| 162 | len = 0;
|
---|
| 163 | do {
|
---|
| 164 | if(len & 0xFF000000L)
|
---|
| 165 | return (const char *) NULL; /* Lengths > 32 bits are not supported. */
|
---|
| 166 | len = (len << 8) | (unsigned char) *beg++;
|
---|
| 167 | } while(--b);
|
---|
| 168 | }
|
---|
| 169 | if(len > (size_t)(end - beg))
|
---|
| 170 | return (const char *) NULL; /* Element data does not fit in source. */
|
---|
| 171 | elem->beg = beg;
|
---|
| 172 | elem->end = beg + len;
|
---|
| 173 | return elem->end;
|
---|
| 174 | }
|
---|
| 175 |
|
---|
| 176 | static const curl_OID * searchOID(const char *oid)
|
---|
| 177 | {
|
---|
| 178 | const curl_OID *op;
|
---|
| 179 |
|
---|
| 180 | /* Search the null terminated OID or OID identifier in local table.
|
---|
| 181 | Return the table entry pointer or NULL if not found. */
|
---|
| 182 |
|
---|
| 183 | for(op = OIDtable; op->numoid; op++)
|
---|
| 184 | if(!strcmp(op->numoid, oid) || strcasecompare(op->textoid, oid))
|
---|
| 185 | return op;
|
---|
| 186 |
|
---|
| 187 | return (const curl_OID *) NULL;
|
---|
| 188 | }
|
---|
| 189 |
|
---|
| 190 | static const char *bool2str(const char *beg, const char *end)
|
---|
| 191 | {
|
---|
| 192 | /* Convert an ASN.1 Boolean value into its string representation.
|
---|
| 193 | Return the dynamically allocated string, or NULL if source is not an
|
---|
| 194 | ASN.1 Boolean value. */
|
---|
| 195 |
|
---|
| 196 | if(end - beg != 1)
|
---|
| 197 | return (const char *) NULL;
|
---|
| 198 | return strdup(*beg? "TRUE": "FALSE");
|
---|
| 199 | }
|
---|
| 200 |
|
---|
| 201 | static const char *octet2str(const char *beg, const char *end)
|
---|
| 202 | {
|
---|
| 203 | size_t n = end - beg;
|
---|
| 204 | char *buf = NULL;
|
---|
| 205 |
|
---|
| 206 | /* Convert an ASN.1 octet string to a printable string.
|
---|
| 207 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 208 |
|
---|
| 209 | if(n <= (CURL_SIZE_T_MAX - 1) / 3) {
|
---|
| 210 | buf = malloc(3 * n + 1);
|
---|
| 211 | if(buf)
|
---|
| 212 | for(n = 0; beg < end; n += 3)
|
---|
| 213 | snprintf(buf + n, 4, "%02x:", *(const unsigned char *) beg++);
|
---|
| 214 | }
|
---|
| 215 | return buf;
|
---|
| 216 | }
|
---|
| 217 |
|
---|
| 218 | static const char *bit2str(const char *beg, const char *end)
|
---|
| 219 | {
|
---|
| 220 | /* Convert an ASN.1 bit string to a printable string.
|
---|
| 221 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 222 |
|
---|
| 223 | if(++beg > end)
|
---|
| 224 | return (const char *) NULL;
|
---|
| 225 | return octet2str(beg, end);
|
---|
| 226 | }
|
---|
| 227 |
|
---|
| 228 | static const char *int2str(const char *beg, const char *end)
|
---|
| 229 | {
|
---|
| 230 | long val = 0;
|
---|
| 231 | size_t n = end - beg;
|
---|
| 232 |
|
---|
| 233 | /* Convert an ASN.1 integer value into its string representation.
|
---|
| 234 | Return the dynamically allocated string, or NULL if source is not an
|
---|
| 235 | ASN.1 integer value. */
|
---|
| 236 |
|
---|
| 237 | if(!n)
|
---|
| 238 | return (const char *) NULL;
|
---|
| 239 |
|
---|
| 240 | if(n > 4)
|
---|
| 241 | return octet2str(beg, end);
|
---|
| 242 |
|
---|
| 243 | /* Represent integers <= 32-bit as a single value. */
|
---|
| 244 | if(*beg & 0x80)
|
---|
| 245 | val = ~val;
|
---|
| 246 |
|
---|
| 247 | do
|
---|
| 248 | val = (val << 8) | *(const unsigned char *) beg++;
|
---|
| 249 | while(beg < end);
|
---|
| 250 | return curl_maprintf("%s%lx", (val < 0 || val >= 10)? "0x": "", val);
|
---|
| 251 | }
|
---|
| 252 |
|
---|
| 253 | static ssize_t
|
---|
| 254 | utf8asn1str(char **to, int type, const char *from, const char *end)
|
---|
| 255 | {
|
---|
| 256 | size_t inlength = end - from;
|
---|
| 257 | int size = 1;
|
---|
| 258 | size_t outlength;
|
---|
| 259 | int charsize;
|
---|
| 260 | unsigned int wc;
|
---|
| 261 | char *buf;
|
---|
| 262 |
|
---|
| 263 | /* Perform a lazy conversion from an ASN.1 typed string to UTF8. Allocate the
|
---|
| 264 | destination buffer dynamically. The allocation size will normally be too
|
---|
| 265 | large: this is to avoid buffer overflows.
|
---|
| 266 | Terminate the string with a nul byte and return the converted
|
---|
| 267 | string length. */
|
---|
| 268 |
|
---|
| 269 | *to = (char *) NULL;
|
---|
| 270 | switch(type) {
|
---|
| 271 | case CURL_ASN1_BMP_STRING:
|
---|
| 272 | size = 2;
|
---|
| 273 | break;
|
---|
| 274 | case CURL_ASN1_UNIVERSAL_STRING:
|
---|
| 275 | size = 4;
|
---|
| 276 | break;
|
---|
| 277 | case CURL_ASN1_NUMERIC_STRING:
|
---|
| 278 | case CURL_ASN1_PRINTABLE_STRING:
|
---|
| 279 | case CURL_ASN1_TELETEX_STRING:
|
---|
| 280 | case CURL_ASN1_IA5_STRING:
|
---|
| 281 | case CURL_ASN1_VISIBLE_STRING:
|
---|
| 282 | case CURL_ASN1_UTF8_STRING:
|
---|
| 283 | break;
|
---|
| 284 | default:
|
---|
| 285 | return -1; /* Conversion not supported. */
|
---|
| 286 | }
|
---|
| 287 |
|
---|
| 288 | if(inlength % size)
|
---|
| 289 | return -1; /* Length inconsistent with character size. */
|
---|
| 290 | if(inlength / size > (CURL_SIZE_T_MAX - 1) / 4)
|
---|
| 291 | return -1; /* Too big. */
|
---|
| 292 | buf = malloc(4 * (inlength / size) + 1);
|
---|
| 293 | if(!buf)
|
---|
| 294 | return -1; /* Not enough memory. */
|
---|
| 295 |
|
---|
| 296 | if(type == CURL_ASN1_UTF8_STRING) {
|
---|
| 297 | /* Just copy. */
|
---|
| 298 | outlength = inlength;
|
---|
| 299 | if(outlength)
|
---|
| 300 | memcpy(buf, from, outlength);
|
---|
| 301 | }
|
---|
| 302 | else {
|
---|
| 303 | for(outlength = 0; from < end;) {
|
---|
| 304 | wc = 0;
|
---|
| 305 | switch(size) {
|
---|
| 306 | case 4:
|
---|
| 307 | wc = (wc << 8) | *(const unsigned char *) from++;
|
---|
| 308 | wc = (wc << 8) | *(const unsigned char *) from++;
|
---|
| 309 | /* fallthrough */
|
---|
| 310 | case 2:
|
---|
| 311 | wc = (wc << 8) | *(const unsigned char *) from++;
|
---|
| 312 | /* fallthrough */
|
---|
| 313 | default: /* case 1: */
|
---|
| 314 | wc = (wc << 8) | *(const unsigned char *) from++;
|
---|
| 315 | }
|
---|
| 316 | charsize = 1;
|
---|
| 317 | if(wc >= 0x00000080) {
|
---|
| 318 | if(wc >= 0x00000800) {
|
---|
| 319 | if(wc >= 0x00010000) {
|
---|
| 320 | if(wc >= 0x00200000) {
|
---|
| 321 | free(buf);
|
---|
| 322 | return -1; /* Invalid char. size for target encoding. */
|
---|
| 323 | }
|
---|
| 324 | buf[outlength + 3] = (char) (0x80 | (wc & 0x3F));
|
---|
| 325 | wc = (wc >> 6) | 0x00010000;
|
---|
| 326 | charsize++;
|
---|
| 327 | }
|
---|
| 328 | buf[outlength + 2] = (char) (0x80 | (wc & 0x3F));
|
---|
| 329 | wc = (wc >> 6) | 0x00000800;
|
---|
| 330 | charsize++;
|
---|
| 331 | }
|
---|
| 332 | buf[outlength + 1] = (char) (0x80 | (wc & 0x3F));
|
---|
| 333 | wc = (wc >> 6) | 0x000000C0;
|
---|
| 334 | charsize++;
|
---|
| 335 | }
|
---|
| 336 | buf[outlength] = (char) wc;
|
---|
| 337 | outlength += charsize;
|
---|
| 338 | }
|
---|
| 339 | }
|
---|
| 340 | buf[outlength] = '\0';
|
---|
| 341 | *to = buf;
|
---|
| 342 | return outlength;
|
---|
| 343 | }
|
---|
| 344 |
|
---|
| 345 | static const char *string2str(int type, const char *beg, const char *end)
|
---|
| 346 | {
|
---|
| 347 | char *buf;
|
---|
| 348 |
|
---|
| 349 | /* Convert an ASN.1 String into its UTF-8 string representation.
|
---|
| 350 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 351 |
|
---|
| 352 | if(utf8asn1str(&buf, type, beg, end) < 0)
|
---|
| 353 | return (const char *) NULL;
|
---|
| 354 | return buf;
|
---|
| 355 | }
|
---|
| 356 |
|
---|
| 357 | static int encodeUint(char *buf, int n, unsigned int x)
|
---|
| 358 | {
|
---|
| 359 | int i = 0;
|
---|
| 360 | unsigned int y = x / 10;
|
---|
| 361 |
|
---|
| 362 | /* Decimal ASCII encode unsigned integer `x' in the `n'-byte buffer at `buf'.
|
---|
| 363 | Return the total number of encoded digits, even if larger than `n'. */
|
---|
| 364 |
|
---|
| 365 | if(y) {
|
---|
| 366 | i += encodeUint(buf, n, y);
|
---|
| 367 | x -= y * 10;
|
---|
| 368 | }
|
---|
| 369 | if(i < n)
|
---|
| 370 | buf[i] = (char) ('0' + x);
|
---|
| 371 | i++;
|
---|
| 372 | if(i < n)
|
---|
| 373 | buf[i] = '\0'; /* Store a terminator if possible. */
|
---|
| 374 | return i;
|
---|
| 375 | }
|
---|
| 376 |
|
---|
| 377 | static int encodeOID(char *buf, int n, const char *beg, const char *end)
|
---|
| 378 | {
|
---|
| 379 | int i = 0;
|
---|
| 380 | unsigned int x;
|
---|
| 381 | unsigned int y;
|
---|
| 382 |
|
---|
| 383 | /* Convert an ASN.1 OID into its dotted string representation.
|
---|
| 384 | Store the result in th `n'-byte buffer at `buf'.
|
---|
| 385 | Return the converted string length, or -1 if an error occurs. */
|
---|
| 386 |
|
---|
| 387 | /* Process the first two numbers. */
|
---|
| 388 | y = *(const unsigned char *) beg++;
|
---|
| 389 | x = y / 40;
|
---|
| 390 | y -= x * 40;
|
---|
| 391 | i += encodeUint(buf + i, n - i, x);
|
---|
| 392 | if(i < n)
|
---|
| 393 | buf[i] = '.';
|
---|
| 394 | i++;
|
---|
| 395 | i += encodeUint(buf + i, n - i, y);
|
---|
| 396 |
|
---|
| 397 | /* Process the trailing numbers. */
|
---|
| 398 | while(beg < end) {
|
---|
| 399 | if(i < n)
|
---|
| 400 | buf[i] = '.';
|
---|
| 401 | i++;
|
---|
| 402 | x = 0;
|
---|
| 403 | do {
|
---|
| 404 | if(x & 0xFF000000)
|
---|
| 405 | return -1;
|
---|
| 406 | y = *(const unsigned char *) beg++;
|
---|
| 407 | x = (x << 7) | (y & 0x7F);
|
---|
| 408 | } while(y & 0x80);
|
---|
| 409 | i += encodeUint(buf + i, n - i, x);
|
---|
| 410 | }
|
---|
| 411 | if(i < n)
|
---|
| 412 | buf[i] = '\0';
|
---|
| 413 | return i;
|
---|
| 414 | }
|
---|
| 415 |
|
---|
| 416 | static const char *OID2str(const char *beg, const char *end, bool symbolic)
|
---|
| 417 | {
|
---|
| 418 | char *buf = (char *) NULL;
|
---|
| 419 | const curl_OID * op;
|
---|
| 420 | int n;
|
---|
| 421 |
|
---|
| 422 | /* Convert an ASN.1 OID into its dotted or symbolic string representation.
|
---|
| 423 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 424 |
|
---|
| 425 | if(beg < end) {
|
---|
| 426 | n = encodeOID((char *) NULL, -1, beg, end);
|
---|
| 427 | if(n >= 0) {
|
---|
| 428 | buf = malloc(n + 1);
|
---|
| 429 | if(buf) {
|
---|
| 430 | encodeOID(buf, n, beg, end);
|
---|
| 431 | buf[n] = '\0';
|
---|
| 432 |
|
---|
| 433 | if(symbolic) {
|
---|
| 434 | op = searchOID(buf);
|
---|
| 435 | if(op) {
|
---|
| 436 | free(buf);
|
---|
| 437 | buf = strdup(op->textoid);
|
---|
| 438 | }
|
---|
| 439 | }
|
---|
| 440 | }
|
---|
| 441 | }
|
---|
| 442 | }
|
---|
| 443 | return buf;
|
---|
| 444 | }
|
---|
| 445 |
|
---|
| 446 | static const char *GTime2str(const char *beg, const char *end)
|
---|
| 447 | {
|
---|
| 448 | const char *tzp;
|
---|
| 449 | const char *fracp;
|
---|
| 450 | char sec1, sec2;
|
---|
| 451 | size_t fracl;
|
---|
| 452 | size_t tzl;
|
---|
| 453 | const char *sep = "";
|
---|
| 454 |
|
---|
| 455 | /* Convert an ASN.1 Generalized time to a printable string.
|
---|
| 456 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 457 |
|
---|
| 458 | for(fracp = beg; fracp < end && *fracp >= '0' && *fracp <= '9'; fracp++)
|
---|
| 459 | ;
|
---|
| 460 |
|
---|
| 461 | /* Get seconds digits. */
|
---|
| 462 | sec1 = '0';
|
---|
| 463 | switch(fracp - beg - 12) {
|
---|
| 464 | case 0:
|
---|
| 465 | sec2 = '0';
|
---|
| 466 | break;
|
---|
| 467 | case 2:
|
---|
| 468 | sec1 = fracp[-2];
|
---|
| 469 | /* FALLTHROUGH */
|
---|
| 470 | case 1:
|
---|
| 471 | sec2 = fracp[-1];
|
---|
| 472 | break;
|
---|
| 473 | default:
|
---|
| 474 | return (const char *) NULL;
|
---|
| 475 | }
|
---|
| 476 |
|
---|
| 477 | /* Scan for timezone, measure fractional seconds. */
|
---|
| 478 | tzp = fracp;
|
---|
| 479 | fracl = 0;
|
---|
| 480 | if(fracp < end && (*fracp == '.' || *fracp == ',')) {
|
---|
| 481 | fracp++;
|
---|
| 482 | do
|
---|
| 483 | tzp++;
|
---|
| 484 | while(tzp < end && *tzp >= '0' && *tzp <= '9');
|
---|
| 485 | /* Strip leading zeroes in fractional seconds. */
|
---|
| 486 | for(fracl = tzp - fracp - 1; fracl && fracp[fracl - 1] == '0'; fracl--)
|
---|
| 487 | ;
|
---|
| 488 | }
|
---|
| 489 |
|
---|
| 490 | /* Process timezone. */
|
---|
| 491 | if(tzp >= end)
|
---|
| 492 | ; /* Nothing to do. */
|
---|
| 493 | else if(*tzp == 'Z') {
|
---|
| 494 | tzp = " GMT";
|
---|
| 495 | end = tzp + 4;
|
---|
| 496 | }
|
---|
| 497 | else {
|
---|
| 498 | sep = " ";
|
---|
| 499 | tzp++;
|
---|
| 500 | }
|
---|
| 501 |
|
---|
| 502 | tzl = end - tzp;
|
---|
| 503 | return curl_maprintf("%.4s-%.2s-%.2s %.2s:%.2s:%c%c%s%.*s%s%.*s",
|
---|
| 504 | beg, beg + 4, beg + 6,
|
---|
| 505 | beg + 8, beg + 10, sec1, sec2,
|
---|
| 506 | fracl? ".": "", fracl, fracp,
|
---|
| 507 | sep, tzl, tzp);
|
---|
| 508 | }
|
---|
| 509 |
|
---|
| 510 | static const char *UTime2str(const char *beg, const char *end)
|
---|
| 511 | {
|
---|
| 512 | const char *tzp;
|
---|
| 513 | size_t tzl;
|
---|
| 514 | const char *sec;
|
---|
| 515 |
|
---|
| 516 | /* Convert an ASN.1 UTC time to a printable string.
|
---|
| 517 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 518 |
|
---|
| 519 | for(tzp = beg; tzp < end && *tzp >= '0' && *tzp <= '9'; tzp++)
|
---|
| 520 | ;
|
---|
| 521 | /* Get the seconds. */
|
---|
| 522 | sec = beg + 10;
|
---|
| 523 | switch(tzp - sec) {
|
---|
| 524 | case 0:
|
---|
| 525 | sec = "00";
|
---|
| 526 | case 2:
|
---|
| 527 | break;
|
---|
| 528 | default:
|
---|
| 529 | return (const char *) NULL;
|
---|
| 530 | }
|
---|
| 531 |
|
---|
| 532 | /* Process timezone. */
|
---|
| 533 | if(tzp >= end)
|
---|
| 534 | return (const char *) NULL;
|
---|
| 535 | if(*tzp == 'Z') {
|
---|
| 536 | tzp = "GMT";
|
---|
| 537 | end = tzp + 3;
|
---|
| 538 | }
|
---|
| 539 | else
|
---|
| 540 | tzp++;
|
---|
| 541 |
|
---|
| 542 | tzl = end - tzp;
|
---|
| 543 | return curl_maprintf("%u%.2s-%.2s-%.2s %.2s:%.2s:%.2s %.*s",
|
---|
| 544 | 20 - (*beg >= '5'), beg, beg + 2, beg + 4,
|
---|
| 545 | beg + 6, beg + 8, sec,
|
---|
| 546 | tzl, tzp);
|
---|
| 547 | }
|
---|
| 548 |
|
---|
| 549 | const char *Curl_ASN1tostr(curl_asn1Element *elem, int type)
|
---|
| 550 | {
|
---|
| 551 | /* Convert an ASN.1 element to a printable string.
|
---|
| 552 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 553 |
|
---|
| 554 | if(elem->constructed)
|
---|
| 555 | return (const char *) NULL; /* No conversion of structured elements. */
|
---|
| 556 |
|
---|
| 557 | if(!type)
|
---|
| 558 | type = elem->tag; /* Type not forced: use element tag as type. */
|
---|
| 559 |
|
---|
| 560 | switch(type) {
|
---|
| 561 | case CURL_ASN1_BOOLEAN:
|
---|
| 562 | return bool2str(elem->beg, elem->end);
|
---|
| 563 | case CURL_ASN1_INTEGER:
|
---|
| 564 | case CURL_ASN1_ENUMERATED:
|
---|
| 565 | return int2str(elem->beg, elem->end);
|
---|
| 566 | case CURL_ASN1_BIT_STRING:
|
---|
| 567 | return bit2str(elem->beg, elem->end);
|
---|
| 568 | case CURL_ASN1_OCTET_STRING:
|
---|
| 569 | return octet2str(elem->beg, elem->end);
|
---|
| 570 | case CURL_ASN1_NULL:
|
---|
| 571 | return strdup("");
|
---|
| 572 | case CURL_ASN1_OBJECT_IDENTIFIER:
|
---|
| 573 | return OID2str(elem->beg, elem->end, TRUE);
|
---|
| 574 | case CURL_ASN1_UTC_TIME:
|
---|
| 575 | return UTime2str(elem->beg, elem->end);
|
---|
| 576 | case CURL_ASN1_GENERALIZED_TIME:
|
---|
| 577 | return GTime2str(elem->beg, elem->end);
|
---|
| 578 | case CURL_ASN1_UTF8_STRING:
|
---|
| 579 | case CURL_ASN1_NUMERIC_STRING:
|
---|
| 580 | case CURL_ASN1_PRINTABLE_STRING:
|
---|
| 581 | case CURL_ASN1_TELETEX_STRING:
|
---|
| 582 | case CURL_ASN1_IA5_STRING:
|
---|
| 583 | case CURL_ASN1_VISIBLE_STRING:
|
---|
| 584 | case CURL_ASN1_UNIVERSAL_STRING:
|
---|
| 585 | case CURL_ASN1_BMP_STRING:
|
---|
| 586 | return string2str(type, elem->beg, elem->end);
|
---|
| 587 | }
|
---|
| 588 |
|
---|
| 589 | return (const char *) NULL; /* Unsupported. */
|
---|
| 590 | }
|
---|
| 591 |
|
---|
| 592 | static ssize_t encodeDN(char *buf, size_t n, curl_asn1Element *dn)
|
---|
| 593 | {
|
---|
| 594 | curl_asn1Element rdn;
|
---|
| 595 | curl_asn1Element atv;
|
---|
| 596 | curl_asn1Element oid;
|
---|
| 597 | curl_asn1Element value;
|
---|
| 598 | size_t l = 0;
|
---|
| 599 | const char *p1;
|
---|
| 600 | const char *p2;
|
---|
| 601 | const char *p3;
|
---|
| 602 | const char *str;
|
---|
| 603 |
|
---|
| 604 | /* ASCII encode distinguished name at `dn' into the `n'-byte buffer at `buf'.
|
---|
| 605 | Return the total string length, even if larger than `n'. */
|
---|
| 606 |
|
---|
| 607 | for(p1 = dn->beg; p1 < dn->end;) {
|
---|
| 608 | p1 = Curl_getASN1Element(&rdn, p1, dn->end);
|
---|
| 609 | for(p2 = rdn.beg; p2 < rdn.end;) {
|
---|
| 610 | p2 = Curl_getASN1Element(&atv, p2, rdn.end);
|
---|
| 611 | p3 = Curl_getASN1Element(&oid, atv.beg, atv.end);
|
---|
| 612 | Curl_getASN1Element(&value, p3, atv.end);
|
---|
| 613 | str = Curl_ASN1tostr(&oid, 0);
|
---|
| 614 | if(!str)
|
---|
| 615 | return -1;
|
---|
| 616 |
|
---|
| 617 | /* Encode delimiter.
|
---|
| 618 | If attribute has a short uppercase name, delimiter is ", ". */
|
---|
| 619 | if(l) {
|
---|
| 620 | for(p3 = str; isupper(*p3); p3++)
|
---|
| 621 | ;
|
---|
| 622 | for(p3 = (*p3 || p3 - str > 2)? "/": ", "; *p3; p3++) {
|
---|
| 623 | if(l < n)
|
---|
| 624 | buf[l] = *p3;
|
---|
| 625 | l++;
|
---|
| 626 | }
|
---|
| 627 | }
|
---|
| 628 |
|
---|
| 629 | /* Encode attribute name. */
|
---|
| 630 | for(p3 = str; *p3; p3++) {
|
---|
| 631 | if(l < n)
|
---|
| 632 | buf[l] = *p3;
|
---|
| 633 | l++;
|
---|
| 634 | }
|
---|
| 635 | free((char *) str);
|
---|
| 636 |
|
---|
| 637 | /* Generate equal sign. */
|
---|
| 638 | if(l < n)
|
---|
| 639 | buf[l] = '=';
|
---|
| 640 | l++;
|
---|
| 641 |
|
---|
| 642 | /* Generate value. */
|
---|
| 643 | str = Curl_ASN1tostr(&value, 0);
|
---|
| 644 | if(!str)
|
---|
| 645 | return -1;
|
---|
| 646 | for(p3 = str; *p3; p3++) {
|
---|
| 647 | if(l < n)
|
---|
| 648 | buf[l] = *p3;
|
---|
| 649 | l++;
|
---|
| 650 | }
|
---|
| 651 | free((char *) str);
|
---|
| 652 | }
|
---|
| 653 | }
|
---|
| 654 |
|
---|
| 655 | return l;
|
---|
| 656 | }
|
---|
| 657 |
|
---|
| 658 | const char *Curl_DNtostr(curl_asn1Element *dn)
|
---|
| 659 | {
|
---|
| 660 | char *buf = (char *) NULL;
|
---|
| 661 | ssize_t n = encodeDN(buf, 0, dn);
|
---|
| 662 |
|
---|
| 663 | /* Convert an ASN.1 distinguished name into a printable string.
|
---|
| 664 | Return the dynamically allocated string, or NULL if an error occurs. */
|
---|
| 665 |
|
---|
| 666 | if(n >= 0) {
|
---|
| 667 | buf = malloc(n + 1);
|
---|
| 668 | if(buf) {
|
---|
| 669 | encodeDN(buf, n + 1, dn);
|
---|
| 670 | buf[n] = '\0';
|
---|
| 671 | }
|
---|
| 672 | }
|
---|
| 673 | return (const char *) buf;
|
---|
| 674 | }
|
---|
| 675 |
|
---|
| 676 | /*
|
---|
| 677 | * X509 parser.
|
---|
| 678 | */
|
---|
| 679 |
|
---|
| 680 | int Curl_parseX509(curl_X509certificate *cert,
|
---|
| 681 | const char *beg, const char *end)
|
---|
| 682 | {
|
---|
| 683 | curl_asn1Element elem;
|
---|
| 684 | curl_asn1Element tbsCertificate;
|
---|
| 685 | const char *ccp;
|
---|
| 686 | static const char defaultVersion = 0; /* v1. */
|
---|
| 687 |
|
---|
| 688 | /* ASN.1 parse an X509 certificate into structure subfields.
|
---|
| 689 | Syntax is assumed to have already been checked by the SSL backend.
|
---|
| 690 | See RFC 5280. */
|
---|
| 691 |
|
---|
| 692 | cert->certificate.header = NULL;
|
---|
| 693 | cert->certificate.beg = beg;
|
---|
| 694 | cert->certificate.end = end;
|
---|
| 695 |
|
---|
| 696 | /* Get the sequence content. */
|
---|
| 697 | if(!Curl_getASN1Element(&elem, beg, end))
|
---|
| 698 | return -1; /* Invalid bounds/size. */
|
---|
| 699 | beg = elem.beg;
|
---|
| 700 | end = elem.end;
|
---|
| 701 |
|
---|
| 702 | /* Get tbsCertificate. */
|
---|
| 703 | beg = Curl_getASN1Element(&tbsCertificate, beg, end);
|
---|
| 704 | /* Skip the signatureAlgorithm. */
|
---|
| 705 | beg = Curl_getASN1Element(&cert->signatureAlgorithm, beg, end);
|
---|
| 706 | /* Get the signatureValue. */
|
---|
| 707 | Curl_getASN1Element(&cert->signature, beg, end);
|
---|
| 708 |
|
---|
| 709 | /* Parse TBSCertificate. */
|
---|
| 710 | beg = tbsCertificate.beg;
|
---|
| 711 | end = tbsCertificate.end;
|
---|
| 712 | /* Get optional version, get serialNumber. */
|
---|
| 713 | cert->version.header = NULL;
|
---|
| 714 | cert->version.beg = &defaultVersion;
|
---|
| 715 | cert->version.end = &defaultVersion + sizeof defaultVersion;;
|
---|
| 716 | beg = Curl_getASN1Element(&elem, beg, end);
|
---|
| 717 | if(elem.tag == 0) {
|
---|
| 718 | Curl_getASN1Element(&cert->version, elem.beg, elem.end);
|
---|
| 719 | beg = Curl_getASN1Element(&elem, beg, end);
|
---|
| 720 | }
|
---|
| 721 | cert->serialNumber = elem;
|
---|
| 722 | /* Get signature algorithm. */
|
---|
| 723 | beg = Curl_getASN1Element(&cert->signatureAlgorithm, beg, end);
|
---|
| 724 | /* Get issuer. */
|
---|
| 725 | beg = Curl_getASN1Element(&cert->issuer, beg, end);
|
---|
| 726 | /* Get notBefore and notAfter. */
|
---|
| 727 | beg = Curl_getASN1Element(&elem, beg, end);
|
---|
| 728 | ccp = Curl_getASN1Element(&cert->notBefore, elem.beg, elem.end);
|
---|
| 729 | Curl_getASN1Element(&cert->notAfter, ccp, elem.end);
|
---|
| 730 | /* Get subject. */
|
---|
| 731 | beg = Curl_getASN1Element(&cert->subject, beg, end);
|
---|
| 732 | /* Get subjectPublicKeyAlgorithm and subjectPublicKey. */
|
---|
| 733 | beg = Curl_getASN1Element(&cert->subjectPublicKeyInfo, beg, end);
|
---|
| 734 | ccp = Curl_getASN1Element(&cert->subjectPublicKeyAlgorithm,
|
---|
| 735 | cert->subjectPublicKeyInfo.beg,
|
---|
| 736 | cert->subjectPublicKeyInfo.end);
|
---|
| 737 | Curl_getASN1Element(&cert->subjectPublicKey, ccp,
|
---|
| 738 | cert->subjectPublicKeyInfo.end);
|
---|
| 739 | /* Get optional issuerUiqueID, subjectUniqueID and extensions. */
|
---|
| 740 | cert->issuerUniqueID.tag = cert->subjectUniqueID.tag = 0;
|
---|
| 741 | cert->extensions.tag = elem.tag = 0;
|
---|
| 742 | cert->issuerUniqueID.header = cert->subjectUniqueID.header = NULL;
|
---|
| 743 | cert->issuerUniqueID.beg = cert->issuerUniqueID.end = "";
|
---|
| 744 | cert->subjectUniqueID.beg = cert->subjectUniqueID.end = "";
|
---|
| 745 | cert->extensions.header = NULL;
|
---|
| 746 | cert->extensions.beg = cert->extensions.end = "";
|
---|
| 747 | if(beg < end)
|
---|
| 748 | beg = Curl_getASN1Element(&elem, beg, end);
|
---|
| 749 | if(elem.tag == 1) {
|
---|
| 750 | cert->issuerUniqueID = elem;
|
---|
| 751 | if(beg < end)
|
---|
| 752 | beg = Curl_getASN1Element(&elem, beg, end);
|
---|
| 753 | }
|
---|
| 754 | if(elem.tag == 2) {
|
---|
| 755 | cert->subjectUniqueID = elem;
|
---|
| 756 | if(beg < end)
|
---|
| 757 | beg = Curl_getASN1Element(&elem, beg, end);
|
---|
| 758 | }
|
---|
| 759 | if(elem.tag == 3)
|
---|
| 760 | Curl_getASN1Element(&cert->extensions, elem.beg, elem.end);
|
---|
| 761 | return 0;
|
---|
| 762 | }
|
---|
| 763 |
|
---|
| 764 | static size_t copySubstring(char *to, const char *from)
|
---|
| 765 | {
|
---|
| 766 | size_t i;
|
---|
| 767 |
|
---|
| 768 | /* Copy at most 64-characters, terminate with a newline and returns the
|
---|
| 769 | effective number of stored characters. */
|
---|
| 770 |
|
---|
| 771 | for(i = 0; i < 64; i++) {
|
---|
| 772 | to[i] = *from;
|
---|
| 773 | if(!*from++)
|
---|
| 774 | break;
|
---|
| 775 | }
|
---|
| 776 |
|
---|
| 777 | to[i++] = '\n';
|
---|
| 778 | return i;
|
---|
| 779 | }
|
---|
| 780 |
|
---|
| 781 | static const char *dumpAlgo(curl_asn1Element *param,
|
---|
| 782 | const char *beg, const char *end)
|
---|
| 783 | {
|
---|
| 784 | curl_asn1Element oid;
|
---|
| 785 |
|
---|
| 786 | /* Get algorithm parameters and return algorithm name. */
|
---|
| 787 |
|
---|
| 788 | beg = Curl_getASN1Element(&oid, beg, end);
|
---|
| 789 | param->header = NULL;
|
---|
| 790 | param->tag = 0;
|
---|
| 791 | param->beg = param->end = end;
|
---|
| 792 | if(beg < end)
|
---|
| 793 | Curl_getASN1Element(param, beg, end);
|
---|
| 794 | return OID2str(oid.beg, oid.end, TRUE);
|
---|
| 795 | }
|
---|
| 796 |
|
---|
| 797 | static void do_pubkey_field(struct Curl_easy *data, int certnum,
|
---|
| 798 | const char *label, curl_asn1Element *elem)
|
---|
| 799 | {
|
---|
| 800 | const char *output;
|
---|
| 801 |
|
---|
| 802 | /* Generate a certificate information record for the public key. */
|
---|
| 803 |
|
---|
| 804 | output = Curl_ASN1tostr(elem, 0);
|
---|
| 805 | if(output) {
|
---|
| 806 | if(data->set.ssl.certinfo)
|
---|
| 807 | Curl_ssl_push_certinfo(data, certnum, label, output);
|
---|
| 808 | if(!certnum)
|
---|
| 809 | infof(data, " %s: %s\n", label, output);
|
---|
| 810 | free((char *) output);
|
---|
| 811 | }
|
---|
| 812 | }
|
---|
| 813 |
|
---|
| 814 | static void do_pubkey(struct Curl_easy *data, int certnum,
|
---|
| 815 | const char *algo, curl_asn1Element *param,
|
---|
| 816 | curl_asn1Element *pubkey)
|
---|
| 817 | {
|
---|
| 818 | curl_asn1Element elem;
|
---|
| 819 | curl_asn1Element pk;
|
---|
| 820 | const char *p;
|
---|
| 821 | const char *q;
|
---|
| 822 | unsigned long len;
|
---|
| 823 | unsigned int i;
|
---|
| 824 |
|
---|
| 825 | /* Generate all information records for the public key. */
|
---|
| 826 |
|
---|
| 827 | /* Get the public key (single element). */
|
---|
| 828 | Curl_getASN1Element(&pk, pubkey->beg + 1, pubkey->end);
|
---|
| 829 |
|
---|
| 830 | if(strcasecompare(algo, "rsaEncryption")) {
|
---|
| 831 | p = Curl_getASN1Element(&elem, pk.beg, pk.end);
|
---|
| 832 | /* Compute key length. */
|
---|
| 833 | for(q = elem.beg; !*q && q < elem.end; q++)
|
---|
| 834 | ;
|
---|
| 835 | len = (unsigned long)((elem.end - q) * 8);
|
---|
| 836 | if(len)
|
---|
| 837 | for(i = *(unsigned char *) q; !(i & 0x80); i <<= 1)
|
---|
| 838 | len--;
|
---|
| 839 | if(len > 32)
|
---|
| 840 | elem.beg = q; /* Strip leading zero bytes. */
|
---|
| 841 | if(!certnum)
|
---|
| 842 | infof(data, " RSA Public Key (%lu bits)\n", len);
|
---|
| 843 | if(data->set.ssl.certinfo) {
|
---|
| 844 | q = curl_maprintf("%lu", len);
|
---|
| 845 | if(q) {
|
---|
| 846 | Curl_ssl_push_certinfo(data, certnum, "RSA Public Key", q);
|
---|
| 847 | free((char *) q);
|
---|
| 848 | }
|
---|
| 849 | }
|
---|
| 850 | /* Generate coefficients. */
|
---|
| 851 | do_pubkey_field(data, certnum, "rsa(n)", &elem);
|
---|
| 852 | Curl_getASN1Element(&elem, p, pk.end);
|
---|
| 853 | do_pubkey_field(data, certnum, "rsa(e)", &elem);
|
---|
| 854 | }
|
---|
| 855 | else if(strcasecompare(algo, "dsa")) {
|
---|
| 856 | p = Curl_getASN1Element(&elem, param->beg, param->end);
|
---|
| 857 | do_pubkey_field(data, certnum, "dsa(p)", &elem);
|
---|
| 858 | p = Curl_getASN1Element(&elem, p, param->end);
|
---|
| 859 | do_pubkey_field(data, certnum, "dsa(q)", &elem);
|
---|
| 860 | Curl_getASN1Element(&elem, p, param->end);
|
---|
| 861 | do_pubkey_field(data, certnum, "dsa(g)", &elem);
|
---|
| 862 | do_pubkey_field(data, certnum, "dsa(pub_key)", &pk);
|
---|
| 863 | }
|
---|
| 864 | else if(strcasecompare(algo, "dhpublicnumber")) {
|
---|
| 865 | p = Curl_getASN1Element(&elem, param->beg, param->end);
|
---|
| 866 | do_pubkey_field(data, certnum, "dh(p)", &elem);
|
---|
| 867 | Curl_getASN1Element(&elem, param->beg, param->end);
|
---|
| 868 | do_pubkey_field(data, certnum, "dh(g)", &elem);
|
---|
| 869 | do_pubkey_field(data, certnum, "dh(pub_key)", &pk);
|
---|
| 870 | }
|
---|
| 871 | #if 0 /* Patent-encumbered. */
|
---|
| 872 | else if(strcasecompare(algo, "ecPublicKey")) {
|
---|
| 873 | /* Left TODO. */
|
---|
| 874 | }
|
---|
| 875 | #endif
|
---|
| 876 | }
|
---|
| 877 |
|
---|
| 878 | CURLcode Curl_extract_certinfo(struct connectdata *conn,
|
---|
| 879 | int certnum,
|
---|
| 880 | const char *beg,
|
---|
| 881 | const char *end)
|
---|
| 882 | {
|
---|
| 883 | curl_X509certificate cert;
|
---|
| 884 | struct Curl_easy *data = conn->data;
|
---|
| 885 | curl_asn1Element param;
|
---|
| 886 | const char *ccp;
|
---|
| 887 | char *cp1;
|
---|
| 888 | size_t cl1;
|
---|
| 889 | char *cp2;
|
---|
| 890 | CURLcode result;
|
---|
| 891 | unsigned long version;
|
---|
| 892 | size_t i;
|
---|
| 893 | size_t j;
|
---|
| 894 |
|
---|
| 895 | if(!data->set.ssl.certinfo)
|
---|
| 896 | if(certnum)
|
---|
| 897 | return CURLE_OK;
|
---|
| 898 |
|
---|
| 899 | /* Prepare the certificate information for curl_easy_getinfo(). */
|
---|
| 900 |
|
---|
| 901 | /* Extract the certificate ASN.1 elements. */
|
---|
| 902 | if(Curl_parseX509(&cert, beg, end))
|
---|
| 903 | return CURLE_OUT_OF_MEMORY;
|
---|
| 904 |
|
---|
| 905 | /* Subject. */
|
---|
| 906 | ccp = Curl_DNtostr(&cert.subject);
|
---|
| 907 | if(!ccp)
|
---|
| 908 | return CURLE_OUT_OF_MEMORY;
|
---|
| 909 | if(data->set.ssl.certinfo)
|
---|
| 910 | Curl_ssl_push_certinfo(data, certnum, "Subject", ccp);
|
---|
| 911 | if(!certnum)
|
---|
| 912 | infof(data, "%2d Subject: %s\n", certnum, ccp);
|
---|
| 913 | free((char *) ccp);
|
---|
| 914 |
|
---|
| 915 | /* Issuer. */
|
---|
| 916 | ccp = Curl_DNtostr(&cert.issuer);
|
---|
| 917 | if(!ccp)
|
---|
| 918 | return CURLE_OUT_OF_MEMORY;
|
---|
| 919 | if(data->set.ssl.certinfo)
|
---|
| 920 | Curl_ssl_push_certinfo(data, certnum, "Issuer", ccp);
|
---|
| 921 | if(!certnum)
|
---|
| 922 | infof(data, " Issuer: %s\n", ccp);
|
---|
| 923 | free((char *) ccp);
|
---|
| 924 |
|
---|
| 925 | /* Version (always fits in less than 32 bits). */
|
---|
| 926 | version = 0;
|
---|
| 927 | for(ccp = cert.version.beg; ccp < cert.version.end; ccp++)
|
---|
| 928 | version = (version << 8) | *(const unsigned char *) ccp;
|
---|
| 929 | if(data->set.ssl.certinfo) {
|
---|
| 930 | ccp = curl_maprintf("%lx", version);
|
---|
| 931 | if(!ccp)
|
---|
| 932 | return CURLE_OUT_OF_MEMORY;
|
---|
| 933 | Curl_ssl_push_certinfo(data, certnum, "Version", ccp);
|
---|
| 934 | free((char *) ccp);
|
---|
| 935 | }
|
---|
| 936 | if(!certnum)
|
---|
| 937 | infof(data, " Version: %lu (0x%lx)\n", version + 1, version);
|
---|
| 938 |
|
---|
| 939 | /* Serial number. */
|
---|
| 940 | ccp = Curl_ASN1tostr(&cert.serialNumber, 0);
|
---|
| 941 | if(!ccp)
|
---|
| 942 | return CURLE_OUT_OF_MEMORY;
|
---|
| 943 | if(data->set.ssl.certinfo)
|
---|
| 944 | Curl_ssl_push_certinfo(data, certnum, "Serial Number", ccp);
|
---|
| 945 | if(!certnum)
|
---|
| 946 | infof(data, " Serial Number: %s\n", ccp);
|
---|
| 947 | free((char *) ccp);
|
---|
| 948 |
|
---|
| 949 | /* Signature algorithm .*/
|
---|
| 950 | ccp = dumpAlgo(¶m, cert.signatureAlgorithm.beg,
|
---|
| 951 | cert.signatureAlgorithm.end);
|
---|
| 952 | if(!ccp)
|
---|
| 953 | return CURLE_OUT_OF_MEMORY;
|
---|
| 954 | if(data->set.ssl.certinfo)
|
---|
| 955 | Curl_ssl_push_certinfo(data, certnum, "Signature Algorithm", ccp);
|
---|
| 956 | if(!certnum)
|
---|
| 957 | infof(data, " Signature Algorithm: %s\n", ccp);
|
---|
| 958 | free((char *) ccp);
|
---|
| 959 |
|
---|
| 960 | /* Start Date. */
|
---|
| 961 | ccp = Curl_ASN1tostr(&cert.notBefore, 0);
|
---|
| 962 | if(!ccp)
|
---|
| 963 | return CURLE_OUT_OF_MEMORY;
|
---|
| 964 | if(data->set.ssl.certinfo)
|
---|
| 965 | Curl_ssl_push_certinfo(data, certnum, "Start Date", ccp);
|
---|
| 966 | if(!certnum)
|
---|
| 967 | infof(data, " Start Date: %s\n", ccp);
|
---|
| 968 | free((char *) ccp);
|
---|
| 969 |
|
---|
| 970 | /* Expire Date. */
|
---|
| 971 | ccp = Curl_ASN1tostr(&cert.notAfter, 0);
|
---|
| 972 | if(!ccp)
|
---|
| 973 | return CURLE_OUT_OF_MEMORY;
|
---|
| 974 | if(data->set.ssl.certinfo)
|
---|
| 975 | Curl_ssl_push_certinfo(data, certnum, "Expire Date", ccp);
|
---|
| 976 | if(!certnum)
|
---|
| 977 | infof(data, " Expire Date: %s\n", ccp);
|
---|
| 978 | free((char *) ccp);
|
---|
| 979 |
|
---|
| 980 | /* Public Key Algorithm. */
|
---|
| 981 | ccp = dumpAlgo(¶m, cert.subjectPublicKeyAlgorithm.beg,
|
---|
| 982 | cert.subjectPublicKeyAlgorithm.end);
|
---|
| 983 | if(!ccp)
|
---|
| 984 | return CURLE_OUT_OF_MEMORY;
|
---|
| 985 | if(data->set.ssl.certinfo)
|
---|
| 986 | Curl_ssl_push_certinfo(data, certnum, "Public Key Algorithm", ccp);
|
---|
| 987 | if(!certnum)
|
---|
| 988 | infof(data, " Public Key Algorithm: %s\n", ccp);
|
---|
| 989 | do_pubkey(data, certnum, ccp, ¶m, &cert.subjectPublicKey);
|
---|
| 990 | free((char *) ccp);
|
---|
| 991 |
|
---|
| 992 | /* TODO: extensions. */
|
---|
| 993 |
|
---|
| 994 | /* Signature. */
|
---|
| 995 | ccp = Curl_ASN1tostr(&cert.signature, 0);
|
---|
| 996 | if(!ccp)
|
---|
| 997 | return CURLE_OUT_OF_MEMORY;
|
---|
| 998 | if(data->set.ssl.certinfo)
|
---|
| 999 | Curl_ssl_push_certinfo(data, certnum, "Signature", ccp);
|
---|
| 1000 | if(!certnum)
|
---|
| 1001 | infof(data, " Signature: %s\n", ccp);
|
---|
| 1002 | free((char *) ccp);
|
---|
| 1003 |
|
---|
| 1004 | /* Generate PEM certificate. */
|
---|
| 1005 | result = Curl_base64_encode(data, cert.certificate.beg,
|
---|
| 1006 | cert.certificate.end - cert.certificate.beg,
|
---|
| 1007 | &cp1, &cl1);
|
---|
| 1008 | if(result)
|
---|
| 1009 | return result;
|
---|
| 1010 | /* Compute the number of characters in final certificate string. Format is:
|
---|
| 1011 | -----BEGIN CERTIFICATE-----\n
|
---|
| 1012 | <max 64 base64 characters>\n
|
---|
| 1013 | .
|
---|
| 1014 | .
|
---|
| 1015 | .
|
---|
| 1016 | -----END CERTIFICATE-----\n
|
---|
| 1017 | */
|
---|
| 1018 | i = 28 + cl1 + (cl1 + 64 - 1) / 64 + 26;
|
---|
| 1019 | cp2 = malloc(i + 1);
|
---|
| 1020 | if(!cp2) {
|
---|
| 1021 | free(cp1);
|
---|
| 1022 | return CURLE_OUT_OF_MEMORY;
|
---|
| 1023 | }
|
---|
| 1024 | /* Build the certificate string. */
|
---|
| 1025 | i = copySubstring(cp2, "-----BEGIN CERTIFICATE-----");
|
---|
| 1026 | for(j = 0; j < cl1; j += 64)
|
---|
| 1027 | i += copySubstring(cp2 + i, cp1 + j);
|
---|
| 1028 | i += copySubstring(cp2 + i, "-----END CERTIFICATE-----");
|
---|
| 1029 | cp2[i] = '\0';
|
---|
| 1030 | free(cp1);
|
---|
| 1031 | if(data->set.ssl.certinfo)
|
---|
| 1032 | Curl_ssl_push_certinfo(data, certnum, "Cert", cp2);
|
---|
| 1033 | if(!certnum)
|
---|
| 1034 | infof(data, "%s\n", cp2);
|
---|
| 1035 | free(cp2);
|
---|
| 1036 | return CURLE_OK;
|
---|
| 1037 | }
|
---|
| 1038 |
|
---|
| 1039 | #endif /* USE_GSKIT or USE_NSS or USE_GNUTLS or USE_CYASSL or USE_SCHANNEL */
|
---|
| 1040 |
|
---|
| 1041 | #if defined(USE_GSKIT)
|
---|
| 1042 |
|
---|
| 1043 | static const char *checkOID(const char *beg, const char *end,
|
---|
| 1044 | const char *oid)
|
---|
| 1045 | {
|
---|
| 1046 | curl_asn1Element e;
|
---|
| 1047 | const char *ccp;
|
---|
| 1048 | const char *p;
|
---|
| 1049 | bool matched;
|
---|
| 1050 |
|
---|
| 1051 | /* Check if first ASN.1 element at `beg' is the given OID.
|
---|
| 1052 | Return a pointer in the source after the OID if found, else NULL. */
|
---|
| 1053 |
|
---|
| 1054 | ccp = Curl_getASN1Element(&e, beg, end);
|
---|
| 1055 | if(!ccp || e.tag != CURL_ASN1_OBJECT_IDENTIFIER)
|
---|
| 1056 | return (const char *) NULL;
|
---|
| 1057 |
|
---|
| 1058 | p = OID2str(e.beg, e.end, FALSE);
|
---|
| 1059 | if(!p)
|
---|
| 1060 | return (const char *) NULL;
|
---|
| 1061 |
|
---|
| 1062 | matched = !strcmp(p, oid);
|
---|
| 1063 | free((char *) p);
|
---|
| 1064 | return matched? ccp: (const char *) NULL;
|
---|
| 1065 | }
|
---|
| 1066 |
|
---|
| 1067 | CURLcode Curl_verifyhost(struct connectdata *conn,
|
---|
| 1068 | const char *beg, const char *end)
|
---|
| 1069 | {
|
---|
| 1070 | struct Curl_easy *data = conn->data;
|
---|
| 1071 | curl_X509certificate cert;
|
---|
| 1072 | curl_asn1Element dn;
|
---|
| 1073 | curl_asn1Element elem;
|
---|
| 1074 | curl_asn1Element ext;
|
---|
| 1075 | curl_asn1Element name;
|
---|
| 1076 | const char *p;
|
---|
| 1077 | const char *q;
|
---|
| 1078 | char *dnsname;
|
---|
| 1079 | int matched = -1;
|
---|
| 1080 | size_t addrlen = (size_t) -1;
|
---|
| 1081 | ssize_t len;
|
---|
| 1082 | const char * const hostname = SSL_IS_PROXY()? conn->http_proxy.host.name:
|
---|
| 1083 | conn->host.name;
|
---|
| 1084 | const char * const dispname = SSL_IS_PROXY()?
|
---|
| 1085 | conn->http_proxy.host.dispname:
|
---|
| 1086 | conn->host.dispname;
|
---|
| 1087 | #ifdef ENABLE_IPV6
|
---|
| 1088 | struct in6_addr addr;
|
---|
| 1089 | #else
|
---|
| 1090 | struct in_addr addr;
|
---|
| 1091 | #endif
|
---|
| 1092 |
|
---|
| 1093 | /* Verify that connection server matches info in X509 certificate at
|
---|
| 1094 | `beg'..`end'. */
|
---|
| 1095 |
|
---|
| 1096 | if(!SSL_CONN_CONFIG(verifyhost))
|
---|
| 1097 | return CURLE_OK;
|
---|
| 1098 |
|
---|
| 1099 | if(Curl_parseX509(&cert, beg, end))
|
---|
| 1100 | return CURLE_PEER_FAILED_VERIFICATION;
|
---|
| 1101 |
|
---|
| 1102 | /* Get the server IP address. */
|
---|
| 1103 | #ifdef ENABLE_IPV6
|
---|
| 1104 | if(conn->bits.ipv6_ip && Curl_inet_pton(AF_INET6, hostname, &addr))
|
---|
| 1105 | addrlen = sizeof(struct in6_addr);
|
---|
| 1106 | else
|
---|
| 1107 | #endif
|
---|
| 1108 | if(Curl_inet_pton(AF_INET, hostname, &addr))
|
---|
| 1109 | addrlen = sizeof(struct in_addr);
|
---|
| 1110 |
|
---|
| 1111 | /* Process extensions. */
|
---|
| 1112 | for(p = cert.extensions.beg; p < cert.extensions.end && matched != 1;) {
|
---|
| 1113 | p = Curl_getASN1Element(&ext, p, cert.extensions.end);
|
---|
| 1114 | /* Check if extension is a subjectAlternativeName. */
|
---|
| 1115 | ext.beg = checkOID(ext.beg, ext.end, sanOID);
|
---|
| 1116 | if(ext.beg) {
|
---|
| 1117 | ext.beg = Curl_getASN1Element(&elem, ext.beg, ext.end);
|
---|
| 1118 | /* Skip critical if present. */
|
---|
| 1119 | if(elem.tag == CURL_ASN1_BOOLEAN)
|
---|
| 1120 | ext.beg = Curl_getASN1Element(&elem, ext.beg, ext.end);
|
---|
| 1121 | /* Parse the octet string contents: is a single sequence. */
|
---|
| 1122 | Curl_getASN1Element(&elem, elem.beg, elem.end);
|
---|
| 1123 | /* Check all GeneralNames. */
|
---|
| 1124 | for(q = elem.beg; matched != 1 && q < elem.end;) {
|
---|
| 1125 | q = Curl_getASN1Element(&name, q, elem.end);
|
---|
| 1126 | switch(name.tag) {
|
---|
| 1127 | case 2: /* DNS name. */
|
---|
| 1128 | len = utf8asn1str(&dnsname, CURL_ASN1_IA5_STRING,
|
---|
| 1129 | name.beg, name.end);
|
---|
| 1130 | if(len > 0 && (size_t)len == strlen(dnsname))
|
---|
| 1131 | matched = Curl_cert_hostcheck(dnsname, hostname);
|
---|
| 1132 | else
|
---|
| 1133 | matched = 0;
|
---|
| 1134 | free(dnsname);
|
---|
| 1135 | break;
|
---|
| 1136 |
|
---|
| 1137 | case 7: /* IP address. */
|
---|
| 1138 | matched = (size_t) (name.end - q) == addrlen &&
|
---|
| 1139 | !memcmp(&addr, q, addrlen);
|
---|
| 1140 | break;
|
---|
| 1141 | }
|
---|
| 1142 | }
|
---|
| 1143 | }
|
---|
| 1144 | }
|
---|
| 1145 |
|
---|
| 1146 | switch(matched) {
|
---|
| 1147 | case 1:
|
---|
| 1148 | /* an alternative name matched the server hostname */
|
---|
| 1149 | infof(data, "\t subjectAltName: %s matched\n", dispname);
|
---|
| 1150 | return CURLE_OK;
|
---|
| 1151 | case 0:
|
---|
| 1152 | /* an alternative name field existed, but didn't match and then
|
---|
| 1153 | we MUST fail */
|
---|
| 1154 | infof(data, "\t subjectAltName does not match %s\n", dispname);
|
---|
| 1155 | return CURLE_PEER_FAILED_VERIFICATION;
|
---|
| 1156 | }
|
---|
| 1157 |
|
---|
| 1158 | /* Process subject. */
|
---|
| 1159 | name.header = NULL;
|
---|
| 1160 | name.beg = name.end = "";
|
---|
| 1161 | q = cert.subject.beg;
|
---|
| 1162 | /* we have to look to the last occurrence of a commonName in the
|
---|
| 1163 | distinguished one to get the most significant one. */
|
---|
| 1164 | while(q < cert.subject.end) {
|
---|
| 1165 | q = Curl_getASN1Element(&dn, q, cert.subject.end);
|
---|
| 1166 | for(p = dn.beg; p < dn.end;) {
|
---|
| 1167 | p = Curl_getASN1Element(&elem, p, dn.end);
|
---|
| 1168 | /* We have a DN's AttributeTypeAndValue: check it in case it's a CN. */
|
---|
| 1169 | elem.beg = checkOID(elem.beg, elem.end, cnOID);
|
---|
| 1170 | if(elem.beg)
|
---|
| 1171 | name = elem; /* Latch CN. */
|
---|
| 1172 | }
|
---|
| 1173 | }
|
---|
| 1174 |
|
---|
| 1175 | /* Check the CN if found. */
|
---|
| 1176 | if(!Curl_getASN1Element(&elem, name.beg, name.end))
|
---|
| 1177 | failf(data, "SSL: unable to obtain common name from peer certificate");
|
---|
| 1178 | else {
|
---|
| 1179 | len = utf8asn1str(&dnsname, elem.tag, elem.beg, elem.end);
|
---|
| 1180 | if(len < 0) {
|
---|
| 1181 | free(dnsname);
|
---|
| 1182 | return CURLE_OUT_OF_MEMORY;
|
---|
| 1183 | }
|
---|
| 1184 | if(strlen(dnsname) != (size_t) len) /* Nul byte in string ? */
|
---|
| 1185 | failf(data, "SSL: illegal cert name field");
|
---|
| 1186 | else if(Curl_cert_hostcheck((const char *) dnsname, hostname)) {
|
---|
| 1187 | infof(data, "\t common name: %s (matched)\n", dnsname);
|
---|
| 1188 | free(dnsname);
|
---|
| 1189 | return CURLE_OK;
|
---|
| 1190 | }
|
---|
| 1191 | else
|
---|
| 1192 | failf(data, "SSL: certificate subject name '%s' does not match "
|
---|
| 1193 | "target host name '%s'", dnsname, dispname);
|
---|
| 1194 | free(dnsname);
|
---|
| 1195 | }
|
---|
| 1196 |
|
---|
| 1197 | return CURLE_PEER_FAILED_VERIFICATION;
|
---|
| 1198 | }
|
---|
| 1199 |
|
---|
| 1200 | #endif /* USE_GSKIT */
|
---|