Les images sont téléchargées depuis le site wikibooks
Illustrations are downloaded from wikibooks
add_sclipwb.sh.
This is the master command for personified source, copyright, license for images on wikibooks (sclipwb) and include en_sclipwb.inc or fr_sclipwb.inc
TEXTDOMAIN=add_sclipwb
TEXTDOMAINDIR="/usr/share/locale"
VERSION=211008
 . gettext.sh
 if [ "$0" = "./add-sclipwb" ]; then echo "add-sclipwb : Version "$VERSION; fi
 if test -e ~/Add_appendix/bin/header.inc; then source ~/Add_appendix/bin/header.inc
 else echo $"$Bindir/header.inc not found. Execute sbin/cp-src2bin.sh"; exit -1
 fi
 Projectdir=$Workdir/books/$1
 PageSclipwb="$Projectdir/$1.sclipwb"
 echo $PageSclipwb
 source $Bindir/scli.inc
 cat $Projectdir/$1.scli > $PageSclipwb
 if [ "$2" = "--t" ]
 then 
 pwd > pwd.txt; read Localdir < pwd.txt; rm pwd.txt
 if [ "$Site" = "fr.wikibooks.org" ]; then source $Localdir/fr_sclipwb.inc.sh
 else source $Localdir/en_sclipwb.inc.sh
 fi
 else
 if [ "$Site" = "fr.wikibooks.org" ]; then source $Bindir/fr_sclipwb.inc
 else source $Bindir/en_sclipwb.inc
 fi
 fi
