diff options
author | Yorhel <git@yorhel.nl> | 2016-01-29 13:14:29 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2016-01-29 13:14:29 +0100 |
commit | 98acc64cabd686c21be7bfe5d90eff87b1f3601a (patch) | |
tree | 9f67d062d879d7bc7a0ccd6e3cd1129de4c9b6f1 /lib/Multi | |
parent | 85eec765076dcf3c516e55b76b3e0f3bed437b70 (diff) |
Multi::API: added 'screens' flag to 'get vn'
Diffstat (limited to 'lib/Multi')
-rw-r--r-- | lib/Multi/API.pm | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lib/Multi/API.pm b/lib/Multi/API.pm index 75922ea1..6ddab2b0 100644 --- a/lib/Multi/API.pm +++ b/lib/Multi/API.pm @@ -464,6 +464,24 @@ my %GET_VN = ( }, ]], }, + screens => { + fetch => [[ 'id', 'SELECT vs.id AS vid, vs.scr AS image, vs.rid, vs.nsfw, s.width, s.height + FROM vn_screenshots vs JOIN screenshots s ON s.id = vs.scr WHERE vs.id IN(%s)', + sub { my($r, $n) = @_; + for my $i (@$r) { + $i->{screens} = [ grep $i->{id} == $_->{vid}, @$n ]; + } + for (@$n) { + $_->{image} = sprintf '%s/sf/%02d/%d.jpg', $VNDB::S{url_static}, $_->{image}%100, $_->{image}; + $_->{rid} *= 1; + $_->{nsfw} = $_->{nsfw} =~ /t/ ? TRUE : FALSE; + $_->{width} *= 1; + $_->{height} *= 1; + delete $_->{vid}; + } + }, + ]] + }, }, filters => { id => [ |