package PoorBooru::API::V0::Controller::Media; use v5.36; use strict; use warnings; use Mojo::Base "Mojolicious::Controller"; my $MEDIA_SEARCH_OPTS = { order_by => { -desc => "media_id" }, rows => 5, }; sub _pager_links ($c, $pager) { +{ map +( $_ => ($pager->$_ and $c->url_with->query({page => $pager->$_})) ), qw(first_page previous_page current_page next_page last_page) } } sub list ($self) { my $v = $self->validation; my $page = $v->optional("page")->num(1, undef)->param // 1; return $self->render( json => {error => "Invalid page number"}, status => 400, ) if $v->has_error; my $paged_media = $self->schema->resultset("Media") ->search({}, $MEDIA_SEARCH_OPTS)->page($page); my @media = map +{ media_id => $_->media_id, seaweedfs_fid => $_->seaweedfs_fid, }, $paged_media->all; return $self->render(json => { pager => _pager_links($self, $paged_media->pager), media => \@media, }); }; sub show ($self) { my $media_id = $self->stash("media_id"); my $media = $self->schema->resultset("Media") ->single({ media_id => $media_id }); return $self->render( json => {error => "Media not found"}, status => 404, ) if !defined($media); return $self->render(json => { id => $media->media_id, name => $media->filename, download => $media->seaweedfs_fid, content_type => $media->content_type, }); }; 1;