josch/yolanda
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

creates thumnails now

Browse source 
git-svn-id: http://yolanda.mister-muffin.de/svn@90 7eef14d0-6ed0-489d-bf55-20463b2d70db
This commit is contained in:
josch 2007-10-19 08:09:11 +00:00
parent b980cb3ae4
commit 3258c69eb1
1 changed files with 12 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
trunk/gnutube_daemon.pl
View file

@ -130,6 +130,16 @@ while(1)
#TODO: maybe delete entry from uploaded table after successful upload? #TODO: maybe delete entry from uploaded table after successful upload?
$filesize = -s "$gnutube_root/tmp/$id"; $filesize = -s "$gnutube_root/tmp/$id";
#convert hh:mm:ss.s duration to full seconds - lazy method by using mysql
$sth = $dbh->prepare(qq{select time_to_sec( ? )});
$sth->execute($duration);
($duration) = $sth->fetchrow_array();
$sth->finish();
#create thumbnail
$thumbnailsec = int($duration/3 + .5);
system "ffmpeg -i $gnutube_root/tmp/$id -vcodec png -vframes 1 -an -f rawvideo -ss $thumbnailsec -s 320x240 $gnutube_root/video-stills/$id";
#check if the upload already is in the right format #check if the upload already is in the right format
if ($container eq 'ogg' and $video eq 'theora' and $audio eq 'vorbis') if ($container eq 'ogg' and $video eq 'theora' and $audio eq 'vorbis')
{ {
@ -143,7 +153,7 @@ while(1)
#add video to videos table #add video to videos table
$sth = $dbh->prepare(qq{insert into videos (id, title, description, userid, timestamp, $sth = $dbh->prepare(qq{insert into videos (id, title, description, userid, timestamp,
hash, filesize, duration, width, height, fps) hash, filesize, duration, width, height, fps)
values (?, ?, ?, ?, ?, ?, ?, time_to_sec( ? ), ?, ?, ?)}) or interrupt $dbh->errstr; values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)}) or interrupt $dbh->errstr;
$sth->execute($id, $title, $description, $userid, $timestamp, $sha, $filesize, $duration, $width, $height, $fps) or interrupt $dbh->errstr; $sth->execute($id, $title, $description, $userid, $timestamp, $sha, $filesize, $duration, $width, $height, $fps) or interrupt $dbh->errstr;
$sth->finish() or interrupt $dbh->errstr; $sth->finish() or interrupt $dbh->errstr;
@ -164,7 +174,7 @@ while(1)
#add video to videos table #add video to videos table
$sth = $dbh->prepare(qq{insert into videos (id, title, description, userid, timestamp, $sth = $dbh->prepare(qq{insert into videos (id, title, description, userid, timestamp,
hash, filesize, duration, width, height, fps) hash, filesize, duration, width, height, fps)
values (?, ?, ?, ?, ?, ?, ?, time_to_sec( ? ), ?, ?, ?)}) or interrupt $dbh->errstr; values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)}) or interrupt $dbh->errstr;
$sth->execute($id, $title, $description, $userid, $timestamp, $sha, $filesize, $duration, $width, $height, $fps) or interrupt $dbh->errstr; $sth->execute($id, $title, $description, $userid, $timestamp, $sha, $filesize, $duration, $width, $height, $fps) or interrupt $dbh->errstr;
$sth->finish() or interrupt $dbh->errstr; $sth->finish() or interrupt $dbh->errstr;