/*
* Name: BasicPerlFormatTest
* Authors: Richard Rodger
*
* Copyright (c) 2000-2004 Richard Rodger
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published
* by the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*
*/
// package
// none
// import
import org.jostraca.util.FileUtil;
import org.jostraca.util.PropertySet;
import junit.framework.TestCase;
import junit.framework.TestSuite;
import junit.textui.TestRunner;
import java.io.PrintWriter;
import java.io.File;
/**
* Test cases for BasicPerlFormat
*/
public class BasicPerlFormatTest extends BasicFormatTestSupport {
public static final boolean RUN_ONLY_COMMENTED_OUT = false;
public static final String PERL_FOLDER = "perl";
public static final String PERL_TEMPLATE_SUFFIX = "_pl.jtm";
public BasicPerlFormatTest( String pName ) {
super( pName );
}
public static TestSuite suite() {
return new TestSuite( BasicPerlFormatTest.class );
}
public static void main( String[] pArgs ) {
handleArgs( pArgs );
TestRunner.run( suite() );
}
public String getTestFolder() {
return PERL_FOLDER;
}
public String getJostracaCodeWriterFileName() {
return "Writer.pl";
}
// test methods
public void testMethodInsert() throws Exception {
if( RUN_ONLY_COMMENTED_OUT ) { return; }
generateTemplate( TEST_MethodInsert );
assertTrue( validateMethodInsert() );
PropertySet testPS = getTestPS();
PropertySet refPS = getReferencePS();
refPS.clear();
refPS.set("boolean", "0");
assertTrue( testPS.contains( refPS ) );
}
// protected methods
protected String makeCMDForTemplate( String pTemplateNameSansSuffix,
String pExtraJostracaArgs,
String pCodeWriterArgs,
boolean pSetOutputFolder
) {
String codeWriterArgs = "";
if( 0 < pCodeWriterArgs.length() ) {
codeWriterArgs = pCodeWriterArgs;
}
String templateName = PREFIX_TEST + pTemplateNameSansSuffix + PERL_TEMPLATE_SUFFIX;
File templateFilePath = new File( PERL_FOLDER, templateName );
String setOutputFolder = "";
if( pSetOutputFolder ) {
setOutputFolder = " " + "-o " + getTestFolder();
}
String cmd
= getJostracaCmd()
//+ " " + "-Dperl.use.strict=yes"
//+ " " + "-Djostraca.support.ForceScriptByPath=yes"
+ " " + "-gB "
+ setOutputFolder
+ " " + pExtraJostracaArgs
+ " " + templateFilePath.getPath()
+ " " + codeWriterArgs;
return cmd;
}
}