#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=c3671213e1683ac83c28565208bbb6c58d8270d2'>root</a>/<a href='/guix/log/gnu?id=c3671213e1683ac83c28565208bbb6c58d8270d2'>gnu</a>/<a href='/guix/log/gnu/services?id=c3671213e1683ac83c28565208bbb6c58d8270d2'>services</a>/<a href='/guix/log/gnu/services/dbus.scm?id=c3671213e1683ac83c28565208bbb6c58d8270d2'>dbus.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/services/dbus.scm?id=c3671213e1683ac83c28565208bbb6c58d8270d2&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2022-06-14 14:23:21 -0400'>2022-06-14</span></td><td><a href='/guix/commit/gnu/services/dbus.scm?id=a860a5fa95a743093cbda5540fb5be7800439a9f'>services: dbus: Add a VERBOSE? configuration option.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/dbus.scm (&lt;dbus-configuration&gt;)[verbose?]: New field.
(dbus-shepherd-service): Use it.
(dbus-service)[verbose?]: Add argument and update doc.
* doc/guix.texi (Desktop Services): Document it.
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2022-02-19 01:37:42 -0500'>2022-02-19</span></td><td><a href='/guix/commit/gnu/services/dbus.scm?id=6e5d21942509ff29249f98ff0e0f3eabd7341144'>services: dbus: Increase auth_timeout value to 5 minutes.</a><span class='msg-avail'>...<span class='msg-tooltip'>This is a follow-up to 488f1c589df; the problem had re-appeared on my machine.

* gnu/services/dbus.scm (dbus-configuration-directory): Increase
'auth_timeout' value from 60000 to 300000 ms (5 minutes).
</span></span></td><td>Maxim Cournoyer</td></tr>
<tr><td><span title='2021-12-22 18:33:07 -0500'>2021-12-22</span></td><td><a href='/guix/commit/gnu/services/dbus.scm?id=488f1c589df00e802163af534294d93372e5c025'>services: dbus: Wait 1 minute for elogind to get ready.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://issues.guix.gnu.org/issue/52051&gt;.

* gnu/services/dbus.scm (dbus-configuration-directory): Set a 60 second
authentication timeout in the D-Bus configuration.
</span></span></td><td>Timothy Sample</td></tr>
<tr><td><span title='2021-12-05 19:17:41 +0100'>2021-12-05</span></td><td><a href='/guix/commit/gnu/services/dbus.scm?id=9bc0f45df5d6aed217020b1183dca54989844fb0'>Merge remote-tracking branch 'origin/master' into core-updates-frozen</a></td><td>Ricardo Wurmus</td></tr>
<tr><td><span title='2021-11-30 01:08:55 +0100'>2021-11-30</span></td><td><a href='/guix/commit/gnu/services/dbus.scm?id=892f1b7273d57b25940700877a02618fe826cc08'>services: Accept &lt;inferior-package&gt;s in lieu of &lt;package&gt;s.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/authentication.scm (fprintd-configuration)
(nslcd-configuration): Substitute file-like objects for package ones.
* gnu/services/cgit.scm (cgit-configuration, opaque-cgit-configuration):
Likewise.
* gnu/services/cups.scm (package-list?, cups-configuration): Likewise.
* gnu/services/dns.scm (verify-knot-configuration)
(ddclient-configuration): Likewise.
* gnu/services/docker.scm (docker-configuration): Likewise.
* gnu/services/file-sharing.scm (transmission-daemon-configuration): Likewise.
* gnu/services/getmail.scm (getmail-configuration): Likewise.
* gnu/services/mail.scm (dovecot-configuration)
(opaque-dovecot-configuration): Likewise.
* gnu/services/messaging.scm (prosody-configuration)
(opaque-prosody-configuration): Likewise.
* gnu/services/monitoring.scm (zabbix-server-configuration)
(zabbix-agent-configuration): Likewise.
* gnu/services/networking.scm (opendht-configuration): Likewise.
* gnu/services/pm.scm (tlp-configuration): Likewise.
* gnu/services/telephony.scm (jami-configuration): Likewise.
* gnu/services/virtualization.scm (libvirt-configuration)
(qemu-guest-agent-configuration): Likewise.
* gnu/services/vpn.scm (openvpn-client-configuration): Likewise.
</span></span></td><td>Tobias Geerinckx-Rice</td></tr>
<tr><td><span title='2021-11-27 23:06:17 +0100'>2021-11-27</span></td><td><a href='/guix/commit/gnu/services/dbus.scm?id=72b0c5a3f221afb824772c4969e85d190a8a3205'>services: polkit: Choose between polkit-mozjs and polkit-duktape.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/dbus.scm (%default-polkit): New variable.
(&lt;polkit-configuration&gt;)[polkit]: Default to it.
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-07-29 11:32:48 -0400'>2021-07-29</span></td><td><a href='/guix/commit/gnu/services/dbus.scm?id=a85ec0bf69df9ec3333a214feff54d4e58b15bec'>services: Migrate to &lt;setuid-program&gt;.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/dbus.scm (dbus-setuid-programs, polkit-setuid-programs):
  Return setuid-programs.
* gnu/services/desktop.scm (enlightenment-setuid-programs): Return
 setuid-programs.
 (%desktop-services)[mount-setuid-helpers]: Use setuid-programs.
* gnu/services/docker.scm (singularity-setuid-programs): Return
 setuid-programs.
* gnu/services/xorg.scm(screen-locker-setuid-programs): Return
 setuid-programs.
* gnu/system.scm (%setuid-programs): Return setuid-programs.
* doc/guix.texi (Setuid Programs, operating-system Reference): Replace
  'list of G-expressions' with 'list of &lt;setuid-program&gt;'.
</span></span></td><td>Brice Waegeneire</td></tr>