en_sclipwb.inc.
. gettext.sh
TEXTDOMAIN=en_sclipwb.inc
TEXTDOMAINDIR="/usr/share/locale"
VERSION=211008
 cd $Projectdir
 if [ "$2" = "--t" ]
 then 
 echo "Projectdir = $Projectdir"
 echo "en_sclipwb version = $VERSION"
 fi
 PageScliPwb=$Projectdir/$1.sclipwb
 while read pjline
 do
 if [ $pjline != $1 ]
 then
 cd $Projectdir/$pjline
 cat $Projectdir/$pjline/$pjline.str | grep -n -i -e Fichier: -e file: -e image: | sed -f $RepCom/$Conversions > $Projectdir/$pjline/$pjline.files
 cat $Projectdir/$pjline/$pjline.str | grep -n -i -e fichier: -e .jpg -e .png -e .gif | sed -f $RepCom/$Conversions> $Projectdir/$pjline/$pjline.picts
 cat $Projectdir/$pjline/$pjline.files | grep title |sed "s/<\/div>//g" | awk -F">" '{print $NF}' > $Projectdir/$pjline/$pjline.illustrations
 cat $Projectdir/$pjline/$pjline.files | awk -F"=" '{for (i=1;i<=NF;i++) print $i "\n"}' | grep https://$Site | sed "s/\"/!/g" | cut -d '!' -f2 > $Projectdir/$pjline/$pjline.images
 wget -P $Projectdir/$pjline -r -linf -k -p -E -i $Projectdir/$pjline/$pjline.images
 cp $Projectdir/$pjline/$Site/wiki/*.html $Projectdir/$pjline/.
 echo -n "" > html.doublons 
 while read pictline
 do
 #echo $pictline | awk -F"/" '{for (i=1;i<=NF;i+=2) print $i "\n"}' #| cut -d '%' -f1 | cut -d '.' -f1 > tmp
 echo $pictline | awk -F"/" '{ print $NF".html"}' » html.doublons
 echo -n "" > html.list
 END { for ( i = 1 ; i <= NR ; i=i+2 ) {
 print memfile[i] » "html.list"
 # print "Fin"
 } ' html.doublons 
 done < $Projectdir/$pjline/$pjline.images
 echo "$(gettext ' Article : ')$pjline<br \>" » $PageScliPwb
 echo "$(gettext ' Article : ')$pjline"
 while read htmlline
 do
 echo ""
 echo ""
 echo "$(gettext ' ---- line read = $htmlline --- ')"
 echo ""
 mkd -pw '**' $htmlline $htmlline.tmp
 cat $htmlline.tmp | tr ',' '\n' > $htmlline.str 
 echo -n "$(gettext ' Illustration : ')" > $htmlline.title
 cat $htmlline.str | grep wgTitle | cut -d '"' -f4 » $htmlline.title
 cat $htmlline.title » $PageScliPwb 
 cat $htmlline.title
 echo -n ""$(gettext ', source : ')"https://"$Site"/w/index.php?title=" > $htmlline.source
 echo $htmlline.str | sed "s/.html//g" | sed "s/.str//g" » $htmlline.source
 cat $htmlline.source » $PageScliPwb
 cat $htmlline.source
 echo -n "$(gettext ' , "license : ')" " > $htmlline.license
 cat $htmlline.str | grep licensetpl_short | sed "s/<td>//g" | sed "s/<span class//g" | sed "s/<\/span>//g" | sed "s/style=\"display:none;\"//g" | tr '=' '\n' | grep licensetpl_short | awk -F">" '{print $NF}' » $htmlline.license
 cat $htmlline.license » $PageScliPwb
 cat $htmlline.license
 echo -n " > tmp
 echo -n "$(gettext ' , "author(s) : " ')" > $htmlline.author
 cat $htmlline.str | grep -i -n -m1 -A 1 -e Author -e Auteur | tr '/' '\n' | grep -i -e user -e utilisteur -e auteur -e author | cut -d '"' -f1 | grep -i -e user -e utilisteur -e auteur -e author > tmp
 read Tmp < tmp
 #T
 echo "Tmp = $Tmp"
 if [ "$Tmp" = "" ]
 #T then echo "tmp vide"
 then echo "-" > tmp 
 fi
 #T echo $Tmp | cut -d '-' -f2 | sed "s/\.\ /%/g" | cut -d '%' -f1 
 cat tmp » $htmlline.author
 cat $htmlline.author » $PageScliPwb
 cat $htmlline.author
 echo "" » $PageScliPwb
 done < html.list
 fi
 done < $Projectdir/$1.pj
 echo "</div>" » $PageScliPwb
 echo "$(gettext ' ')" » $PageScliPwb
exit 0
fr_sclipwb.sh.
Version=210707
 cd $Projectdir
 if [ "$2" = "--t" ]
 then 
 echo "Projectdir = $Projectdir"
 echo "fr_sclipwb version = $Version"
 fi
 PageScliPwb=$Projectdir/$1.sclipwb
 while read pjline
 do
 if [ $pjline != $1 ]
 then
 cd $Projectdir/$pjline
 cat $Projectdir/$pjline/$pjline.str | grep -n -i -e Fichier: -e file: -e image: | sed -f $RepCom/$Conversions > $Projectdir/$pjline/$pjline.files
 cat $Projectdir/$pjline/$pjline.str | grep -n -i -e fichier: -e .jpg -e .png -e .gif | sed -f $RepCom/$Conversions> $Projectdir/$pjline/$pjline.picts
 cat $Projectdir/$pjline/$pjline.files | grep title |sed "s/<\/div>//g" | awk -F">" '{print $NF}' > $Projectdir/$pjline/$pjline.illustrations
 cat $Projectdir/$pjline/$pjline.files | awk -F"=" '{for (i=1;i<=NF;i++) print $i "\n"}' | grep https://fr.wikibooks.org | sed "s/\"/!/g" | cut -d '!' -f2 > $Projectdir/$pjline/$pjline.images
 wget -P $Projectdir/$pjline -r -linf -k -p -E -i $Projectdir/$pjline/$pjline.images
 cp $Projectdir/$pjline/fr.wikibooks.org/wiki/*.html $Projectdir/$pjline/.
 echo -n "" > html.doublons 
 while read pictline
 do
 #echo $pictline | awk -F"/" '{for (i=1;i<=NF;i+=2) print $i "\n"}' #| cut -d '%' -f1 | cut -d '.' -f1 > tmp
 echo $pictline | awk -F"/" '{ print $NF".html"}' » html.doublons
 echo -n "" > html.list
 END { for ( i = 1 ; i <= NR ; i=i+2 ) {
 print memfile[i] » "html.list"
 # print "Fin"
 } ' html.doublons 
 done < $Projectdir/$pjline/$pjline.images
 echo "Article : $pjline<br \>" » $PageScliPwb
 echo "Article : $pjline"
 while read htmlline
 do
 echo ""
 echo ""
 echo "---- ligne lue = $htmlline ---"
 echo ""
 mkd -pw '**' $htmlline $htmlline.tmp
 cat $htmlline.tmp | tr ',' '\n' > $htmlline.str 
 echo -n "Illustration : " > $htmlline.title
 cat $htmlline.str |grep wgTitle | cut -d '"' -f4 » $htmlline.title
 cat $htmlline.title » $PageScliPwb 
 cat $htmlline.title
 echo -n ", "source : "https://"$Site"/w/index.php?title=" > $htmlline.source
 echo $htmlline.str | sed "s/.html//g" | sed "s/.str//g" » $htmlline.source
 cat $htmlline.source » $PageScliPwb
 cat $htmlline.source
 echo -n ", "licence : "" > $htmlline.license
 cat $htmlline.str | grep licensetpl_short | sed "s/<td>//g" | sed "s/<span class//g" | sed "s/<\/span>//g" | sed "s/style=\"display:none;\"//g" | tr '=' '\n' | grep licensetpl_short | awk -F">" '{print $NF}' » $htmlline.license
 cat $htmlline.license » $PageScliPwb
 cat $htmlline.license
 echo -n " > tmp
 echo -n ", "auteur(s) : "" > $htmlline.auteur
 cat $htmlline.str | grep -i -n -m1 -A 1 -e Author -e Auteur | tr '/' '\n' | grep -i -e user -e utilisteur -e auteur -e author | cut -d '"' -f1 | grep -i -e user -e utilisteur -e auteur -e author > tmp
 read Tmp < tmp
 #T
 echo "Tmp = $Tmp"
 if [ "$Tmp" = "" ]
 #T then echo "tmp vide"
 then echo "-" > tmp 
 fi
 #T echo $Tmp | cut -d '-' -f2 | sed "s/\.\ /%/g" | cut -d '%' -f1 
 cat tmp » $htmlline.auteur
 cat $htmlline.auteur » $PageScliPwb
 cat $htmlline.auteur
 echo "" » $PageScliPwb
 done < html.list
 fi
 done < $Projectdir/$1.pj
 echo "</div>" » $PageScliPwb
 echo "" » $PageScliPwb
exit 0
tests_add_sclipwb.bash.
VERSION=210707
 clear
 pwd > pwd.txt
 if cat pwd.txt | grep ~/Annexer; then Workdir=~/Annexer; elif cat pwd.txt | grep ~/Add_appendix; \
 then Workdir=~/Add_appendix; else echo "Workind directory not found"; exit -1;fi
 rm pwd.txt 
 source $Workdir/vars/installdir.var
 echo " tests_add_sclipwb.bash version = $VERSION"
 sleep 2
 echo -e "\033[1;33m Control add_sclipwb.sh in the local test directory \033[0m" > text-control.txt 
 echo -e "\033[1;33m Please check that the comment line does not contain an command \033[0m" » text-control.txt
 echo » text-control.txt
 echo -e "\033[1;33m### add_sclipwb.sh ###\033[0m" » text-control.txt
 grep -n -e "#T\|#O\|#P" add_sclipwb.sh » text-control.txt
 echo » text-control.txt
 echo -e "\033[1;33m###### en_sclipwb.inc.sh ###\033[0m" » text-control.txt
 grep -n -e "#T\|#O\|#P" en_sclipwb.inc.sh » text-control.txt 
 echo » text-control.txt
 echo -e "\033[1;33m###### fr_sclipwb.inc.sh ###\033[0m" » text-control.txt
 grep -n -e "#T\|#O\|#P" fr_sclipwb.inc.sh » text-control.txt 
 echo -e "\033[1;33m ---- \033[0m" » text-control.txt
 more text-control.txt
 echo; echo -e "\033[47m\033[1;30m Continue ? \033[0m"
 read -s -e -n 1 -t 60 -p "y/n ? : " Inkey;echo
 if [ "$Inkey" != 'y' ]; then echo " Inkey is not yes, or time out after 60 sec, exit from $0"; exit 0;fi
 #O Test with first param empty
 echo "Command ./add_sclipwb.sh without parameter"
 ./add_sclipwb.sh
 echo;echo " wait for 2 sec"
 sleep 2; echo "----"
 echo " All tests whith parameter --t" 
 Inkey=1
 for i in 'seq 1 9'
 do 
 cat $Workdir/tests/sitelist.txt; echo
 echo -e "\033[47m\033[1;30m Choose the site number to test \033[0m"
 read -s -n1 -p "inkey number 1 to 9 : " Inkey; echo;
 if [ "$Inkey" = "1" ]; then ./add_sclipwb.sh LivreTest --t
 elif [ "$Inkey" = "2" ]; then ./add_sclipwb.sh Hélices_de_navires_à_déplacement --t
 elif [ "$Inkey" = "3" ]; then ./add_sclipwb.sh TestBook --t
 elif [ "$Inkey" = "4" ]; then ./add_sclipwb.sh Mkd_\(Extracteur_de_documents\) --t
 elif [ "$Inkey" = "5" ]; then ./add_sclipwb.sh Faire_fleurir_le_sel --t
 elif [ "$Inkey" = "6" ]; then ./add_sclipwb.sh Faire_sa_fleur_de_sel --t 
 elif [ "$Inkey" = "7" ]; then ./add_sclipwb.sh Guide_to_Unix --t
 elif [ "$Inkey" = "8" ]; then ./add_sclipwb.sh Tests_de_la_capacité_des_batteries_d%27accumulateurs --t
 elif [ "$Inkey" = "9" ]; then ./add_sclipwb.sh LivreTest --t
 else echo "$inkey local url of site not found"; exit 0
 fi
 done