apps/ca.c:1499: error: NULL_DEREFERENCE
  pointer `str` last assigned on line 1492 could be null and is dereferenced at line 1499, column 17.
Showing all 95 steps of the trace


apps/ca.c:1438:1: start of procedure do_body()
1436.   }
1437.   
1438. > static int do_body(X509 **xret, EVP_PKEY *pkey, X509 *x509,
1439.                      const EVP_MD *dgst, STACK_OF(OPENSSL_STRING) *sigopts,
1440.                      STACK_OF(CONF_VALUE) *policy, CA_DB *db, BIGNUM *serial,

apps/ca.c:1447:5: 
1445.                      int default_op, int ext_copy, int selfsign)
1446.   {
1447. >     X509_NAME *name = NULL, *CAname = NULL, *subject = NULL, *dn_subject =
1448.           NULL;
1449.       ASN1_UTCTIME *tm, *tmptm;

apps/ca.c:1452:5: 
1450.       ASN1_STRING *str, *str2;
1451.       ASN1_OBJECT *obj;
1452. >     X509 *ret = NULL;
1453.       X509_CINF *ci;
1454.       X509_NAME_ENTRY *ne;

apps/ca.c:1457:5: 
1455.       X509_NAME_ENTRY *tne, *push;
1456.       EVP_PKEY *pktmp;
1457. >     int ok = -1, i, j, last, nid;
1458.       const char *p;
1459.       CONF_VALUE *cv;

apps/ca.c:1461:5: 
1459.       CONF_VALUE *cv;
1460.       OPENSSL_STRING row[DB_NUMBER];
1461. >     OPENSSL_STRING *irow = NULL;
1462.       OPENSSL_STRING *rrow = NULL;
1463.       char buf[25];

apps/ca.c:1462:5: 
1460.       OPENSSL_STRING row[DB_NUMBER];
1461.       OPENSSL_STRING *irow = NULL;
1462. >     OPENSSL_STRING *rrow = NULL;
1463.       char buf[25];
1464.   

apps/ca.c:1465:5: 
1463.       char buf[25];
1464.   
1465. >     tmptm = ASN1_UTCTIME_new();
1466.       if (tmptm == NULL) {
1467.           BIO_printf(bio_err, "malloc error\n");

crypto/asn1/tasn_typ.c:86:1: start of procedure ASN1_UTCTIME_new()
  84.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_IA5STRING)
  85.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_GENERALSTRING)
  86. > IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_UTCTIME)
  87.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_GENERALIZEDTIME)
  88.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_VISIBLESTRING)

crypto/asn1/tasn_typ.c:86:1: return from a call to ASN1_UTCTIME_new
  84.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_IA5STRING)
  85.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_GENERALSTRING)
  86. > IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_UTCTIME)
  87.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_GENERALIZEDTIME)
  88.   IMPLEMENT_ASN1_STRING_FUNCTIONS(ASN1_VISIBLESTRING)

apps/ca.c:1466:9: Taking false branch
1464.   
1465.       tmptm = ASN1_UTCTIME_new();
1466.       if (tmptm == NULL) {
                ^
1467.           BIO_printf(bio_err, "malloc error\n");
1468.           return (0);

apps/ca.c:1471:10: 
1469.       }
1470.   
1471. >     for (i = 0; i < DB_NUMBER; i++)
1472.           row[i] = NULL;
1473.   

apps/ca.c:1471:17: Loop condition is true. Entering loop body
1469.       }
1470.   
1471.       for (i = 0; i < DB_NUMBER; i++)
                        ^
1472.           row[i] = NULL;
1473.   

apps/ca.c:1472:9: 
1470.   
1471.       for (i = 0; i < DB_NUMBER; i++)
1472. >         row[i] = NULL;
1473.   
1474.       if (subj) {

apps/ca.c:1471:32: 
1469.       }
1470.   
1471. >     for (i = 0; i < DB_NUMBER; i++)
1472.           row[i] = NULL;
1473.   

apps/ca.c:1471:17: Loop condition is false. Leaving loop
1469.       }
1470.   
1471.       for (i = 0; i < DB_NUMBER; i++)
                        ^
1472.           row[i] = NULL;
1473.   

