// 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;
    }