# https://fallabs.com/kyotocabinet/api/

use Inline CPP => config => inc  => '-I/usr/local/include';
use Inline CPP => config => libs => '-L/usr/local/lib -lkyotocabinet';
use Inline CPP => <<'EOCPP';

#undef do_open
#undef do_close

#include <string.h>
#include <kcpolydb.h>

using namespace std;
using namespace kyotocabinet;

PolyDB db;
DB::Cursor *cur;

// open the database
int open_db(char* file) {
    if (!db.open(file, PolyDB::OREADER | PolyDB::ONOLOCK)) return 0;
    cur = db.cursor();
    return 1;
}

// close the database
int close_db() {
    if (cur) delete cur;
    if (!db.close()) return 0;
    return 1;
}

// search records containing substring
SV * search_db(char* substr) {
    AV *ret = newAV();
    string ckey, cvalue;

    cur->jump();
    while (cur->get(&ckey, &cvalue, true)) {
        if (strstr(cvalue.c_str(), substr) != NULL) {
            av_push(ret, newSVpvn(ckey.c_str(), ckey.length()));
        }
    }

    return newRV_noinc((SV *) ret);
}

EOCPP