fix: Harden startup + SVG input handling

Author: Fuwn

src/database.gleam

@@ -8,11 +8,9 @@ pub type Counter {
 }
 
 pub fn setup(connection) {
-  let _ =
+  let assert Ok(_) =
     sqlight.exec(
-      "pragma foreign_keys = off;
-
-      create table if not exists tb_count (
+      "create table if not exists tb_count (
         id integer primary key autoincrement not null unique,
         name text not null unique,
         num int not null default (0)

src/request.gleam

@@ -45,7 +45,7 @@ pub fn handle(request, connection, image_cache, index_html) {
               case list.key_find(query, "padding") {
                 Ok(padding) ->
                   case int.parse(padding) {
-                    Ok(n) -> n
+                    Ok(n) -> int.clamp(n, min: 0, max: 32)
                     Error(_) -> 6
                   }
                 _ -> 6

src/svg.gleam

@@ -49,7 +49,7 @@ pub fn xml(image_cache, theme, number, padding) {
       image_cache,
       theme,
       {
-        let assert Ok(digits) = int.digits(number, 10)
+        let assert Ok(digits) = int.digits(int.absolute_value(number), 10)
         let digits_padding = padding - list.length(digits)
 
         case digits_padding {