… | |
… | |
326 | dbt_to_sv (req->sv1, &req->dbt1); |
326 | dbt_to_sv (req->sv1, &req->dbt1); |
327 | dbt_to_sv (req->sv2, &req->dbt2); |
327 | dbt_to_sv (req->sv2, &req->dbt2); |
328 | dbt_to_sv (req->sv3, &req->dbt3); |
328 | dbt_to_sv (req->sv3, &req->dbt3); |
329 | break; |
329 | break; |
330 | |
330 | |
|
|
331 | case REQ_DB_PUT: |
|
|
332 | case REQ_C_PUT: |
|
|
333 | dbt_to_sv (0, &req->dbt1); |
|
|
334 | dbt_to_sv (0, &req->dbt2); |
|
|
335 | break; |
|
|
336 | |
331 | case REQ_DB_KEY_RANGE: |
337 | case REQ_DB_KEY_RANGE: |
332 | { |
338 | { |
333 | AV *av = newAV (); |
339 | AV *av = newAV (); |
334 | |
340 | |
335 | av_push (av, newSVnv (req->key_range.less)); |
341 | av_push (av, newSVnv (req->key_range.less)); |
… | |
… | |
344 | |
350 | |
345 | case REQ_SEQ_GET: |
351 | case REQ_SEQ_GET: |
346 | SvREADONLY_off (req->sv1); |
352 | SvREADONLY_off (req->sv1); |
347 | |
353 | |
348 | if (sizeof (IV) > 4) |
354 | if (sizeof (IV) > 4) |
349 | sv_setiv_mg (req->sv1, req->seq_t); |
355 | sv_setiv_mg (req->sv1, (IV)req->seq_t); |
350 | else |
356 | else |
351 | sv_setnv_mg (req->sv1, req->seq_t); |
357 | sv_setnv_mg (req->sv1, (NV)req->seq_t); |
352 | |
358 | |
353 | SvREFCNT_dec (req->sv1); |
359 | SvREFCNT_dec (req->sv1); |
354 | break; |
360 | break; |
355 | } |
361 | } |
356 | |
362 | |
… | |
… | |
381 | #endif |
387 | #endif |
382 | |
388 | |
383 | static void |
389 | static void |
384 | create_respipe () |
390 | create_respipe () |
385 | { |
391 | { |
|
|
392 | #ifdef _WIN32 |
|
|
393 | int arg; /* argg */ |
|
|
394 | #endif |
386 | int old_readfd = respipe [0]; |
395 | int old_readfd = respipe [0]; |
387 | |
396 | |
388 | if (respipe [1] >= 0) |
397 | if (respipe [1] >= 0) |
389 | respipe_close (TO_SOCKET (respipe [1])); |
398 | respipe_close (TO_SOCKET (respipe [1])); |
390 | |
399 | |
… | |
… | |
403 | respipe_close (respipe [0]); |
412 | respipe_close (respipe [0]); |
404 | respipe [0] = old_readfd; |
413 | respipe [0] = old_readfd; |
405 | } |
414 | } |
406 | |
415 | |
407 | #ifdef _WIN32 |
416 | #ifdef _WIN32 |
408 | int arg = 1; |
417 | arg = 1; |
409 | if (ioctlsocket (TO_SOCKET (respipe [0]), FIONBIO, &arg) |
418 | if (ioctlsocket (TO_SOCKET (respipe [0]), FIONBIO, &arg) |
410 | || ioctlsocket (TO_SOCKET (respipe [1]), FIONBIO, &arg)) |
419 | || ioctlsocket (TO_SOCKET (respipe [1]), FIONBIO, &arg)) |
411 | #else |
420 | #else |
412 | if (fcntl (respipe [0], F_SETFL, O_NONBLOCK) |
421 | if (fcntl (respipe [0], F_SETFL, O_NONBLOCK) |
413 | || fcntl (respipe [1], F_SETFL, O_NONBLOCK)) |
422 | || fcntl (respipe [1], F_SETFL, O_NONBLOCK)) |
… | |
… | |
1810 | CODE: |
1819 | CODE: |
1811 | RETVAL = env->set_lg_max (env, max); |
1820 | RETVAL = env->set_lg_max (env, max); |
1812 | OUTPUT: |
1821 | OUTPUT: |
1813 | RETVAL |
1822 | RETVAL |
1814 | |
1823 | |
|
|
1824 | int mutex_set_max (DB_ENV *env, U32 max) |
|
|
1825 | CODE: |
|
|
1826 | RETVAL = env->mutex_set_max (env, max); |
|
|
1827 | OUTPUT: |
|
|
1828 | RETVAL |
|
|
1829 | |
|
|
1830 | int mutex_set_increment (DB_ENV *env, U32 increment) |
|
|
1831 | CODE: |
|
|
1832 | RETVAL = env->mutex_set_increment (env, increment); |
|
|
1833 | OUTPUT: |
|
|
1834 | RETVAL |
|
|
1835 | |
|
|
1836 | int mutex_set_tas_spins (DB_ENV *env, U32 tas_spins) |
|
|
1837 | CODE: |
|
|
1838 | RETVAL = env->mutex_set_tas_spins (env, tas_spins); |
|
|
1839 | OUTPUT: |
|
|
1840 | RETVAL |
|
|
1841 | |
|
|
1842 | int mutex_set_align (DB_ENV *env, U32 align) |
|
|
1843 | CODE: |
|
|
1844 | RETVAL = env->mutex_set_align (env, align); |
|
|
1845 | OUTPUT: |
|
|
1846 | RETVAL |
|
|
1847 | |
1815 | DB_TXN * |
1848 | DB_TXN * |
1816 | txn_begin (DB_ENV *env, DB_TXN_ornull *parent = 0, U32 flags = 0) |
1849 | txn_begin (DB_ENV *env, DB_TXN_ornull *parent = 0, U32 flags = 0) |
1817 | CODE: |
1850 | CODE: |
1818 | errno = env->txn_begin (env, parent, &RETVAL, flags); |
1851 | errno = env->txn_begin (env, parent, &RETVAL, flags); |
1819 | if (errno) |
1852 | if (errno) |