言舟：SQLite 驱动

yanbao add sqlite --package 言舟 --version "^1.0"

[依赖]
言舟 = { git = "https://github.com/yanxulang/yanxu-sqlite.git", 修订 = "v1.0.0", 版 = "^1.0" }

[权限]
文件 = ["data"]
原生扩展 = true

引「包:言舟」为 言舟；

定 数据库 为 言舟.打开配置（{
    「路径」：「data/应用.db」，
    「日志模式」：「WAL」，
    「同步模式」：「NORMAL」，
    「外键」：真，
    「忙碌超时毫秒」：5000
}）；

数据库.执行（
    「CREATE TABLE IF NOT EXISTS users(id INTEGER PRIMARY KEY, name TEXT NOT NULL)」，
    【】
）；

定 插入 为 数据库.预编译（「INSERT INTO users(name) VALUES (?)」）；
插入.执行（【「子衿」】）；
插入.关闭（）；

定 用户 为 数据库.查询（
    「SELECT id, name FROM users WHERE name = ?」，
    【「子衿」】
）.首行（）；

言 用户；
数据库.关闭（）；

定 各行 为 数据库.查询（
    「SELECT id, name FROM users WHERE name = ? AND age >= ?」，
    【姓名，18】
）.全部（）；

定 语句 为 数据库.预编译（
    「INSERT INTO events(kind, payload) VALUES (?, ?)」
）；

逐 事件 于 各事件 则
    语句.执行（【事件【「种类」】，事件【「正文」】】）；
终

言 语句.参数数（）；
语句.关闭（）；

定 事务 为 数据库.立即事务（）；
试 则
    事务.执行（「UPDATE accounts SET balance = balance - ? WHERE id = ?」，【10，甲】）；
    事务.保存点（「credit」）；
    事务.执行（「UPDATE accounts SET balance = balance + ? WHERE id = ?」，【10，乙】）；
    事务.释放点（「credit」）；
    事务.提交（）；
救 所误 则
    若 事务.是否活跃（） 则
        事务.回滚（）；
    终
    抛 所误；
终

引「包:言库」为 言库；

法 新连接（） 则
    归 言舟.打开（「data/应用.db」）；
终

定 池配置 为 言库.连接池配置（）
    .最小（1）
    .最大（8）
    .取得超时（2000）
    .健康间隔（30000）；

定 池 为 言库.连接池（新连接，池配置）；
定 租约 为 池.取得（）；
言 租约.查询（「SELECT 1」，【】）.标量（）；
租约.释放（）；
池.关闭平缓（5000）；

逐 表 于 数据库.表清单（） 则
    言 表；
终

定 结构 为 数据库.表结构（「users」）；
言 结构【「列」】；
言 结构【「索引」】；
言 结构【「外键」】；

定 各迁移 为 【
    言舟.迁移（
        1，
        「创建用户」，
        「CREATE TABLE users(id INTEGER PRIMARY KEY)」，
        「DROP TABLE users」
    ），
    言舟.迁移（
        2，
        「增加姓名」，
        「ALTER TABLE users ADD COLUMN name TEXT」，
        「ALTER TABLE users DROP COLUMN name」
    ）
】；

定 迁移器 为 言舟.默认迁移器（数据库）；
言 迁移器.检查（各迁移）；
言 迁移器.干运行升级（各迁移）；
迁移器.升级（各迁移）；

定 写入值 为 数据库.言据写入值（资料，「原生结构」）；
数据库.执行（「INSERT INTO profiles(data) VALUES (?)」，【写入值】）；

定 条件 为 数据库.言据路径（「data」，【「等级」】）.至少（10）；
定 表达式 为 条件.转典（）；
定 各行 为 数据库.查询（
    （「SELECT data FROM profiles WHERE 」 加 表达式【「SQL」】），
    表达式【「参数」】
）.全部（）；