general/test/test_ospath.c

/*  ASCEND modelling environment
    Copyright (C) 2006 Carnegie Mellon University

    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, 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., 59 Temple Place - Suite 330,
    Boston, MA 02111-1307, USA.
*//**
    @file
    CUnit tests for the ospath.c module.
*/

#include <general/ospath.h>
#include <CUnit/CUnit.h>

FilePathTestFn ospath_searchpath_testexists;

#define NDEBUG

#ifndef NDEBUG
# include <assert.h>
# define M(MSG) fprintf(stderr,"%s:%d: (%s) %s\n",__FILE__,__LINE__,__FUNCTION__,MSG);fflush(stderr);fflush(stderr)
# define MC(CLR,MSG) fprintf(stderr,"%c[%sm%s:%d: (%s) %s%c[0m\n",27,CLR,__FILE__,__LINE__,__FUNCTION__,MSG,27);fflush(stderr)
# define MM(MSG) MC("34",MSG)
# define X(VAR) fprintf(stderr,"%s:%d: (%s) %s=%s\n",__FILE__,__LINE__,__FUNCTION__,#VAR,VAR);fflush(stderr)
# define C(VAR) fprintf(stderr,"%s:%d: (%s) %s=%c\n",__FILE__,__LINE__,__FUNCTION__,#VAR,VAR);fflush(stderr)
# define V(VAR) fprintf(stderr,"%s:%d: (%s) %s=%d\n",__FILE__,__LINE__,__FUNCTION__,#VAR,(VAR));fflush(stderr)
# define D(VAR) fprintf(stderr,"%s:%d: (%s) %s=",__FILE__,__LINE__,__FUNCTION__,#VAR);ospath_debug(VAR);fflush(stderr)
# define DD(VAR) fprintf(stderr,"\033[34;1m%s:%d: (%s)\033[0m %s=",__FILE__, __LINE__,__FUNCTION__, #VAR);ospath_debug(VAR);fflush(stderr)
#else
# include <assert.h>
# define M(MSG) ((void)0)
# define MC(CLR,MSG) ((void)0)
# define X(VAR) ((void)0)
# define C(VAR) ((void)0)
# define V(VAR) ((void)0)
# define D(VAR) ((void)0)
# define DD(VAR) ((void)0)
# define MM(VAR) ((void)0)
#endif

#ifndef MEMUSED
# define MEMUSED(N) CU_TEST(ascmeminuse()==(N))
#endif

/**
    This is a sample searchpath test function. Assumes the 'userdata' is a
    relative FilePath which is appended to path, and then if it matches
    the path \GTK\bin\johnpye\extfn, returns true. This is of
    course a fairly useless test function, so it's just for testing.
*/
int ospath_searchpath_testexists(struct FilePath *path,void *file){
    struct FilePath *fp, *fp1, *fp2;
    fp = (struct FilePath *)file;
    D(fp);
    fp1 = ospath_concat(path,fp);
    D(fp1);

#ifdef WINPATHS
    fp2 = ospath_new("c:\\GTK\\bin\\johnpye\\extfn");
#else
    fp2 = ospath_new("/GTK/bin/johnpye/extfn");
#endif

    char *t=ospath_str(fp1);
    MC("1",t);
    FREE(t);

    t=ospath_str(fp2);
    MC("31;1",t);
    FREE(t);

    if(ospath_cmp(fp1,fp2)==0){
        MC("32","MATCH");
        ospath_free(fp1);
        ospath_free(fp2);
        return 1;
    }
    MC("31","NO MATCH");
    ospath_free(fp1);
    ospath_free(fp2);
    return 0;
}


// switch to boldface for messages in 'main'
#undef D
#define D DD
#undef M
#define M MM

static void test_ospath_getparent(void){
    struct FilePath *fp1, *fp2, *fp3;

    //------------------------

    fp1 = ospath_new_from_posix("/usr/local/hello/");
    fp2 = ospath_getparent(fp1);
    fp3 = ospath_new_from_posix("/usr/local");

    D(fp1);
    D(fp2);
    D(fp3);
    CU_TEST(ospath_cmp(fp2,fp3)==0);
    M("Passed 'getparent' test\n");

    ospath_free(fp1); ospath_free(fp2); ospath_free(fp3);

    MEMUSED(0);
}
    //------------------------

static void test_ospath_cleanup(void){
    struct FilePath *fp1, *fp2;

    fp1 = ospath_new_from_posix("/usr/include/../local");
    fp2 = ospath_new_from_posix("/usr/local");

    D(fp1);
    D(fp2);
    CU_TEST(ospath_cmp(fp1,fp2)==0);
    M("Passed 'cleanup' test\n");

    ospath_free(fp1); ospath_free(fp2);
    MEMUSED(0);
}
    //------------------------

static void test_ospath_newfromposix(void){

    struct FilePath *fp1, *fp2;

    fp1 = ospath_new_from_posix("models/johnpye/extfn/extfntest");
    D(fp1);
    fp2 = ospath_new("models\\johnpye\\extfn\\extfntest");
    D(fp2);
    D(fp1);
    CU_TEST(ospath_cmp(fp1,fp2)==0);
    M("Passed 'new_from_posix' test\n");

    ospath_free(fp1);
    ospath_free(fp2);
    MEMUSED(0);
}
    //------------------------

