ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/typemap
Revision: 1.5
Committed: Sun Feb 11 22:07:23 2007 UTC (17 years, 3 months ago) by root
Branch: MAIN
CVS Tags: rel-0_1, rel-0_5, rel-1_4, rel-1_0, rel-1_3, rel-1_2, rel-1_42, rel-1_41
Changes since 1.4: +19 -1 lines
Log Message:
*** empty log message ***

File Contents

# User Rev Content
1 root 1.2 DB_ENV * DB_ENV
2 root 1.4 DB_ENV_ornull * DB_ENV_ornull
3 root 1.2 DB_TXN * DB_TXN
4 root 1.4 DB_TXN_ornull * DB_TXN_ornull
5 root 1.2 DB * DB
6 root 1.4 DB_ornull * DB_ornull
7 root 1.3 DBC * DBC
8 root 1.4 DBC_ornull * DBC_ornull
9 root 1.5 DB_SEQUENCE * DB_SEQUENCE
10     DB_SEQUENCE_ornull * DB_SEQUENCE_ornull
11    
12 root 1.1 SV8 * T_SV8
13 root 1.3 octetstring OCTETS
14 root 1.5 db_seq_t DB_SEQ
15    
16 root 1.1
17     INPUT
18    
19     T_SV8
20     ($var) = $arg;
21     if (SvPOKp ($var) && !sv_utf8_downgrade ($var, 1))
22     croak (\"\\\"%s\\\" argument must be byte/octet-encoded\", \"$var\")
23 root 1.2
24 root 1.3 OCTETS
25 root 1.5 $var = SvOK ($arg) ? SvPVbyte_nolen ($arg) : 0;
26    
27     DB_SEQ
28     $var = sizeof (IV) > 4 ? SvIV ($arg) : SvNV ($arg);
29 root 1.3
30 root 1.2 DB_ENV
31 root 1.4 SvPTR ($var, $arg, DB_ENV *, BDB::Env, 0);
32 root 1.2
33     DB_TXN
34 root 1.4 SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 0);
35 root 1.2
36 root 1.3 DBC
37 root 1.4 SvPTR ($var, $arg, DBC *, BDB::Cursor, 0);
38 root 1.3
39 root 1.2 DB
40 root 1.4 SvPTR ($var, $arg, DB *, BDB::Db, 0);
41    
42 root 1.5 DB_SEQUENCE
43     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 0);
44    
45 root 1.4 DB_ENV_ornull
46     SvPTR ($var, $arg, DB_ENV *, BDB::Env, 1);
47    
48     DB_TXN_ornull
49     SvPTR ($var, $arg, DB_TXN *, BDB::Txn, 1);
50    
51     DBC_ornull
52     SvPTR ($var, $arg, DBC *, BDB::Cursor, 1);
53    
54     DB_ornull
55     SvPTR ($var, $arg, DB *, BDB::Db, 1);
56 root 1.2
57 root 1.5 DB_SEQUENCE_ornull
58     SvPTR ($var, $arg, DB_SEQUENCE *, BDB::Sequence, 1);
59    
60    
61 root 1.2 OUTPUT
62    
63     DB_ENV
64     sv_setref_pv ($arg, "BDB::Env", (void *)$var);
65    
66     DB_TXN
67     sv_setref_pv ($arg, "BDB::Txn", (void *)$var);
68    
69 root 1.3 DBC
70     sv_setref_pv ($arg, "BDB::Cursor", (void *)$var);
71    
72 root 1.2 DB
73     sv_setref_pv ($arg, "BDB::Db", (void *)$var);
74 root 1.5
75     DB_SEQUENCE
76     sv_setref_pv ($arg, "BDB::Sequence", (void *)$var);