ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/typemap
Revision: 1.10
Committed: Fri Sep 26 02:03:48 2008 UTC (15 years, 7 months ago) by root
Branch: MAIN
CVS Tags: rel-1_801, rel-1_8
Changes since 1.9: +11 -1 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 SV8 * T_SV8
18     bdb_filename BDB_FILENAME
19     db_seq_t DB_SEQ
20    
21     const char * T_PV
22 root 1.5
23 root 1.10 SV_mutable * T_SV_MUTABLE
24 root 1.1
25     INPUT
26    
27 root 1.10 T_SV_MUTABLE
28     ($var) = $arg;
29     if (SvREADONLY ($var))
30     croak (\"argument \\\"%s\\\" is read-only/constant, but %s needs to write results into it\",
31     \"$var\",
32     \"${Package}::$func_name\")
33    
34 root 1.1 T_SV8
35     ($var) = $arg;
36     if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
37 root 1.10 croak (\"argument \\\"%s\\\" must be byte/octet-encoded in %s\",
38     \"$var\",
39     \"${Package}::$func_name\")
40 root 1.2
41 root 1.7 BDB_FILENAME
42 root 1.8 ($var) = get_bdb_filename ($arg);
43 root 1.5
44     DB_SEQ
45     $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg);
46 root 1.3
47 root 1.2 DB_ENV
48 root 1.4 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 0);
49 root 1.2
50     DB_TXN
51 root 1.4 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 0);
52 root 1.2
53 root 1.3 DBC
54 root 1.4 SvPTR ($var, $arg, DBC *, BDB::Cursor, 0);
55 root 1.3
56 root 1.2 DB
57 root 1.4 SvPTR ($var, $arg, DB *, BDB::Db, 0);
58    
59 root 1.5 DB_SEQUENCE
60     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 0);
61    
62 root 1.6
63 root 1.4 DB_ENV_ornull
64     SvPTR ($var, $arg, DB_ENV *, BDB::Env, 1);
65    
66     DB_TXN_ornull
67     SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 1);
68    
69     DBC_ornull
70     SvPTR ($var, $arg, DBC *, BDB::Cursor, 1);
71    
72     DB_ornull
73     SvPTR ($var, $arg, DB *, BDB::Db, 1);
74 root 1.2
75 root 1.5 DB_SEQUENCE_ornull
76     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 1);
77    
78    
79 root 1.6 DB_ENV_ornuked
80     SvPTR ($var, $arg, DB_ENV *, BDB::Env, 2);
81    
82     DB_TXN_ornuked
83     SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 2);
84    
85     DBC_ornuked
86     SvPTR ($var, $arg, DBC *, BDB::Cursor, 2);
87    
88     DB_ornuked
89     SvPTR ($var, $arg, DB *, BDB::Db, 2);
90    
91     DB_SEQUENCE_ornuked
92     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 2);
93    
94    
95 root 1.2 OUTPUT
96    
97     DB_ENV
98     sv_setref_pv ($arg, "BDB::Env", (void *)$var);
99    
100     DB_TXN
101     sv_setref_pv ($arg, "BDB::Txn", (void *)$var);
102    
103 root 1.3 DBC
104     sv_setref_pv ($arg, "BDB::Cursor", (void *)$var);
105    
106 root 1.2 DB
107     sv_setref_pv ($arg, "BDB::Db", (void *)$var);
108 root 1.5
109     DB_SEQUENCE
110     sv_setref_pv ($arg, "BDB::Sequence", (void *)$var);