static void test_ospath_secondcleanup(void){
    struct FilePath *fp1, *fp2, *fp3;
    fp1 = ospath_new(".\\src/.\\images\\..\\\\movies\\");
    fp2 = ospath_new(".\\src\\movies");

    D(fp1);
    D(fp2);

    CU_TEST(ospath_cmp(fp1,fp2)==0);
    M("Passed mid-path '..' cleanup test\n");

    ospath_free(fp2);

    fp2 = ospath_new("./src/movies\\kubrick");
    fp3 = ospath_getparent(fp2);

    D(fp2);
    D(fp3);

    CU_TEST(ospath_cmp(fp1,fp3)==0);
    M("Passed 'second cleanup' test\n");

    ospath_free(fp1);
    ospath_free(fp2);
    ospath_free(fp3);
    MEMUSED(0);
}
    //------------------------

static void test_ospath_append(void){

    struct FilePath *fp2, *fp3, *fp4;

    fp2 = ospath_new("\\home\\john");
    fp3 = ospath_new("where\\mojo");

    D(fp2);
    D(fp3);

    ospath_append(fp2,fp3);

    D(fp2);

    fp4 = ospath_new("\\home\\john\\where\\mojo\\");

    D(fp2);
    CU_TEST(ospath_cmp(fp2,fp4)==0);
    M("Passed 'append' test\n");

    ospath_free(fp3);
    ospath_free(fp2);
    ospath_free(fp4);
    MEMUSED(0);
}
    //---------------------------

static void test_ospath_appendupup(void){

    struct FilePath *fp2, *fp3, *fp4;

    fp3 = ospath_new_noclean("../..");
    D(fp3);

    // test with appending ../.. to an existing path
    fp2 = ospath_new("\\home\\john");
    M("ORIGINAL PATH");
    D(fp2);
    ospath_append(fp2,fp3);
    M("AFTER APPENDING ../..");
    D(fp2);

    M("GETTING ROOT");
    fp4 = ospath_root(fp2);
    M("ROOT FOUND:");
    D(fp4);

    CU_TEST(ospath_cmp(fp2,fp4)==0);
    M("Passed 'append ../..' test\n");

    ospath_free(fp2);
    ospath_free(fp3);
    ospath_free(fp4);
    MEMUSED(0);
}
    //-------------------------

static void test_ospath_up(void){

    struct FilePath *fp1, *fp2;

    fp1 = ospath_new("~\\somewhere\\..");
    fp2 = ospath_new("~/.");

    CU_TEST(ospath_cmp(fp1,fp2)==0);

    D(fp2);

    ospath_free(fp1);
    ospath_free(fp2);

    fp1 = ospath_new("/usr/local/include");
    fp2 = ospath_new("/usr/include/../local/include");

    D(fp1);
    D(fp2);

    CU_TEST(ospath_cmp(fp1,fp2)==0);
    M("Passed another mid-path '..' test\n");

    ospath_free(fp1);
    ospath_free(fp2);
    MEMUSED(0);
}
    //---------------------------

static void test_ospath_concat(void){

    struct FilePath *fp1, *fp2, *fp3, *fp4;

    fp1 = ospath_new("/home");
    fp2 = ospath_new("john");
    fp3 = ospath_concat(fp1, fp2);

    fp4 = ospath_new("/home/john");

    CU_TEST(ospath_cmp(fp3,fp4)==0);
    M("Passed 'ospath_concat' test\n");

    ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);

    fp1 = ospath_new("c:/Program Files");
    fp2 = ospath_new("GnuWin32\\bin");
    fp3 = ospath_concat(fp1, fp2);

    fp4 = ospath_new("c:/Program Files/GnuWin32/bin");

    CU_TEST(ospath_cmp(fp3,fp4)==0);
    M("Passed 'ospath_concat' test\n");

    ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);
    MEMUSED(0);
}
    //---------------------------

static void test_ospath_concatmixedslash(void){

    struct FilePath *fp1, *fp2, *fp3, *fp4;

    fp1 = ospath_new("c:/Program Files/");
    fp2 = ospath_new("GnuWin32\\bin");
    fp3 = ospath_concat(fp1, fp2);

    fp4 = ospath_new("c:/Program Files/GnuWin32/bin");

    CU_TEST(ospath_cmp(fp3,fp4)==0);
    M("Passed trailing-slash 'ospath_concat' test\n");

    ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);
    MEMUSED(0);
}
    //---------------------------

static void test_ospath_trailingslash(void){

    struct FilePath *fp1, *fp2, *fp3, *fp4;

    fp1 = ospath_new("c:/Program Files/GnuWin32/bin");
    fp2 = ospath_new("johnpye/extfn");
    fp3 = ospath_concat(fp1, fp2);

    fp4 = ospath_new("c:/Program Files/GnuWin32/bin/johnpye/extfn");

    CU_TEST(ospath_cmp(fp3,fp4)==0);
    M("Passed trailing-slash 'ospath_concat' test\n");

    ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);
    MEMUSED(0);
}
    //---------------------------

