Skip to content
Projects
Groups
Snippets
Help
Loading...
Sign in / Register
Toggle navigation
O
opencv
Project
Project
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Packages
Packages
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
submodule
opencv
Commits
cf669425
Commit
cf669425
authored
Mar 13, 2013
by
marina.kolpakova
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
enable training test. refactor globbing
parent
9f3ce0dd
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
13 additions
and
186 deletions
+13
-186
dataset.cpp
apps/sft/dataset.cpp
+7
-91
test_training.cpp
modules/softcascade/test/test_training.cpp
+6
-95
No files found.
apps/sft/dataset.cpp
View file @
cf669425
...
...
@@ -46,116 +46,32 @@
#include <iostream>
#include <queue>
inline
std
::
string
itoa
(
long
i
)
{
return
cv
::
format
(
"%ld"
,
i
);
}
#if !defined (_WIN32) && ! defined(__MINGW32__)
# include <glob.h>
namespace
{
using
namespace
sft
;
void
glob
(
const
string
&
path
,
svector
&
ret
)
{
glob_t
glob_result
;
glob
(
path
.
c_str
(),
GLOB_TILDE
,
0
,
&
glob_result
);
ret
.
clear
();
ret
.
reserve
(
glob_result
.
gl_pathc
);
for
(
unsigned
int
i
=
0
;
i
<
glob_result
.
gl_pathc
;
++
i
)
{
ret
.
push_back
(
std
::
string
(
glob_result
.
gl_pathv
[
i
]));
dprintf
(
"%s
\n
"
,
ret
[
i
].
c_str
());
}
globfree
(
&
glob_result
);
}
}
#else
# include <windows.h>
namespace
{
using
namespace
sft
;
void
glob
(
const
string
&
refRoot
,
const
string
&
refExt
,
svector
&
refvecFiles
)
{
std
::
string
strFilePath
;
// File path
std
::
string
strExtension
;
// Extension
std
::
string
strPattern
=
refRoot
+
"
\\
*.*"
;
WIN32_FIND_DATA
FileInformation
;
// File information
HANDLE
hFile
=
::
FindFirstFile
(
strPattern
.
c_str
(),
&
FileInformation
);
if
(
hFile
==
INVALID_HANDLE_VALUE
)
CV_Error
(
CV_StsBadArg
,
"Your dataset search path is incorrect"
);
do
{
if
(
FileInformation
.
cFileName
[
0
]
!=
'.'
)
{
strFilePath
.
erase
();
strFilePath
=
refRoot
+
"
\\
"
+
FileInformation
.
cFileName
;
if
(
!
(
FileInformation
.
dwFileAttributes
&
FILE_ATTRIBUTE_DIRECTORY
)
)
{
// Check extension
strExtension
=
FileInformation
.
cFileName
;
strExtension
=
strExtension
.
substr
(
strExtension
.
rfind
(
"."
)
+
1
);
if
(
strExtension
==
refExt
)
// Save filename
refvecFiles
.
push_back
(
strFilePath
);
}
}
}
while
(
::
FindNextFile
(
hFile
,
&
FileInformation
)
==
TRUE
);
// Close handle
::
FindClose
(
hFile
);
DWORD
dwError
=
::
GetLastError
();
if
(
dwError
!=
ERROR_NO_MORE_FILES
)
CV_Error
(
CV_StsBadArg
,
"Your dataset search path is incorrect"
);
}
}
#endif
// in the default case data folders should be aligned as following:
// 1. positives: <train or test path>/octave_<octave number>/pos/*.png
// 2. negatives: <train or test path>/octave_<octave number>/neg/*.png
ScaledDataset
::
ScaledDataset
(
const
string
&
path
,
const
int
oct
)
sft
::
ScaledDataset
::
ScaledDataset
(
const
string
&
path
,
const
int
oct
)
{
dprintf
(
"%s
\n
"
,
"get dataset file names..."
);
dprintf
(
"%s
\n
"
,
"Positives globing..."
);
#if !defined (_WIN32) && ! defined(__MINGW32__)
glob
(
path
+
"/pos/octave_"
+
itoa
(
oct
)
+
"/*.png"
,
pos
);
#else
glob
(
path
+
"/pos/octave_"
+
itoa
(
oct
),
"png"
,
pos
);
#endif
cv
::
glob
(
path
+
"/pos/octave_"
+
cv
::
format
(
"%d"
,
oct
)
+
"/*.png"
,
pos
);
dprintf
(
"%s
\n
"
,
"Negatives globing..."
);
#if !defined (_WIN32) && ! defined(__MINGW32__)
glob
(
path
+
"/neg/octave_"
+
itoa
(
oct
)
+
"/*.png"
,
neg
);
#else
glob
(
path
+
"/neg/octave_"
+
itoa
(
oct
),
"png"
,
neg
);
#endif
cv
::
glob
(
path
+
"/neg/octave_"
+
cv
::
format
(
"%d"
,
oct
)
+
"/*.png"
,
neg
);
// Check: files not empty
CV_Assert
(
pos
.
size
()
!=
size_t
(
0
));
CV_Assert
(
neg
.
size
()
!=
size_t
(
0
));
}
cv
::
Mat
ScaledDataset
::
get
(
SampleType
type
,
int
idx
)
const
cv
::
Mat
sft
::
ScaledDataset
::
get
(
SampleType
type
,
int
idx
)
const
{
const
std
::
string
&
src
=
(
type
==
POSITIVE
)
?
pos
[
idx
]
:
neg
[
idx
];
return
cv
::
imread
(
src
);
}
int
ScaledDataset
::
available
(
SampleType
type
)
const
int
sft
::
ScaledDataset
::
available
(
SampleType
type
)
const
{
return
(
int
)((
type
==
POSITIVE
)
?
pos
.
size
()
:
neg
.
size
());
}
ScaledDataset
::~
ScaledDataset
(){}
\ No newline at end of file
sft
::
ScaledDataset
::~
ScaledDataset
(){}
\ No newline at end of file
modules/softcascade/test/test_training.cpp
View file @
cf669425
...
...
@@ -46,13 +46,6 @@
#include <fstream>
#include <vector>
#include "test_precomp.hpp"
#if !defined (_WIN32) && ! defined(__MINGW32__)
# include <glob.h>
#else
# include <windows.h>
#endif
using
namespace
std
;
namespace
{
...
...
@@ -74,92 +67,10 @@ private:
svector
neg
;
};
string
itoa
(
long
i
)
{
char
s
[
65
];
sprintf
(
s
,
"%ld"
,
i
);
return
std
::
string
(
s
);
}
#if !defined (_WIN32) && ! defined(__MINGW32__)
void
glob
(
const
string
&
path
,
svector
&
ret
)
{
glob_t
glob_result
;
glob
(
path
.
c_str
(),
GLOB_TILDE
,
0
,
&
glob_result
);
ret
.
clear
();
ret
.
reserve
(
glob_result
.
gl_pathc
);
for
(
unsigned
int
i
=
0
;
i
<
glob_result
.
gl_pathc
;
++
i
)
{
ret
.
push_back
(
std
::
string
(
glob_result
.
gl_pathv
[
i
]));
}
globfree
(
&
glob_result
);
}
#else
void
glob
(
const
string
&
refRoot
,
const
string
&
refExt
,
svector
&
refvecFiles
)
{
std
::
string
strFilePath
;
// File path
std
::
string
strExtension
;
// Extension
std
::
string
strPattern
=
refRoot
+
"
\\
*.*"
;
WIN32_FIND_DATA
FileInformation
;
// File information
HANDLE
hFile
=
::
FindFirstFile
(
strPattern
.
c_str
(),
&
FileInformation
);
if
(
hFile
==
INVALID_HANDLE_VALUE
)
CV_Error
(
CV_StsBadArg
,
"Your dataset search path is incorrect"
);
do
{
if
(
FileInformation
.
cFileName
[
0
]
!=
'.'
)
{
strFilePath
.
erase
();
strFilePath
=
refRoot
+
"
\\
"
+
FileInformation
.
cFileName
;
if
(
!
(
FileInformation
.
dwFileAttributes
&
FILE_ATTRIBUTE_DIRECTORY
)
)
{
// Check extension
strExtension
=
FileInformation
.
cFileName
;
strExtension
=
strExtension
.
substr
(
strExtension
.
rfind
(
"."
)
+
1
);
if
(
strExtension
==
refExt
)
// Save filename
refvecFiles
.
push_back
(
strFilePath
);
}
}
}
while
(
::
FindNextFile
(
hFile
,
&
FileInformation
)
==
TRUE
);
// Close handle
::
FindClose
(
hFile
);
DWORD
dwError
=
::
GetLastError
();
if
(
dwError
!=
ERROR_NO_MORE_FILES
)
CV_Error
(
CV_StsBadArg
,
"Your dataset search path is incorrect"
);
}
#endif
ScaledDataset
::
ScaledDataset
(
const
string
&
path
,
const
int
oct
)
{
#if !defined (_WIN32) && ! defined(__MINGW32__)
glob
(
path
+
"/pos/octave_"
+
itoa
(
oct
)
+
"/*.png"
,
pos
);
#else
glob
(
path
+
"/pos/octave_"
+
itoa
(
oct
),
"png"
,
pos
);
#endif
#if !defined (_WIN32) && ! defined(__MINGW32__)
glob
(
path
+
"/neg/octave_"
+
itoa
(
oct
)
+
"/*.png"
,
neg
);
#else
glob
(
path
+
"/neg/octave_"
+
itoa
(
oct
),
"png"
,
neg
);
#endif
cv
::
glob
(
path
+
cv
::
format
(
"/octave_%d/*.png"
,
oct
),
pos
);
cv
::
glob
(
path
+
"/*.png"
,
neg
);
// Check: files not empty
CV_Assert
(
pos
.
size
()
!=
size_t
(
0
));
...
...
@@ -181,7 +92,7 @@ ScaledDataset::~ScaledDataset(){}
}
TEST
(
DISABLED_
SoftCascade
,
training
)
TEST
(
SoftCascade
,
training
)
{
// // 2. check and open output file
string
outXmlPath
=
cv
::
tempfile
(
".xml"
);
...
...
@@ -214,8 +125,8 @@ TEST(DISABLED_SoftCascade, training)
cv
::
Ptr
<
FeaturePool
>
pool
=
FeaturePool
::
create
(
model
,
nfeatures
,
10
);
nfeatures
=
pool
->
size
();
int
npositives
=
2
0
;
int
nnegatives
=
4
0
;
int
npositives
=
1
0
;
int
nnegatives
=
2
0
;
cv
::
Rect
boundingBox
=
cv
::
Rect
(
cvRound
(
20
*
octave
),
cvRound
(
20
*
octave
),
cvRound
(
64
*
octave
),
cvRound
(
128
*
octave
));
...
...
@@ -223,7 +134,7 @@ TEST(DISABLED_SoftCascade, training)
cv
::
Ptr
<
ChannelFeatureBuilder
>
builder
=
ChannelFeatureBuilder
::
create
(
"HOG6MagLuv"
);
cv
::
Ptr
<
Octave
>
boost
=
Octave
::
create
(
boundingBox
,
npositives
,
nnegatives
,
*
it
,
shrinkage
,
builder
);
std
::
string
path
=
cvtest
::
TS
::
ptr
()
->
get_data_path
()
+
"
softcascade
/sample_training_set"
;
std
::
string
path
=
cvtest
::
TS
::
ptr
()
->
get_data_path
()
+
"
cascadeandhog
/sample_training_set"
;
ScaledDataset
dataset
(
path
,
*
it
);
if
(
boost
->
train
(
&
dataset
,
pool
,
3
,
2
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment