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

# Content
1 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
17 SV8 * T_SV8
18 bdb_filename BDB_FILENAME
19 db_seq_t DB_SEQ
20
21
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
29 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
40 DB_SEQ
41 $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg);
42
43 DB_ENV
44 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 0);
45
46 DB_TXN
47 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 0);
48
49 DBC
50 SvPTR ($var, $arg, DBC *, BDB::Cursor, 0);
51
52 DB
53 SvPTR ($var, $arg, DB *, BDB::Db, 0);
54
55 DB_SEQUENCE
56 SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 0);
57
58
59 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
71 DB_SEQUENCE_ornull
72 SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 1);
73
74
75 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 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 DBC
100 sv_setref_pv ($arg, "BDB::Cursor", (void *)$var);
101
102 DB
103 sv_setref_pv ($arg, "BDB::Db", (void *)$var);
104
105 DB_SEQUENCE
106 sv_setref_pv ($arg, "BDB::Sequence", (void *)$var);