static void test_ospath_searchpath(void){

    struct FilePath *fp1, *fp2, *fp3;
    struct FilePath **pp, **p1;// will be returned null-terminated
#ifdef WINPATHS
    char pathtext[]="c:\\Program Files\\GnuWin32\\bin;c:\\GTK\\bin;e:\\ascend\\;..\\..\\pygtk";
#else
    char pathtext[]="\\Program Files\\GnuWin32\\bin:\\GTK\\bin:\\ascend\\:..\\..\\pygtk";
#endif

    pp = ospath_searchpath_new(pathtext);

    for(p1=pp; *p1!=NULL; ++p1){
        D(*p1);
    }

#ifdef WINPATHS
    fp1 = ospath_new("c:\\program files\\GnuWin32\\bin");
#else
    fp1 = ospath_new("\\Program Files\\GnuWin32\\bin");
#endif

    CU_TEST(pp[0]!=NULL);
    CU_TEST(fp1!=NULL);

    D(fp1);
    D(pp[0]);

    CU_TEST(ospath_cmp(pp[0],fp1)==0);


    fp2 = ospath_new_noclean("johnpye/extfn");
    D(fp2);

    fflush(stderr);

    fp3 = ospath_searchpath_iterate(pp,&ospath_searchpath_testexists,(void*)fp2);

    CU_TEST(fp3!=NULL);
    D(fp3);
    D(pp[1]);

    CU_TEST(ospath_cmp(fp3,pp[1])==0);
    M("Passed path-search test\n");

    ospath_free(fp1);
    ospath_free(fp2);
    ospath_searchpath_free(pp);
    MEMUSED(0);
}
    //-------------------------------

static void test_ospath_searchpath2(void){

    struct FilePath *fp2, *fp3;
    struct FilePath **pp, **p1;// will be returned null-terminated
#ifdef WINPATHS
    char pathtext2[]="c:\\Program Files\\ASCEND\\models";
#else
    char pathtext2[]="/usr/local/ascend/models";
#endif

    M("Path-search test 2...");

    pp = ospath_searchpath_new(pathtext2);

    CU_TEST(pp!=NULL);

    for (p1=pp; *p1!=NULL; ++p1){
        D(*p1);
    }

    fp2 = ospath_new_noclean("johnpye/extfn/extfntest");
    D(fp2);

    fp3 = ospath_searchpath_iterate(pp,&ospath_searchpath_testexists,(void*)fp2);
    CU_TEST(fp3==NULL);

    M("Passed path-search test 2\n");

    ospath_free(fp2);
    ospath_free(fp3);
    ospath_searchpath_free(pp);
    MEMUSED(0);
}
    //-------------------------------

