--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/kerneltest/e32test/system/t_cli.cpp	Mon Oct 19 15:55:17 2009 +0100
@@ -0,0 +1,124 @@
+// Copyright (c) 1994-2009 Nokia Corporation and/or its subsidiary(-ies).
+// All rights reserved.
+// This component and the accompanying materials are made available
+// under the terms of the License "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:
+// e32test\system\t_cli.cpp
+// Overview:
+// Command line tests
+// API Information:
+// User::CommandLine, User::CommandLineLength
+// Details:
+// - Test the command line data and the command line length. 
+// Verify the results are as expected.
+// Platforms/Drives/Compatibility:
+// All.
+// Assumptions/Requirement/Pre-requisites:
+// Failures and causes:
+// Base Port information:
+// 
+//
+
+#include <e32std.h>
+#include <e32std_private.h>
+#include <e32test.h>
+#include <e32panic.h>
+
+_LIT(KLitKernExec,"KERN-EXEC");
+_LIT(KCmdLine, "Turnip goat fridge, far larder mungo humm.  Yes?");
+
+const TInt EExitError = -1;
+const TInt EExitCmdLineMatch = 42;
+const TInt EExitCmdLine256 = 43;
+
+LOCAL_D RTest test(_L("T_CLI"));
+
+void runtests()
+	{
+
+	test.Next(_L("Test short commmand line"));
+	TRequestStatus stat;
+	RProcess p;
+	TBuf<280> text=KCmdLine();
+	TFileName filename;
+	filename=p.FileName();
+	TInt r=p.Create(filename,text);
+	test(r==KErrNone);
+	test.Next(_L("Run and close process"));
+	p.Logon(stat);
+	p.Resume();
+	User::WaitForRequest(stat);
+	test(p.ExitType()==EExitKill);
+	test(p.ExitReason()==EExitCmdLineMatch);
+	CLOSE_AND_WAIT(p);
+
+	test.Next(_L("Test command line with length 256"));
+	text.SetLength(256);
+	text.Fill('Z');
+	test.Next(_L("Create process"));
+	r=p.Create(filename, text);
+	test(r==KErrNone);
+	test.Next(_L("Run and close process"));	
+	p.Logon(stat);
+	p.Resume();
+	User::WaitForRequest(stat);
+	test(p.ExitType()==EExitKill);
+	test(p.ExitReason()==EExitCmdLine256);
+	CLOSE_AND_WAIT(p);
+
+	test.Next(_L("Test long command line"));
+	text.SetLength(280);
+	text.Fill('a');
+	r=p.Create(filename, text);
+	test(r==KErrNone);
+	test.Next(_L("Run and close process"));
+	p.Logon(stat);
+	p.SetJustInTime(EFalse);	// don't let debugger spoil the test
+	p.Resume();
+	User::WaitForRequest(stat);
+	test.Next(_L("Test Panic type"));
+	test.Printf(_L("%d %d\n"), p.ExitType(), p.ExitReason());
+	test(p.ExitType()==EExitPanic);
+	test(p.ExitReason()==EKUDesSetLengthOverflow);
+	test(p.ExitCategory()==KLitKernExec);
+	CLOSE_AND_WAIT(p);
+	}
+
+GLDEF_C TInt E32Main()
+    {
+
+	test.Title();
+	test.Start(_L("Command line"));
+
+	TInt r;
+	TInt len=User::CommandLineLength();
+	TBuf<256> c;
+	if (len==0)
+		{
+		runtests();
+		r = 0;
+		}
+	else if (len == KCmdLine().Length())
+		{
+		User::CommandLine(c);
+		r = (c.Match(KCmdLine) == 0) ? EExitCmdLineMatch : EExitError;
+		}
+	else
+		{
+		test.Next(_L("Test CommandLine(void)"));
+		// This should panic for command lines > 256
+		User::CommandLine(c);
+		r = EExitCmdLine256;
+		}
+
+	test.End();
+	return r;
+    }