Example #1
0
 function _testOnlineNIC()
 {
     $Registrant = $this->Registry->NewContactInstance(CONTACT_TYPE::REGISTRANT);
     $Registrant->SetFieldList($this->contact_data);
     $Registrant->AuthCode = rand(100000, 999999);
     $this->Registry->CreateContact($Registrant);
     $this->assertTrue($Registrant->CLID != null, 'Create registrant contact');
     $Contact = $this->Registry->NewContactInstanceByGroup('generic');
     $Contact->SetFieldList(array_merge($this->contact_data, array('cc' => 'US', 'AppPurpose' => 'P1', 'NexusCategory' => 'C12')));
     $Contact->AuthCode = rand(100000, 999999);
     $this->Registry->CreateContact($Contact);
     $this->assertTrue($Contact->CLID != null, 'Create generic contact');
     $Domain = $this->Registry->NewDomainInstance();
     $Domain->Name = 'webta' . rand(1000, 9999);
     $this->assertTrue($this->Registry->DomainCanBeRegistered($Domain), 'Domain available for registration');
     $Domain->SetNameserverList(array(new Nameserver('ns1.onlinenic.com'), new Nameserver('ns2.onlinenic.com')));
     $Domain->SetContact($Registrant, CONTACT_TYPE::REGISTRANT);
     $Domain->SetContact($Contact, CONTACT_TYPE::TECH);
     $Domain->SetContact($Contact, CONTACT_TYPE::BILLING);
     $Domain->SetContact($Contact, CONTACT_TYPE::ADMIN);
     $Domain->AuthCode = rand(10000000, 99999999);
     $this->Registry->CreateDomain($Domain, 2);
     $this->assertTrue($Domain->ID != null && $Domain->Status == DOMAIN_STATUS::DELEGATED, 'Create domain');
     $contact_data = $Contact->GetFieldList();
     $contact_data['name'] = 'Nerrible man';
     $Contact->SetFieldList($contact_data);
     $Contact->ExtraData['type'] = CONTACT_TYPE::TECH;
     $Contact->ExtraData['domainname'] = $Domain->Name;
     $this->Registry->UpdateContact($Contact);
     $this->assertTrue(true, 'Update contact');
     $old_expire_date = $Domain->ExpireDate;
     $this->Registry->RenewDomain($Domain, array('period' => 1));
     $this->assertTrue($Domain->ExpireDate !== $old_expire_date, 'Renew domain');
     $nslist = $Domain->GetNameserverList();
     $changelist = $Domain->GetNameserverChangelist();
     $changelist->SetChangedList(array(new Nameserver('ns1.google.com'), new Nameserver('ns2.google.com')));
     $this->Registry->UpdateDomainNameservers($Domain, $changelist);
     $this->assertTrue($Domain->GetNameserverList() == $changelist->GetList(), 'Update domain nameservers');
     $Domain2 = $this->Registry->NewDomainInstance();
     $Domain2->Name = $Domain->Name;
     $Domain2 = $this->Registry->GetRemoteDomain($Domain2);
     $this->assertTrue($Domain2->ExpireDate == $Domain->ExpireDate, 'Get remote domain');
     $nshost = new NameserverHost("ns1.{$Domain->GetHostName()}", '70.84.45.21');
     $this->Registry->CreateNameserverHost($nshost);
     $nshost->IPAddr = '70.84.45.23';
     $this->Registry->GetModule()->UpdateNameserverHost($nshost);
     $ok = $this->Registry->DeleteNameserverHost($nshost);
     $this->assertTrue($ok, 'Delete nameserver host');
     $ok = $this->Registry->DeleteDomain($Domain);
     $this->assertTrue($ok, 'Delete domain');
 }
 public function RunTest(DataForm $DF)
 {
     $filename = '/tmp/eppdrs-srsplus-certtest-' . date('YmdHis') . '.log';
     Log::RegisterLogger("File", "SRSPLUS", $filename);
     Log::SetDefaultLogger("SRSPLUS");
     $fields = $DF->ListFields();
     $conf_fields = $this->Config->ListFields();
     $conf_fields['Login']->Value = $fields['Login']->Value;
     $conf_fields['Email']->Value = $fields['Email']->Value;
     $conf_fields['Host']->Value = $fields['Host']->Value;
     $conf_fields['GPGPass']->Value = $fields['GPGPass']->Value;
     $conf_fields['TestMode']->Value = '1';
     $Module = new SRSPlusRegistryModule(new RegistryManifest(MODULES_PATH . "/registries/SRSPlus/module.xml"));
     $Module->InitializeModule('com', $this->Config);
     $Registry = new Registry($Module);
     $oplog = array();
     ////
     // 1. Create contact
     $op = array('title' => "Create contact");
     try {
         $Contact = $Registry->NewContactInstanceByGroup('generic');
         $Contact->SetFieldList(array("firstname" => "Marat", "lastname" => "Komarov", "org" => "Webta", "street1" => "Testing str. 80", "street2" => "Drive 54", "city" => "Testing", "pc" => "90210", "cc" => "US", "sp" => "TX", "voice" => "+333.1234567", "fax" => "+333.1234567", "email" => "marat@webta.net"));
         $Registry->CreateContact($Contact);
         $Contact2 = $Registry->NewContactInstanceByGroup('generic');
         $Contact2->SetFieldList(array("firstname" => "Marat", "lastname" => "Komarov", "org" => "Webta", "street1" => "Testing str. 80", "street2" => "Drive 54", "city" => "Testing", "pc" => "90210", "cc" => "US", "sp" => "TX", "voice" => "+333.1234567", "fax" => "+333.1234567", "email" => "marat@webta.net"));
         $Registry->CreateContact($Contact2);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 2. Get remote contact
     $op = array('title' => 'Get contact');
     try {
         $RContact = $Registry->NewContactInstanceByGroup('generic');
         $RContact->CLID = $Contact->CLID;
         $RContact = $Registry->GetRemoteContact($Contact);
         $contact_fields = $Contact->GetFieldList();
         $rcontact_fields = $RContact->GetFieldList();
         $op['ok'] = $contact_fields['first_name'] == $rcontact_fields['first_name'] && $contact_fields['last_name'] == $rcontact_fields['last_name'];
         if (!$op['ok']) {
             $op['fail_reason'] = 'Invalid module behavoiur';
         }
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 3. Update contact
     $op = array('title' => 'Edit contact');
     try {
         $contact_fields['email'] = 'pupkin-vasiliy@mail.ru';
         $contact_fields['voice'] = '+554.233456';
         $Contact->SetFieldList($contact_fields);
         $Registry->UpdateContact($Contact);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 4. Create domain
     $op = array('title' => 'Create domain');
     try {
         $Domain = $Registry->NewDomainInstance();
         $Domain->Name = 'webta' . rand(100, 999);
         $Domain->SetContact($Contact, CONTACT_TYPE::REGISTRANT);
         $Domain->SetContact($Contact2, CONTACT_TYPE::TECH);
         $period = 1;
         $Registry->CreateDomain($Domain, $period);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 5. Get remote domain
     $op = array('title' => 'Whois');
     try {
         $RDomain = $Registry->NewDomainInstance();
         $RDomain->Name = $Domain->Name;
         $RDomain = $Registry->GetRemoteDomain($RDomain);
         $op['ok'] = date('Ymd', $RDomain->CreateDate) == date('Ymd', $Domain->CreateDate) && date('Ymd', $RDomain->ExpireDate) == date('Ymd', $Domain->ExpireDate);
         if (!$ok) {
             $op['fail_reason'] = 'Invalid module behavoiur';
         }
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 6. Renew domain
     $op = array('title' => 'Renew domain');
     try {
         $old_expire_date = $Domain->ExpireDate;
         $Registry->RenewDomain($Domain, $extra = array('period' => 1));
         $op['ok'] = date('Ymd', $Domain->ExpireDate) == date('Ymd', strtotime('+1 year', $old_expire_date));
         if (!$ok) {
             $op['fail_reason'] = 'Invalid module behavoiur';
         }
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 7. Create nameserver host
     $op = array('title' => 'Create nameserver');
     try {
         $NSHost = new NameserverHost("ns.{$Domain->GetHostName()}", '216.168.229.190');
         $Registry->CreateNameserverHost($NSHost);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 8. Delete nameserver
     $op = array('title' => 'Delete nameserver');
     try {
         $Registry->DeleteNameserverHost($NSHost);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 9. Delete domain
     $op = array('title' => 'Delete domain');
     try {
         $Registry->DeleteDomain($Domain);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     $passed = true;
     foreach ($oplog as $op) {
         $passed = $passed && $op['ok'];
     }
     $out_filename = sprintf('eppdrs-srsplus-certtest-%s.log', $passed ? 'passed' : 'failed');
     header('Content-type: application/octet-stream');
     header('Content-Disposition: attachment; filename="' . $out_filename . '"');
     foreach ($oplog as $i => $op) {
         $n = $i + 1;
         print str_pad("{$n}. {$op['title']}", 60, ' ', STR_PAD_RIGHT);
         printf("[%s]\n", $op['ok'] ? 'OK' : 'FAIL');
         if (!$op['ok']) {
             print "fail reason: {$op['fail_reason']}\n";
         }
     }
     print "\n\n";
     print file_get_contents($filename);
     unlink($filename);
     die;
     return;
     $chk = strlen($contact4->ClID) > 0;
     $this->assertTrue($chk, "Create billing contact");
     //Try to fetch contact info
     $info = $registry->GetContactInfo($contact1->ClID);
     $this->assertTrue(is_array($info), "Check Registrant contact ID");
     // Try to fetch contact info
     $info = $registry->GetContactInfo($contact2->ClID);
     $this->assertTrue(is_array($info), "Check Tech contact ID");
     // Try to fetch contact info
     $info = $registry->GetContactInfo($contact3->ClID);
     $this->assertTrue(is_array($info), "Check Admin contact ID");
     // Try to create domain name
     //$GRRegistry->SetCurrentTLD("gr");
     $domainname = "newwebtatest" . rand(10000, 99999);
     $domain = $registry->CreateDomain($domainname, $contact1->ClID, $contact2->ClID, $contact3->ClID, $contact4->ClID, "2", array("ns.hostdad.com", "ns2.hostdad.com"), array());
     $this->assertTrue(is_array($domain), "Create domain name");
     $domainlock = $registry->DomainLock($domainname, 1, array());
     $this->assertTrue($domainlock, "Domain locked");
     /*
     $hostav = $registry->CheckHost("ns1.{$domainname}.ws");
     if ($hostav == 1)
     {
     	$hostcr = $registry->CreateHost("ns1.{$domainname}.ws", "66.235.185.21");
     	$this->assertTrue($hostcr, "Cannot create host 1");
     }
     elseif (!$hostav)
     {
     	$this->assertTrue($hostav, "Cannot check host 1");
     }
     */
     //$d_info = $registry->TransferApprove("webtatestt105", array());
     //$d_info = $registry->TransferReject("webtatestt106", array());
     //$d_info = $registry->DomainInfo("webtatestt103");
     //$this->assertTrue(is_array($d_info), "Cannot get domain info");
     /*
     $c_chk = $registry->CheckContact($contactid);
     $this->assertTrue($c_chk>0, "Cannot check contact id");
     
     $updNS = $registry->UpdateDomainNS($domainname, array("ns.hostdad.com"), array("ns1.nsys.ws"));
     $this->assertTrue($updNS, "Cannot update domain NS");
     */
     //$GRRegistry->SetCurrentTLD("gr");
     //$trnsf = $registry->UnCreateDomain("nwebtatest1", array("protocol"=>"5052"));
     //$this->assertTrue($trnsf, "Cannot approve transfer");
     //$req = $registry->CheckTransferStatus("test", "1113383");
     //$this->assertTrue($req, "Transfer Status Checked");
     // Try to dissconnect
     $dsk = $registry->Disconnect();
     $this->assertTrue($dsk, "Disconnect from EPP Server");
     $registry->Disconnect();
     //$registry->Disconnect();
 }
Example #3
0
 function testEPP()
 {
     $Domain = $this->Registry->NewDomainInstance();
     $Domain->Name = 'webta' . rand(1000, 9999);
     // check domain
     try {
         $ok = $this->Registry->DomainCanBeRegistered($Domain)->Result;
         $this->assertTrue($ok, 'Domain available for registration');
     } catch (Exception $e) {
         return $this->fail('Domain available for registration. Error: ' . $e->getMessage());
     }
     ////
     // Create contact
     try {
         $Registrant = $this->Registry->NewContactInstanceByGroup('generic');
         $Registrant->SetFieldList($this->contact_fields);
         $this->Registry->CreateContact($Registrant);
         $this->assertTrue(true, 'Create contact');
     } catch (Exception $e) {
         return $this->fail('Create contact. Error: ' . $e->getMessage());
     }
     ////
     // Get contact INFO
     try {
         $RRegistrant = $this->Registry->NewContactInstanceByGroup('generic');
         $RRegistrant->CLID = $Registrant->CLID;
         $this->Registry->GetRemoteContact($RRegistrant);
         $fields = $Registrant->GetFieldList();
         $rfields = $RRegistrant->GetFieldList();
         ksort($fields);
         ksort($rfields);
         $discloses = $Registrant->GetDiscloseList();
         $rdiscloses = $RRegistrant->GetDiscloseList();
         ksort($discloses);
         ksort($rdiscloses);
         $this->assertTrue($fields['name'] == $rfields['name'] && $fields['email'] == $rfields['email'] && $fields['voice'] == $rfields['voice'] && $discloses == $rdiscloses, 'Get remote contact');
     } catch (Exception $e) {
         return $this->fail('Get remote contact. Error: ' . $e->getMessage());
     }
     try {
         $Domain->SetContact($Registrant, CONTACT_TYPE::REGISTRANT);
         $this->Registry->CreateDomain($Domain, 2);
         $this->assertTrue(true, 'Create domain');
     } catch (Exception $e) {
         return $this->fail('Create domain. Error: ' . $e->getMessage());
     }
     ////
     // 3. CREATE 2 child name servers of newly created domain
     //
     try {
         $ns1 = new NameserverHost('ns1.' . $Domain->GetHostName(), gethostbyname('hostdad.com'));
         $ns2 = new NameserverHost('ns2.' . $Domain->GetHostName(), gethostbyname('hostdad.com'));
         $ns3 = new NameserverHost('ns3.' . $Domain->GetHostName(), gethostbyname('hostdad.com'));
         $this->Registry->CreateNameserverHost($ns1);
         $this->Registry->CreateNameserverHost($ns2);
         $this->Registry->CreateNameserverHost($ns3);
         $this->assertTrue(true, 'Create nameservers');
     } catch (Exception $e) {
         return $this->fail('Create nameservers. Error: ' . $e->getMessage());
     }
     ////
     // 4. UPDATE Domain to attach child name servers to domain
     //
     try {
         $nslist = $Domain->GetNameserverChangelist();
         $nslist->Add($ns1);
         $nslist->Add($ns2);
         $nslist->Add($ns3);
         $this->Registry->UpdateDomainNameservers($Domain, $nslist);
         $this->assertTrue(count($Domain->GetNameserverList()) == 3, 'Attach nameservers to domain');
     } catch (Exception $e) {
         return $this->fail('Attach nameservers to domain. Error: ' . $e->getMessage());
     }
     ////
     // 5. UPDATE Domain�s status to
     // clientHold, clientUpdateProhibited, clientDeleteProhibited, and clientTransferProhibited
     // within one command
     try {
         $flag_list = $Domain->GetFlagChangelist();
         $flag_list->SetChangedList(array('clientUpdateProhibited', 'clientDeleteProhibited', 'clientTransferProhibited'));
         $this->Registry->UpdateDomainFlags($Domain, $flag_list);
         $this->assertTrue(count($Domain->GetFlagList()) == count($flag_list->GetList()), 'Update domain status');
     } catch (Exception $e) {
         return $this->fail('Update domain status. Error: ' . $e->getMessage());
     }
     ////
     // 6. Perform an INFO command on the domain to verify update
     //
     try {
         $RDomain = $this->Registry->NewDomainInstance();
         $RDomain->Name = $Domain->Name;
         $RDomain = $this->Registry->GetRemoteDomain($RDomain);
         $flags = $Domain->GetFlagList();
         $rflags = $RDomain->GetFlagList();
         sort($flags);
         sort($rflags);
         $this->assertTrue($RDomain->Name == $Domain->Name && date('Ymd', $RDomain->CreateDate) == date('Ymd', $Domain->CreateDate) && date('Ymd', $RDomain->ExpireDate) == date('Ymd', $Domain->ExpireDate) && $rflags == $flags, 'Get remote domain');
     } catch (Exception $e) {
         return $this->fail('Get remote domain. Error: ' . $e->getMessage());
     }
     ////
     // 7. UPDATE Domain�s status to OK
     //
     try {
         $changes = $Domain->GetFlagChangelist();
         foreach ($RDomain->GetFlagList() as $flag) {
             $changes->Remove($flag);
         }
         $this->Registry->UpdateDomainFlags($Domain, $changes);
         //$changes = $Domain->GetFlagChangelist();
         //$changes->Add('ok');
         //$this->Registry->UpdateDomainFlags($Domain, $changes);
         $this->assertTrue($Domain->GetFlagList() == array(), 'Update domain status');
         $Domain->SetFlagList(array('ok'));
         // ok flag set automatical when all other were removed
         // ^our bug ?
     } catch (Exception $e) {
         return $this->fail('Update domain status. Error: ' . $e->getMessage());
     }
     ////
     // 8. Perform an INFO command on the domain to verify update
     //
     try {
         $RDomain = $this->Registry->NewDomainInstance();
         $RDomain->Name = $Domain->Name;
         $RDomain = $this->Registry->GetRemoteDomain($RDomain);
         $this->assertTrue($RDomain->Name == $Domain->Name && date('Ymd', $RDomain->CreateDate) == date('Ymd', $Domain->CreateDate) && date('Ymd', $RDomain->ExpireDate) == date('Ymd', $Domain->ExpireDate) && $RDomain->GetFlagList() == array('ok'), 'Get remote domain');
     } catch (Exception $e) {
         return $this->fail('Get remote domain. Error: ' . $e->getMessage());
     }
     ////
     // 10. UPDATE one of the name server�s IP Address
     //
     try {
         $ns1->IPAddr = gethostbyname('ns.hostdad.com');
         $Resp = $this->Registry->GetModule()->UpdateNameserverHost($ns1);
         $this->assertTrue($Resp->Result, 'Update domain nameserver');
     } catch (Exception $e) {
         return $this->fail('Update domain nameserver. Error: ' . $e->getMessage());
     }
     ////
     // 12. Renew Domain for 2 years
     //
     try {
         $old_expire_date = $Domain->ExpireDate;
         $this->Registry->RenewDomain($Domain, $extra = array('period' => 2));
         $this->assertTrue(date('Ymd', $Domain->ExpireDate) == date('Ymd', strtotime('+2 year', $old_expire_date)), 'Domain renewal');
     } catch (Exception $e) {
         return $this->fail('Domain renewal. Error: ' . $e->getMessage());
     }
     ////
     // Remove domain nameservers
     try {
         $nslist = $Domain->GetNameserverChangelist();
         $nslist->Remove($ns1);
         $nslist->Remove($ns2);
         $nslist->Remove($ns3);
         $this->Registry->UpdateDomainNameservers($Domain, $nslist);
         $this->assertTrue(count($Domain->GetNameserverList()) == 0, 'Remove nameservers from domain');
     } catch (Exception $e) {
         return $this->fail('Remove nameservers from domain. Error: ' . $e->getMessage());
     }
     ////
     // Delete nameservers
     try {
         $this->Registry->DeleteNameserverHost($ns1);
         $this->Registry->DeleteNameserverHost($ns2);
         $this->assertTrue(true, 'Delete nameservers');
     } catch (Exception $e) {
         return $this->fail('Delete nameservers. Error: ' . $e->getMessage());
     }
     ////
     // Delete domain
     try {
         $this->Registry->DeleteDomain($Domain);
         $this->assertTrue(true, 'Delete domain');
     } catch (Exception $e) {
         return $this->fail('Delete domain. Error: ' . $e->getMessage());
     }
     ////
     /// Delete contact
     try {
         $this->Registry->DeleteContact($Registrant);
         $this->assertTrue(true, 'Delete contact');
     } catch (Exception $e) {
         return $this->fail('Delete contact. Error: ' . $e->getMessage());
     }
 }
 /**
  * Enter description here...
  */
 public function RunTest(DataForm $DF)
 {
     $filename = '/tmp/eppdrs-verisign-certtest-' . date('YmdHis') . '.log';
     Log::RegisterLogger("File", "Verisign", $filename);
     Log::SetDefaultLogger("Verisign");
     // Build dataforms for modules
     $DF1 = self::GetConfigurationForm();
     $DF1->GetFieldByName('Login')->Value = $DF->GetFieldByName('Login_1')->Value;
     $DF1->GetFieldByName('Password')->Value = $DF->GetFieldByName('Password_1')->Value;
     $DF1->GetFieldByName('ServerHost')->Value = $DF->GetFieldByName('ServerHost')->Value;
     $DF1->GetFieldByName('ServerPort')->Value = $DF->GetFieldByName('ServerPort')->Value;
     $DF1->GetFieldByName('SSLCertPath')->Value = $DF->GetFieldByName('SSLCertPath')->Value;
     $DF1->GetFieldByName('SSLCertPass')->Value = $DF->GetFieldByName('SSLCertPass')->Value;
     $DF2 = self::GetConfigurationForm();
     $DF2->GetFieldByName('Login')->Value = $DF->GetFieldByName('Login_2')->Value;
     $DF2->GetFieldByName('Password')->Value = $DF->GetFieldByName('Password_2')->Value;
     $DF2->GetFieldByName('ServerHost')->Value = $DF->GetFieldByName('ServerHost')->Value;
     $DF2->GetFieldByName('ServerPort')->Value = $DF->GetFieldByName('ServerPort')->Value;
     $DF2->GetFieldByName('SSLCertPath')->Value = $DF->GetFieldByName('SSLCertPath')->Value;
     $DF2->GetFieldByName('SSLCertPass')->Value = $DF->GetFieldByName('SSLCertPass')->Value;
     // Initialize modules
     $Module = new VerisignRegistryModule(new RegistryManifest(MODULES_PATH . "/registries/Verisign/module.xml"));
     $Module->InitializeModule('com', $DF1);
     $Registry = new Registry($Module);
     $Module2 = new VerisignRegistryModule(new RegistryManifest(MODULES_PATH . "/registries/Verisign/module.xml"));
     $Module2->InitializeModule('com', $DF2);
     $Registry2 = new Registry($Module2);
     // The subject domain
     $Domain = $this->RegistryAccessible->NewDomainInstance();
     $Domain->Name = 'webta' . rand(1000, 9999);
     $Domain->UserID = 1;
     ////
     // 1. Using your OT&E1 account perform a CHECK command on domain name(s) until you
     // receive domain available response
     $oplog = array();
     $op = array('title' => 'Perform a CHECK command on domain name(s)');
     try {
         $ok = $Registry->DomainCanBeRegistered($Domain)->Result;
         $op['ok'] = (bool) $ok;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 2. CREATE the Domain name using the CREATE command, term of registration should be
     // 2 years
     $op = array('title' => "CREATE the Domain name using the CREATE command");
     try {
         $Contact = $Registry->NewContactInstanceByGroup('generic');
         $Domain->SetContact($Contact, CONTACT_TYPE::REGISTRANT);
         $Domain->SetContact($Contact, CONTACT_TYPE::BILLING);
         $Domain->SetContact($Contact, CONTACT_TYPE::TECH);
         $Domain->SetContact($Contact, CONTACT_TYPE::ADMIN);
         $Registry->CreateDomain($Domain, 2);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 3. CREATE 2 child name servers of newly created domain
     //
     $op = array('title' => "CREATE 2 child name servers of newly created domain");
     try {
         $ns1 = new NameserverHost('ns1.' . $Domain->GetHostName(), gethostbyname('hostdad.com'));
         $ns2 = new NameserverHost('ns2.' . $Domain->GetHostName(), gethostbyname('hostdad.com'));
         $Registry->CreateNameserverHost($ns1);
         $Registry->CreateNameserverHost($ns2);
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 4. UPDATE Domain to attach child name servers to domain
     //
     $op = array('title' => "UPDATE Domain to attach child name servers to domain");
     try {
         $nslist = $Domain->GetNameserverChangelist();
         $nslist->Add($ns1);
         $nslist->Add($ns2);
         $Registry->UpdateDomainNameservers($Domain, $nslist);
         $op['ok'] = count($Domain->GetNameserverList()) == 2;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 5. UPDATE Domain's status to
     // clientHold, clientUpdateProhibited, clientDeleteProhibited, and clientTransferProhibited
     // within one command
     $op = array('title' => "UPDATE Domain's status");
     try {
         $flag_list = $Domain->GetFlagChangelist();
         $flag_list->SetChangedList(array('clientHold', 'clientUpdateProhibited', 'clientDeleteProhibited', 'clientTransferProhibited'));
         $Registry->UpdateDomainFlags($Domain, $flag_list);
         $op['ok'] = count($Domain->GetFlagList()) == count($flag_list->GetList());
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 6. Perform an INFO command on the domain to verify update
     //
     $op = array('title' => "Perform an INFO command on the domain to verify update");
     try {
         $RDomain = $Registry->NewDomainInstance();
         $RDomain->Name = $Domain->Name;
         $RDomain = $Registry->GetRemoteDomain($RDomain);
         $flags = $Domain->GetFlagList();
         $rflags = $RDomain->GetFlagList();
         sort($flags);
         sort($rflags);
         $op['ok'] = $RDomain->Name == $Domain->Name && date('Ymd', $RDomain->CreateDate) == date('Ymd', $Domain->CreateDate) && date('Ymd', $RDomain->ExpireDate) == date('Ymd', $Domain->ExpireDate) && $rflags == $flags;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 7. UPDATE Domain's status to OK
     //
     $op = array('title' => "UPDATE Domain's status to OK");
     try {
         $changes = $Domain->GetFlagChangelist();
         foreach ($RDomain->GetFlagList() as $flag) {
             $changes->Remove($flag);
         }
         $Registry->UpdateDomainFlags($Domain, $changes);
         //$changes = $Domain->GetFlagChangelist();
         //$changes->Add('ok');
         //$this->Registry->UpdateDomainFlags($Domain, $changes);
         $op['ok'] = $Domain->GetFlagList() == array();
         $Domain->SetFlagList(array('ok'));
         // ok flag set automatical when all other were removed
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 8. Perform an INFO command on the domain to verify update
     //
     $op = array('title' => "Perform an INFO command on the domain to verify update");
     try {
         $RDomain = $Registry->NewDomainInstance();
         $RDomain->Name = $Domain->Name;
         $RDomain = $Registry->GetRemoteDomain($RDomain);
         $op['ok'] = $RDomain->Name == $Domain->Name && date('Ymd', $RDomain->CreateDate) == date('Ymd', $Domain->CreateDate) && date('Ymd', $RDomain->ExpireDate) == date('Ymd', $Domain->ExpireDate) && $RDomain->GetFlagList() == array('ok');
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 9. UPDATE Domain's AUTH INFO Code
     //
     $op = array('title' => "UPDATE Domain's AUTH INFO Code");
     try {
         // ���������� AUTH ����������� �������������� � �����-�������� API
         $VerisignModule = $Registry->GetModule();
         $Domain->AuthCode = "ae2Yo&#YARR1";
         $params = array('name' => $Domain->GetHostName(), 'subproduct' => 'dot' . strtoupper($Domain->Extension), 'add' => '', 'remove' => '', 'change' => "<domain:chg><domain:authInfo><domain:pw>{$Domain->AuthCode}</domain:pw></domain:authInfo></domain:chg>");
         $Resp = $VerisignModule->Request('domain-update', $params);
         $success = $Resp->Succeed || $Resp->Code == RFC3730_RESULT_CODE::OK_PENDING;
         $op['ok'] = $success;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 10. UPDATE one of the name server's IP Address
     //
     $op = array('title' => "UPDATE one of the name server's IP Address");
     try {
         $ns1->IPAddr = gethostbyname('ns.hostdad.com');
         $Resp = $Module->UpdateNameserverHost($ns1);
         $op['ok'] = $Resp->Result;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 11. Perform a HELLO command
     //
     $op = array('title' => "Perform a HELLO command");
     try {
         $VerisignModule = $Registry->GetModule();
         $Resp = $VerisignModule->Request('hello', $params = array());
         $op['ok'] = $Resp == true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 12. Renew Domain for 2 years
     //
     $op = array('title' => "Renew Domain for 2 years");
     try {
         $old_expire_date = $Domain->ExpireDate;
         $Registry->RenewDomain($Domain, $extra = array('period' => 2));
         $op['ok'] = date('Ymd', $Domain->ExpireDate) == date('Ymd', strtotime('+2 year', $old_expire_date));
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 13. Open Second Session using the OT&E2 account logon
     //
     $op = array('title' => "Open Second Session using the OT&E2 account logon");
     $op['ok'] = true;
     // It will be done automatical in next command
     ////
     // 14. Perform INFO command on the newly created domain from step 1 using the AUTH
     // INFO code populated in step 9 to get INFO results
     //
     $op = array('title' => "Perform INFO command on the newly created domain from step 1");
     try {
         $RDomain = $Registry2->NewDomainInstance();
         $RDomain->Name = $Domain->Name;
         $RDomain->AuthCode = $Domain->AuthCode;
         $RDomain = $Registry2->GetRemoteDomain($RDomain);
         $flags = $Domain->GetFlagList();
         $rflags = $RDomain->GetFlagList();
         sort($flags);
         sort($rflags);
         $op['ok'] = $RDomain->Name == $Domain->Name && date('Ymd', $RDomain->CreateDate) == date('Ymd', $Domain->CreateDate) && date('Ymd', $RDomain->ExpireDate) == date('Ymd', $Domain->ExpireDate) && $rflags == $flags;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 15. Initiate Transfer domain command using your OT&E2 account
     //
     $op = array('title' => "Initiate Transfer domain command using your OT&E2 account");
     try {
         $ok = $Registry2->TransferRequest($Domain, array('pw' => $Domain->AuthCode));
         $op['ok'] = $ok;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 16. Perform a Transfer Query command using your OT&E2 account
     //
     $op = array('title' => "Perform a Transfer Query command using your OT&E2 account");
     try {
         // Not implemented in cross-registry API
         $VerisignModule2 = $Registry2->GetModule();
         $params = array('name' => $Domain->GetHostName(), 'pw' => $Domain->AuthCode, 'subproduct' => 'dot' . strtoupper($Domain->Extension));
         $Resp = $VerisignModule2->Request('domain-trans-query', $params);
         $op['ok'] = $Resp->Succeed;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 17. Approve the Transfer using your OT&E1 account
     //
     $op = array('title' => "Approve the Transfer using your OT&E1 account");
     try {
         $ok = $Registry->TransferApprove($Domain);
         $op['ok'] = $ok;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 18. Perform a Poll Command to check for messages in poll queue, ACK first poll message
     //
     // not works
     $op = array('title' => "Perform a Poll Command to check for messages in poll queue");
     try {
         $VerisignModule2 = $Registry->GetModule();
         $max_iter = 5;
         $i = 0;
         while ($i < $max_iter && ($Mess = $VerisignModule2->ReadMessage()) === false) {
             sleep(1);
             $i++;
         }
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 19. Initiate the Transfer again using your OT&E1 account
     //
     $op = array('title' => "Initiate the Transfer again using your OT&E1 account");
     try {
         $ok = $Registry->TransferRequest($Domain, array('pw' => $Domain->AuthCode));
         $op['ok'] = $ok;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 20. Perform a Transfer Query command using your OT&E2 account
     //
     $op = array('title' => "Perform a Transfer Query command using your OT&E2 account");
     try {
         // Not implemented in cross-registry API
         $VerisignModule2 = $Registry2->GetModule();
         $params = array('name' => $Domain->GetHostName(), 'pw' => $Domain->AuthCode, 'subproduct' => 'dot' . strtoupper($Domain->Extension));
         $Resp = $VerisignModule2->Request('domain-trans-query', $params);
         $op['ok'] = $Resp->Succeed;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 21. Reject the Transfer using your OT&E2 account
     //
     $op = array('title' => "Reject the Transfer using your OT&E2 account");
     try {
         $ok = $Registry2->TransferReject($Domain);
         $op['ok'] = $ok;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 22. From OT&E2 sync the domain to the 15th day of the next month
     //
     $op = array('title' => "From OT&E2 sync the domain to the 15th day of the next month");
     try {
         $m = (int) date('n') + 1;
         $ok = $VerisignModule2->UpdateDomainConsoliDate($Domain, array('expMonth' => $m, 'expDay' => 15));
         $op['ok'] = $ok;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     ////
     // 23. Exit Gracefully from both sessions by issuing the LOGOUT command
     //
     $op = array('title' => "Exit Gracefully from both sessions by issuing the LOGOUT command");
     try {
         $VerisignModule->Request('logout', $params = array());
         $VerisignModule2->Request('logout', $params = array());
         $op['ok'] = true;
     } catch (Exception $e) {
         $op['ok'] = false;
         $op['fail_reason'] = $e->getMessage();
     }
     $oplog[] = $op;
     $passed = true;
     foreach ($oplog as $op) {
         $passed = $passed && $op['ok'];
     }
     $out_filename = sprintf('eppdrs-verisign-certtest-%s.log', $passed ? 'passed' : 'failed');
     header('Content-type: application/octet-stream');
     header('Content-Disposition: attachment; filename="' . $out_filename . '"');
     foreach ($oplog as $i => $op) {
         $n = $i + 1;
         print str_pad("{$n}. {$op['title']}", 100, ' ', STR_PAD_RIGHT);
         printf("[%s]\n", $op['ok'] ? 'OK' : 'FAIL');
         if (!$op['ok']) {
             print "fail reason: {$op['fail_reason']}\n";
         }
     }
     print "\n\n";
     print file_get_contents($filename);
     unlink($filename);
     die;
 }