Update to 2.0.0 tree from current Fremantle build
[opencv] / apps / haartraining / cvcommon.cpp
1 /*M///////////////////////////////////////////////////////////////////////////////////////
2 //
3 //  IMPORTANT: READ BEFORE DOWNLOADING, COPYING, INSTALLING OR USING.
4 //
5 //  By downloading, copying, installing or using the software you agree to this license.
6 //  If you do not agree to this license, do not download, install,
7 //  copy or use the software.
8 //
9 //
10 //                        Intel License Agreement
11 //                For Open Source Computer Vision Library
12 //
13 // Copyright (C) 2000, Intel Corporation, all rights reserved.
14 // Third party copyrights are property of their respective owners.
15 //
16 // Redistribution and use in source and binary forms, with or without modification,
17 // are permitted provided that the following conditions are met:
18 //
19 //   * Redistribution's of source code must retain the above copyright notice,
20 //     this list of conditions and the following disclaimer.
21 //
22 //   * Redistribution's in binary form must reproduce the above copyright notice,
23 //     this list of conditions and the following disclaimer in the documentation
24 //     and/or other materials provided with the distribution.
25 //
26 //   * The name of Intel Corporation may not be used to endorse or promote products
27 //     derived from this software without specific prior written permission.
28 //
29 // This software is provided by the copyright holders and contributors "as is" and
30 // any express or implied warranties, including, but not limited to, the implied
31 // warranties of merchantability and fitness for a particular purpose are disclaimed.
32 // In no event shall the Intel Corporation or contributors be liable for any direct,
33 // indirect, incidental, special, exemplary, or consequential damages
34 // (including, but not limited to, procurement of substitute goods or services;
35 // loss of use, data, or profits; or business interruption) however caused
36 // and on any theory of liability, whether in contract, strict liability,
37 // or tort (including negligence or otherwise) arising in any way out of
38 // the use of this software, even if advised of the possibility of such damage.
39 //
40 //M*/
41
42 #include "_cvcommon.h"
43
44 #include <cstring>
45 #include <ctime>
46
47 #include <sys/stat.h>
48 #include <sys/types.h>
49 #ifdef _WIN32
50 #include <direct.h>
51 #endif /* _WIN32 */
52
53
54 CV_IMPLEMENT_QSORT( icvSort_32f, float, less_than )
55
56 CV_IMPLEMENT_QSORT( icvSort_32s, int, less_than )
57
58 int icvMkDir( const char* filename )
59 {
60     char path[PATH_MAX];
61     char* p;
62     int pos;
63
64 #ifdef _WIN32
65     struct _stat st;
66 #else /* _WIN32 */
67     struct stat st;
68     mode_t mode;
69
70     mode = 0755;
71 #endif /* _WIN32 */
72
73     strcpy( path, filename );
74
75     p = path;
76     for( ; ; )
77     {
78         pos = (int)strcspn( p, "/\\" );
79
80         if( pos == (int) strlen( p ) ) break;
81         if( pos != 0 )
82         {
83             p[pos] = '\0';
84
85 #ifdef _WIN32
86             if( p[pos-1] != ':' )
87             {
88                 if( _stat( path, &st ) != 0 )
89                 {
90                     if( _mkdir( path ) != 0 ) return 0;
91                 }
92             }
93 #else /* _WIN32 */
94             if( stat( path, &st ) != 0 )
95             {
96                 if( mkdir( path, mode ) != 0 ) return 0;
97             }
98 #endif /* _WIN32 */
99         }
100         
101         p[pos] = '/';
102
103         p += pos + 1;
104     }
105
106     return 1;
107 }
108
109 #if 0
110 /* debug functions */
111 void icvSave( const CvArr* ptr, const char* filename, int line )
112 {
113     CvFileStorage* fs;
114     char buf[PATH_MAX];
115     const char* name;
116     
117     name = strrchr( filename, '\\' );
118     if( !name ) name = strrchr( filename, '/' );
119     if( !name ) name = filename;
120     else name++; /* skip '/' or '\\' */
121
122     sprintf( buf, "%s-%d-%d", name, line, time( NULL ) );
123     fs = cvOpenFileStorage( buf, NULL, CV_STORAGE_WRITE_TEXT );
124     if( !fs ) return;
125     cvWrite( fs, "debug", ptr );
126     cvReleaseFileStorage( &fs );
127 }
128 #endif // #if 0
129
130 /* End of file. */