#pragma once

#include <functional>
#include <string>

#include "types.hh"

class sqlite3;
class sqlite3_stmt;

namespace nix {

/* RAII wrapper to close a SQLite database automatically. */
struct SQLite
{
    sqlite3 * db;
    SQLite() { db = 0; }
    ~SQLite();
    operator sqlite3 * () { return db; }
};

/* RAII wrapper to create and destroy SQLite prepared statements. */
struct SQLiteStmt
{
    sqlite3 * db = 0;
    sqlite3_stmt * stmt = 0;
    SQLiteStmt() { }
    void create(sqlite3 * db, const std::string & s);
    ~SQLiteStmt();
    operator sqlite3_stmt * () { return stmt; }

    /* Helper for binding / executing statements. */
    class Use
    {
        friend struct SQLiteStmt;
    private:
        SQLiteStmt & stmt;
        unsigned int curArg = 1;
        Use(SQLiteStmt & stmt);

    public:

        ~Use();

        /* Bind the next parameter. */
        Use & operator () (const std::string & value, bool notNull = true);
        Use & operator () (int64_t value, bool notNull = true);
        Use & bind(); // null

        int step();

        /* Execute a statement that does not return rows. */
        void exec();

        /* For statements that return 0 or more rows. Returns true iff
           a row is available. */
        bool next();

        std::string getStr(int col);
        int64_t getInt(int col);
    };

    Use use()
    {
        return Use(*this);
    }
};

/* RAII helper that ensures transactions are aborted unless explicitly
   committed. */
struct SQLiteTxn
{
    bool active = false;
    sqlite3 * db;

    SQLiteTxn(sqlite3 * db);

    void commit();

    ~SQLiteTxn();
};


MakeError(SQLiteError, Error);
MakeError(SQLiteBusy, SQLiteError);

[[noreturn]] void throwSQLiteError(sqlite3 * db, const format & f);

/* Convenience function for retrying a SQLite transaction when the
   database is busy. */
template<typename T>
T retrySQLite(std::function<T()> fun)
{
    while (true) {
        try {
            return fun();
        } catch (SQLiteBusy & e) {
        }
    }
}

}
/td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=69961ac3b9db2dbb99abb5c45ff6be3a9c01b5de'>root</a>/<a href='/guix/log/gnu?id=69961ac3b9db2dbb99abb5c45ff6be3a9c01b5de'>gnu</a>/<a href='/guix/log/gnu/packages?id=69961ac3b9db2dbb99abb5c45ff6be3a9c01b5de'>packages</a>/<a href='/guix/log/gnu/packages/dlang.scm?id=69961ac3b9db2dbb99abb5c45ff6be3a9c01b5de'>dlang.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/dlang.scm?id=69961ac3b9db2dbb99abb5c45ff6be3a9c01b5de&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2019-04-10 20:54:05 +0200'>2019-04-10</span></td><td><a href='/guix/commit/gnu/packages/dlang.scm?id=454866c6e37cb8b1fa19d5a8e2e292c422360f30'>gnu: dub: Don't use unstable tarball.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/dlang.scm (dub)[source]: Use GIT-FETCH and
GIT-FILE-NAME.
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2019-04-10 20:54:04 +0200'>2019-04-10</span></td><td><a href='/guix/commit/gnu/packages/dlang.scm?id=36f7fbca137aea4d996f2e8b40d3602b1dc996ae'>gnu: ldc: Don't use unstable tarball.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/dlang.scm (ldc)[source]: Use GIT-FETCH and
GIT-FILE-NAME.
[native-inputs]: Likewise.
[arguments]: Adjust ‘unpack-submodule-sources’ phase accordingly.
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2019-04-10 20:54:04 +0200'>2019-04-10</span></td><td><a href='/guix/commit/gnu/packages/dlang.scm?id=d57748e3674b062e7ca13991c872f447c53838f0'>gnu: ldc@0.17.4: Don't use unstable tarball.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/dlang.scm (ldc-bootstrap)[source]: Use GIT-FETCH and
GIT-FILE-NAME.
[native-inputs]: Likewise.
[arguments]: Adjust ‘unpack-submodule-sources’ phase accordingly.
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2019-03-26 23:13:54 +0100'>2019-03-26</span></td><td><a href='/guix/commit/gnu/packages/dlang.scm?id=68631e037bd79039b5b14150e01f64cd8f81eabb'>gnu: ldc: Use INVOKE.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/dlang.scm (ldc)[arguments]: Use INVOKE.
</span></span></td><td>Ricardo Wurmus</td></tr>
<tr><td><span title='2019-03-26 23:13:54 +0100'>2019-03-26</span></td><td><a href='/guix/commit/gnu/packages/dlang.scm?id=4b81d5c4bc442a12c681586f6c25a4ca0af44056'>gnu: ldc-bootstrap: Use INVOKE.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/dlang.scm (ldc-bootstrap)[arguments]: Use INVOKE and
unconditionally return #T from build phase.
</span></span></td><td>Ricardo Wurmus</td></tr>
<tr><td><span title='2019-02-15 12:12:09 +0100'>2019-02-15</span></td><td><a href='/guix/commit/gnu/packages/dlang.scm?id=d199a4c7b4c4d3320ed59e96a382f4c577630360'>gnu: LLVM, Clang: Update to 7.0.1.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/patches/clang-7.0-libc-search-path.patch: New file.
* gnu/local.mk (dist_patch_DATA): Adjust accordingly.
* gnu/packages/llvm.scm (llvm, clang-runtime, clang): Update to 7.0.1.
(llvm-7.0.1): Remove variable.
(clang-from-llvm)[arguments]: Adjust phase to match Clang 7.
(llvm-6, clang-runtime-6, clang-6): New public variables.
* gnu/packages/dlang.scm (ldc)[native-inputs]: Change LLVM and CLANG to
LLVM-6.0 and CLANG-6.0.
* gnu/packages/gl.scm (mesa)[inputs]: Change from LLVM to LLVM-6.
</span></span></td><td>Marius Bakke</td></tr>