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

Modification suite à mise en ligne de libreavous.org

Browse Source
This commit is contained in:
Frédéric Couchet 2021-11-16 11:27:02 +01:00 committed by Frédéric Couchet
parent aa0c44873e
commit 5c23dade0f
2 changed files with 18 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -30,7 +30,6 @@ my $meta_data_script = "lav-outils/podcasts/scripts/make-metadata-image-podcast.
my $verbose; my $verbose;
my $mp3; my $mp3;
my $textwebpage="<ul>\n";
GetOptions ("help" => \$help, GetOptions ("help" => \$help,
"config=s" => \$config, "config=s" => \$config,
@ -84,12 +83,15 @@ sub process {
my $long_date = $data->{long_date}; my $long_date = $data->{long_date};
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 $short_description = $data->{short_description}; my $short_description = $data->{short_description};
my $ffmpeg_bin = $data->{ffmpeg_bin}; my $ffmpeg_bin = $data->{ffmpeg_bin};
my $option_mp3_meta_data_script; my $option_mp3_meta_data_script;
my @formats_files; my @formats_files;
$short_description =~ /^#(\d+)\s+-/ ;
my $no_emission = $1 ;
if($mp3) { if($mp3) {
@formats_files = qw/ogg mp3/; @formats_files = qw/ogg mp3/;
$option_mp3_meta_data_script = "yes"; $option_mp3_meta_data_script = "yes";
@ -160,7 +162,6 @@ 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";
} }
} }
@ -320,19 +321,21 @@ sub process {
} }
$textwebpage = $textwebpage . "</ul>\n\n";
binmode(STDOUT, ":utf8"); binmode(STDOUT, ":utf8");
my $url = "https://www.april.org/libre-a-vous-diffusee-mardi-$long_date-sur-radio-cause-commune"; my $url = "https://libreavous.org/" . $no_emission ;
$url=~s/ /-/g;
print "\nText for the web page of the radio program : $url\n\n"; print "\nSe connecter sur le site web de l'émission, dans la partie articles https://www.libreavous.org/ecrire/?exec=articles\n\n";
print "$textwebpage\n\n";
print "Add the html code on $url\n\n";
print "And remove the line : <p>Les podcasts seront disponibles après la diffusion de l'émission (quelques jours après en général).</p>\n\n"; print "Cliquer sur l'article correspond à l'émission (n° " . "$no_emission)\n\n";
print "Cliquer sur le bouton « Importer l'émission »\n\n";
print "Les requêtes effectuées sont affichées et normalement aucune erreur est affichée\n\n";
print "Aller sur la page https://www.libreavous.org/ecrire/?exec=admin_vider et cliquer sur « Vider le cache »\n\n";
print "Retourner sur la page de l'émission : $url\n\n";
print "Si l'import s'est passé correctement, le lecteur pour le podcast de l'émission apparaît ainsi que les boutons pour les podcasts individuels (dans « Sujet principal » et dans « Et aussi »)\n\n";
print "Aller sur https://www.libreavous.org. Les liens vers les podcasts doivent être présents\n\n";
print "Aller sur https://www.libreavous.org/rss. Les items des podcasts pour le flux RSS doivent être présents\n\n";
if(! $mp3) { if(! $mp3) {
print "MP3 files not generated, please use --mp3 option to generate them\n"; print "MP3 files not generated, please use --mp3 option to generate them\n";
} }

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

