#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) {
        }
    }
}

}
r></table>
<div class='path'>path: <a href='/guix/log/?id=0945e43bf71986f94b3ac2c77c9d434b28c2bb89'>root</a>/<a href='/guix/log/gnu?id=0945e43bf71986f94b3ac2c77c9d434b28c2bb89'>gnu</a>/<a href='/guix/log/gnu/packages?id=0945e43bf71986f94b3ac2c77c9d434b28c2bb89'>packages</a>/<a href='/guix/log/gnu/packages/gawk.scm?id=0945e43bf71986f94b3ac2c77c9d434b28c2bb89'>gawk.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/gawk.scm?id=0945e43bf71986f94b3ac2c77c9d434b28c2bb89&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2021-12-26 00:58:28 +0100'>2021-12-26</span></td><td><a href='/guix/commit/gnu/packages/gawk.scm?id=577367de8bc2d78ae50b2fcc592a73db534aa0ca'>gnu: Add mawk.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/gawk.scm (mawk): New public variable.
</span></span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2021-12-13 17:48:25 +0100'>2021-12-13</span></td><td><a href='/guix/commit/gnu/packages/gawk.scm?id=8394619baceb118df92e355377fd543bb1aa501a'>gnu: Simplify package inputs.</a><span class='msg-avail'>...<span class='msg-tooltip'>This commit was obtained by running:

  ./pre-inst-env guix style

without any additional argument.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-11-11 12:18:20 -0500'>2021-11-11</span></td><td><a href='/guix/commit/gnu/packages/gawk.scm?id=daf54a3953e807d46c4c21bbc709879c6e8d31e8'>gnu: gawk: Use regular bash to cope with test suite failures.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://issues.guix.gnu.org/51286&gt;.

* gnu/packages/gawk.scm (gawk): Remove trailing #t.
[inputs]: Always use bash.
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2021-05-09 23:43:31 +0200'>2021-05-09</span></td><td><a href='/guix/commit/gnu/packages/gawk.scm?id=4e47b77533878bc8ded887bbe9c4ea7a3e0b03c0'>gnu: bash: Update to 5.1.8.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/bash.scm (patch-url): Adjust for 5.1.
(%patch-series-5.0): Rename to ...
(%patch-series-5.1): Add the 5.1 patches.
(bash): Update to 5.1 and and adjust for renamed variable.
* gnu/packages/gawk.scm (gawk)[arguments]: Adjust test that fails with the new
Bash.
</span></span></td><td>Marius Bakke</td></tr>
<tr><td><span title='2020-09-20 12:44:29 +0200'>2020-09-20</span></td><td><a href='/guix/commit/gnu/packages/gawk.scm?id=32e5ffaa7860a4c929ea6778f9efc7171216460d'>gnu: gawk: Update to 5.1.0.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/gawk.scm (gawk): Update to 5.1.0.
</span></span></td><td>Ludovic Courtès</td></tr>