erika/ring
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Merge pull request 'add "random" endpoint that just redirects you to a random node.' (#1) from nebkor/ring:random into main

Browse source 
Reviewed-on: #1
This commit is contained in:
Erika Rowland 2024-03-31 18:23:12 +00:00
commit ef084f3dba
1 changed files with 17 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
src/ring/router.gleam
View file

@ -12,6 +12,8 @@ pub fn handle_request(req: Request) -> Response {
case wisp.path_segments(req) { case wisp.path_segments(req) {
[] -> home_page(req) [] -> home_page(req)
["random"] -> handle_random()
[hash, "previous"] -> handle_previous(hash) [hash, "previous"] -> handle_previous(hash)
[hash, "next"] -> handle_next(hash) [hash, "next"] -> handle_next(hash)
@ -55,6 +57,21 @@ fn handle_next(hash) {
} }
} }
fn handle_random() {
let db_path = "members.db"
use conn <- sqlight.with_connection(db_path)
let random =
sqlight.query(
"select next from ring order by random() limit 1",
on: conn,
expecting: dynamic.decode1(Row, dynamic.element(0, dynamic.string)),
)
case random {
Ok([Row(random_link)]) -> wisp.redirect(random_link)
_ -> wisp.not_found()
}
}
fn home_page(req: Request) -> Response { fn home_page(req: Request) -> Response {
// The home page can only be accessed via GET requests, so this middleware is // The home page can only be accessed via GET requests, so this middleware is
// used to return a 405: Method Not Allowed response for all other methods. // used to return a 405: Method Not Allowed response for all other methods.