apps/ca.c:1474:9: Taking true branch
1472.           row[i] = NULL;
1473.   
1474.       if (subj) {
                ^
1475.           X509_NAME *n = parse_name(subj, chtype, multirdn);
1476.   

apps/ca.c:1475:9: Skipping parse_name(): empty list of specs
1473.   
1474.       if (subj) {
1475.           X509_NAME *n = parse_name(subj, chtype, multirdn);
                ^
1476.   
1477.           if (!n) {

apps/ca.c:1477:14: Taking false branch
1475.           X509_NAME *n = parse_name(subj, chtype, multirdn);
1476.   
1477.           if (!n) {
                     ^
1478.               ERR_print_errors(bio_err);
1479.               goto end;

apps/ca.c:1481:9: 
1479.               goto end;
1480.           }
1481. >         X509_REQ_set_subject_name(req, n);
1482.           X509_NAME_free(n);
1483.       }

crypto/x509/x509rset.c:75:1: start of procedure X509_REQ_set_subject_name()
  73.   }
  74.   
  75. > int X509_REQ_set_subject_name(X509_REQ *x, X509_NAME *name)
  76.   {
  77.       if ((x == NULL) || (x->req_info == NULL))

crypto/x509/x509rset.c:77:10: Taking false branch
  75.   int X509_REQ_set_subject_name(X509_REQ *x, X509_NAME *name)
  76.   {
  77.       if ((x == NULL) || (x->req_info == NULL))
                 ^
  78.           return (0);
  79.       x->req_info->enc.modified = 1;

crypto/x509/x509rset.c:77:25: Taking false branch
  75.   int X509_REQ_set_subject_name(X509_REQ *x, X509_NAME *name)
  76.   {
  77.       if ((x == NULL) || (x->req_info == NULL))
                                ^
  78.           return (0);
  79.       x->req_info->enc.modified = 1;

crypto/x509/x509rset.c:79:5: 
  77.       if ((x == NULL) || (x->req_info == NULL))
  78.           return (0);
  79. >     x->req_info->enc.modified = 1;
  80.       return (X509_NAME_set(&x->req_info->subject, name));
  81.   }

crypto/x509/x509rset.c:80:5: 
  78.           return (0);
  79.       x->req_info->enc.modified = 1;
  80. >     return (X509_NAME_set(&x->req_info->subject, name));
  81.   }
  82.   

crypto/x509/x_name.c:503:1: start of procedure X509_NAME_set()
    501.   }
    502.   
    503. > int X509_NAME_set(X509_NAME **xn, X509_NAME *name)
    504.   {
    505.       X509_NAME *in;

crypto/x509/x_name.c:507:10: Taking false branch
    505.       X509_NAME *in;
    506.   
    507.       if (!xn || !name)
                    ^
    508.           return (0);
    509.   

crypto/x509/x_name.c:507:17: Taking false branch
    505.       X509_NAME *in;
    506.   
    507.       if (!xn || !name)
                           ^
    508.           return (0);
    509.   

crypto/x509/x_name.c:510:9: Taking false branch
    508.           return (0);
    509.   
    510.       if (*xn != name) {
                   ^
    511.           in = X509_NAME_dup(name);
    512.           if (in != NULL) {

crypto/x509/x_name.c:517:13: Condition is true
    515.           }
    516.       }
    517.       return (*xn != NULL);
                       ^
    518.   }

crypto/x509/x_name.c:517:5: 
    515.           }
    516.       }
    517. >     return (*xn != NULL);
    518.   }

crypto/x509/x_name.c:518:1: return from a call to X509_NAME_set
    516.       }
    517.       return (*xn != NULL);
    518. > }

crypto/x509/x509rset.c:81:1: return from a call to X509_REQ_set_subject_name
  79.       x->req_info->enc.modified = 1;
  80.       return (X509_NAME_set(&x->req_info->subject, name));
  81. > }
  82.   
  83.   int X509_REQ_set_pubkey(X509_REQ *x, EVP_PKEY *pkey)

apps/ca.c:1482:9: 
1480.           }
1481.           X509_REQ_set_subject_name(req, n);
1482. >         X509_NAME_free(n);
1483.       }
1484.   

