fix share list including expired shares

backend/src/lib/outbound/sqlite/mod.rs

@@ -30,6 +30,7 @@ impl Sqlite {
     pub async fn new(config: SqliteConfig) -> anyhow::Result<Self> {
         let opts = SqliteConnectOptions::from_str(&config.database_url)?
             .create_if_missing(true)
+            .read_only(false)
             .disable_statement_logging();
 
         let pool = SqlitePoolOptions::new().connect_with(opts).await?;

backend/src/lib/outbound/sqlite/share.rs

@@ -107,7 +107,8 @@ pub(super) async fn list_shares(
                 shares
             WHERE
                 warren_id = $1 AND
-                path = $2
+                path = $2 AND
+                (expires_at IS NULL OR expires_at > CURRENT_TIMESTAMP)
             ORDER BY
                 created_at DESC
             ",