1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
|
#include "imgdb.cpp"
#include "haar.cpp"
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include "const-c.inc"
MODULE = Image::Seek PACKAGE = Image::Seek
PROTOTYPES: DISABLE
INCLUDE: const-xs.inc
PROTOTYPES: ENABLE
void
removeID(id)
long id
void
addImage(id, red, green, blue)
long id
unsigned char* red
unsigned char* green
unsigned char* blue
void
queryImgID(id, numres)
long id
int numres
void
loaddb(filename)
char* filename
void
savedb(filename)
char* filename
void
cleardb()
void
results()
PPCODE:
while(!pqResults.empty()) {
curResult = pqResults.top();
pqResults.pop();
EXTEND(SP, 2);
PUSHs(sv_2mortal(newSViv(curResult.id)));
PUSHs(sv_2mortal(newSVnv(curResult.score)));
}
|
