void test_copy_parent_content( const char * path ) {
char * full_path = util_alloc_abs_path( path );
char * parent_path = util_alloc_parent_path( full_path );
test_work_area_type * work_area = test_work_area_alloc( "copy-parent-content" );
test_assert_false( test_work_area_copy_parent_content( work_area , "Does/not/exist") );
test_assert_true( test_work_area_copy_parent_content( work_area , path ) );
{
struct dirent ** src_namelist;
struct dirent ** target_namelist;
int src_size = scandir( parent_path , &src_namelist , NULL , alphasort);
int target_size = scandir( test_work_area_get_cwd( work_area ) , &target_namelist , NULL , alphasort);
test_assert_int_equal( src_size , target_size );
for (int i=0; i < src_size; i++) {
test_assert_string_equal( src_namelist[i]->d_name , target_namelist[i]->d_name);
free( src_namelist[i] );
free( target_namelist[i] );
}
free( src_namelist );
free( target_namelist );
}
free( parent_path );
free( full_path );
test_work_area_free( work_area );
}
int main(int argc , char ** argv) {
bool ok;
const char * input_path = argv[1];
const char * tex_file = argv[2];
test_work_area_type * work_area = test_work_area_alloc("latex-test");
test_work_area_copy_parent_content(work_area , input_path );
{
bool in_place = false;
latex_type * latex = latex_alloc( tex_file , in_place);
ok = latex_compile( latex , true , true , true);
test_assert_true( in_place == latex_compile_in_place( latex ));
latex_free( latex );
test_assert_true( ok );
}
{
latex_type * latex = latex_alloc( tex_file , false );
test_latex_link( latex );
latex_free( latex );
}
{
bool in_place = true;
latex_type * latex = latex_alloc( tex_file , in_place);
test_assert_true( in_place == latex_compile_in_place( latex ));
test_latex_link( latex );
latex_free( latex );
}
test_work_area_free(work_area);
exit(0);
}
ert_test_context_type * ert_test_context_alloc( const char * test_name , const char * model_config , const char * site_config) {
ert_test_context_type * test_context = util_malloc( sizeof * test_context );
UTIL_TYPE_ID_INIT( test_context , ERT_TEST_CONTEXT_TYPE_ID );
if (util_file_exists(model_config)) {
test_context->work_area = test_work_area_alloc(test_name);
test_work_area_set_store( test_context->work_area , false );
test_work_area_copy_parent_content(test_context->work_area , model_config );
{
char * config_file = util_split_alloc_filename( model_config );
test_context->enkf_main = enkf_main_bootstrap( site_config , config_file , true , false );
free( config_file );
}
test_context->rng = rng_alloc( MZRAN , INIT_DEV_URANDOM );
} else {
test_context->enkf_main = NULL;
test_context->work_area = NULL;
test_context->rng = NULL;
}
return test_context;
}
int main(int argc, char ** argv) {
const char * config_file = argv[1];
test_work_area_type * work_area = test_work_area_alloc( "enkf_main_fs" );
char * model_config;
util_alloc_file_components( config_file , NULL , &model_config , NULL);
test_work_area_copy_parent_content( work_area , config_file );
{
const char * site_config = "/project/res/etc/ERT/site-config";
enkf_main_type * enkf_main = enkf_main_bootstrap( site_config , model_config , false , false );
enkf_main_select_fs( enkf_main , "enkf");
test_assert_true( enkf_main_case_is_current( enkf_main , "enkf"));
test_assert_false( enkf_main_case_is_current( enkf_main , "default_fs"));
test_assert_false( enkf_main_case_is_current( enkf_main , "does_not_exist"));
test_assert_int_equal( 1 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
{
enkf_fs_type * fs_ref = enkf_main_get_fs_ref( enkf_main );
test_assert_int_equal( 2 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
enkf_fs_decref( fs_ref );
test_assert_int_equal( 1 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
}
{
state_map_type * map1 = enkf_fs_get_state_map( enkf_main_get_fs( enkf_main ));
state_map_type * map2 = enkf_main_alloc_readonly_state_map(enkf_main , "enkf");
test_assert_true(state_map_equal( map1 , map2 ));
state_map_free( map2 );
}
{
enkf_fs_type * fs1 = enkf_main_mount_alt_fs( enkf_main , "default" , false );
enkf_fs_type * fs2 = enkf_main_mount_alt_fs( enkf_main , "enkf" , false );
test_assert_int_equal( 2 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
test_assert_int_equal( 2 , enkf_fs_get_refcount( fs2 ));
test_assert_int_equal( 1 , enkf_fs_get_refcount( fs1 ));
enkf_fs_decref( fs1 );
enkf_fs_decref( fs2 );
}
{
enkf_fs_type * enkf_fs = enkf_main_mount_alt_fs( enkf_main , "enkf" , false );
enkf_main_select_fs( enkf_main , "default");
test_assert_int_equal( 1 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
enkf_fs_decref( enkf_fs );
}
{
enkf_fs_type * default_fs = enkf_main_mount_alt_fs( enkf_main , "default" , false );
test_assert_int_equal( 2 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
enkf_main_select_fs( enkf_main , "default");
test_assert_int_equal( 2 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
enkf_fs_decref( default_fs );
test_assert_int_equal( 1 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
}
/*****************************************************************/
{
enkf_fs_type * fs = enkf_main_mount_alt_fs( enkf_main , "default" , false );
test_assert_int_equal( 2 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
enkf_main_set_fs( enkf_main , fs , NULL );
enkf_fs_decref( fs );
test_assert_int_equal( 1 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
}
{
enkf_fs_type * fs = enkf_main_mount_alt_fs( enkf_main , "enkf" , false );
enkf_fs_type * current = enkf_main_mount_alt_fs( enkf_main , "default" , false );
test_assert_int_equal( 2 , enkf_fs_get_refcount( current ));
test_assert_int_equal( 1 , enkf_fs_get_refcount( fs));
enkf_main_set_fs( enkf_main , fs , NULL);
test_assert_int_equal( 2 , enkf_fs_get_refcount( fs));
test_assert_int_equal( 1 , enkf_fs_get_refcount( current ));
enkf_fs_decref( current );
enkf_fs_decref( fs);
}
test_assert_int_equal( 1 , enkf_fs_get_refcount( enkf_main_get_fs( enkf_main )));
enkf_main_free( enkf_main );
}
test_work_area_free( work_area );
exit(0);
}