crypto/x509/x_name.c:130:1: start of procedure X509_NAME_free()
  128.   IMPLEMENT_EXTERN_ASN1(X509_NAME, V_ASN1_SEQUENCE, x509_name_ff)
  129.   
  130. > IMPLEMENT_ASN1_FUNCTIONS(X509_NAME)
  131.   
  132.   IMPLEMENT_ASN1_DUP_FUNCTION(X509_NAME)

crypto/asn1/tasn_fre.c:68:1: start of procedure ASN1_item_free()
    66.   /* Free up an ASN1 structure */
    67.   
    68. > void ASN1_item_free(ASN1_VALUE *val, const ASN1_ITEM *it)
    69.   {
    70.       ASN1_item_ex_free(&val, it);

crypto/asn1/tasn_fre.c:70:5: Skipping ASN1_item_ex_free(): empty list of specs
    68.   void ASN1_item_free(ASN1_VALUE *val, const ASN1_ITEM *it)
    69.   {
    70.       ASN1_item_ex_free(&val, it);
              ^
    71.   }
    72.   

crypto/asn1/tasn_fre.c:71:1: return from a call to ASN1_item_free
    69.   {
    70.       ASN1_item_ex_free(&val, it);
    71. > }
    72.   
    73.   void ASN1_item_ex_free(ASN1_VALUE **pval, const ASN1_ITEM *it)

crypto/x509/x_name.c:130:1: return from a call to X509_NAME_free
  128.   IMPLEMENT_EXTERN_ASN1(X509_NAME, V_ASN1_SEQUENCE, x509_name_ff)
  129.   
  130. > IMPLEMENT_ASN1_FUNCTIONS(X509_NAME)
  131.   
  132.   IMPLEMENT_ASN1_DUP_FUNCTION(X509_NAME)

apps/ca.c:1485:9: Taking false branch
1483.       }
1484.   
1485.       if (default_op)
                ^
1486.           BIO_printf(bio_err,
1487.                      "The Subject's Distinguished Name is as follows\n");

apps/ca.c:1489:5: 
1487.                      "The Subject's Distinguished Name is as follows\n");
1488.   
1489. >     name = X509_REQ_get_subject_name(req);
1490.       for (i = 0; i < X509_NAME_entry_count(name); i++) {
1491.           ne = X509_NAME_get_entry(name, i);

crypto/x509/x509_req.c:313:1: start of procedure X509_REQ_get_subject_name()
  311.   }
  312.   
  313. > X509_NAME *X509_REQ_get_subject_name(X509_REQ *req)
  314.   {
  315.       return req->req_info->subject;

crypto/x509/x509_req.c:315:5: 
  313.   X509_NAME *X509_REQ_get_subject_name(X509_REQ *req)
  314.   {
  315. >     return req->req_info->subject;
  316.   }

crypto/x509/x509_req.c:316:1: return from a call to X509_REQ_get_subject_name
  314.   {
  315.       return req->req_info->subject;
  316. > }

apps/ca.c:1490:10: 
1488.   
1489.       name = X509_REQ_get_subject_name(req);
1490. >     for (i = 0; i < X509_NAME_entry_count(name); i++) {
1491.           ne = X509_NAME_get_entry(name, i);
1492.           str = X509_NAME_ENTRY_get_data(ne);

apps/ca.c:1490:17: 
1488.   
1489.       name = X509_REQ_get_subject_name(req);
1490. >     for (i = 0; i < X509_NAME_entry_count(name); i++) {
1491.           ne = X509_NAME_get_entry(name, i);
1492.           str = X509_NAME_ENTRY_get_data(ne);

crypto/x509/x509name.c:96:1: start of procedure X509_NAME_entry_count()
  94.   }
  95.   
  96. > int X509_NAME_entry_count(X509_NAME *name)
  97.   {
  98.       if (name == NULL)

crypto/x509/x509name.c:98:9: Taking false branch
  96.   int X509_NAME_entry_count(X509_NAME *name)
  97.   {
  98.       if (name == NULL)
                 ^
  99.           return (0);
  100.       return (sk_X509_NAME_ENTRY_num(name->entries));

crypto/x509/x509name.c:100:13: Condition is true
  98.       if (name == NULL)
  99.           return (0);
  100.       return (sk_X509_NAME_ENTRY_num(name->entries));
                     ^
  101.   }
  102.   

crypto/x509/x509name.c:100:5: 
  98.       if (name == NULL)
  99.           return (0);
  100. >     return (sk_X509_NAME_ENTRY_num(name->entries));
  101.   }
  102.   

crypto/stack/stack.c:321:1: start of procedure sk_num()
    319.   }
    320.   
    321. > int sk_num(const _STACK *st)
    322.   {
    323.       if (st == NULL)

crypto/stack/stack.c:323:9: Taking false branch
    321.   int sk_num(const _STACK *st)
    322.   {
    323.       if (st == NULL)
                   ^
    324.           return -1;
    325.       return st->num;

crypto/stack/stack.c:325:5: 
    323.       if (st == NULL)
    324.           return -1;
    325. >     return st->num;
    326.   }
    327.   

crypto/stack/stack.c:326:1: return from a call to sk_num
    324.           return -1;
    325.       return st->num;
    326. > }
    327.   
    328.   void *sk_value(const _STACK *st, int i)

crypto/x509/x509name.c:101:1: return from a call to X509_NAME_entry_count
  99.           return (0);
  100.       return (sk_X509_NAME_ENTRY_num(name->entries));
  101. > }
  102.   
  103.   int X509_NAME_get_index_by_NID(X509_NAME *name, int nid, int lastpos)