static void test_ospath_basefilename(void){

    struct FilePath *fp1;
    char *s1;

    fp1 = ospath_new("/usr/share/data/ascend/models/johnpye/extfn/extfntest.a4c");
    D(fp1);
    s1 = ospath_getbasefilename(fp1);
    X(s1);
    CU_TEST(strcmp(s1,"extfntest.a4c")==0);
    M("Passed getbasefilename test\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("extfntest.a4c");
    D(fp1);
    s1 = ospath_getbasefilename(fp1);
    X(s1);
    CU_TEST(strcmp(s1,"extfntest.a4c")==0);
    M("Passed getbasefilename test 2\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("/here/is/my/path.dir/");
    D(fp1);
    s1 = ospath_getbasefilename(fp1);
    X(s1);
    CU_TEST(NULL==s1);
    M("Passed getbasefilename test 3\n");

    ospath_free(fp1);
    if(s1)FREE(s1);

#ifdef WINPATHS
    fp1 = ospath_new("c:extfntest.a4c");
    D(fp1);
    s1 = ospath_getbasefilename(fp1);
    X(s1);
    CU_TEST(strcmp(s1,"extfntest.a4c")==0);
    M("Passed getbasefilename test WINPATHS\n");

    ospath_free(fp1);
    FREE(s1);
#endif
    MEMUSED(0);
}
    //-------------------------------

static void test_ospath_getfilestem(void){

    struct FilePath *fp1;
    char *s1;

    fp1 = ospath_new("/usr/share/data/ascend/models/johnpye/extfn/extfntest.a4c");
    D(fp1);
    s1 = ospath_getfilestem(fp1);
    X(s1);
    CU_TEST(strcmp(s1,"extfntest")==0);
    M("Passed getfilestem test\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("/usr/share/data/ascend/models/johnpye/extfn/extfntest");
    D(fp1);
    s1 = ospath_getfilestem(fp1);
    X(s1);
    CU_TEST(strcmp(s1,"extfntest")==0);
    M("Passed getfilestem test 2\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("/usr/share/data/ascend/.ascend.ini");
    D(fp1);
    s1 = ospath_getfilestem(fp1);
    X(s1);
    CU_TEST(strcmp(s1,".ascend")==0);
    M("Passed getfilestem test 3\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("~/.vimrc");
    D(fp1);
    s1 = ospath_getfilestem(fp1);
    X(s1);
    CU_TEST(strcmp(s1,".vimrc")==0);
    M("Passed getfilestem test 3\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("~/src/ascend-0.9.5-1.jdpipe.src.rpm");
    D(fp1);
    s1 = ospath_getfilestem(fp1);
    X(s1);
    CU_TEST(strcmp(s1,"ascend-0.9.5-1.jdpipe.src")==0);
    M("Passed getfilestem test 4\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("~/dir1/dir2/");
    D(fp1);
    s1 = ospath_getfilestem(fp1);
    X(s1);
    CU_TEST(NULL==s1);
    M("Passed getfilestem test 5\n");

    ospath_free(fp1);
    if(s1)FREE(s1);
    MEMUSED(0);
}
    //-------------------------------

static void test_ospath_getbasefileext(void){

    struct FilePath *fp1;
    char *s1;

    fp1 = ospath_new("~/src/ascend-0.9.5-1.jdpipe.src.rpm");
    D(fp1);
    s1 = ospath_getfileext(fp1);
    X(s1);
    CU_TEST(strcmp(s1,".rpm")==0);
    M("Passed getbasefileext test\n");

    ospath_free(fp1);
    FREE(s1);

    fp1 = ospath_new("~/.vimrc");
    D(fp1);
    s1 = ospath_getfileext(fp1);
    X(s1);
    CU_TEST(s1==NULL);
    M("Passed getbasefileext test 2\n");

    ospath_free(fp1);
    if(s1)FREE(s1);

    fp1 = ospath_new("./ascend4");
    D(fp1);
    s1 = ospath_getfileext(fp1);
    X(s1);
    CU_TEST(s1==NULL);
    M("Passed getbasefileext test 3\n");

    ospath_free(fp1);
    if(s1)FREE(s1);
    MEMUSED(0);
}
    //-------------------------------

static void test_ospath_getdir(void){

    struct FilePath *fp1, *fp2, *fp3;

    fp1 = ospath_new("/home/myfile");
    fp2 = ospath_getdir(fp1);
    fp3 = ospath_new("/home");
    CU_TEST(ospath_cmp(fp2,fp3)==0);
    M("Passed ospath_getdir test\n");

    ospath_free(fp1);
    ospath_free(fp2);
    ospath_free(fp3);

    fp1 = ospath_new("/home/myfile.ext");
    fp2 = ospath_getdir(fp1);
    fp3 = ospath_new("/home");
    CU_TEST(ospath_cmp(fp2,fp3)==0);
    M("Passed ospath_getdir test 2\n");

    ospath_free(fp1);
    ospath_free(fp2);
    ospath_free(fp3);

    fp1 = ospath_new("/home/mydir/");
    fp2 = ospath_getdir(fp1);
    fp3 = ospath_new("/home/mydir");
    CU_TEST(ospath_cmp(fp2,fp3)==0);
    M("Passed ospath_getdir test 3\n");

    ospath_free(fp1);
    ospath_free(fp2);
    ospath_free(fp3);
    MEMUSED(0);
}

/*===========================================================================*/
/* Registration information */

#define T(N) {#N, test_ospath_##N }
static CU_TestInfo ospath_test_list[] = {
    T(getparent)
    ,T(cleanup)
    ,T(newfromposix)
    ,T(secondcleanup)
    ,T(append)
    ,T(appendupup)
    ,T(up)
    ,T(concat)
    ,T(concatmixedslash)
    ,T(trailingslash)
    ,T(searchpath)
    ,T(searchpath2)
    ,T(basefilename)
    ,T(getfilestem)
    ,T(getbasefileext)
    ,T(getdir)
    ,CU_TEST_INFO_NULL
};
#undef T

static CU_SuiteInfo suites[] = {
  {"test_general_ospath", NULL, NULL, ospath_test_list},
  CU_SUITE_INFO_NULL
};

/*-------------------------------------------------------------------*/
CU_ErrorCode test_register_general_ospath(void)
{
  return CU_register_suites(suites);
}
1	johnpye	607	/* ASCEND modelling environment
2			Copyright (C) 2006 Carnegie Mellon University
3
4			This program is free software; you can redistribute it and/or modify
5			it under the terms of the GNU General Public License as published by
6			the Free Software Foundation; either version 2, or (at your option)
7			any later version.
8
9			This program is distributed in the hope that it will be useful,
10			but WITHOUT ANY WARRANTY; without even the implied warranty of
11			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12			GNU General Public License for more details.
13
14			You should have received a copy of the GNU General Public License
15			along with this program; if not, write to the Free Software
16			Foundation, Inc., 59 Temple Place - Suite 330,
17			Boston, MA 02111-1307, USA.
18			//*
19			@file
20			CUnit tests for the ospath.c module.
21			*/
22
23			#include <general/ospath.h>
24			#include <CUnit/CUnit.h>
25
26			FilePathTestFn ospath_searchpath_testexists;
27
28	johnpye	998	#define NDEBUG
29
30	johnpye	607	#ifndef NDEBUG
31			# include <assert.h>
32			# define M(MSG) fprintf(stderr,"%s:%d: (%s) %s\n",__FILE__,__LINE__,__FUNCTION__,MSG);fflush(stderr);fflush(stderr)
33			# define MC(CLR,MSG) fprintf(stderr,"%c[%sm%s:%d: (%s) %s%c[0m\n",27,CLR,__FILE__,__LINE__,__FUNCTION__,MSG,27);fflush(stderr)
34			# define MM(MSG) MC("34",MSG)
35			# define X(VAR) fprintf(stderr,"%s:%d: (%s) %s=%s\n",__FILE__,__LINE__,__FUNCTION__,#VAR,VAR);fflush(stderr)
36			# define C(VAR) fprintf(stderr,"%s:%d: (%s) %s=%c\n",__FILE__,__LINE__,__FUNCTION__,#VAR,VAR);fflush(stderr)
37			# define V(VAR) fprintf(stderr,"%s:%d: (%s) %s=%d\n",__FILE__,__LINE__,__FUNCTION__,#VAR,(VAR));fflush(stderr)
38			# define D(VAR) fprintf(stderr,"%s:%d: (%s) %s=",__FILE__,__LINE__,__FUNCTION__,#VAR);ospath_debug(VAR);fflush(stderr)
39			# define DD(VAR) fprintf(stderr,"\033[34;1m%s:%d: (%s)\033[0m %s=",__FILE__, __LINE__,__FUNCTION__, #VAR);ospath_debug(VAR);fflush(stderr)
40			#else
41			# include <assert.h>
42			# define M(MSG) ((void)0)
43			# define MC(CLR,MSG) ((void)0)
44			# define X(VAR) ((void)0)
45			# define C(VAR) ((void)0)
46			# define V(VAR) ((void)0)
47			# define D(VAR) ((void)0)
48			# define DD(VAR) ((void)0)
49			# define MM(VAR) ((void)0)
50			#endif
51
52	johnpye	998	#ifndef MEMUSED
53			# define MEMUSED(N) CU_TEST(ascmeminuse()==(N))
54			#endif
55
56	johnpye	607	/**
57	johnpye	998	This is a sample searchpath test function. Assumes the 'userdata' is a
58	johnpye	607	relative FilePath which is appended to path, and then if it matches
59			the path \GTK\bin\johnpye\extfn, returns true. This is of
60			course a fairly useless test function, so it's just for testing.
61			*/
62			int ospath_searchpath_testexists(struct FilePath path,void file){
63			struct FilePath fp, fp1, *fp2;
64			fp = (struct FilePath *)file;
65			D(fp);
66			fp1 = ospath_concat(path,fp);
67			D(fp1);
68
69			#ifdef WINPATHS
70			fp2 = ospath_new("c:\\GTK\\bin\\johnpye\\extfn");
71			#else
72			fp2 = ospath_new("/GTK/bin/johnpye/extfn");
73			#endif
74
75			char *t=ospath_str(fp1);
76			MC("1",t);
77			FREE(t);
78
79			t=ospath_str(fp2);
80			MC("31;1",t);
81			FREE(t);
82
83			if(ospath_cmp(fp1,fp2)==0){
84			MC("32","MATCH");
85	johnpye	998	ospath_free(fp1);
86			ospath_free(fp2);
87	johnpye	607	return 1;
88			}
89			MC("31","NO MATCH");
90	johnpye	998	ospath_free(fp1);
91			ospath_free(fp2);
92	johnpye	607	return 0;
93			}
94
95
96			// switch to boldface for messages in 'main'
97			#undef D
98			#define D DD
99			#undef M
100			#define M MM
101
102	johnpye	998	static void test_ospath_getparent(void){
103			struct FilePath fp1, fp2, *fp3;
104	johnpye	607
105			//------------------------
106
107			fp1 = ospath_new_from_posix("/usr/local/hello/");
108			fp2 = ospath_getparent(fp1);
109			fp3 = ospath_new_from_posix("/usr/local");
110
111			D(fp1);
112			D(fp2);
113			D(fp3);
114			CU_TEST(ospath_cmp(fp2,fp3)==0);
115			M("Passed 'getparent' test\n");
116
117			ospath_free(fp1); ospath_free(fp2); ospath_free(fp3);
118
119	johnpye	998	MEMUSED(0);
120			}
121	johnpye	607	//------------------------
122
123	johnpye	998	static void test_ospath_cleanup(void){
124			struct FilePath fp1, fp2;
125
126			fp1 = ospath_new_from_posix("/usr/include/../local");
127			fp2 = ospath_new_from_posix("/usr/local");
128
129			D(fp1);
130			D(fp2);
131			CU_TEST(ospath_cmp(fp1,fp2)==0);
132			M("Passed 'cleanup' test\n");
133
134			ospath_free(fp1); ospath_free(fp2);
135			MEMUSED(0);
136			}
137			//------------------------
138
139			static void test_ospath_newfromposix(void){
140
141			struct FilePath fp1, fp2;
142
143	johnpye	607	fp1 = ospath_new_from_posix("models/johnpye/extfn/extfntest");
144			D(fp1);
145			fp2 = ospath_new("models\\johnpye\\extfn\\extfntest");
146			D(fp2);
147			D(fp1);
148			CU_TEST(ospath_cmp(fp1,fp2)==0);
149			M("Passed 'new_from_posix' test\n");
150
151			ospath_free(fp1);
152			ospath_free(fp2);
153	johnpye	998	MEMUSED(0);
154			}
155			//------------------------
156	johnpye	607
157	johnpye	998	static void test_ospath_secondcleanup(void){
158			struct FilePath fp1, fp2, *fp3;
159	johnpye	607	fp1 = ospath_new(".\\src/.\\images\\..\\\\movies\\");
160			fp2 = ospath_new(".\\src\\movies");
161
162			D(fp1);
163			D(fp2);
164
165			CU_TEST(ospath_cmp(fp1,fp2)==0);
166			M("Passed mid-path '..' cleanup test\n");
167
168			ospath_free(fp2);
169
170			fp2 = ospath_new("./src/movies\\kubrick");
171			fp3 = ospath_getparent(fp2);
172
173			D(fp2);
174			D(fp3);
175
176			CU_TEST(ospath_cmp(fp1,fp3)==0);
177			M("Passed 'second cleanup' test\n");
178
179	johnpye	998	ospath_free(fp1);
180			ospath_free(fp2);
181			ospath_free(fp3);
182			MEMUSED(0);
183			}
184	johnpye	607	//------------------------
185
186	johnpye	998	static void test_ospath_append(void){
187
188			struct FilePath fp2, fp3, *fp4;
189
190	johnpye	607	fp2 = ospath_new("\\home\\john");
191			fp3 = ospath_new("where\\mojo");
192
193			D(fp2);
194			D(fp3);
195
196			ospath_append(fp2,fp3);
197
198			D(fp2);
199
200			fp4 = ospath_new("\\home\\john\\where\\mojo\\");
201
202			D(fp2);
203			CU_TEST(ospath_cmp(fp2,fp4)==0);
204			M("Passed 'append' test\n");
205
206			ospath_free(fp3);
207			ospath_free(fp2);
208	johnpye	998	ospath_free(fp4);
209			MEMUSED(0);
210			}
211	johnpye	607	//---------------------------
212
213	johnpye	998	static void test_ospath_appendupup(void){
214
215			struct FilePath fp2, fp3, *fp4;
216
217	johnpye	607	fp3 = ospath_new_noclean("../..");
218			D(fp3);
219
220			// test with appending ../.. to an existing path
221			fp2 = ospath_new("\\home\\john");
222			M("ORIGINAL PATH");
223			D(fp2);
224			ospath_append(fp2,fp3);
225			M("AFTER APPENDING ../..");
226			D(fp2);
227
228			M("GETTING ROOT");
229			fp4 = ospath_root(fp2);
230			M("ROOT FOUND:");
231			D(fp4);
232
233			CU_TEST(ospath_cmp(fp2,fp4)==0);
234			M("Passed 'append ../..' test\n");
235
236			ospath_free(fp2);
237			ospath_free(fp3);
238			ospath_free(fp4);
239	johnpye	998	MEMUSED(0);
240			}
241	johnpye	607	//-------------------------
242
243	johnpye	998	static void test_ospath_up(void){
244
245			struct FilePath fp1, fp2;
246
247	johnpye	607	fp1 = ospath_new("~\\somewhere\\..");
248			fp2 = ospath_new("~/.");
249
250			CU_TEST(ospath_cmp(fp1,fp2)==0);
251
252			D(fp2);
253
254			ospath_free(fp1);
255			ospath_free(fp2);
256
257			fp1 = ospath_new("/usr/local/include");
258			fp2 = ospath_new("/usr/include/../local/include");
259
260			D(fp1);
261			D(fp2);
262
263			CU_TEST(ospath_cmp(fp1,fp2)==0);
264			M("Passed another mid-path '..' test\n");
265
266			ospath_free(fp1);
267			ospath_free(fp2);
268	johnpye	998	MEMUSED(0);
269			}
270	johnpye	607	//---------------------------
271
272	johnpye	998	static void test_ospath_concat(void){
273
274			struct FilePath fp1, fp2, fp3, fp4;
275
276	johnpye	607	fp1 = ospath_new("/home");
277			fp2 = ospath_new("john");
278			fp3 = ospath_concat(fp1, fp2);
279
280			fp4 = ospath_new("/home/john");
281
282			CU_TEST(ospath_cmp(fp3,fp4)==0);
283			M("Passed 'ospath_concat' test\n");
284
285			ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);
286
287			fp1 = ospath_new("c:/Program Files");
288			fp2 = ospath_new("GnuWin32\\bin");
289			fp3 = ospath_concat(fp1, fp2);
290
291			fp4 = ospath_new("c:/Program Files/GnuWin32/bin");
292
293			CU_TEST(ospath_cmp(fp3,fp4)==0);
294			M("Passed 'ospath_concat' test\n");
295
296			ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);
297	johnpye	998	MEMUSED(0);
298			}
299	johnpye	607	//---------------------------
300
301	johnpye	998	static void test_ospath_concatmixedslash(void){
302
303			struct FilePath fp1, fp2, fp3, fp4;
304
305	johnpye	607	fp1 = ospath_new("c:/Program Files/");
306			fp2 = ospath_new("GnuWin32\\bin");
307			fp3 = ospath_concat(fp1, fp2);
308
309			fp4 = ospath_new("c:/Program Files/GnuWin32/bin");
310
311			CU_TEST(ospath_cmp(fp3,fp4)==0);
312			M("Passed trailing-slash 'ospath_concat' test\n");
313
314			ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);
315	johnpye	998	MEMUSED(0);
316			}
317	johnpye	607	//---------------------------
318
319	johnpye	998	static void test_ospath_trailingslash(void){
320
321			struct FilePath fp1, fp2, fp3, fp4;
322
323	johnpye	607	fp1 = ospath_new("c:/Program Files/GnuWin32/bin");
324			fp2 = ospath_new("johnpye/extfn");
325			fp3 = ospath_concat(fp1, fp2);
326
327			fp4 = ospath_new("c:/Program Files/GnuWin32/bin/johnpye/extfn");
328
329			CU_TEST(ospath_cmp(fp3,fp4)==0);
330			M("Passed trailing-slash 'ospath_concat' test\n");
331
332			ospath_free(fp1); ospath_free(fp2); ospath_free(fp3); ospath_free(fp4);
333	johnpye	998	MEMUSED(0);
334			}
335	johnpye	607	//---------------------------
336
337	johnpye	998	static void test_ospath_searchpath(void){
338
339			struct FilePath fp1, fp2, *fp3;
340			struct FilePath pp, p1;// will be returned null-terminated
341			#ifdef WINPATHS
342			char pathtext[]="c:\\Program Files\\GnuWin32\\bin;c:\\GTK\\bin;e:\\ascend\\;..\\..\\pygtk";
343			#else
344			char pathtext[]="\\Program Files\\GnuWin32\\bin:\\GTK\\bin:\\ascend\\:..\\..\\pygtk";
345			#endif
346
347	johnpye	607	pp = ospath_searchpath_new(pathtext);
348
349			for(p1=pp; *p1!=NULL; ++p1){
350			D(*p1);
351			}
352
353			#ifdef WINPATHS
354			fp1 = ospath_new("c:\\program files\\GnuWin32\\bin");
355			#else
356			fp1 = ospath_new("\\Program Files\\GnuWin32\\bin");
357			#endif
358
359			CU_TEST(pp[0]!=NULL);
360			CU_TEST(fp1!=NULL);
361
362			D(fp1);
363			D(pp[0]);
364
365			CU_TEST(ospath_cmp(pp[0],fp1)==0);
366
367
368			fp2 = ospath_new_noclean("johnpye/extfn");
369			D(fp2);
370
371			fflush(stderr);
372
373			fp3 = ospath_searchpath_iterate(pp,&ospath_searchpath_testexists,(void*)fp2);
374
375			CU_TEST(fp3!=NULL);
376			D(fp3);
377			D(pp[1]);
378
379			CU_TEST(ospath_cmp(fp3,pp[1])==0);
380			M("Passed path-search test\n");
381
382			ospath_free(fp1);
383			ospath_free(fp2);
384			ospath_searchpath_free(pp);
385	johnpye	998	MEMUSED(0);
386			}
387	johnpye	607	//-------------------------------
388
389	johnpye	998	static void test_ospath_searchpath2(void){
390
391			struct FilePath fp2, fp3;
392			struct FilePath pp, p1;// will be returned null-terminated
393			#ifdef WINPATHS
394			char pathtext2[]="c:\\Program Files\\ASCEND\\models";
395			#else
396			char pathtext2[]="/usr/local/ascend/models";
397			#endif
398
399	johnpye	607	M("Path-search test 2...");
400
401			pp = ospath_searchpath_new(pathtext2);
402
403			CU_TEST(pp!=NULL);
404
405			for (p1=pp; *p1!=NULL; ++p1){
406			D(*p1);
407			}
408
409			fp2 = ospath_new_noclean("johnpye/extfn/extfntest");
410			D(fp2);
411
412			fp3 = ospath_searchpath_iterate(pp,&ospath_searchpath_testexists,(void*)fp2);
413			CU_TEST(fp3==NULL);
414
415			M("Passed path-search test 2\n");
416
417			ospath_free(fp2);
418			ospath_free(fp3);
419			ospath_searchpath_free(pp);
420	johnpye	998	MEMUSED(0);
421			}
422	johnpye	607	//-------------------------------
423
424	johnpye	998	static void test_ospath_basefilename(void){
425
426			struct FilePath *fp1;
427			char *s1;
428
429	johnpye	607	fp1 = ospath_new("/usr/share/data/ascend/models/johnpye/extfn/extfntest.a4c");
430			D(fp1);
431			s1 = ospath_getbasefilename(fp1);
432			X(s1);
433			CU_TEST(strcmp(s1,"extfntest.a4c")==0);
434			M("Passed getbasefilename test\n");
435
436			ospath_free(fp1);
437			FREE(s1);
438
439			fp1 = ospath_new("extfntest.a4c");
440			D(fp1);
441			s1 = ospath_getbasefilename(fp1);
442			X(s1);
443			CU_TEST(strcmp(s1,"extfntest.a4c")==0);
444			M("Passed getbasefilename test 2\n");
445
446			ospath_free(fp1);
447			FREE(s1);
448
449			fp1 = ospath_new("/here/is/my/path.dir/");
450			D(fp1);
451			s1 = ospath_getbasefilename(fp1);
452			X(s1);
453			CU_TEST(NULL==s1);
454			M("Passed getbasefilename test 3\n");
455
456			ospath_free(fp1);
457	johnpye	939	if(s1)FREE(s1);
458	johnpye	607
459			#ifdef WINPATHS
460			fp1 = ospath_new("c:extfntest.a4c");
461			D(fp1);
462			s1 = ospath_getbasefilename(fp1);
463			X(s1);
464			CU_TEST(strcmp(s1,"extfntest.a4c")==0);
465			M("Passed getbasefilename test WINPATHS\n");
466
467			ospath_free(fp1);
468			FREE(s1);
469			#endif
470	johnpye	998	MEMUSED(0);
471			}
472	johnpye	607	//-------------------------------
473
474	johnpye	998	static void test_ospath_getfilestem(void){
475
476			struct FilePath *fp1;
477			char *s1;
478
479	johnpye	607	fp1 = ospath_new("/usr/share/data/ascend/models/johnpye/extfn/extfntest.a4c");
480			D(fp1);
481			s1 = ospath_getfilestem(fp1);
482			X(s1);
483			CU_TEST(strcmp(s1,"extfntest")==0);
484			M("Passed getfilestem test\n");
485
486			ospath_free(fp1);
487			FREE(s1);
488
489			fp1 = ospath_new("/usr/share/data/ascend/models/johnpye/extfn/extfntest");
490			D(fp1);
491			s1 = ospath_getfilestem(fp1);
492			X(s1);
493			CU_TEST(strcmp(s1,"extfntest")==0);
494			M("Passed getfilestem test 2\n");
495
496			ospath_free(fp1);
497			FREE(s1);
498
499			fp1 = ospath_new("/usr/share/data/ascend/.ascend.ini");
500			D(fp1);
501			s1 = ospath_getfilestem(fp1);
502			X(s1);
503			CU_TEST(strcmp(s1,".ascend")==0);
504			M("Passed getfilestem test 3\n");
505
506			ospath_free(fp1);
507			FREE(s1);
508
509			fp1 = ospath_new("~/.vimrc");
510			D(fp1);
511			s1 = ospath_getfilestem(fp1);
512			X(s1);
513			CU_TEST(strcmp(s1,".vimrc")==0);
514			M("Passed getfilestem test 3\n");
515
516			ospath_free(fp1);
517			FREE(s1);
518
519			fp1 = ospath_new("~/src/ascend-0.9.5-1.jdpipe.src.rpm");
520			D(fp1);
521			s1 = ospath_getfilestem(fp1);
522			X(s1);
523			CU_TEST(strcmp(s1,"ascend-0.9.5-1.jdpipe.src")==0);
524			M("Passed getfilestem test 4\n");
525
526			ospath_free(fp1);
527			FREE(s1);
528
529			fp1 = ospath_new("~/dir1/dir2/");
530			D(fp1);
531			s1 = ospath_getfilestem(fp1);
532			X(s1);
533			CU_TEST(NULL==s1);
534			M("Passed getfilestem test 5\n");
535
536			ospath_free(fp1);
537	johnpye	939	if(s1)FREE(s1);
538	johnpye	998	MEMUSED(0);
539			}
540	johnpye	607	//-------------------------------
541
542	johnpye	998	static void test_ospath_getbasefileext(void){
543
544			struct FilePath *fp1;
545			char *s1;
546
547	johnpye	607	fp1 = ospath_new("~/src/ascend-0.9.5-1.jdpipe.src.rpm");
548			D(fp1);
549			s1 = ospath_getfileext(fp1);
550			X(s1);
551			CU_TEST(strcmp(s1,".rpm")==0);
552			M("Passed getbasefileext test\n");
553
554			ospath_free(fp1);
555			FREE(s1);
556
557			fp1 = ospath_new("~/.vimrc");
558			D(fp1);
559			s1 = ospath_getfileext(fp1);
560			X(s1);
561			CU_TEST(s1==NULL);
562			M("Passed getbasefileext test 2\n");
563
564			ospath_free(fp1);
565	johnpye	939	if(s1)FREE(s1);
566	johnpye	607
567			fp1 = ospath_new("./ascend4");
568			D(fp1);
569			s1 = ospath_getfileext(fp1);
570			X(s1);
571			CU_TEST(s1==NULL);
572			M("Passed getbasefileext test 3\n");
573
574			ospath_free(fp1);
575	johnpye	939	if(s1)FREE(s1);
576	johnpye	998	MEMUSED(0);
577			}
578	johnpye	607	//-------------------------------
579
580	johnpye	998	static void test_ospath_getdir(void){
581
582			struct FilePath fp1, fp2, *fp3;
583
584	johnpye	607	fp1 = ospath_new("/home/myfile");
585			fp2 = ospath_getdir(fp1);
586			fp3 = ospath_new("/home");
587			CU_TEST(ospath_cmp(fp2,fp3)==0);
588			M("Passed ospath_getdir test\n");
589
590			ospath_free(fp1);
591			ospath_free(fp2);
592			ospath_free(fp3);
593
594			fp1 = ospath_new("/home/myfile.ext");
595			fp2 = ospath_getdir(fp1);
596			fp3 = ospath_new("/home");
597			CU_TEST(ospath_cmp(fp2,fp3)==0);
598			M("Passed ospath_getdir test 2\n");
599
600			ospath_free(fp1);
601			ospath_free(fp2);
602			ospath_free(fp3);
603
604			fp1 = ospath_new("/home/mydir/");
605			fp2 = ospath_getdir(fp1);
606			fp3 = ospath_new("/home/mydir");
607			CU_TEST(ospath_cmp(fp2,fp3)==0);
608			M("Passed ospath_getdir test 3\n");
609
610			ospath_free(fp1);
611			ospath_free(fp2);
612			ospath_free(fp3);
613	johnpye	998	MEMUSED(0);
614	johnpye	607	}
615
616			/===========================================================================/
617			/* Registration information */
618
619	johnpye	998	#define T(N) {#N, test_ospath_##N }
620	johnpye	607	static CU_TestInfo ospath_test_list[] = {
621	johnpye	998	T(getparent)
622			,T(cleanup)
623			,T(newfromposix)
624			,T(secondcleanup)
625			,T(append)
626			,T(appendupup)
627			,T(up)
628			,T(concat)
629			,T(concatmixedslash)
630			,T(trailingslash)
631			,T(searchpath)
632			,T(searchpath2)
633			,T(basefilename)
634			,T(getfilestem)
635			,T(getbasefileext)
636			,T(getdir)
637			,CU_TEST_INFO_NULL
638	johnpye	607	};
639	johnpye	998	#undef T
640	johnpye	607
641			static CU_SuiteInfo suites[] = {
642			{"test_general_ospath", NULL, NULL, ospath_test_list},
643			CU_SUITE_INFO_NULL
644			};
645
646			/-------------------------------------------------------------------/
647			CU_ErrorCode test_register_general_ospath(void)
648			{
649			return CU_register_suites(suites);
650			}