@ -68,12 +68,12 @@ image="lav-outils/podcasts/images/image-pour-etiqueter-podcast.jpg"
fichiertempogg="$(command mktemp -t "tmp.XXXXXXXXXX.ogg")" fichiertempogg="$(command mktemp -t "tmp.XXXXXXXXXX.ogg")"
fichiertempmp3="$(command mktemp -t "tmp.XXXXXXXXXX.mp3")" fichiertempmp3="$(command mktemp -t "tmp.XXXXXXXXXX.mp3")"
text=$(printf "Émission « Libre à vous ! » de l'April diffusée sur radio la « Cause Commune ».\n\nPour en savoir plus https://www.april.org/libre-a-vous et https://cause-commune.fm\n\nAdresse d'origine du fichier audio ${url}\n\nFichier diffusé selon les termes d’au moins une des licences suivantes : licence Art libre version 1.3 ou ultérieure https://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure https://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure https://www.gnu.org/licenses/fdl-1.3.html.") text=$(printf "Émission « Libre à vous ! » de l'April diffusée sur radio la « Cause Commune ».\n\nPour en savoir plus https://libreavous.org et https://cause-commune.fm\n\nAdresse d'origine du fichier audio ${url}\n\nFichier diffusé selon les termes d’au moins une des licences suivantes : licence Art libre version 1.3 ou ultérieure https://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure https://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure https://www.gnu.org/licenses/fdl-1.3.html.")
(echo -en ";FFMETADATA1\nMETADATA_BLOCK_PICTURE=";(i=${image};t=3;m="image/jpeg";eval "w=`identify-im6 "$i"|awk '{g=$3;sub("x"," h=",g);print g;d=$5;gsub(/-.*/,"",d);print " d=" d}'`"; echo -en "\x00\x00\x00\x$(printf '%02x' $t)\x00\x00\x00\x$(printf '%02x' `echo -n "$m"|wc -c`)$m\x00\x00\x00\x00$(printf '%08x' $w|sed 's/../\\x&/g')$(printf '%08x' $h|sed 's/../\\x&/g')$(printf '%08x' $d|sed 's/../\\x&/g')\x00\x00\x00\xff$(printf '%08x' `stat -c '%s' "$i"`|sed 's/../\\x&/g')";cat "$i")|base64 --wrap=0) > i.meta (echo -en ";FFMETADATA1\nMETADATA_BLOCK_PICTURE=";(i=${image};t=3;m="image/jpeg";eval "w=`identify-im6 "$i"|awk '{g=$3;sub("x"," h=",g);print g;d=$5;gsub(/-.*/,"",d);print " d=" d}'`"; echo -en "\x00\x00\x00\x$(printf '%02x' $t)\x00\x00\x00\x$(printf '%02x' `echo -n "$m"|wc -c`)$m\x00\x00\x00\x00$(printf '%08x' $w|sed 's/../\\x&/g')$(printf '%08x' $h|sed 's/../\\x&/g')$(printf '%08x' $d|sed 's/../\\x&/g')\x00\x00\x00\xff$(printf '%08x' `stat -c '%s' "$i"`|sed 's/../\\x&/g')";cat "$i")|base64 --wrap=0) > i.meta
# Generation du fichier OGG avec l'image de pochette (cover) et les métadonnées # Generation du fichier OGG avec l'image de pochette (cover) et les métadonnées
${FFmpegBin} -y -i ${source} -acodec copy -map 0:0 -map_metadata -1 -metadata title="${title}" -metadata license="Diffusée selon les termes d’au moins une des licences suivantes : licence Art libre version 1.3 ou ultérieure https://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure https://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure https://www.gnu.org/licenses/fdl-1.3.html Pour vérifier voir https://www.april.org/libre-a-vous" -metadata artist="April - Cause Commune" -metadata copyright="April - Cause Commune" -metadata genre="Podcast" -metadata contact="https://april.org/libre-a-vous" -metadata description="${text}" ${fichiertempogg} ${FFmpegBin} -y -i ${source} -acodec copy -map 0:0 -map_metadata -1 -metadata title="${title}" -metadata license="Diffusée selon les termes d’au moins une des licences suivantes : licence Art libre version 1.3 ou ultérieure https://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure https://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure https://www.gnu.org/licenses/fdl-1.3.html Pour vérifier voir https://libreavous.org" -metadata artist="April - Cause Commune" -metadata copyright="April - Cause Commune" -metadata genre="Podcast" -metadata contact="https://libreavous.org" -metadata description="${text}" ${fichiertempogg}
${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
@ -99,7 +99,7 @@ if [ "$mp3" = "yes" ]; then
eyeD3 --user-text-frame="WOAF:`echo "${url}"|sed 's/:/\\\:/' |sed 's/.ogg/.mp3/'`" ${destination}.mp3 eyeD3 --user-text-frame="WOAF:`echo "${url}"|sed 's/:/\\\:/' |sed 's/.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 https\://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure https\://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure https\://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 https\://artlibre.org/licence/lal/, licence Creative Commons By Sa version 2.0 ou ultérieure https\://creativecommons.org/licenses/by-sa/2.0/fr/ et licence GNU FDL version 1.3 ou ultérieure https\://www.gnu.org/licenses/fdl-1.3.html. Pour vérifier voir https\://libreavous.org" ${destination}.mp3
fi fi