php-src/generate_phpt.php

1106 lines
36 KiB
PHP

<?php
/* This is a script which generates simple PHPT test cases from the name of the function.
* It works using the {{{ proto for the function PHP source code. The test cases that it generates
* are simple, however you can also give it the name of a file with PHP code in and it will turn this
* into the right format for a PHPT test.
* This script will not generate expected output.
* Further quidance on how to use it can be found on qa.php.net, or by using the -h command line option.
*/
//read the command line input and parse it, do some basic checks to make sure that it's correct
$opt = initialise_opt();
$opt = parse_args($argv, $opt);
check_source($opt['source_loc']);
check_fname($opt['name']);
check_testcase($opt['error_gen'], $opt['basic_gen'],$opt['variation_gen']);
if ($opt['include_block'] != NULL) {
check_file($opt['include_block']);
}
//Get a list of all the c funtions in the source tree
$all_c = array();
$c_file_count = 0;
dirlist($opt['source_loc'], $c_file_count, $all_c);
//Search the list of c functions for the function prototype, quit if can't find it or if the function is an alias
$test_info = get_loc_proto($all_c, $opt['name'], $opt['source_loc']);
if (!$test_info['found']) {
echo "Exiting: Unable to find implementation of {$opt['name']} in {$opt['source_loc']}\n";
exit();
}
if ($test_info['falias']) {
//If this function is falias'd to another function direct the test case writer to the principle alias for tests
echo "{$test_info['name']}() is an alias of {$test_info['alias']}() --- please see testcases for {$test_info['alias']}() \n";
exit();
}
if ($test_info['error'] != NULL) {
echo $test_info['error']."\n";
exit();
}
$test_info['proto'] = "proto ".$test_info['return_type']." ". $test_info['name']."(".$test_info['params'].")";
//Set the test sections array - may want more in this later?
$sections = array('--TEST--',
'--FILE--',
'--EXPECTF--'
);
//Parse the parameter list to get the information we need to build code
$names = array();
$types = array();
$num_opt_args = 0;
$num_args = 0;
$parse_success = parse_params($test_info['params'], $names, $types, $num_args, $num_opt_args);
if(!$parse_success) {
echo "Unable to parse function parameter list: {$test_info['params']}. Will only generate template test\n";
}
if((!$parse_success) || ($opt['include_block'] != NULL)) {
//EITHER
// parse_params returns false (failed) so just generate template code
// OR
// If the user has given a file to import PHP code from - don't attempt to generate code
//
echo "\nGenerating test case for ".$test_info['name']."()\n\n";
if($opt['basic_gen']) {
$test_case = gen_template($test_info, $sections, 'basic', $opt['include_block']);
}
elseif ($opt['error_gen']) {
$test_case = gen_template($test_info, $sections, 'error', $opt['include_block']);
}
elseif ($opt['variation_gen']) {
$test_case = gen_template($test_info, $sections, 'variation', $opt['include_block']);
}
exit();
}
// parse params succeded - so set up the function arguments to be used in test generation
$test_info['arg_c'] = $num_args;
$test_info['optional_args'] = $num_opt_args;
if ($num_args > 0) {
$test_info['arg_det'] = array_combine($names, $types);
}
/* DEBUG HERE
var_dump($test_info);
exit();
*/
// Ready to generate test cases as required
echo "\nGenerating test case for ".$test_info['name']."()\n\n";
$test_case = array();
if($opt['basic_gen']) {
$test_case = gen_basic_test($test_info, $sections, $test_case);
}
elseif ($opt['error_gen']) {
$test_case = gen_error_test($test_info, $sections, $test_case);
}
elseif ($opt['variation_gen']) {
//generates a number of tests
gen_variation_test($test_info, $sections);
}
/*
* END OF MAIN CODE SECTION
*/
/*
* Function to read the contents of a PHP into an array
* Arguments:
* File name => file name with PHP code in it
* $test_case => test case array to be appended to
* Returns:
* $test_case
*/
function read_include_file($file_name, $test_case) {
$fp = fopen($file_name, "r");
$code_block = file($file_name);
fclose($fp);
//strip PHP tags and blank lines from start of file
foreach ($code_block as $line) {
if (preg_match("/<\?php/", $line)){
array_shift($code_block);
break;
}else if(preg_match("/^\s*$/",$line)) {
array_shift($code_block);
}else {
break;
}
}
//Strip PHP tags and blank lines from the end of the code
$last = count($code_block) -1;
for($j = 0; $j <= $last; $j++) {
$i = $last - $j;
$line = $code_block[$i];
if(preg_match("/\?>/", $line)) {
array_pop($code_block);
break;
}else if(preg_match("/^\s*$/",$line)) {
array_pop($code_block);
}else {
break;
}
}
// Append the lines of code to the test case array and return
foreach($code_block as $line) {
array_push($test_case, $line);
}
return $test_case;
}
/*
* Generates basic functionality testcase and writes it out to a file.
* Arguments:
* $fn_det => array containing details of the function,
* $sections => The test case sections (eg --TEST--) as an array
* The test case code as arrays keyed by section.
* Returns:
* The test case code as an array of arrays, indexed by section
*/
function gen_basic_test($fn_det, $sections, $test_case) {
$name = $fn_det['name'];
$proto = $fn_det['proto'];
$desc = $fn_det['desc'];
$source_file = $fn_det['source_file'];
$arg_det = $fn_det['arg_det'];
$arg_c = $fn_det['arg_c'];
$optional_args = $fn_det['optional_args'];
$alias = $fn_det['alias'];
// get the test header
$test_case = gen_test_header($name, $proto, $desc, $source_file, "basic functionality", NULL, $alias, $test_case);
$test_case['--FILE--'] = gen_basic_test_code($name, $arg_det, $arg_c, $optional_args, $test_case['--FILE--']);
//End the script
$test_case = gen_test_trailer($test_case,'--EXPECTF--');
write_file($test_case, $name, 'basic', $sections);
return($test_case);
}
/*
* Function to scan recursively down a directory structure looking for all c files.
* Input:
* $dir - string path of top level directory
* &$c_file_count - reference to a count of the number of files - init to 0, is updated with count after code is run
* &$all_c - reference to list of all c files. Initialise to array, will contain file list after code is run
* Output:
* $all_c (see above)
* $c_file_count (see above)
*/
function dirlist($dir, &$c_file_count, &$all_c)
{
$thisdir = dir($dir.'/'); //include the trailing slash
while(($file = $thisdir->read()) !== false) {
if ($file != '.' && $file != '..') {
$path = $thisdir->path.$file;
if(is_dir($path) == true) {
dirlist($path , $c_file_count , $all_c);
} else {
if (preg_match("/\w+\.c$/", $file)) {
$all_c[$c_file_count] = $path;
$c_file_count++;
}
}
}
}
return;
}
/*
* Function takes parameter list extracted from the proto comment and retuns a list
* of names and types
* Arguments:
* $param_list (string) = > list of arguments and types
* $names => reference to an array of variable names
* $types => reference to an array of variable
* $nm_args => reference to number of function argumants
* $num_opt_args => reference to number of optional arguments
* Returns:
* True if have been able to parse string $param_list, false if not.
*/
function parse_params($param_list, &$names, &$types, &$num_args, &$num_opt_args) {
$opt_args = false;
$num_mand_args =0;
$num_opt_args = 0;
$num_args = 0;
$opt_params = NULL;
//remove all commas
$param_list = preg_replace("/,/", "", $param_list);
//deal with void
if(preg_match("/\s*void\s*/", $param_list)) {
return true;
}
// extract mandatory parameters and optional parameters
if (preg_match("/^(.*?)\[\s*(.*)\]\s*(.*?)$/", $param_list, $matches)) {
$param_list = $matches[1].$matches[3];
$opt_params = $matches[2];
// Extract nested optional parameters
$temp_opt_params = $opt_params;
while (preg_match("/(.+?)\s*\[\s*(.*)\]/",$temp_opt_params, $matches)) {
$opt_params = $matches[1]." ".$matches[2];
$temp_opt_params = $opt_params;
}
}
// seperate parameter list into array of types and names
if ($param_list != "") {
$param_list = chop($param_list);
$param_array = explode(" ", $param_list);
$num_mand_args = count($param_array)/2;
//check that this is an even number and quit if not, means we have failed to parse correctly
if((round($num_mand_args) * 2) != count($param_array)) {return false;}
$j = 0;
for($i=0; $i<count($param_array); $i=$i+2) {
$j = $i + 1;
$types[$i] = $param_array[$i];
// If the variable is a reference remove the & from the variable name
$names[$i] = preg_replace("/&/", "", $param_array[$j]);
}
}
//initialise optional arguments
if ($opt_params != NULL) {
$opt_array = explode(" ", $opt_params);
$num_opt_args = count($opt_array)/2;
//check that this is an even number and quit if not, means we have failed to parse correctly
if((round($num_opt_args) * 2) != count($opt_array)) {return false;}
$j = 0;
for($i=0; $i<count($opt_array); $i=$i+2) {
$j = $i + 1;
array_push($types, $opt_array[$i]);
// If the variable is a reference remove the & from the variable name
array_push($names, preg_replace("/&/", "", $opt_array[$j]));
}
}
$num_args = $num_mand_args + $num_opt_args;
return true;
}
/*
* Generates code for an array which contains invalid data types.
* For example, if the variable being tested is of type "float" this code will
* generate an array of data whose type does not include float
*
* Arguments:
* $array_name => name of the array that should be returned
* $var_type => data type of the argument
* Array of code - will be appended to
* Returns:
* $code_block with appended lines of code to initialse the array of data
*/
function gen_array_with_diff_values($var_type, $array_name, $code_block) {
//generate the array with all different values, skip those of the same type as $var_type
// integer values
$variation_array['int'] = array(
"0",
"1",
"12345",
"-2345"
);
// float values
$variation_array['float'] = array(
"10.5",
"-10.5",
"10.5e10",
"10.6E-10",
".5"
);
// array values
$variation_array['array'] = array(
"array()",
"array(0)",
"array(1)",
"array(1, 2)",
"array('color' => 'red', 'item' => 'pen')"
);
// null vlaues
$variation_array['null'] = array(
"NULL",
"null"
);
// boolean values
$variation_array['boolean'] = array(
"true",
"false",
"TRUE",
"FALSE"
);
// empty string
$variation_array['empty'] = array(
"\"\"",
"''",
);
// string values
$variation_array['string'] = array(
"\"string\"",
"'string'",
);
// objects
$variation_array['object'] = array(
"new stdclass()"
);
// undefined variable
$variation_array['undefined'] = array(
'$undefined_var'
);
// unset variable
$variation_array['unset'] = array(
'$unset_var'
);
//Write out the code block for the variation array
$blank_line = "";
array_push($code_block, "\$$array_name = array(");
foreach ($variation_array as $type => $data) {
if($type != $var_type) {
array_push($code_block, $blank_line);
$comment = " // $type data";
array_push($code_block,$comment);
foreach ($variation_array[$type] as $entry) {
$line = " ".$entry.",";
array_push($code_block, $line);
}
}
}
array_push($code_block, ");");
return $code_block;
}
/*
* Generate variation testcases and writes them to file(s)
* 1) generate variation for each argument where different invalid argument values are passed
* 2) generate a vartiation template
* Arguments:
* $fn_det => array containing details of the function,
* $sections => list of test sections, eg '--TEST--', etc
* Returns:
* Nothing at the moment - should be tru for success/false for fail?
*
*/
function gen_variation_test($fn_det, $sections) {
$name = $fn_det['name'];
$proto = $fn_det['proto'];
$desc = $fn_det['desc'];
$source_file = $fn_det['source_file'];
$arg_det = $fn_det['arg_det'];
$arg_c = $fn_det['arg_c'];
$optional_args = $fn_det['optional_args'];
$alias = $fn_det['alias'];
$test_case = array();
$test_case = gen_template($fn_det, $sections, 'variation');
// if the function has zero argument then quit here because we only need the template
if($arg_c == 0) {
return;
}
// generate a sequence of other tests which loop over each function arg trying different values
$name_seq = 1;
$arg_count = 1;
if($arg_c > 0) {
for($i = 0; $i < $arg_c; $i++) {
//generate a different variation test case for each argument
$test_case = array();
$test_case = gen_test_header($name, $proto, $desc,
$source_file, "usage variations", " - <type here specifics of this variation>", $alias, $test_case);
// add variation code
$test_case['--FILE--'] = gen_variation_diff_arg_values_test($name, $arg_det, $arg_count, $test_case['--FILE--']);
// end the script
$test_case = gen_test_trailer($test_case, '--EXPECTF--');
$tc_name = 'variation'.$name_seq;
write_file($test_case, $name, $tc_name, $sections);
$arg_count ++; // next time generate the code for next argument of the function;
$name_seq ++; // next seqence number for variation test name
}
}
}
/*
* Generate code for testcase header. The following test sections are added:
* --TEST-- & --FILE--
* Arguments:
* $fn_name => name of the function
* $proto => $fn_name function prototype
* $desc => short description of $fn_name function
* $source_file => location of the file that implements $fn_name function
* $type_msg => Message to indicate what type of testing is being done : "error_conditions", "basic functionality", etc
* $extra_msg => Additional message that will be printed to indicate what specifics are being tested in this file.
* $alias => list any functions that are aliased to this
* $test_sections => an array of arays of testcase code, keyed by section
* Returns:
* $test_sections
*/
function gen_test_header($fn_name, $proto, $desc, $source_file, $type_msg, $extra_msg, $alias, $test_sections) {
$msg = "$type_msg";
if($extra_msg != NULL)
$msg = "$msg - $extra_msg";
$test_sections['--TEST--'] = array("Test $fn_name() function : $type_msg $extra_msg"
);
$test_sections['--FILE--'] = array ("<?php",
"/* Prototype : $proto",
" * Description: $desc",
" * Source code: $source_file",
" * Alias to functions: $alias",
" */",
"",
"/*",
" * add a comment here to say what the test is supposed to do",
" */",
"",
"echo \"*** Testing $fn_name() : $type_msg ***\\n\";",
""
);
return $test_sections;
}
/*
* Generate error testcase and writes it to a file
* 1. Generates more than expected no. of argument case
* 2. Generates less than expected no. of argument case
* Arguments:
* $fn_det => array containing details of the function
* $sections => The test case sections (eg --TEST--) as amn array
* $test_case => The test case code as arrays keyed by section.
* Returns:
* The test case code as an array of arrays, indexed by section
*/
function gen_error_test($fn_det, $sections, $test_case) {
$name = $fn_det['name'];
$proto = $fn_det['proto'];
$desc = $fn_det['desc'];
$source_file = $fn_det['source_file'];
$arg_det = $fn_det['arg_det'];
$arg_c = $fn_det['arg_c'];
$optional_args = $fn_det['optional_args'];
$alias = $fn_det['alias'];
// get the test header
$test_case = gen_test_header($name, $proto, $desc, $source_file, "error conditions", NULL, $alias, $test_case);
if($fn_det['arg_c'] == 0 ) {
//If the function expects zero arguments generate a one arg test case and quit
$test_case['--FILE--'] = gen_one_arg_code($name, "extra_arg", "int" , $test_case['--FILE--']);
} else if (($fn_det['arg_c'] - $fn_det['optional_args']) == 1) {
//If the function expects one argument generate a zero arg test case and two arg test case
$test_case['--FILE--'] = gen_zero_arg_error_case($name, $test_case['--FILE--']);
$test_case['--FILE--'] = gen_morethanexpected_arg_error_case($name, $arg_det, $test_case['--FILE--']);
} else {
$test_case['--FILE--'] = gen_morethanexpected_arg_error_case($name, $arg_det, $test_case['--FILE--']);
$test_case['--FILE--'] = gen_lessthanexpected_arg_error_case($name, $arg_det, $arg_c, $optional_args, $test_case['--FILE--']);
}
// End the script
$test_case = gen_test_trailer($test_case, '--EXPECTF--');
write_file($test_case, $name, 'error', $sections);
return($test_case);
}
/*
* Add the final lines of the testcase, the default is set to be EXPECTF.
* Arguments:
* $test_case - An aray of arrays keyed by test section
* $section_key - Type of EXPECT section, defaults to EXPECTF
* Returns:
* $test_case - completed test cases code as an array of arrays keyed by section
*/
function gen_test_trailer($test_case, $section_key = "--EXPECTF--") {
//Complete the --FILE-- section
array_push($test_case['--FILE--'], "");
array_push($test_case['--FILE--'], "echo \"Done\";", "?>");
//add a new key for the expect section
$test_case[$section_key]=array();
array_push($test_case[$section_key], "Expected output goes here");
array_push($test_case[$section_key], "Done");
return $test_case;
}
/*
* Writes test case code to a file
* Arguments:
* $test_case => Array of arrays of test sections, keyed by section
* $function_name => Name of functio that tests are being generated for
* $type => basic/error/variation
* $test_sections => keys to $test_case
* $seq = > sequence number, may be appended to file name
* Returns:
* Nothing at the moment - should be true/false depending on success
*/
function write_file($test_case, $function_name, $type, $test_sections, $seq="") {
$file_name = $function_name."_".$type.$seq.".phpt";
$fp = fopen($file_name, 'w');
foreach($test_sections as $section) {
if(array_key_exists($section, $test_case)) {
fwrite($fp, $section."\n");
if(count($test_case[$section]) >0 ){
foreach($test_case[$section] as $line_of_code) {
fwrite($fp, $line_of_code."\n");
}
}
}
}
fclose($fp);
}
/*
* Generate code for testing different invalid values against an argument of the function
* Arguments:
* $fn_name => name of the function
* $arg_det => details of the each argument, stored in an array in the form of 'nameofargument' => 'typeofargument'
* $which_arg => a numeric value starting from 1 indicating the argument of the
* function ( in $arg_det ) for which the case needs to be generated
* $code_block => array of code which will be appended to
* Returns:
* $code_block
*/
function gen_variation_diff_arg_values_test($fn_name, $arg_det, $which_arg, $code_block) {
$names = array_keys($arg_det);
$types = array_values($arg_det);
$blank_line = "";
// decrement the $which_arg so that its matches with the index of $types
$which_arg--;
// generate code to initialise arguments that won't be substituted
array_push($code_block, "// Initialise function arguments not being substituted (if any)");
for($i = 0; $i < count($types); $i ++) {
if ($i != $which_arg) { // do not generate initialization code for the argument which is being tested
$i_stmt = get_variable_init_statement($types[$i], $names[$i]);
array_push($code_block, $i_stmt);
}
}
array_push($code_block, $blank_line);
// generate code to unset a variable
array_push($code_block, "//get an unset variable");
array_push($code_block, "\$unset_var = 10;");
array_push($code_block, "unset (\$unset_var);");
array_push($code_block, $blank_line);
//generate code for an array of values to iterate over
array_push($code_block, "//array of values to iterate over");
$code_block = gen_array_with_diff_values($types[$which_arg], 'values', $code_block);
//generate code for loop to iterate over array values
array_push($code_block, $blank_line);
array_push($code_block, "// loop through each element of the array for $names[$which_arg]");
array_push($code_block, $blank_line);
array_push($code_block, "foreach(\$values as \$value) {");
array_push($code_block, " echo \"\\nArg value \$value \\n\";");
// prepare the function call
// use all arguments including the optional ones to construct a single function call
$var_name = array();
foreach ($names as $nm) {
array_push($var_name, "$".$nm);
}
$var_name[$which_arg] = "\$value";
$all_args = implode(", ", $var_name);
array_push ($code_block, " var_dump( $fn_name($all_args) );");
array_push ($code_block, "};");
return $code_block;
}
/*
* Generate code for testing more than expected no. of argument for error testcase
* Arguments:
* $fn_name => name of the function
* $arg_det => details of the each argument, stored in an array in the form of 'nameofargument' => 'typeofargument'
* $code_block => an array of code that will be appended to
* Returns:
* $code_block
*/
function gen_morethanexpected_arg_error_case($fn_name, $arg_det ,$code_block) {
array_push($code_block, "");
array_push($code_block, "//Test $fn_name with one more than the expected number of arguments");
array_push($code_block, "echo \"\\n-- Testing $fn_name() function with more than expected no. of arguments --\\n\";");
$names = array_keys($arg_det);
$types = array_values($arg_det);
//Initialise expected arguments
for($i = 0; $i < count($types); $i ++) {
$i_stmt = get_variable_init_statement($types[$i], $names[$i]);
array_push($code_block, $i_stmt);
}
// get the extra argument init statement
$i_stmt = get_variable_init_statement("int", "extra_arg");
array_push($code_block, $i_stmt);
$var_name = array();
foreach ($names as $nm) {
array_push($var_name, "$".$nm);
}
$all_args = implode(", ", $var_name);
array_push($code_block, "var_dump( $fn_name($all_args, \$extra_arg) );");
return $code_block;
}
/*
* Generate code for testing less than expected no. of mandatory arguments for error testcase
* Arguments:
* $fn_name => name of the function
* $arg_det => details of the each argument, stored in an array in the form of 'nameofargument' => 'typeofargument'
* $arg_c => total count of arguments that $fn_name takes
* $optional_args => total count of optional arguments that $fn_name takes
* $code_block => an array of code that will be appended to
* Returns:
* $code_block
*/
function gen_lessthanexpected_arg_error_case($fn_name, $arg_det, $arg_c, $optional_args, $code_block) {
$names = array_keys($arg_det);
$types = array_values($arg_det);
// check for no. of mandatory arguments
// if there are no mandatory arguments - return
// the code_block unchanged
$mandatory_args = $arg_c - $optional_args;
if($mandatory_args < 1) {
return ($code_block);
}
//Discard optional arguments and last mandatory arg
for ($i = 0; $i < $optional_args; $i++) {
$discard_n = array_pop($names);
$discard_v = array_pop($types);
}
$discard_n = array_pop($names);
$discard_v = array_pop($types);
array_push($code_block, "");
array_push($code_block, "// Testing $fn_name with one less than the expected number of arguments");
array_push($code_block, "echo \"\\n-- Testing $fn_name() function with less than expected no. of arguments --\\n\";");
for($i = 0; $i < count($names); $i ++) {
$i_stmt = get_variable_init_statement($types[$i], $names[$i]);
array_push($code_block, $i_stmt);
}
$all_args = "";
if ($mandatory_args > 1) {
$var_name = array();
foreach ($names as $nm) {
array_push($var_name, "$".$nm);
}
$all_args = implode(", ", $var_name);
}
array_push($code_block, "var_dump( $fn_name($all_args) );");
return $code_block;
}
/*
* Generates code for initalizing a given variable with value of same type
* Arguments:
* $var_type => data type of variable
* $var_name => name of the variable
* Returns:
* $code_block
*/
function get_variable_init_statement( $var_type, $var_name ) {
$code = "";
if ($var_type == "int") {
$code = "\$$var_name = 10;";
} else if($var_type == "float") {
$code = "\$$var_name = 10.5;";
} else if($var_type == "array") {
$code = "\$$var_name = array(1, 2);";
} else if($var_type == "string") {
$code = "\$$var_name = 'string_val';";
} else if($var_type == "object") {
$code = "\$$var_name = new stdclass();";
} else if($var_type == 'bool' || $var_type == 'boolean') {
$code = "\$$var_name = true;";
} else if($var_type == 'mixed') {
// take a guess at int
$code = "\$$var_name = 1;";
} else {
$code = "\n//WARNING: Unable to initialise $var_name of type $var_type\n";
}
return $code;
}
/*
* Generate code for function with one argument
* Arguments:
* $fn_name => name of the function
* $arg_name => name of the argument
* $arg_type => data type of the argument
* $code_block => an array of code that will be appended to
* Returns:
* $code_block
*/
function gen_one_arg_code($fn_name, $arg_name, $arg_type, $code_block) {
//Initialse the argument
$arg_one_init = get_variable_init_statement($arg_type, $arg_name);
//push code onto the array $code_block
array_push ($code_block, "// One argument");
array_push ($code_block, "echo \"\\n-- Testing $fn_name() function with one argument --\\n\";");
array_push ($code_block, "$arg_one_init;");
array_push ($code_block, "var_dump( $fn_name(\$$arg_name) );");
return $code_block;
}
/*
* Function to get the name of the source file in which the function is implemented and the proto comment
* Arguments:
* $all_c => list of all c files in the PHP source
* $fname => function name
* $source => directory path of PHP source code
* Returns:
* $test_info = > array( source file, return type, parameters, falias, found, alias, error)
*/
function get_loc_proto($all_c, $fname, $source) {
//get location
$test_info['name'] = $fname;
$test_info['source_file'] = NULL;
$test_info['return_type'] = NULL;
$test_info['params'] = NULL;
$test_info['falias'] = false;
$test_info['found'] = false;
$test_info['alias'] = NULL;
$test_info['error'] = NULL;
$escaped_source = preg_replace("/\\\/", "\\\\\\", $source);
$escaped_source = preg_replace("/\//", "\\\/", $escaped_source);
for ($i=0; $i<count($all_c); $i++)
{
$strings=file_get_contents(chop($all_c[$i]));
if (preg_match ("/FUNCTION\($fname\)/",$strings))
{
//strip build specific part of the implementation file name
preg_match("/$escaped_source\/(.*)$/", $all_c[$i], $tmp);
$test_info['source_file'] = $tmp[1];
//get prototype information
if (preg_match("/\/\*\s+{{{\s*proto\s+(\w*)\s*$fname\(\s*(.*)\s*\)(\n|)\s*(.*)\*\//", $strings, $matches)) {
$test_info['return_type'] = $matches[1];
$test_info['params'] = $matches[2];
$test_info['desc'] = $matches[4];
}
else {
$test_info['error'] = "Failed to parse prototype for $fname in $all_c[$i] in function get_loc_proto()";
}
$test_info['found'] = true;
if (preg_match ("/FALIAS\((\w+).*$fname,.*\)/",$strings, $alias_name)) {
// This is not the main implementation, set falias to true
$test_info['falias'] = true;
if ( $test_info['alias'] != NULL) {
$test_info['alias'] = $test_info['alias']." ".$alias_name[1];
} else {
$test_info['alias'] = $alias_name[1];
}
}
break;
}
elseif (preg_match ("/FALIAS\($fname,\s*(\w+).*\)/",$strings, $alias_name)){
// This is the main implementation but it has other functions aliased to it
// Leave falias as false, but collect a list of the alias names
if ( $test_info['alias'] != NULL) {
$test_info['alias'] = $test_info['alias']." ".$alias_name[1];
} else {
$test_info['alias'] = $alias_name[1];
}
//strip build specific part of the implementation file name
preg_match("/$escaped_source\/(.*)$/", $all_c[$i], $tmp);
$test_info['source_file']= $tmp[1];
$test_info['found'] = true;
}
//Some functions are in their own files and not declared using FUNTION/FALIAS.
//If we haven't found either FUNCTION or FAILIAS try just looking for the prototype
elseif (preg_match ("/\/\*\s+{{{\s*proto\s+(\w*)\s*$fname\(\s*(.*)\s*\)(\n|)\s*(.*)\*\//", $strings, $matches)) {
$test_info['return_type'] = $matches[1];
$test_info['params'] = $matches[2];
$test_info['desc'] = $matches[4];
$test_info['found'] = true;
preg_match("/$escaped_source\/(.*)$/", $all_c[$i], $tmp);
$test_info['source_file']= $tmp[1];
break;
}
}
return $test_info;
}
/*
* Generates code for basic functionality test. The generated code
* will test the function with it's mandatory arguments and with all optional arguments.
* Arguments:
* $fn_name => name of the function
* $arg_det => details of the each argument, stored in an array in the form of 'nameofargument' => 'typeofargument'
* $arg_c => total count of arguments that $fn_name takes
* $optional_args. $optional_args => total count of optional arguments that $fn_name takes
* $code_block - an array of code that will be appended to
* Returns:
* $code_block with appends
*/
function gen_basic_test_code($fn_name, $arg_det, $arg_c, $optional_args, $code_block) {
if($arg_c == 0) {
//Just generate Zero arg test case and return
$code_block = gen_zero_arg_error_case($fn_name, $code_block);
return $code_block;
}
$names = array_keys($arg_det);
$types = array_values($arg_det);
// prepare code to initialize all reqd. arguments
array_push ($code_block, "");
array_push ($code_block, "// Initialise all required variables");
for($i = 0; $i < $arg_c; $i ++) {
$i_stmt = get_variable_init_statement($types[$i], $names[$i]);
array_push($code_block, $i_stmt);
}
// prepare the function calls
// all arguments including the optional ones
$var_name = array();
foreach ($names as $nm) {
array_push($var_name, "$".$nm);
}
$all_args = implode(", ", $var_name);
array_push ($code_block, "");
array_push ($code_block, "// Calling $fn_name() with all possible arguments");
array_push ($code_block, "var_dump( $fn_name($all_args) );");
//now remove the optional arguments and call the function with mandatory arguments only
if ($optional_args != 0) {
for ($i=0; $i < $optional_args; $i++) {
$discard_n = array_pop($var_name);
}
$args = implode(", ", $var_name);
array_push ($code_block, "");
array_push ($code_block, "// Calling $fn_name() with mandatory arguments");
array_push ($code_block, "var_dump( $fn_name($args) );");
}
return $code_block;
}
/*
* Function to parse command line arguments
* Returns:
* $opt_array => array of options
*/
function initialise_opt() {
$opt=array();
$opt['source_loc'] = NULL;
$opt['name'] = NULL;
$opt['error_gen'] = false;
$opt['basic_gen'] = false;
$opt['variation_gen'] = false;
$opt['include_block'] = NULL;
return $opt;
}
function parse_args ($arglist, $opt)
{
for($j = 1; $j<count($arglist); $j++) {
switch ($arglist[$j])
{
case '-s':
$j++;
$opt['source_loc'] = $arglist[$j];
break;
case '-f':
$j++;
$opt['name'] = $arglist[$j];
break;
case '-e':
$opt['error_gen'] = true;
break;
case '-b':
$opt['basic_gen'] = true;
break;
case '-v':
$opt['variation_gen'] = true;
break;
case '-i':
$j++;
$opt['include_block'] = $arglist[$j];
break;
case '-h':
print_opts();
break;
default:
echo "Command line option $arg[$j] not recognised\n";
print_opts();
}
}
return $opt;
}
/*
* Function to check that source directory given for PHP source actually conatins PHP source
*/
function check_source($src)
{
$ext_loc = $src."/ext";
if(!is_dir($ext_loc)) {
echo "A PHP source location is required, $src does not appear to be a valid source location\n";
print_opts();
}
}
/*
* Function to check that a file name exists
*/
function check_file($f)
{
if(!is_file($f)) {
echo "$f is not a valid file name \n";
print_opts();
}
}
/*
* Function to check thet either a file name, a list of files or a function area has been supplied
*/
function check_fname ($f)
{
if($f == NULL ) {
echo "Require a function name \n";
print_opts();
}
}
/*
* Function to check that the user has requested a type of test case
*/
function check_testcase($e, $v, $b) {
if(!$v && !$e && !$b) {
echo "Need to specify which type of test to generate\n";
print_opts();
}
}
/*
* Function to print out help text if any of the input data is incorrect
*/
function print_opts() {
echo "\nUsage:\n";
echo " php generate_phpt.php -s <location_of_source_code> -f <function_name> -b|e|v [-i file]\n\n";
echo "-s location_of_source_code ....... Top level directory of PHP source\n";
echo "-f function_name ................. Name of PHP function, eg cos\n";
echo "-b ............................... Generate basic tests\n";
echo "-e ............................... Generate error tests\n";
echo "-v ............................... Generate variation tests\n";
echo "-i file_containing_include_block.. Block of PHP code to be included in the test case\n";
echo "-h ............................... Print this message\n";
exit;
}
/*
* Generates a general testcase template and create the testcase file,
* No code is added other than header and trailer
* Arguments:
* $fn_det => Array with function details
* $sections => List of test sections eg '--TEST--', '--FILE--'..
* $type => basic/error/variation
* $php_file => name of file to import PHP code from
* Returns:
* $test_case => an array containing the complete test case
*/
function gen_template($fn_det, $sections, $type, $php_file=NULL) {
$name = $fn_det['name'];
$proto = $fn_det['proto'];
$desc = $fn_det['desc'];
$source_file = $fn_det['source_file'];
$alias = $fn_det['alias'];
$test_case = array();
// get the test header and write into the file
$test_case = gen_test_header($name, $proto, $desc, $source_file, $type, "",$alias, $test_case);
// write the message to indicate the start of addition of code in the template file
if ($php_file == NULl) {
$msg = "\n // add test code here \n";
array_push($test_case['--FILE--'], $msg);
}else{
$test_case['--FILE--'] = read_include_file($php_file, $test_case['--FILE--']);
}
// end the script
$test_case = gen_test_trailer($test_case);
write_file($test_case, $name, $type, $sections);
return ($test_case);
}
/*
* Generate code for testing zero argument case for error testcase
* Arguments:
* $fn_name => name of the function
* $code_block => array of code which will be appended to
* Returns:
* $code_block
*/
function gen_zero_arg_error_case($fn_name, $code_block) {
//push code onto the array $code_block
array_push ($code_block, "// Zero arguments");
array_push ($code_block, "echo \"\\n-- Testing $fn_name() function with Zero arguments --\\n\";");
array_push ($code_block, "var_dump( $fn_name() );");
return $code_block;
}
?>