| … | |
… | |
| 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) |
