pike.git / lib / modules / Standards.pmod / testsuite.in

version» Context lines:

pike.git/lib/modules/Standards.pmod/testsuite.in:430:    if(!m->verified || m->error_code!=Standards.X509.CERT_TOO_NEW)    return m+(["line":__LINE__]);       return 1;   ]], 1)      test_true(mappingp(Standards.X509.load_authorities()))      define(test_cert, ([[    test_true(Standards.X509.verify_certificate(Standards.PEM.Messages(#"$1")->parts->CERTIFICATE->body, ([]))) +  test_any([[ +  string der = Standards.PEM.Messages(#"$1")->parts->CERTIFICATE->body; +  object o = decode_value(encode_value(Standards.X509.decode_certificate(der))); +  /* TBS does not contain the full certificate... */ +  /* if( o->get_der() != der ) return -1; */ +  +  if( o->ext_basicConstraints != 1) return 2; +  if( !o->public_key->pkc ) return 3; +  return 1; +  ]], 1)   ]]))      dnl openssl req -x509 -nodes -days 365 -subj "/CN=PikeCert" -md5 -newkey rsa:2048 -out certfile.cer   test_cert(-----BEGIN CERTIFICATE-----   MIIC+TCCAeGgAwIBAgIJAK9S+nXAkU+DMA0GCSqGSIb3DQEBBAUAMBMxETAPBgNV   BAMMCFBpa2VDZXJ0MB4XDTEzMTEyMTIxMjM1MFoXDTE0MTEyMTIxMjM1MFowEzER   MA8GA1UEAwwIUGlrZUNlcnQwggEiMA0GCSqGSIb3DQEBAQUAA4IBDwAwggEKAoIB   AQDacxSu60OEhmtfBd+p9oaQ+4w13Cwp70dwRrjPb/y33sFWKN3YZ+rq/8aNXPUO   GLOyVF6z/BlOBS8t6KBI6lNvozVFqp5cwjA6vncbwMODqB8ZZffgA/dbSTM/xtbb   CSno4ylr4wLVk1tnwZIOS4F2mIR/po1QzwIqTAGdkMEvUkmknqEM2Ifqdb6pNjWh