… | |
… | |
808 | |
808 | |
809 | case REQ_DB_PUT: |
809 | case REQ_DB_PUT: |
810 | req->result = req->db->put (req->db, req->txn, &req->dbt1, &req->dbt2, req->uint1); |
810 | req->result = req->db->put (req->db, req->txn, &req->dbt1, &req->dbt2, req->uint1); |
811 | break; |
811 | break; |
812 | |
812 | |
|
|
813 | #if DB_VERSION_MINOR >= 6 |
813 | case REQ_DB_EXISTS: |
814 | case REQ_DB_EXISTS: |
814 | req->result = req->db->exists (req->db, req->txn, &req->dbt1, req->uint1); |
815 | req->result = req->db->exists (req->db, req->txn, &req->dbt1, req->uint1); |
815 | break; |
816 | break; |
816 | |
817 | #endif |
817 | case REQ_DB_GET: |
818 | case REQ_DB_GET: |
818 | req->result = req->db->get (req->db, req->txn, &req->dbt1, &req->dbt3, req->uint1); |
819 | req->result = req->db->get (req->db, req->txn, &req->dbt1, &req->dbt3, req->uint1); |
819 | break; |
820 | break; |
820 | |
821 | |
821 | case REQ_DB_PGET: |
822 | case REQ_DB_PGET: |
… | |
… | |
1693 | sv_to_dbt (&req->dbt2, data); |
1694 | sv_to_dbt (&req->dbt2, data); |
1694 | req->uint1 = flags; |
1695 | req->uint1 = flags; |
1695 | REQ_SEND; |
1696 | REQ_SEND; |
1696 | } |
1697 | } |
1697 | |
1698 | |
|
|
1699 | #if DB_VERSION_MINOR >= 6 |
|
|
1700 | |
1698 | void |
1701 | void |
1699 | db_exists (DB *db, DB_TXN_ornull *txn, SV *key, U32 flags = 0, SV *callback = 0) |
1702 | db_exists (DB *db, DB_TXN_ornull *txn, SV *key, U32 flags = 0, SV *callback = 0) |
1700 | PREINIT: |
1703 | PREINIT: |
1701 | CALLBACK |
1704 | CALLBACK |
1702 | CODE: |
1705 | CODE: |
… | |
… | |
1706 | req->txn = txn; |
1709 | req->txn = txn; |
1707 | req->uint1 = flags; |
1710 | req->uint1 = flags; |
1708 | sv_to_dbt (&req->dbt1, key); |
1711 | sv_to_dbt (&req->dbt1, key); |
1709 | REQ_SEND; |
1712 | REQ_SEND; |
1710 | } |
1713 | } |
|
|
1714 | |
|
|
1715 | #endif |
1711 | |
1716 | |
1712 | void |
1717 | void |
1713 | db_get (DB *db, DB_TXN_ornull *txn, SV *key, SV *data, U32 flags = 0, SV *callback = 0) |
1718 | db_get (DB *db, DB_TXN_ornull *txn, SV *key, SV *data, U32 flags = 0, SV *callback = 0) |
1714 | PREINIT: |
1719 | PREINIT: |
1715 | CALLBACK |
1720 | CALLBACK |
… | |
… | |
2134 | if (errno) |
2139 | if (errno) |
2135 | croak ("DB_ENV->txn_begin: %s", db_strerror (errno)); |
2140 | croak ("DB_ENV->txn_begin: %s", db_strerror (errno)); |
2136 | OUTPUT: |
2141 | OUTPUT: |
2137 | RETVAL |
2142 | RETVAL |
2138 | |
2143 | |
|
|
2144 | #if DB_VERSION_MINOR >= 5 |
|
|
2145 | |
2139 | DB_TXN * |
2146 | DB_TXN * |
2140 | cdsgroup_begin (DB_ENV *env) |
2147 | cdsgroup_begin (DB_ENV *env) |
2141 | CODE: |
2148 | CODE: |
2142 | errno = env->cdsgroup_begin (env, &RETVAL); |
2149 | errno = env->cdsgroup_begin (env, &RETVAL); |
2143 | if (errno) |
2150 | if (errno) |
2144 | croak ("DB_ENV->cdsgroup_begin: %s", db_strerror (errno)); |
2151 | croak ("DB_ENV->cdsgroup_begin: %s", db_strerror (errno)); |
2145 | OUTPUT: |
2152 | OUTPUT: |
2146 | RETVAL |
2153 | RETVAL |
|
|
2154 | |
|
|
2155 | #endif |
2147 | |
2156 | |
2148 | MODULE = BDB PACKAGE = BDB::Db |
2157 | MODULE = BDB PACKAGE = BDB::Db |
2149 | |
2158 | |
2150 | void |
2159 | void |
2151 | DESTROY (DB_ornuked *db) |
2160 | DESTROY (DB_ornuked *db) |