libreavous/lav-outils
libreavous/lav-outils
4
3
Fork 0
Code Issues Pull Requests Releases Activity

Add --mp3 option to generate MP3 files

Browse Source
This commit is contained in:
Frédéric Couchet 2019-05-27 13:33:51 +02:00 committed by Frédéric Couchet
parent bed025d42d
commit fa2522c41b
2 changed files with 84 additions and 55 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
podcasts/scripts/make-all-podcasts.pl
View File

@ -29,11 +29,13 @@ my ($help,$config,$verbose,$dryrun);
my $meta_data_script = "lav-outils/podcasts/scripts/make-metadata-image-podcast.sh"; my $meta_data_script = "lav-outils/podcasts/scripts/make-metadata-image-podcast.sh";
my $verbose; my $verbose;
my $textwebpage="<ul>\n\n"; my $mp3;
my $textwebpage="<ul>\n";
GetOptions ("help" => \$help, GetOptions ("help" => \$help,
"config=s" => \$config, "config=s" => \$config,
"verbose" => \$verbose, "mp3" => \$mp3,
"verbose" => \$verbose,
"dryrun" => \$dryrun); "dryrun" => \$dryrun);
if($help) { if($help) {
@ -49,6 +51,7 @@ sub usage {
Needs JSON perl library (apt install libjson-perl) Needs JSON perl library (apt install libjson-perl)
$0 --config conf_file.json $0 --config conf_file.json
--config conf_file.json the configuration file containing stuff --config conf_file.json the configuration file containing stuff
--mp3 generate mp3 files
--help show this message --help show this message
--verbose increase verbosity --verbose increase verbosity
--dryrun print commands without executing them --dryrun print commands without executing them
@ -73,7 +76,7 @@ sub read_config {
} }
sub process { sub process {
my ($config,$verbose,$dryrun)=@_; my ($config,$mp3,$verbose,$dryrun)=@_;
my $data = read_config($config); my $data = read_config($config);
my $short_date = $data->{short_date}; my $short_date = $data->{short_date};
@ -82,7 +85,20 @@ sub process {
my $source_name = "libre-a-vous-$short_date"; my $source_name = "libre-a-vous-$short_date";
my $title = "Libre à vous ! du $long_date sur Cause Commune"; my $title = "Libre à vous ! du $long_date sur Cause Commune";
my $ffmpeg_bin = $data->{ffmpeg_bin}; my $ffmpeg_bin = $data->{ffmpeg_bin};
for my $chapter (values @{$data->{chapters}}) {
my $option_mp3_meta_data_script;
my @formats_files;
if($mp3) {
@formats_files = qw/ogg mp3/;
$option_mp3_meta_data_script = "yes";
}
else {
@formats_files = qw/ogg/;
$option_mp3_meta_data_script = "no";
}
for my $chapter (values @{$data->{chapters}}) {
my $start = $chapter->{start_timestamp}; my $start = $chapter->{start_timestamp};
my $end = $chapter->{end_timestamp}; my $end = $chapter->{end_timestamp};
my $short_chapter_name = $chapter->{short_chapter_name}; my $short_chapter_name = $chapter->{short_chapter_name};
@ -106,7 +122,7 @@ sub process {
# putting metadata # putting metadata
my $url = "https://media.april.org/audio/radio-cause-commune/libre-a-vous/emissions/$short_date/$source_name-$short_chapter_name.ogg"; my $url = "https://media.april.org/audio/radio-cause-commune/libre-a-vous/emissions/$short_date/$source_name-$short_chapter_name.ogg";
my $command = "$meta_data_script -s \"$source_name-$short_chapter_name.ogg\" -d \"output\" -u \"$url\" -t \"$title - Partie $chapter_title\" -p \"$ffmpeg_bin\" -y \"$year\""; my $command = "$meta_data_script -s \"$source_name-$short_chapter_name.ogg\" -d \"output\" -u \"$url\" -t \"$title - Partie $chapter_title\" -p \"$ffmpeg_bin\" -y \"$year\" -m \"$option_mp3_meta_data_script\"";
if($dryrun) { if($dryrun) {
print "$command\n"; print "$command\n";
@ -143,12 +159,12 @@ sub process {
$ret[0] =~ s/s/secondes/ig; $ret[0] =~ s/s/secondes/ig;
$ret[0] =~ s/min/minutes/ig; $ret[0] =~ s/min/minutes/ig;
my $url2 = $url =~ s/\.ogg/\.mp3/r; my $url2 = $url =~ s/\.ogg/\.mp3/r;
$textwebpage = $textwebpage . "<li><a href=\"$url\">$chapter_title</a> (format OGG) (et <a href=\"$url2\">format MP3</a>) ($ret[0])</li>\n\n"; $textwebpage = $textwebpage . "<li><a href=\"$url\">$chapter_title</a> (format OGG) (et <a href=\"$url2\">format MP3</a>) ($ret[0])</li>\n";
} }
} }
# renaming to target OGG and MP3 # renaming to target OGG and MP3
for my $format ("ogg","mp3") { foreach my $format (@formats_files) {
my $target_name = "$source_name-$short_chapter_name.$format"; my $target_name = "$source_name-$short_chapter_name.$format";
my $command = "mv output.$format $target_name"; my $command = "mv output.$format $target_name";
if($dryrun) { if($dryrun) {
@ -186,7 +202,7 @@ sub process {
# putting metadata in main podcast # putting metadata in main podcast
my $url = "https://media.april.org/audio/radio-cause-commune/libre-a-vous/emissions/$short_date/$source_name.ogg"; my $url = "https://media.april.org/audio/radio-cause-commune/libre-a-vous/emissions/$short_date/$source_name.ogg";
my $command = "$meta_data_script -s \"$source_name.ogg\" -d \"output\" -u \"$url\" -t \"$title\" -p \"$ffmpeg_bin\" -y \"$year\""; my $command = "$meta_data_script -s \"$source_name.ogg\" -d \"output\" -u \"$url\" -t \"$title\" -p \"$ffmpeg_bin\" -y \"$year\" -m \"$option_mp3_meta_data_script\"";
if($dryrun) { if($dryrun) {
print "$command\n"; print "$command\n";
} else { } else {
@ -202,7 +218,7 @@ sub process {
} }
# renaming to target OGG and MP3 # renaming to target OGG and MP3
for my $format ("ogg","mp3") { foreach my $format (@formats_files) {
my $command = "mv output.$format $source_name.$format"; my $command = "mv output.$format $source_name.$format";
if($dryrun) { if($dryrun) {
@ -239,8 +255,12 @@ sub process {
$textwebpage = $textwebpage . "</ul>\n\n"; $textwebpage = $textwebpage . "</ul>\n\n";
binmode(STDOUT, ":utf8"); binmode(STDOUT, ":utf8");
print "Pour la page web consacrée à l'émission :\n\n$textwebpage\n\n"; print "\nText for the web page of the radio program :\n\n$textwebpage\n";
if(! $mp3) {
print "MP3 files not generated, please use --mp3 option to generate them\n";
}
} }
process($config,$verbose,$dryrun); process($config,$mp3,$verbose,$dryrun);

97
podcasts/scripts/make-metadata-image-podcast.sh
View File

@ -17,45 +17,50 @@
# You should have received a copy of the GNU Affero General Public License # You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>. # along with this program. If not, see <http://www.gnu.org/licenses/>.
usage() { echo "$0 -s source_file -d destination_file -u http://... -t \"title\" -p path/to/ffmpeg/binary"; exit 0; } usage() { echo "$0 -s source_file -d destination_file -u http://... -t \"title\" -p path/to/ffmpeg/binary -y \"year\" -m \"yes or no\""; exit 0; }
[ $# -eq 0 ] && usage
while getopts "s:d:u:t:p:y:h" arg; do
case $arg in
s)
source=${OPTARG}
;;
d)
destination=${OPTARG}
;;
u)
url=${OPTARG}
;;
t)
title=${OPTARG}
;;
p)
FFmpegBin=${OPTARG}
;;
y)
year=${OPTARG}
;;
h | *) # Display help. [ $# -eq 0 ] && usage
usage
exit 0 while getopts "s:d:u:t:p:y:m:h" arg; do
;; case $arg in
esac s)
source=${OPTARG}
;;
d)
destination=${OPTARG}
;;
u)
url=${OPTARG}
;;
t)
title=${OPTARG}
;;
p)
FFmpegBin=${OPTARG}
;;
y)
year=${OPTARG}
;;
m)
mp3=${OPTARG}
;;
h | *) # Display help.
usage
exit 0
;;
esac
done done
if [ ! -f $source ]; then if [ ! -f $source ]; then
echo "File $source does not exist" echo "File $source does not exist"
usage usage
exit 1 exit 1
fi fi
if [ ! -f "$FFmpegBin" ]; then if [ ! -f "$FFmpegBin" ]; then
echo "$FFmpegBin is not executable" echo "$FFmpegBin is not executable"
usage usage
exit 1 exit 1
fi fi
image="lav-outils/podcasts/images/image-pour-etiqueter-podcast.jpg" image="lav-outils/podcasts/images/image-pour-etiqueter-podcast.jpg"
@ -72,27 +77,31 @@ ${FFmpegBin} -y -i ${source} -acodec copy -map 0:0 -map_metadata -1 -metadata ti
${FFmpegBin} -y -i ${fichiertempogg} -i i.meta -acodec copy -map 0:0 -map_metadata 1 ${destination}.ogg ${FFmpegBin} -y -i ${fichiertempogg} -i i.meta -acodec copy -map 0:0 -map_metadata 1 ${destination}.ogg
# Generation du fichier MP3 avec conservation de l'image de pochette (cover), des métadonnées en deux passes if [ "$mp3" = "yes" ]; then
# Conservation de l'image de pochette (cover) et des métadonnées # Generation du fichier MP3 avec conservation de l'image de pochette (cover), des métadonnées en deux passes
# Conservation de l'image de pochette (cover) et des métadonnées
${FFmpegBin} -y -i ${destination}.ogg -map_metadata 0:s:0 ${fichiertempmp3} ${FFmpegBin} -y -i ${destination}.ogg -map_metadata 0:s:0 ${fichiertempmp3}
# Passe pour avoir le champ Duration dans le fichier (qui n'est pas présent suite à la conversion de OGG en MP3) # Passe pour avoir le champ Duration dans le fichier (qui n'est pas présent suite à la conversion de OGG en MP3)
${FFmpegBin} -y -i ${fichiertempmp3} -acodec copy ${destination}.mp3 ${FFmpegBin} -y -i ${fichiertempmp3} -acodec copy ${destination}.mp3
# Mise à jour des métadonnées pour tenir compte des métadonnées MP3 # Mise à jour des métadonnées pour tenir compte des métadonnées MP3
eyeD3 --user-text-frame="LICENSE:" ${destination}.mp3 eyeD3 --user-text-frame="LICENSE:" ${destination}.mp3
eyeD3 --user-text-frame="comment:" ${destination}.mp3 eyeD3 --user-text-frame="comment:" ${destination}.mp3
eyeD3 -c "`echo "${text}"|sed '1,$s/.ogg/.mp3/'`" ${destination}.mp3 eyeD3 -c "`echo "${text}"|sed '1,$s/.ogg/.mp3/'`" ${destination}.mp3
eyeD3 --user-text-frame="WOAF:`echo ${url%.ogg}.mp3`" ${destination}.mp3 eyeD3 --user-text-frame="WOAF:`echo ${url%.ogg}.mp3`" ${destination}.mp3
eyeD3 --text-frame="TCOP:${year} April - Cause Commune Fichier diffusé selon les termes d’au moins une des licences suivantes : licence Art libre version 1.3 ou ultérieure http://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure http://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure http://www.gnu.org/licenses/fdl-1.3.html. Pour vérifier voir https://www.april.org/libre-a-vous" ${destination}.mp3 eyeD3 --text-frame="TCOP:${year} April - Cause Commune Fichier diffusé selon les termes d’au moins une des licences suivantes : licence Art libre version 1.3 ou ultérieure http://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure http://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure http://www.gnu.org/licenses/fdl-1.3.html. Pour vérifier voir https://www.april.org/libre-a-vous" ${destination}.mp3
fi
rm ${fichiertempogg} rm ${fichiertempogg}
rm ${fichiertempmp3} rm ${fichiertempmp3}