i am new in this mailing list i have written a script for theora (i am not sure that it is useful or not ? ) =========================================#!/usr/bin/perl # ALL2theora based on Florian Schilhabel <florian.schilhabel@web.de> dvd2divx script (was under GPL) # we have made major changes to that script and now it can convert almost all video format to theora # all2theora depends on mplayer, encoder_example # # thanks to Florian Schilhabel # # # (c) 2002-2004 by Florian Schilhabel <florian.schilhabel@web.de> # # # version 0.1 initial release 22/08/2002 # # # If you have any comments, suggestions, etc., feel free to send me a mail ;-)) # flames and other things like that should go to /dev/null # thankx to all the mplayer developers for this really *great* piece of software # # # This script is free software; you can redistribute it and/or # modify it under the terms of the GNU Lesser General Public # License as published by the Free Software Foundation; either # version 2 of the License, or (at your option) any later version. # # This script is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # Lesser General Public License for more details. # # You should have received a copy of the GNU Lesser General Public # License along with this library; if not, write to the Free Software # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA # # # use Getopt::Long; GetOptions( "help" => \$help, "i=s" => \$input, "divx=s" => \$divx, ); if ($help) { print "Welcome to the ALL2theora Helper Script\n"; print "\n"; print "this script encodes a all file to theora\n"; print "Usage:\n"; print "--help show this text\n"; print " this will only be possible if you are root\n"; print "--i Specify the Name of your Video file\n"; exit; } if ($input eq "") { print "No Input file selected - You must specify one with: --i filename.\n"; print "\n"; print "this script encodes a all file to theora\n"; print "Usage:\n"; print "--help show this text\n"; print " this will only be possible if you are root\n"; print "--i Specify the Name of your Video file\n"; exit; } if ($divx eq "on") { system ("mkfifo stream.yuv && chmod 777 stream.yuv && mencoder $input -ovc lavc -oac copy -o tmp.avi -lavcopts vcodec=mpeg1video:vbitrate=1200 -vf harddup -of mpeg && mplayer -vc dummy -vo null -ao pcm:file=stream.wav tmp.avi && encoder_example stream.wav stream.yuv > theora.ogg | mplayer -ao null -nosound -vo yuv4mpeg tmp.avi - 1>/dev/tty7 8>/dev/tty7 && rm stream.yuv && rm stream.wav && rm tmp.avi"); exit; } ### if ($divx eq "off") { system ("mkfifo stream.yuv && chmod 777 stream.yuv && mplayer -vc dummy -vo null -ao pcm:file=stream.wav $input && encoder_example stream.wav stream.yuv > theora.ogg | mplayer -ao null -nosound -vo yuv4mpeg $input - 1>/dev/tty7 8>/dev/tty7 && rm stream.yuv && rm stream.wav"); exit; } if ($divx eq "") { system ("mkfifo stream.yuv && chmod 777 stream.yuv && mplayer -vc dummy -vo null -ao pcm:file=stream.wav $input && encoder_example stream.wav stream.yuv > theora.ogg | mplayer -ao null -nosound -vo yuv4mpeg $input - 1>/dev/tty7 8>/dev/tty7 && rm stream.yuv && rm stream.wav"); exit; } print "Video Filename: $input\n"; print "working...\n"; exit; =========================================== read me ====================================================All2theora ========= all2theora convert almost all video to theora. it depends on mplayer, libtheora, libogg, libvorbis and encoder_example. links: http://www.mplayerhq.hu/ http://www.mplayerhq.hu/homepage/design7/dload.html (codecs to play and encode wmv, real and mov); http://www.theora.org/ http://www.xiph.org/ http://kde-apps.org/content/show.php?content=17831 (to get encoder_example) =============================================================================================it is based on "Florian Schilhabel <florian.schilhabel@web.de>"'s dvd2divx script (Under GPL). ============================================================================================= contact us: Salahuddin Pasha (also known as salahuddin66) mail: <salahuddin66@gmail.com> or <salahuddin.debian@gmail.com> Abu Zaher Faridi mail: <zaher14@gmail.com> ============================================= -- -salahuddin_66 registered Linux user number 362610 http://counter.li.org/ -------------- next part -------------- A non-text attachment was scrubbed... Name: encoder_example Type: application/octet-stream Size: 32119 bytes Desc: not available Url : http://lists.xiph.org/pipermail/theora/attachments/20051028/1def91fe/encoder_example-0001.obj