VERSION=210125
source header.inc
if [ $0=ajouter_sclic ]; then echo "ajouter_sclic : Version "$VERSION; fi
PageScliC=$Projet/$1.sclic
echo "Page .scli classique .sclic = " $PageScliC
echo "------"
cd $Projet/$1/
echo -n "Répertoire de travail pour l'annexion classique des illustrations : "
pwd
echo "== Sources des images licences et contributeurs ==" > $PageScliC
echo "<span style="font-zize:85%";>Les "sources" listées pour chaque illustration fournissent des informations de licence plus détaillées, y compris le statut des droits d'auteurs, les détenteurs de ces droits et les conditions de licence.</span>" » $PageScliC
echo " " » $PageScliC
echo "<div style="font-zize:72%";>" » $PageScliC
cat $Projet/$1/$1.str | grep -n -i -e fichier: -e file: -e image: > $Projet/$1/$1.files
cat $Projet/$1/$1.str | grep -n -i -e fichier: -e .jpg -e .png -e .gif > $Projet/$1/$1.picts
cat $Projet/$1/$1.files | grep title |sed "s/<\/div>//g" | awk -F">" '{print $NF}' > $Projet/$1/$1.illustrations
 #cat $Projet/$1/$1.files | awk -F "=" '{for (i=1;i<=NF;i++) print $i "\n"}' | grep https | sed "s/\"/!/g" | cut -d '!' -f2-3 | grep https | tr '>' ! | sed "s/<\/a//g" |sed "s/!//g" > $Projet/$1/$1.links
cat $Projet/$1/$1.files | awk -F "=" '{for (i=1;i<=NF;i++) print $i "\n"}' | grep https | sed "s/\"/!/g" | cut -d '!' -f2-3 | grep https | tr '>' ! | sed "s/<\/a//g" |sed "s/!/\n/g" | grep https |grep -v 'upload' > $Projet/$1/$1.links
exit 0
 wget -P $Projet/$1 -r -linf -k -p -E -i $Projet/$1/$1.links
 cp ./commons.wikimedia.org/wiki/*.html .
 echo -n "" > html.list
 while read line
 do
 echo $line | awk -F"/" '{print $NF}' | cut -d '%' -f1 | cut -d '.' -f1 > tmp
 #echo $line | tr ' ' '_' > tmp
 read Image < tmp
 ls $Image*.html » html.list
 echo "Image : "$Image.html 
 done < $Projet/$1/$1.links
 echo "*** Références : image, src, lic, contrib. "
 while read line
 do
 echo ""
 echo ""
 echo "---- ligne lue = $line ---"
 echo ""
 mkd -pw '**' $line $line.tmp
 cat $line.tmp | tr ',' '\n' > $line.str 
 echo -n "Illustration : " > $line.title
 cat $line.str |grep wgTitle | cut -d '"' -f4 » $line.title
 cat $line.title » $PageScliC 
 cat $line.title
 echo -n ", "source : "https://"$Site"/w/index.php?title=" > $line.source
 echo $line | sed "s/.html//g" » $line.source
 cat $line.source » $PageScliC
 cat $line.source
 echo -n ", "licence : "" > $line.license
 cat $line.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}' » $line.license
 cat $line.license » $PageScliC
 cat $line.license
 echo -n ", "auteur(s) : "" > $line.auteur
 cat $line.str | grep -i -n -m1 -A 1 -e Author | grep -i -e user -e utilisteur -e auteur | tr '/' '\n' | grep -i -e user -e utilisteur -e auteur | cut -d '"' -f1 > tmp
 if test -s tmp 
 then echo "Nom d'auteur non vide"
 else echo "-" > tmp 
 fi
 cat tmp » $line.auteur
 cat $line.auteur » $PageScliC
 cat $line.auteur
 echo "" » $PageScliC
 done < html.list
 echo "</div>" » $PageScliC
 echo "" » $PageScliC
exit 0

Auto-éditer un wikilivre/Auto-référencer/ajouter sclip.inc.sh

<Syntaxhighlight lang="bash">
VERSION=200623
source header.inc
if [ $0=ajouter_sclip.inc ]; then echo "ajouter_sclip.inc : Version "$VERSION; fi
PageScliP=$Projet/$1.sclip
echo "Page .scli personnalisée .sclip = " $PageScliP
echo "------"
echo "== Sources des images licences et contributeurs ==" > $PageScliP
echo "Les "sources" listées pour chaque illustration fournissent des informations de licence plus détaillées, y compris le statut des droits d'auteurs, les détenteurs de ces droits et les conditions de licence." » $PageScliP
echo " " » $PageScliP
echo "" » $PageScliP
echo "" » $PageScliP
 cat $PageScliP
</Syntaxhighlight>

Auto-éditer un wikilivre/Auto-référencer/sclipco.sh

VERSION=210125
if [ $0=sclipco ]; then echo "sclipco : Version "$VERSION; fi
source ajouter_sclip.inc
Retour=$?
 if [ $Retour -gt '0' ] && [ $Personal = "true" ];
 then
 echo "Erreur au module shell 'ajouter_sclip'"
 exit 1
 fi
echo "fichier cible : "$PageScliP
echo "------"
 while read pjline
 do
 if [ $pjline != $1 ]
 then
 cd $Projet/$pjline
 ls Fichier*.html Fichier*.html.* | sed s/Fichier:/File:/g > $pjline.commonshtmlpict
 while read pict; do cp $Projet/$1/$pict .; done < $pjline.commonshtmlpict
 echo "Article : $pjline<br \>" » $PageScliP 
 echo "Article : $pjline"
 cat $pjline.commonshtmlpict | grep -v -E ".title|.source|.license|.auteur|.str|.tmp" > htmlcommons.list
 while read htmlcommonsline
 do
 cat $htmlcommonsline.title » $PageScliP 
 cat $htmlcommonsline.title
 cat $htmlcommonsline.source » $PageScliP 
 cat $htmlcommonsline.source
 cat $htmlcommonsline.license » $PageScliP
 cat $htmlcommonsline.license
 cat $htmlcommonsline.auteur » $PageScliP
 cat $htmlcommonsline.auteur
 echo "" » $PageScliP
 done < htmlcommons.list
 fi 
 done < $Projet/$1.pj
 echo "</div>" » $PageScliP
 echo "" » $PageScliP
exit 0

Auto-éditer un wikilivre/Auto-référencer/sclipwb.sh