ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/typemap
Revision: 1.11
Committed: Mon Oct 20 02:31:51 2008 UTC (15 years, 7 months ago) by root
Branch: MAIN
CVS Tags: rel-1_82, rel-1_83, rel-1_81, rel-1_84
Changes since 1.10: +1 -5 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.9 bdb_filename BDB_FILENAME
18     db_seq_t DB_SEQ
19    
20     const char * T_PV
21 root 1.5
22 root 1.10 SV_mutable * T_SV_MUTABLE
23 root 1.1
24     INPUT
25    
26 root 1.10 T_SV_MUTABLE
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 root 1.11 \"${Package}::$func_name\");
32 root 1.1 if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
33 root 1.10 croak (\"argument \\\"%s\\\" must be byte/octet-encoded in %s\",
34     \"$var\",
35     \"${Package}::$func_name\")
36 root 1.2
37 root 1.7 BDB_FILENAME
38 root 1.8 ($var) = get_bdb_filename ($arg);
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);