derprint.c
上传用户:lyxiangda
上传日期:2007-01-12
资源大小:3042k
文件大小:15k
源码类别:

CA认证

开发平台:

WINDOWS

  1. /*
  2.  * The contents of this file are subject to the Mozilla Public
  3.  * License Version 1.1 (the "License"); you may not use this file
  4.  * except in compliance with the License. You may obtain a copy of
  5.  * the License at http://www.mozilla.org/MPL/
  6.  * 
  7.  * Software distributed under the License is distributed on an "AS
  8.  * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
  9.  * implied. See the License for the specific language governing
  10.  * rights and limitations under the License.
  11.  * 
  12.  * The Original Code is the Netscape security libraries.
  13.  * 
  14.  * The Initial Developer of the Original Code is Netscape
  15.  * Communications Corporation.  Portions created by Netscape are 
  16.  * Copyright (C) 1994-2000 Netscape Communications Corporation.  All
  17.  * Rights Reserved.
  18.  * 
  19.  * Contributor(s):
  20.  * 
  21.  * Alternatively, the contents of this file may be used under the
  22.  * terms of the GNU General Public License Version 2 or later (the
  23.  * "GPL"), in which case the provisions of the GPL are applicable 
  24.  * instead of those above.  If you wish to allow use of your 
  25.  * version of this file only under the terms of the GPL and not to
  26.  * allow others to use your version of this file under the MPL,
  27.  * indicate your decision by deleting the provisions above and
  28.  * replace them with the notice and other provisions required by
  29.  * the GPL.  If you do not delete the provisions above, a recipient
  30.  * may use your version of this file under either the MPL or the
  31.  * GPL.
  32.  */
  33. #include "prio.h"
  34. #include "prprf.h"
  35. #include "prmem.h"
  36. #include "seccomon.h"
  37. #include "secerr.h"
  38. #include "secder.h"
  39. #include "secoid.h"
  40. #include "prerror.h"
  41. #include "secasn1.h"
  42. #include "serv.h"
  43. #define RIGHT_MARGIN 24
  44. /*#define RAW_BYTES 1 */
  45. static int prettyColumn = 0;
  46. static int
  47. getInteger256(unsigned char *data, unsigned int nb)
  48. {
  49.     int val;
  50.     switch (nb) {
  51.       case 1:
  52. val = data[0];
  53. break;
  54.       case 2:
  55. val = (data[0] << 8) | data[1];
  56. break;
  57.       case 3:
  58. val = (data[0] << 16) | (data[1] << 8) | data[2];
  59. break;
  60.       case 4:
  61. val = (data[0] << 24) | (data[1] << 16) | (data[2] << 8) | data[3];
  62. break;
  63.       default:
  64. PR_SetError(SEC_ERROR_BAD_DER,0);
  65. return -1;
  66.     }
  67.     return val;
  68. }
  69. static int
  70. prettyNewline(PRFileDesc *out)
  71. {
  72.     int rv;
  73.     if (prettyColumn != -1) {
  74. rv = PR_Write(out, "n",1);
  75. prettyColumn = -1;
  76. if (rv < 0) {
  77.     PR_SetError(SEC_ERROR_IO,0);
  78.     return rv;
  79. }
  80.     }
  81.     return 0;
  82. }
  83. #define PRETTY_INDENT "   "
  84. static int
  85. prettyIndent(PRFileDesc *out, unsigned level)
  86. {
  87.     unsigned int i;
  88.     int rv;
  89.     if (prettyColumn == -1) {
  90. prettyColumn = level;
  91. for (i = 0; i < level; i++) {
  92.     rv = PR_Write(out, PRETTY_INDENT, PL_strlen(PRETTY_INDENT));
  93.     if (rv < 0) {
  94. PR_SetError(SEC_ERROR_IO,0);
  95. return rv;
  96.     }
  97. }
  98.     }
  99.     return 0;
  100. }
  101. static int
  102. prettyPrintByte(PRFileDesc *out, unsigned char item, unsigned int level)
  103. {
  104.     int rv;
  105.     char *outdata;
  106.     rv = prettyIndent(out, level);
  107.     if (rv < 0)
  108. return rv;
  109.     outdata = PR_smprintf("%02x ", item);
  110.     rv = PR_Write(out, outdata, PL_strlen(outdata));
  111.     PR_Free(outdata);
  112.     if (rv < 0) {
  113. PR_SetError(SEC_ERROR_IO,0);
  114. return rv;
  115.     }
  116.     prettyColumn++;
  117.     if (prettyColumn >= RIGHT_MARGIN) {
  118. return prettyNewline(out);
  119.     }
  120.     return 0;
  121. }
  122. static int
  123. prettyPrintLeaf(PRFileDesc *out, unsigned char *data,
  124. unsigned int len, unsigned int lv)
  125. {
  126.     unsigned int i;
  127.     int rv;
  128.     for (i = 0; i < len; i++) {
  129. rv = prettyPrintByte(out, *data++, lv);
  130. if (rv < 0)
  131.     return rv;
  132.     }
  133.     return prettyNewline(out);
  134. }
  135. static int
  136. prettyPrintStringStart(PRFileDesc *out, unsigned char *str,
  137.        unsigned int len, unsigned int level)
  138. {
  139. #define BUF_SIZE 100
  140.     unsigned char staticBuf[BUF_SIZE];
  141.     unsigned char *buf, *dynamicBuf = NULL;
  142.     int rv;
  143.     if (len >= BUF_SIZE) {
  144.       /* len = BUF_SIZE - 1; */
  145.         buf = dynamicBuf = SSM_NEW_ARRAY(char, len+1);
  146.     } else {
  147.         buf = staticBuf;
  148.     }
  149.     rv = prettyNewline(out);
  150.     if (rv < 0)
  151.         goto loser;
  152.     rv = prettyIndent(out, level);
  153.     if (rv < 0)
  154.         goto loser;
  155.     memcpy(buf, str, len);
  156.     buf[len] = '00';
  157.     
  158.     rv = PR_Write(out, buf, len);
  159.     if (rv < 0) {
  160. PR_SetError(SEC_ERROR_IO,0);
  161. goto loser;
  162.     }
  163.     return 0;
  164.  loser:
  165.     PR_FREEIF(dynamicBuf);
  166.     return rv;
  167. #undef BUF_SIZE
  168. }
  169. static int
  170. prettyPrintString(PRFileDesc *out, unsigned char *str,
  171.   unsigned int len, unsigned int level, PRBool raw)
  172. {
  173.     int rv;
  174.     rv = prettyPrintStringStart(out, str, len, level);
  175.     if (rv < 0)
  176. return rv;
  177.     rv = prettyNewline(out);
  178.     if (rv < 0)
  179. return rv;
  180.     if (raw) {
  181. rv = prettyPrintLeaf(out, str, len, level);
  182. if (rv < 0)
  183.     return rv;
  184.     }
  185.     return 0;
  186. }
  187. static void
  188. pretty_PrintTime(PRFileDesc *out, int64 time, char *m, int level)
  189. {
  190.     PRExplodedTime printableTime;
  191.     char *timeString;
  192.     char *newmessage;
  193.     /* Convert to local time */
  194.     PR_ExplodeTime(time, PR_GMTParameters, &printableTime);
  195.     timeString = PORT_Alloc(100);
  196.     if (timeString == NULL)
  197.         return;
  198.     if (m != NULL) {
  199.       /*        SECU_Indent(out, level);*/
  200.         prettyIndent(out, level);
  201. newmessage = PR_smprintf("%s: ", m);
  202.         PR_Write(out, newmessage, PL_strlen(newmessage));
  203. PR_Free(newmessage);
  204.     }
  205.     PR_FormatTime(timeString, 100, "%a %b %d %H:%M:%S %Y", &printableTime);
  206.     PR_Write(out, timeString, PL_strlen(timeString));
  207.     if (m != NULL)
  208.         PR_Write(out, "n", 1);
  209.     PR_Free(timeString);
  210. }
  211. static int
  212. prettyPrintObjectID(PRFileDesc *out, unsigned char *data,
  213.                     unsigned int len, unsigned int level, PRBool raw)
  214. {
  215.     SECOidData *oiddata;
  216.     SECItem oiditem;
  217.     unsigned int i;
  218.     unsigned long val;
  219.     int rv;
  220.     char buf[300];
  221.     /*
  222.      * First print the Object Id in numeric format
  223.      */
  224.     rv = prettyIndent(out, level);
  225.     if (rv < 0)
  226.         return rv;
  227.     val = data[0];
  228.     i   = val % 40;
  229.     val = val / 40;
  230.     PR_snprintf(buf, 300, "%lu %u ", val, i); 
  231.     rv = PR_Write(out,buf,PL_strlen(buf)); 
  232.     if (rv < 0) {
  233.         PORT_SetError(SEC_ERROR_IO);
  234.         return rv;
  235.     }
  236.     val = 0;
  237.     for (i = 1; i < len; ++i) {
  238.         unsigned long j;
  239.         j = data[i];
  240.         val = (val << 7) | (j & 0x7f);
  241.         if (j & 0x80)
  242.             continue;
  243. PR_snprintf(buf, 300, "%lu ", val);
  244.         rv = PR_Write(out, buf, PL_strlen(buf));
  245.         if (rv < 0) {
  246.             PR_SetError(SEC_ERROR_IO,0);
  247.             return rv;
  248.         }
  249.         val = 0;
  250.     }
  251.     /*
  252.      * Now try to look it up and print a symbolic version.
  253.      */
  254.     oiditem.data = data;
  255.     oiditem.len = len;
  256.     oiddata = SECOID_FindOID(&oiditem);
  257.     if (oiddata != NULL) {
  258.         i = PL_strlen(oiddata->desc);
  259.         if ((prettyColumn + 1 + (i / 3)) > RIGHT_MARGIN) {
  260.             rv = prettyNewline(out);
  261.             if (rv < 0)
  262.                 return rv;
  263.         }
  264.         rv = prettyIndent(out, level);
  265.         if (rv < 0)
  266.     return rv;
  267. PR_snprintf(buf, 300, "(%s)", oiddata->desc);
  268.         rv = PR_Write(out, buf, PL_strlen(buf));
  269.         if (rv < 0) {
  270.     PR_SetError(SEC_ERROR_IO,0);
  271.             return rv;
  272.         }
  273.     }
  274.     /*
  275.      * Finally, on a new line, print the raw bytes (if requested).
  276.      */
  277.     if (raw) {
  278.         rv = prettyNewline(out);
  279.         if (rv < 0) {
  280.             PR_SetError(SEC_ERROR_IO,0);
  281.             return rv;
  282.         }
  283.         for (i = 0; i < len; i++) {
  284.             rv = prettyPrintByte(out, *data++, level);
  285.             if (rv < 0)
  286.                 return rv;
  287.         }
  288.     }
  289.     return prettyNewline(out);
  290. }
  291. static char *prettyTagType [32] = {
  292.   "End of Contents",
  293.   "Boolean",
  294.   "Integer",
  295.   "Bit String",
  296.   "Octet String",
  297.   "NULL",
  298.   "Object Identifier",
  299.   "0x07",
  300.   "0x08",
  301.   "0x09",
  302.   "Enumerated",
  303.   "0x0B",
  304.   "UTF8 String",
  305.   "0x0D",
  306.   "0x0E",
  307.   "0x0F",
  308.   "Sequence",
  309.   "Set",
  310.   "0x12",
  311.   "Printable String",
  312.   "T61 String",
  313.   "0x15",
  314.   "IA5 String",
  315.   "UTC Time",
  316.   "Generalized Time",
  317.   "0x19",
  318.   "Visible String",
  319.   "0x1B",
  320.   "Universal String",
  321.   "0x1D",
  322.   "BMP String",
  323.   "High-Tag-Number"
  324. };
  325. static int
  326. prettyPrintTime(PRFileDesc *out, unsigned char *str,
  327. unsigned int len, unsigned int level, PRBool raw, PRBool utc)
  328. {
  329.     SECItem time_item;
  330.     int rv;
  331.     SECStatus srv;
  332.     int64 time;
  333.     rv = prettyPrintStringStart(out, str, len, level);
  334.     if (rv < 0)
  335. return rv;
  336.     time_item.data = str;
  337.     time_item.len = len;
  338.     rv = PR_Write(out, " (", 2);
  339.     if (rv < 0) {
  340. PR_SetError(SEC_ERROR_IO,0);
  341. return rv;
  342.     }
  343.     if (utc) {
  344.         srv = DER_UTCTimeToTime(&time, &time_item);
  345. if (srv == SECSuccess) 
  346.     pretty_PrintTime(out, time, NULL, 0);
  347.     } else{
  348.         srv = DER_GeneralizedTimeToTime(&time, &time_item);
  349. if (srv == SECSuccess)
  350.     pretty_PrintTime(out, time, NULL, 0);
  351.     }
  352.     rv = PR_Write(out, ")", 1);
  353.     if (rv < 0) {
  354. PR_SetError(SEC_ERROR_IO,0);
  355. return rv;
  356.     }
  357.     rv = prettyNewline(out);
  358.     if (rv < 0)
  359. return rv;
  360.     if (raw) {
  361. rv = prettyPrintLeaf(out, str, len, level);
  362. if (rv < 0)
  363.     return rv;
  364.     }
  365.     return 0;
  366. }
  367. static int
  368. prettyPrintTag(PRFileDesc *out, unsigned char *src, unsigned char *end,
  369.        unsigned char *codep, unsigned int level, PRBool raw)
  370. {
  371.     int rv;
  372.     unsigned char code, tagnum;
  373.     char *msg;
  374.     if (src >= end) {
  375. PR_SetError(SEC_ERROR_BAD_DER,0);
  376. return -1;
  377.     }
  378.     code = *src;
  379.     tagnum = code & SEC_ASN1_TAGNUM_MASK;
  380.     /*
  381.      * NOTE: This code does not (yet) handle the high-tag-number form!
  382.      */
  383.     if (tagnum == SEC_ASN1_HIGH_TAG_NUMBER) {
  384.         PR_SetError(SEC_ERROR_BAD_DER,0);
  385. return -1;
  386.     }
  387.     if (raw)
  388. rv = prettyPrintByte(out, code, level);
  389.     else
  390. rv = prettyIndent(out, level);
  391.     if (rv < 0)
  392. return rv;
  393.     if (code & SEC_ASN1_CONSTRUCTED) {
  394.         rv = PR_Write(out, "C-",2);
  395. if (rv < 0) {
  396.     PR_SetError(SEC_ERROR_IO,0);
  397.     return rv;
  398. }
  399.     }
  400.     switch (code & SEC_ASN1_CLASS_MASK) {
  401.     case SEC_ASN1_UNIVERSAL:
  402.         rv = PR_Write(out, prettyTagType[tagnum], 
  403.       PL_strlen(prettyTagType[tagnum]));
  404. break;
  405.     case SEC_ASN1_APPLICATION:
  406.         msg = PR_smprintf("Application: %d ", tagnum);
  407.         rv = PR_Write(out,msg, PL_strlen(msg));
  408. PR_Free(msg);
  409. break;
  410.     case SEC_ASN1_CONTEXT_SPECIFIC:
  411.         msg = PR_smprintf("[%d] ", tagnum);
  412.         rv = PR_Write(out, msg, PL_strlen(msg));
  413. PR_Free(msg);
  414. break;
  415.     case SEC_ASN1_PRIVATE:
  416.         msg = PR_smprintf("Private: %d ", tagnum);
  417.         rv = PR_Write(out, msg, PL_strlen(msg));
  418. break;
  419.     }
  420.     if (rv < 0) {
  421.         PR_SetError(SEC_ERROR_IO,0);
  422. return rv;
  423.     }
  424.     *codep = code;
  425.     return 1;
  426. }
  427. static int
  428. prettyPrintLength(PRFileDesc *out, unsigned char *data, unsigned char *end,
  429.   int *lenp, PRBool *indefinitep, unsigned int lv, PRBool raw)
  430. {
  431.     unsigned char lbyte;
  432.     int lenLen;
  433.     int rv;
  434.     if (data >= end) {
  435. PR_SetError(SEC_ERROR_BAD_DER,0);
  436. return -1;
  437.     }
  438.     rv = PR_Write(out, " ",1);
  439.     if (rv < 0) {
  440.         PR_SetError(SEC_ERROR_IO,0);
  441. return rv;
  442.     }
  443.     *indefinitep = PR_FALSE;
  444.     lbyte = *data++;
  445.     if (lbyte >= 0x80) {
  446. /* Multibyte length */
  447. unsigned nb = (unsigned) (lbyte & 0x7f);
  448. if (nb > 4) {
  449.     PR_SetError(SEC_ERROR_BAD_DER,0);
  450.     return -1;
  451. }
  452. if (nb > 0) {
  453.     int il;
  454.     if ((data + nb) > end) {
  455. PR_SetError(SEC_ERROR_BAD_DER,0);
  456. return -1;
  457.     }
  458.     il = getInteger256(data, nb);
  459.     if (il < 0) return -1;
  460.     *lenp = (unsigned) il;
  461. } else {
  462.     *lenp = 0;
  463.     *indefinitep = PR_TRUE;
  464. }
  465. lenLen = nb + 1;
  466. if (raw) {
  467.     unsigned int i;
  468.     rv = prettyPrintByte(out, lbyte, lv);
  469.     if (rv < 0)
  470. return rv;
  471.     for (i = 0; i < nb; i++) {
  472. rv = prettyPrintByte(out, data[i], lv);
  473. if (rv < 0)
  474.     return rv;
  475.     }
  476. }
  477.     } else {
  478. *lenp = lbyte;
  479. lenLen = 1;
  480. if (raw) {
  481.     rv = prettyPrintByte(out, lbyte, lv);
  482.     if (rv < 0)
  483. return rv;
  484. }
  485.     }
  486.     if (*indefinitep) {
  487. rv = PR_Write(out, "(indefinite)n", PL_strlen("(indefinite)n"));
  488.     } else {
  489.         char *msg;
  490.         msg= PR_smprintf("(%d)n", *lenp);
  491. rv = PR_Write(out, msg, PL_strlen(msg));
  492.     }
  493.     if (rv < 0) {
  494.         PR_SetError(SEC_ERROR_IO,0);
  495. return rv;
  496.     }
  497.     prettyColumn = -1;
  498.     return lenLen;
  499. }
  500. static int
  501. prettyPrintItem(PRFileDesc *out, unsigned char *data, unsigned char *end,
  502. unsigned int lv, PRBool raw)
  503. {
  504.     int slen;
  505.     int lenLen;
  506.     unsigned char *orig = data;
  507.     int rv;
  508.     while (data < end) {
  509.         unsigned char code;
  510. PRBool indefinite;
  511. slen = prettyPrintTag(out, data, end, &code, lv, raw);
  512. if (slen < 0)
  513.     return slen;
  514. data += slen;
  515. lenLen = prettyPrintLength(out, data, end, &slen, &indefinite, lv, raw);
  516. if (lenLen < 0)
  517.     return lenLen;
  518. data += lenLen;
  519. /*
  520.  * Just quit now if slen more bytes puts us off the end.
  521.  */
  522. if ((data + slen) > end) {
  523.     PR_SetError(SEC_ERROR_BAD_DER,0);
  524.     return -1;
  525. }
  526.         if (code & SEC_ASN1_CONSTRUCTED) {
  527.     if (slen > 0 || indefinite) {
  528. slen = prettyPrintItem(out, data,
  529.        slen == 0 ? end : data + slen,
  530.        lv+1, raw);
  531. if (slen < 0)
  532.     return slen;
  533. data += slen;
  534.     }
  535. } else if (code == 0) {
  536.     if (slen != 0 || lenLen != 1) {
  537. PR_SetError(SEC_ERROR_BAD_DER,0);
  538. return -1;
  539.     }
  540.     break;
  541. } else {
  542.     switch (code) {
  543.       case SEC_ASN1_PRINTABLE_STRING:
  544.       case SEC_ASN1_IA5_STRING:
  545.       case SEC_ASN1_VISIBLE_STRING:
  546.       case SEC_ASN1_T61_STRING:
  547.       case SEC_ASN1_UTF8_STRING:
  548.         rv = prettyPrintString(out, data, slen, lv+1, raw);
  549. if (rv < 0)
  550.     return rv;
  551. break;
  552.       case SEC_ASN1_UTC_TIME:
  553.         rv = prettyPrintTime(out, data, slen, lv+1, raw, PR_TRUE);
  554. if (rv < 0)
  555.     return rv;
  556. break;
  557.       case SEC_ASN1_GENERALIZED_TIME:
  558.         rv = prettyPrintTime(out, data, slen, lv+1, raw, PR_FALSE);
  559. if (rv < 0)
  560.     return rv;
  561. break;
  562.       case SEC_ASN1_OBJECT_ID:
  563.         rv = prettyPrintObjectID(out, data, slen, lv+1, raw);
  564. if (rv < 0)
  565.     return rv;
  566. break;
  567.       case SEC_ASN1_OCTET_STRING:
  568. /* rv = prettyPrintOctetString(out,data,slen,lv+1); */
  569. rv = prettyPrintItem(out,data,data+slen,lv+1, raw);
  570. if (rv < 0)
  571.     return rv;
  572. break;
  573.       case SEC_ASN1_BOOLEAN: /* could do nicer job */
  574.       case SEC_ASN1_INTEGER: /* could do nicer job */
  575.       case SEC_ASN1_BIT_STRING: /* could do nicer job */
  576.       case SEC_ASN1_NULL:
  577.       case SEC_ASN1_ENUMERATED: /* could do nicer job, as INTEGER */
  578.       case SEC_ASN1_UNIVERSAL_STRING:
  579.       case SEC_ASN1_BMP_STRING:
  580.       default:
  581.         rv = prettyPrintLeaf(out, data, slen, lv+1);
  582. if (rv < 0)
  583.     return rv;
  584. break;
  585.     }
  586.     data += slen;
  587. }
  588.     }
  589.     rv = prettyNewline(out);
  590.     if (rv < 0)
  591. return rv;
  592.     return data - orig;
  593. }
  594. SSMStatus
  595. SSM_PrettyPrintDER(PRFileDesc *out, SECItem *it, PRBool raw)
  596. {
  597.     int rv;
  598.     prettyColumn = -1;
  599.     rv = prettyPrintItem(out, it->data, it->data + it->len, 0, raw);
  600.     if (rv < 0)
  601. return SSM_FAILURE;
  602.     return SSM_SUCCESS;
  603. }