--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/datacommsserver/esockserver/test/TE_ESock/EsockTestSection26.cpp Thu Dec 17 09:22:25 2009 +0200
@@ -0,0 +1,507 @@
+// Copyright (c) 2001-2009 Nokia Corporation and/or its subsidiary(-ies).
+// All rights reserved.
+// This component and the accompanying materials are made available
+// under the terms of "Eclipse Public License v1.0"
+// which accompanies this distribution, and is available
+// at the URL "http://www.eclipse.org/legal/epl-v10.html".
+//
+// Initial Contributors:
+// Nokia Corporation - initial contribution.
+//
+// Contributors:
+//
+// Description:
+// This contains ESock Test cases from section 26
+// Component test for DNS Query interface.
+// Note: These tests try to make different queries to the DNS (DND), using dummy protocol pdummy.prt, which
+// forges DNS answers. Ensure that pdummy.prt is present and listed in appropriate .esk file.
+// This test doesn't require a network connection.
+//
+//
+
+// EPOC includes
+#include <e32base.h>
+#include <in_sock.h>
+#include <dns_qry.h>
+
+// Test system includes
+#include "EsockTestSection26.h"
+
+
+//-------------------------------------------------------------------------------------------------------
+
+/**
+* find "dummy protocol 1" and open Host Resolver
+*/
+TBool CTestRHostRslvQuery_26::OpenHostResolver(void)
+ {
+ TInt ret;
+ TProtocolDesc protoInfo;
+
+ //-- find a dummy protocol 1
+ Logger().WriteFormat(_L("Finding dummy protocol 1"));
+ ret = iEsockSuite->iSocketServer.FindProtocol(_L("Dummy Protocol 1"), protoInfo);
+
+ if(ret != KErrNone)
+ {
+ Logger().WriteFormat(_L("FindProtocol error code: %d"), ret);
+ return EFalse;
+ }
+
+ //-- open host resolver on this one
+ Logger().WriteFormat(_L("Opening host resolver on dummy protocol 1"));
+ ret = iHostRslv.Open(iEsockSuite->iSocketServer, protoInfo.iAddrFamily, protoInfo.iProtocol);
+
+ if(ret != KErrNone)
+ {
+ Logger().WriteFormat(_L("iHostRslv.Open error code: %d"), ret);
+ return EFalse;
+ }
+
+ return ETrue;
+ }
+
+ /**
+ * close Hostresolver
+*/
+void CTestRHostRslvQuery_26::CloseHostResolver(void)
+ {
+ Logger().WriteFormat(_L("Closing host resolver"));
+ iHostRslv.Close();
+ }
+
+
+ /**
+ * test preamble: find "dummy protocol 1" and open Host Resolver
+*/
+TVerdict CTestRHostRslvQuery_26::doTestStepPreambleL (void)
+ {
+
+ TESTL(OpenHostResolver());
+ SetTestStepResult(EPass);
+ return EPass;
+ }
+
+ /**
+ * test postamble: close Host Resolver
+*/
+TVerdict CTestRHostRslvQuery_26::doTestStepPostambleL(void)
+ {
+ CloseHostResolver();
+ return EPass;
+ }
+
+//-------------------------------------------------------------------------------------------------------
+//-- Test step 26.1
+//-- Testing RHostResolver::Query() of 'A' type
+//-------------------------------------------------------------------------------------------------------
+
+const TDesC& CEsockTest26_1::GetTestName()
+ {
+ // store the name of this test case
+ _LIT(ret,"Test26.1");
+
+ return ret;
+ }
+
+TVerdict CEsockTest26_1::easyTestStepL()
+ {
+
+ TVerdict verdict = EPass;
+ TInt ret;
+
+ Logger().WriteFormat(_L("Testing RHostResolver::Query() of 'A' type"));
+
+ TDnsQueryBuf dnsQryBuf;
+ TDnsRespABuf dnsRespABuf;
+
+ dnsQryBuf().SetType(KDnsRRTypeA);
+ dnsQryBuf().SetData(_L8("http://www.sample.net/"));
+
+ //-- make an A query.
+ //-- The query result shall be forged by pdummy.prt
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespABuf);
+ TESTEL(KErrNone == ret, ret);
+
+ //-- verify query response
+ const TDnsRespA& dnsRespA = dnsRespABuf();
+
+ //-- this is an expected ansver, forged by pdummy.
+ TInetAddr expInetAddr;
+ expInetAddr.Input(_L("192.168.40.4"));
+
+ //-- check answer
+ TESTL(dnsRespA.HostAddress().CmpAddr(expInetAddr));
+
+ TESTL(dnsRespA.RRType() == KDnsRRTypeA);
+ TESTL(dnsRespA.RRClass() == KDnsRRClassIN);
+ TESTL(dnsRespA.RRTtl() == 0x121212);
+
+ //-- Get next query result.
+ //-- error code shall be KErrNotFound, see pdummy.prt
+ Logger().WriteFormat(_L("Testing RHostResolver::QueryGetNext(...)"));
+
+ //--
+ ret = iHostRslv.QueryGetNext(dnsRespABuf);
+ TESTEL(KErrNone == ret, ret);
+ expInetAddr.Input(_L("177.123.221.251"));
+ //-- check answer
+ TESTL(dnsRespA.HostAddress().CmpAddr(expInetAddr));
+ TESTL(dnsRespA.RRType() == KDnsRRTypeA);
+ TESTL(dnsRespA.RRClass() == KDnsRRClassIN);
+ TESTL(dnsRespA.RRTtl() == 0x112233);
+
+
+ //-- Get next query result.
+ //-- error code shall be KErrNotFound, see pdummy.prt
+ ret = iHostRslv.QueryGetNext(dnsRespABuf);
+ TESTEL(KErrNotFound == ret, ret);
+
+ return verdict;
+ }
+
+//-------------------------------------------------------------------------------------------------------
+//-- Test step 26.2
+//-- Testing RHostResolver::Query() of 'SVR' type
+//-------------------------------------------------------------------------------------------------------
+
+const TDesC& CEsockTest26_2::GetTestName()
+ {
+ // store the name of this test case
+ _LIT(ret,"Test26.2");
+
+ return ret;
+ }
+
+TVerdict CEsockTest26_2::easyTestStepL()
+ {
+ TVerdict verdict = EPass;
+ TInt ret;
+
+ Logger().WriteFormat(_L("Testing RHostResolver::Query() of 'SRV' type"));
+
+ TDnsQueryBuf dnsQryBuf;
+ TDnsRespSRVBuf dnsRespSrvBuf;
+
+ //-- test SRV query. see also RFC2782
+ _LIT8(KSRVqrySample, "_ldap._tcp.example.com");
+ dnsQryBuf().SetType(KDnsRRTypeSRV);
+ dnsQryBuf().SetData(KSRVqrySample);
+
+ //-- make a SRV query.
+ //-- The query result shall be forged by pdummy.prt
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespSrvBuf);
+ TESTEL(KErrNone == ret, ret);
+
+ //-- verify query response
+ const TDnsRespSRV& dnsResp=dnsRespSrvBuf();
+
+ TESTL(dnsResp.RRType() == KDnsRRTypeSRV);
+ TESTL(dnsResp.RRClass() == KDnsRRClassIN);
+ TESTL(dnsResp.RRTtl() == 0x123456);
+
+ //-- verify RR fields obtained from pdummy.
+ TESTL(dnsResp.Target().CompareF(_L8("old-slow-box")) == 0);
+
+ TESTL(dnsResp.Priority()== 384);
+ TESTL(dnsResp.Weight() == 784);
+ TESTL(dnsResp.Port() == 123);
+
+ //-- Get next query result.
+ //-- The result shall be forged by pdummy.prt
+ Logger().WriteFormat(_L("Testing RHostResolver::QueryGetNext(...)"));
+ ret = iHostRslv.QueryGetNext(dnsRespSrvBuf);
+ TESTEL(KErrNone == ret, ret);
+
+ //-- verify QueryGetNext data
+ TESTL(dnsResp.RRType() == KDnsRRTypeSRV);
+ TESTL(dnsResp.RRClass() == KDnsRRClassIN);
+ TESTL(dnsResp.RRTtl() == 0x123765);
+ TESTL(dnsResp.Priority()== 236);
+ TESTL(dnsResp.Weight() == 962);
+ TESTL(dnsResp.Port() == 125);
+
+ TESTL(dnsResp.Target().CompareF(_L8("new-fast-box")) == 0);
+
+ //-- try to get the next result, error code shall be KErrNotFound
+ //-- see pdummy.prt
+ ret = iHostRslv.QueryGetNext(dnsRespSrvBuf);
+ TESTEL(KErrNotFound == ret, ret);
+
+ return verdict;
+ }
+
+//-------------------------------------------------------------------------------------------------------
+//-- Test step 26.3
+//-- Testing RHostResolver::Query() of 'PTR' type
+//-------------------------------------------------------------------------------------------------------
+
+const TDesC& CEsockTest26_3::GetTestName()
+ {
+ // store the name of this test case
+ _LIT(ret,"Test26.3");
+
+ return ret;
+ }
+
+TVerdict CEsockTest26_3::easyTestStepL()
+ {
+
+ TVerdict verdict = EPass;
+ TInt ret;
+
+ Logger().WriteFormat(_L("Testing RHostResolver::Query() of 'PTR' type"));
+
+ TDnsQueryBuf dnsQryBuf;
+ TDnsRespPTRBuf dnsRespPtrBuf;
+
+ dnsQryBuf().SetType(KDnsRRTypePTR);
+
+ //-- pass this address to pdummy.prt for resolution
+ TInetAddr inetAddr;
+ inetAddr.Input(_L("192.111.22.77"));
+ dnsQryBuf().SetData(inetAddr);
+
+ //-- make an PTR query.
+ //-- The query result shall be forged by pdummy.prt
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespPtrBuf);
+ TESTEL(KErrNone == ret, ret);
+
+ const TDnsRespPTR& dnsRespPTR = dnsRespPtrBuf();
+ TESTL(dnsRespPTR.HostName().CompareF(_L8("http://www.CDatagramHostResolver_QryProcessPTR.response/")) ==0);
+ TESTL(dnsRespPTR.RRType() == KDnsRRTypePTR);
+ TESTL(dnsRespPTR.RRClass() == KDnsRRClassIN);
+ TESTL(dnsRespPTR.RRTtl() == 0x223441);
+
+ //-- try to get the next result, error code shall be KErrNotFound
+ //-- see pdummy.prt
+ ret = iHostRslv.QueryGetNext(dnsRespPtrBuf);
+ TESTEL(KErrNotFound == ret, ret);
+
+
+ return verdict;
+ }
+
+//-------------------------------------------------------------------------------------------------------
+//-- Test step 26.4
+//-- Testing RHostResolver::Query() of 'NAPTR' type
+//-------------------------------------------------------------------------------------------------------
+
+const TDesC& CEsockTest26_4::GetTestName()
+ {
+ // store the name of this test case
+ _LIT(ret,"Test26.4");
+
+ return ret;
+ }
+
+TVerdict CEsockTest26_4::easyTestStepL()
+ {
+ TVerdict verdict = EPass;
+ TInt ret;
+
+ Logger().WriteFormat(_L("Testing RHostResolver::Query() of 'NAPTR' type"));
+
+ TDnsQueryBuf dnsQryBuf;
+ TDnsRespNAPTRBuf dnsRespNaptrBuf;
+
+ dnsQryBuf().SetType(KDnsRRTypeNAPTR);
+ dnsQryBuf().SetData(_L8("http://www.foo_bar.ru/"));
+
+ //-- make NAPTR query.
+ //-- The query result shall be forged by pdummy.prt
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespNaptrBuf);
+ TESTEL(KErrNone == ret, ret);
+
+ const TDnsRespNAPTR& dnsRespNAPTR = dnsRespNaptrBuf();
+
+ TESTL(dnsRespNAPTR.RRType() == KDnsRRTypeNAPTR);
+ TESTL(dnsRespNAPTR.RRClass() == KDnsRRClassIN);
+ TESTL(dnsRespNAPTR.RRTtl() == 0x2673411);
+
+ TESTL(dnsRespNAPTR.Order() == 123);
+ TESTL(dnsRespNAPTR.Pref() == 99);
+
+ TESTL(dnsRespNAPTR.Flags().CompareF(_L8("SAUP")) == 0);
+ TESTL(dnsRespNAPTR.Service().CompareF(_L8("http+I2R")) == 0);
+ TESTL(dnsRespNAPTR.Regexp().CompareF(_L8("!£%^^&($%£$~~## !!!!!")) == 0);
+ TESTL(dnsRespNAPTR.Replacement().CompareF(_L8("www.next-name.it")) == 0);
+
+ //-- try to get the next result, error code shall be KErrNotFound
+ //-- see pdummy.prt
+ ret = iHostRslv.QueryGetNext(dnsRespNaptrBuf);
+ TESTEL(KErrNotFound == ret, ret);
+
+ return verdict;
+ }
+
+//-------------------------------------------------------------------------------------------------------
+//-- Test step 26.5
+//-- Testing RHostResolver::Query() of 'MX' type
+//-------------------------------------------------------------------------------------------------------
+
+const TDesC& CEsockTest26_5::GetTestName()
+ {
+ // store the name of this test case
+ _LIT(ret,"Test26.5");
+
+ return ret;
+ }
+
+TVerdict CEsockTest26_5::easyTestStepL()
+ {
+ TVerdict verdict = EPass;
+ TInt ret;
+
+ Logger().WriteFormat(_L("Testing RHostResolver::Query() of 'MX' type"));
+
+ TDnsQueryBuf dnsQryBuf;
+ TDnsRespMXBuf dnsRespMXBuf;
+
+ dnsQryBuf().SetType(KDnsRRTypeMX);
+ dnsQryBuf().SetData(_L8("http://www.gooooooogle.ru/"));
+
+ //-- make MX query.
+ //-- The query result shall be forged by pdummy.prt
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespMXBuf);
+ TESTEL(KErrNone == ret, ret);
+
+ const TDnsRespMX& dnsRespMx = dnsRespMXBuf();
+
+ TESTL(dnsRespMx.RRType() == KDnsRRTypeMX);
+ TESTL(dnsRespMx.RRClass() == KDnsRRClassIN);
+ TESTL(dnsRespMx.RRTtl() == 0xdead);
+
+
+ TESTL(dnsRespMx.Pref() == 345);
+ TESTL(dnsRespMx.HostName().CompareF(_L8("c.example.org")) == 0);
+
+ //-- try to get the next result, error code shall be KErrNotFound
+ //-- see pdummy.prt
+ ret = iHostRslv.QueryGetNext(dnsRespMXBuf);
+ TESTEL(KErrNotFound == ret, ret);
+
+
+ return verdict;
+ }
+
+//-------------------------------------------------------------------------------------------------------
+//-- Test step 26.6
+//-- Testing RHostResolver::Query() of 'AAAA' type
+//-------------------------------------------------------------------------------------------------------
+
+const TDesC& CEsockTest26_6::GetTestName()
+ {
+ // store the name of this test case
+ _LIT(ret,"Test26.6");
+
+ return ret;
+ }
+
+TVerdict CEsockTest26_6::easyTestStepL()
+ {
+ TVerdict verdict = EPass;
+ TInt ret;
+
+ Logger().WriteFormat(_L("Testing RHostResolver::Query() of 'AAAA' type"));
+
+ TDnsQueryBuf dnsQryBuf;
+ TDnsRespAAAABuf dnsRespAAAABuf;
+
+ dnsQryBuf().SetType(KDnsRRTypeAAAA);
+ dnsQryBuf().SetData(_L8("http://www.sample_AAAA.net/"));
+
+ //-- make an AAAA query.
+ //-- The query result shall be forged by pdummy.prt
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespAAAABuf);
+ TESTEL(KErrNone == ret, ret);
+
+ //-- verify query response
+ const TDnsRespAAAA& dnsRespAAAA = dnsRespAAAABuf();
+
+ //-- this is an expected ansver, forged by pdummy.
+ TInetAddr expInetAddr;
+ expInetAddr.Input(_L("2001:618:400:6a:0:0:0:abc"));
+
+ //-- check answer
+ TESTL(dnsRespAAAA.HostAddress().CmpAddr(expInetAddr));
+
+ TESTL(dnsRespAAAA.RRType() == KDnsRRTypeAAAA);
+ TESTL(dnsRespAAAA.RRClass() == KDnsRRClassIN);
+ TESTL(dnsRespAAAA.RRTtl() == 0xbeef);
+
+
+ //-- Get next query result.
+ //-- error code shall be KErrNotFound, see pdummy.prt
+ ret = iHostRslv.QueryGetNext(dnsRespAAAABuf);
+ TESTEL(KErrNotFound == ret, ret);
+
+ return verdict;
+ }
+
+
+//-------------------------------------------------------------------------------------------------------
+//-- Test step 26.7
+//-- Esock server memory allocation testing for RHostResolver Query interface
+//-------------------------------------------------------------------------------------------------------
+
+const TDesC& CEsockTest26_7::GetTestName()
+ {
+ // store the name of this test case
+ _LIT(ret,"Test26.7");
+
+ return ret;
+ }
+
+TVerdict CEsockTest26_7::easyTestStepL()
+ {
+
+ TVerdict verdict = EPass;
+ Logger().WriteFormat(_L("Esock server memory allocation testing for RHostResolver Query interface"));
+
+ TInt ret;
+
+ TDnsQueryBuf dnsQryBuf;
+ TDnsRespABuf dnsRespABuf;
+ TDnsRespNAPTRBuf dnsRespNaptrBuf;
+ TDnsRespPTRBuf dnsRespPtrBuf;
+
+
+ dnsQryBuf().SetType(KDnsRRTypeA);
+ dnsQryBuf().SetData(_L8("http://www.sample.net/"));
+
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespABuf);
+ TESTEL(KErrNone == ret, ret);
+
+ CloseHostResolver();
+
+ TESTL(OpenHostResolver());
+
+ //-- 1. make 'A' query, it will make esock allocate memory for query and response buffers
+ dnsQryBuf().SetType(KDnsRRTypeA);
+ dnsQryBuf().SetData(_L8("http://www.sample.net/"));
+
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespABuf);
+ TESTEL(KErrNone == ret, ret);
+
+ //-- 2. make 'NAPTR' query, it will make esock reallocate query data buffers, because for
+ //-- this query type they are larger.
+ dnsQryBuf().SetType(KDnsRRTypeNAPTR);
+ dnsQryBuf().SetData(_L8("http://www.foo_bar.ru/"));
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespNaptrBuf);
+ TESTEL(KErrNone == ret, ret);
+
+ //-- 3. this will make Esock reuse eisting buffers
+ TInetAddr inetAddr;
+ inetAddr.Input(_L("192.111.22.77"));
+ dnsQryBuf().SetData(inetAddr);
+ dnsQryBuf().SetType(KDnsRRTypePTR);
+ ret = iHostRslv.Query(dnsQryBuf, dnsRespPtrBuf);
+ TESTEL(KErrNone == ret, ret);
+
+ CloseHostResolver();
+
+ //-- check esock server's heap balance by shutting down the socket server
+ return verdict;
+ }
+