#!/bin/csh
#######################################################################################################################################
# #
# F I C H I E R D E S T I N E A L ' A L I A S ' GserveurB ' : #
# #
# #
# Author of '$xiMos/GserveurB$vv$Y' : #
# #
# Jean-Francois COLONNA (LACTAMME, 20030406111359). #
# #
#######################################################################################################################################
if ("$ExEcUtEr_GserveurB" == "$K_VIDE") then
# Test introduit le 20211227105827... #
set ExEcUtEr_GserveurB=$EXIST
# Par defaut on va executer les 'Gserveur's... #
else
endif
#20211115120221____:set NoCheckServeur=$EXIST #
#20211115120221____:source $xiMo/serveur.01$vv$Y #
#20211115120221____:unset NoCheckServeur #
source $xiMo/serveur.02$vv$Y
# Ceci fut introduit le 20051222105313 pour l'usage 'v $xiMo/UpdateAll$vv$Z GserveurB' afin #
# que le '$CSH -s' connaisse la variable '$HomePage'... #
if ( ("$sHOTE" == "$sPORTABLE_1") \
|| ("$sHOTE" == "$sPORTABLE_2") \
|| ("$sHOTE" == "$sPORTABLE_3") \
|| ("$sHOTE" == "$sPORTABLE_4") \
|| ("$sHOTE" == "$sPORTABLE_5") \
|| ("$sHOTE" == "$sPORTABLE_6") \
|| ("$sHOTE" == "$sPORTABLE_7") \
|| ("$sHOTE" == "$msREFERENCE") \
) then
# Introduit le 20190926142232 par "symetrie" avec 'v $xiMos/Gserveur$vv$Y .xiMo.GenTable.Z'. #
# #
# La MACHINE '$sPORTABLE_7' a ete introduite le 20211124144612... #
if ($ExEcUtEr_GserveurB == $EXIST) then
# Test introduit le 20211227110629... #
#20190924160931____:Gserveur Galerie_NewPictures #
source $xiMos/GenTable.Galerie_NewPictures$vv$Y
#20190924161439____:source $xiMos/GenTable.Galerie_BestOf$vv$Y #
# Mis ici en mode sequentiel le 20190924110116 a cause des tables '$ListeT_NewPictures_1' et #
# '$ListeT_NewPictures_2' que generent ce 'Gserveur'... #
# #
# En fait, le 20190924160931 cela a ete remplace par deux 'GenTable's plus intelligents... #
# Le '$xiMos/GenTable.Galerie_BestOf$vv$Y' a ete supprime le 20190924161439 car, en effet, #
# il est inutile... #
else
endif
else
endif
set GsErVeUr=GserveurL
# A priori, il va y avoir du parallelisme et il faut donc supprimer les messages d'erreur #
# concernant les anomalies de liens inter-pages... #
if ($?FindExec_Parallele == $EXIST) then
if ($?FindExec_Parallele == $NEXIST) then
set GsErVeUr=Gserveur
# En mode sequentiel, les messages d'erreur concernant les anomalies de liens inter-pages #
# peuvent etre edites (introduit le 20130308113704). #
else
endif
else
endif
FilSTmpB FTGserveurB
# Introduit le 20130305095912... #
FilSTmpB FTGserveurB_trie
# Introduit le 20230615113856... #
#20211111095957____:alias GeNeReG 'set CoMmAnDe=\!:1 ; set FiChIer=\!:2* ; \\ #
#20211111095957____: set CoMmAnDeS="$K_VIDE" ; \\ #
#20211111095957____: set CoMmAnDeS="$CoMmAnDeS"" set NoCheckServeur=$EXIST ; " ; \\ #
#20211111095957____: set CoMmAnDeS="$CoMmAnDeS"" source $xiMo/serveur.01$vv$Y ; " ; \\ #
#20211111095957____: set CoMmAnDeS="$CoMmAnDeS"" unset NoCheckServeur ; " ; \\ #
#20211111095957____: set CoMmAnDeS="$CoMmAnDeS"" $CoMmAnDe $FiChIer" ; \\ #
#20211111095957____: echo "$CoMmAnDeS" >> $FTGserveurB ; \\ #
#20211111095957____: unset CoMmAnDe FiChIer CoMmAnDeS' #
alias GeNeReG 'set CoMmAnDe=\!:1 ; set FiChIer=\!:2* ; \\
set CoMmAnDeS="$K_VIDE" ; \\
set CoMmAnDeS="$CoMmAnDeS"'"'"'source $xiMo/serveur.02$vv$Y ;'"'"' ; \\
set CoMmAnDeS="$CoMmAnDeS"" $CoMmAnDe $FiChIer" ; \\
echo "$CoMmAnDeS" >> $FTGserveurB ; \\
unset CoMmAnDe FiChIer CoMmAnDeS'
# Le 20211111095957 'GeNeReG' a ete allege avec le remplacement de 'v $xiMo/serveur.01$vv$Y' #
# par 'v $xiMo/serveur.02$vv$Y' et d'autre part la mise entre '$K_QS's du 'source' (au lieu #
# de '$K_QD's... #
set PaGe_AcCuEiL="AVirtualSpaceTimeTravelMachine"
#20180316171611____:GeNeReG $GsErVeUr $PaGe_AcCuEiL #
GeNeReG $GsErVeUr $PaGe_AcCuEiL$ANGLAIS
GeNeReG $GsErVeUr $PaGe_AcCuEiL$FRANCAIS
# On notera qu'a compter du 20051221104900, les versions '$FullVisual's ne sont plus utiles, #
# mais qu'elles sont malgre tout conservees afin de ne pas perdre d'eventuels referencements. #
# #
# La modification du 20180316171611 evoquant explicitement '$PaGe_AcCuEiL$ANGLAIS' et #
# '$PaGe_AcCuEiL$FRANCAIS' (et non plus simplement '$PaGe_AcCuEiL') est destinee a favoriser #
# le parallelisme. En effet, les experiences ont montre que '$PaGe_AcCuEiL' seul etait le #
# 'GeNeReG' le plus lent de tous car il y a alors quatre pages a generer successivement (ne #
# pas oublier la generation des deux pages de type '$FullVisual'...). #
GeNeReG $GsErVeUr GenieLogiciel_VisualisationScientifique.01$vv
# Introduit le 20090610110450 afin de retrouver mes activites sur la page d'accueil du CMAP, #
# le logo de referencement devant etre 'v $xiirk/LORE.N3'. #
GeNeReG $GsErVeUr JFC
GeNeReG $GsErVeUr demo_14
# Mise a jour de la (des) page(s) d'accueil... #
if (($HomePage != $PaGe_AcCuEiL$ANGLAIS) && ($HomePage != $PaGe_AcCuEiL$FRANCAIS)) then
$GsErVeUr GeNeReG $HomePage
# Mise a jour de la "home page" si necessaire... #
else
endif
unset PaGe_AcCuEiL
GeNeReG $GsErVeUr AProposSite.01
GeNeReG $GsErVeUr Galeries.01$vv
GeNeReG $GsErVeUr help.
GeNeReG $GsErVeUr MorePages.
# Mise a jour des pages d'aide diverses... #
#20211111095957____:GeNeReG $GsErVeUr MorePages$ANGLAIS. #
#20211111095957____:GeNeReG $GsErVeUr MorePages$FRANCAIS. #
GeNeReG $GsErVeUr MorePages
# Les deux pages {$ANGLAIS,$FRANCAIS} ont ete introduites le 20211110124026... #
#20190924110116____:GeNeReG $GsErVeUr Galerie_NewPictures #
GeNeReG $GsErVeUr Galerie_NewPictures
# Introduit le 20160621131649 car, en effet, elle contient une reference au nombre #
# d'images presentes... #
GeNeReG $GsErVeUr $ListeCatalogue
GeNeReG $GsErVeUr $ListeVCatalogue
GeNeReG $GsErVeUr $ListeVACatalogue
# Introduit le 20220212203408... #
GeNeReG $GsErVeUr $ListeVCCatalogue
# Introduit le 20220212203408... #
GeNeReG $GsErVeUr $ListeTCatalogue
# Introduit le 20171208142258... #
GeNeReG $GsErVeUr $ListePCatalogue
# Introduit le 20171221100312... #
if ("$mHOTE" != "$mDev_WWW") then
GeNeReG $GsErVeUr $ListeLog_xiMc
# Ceci a ete introduit le 20060831170910 afin de regenerer periodiquement cette page, #
# sachant que sur '$mDev_WWW' c'est automatique ('v $FPerioExec .xiMo.Mconsult.Z'). #
else
endif
$CA $FTGserveurB | \
$SOR -u \
>> $FTGserveurB_trie
#20230615113856____:ro $FTGserveurB #
ro $FTGserveurB_trie
if ($ExEcUtEr_GserveurB == $EXIST) then
# Test introduit le 20211227105827... #
#20130305104104____:$xcg/parallele.1N$X commande="$xcs/Linda$vv$Z $FTGserveurB" p14=FAUX #
#20130307181610____:setenv FindExec_Parallele $NEXIST #
setenv FindExec_MessagesBP $NEXIST
#20230615113856____: $xcg/ExecParallele.01$Z $FTGserveurB #
$xcg/ExecParallele.01$Z $FTGserveurB_trie
unsetenv FindExec_MessagesBP
# Execution parallele de 'GserveurB' introduite le 20130305095912... #
# #
# On notera que c'est a cause du parallelisme que 'GserveurL' est utilise a la place #
# de 'Gserveur' car, en effet, etant donne que deux pages peuvent etre en generation #
# simultanement les references qu'elles entretiennent entre-elles peuvent etre momentanement #
# inexistantes... #
# #
# Je rappelle le 20130307132755 que : #
# #
# setenv FindExec_Parallele $NEXIST #
# #
# permet d'inhinber le parallelisme, mais qu'a cette date il est impossible de l'inhiber, #
# d'ou le forcage qui precede. Grace a 'v $xcg/FindExec.01$Z 20130307175501' cela a pu etre #
# reautorise le 20130307181610... #
# #
# La suppression des messages a ete introduite le 20151007143205... #
else
#20230615113856____: $CA $FTGserveurB | \ #
#20230615113856____: $Mor #
$CA $FTGserveurB_trie | \
$Mor
# La possibilite de recuperer les 'Gserveur's a ete introduite le 20211227105827 afin de #
# pouvoir les ajouter a une autre liste de 'Gserveur's... #
endif
FilSTmpE FTGserveurB_trie
# Introduit le 20230615113856... #
FilSTmpE FTGserveurB
unset GsErVeUr