apps/ca.c:1490:17: Loop condition is true. Entering loop body
1488.   
1489.       name = X509_REQ_get_subject_name(req);
1490.       for (i = 0; i < X509_NAME_entry_count(name); i++) {
                        ^
1491.           ne = X509_NAME_get_entry(name, i);
1492.           str = X509_NAME_ENTRY_get_data(ne);

apps/ca.c:1491:9: 
1489.       name = X509_REQ_get_subject_name(req);
1490.       for (i = 0; i < X509_NAME_entry_count(name); i++) {
1491. >         ne = X509_NAME_get_entry(name, i);
1492.           str = X509_NAME_ENTRY_get_data(ne);
1493.           obj = X509_NAME_ENTRY_get_object(ne);

crypto/x509/x509name.c:134:1: start of procedure X509_NAME_get_entry()
  132.   }
  133.   
  134. > X509_NAME_ENTRY *X509_NAME_get_entry(X509_NAME *name, int loc)
  135.   {
  136.       if (name == NULL || sk_X509_NAME_ENTRY_num(name->entries) <= loc

crypto/x509/x509name.c:136:9: Taking false branch
  134.   X509_NAME_ENTRY *X509_NAME_get_entry(X509_NAME *name, int loc)
  135.   {
  136.       if (name == NULL || sk_X509_NAME_ENTRY_num(name->entries) <= loc
                 ^
  137.           || loc < 0)
  138.           return (NULL);

crypto/x509/x509name.c:136:25: Condition is true
  134.   X509_NAME_ENTRY *X509_NAME_get_entry(X509_NAME *name, int loc)
  135.   {
  136.       if (name == NULL || sk_X509_NAME_ENTRY_num(name->entries) <= loc
                                 ^
  137.           || loc < 0)
  138.           return (NULL);

crypto/stack/stack.c:321:1: start of procedure sk_num()
    319.   }
    320.   
    321. > int sk_num(const _STACK *st)
    322.   {
    323.       if (st == NULL)

crypto/stack/stack.c:323:9: Taking false branch
    321.   int sk_num(const _STACK *st)
    322.   {
    323.       if (st == NULL)
                   ^
    324.           return -1;
    325.       return st->num;

crypto/stack/stack.c:325:5: 
    323.       if (st == NULL)
    324.           return -1;
    325. >     return st->num;
    326.   }
    327.   

crypto/stack/stack.c:326:1: return from a call to sk_num
    324.           return -1;
    325.       return st->num;
    326. > }
    327.   
    328.   void *sk_value(const _STACK *st, int i)

crypto/x509/x509name.c:136:25: Taking false branch
  134.   X509_NAME_ENTRY *X509_NAME_get_entry(X509_NAME *name, int loc)
  135.   {
  136.       if (name == NULL || sk_X509_NAME_ENTRY_num(name->entries) <= loc
                                 ^
  137.           || loc < 0)
  138.           return (NULL);

crypto/x509/x509name.c:137:12: Taking false branch
  135.   {
  136.       if (name == NULL || sk_X509_NAME_ENTRY_num(name->entries) <= loc
  137.           || loc < 0)
                    ^
  138.           return (NULL);
  139.       else

crypto/x509/x509name.c:140:17: Condition is true
  138.           return (NULL);
  139.       else
  140.           return (sk_X509_NAME_ENTRY_value(name->entries, loc));
                         ^
  141.   }
  142.   

crypto/x509/x509name.c:140:9: 
  138.           return (NULL);
  139.       else
  140. >         return (sk_X509_NAME_ENTRY_value(name->entries, loc));
  141.   }
  142.   

crypto/stack/stack.c:328:1: start of procedure sk_value()
    326.   }
    327.   
    328. > void *sk_value(const _STACK *st, int i)
    329.   {
    330.       if (!st || (i < 0) || (i >= st->num))

crypto/stack/stack.c:330:10: Taking false branch
    328.   void *sk_value(const _STACK *st, int i)
    329.   {
    330.       if (!st || (i < 0) || (i >= st->num))
                    ^
    331.           return NULL;
    332.       return st->data[i];

crypto/stack/stack.c:330:17: Taking false branch
    328.   void *sk_value(const _STACK *st, int i)
    329.   {
    330.       if (!st || (i < 0) || (i >= st->num))
                           ^
    331.           return NULL;
    332.       return st->data[i];

crypto/stack/stack.c:330:28: Taking false branch
    328.   void *sk_value(const _STACK *st, int i)
    329.   {
    330.       if (!st || (i < 0) || (i >= st->num))
                                      ^
    331.           return NULL;
    332.       return st->data[i];

crypto/stack/stack.c:332:5: 
    330.       if (!st || (i < 0) || (i >= st->num))
    331.           return NULL;
    332. >     return st->data[i];
    333.   }
    334.   

crypto/stack/stack.c:333:1: return from a call to sk_value
    331.           return NULL;
    332.       return st->data[i];
    333. > }
    334.   
    335.   void *sk_set(_STACK *st, int i, void *value)

crypto/x509/x509name.c:141:1: return from a call to X509_NAME_get_entry
  139.       else
  140.           return (sk_X509_NAME_ENTRY_value(name->entries, loc));
  141. > }
  142.   
  143.   X509_NAME_ENTRY *X509_NAME_delete_entry(X509_NAME *name, int loc)

apps/ca.c:1492:9: 
1490.       for (i = 0; i < X509_NAME_entry_count(name); i++) {
1491.           ne = X509_NAME_get_entry(name, i);
1492. >         str = X509_NAME_ENTRY_get_data(ne);
1493.           obj = X509_NAME_ENTRY_get_object(ne);
1494.   

crypto/x509/x509name.c:392:1: start of procedure X509_NAME_ENTRY_get_data()
  390.   }
  391.   
  392. > ASN1_STRING *X509_NAME_ENTRY_get_data(X509_NAME_ENTRY *ne)
  393.   {
  394.       if (ne == NULL)

crypto/x509/x509name.c:394:9: Taking true branch
  392.   ASN1_STRING *X509_NAME_ENTRY_get_data(X509_NAME_ENTRY *ne)
  393.   {
  394.       if (ne == NULL)
                 ^
  395.           return (NULL);
  396.       return (ne->value);

crypto/x509/x509name.c:395:9: 
  393.   {
  394.       if (ne == NULL)
  395. >         return (NULL);
  396.       return (ne->value);
  397.   }

crypto/x509/x509name.c:397:1: return from a call to X509_NAME_ENTRY_get_data
  395.           return (NULL);
  396.       return (ne->value);
  397. > }
  398.   
  399.   int X509_NAME_ENTRY_set(const X509_NAME_ENTRY *ne)

apps/ca.c:1493:9: 
1491.           ne = X509_NAME_get_entry(name, i);
1492.           str = X509_NAME_ENTRY_get_data(ne);
1493. >         obj = X509_NAME_ENTRY_get_object(ne);
1494.   
1495.           if (msie_hack) {

crypto/x509/x509name.c:385:1: start of procedure X509_NAME_ENTRY_get_object()
  383.   }
  384.   
  385. > ASN1_OBJECT *X509_NAME_ENTRY_get_object(X509_NAME_ENTRY *ne)
  386.   {
  387.       if (ne == NULL)

crypto/x509/x509name.c:387:9: Taking true branch
  385.   ASN1_OBJECT *X509_NAME_ENTRY_get_object(X509_NAME_ENTRY *ne)
  386.   {
  387.       if (ne == NULL)
                 ^
  388.           return (NULL);
  389.       return (ne->object);

crypto/x509/x509name.c:388:9: 
  386.   {
  387.       if (ne == NULL)
  388. >         return (NULL);
  389.       return (ne->object);
  390.   }

crypto/x509/x509name.c:390:1: return from a call to X509_NAME_ENTRY_get_object
  388.           return (NULL);
  389.       return (ne->object);
  390. > }
  391.   
  392.   ASN1_STRING *X509_NAME_ENTRY_get_data(X509_NAME_ENTRY *ne)

apps/ca.c:1495:13: Taking true branch
1493.           obj = X509_NAME_ENTRY_get_object(ne);
1494.   
1495.           if (msie_hack) {
                    ^
1496.               /* assume all type should be strings */
1497.               nid = OBJ_obj2nid(X509_NAME_ENTRY_get_object(ne));

apps/ca.c:1497:13: 
1495.           if (msie_hack) {
1496.               /* assume all type should be strings */
1497. >             nid = OBJ_obj2nid(X509_NAME_ENTRY_get_object(ne));
1498.   
1499.               if (str->type == V_ASN1_UNIVERSALSTRING)

crypto/x509/x509name.c:385:1: start of procedure X509_NAME_ENTRY_get_object()
  383.   }
  384.   
  385. > ASN1_OBJECT *X509_NAME_ENTRY_get_object(X509_NAME_ENTRY *ne)
  386.   {
  387.       if (ne == NULL)

crypto/x509/x509name.c:387:9: Taking true branch
  385.   ASN1_OBJECT *X509_NAME_ENTRY_get_object(X509_NAME_ENTRY *ne)
  386.   {
  387.       if (ne == NULL)
                 ^
  388.           return (NULL);
  389.       return (ne->object);

crypto/x509/x509name.c:388:9: 
  386.   {
  387.       if (ne == NULL)
  388. >         return (NULL);
  389.       return (ne->object);
  390.   }

crypto/x509/x509name.c:390:1: return from a call to X509_NAME_ENTRY_get_object
  388.           return (NULL);
  389.       return (ne->object);
  390. > }
  391.   
  392.   ASN1_STRING *X509_NAME_ENTRY_get_data(X509_NAME_ENTRY *ne)

crypto/objects/obj_dat.c:390:1: start of procedure OBJ_obj2nid()
  388.   IMPLEMENT_OBJ_BSEARCH_CMP_FN(const ASN1_OBJECT *, unsigned int, obj);
  389.   
  390. > int OBJ_obj2nid(const ASN1_OBJECT *a)
  391.   {
  392.       const unsigned int *op;

crypto/objects/obj_dat.c:395:9: Taking true branch
  393.       ADDED_OBJ ad, *adp;
  394.   
  395.       if (a == NULL)
                 ^
  396.           return (NID_undef);
  397.       if (a->nid != 0)

crypto/objects/obj_dat.c:396:9: 
  394.   
  395.       if (a == NULL)
  396. >         return (NID_undef);
  397.       if (a->nid != 0)
  398.           return (a->nid);

crypto/objects/obj_dat.c:414:1: return from a call to OBJ_obj2nid
  412.           return (NID_undef);
  413.       return (nid_objs[*op].nid);
  414. > }
  415.   
  416.   /*

apps/ca.c:1499:17: 
1497.               nid = OBJ_obj2nid(X509_NAME_ENTRY_get_object(ne));
1498.   
1499. >             if (str->type == V_ASN1_UNIVERSALSTRING)
1500.                   ASN1_UNIVERSALSTRING_to_string(str);
1501.   
