| 1 | DB_ENV * DB_ENV |
1 | DB_ENV * DB_ENV |
|
|
2 | DB_ENV_ornull * DB_ENV_ornull |
|
|
3 | DB_ENV_ornuked * DB_ENV_ornuked |
| 2 | DB_TXN * DB_TXN |
4 | DB_TXN * DB_TXN |
|
|
5 | DB_TXN_ornull * DB_TXN_ornull |
|
|
6 | DB_TXN_ornuked * DB_TXN_ornuked |
| 3 | DB * DB |
7 | DB * DB |
| 4 | SV8 * T_SV8 |
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 | bdb_filename BDB_FILENAME |
|
|
18 | db_seq_t DB_SEQ |
|
|
19 | |
|
|
20 | const char * T_PV |
|
|
21 | |
|
|
22 | SV_mutable * T_SV_MUTABLE |
| 5 | |
23 | |
| 6 | INPUT |
24 | INPUT |
| 7 | |
25 | |
| 8 | T_SV8 |
26 | T_SV_MUTABLE |
| 9 | ($var) = $arg; |
27 | ($var) = $arg; |
|
|
28 | if (SvREADONLY ($var)) |
|
|
29 | croak (\"argument \\\"%s\\\" is read-only/constant, but %s needs to write results into it\", |
|
|
30 | \"$var\", |
|
|
31 | \"${Package}::$func_name\"); |
| 10 | if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1)) |
32 | if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1)) |
| 11 | croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\") |
33 | croak (\"argument \\\"%s\\\" must be byte/octet-encoded in %s\", |
|
|
34 | \"$var\", |
|
|
35 | \"${Package}::$func_name\") |
|
|
36 | |
|
|
37 | BDB_FILENAME |
|
|
38 | ($var) = get_bdb_filename ($arg); |
|
|
39 | |
|
|
40 | DB_SEQ |
|
|
41 | $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg); |
| 12 | |
42 | |
| 13 | DB_ENV |
43 | DB_ENV |
| 14 | SvPTR ($var, $arg, DB_ENV *, BDB::Env); |
44 | SvPTR ($var, $arg, DB_ENV *, bdb_env_stash, BDB::Env, 0); |
| 15 | |
45 | |
| 16 | DB_TXN |
46 | DB_TXN |
| 17 | SvPTR ($var, $arg, DB_TXN *, BDB::Txn); |
47 | SvPTR ($var, $arg, DB_TXN *, bdb_txn_stash, BDB::Txn, 0); |
|
|
48 | |
|
|
49 | DBC |
|
|
50 | SvPTR ($var, $arg, DBC *, bdb_cursor_stash, BDB::Cursor, 0); |
| 18 | |
51 | |
| 19 | DB |
52 | DB |
| 20 | SvPTR ($var, $arg, DB *, BDB::Db); |
53 | SvPTR ($var, $arg, DB *, bdb_db_stash, BDB::Db, 0); |
|
|
54 | |
|
|
55 | DB_SEQUENCE |
|
|
56 | SvPTR ($var, $arg, DB_SEQUENCE *, bdb_sequence_stash, BDB::Sequence, 0); |
|
|
57 | |
|
|
58 | |
|
|
59 | DB_ENV_ornull |
|
|
60 | SvPTR ($var, $arg, DB_ENV *, bdb_env_stash, BDB::Env, 1); |
|
|
61 | |
|
|
62 | DB_TXN_ornull |
|
|
63 | SvPTR ($var, $arg, DB_TXN *, bdb_txn_stash, BDB::Txn, 1); |
|
|
64 | |
|
|
65 | DBC_ornull |
|
|
66 | SvPTR ($var, $arg, DBC *, bdb_cursor_stash, BDB::Cursor, 1); |
|
|
67 | |
|
|
68 | DB_ornull |
|
|
69 | SvPTR ($var, $arg, DB *, bdb_db_stash, BDB::Db, 1); |
|
|
70 | |
|
|
71 | DB_SEQUENCE_ornull |
|
|
72 | SvPTR ($var, $arg, DB_SEQUENCE *, bdb_sequence_stash, BDB::Sequence, 1); |
|
|
73 | |
|
|
74 | |
|
|
75 | DB_ENV_ornuked |
|
|
76 | SvPTR ($var, $arg, DB_ENV *, bdb_env_stash, BDB::Env, 2); |
|
|
77 | |
|
|
78 | DB_TXN_ornuked |
|
|
79 | SvPTR ($var, $arg, DB_TXN *, bdb_txn_stash, BDB::Txn, 2); |
|
|
80 | |
|
|
81 | DBC_ornuked |
|
|
82 | SvPTR ($var, $arg, DBC *, bdb_cursor_stash, BDB::Cursor, 2); |
|
|
83 | |
|
|
84 | DB_ornuked |
|
|
85 | SvPTR ($var, $arg, DB *, bdb_db_stash, BDB::Db, 2); |
|
|
86 | |
|
|
87 | DB_SEQUENCE_ornuked |
|
|
88 | SvPTR ($var, $arg, DB_SEQUENCE *, bdb_sequence_stash, BDB::Sequence, 2); |
|
|
89 | |
| 21 | |
90 | |
| 22 | OUTPUT |
91 | OUTPUT |
| 23 | |
92 | |
| 24 | DB_ENV |
93 | DB_ENV |
| 25 | sv_setref_pv ($arg, "BDB::Env", (void *)$var); |
94 | $arg = newSVptr ($var, bdb_env_stash); |
| 26 | |
95 | |
| 27 | DB_TXN |
96 | DB_TXN |
| 28 | sv_setref_pv ($arg, "BDB::Txn", (void *)$var); |
97 | $arg = newSVptr ($var, bdb_txn_stash); |
|
|
98 | |
|
|
99 | DBC |
|
|
100 | $arg = newSVptr ($var, bdb_cursor_stash); |
| 29 | |
101 | |
| 30 | DB |
102 | DB |
| 31 | sv_setref_pv ($arg, "BDB::Db", (void *)$var); |
103 | $arg = newSVptr ($var, bdb_db_stash); |
|
|
104 | |
|
|
105 | DB_SEQUENCE |
|
|
106 | $arg = newSVptr ($var, bdb_sequence_stash); |
|
|
107 | |
