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

}
v class='path'>path: <a href='/guix/log/?id=9fffc12efbe8266a7084d014e2a8d7c4ae00d17e'>root</a>/<a href='/guix/log/gnu?id=9fffc12efbe8266a7084d014e2a8d7c4ae00d17e'>gnu</a>/<a href='/guix/log/gnu/build?id=9fffc12efbe8266a7084d014e2a8d7c4ae00d17e'>build</a>/<a href='/guix/log/gnu/build/image.scm?id=9fffc12efbe8266a7084d014e2a8d7c4ae00d17e'>image.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/build/image.scm?id=9fffc12efbe8266a7084d014e2a8d7c4ae00d17e&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2022-02-07 16:22:37 -0500'>2022-02-07</span></td><td><a href='/guix/commit/gnu/build/image.scm?id=472680a28d83f79935bd526db6ed7ed39cdd9198'>build: image: Account for fixed-size file system structures.</a><span class='msg-avail'>...<span class='msg-tooltip'>Workaround for &lt;https://issues.guix.gnu.org/53194&gt;.

* gnu/build/image.scm (estimate-partition-size): Enforce a 1-MiB minimum.

Signed-off-by: Maxim Cournoyer &lt;maxim.cournoyer@gmail.com&gt;
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2021-12-23 10:53:59 +0100'>2021-12-23</span></td><td><a href='/guix/commit/gnu/build/image.scm?id=cc4e8a84f4d5d8861c9445ec7e4a75b59d50d3db'>build: image: Add optional closure copy support.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/build/image.scm (initialize-root-partition): Add a closure-copy?
argument and honor it.
</span></span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2021-08-15 14:15:37 -0400'>2021-08-15</span></td><td><a href='/guix/commit/gnu/build/image.scm?id=94551439074f804f35970b08435aa02007edfb0b'>Update copyright/name notices for Christine Lemmer-Webber.</a><span class='msg-avail'>...<span class='msg-tooltip'>* doc/guix-cookbook.texi: Update copyright/name for Christine Lemmer-Webber.
* gnu/build/image.scm: Likewise.
* gnu/build/vm.scm: Likewise.
* gnu/packages/admin.scm: Likewise.
* gnu/packages/assembly.scm: Likewise.
* gnu/packages/audio.scm: Likewise.
* gnu/packages/backup.scm: Likewise.
* gnu/packages/check.scm: Likewise.
* gnu/packages/databases.scm: Likewise.
* gnu/packages/emacs-xyz.scm: Likewise.
* gnu/packages/finance.scm: Likewise.
* gnu/packages/gnupg.scm: Likewise.
* gnu/packages/guile-xyz.scm: Likewise.
* gnu/packages/guile.scm: Likewise.
* gnu/packages/haskell-xyz.scm: Likewise.
* gnu/packages/linux.scm: Likewise.
* gnu/packages/mail.scm: Likewise.
* gnu/packages/password-utils.scm: Likewise.
* gnu/packages/perl.scm: Likewise.
* gnu/packages/python-web.scm: Likewise.
* gnu/packages/python-xyz.scm: Likewise.
* gnu/packages/python.scm: Likewise.
* gnu/packages/sphinx.scm: Likewise.
* gnu/packages/ssh.scm: Likewise.
* gnu/packages/xdisorg.scm: Likewise.
* gnu/services/networking.scm: Likewise.
* gnu/system/vm.scm: Likewise.
</span></span></td><td>Christopher Lemmer Webber</td></tr>