ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/typemap
Revision: 1.7
Committed: Sun Mar 30 04:57:56 2008 UTC (16 years, 1 month ago) by root
Branch: MAIN
Changes since 1.6: +11 -3 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.6 DB_ENV * DB_ENV
2     DB_ENV_ornull * DB_ENV_ornull
3     DB_ENV_ornuked * DB_ENV_ornuked
4     DB_TXN * DB_TXN
5     DB_TXN_ornull * DB_TXN_ornull
6     DB_TXN_ornuked * DB_TXN_ornuked
7     DB * DB
8     DB_ornull * DB_ornull
9     DB_ornuked * DB_ornuked
10     DBC * DBC
11     DBC_ornull * DBC_ornull
12     DBC_ornuked * DBC_ornuked
13     DB_SEQUENCE * DB_SEQUENCE
14     DB_SEQUENCE_ornull * DB_SEQUENCE_ornull
15     DB_SEQUENCE_ornuked * DB_SEQUENCE_ornuked
16 root 1.5
17 root 1.1 SV8 * T_SV8
18 root 1.7 bdb_filename BDB_FILENAME
19 root 1.5 db_seq_t DB_SEQ
20    
21 root 1.1
22     INPUT
23    
24     T_SV8
25     ($var) = $arg;
26     if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
27     croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")
28 root 1.2
29 root 1.7 BDB_FILENAME
30     ($var) = !SvOK ($arg)
31     ? 0
32     :
33     #if WIN32
34     SvPVutf8_nolen ($arg)
35     #else
36     SvPVbyte_nolen ($arg)
37     #endif
38     ;
39 root 1.5
40     DB_SEQ
41     $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg);
42 root 1.3
43 root 1.2 DB_ENV
44 root 1.4 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 0);
45 root 1.2
46     DB_TXN
47 root 1.4 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 0);
48 root 1.2
49 root 1.3 DBC
50 root 1.4 SvPTR ($var, $arg, DBC *, BDB::Cursor, 0);
51 root 1.3
52 root 1.2 DB
53 root 1.4 SvPTR ($var, $arg, DB *, BDB::Db, 0);
54    
55 root 1.5 DB_SEQUENCE
56     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 0);
57    
58 root 1.6
59 root 1.4 DB_ENV_ornull
60     SvPTR ($var, $arg, DB_ENV *, BDB::Env, 1);
61    
62     DB_TXN_ornull
63     SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 1);
64    
65     DBC_ornull
66     SvPTR ($var, $arg, DBC *, BDB::Cursor, 1);
67    
68     DB_ornull
69     SvPTR ($var, $arg, DB *, BDB::Db, 1);
70 root 1.2
71 root 1.5 DB_SEQUENCE_ornull
72     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 1);
73    
74    
75 root 1.6 DB_ENV_ornuked
76     SvPTR ($var, $arg, DB_ENV *, BDB::Env, 2);
77    
78     DB_TXN_ornuked
79     SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 2);
80    
81     DBC_ornuked
82     SvPTR ($var, $arg, DBC *, BDB::Cursor, 2);
83    
84     DB_ornuked
85     SvPTR ($var, $arg, DB *, BDB::Db, 2);
86    
87     DB_SEQUENCE_ornuked
88     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 2);
89    
90    
91 root 1.2 OUTPUT
92    
93     DB_ENV
94     sv_setref_pv ($arg, "BDB::Env", (void *)$var);
95    
96     DB_TXN
97     sv_setref_pv ($arg, "BDB::Txn", (void *)$var);
98    
99 root 1.3 DBC
100     sv_setref_pv ($arg, "BDB::Cursor", (void *)$var);
101    
102 root 1.2 DB
103     sv_setref_pv ($arg, "BDB::Db", (void *)$var);
104 root 1.5
105     DB_SEQUENCE
106     sv_setref_pv ($arg, "BDB::Sequence", (void *)$var);