260 lines
8.3 KiB
Plaintext
260 lines
8.3 KiB
Plaintext
|
##@cooked comments # -*- coding: utf-8 mode: sh -*- vim:sw=4:sts=4:et:ai:si:sta:fenc=utf-8
|
||
|
|
## Gestion de fichiers modèles
|
||
|
|
##@cooked nocomments
|
||
|
|
uprovide template
|
||
|
|
urequire base
|
||
|
|
|
||
|
|
function __template_prel_abspath() {
|
||
|
|
# afficher le chemin absolu du fichier $1 si on est dans le répertoire de
|
||
|
|
# destination $2, sinon l'exprimer par rapport au répertoire de destination
|
||
|
|
# $2 si c'est un chemin relatif.
|
||
|
|
if withinpath "$2" "$(pwd)"; then
|
||
|
|
abspath "$1"
|
||
|
|
else
|
||
|
|
abspath "$1" "$2"
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
function __template_check_srcdir() {
|
||
|
|
[ -n "$1" ] || {
|
||
|
|
eerror "Vous devez spécifier le répertoire source"
|
||
|
|
return 1
|
||
|
|
}
|
||
|
|
[ -d "$1" ] || {
|
||
|
|
eerror "$1: répertoire source introuvable"
|
||
|
|
return 1
|
||
|
|
}
|
||
|
|
return 0
|
||
|
|
}
|
||
|
|
function __template_check_destdir() {
|
||
|
|
[ -n "$1" ] || {
|
||
|
|
eerror "Vous devez spécifier le répertoire de destination"
|
||
|
|
return 1
|
||
|
|
}
|
||
|
|
[ -d "$1" ] || {
|
||
|
|
eerror "$1: répertoire destination introuvable"
|
||
|
|
return 1
|
||
|
|
}
|
||
|
|
return 0
|
||
|
|
}
|
||
|
|
function __template_plsort() {
|
||
|
|
# Trier par taille du chemin
|
||
|
|
awk '{print length($0) ":" $0}' |
|
||
|
|
sort -n "$@" |
|
||
|
|
awk '{sub(/[0-9]+:/, ""); print}'
|
||
|
|
}
|
||
|
|
|
||
|
|
function template_list() {
|
||
|
|
# Lister les fichiers du répertoire source $1 qui seraient fusionnées avec
|
||
|
|
# template_merge() ou supprimés avec template_unmerge() du répertoire
|
||
|
|
# destination $2. Si des chemins sont spécifiés avec les arguments $3..@, ne
|
||
|
|
# traiter que les fichiers qui correspondent à ces spécifications
|
||
|
|
local srcdir="$1"; shift
|
||
|
|
__template_check_srcdir "$srcdir" || return 1
|
||
|
|
setx srcdir=abspath "$srcdir"
|
||
|
|
|
||
|
|
local destdir="${1:-.}"; shift
|
||
|
|
__template_check_destdir "$destdir" || return 1
|
||
|
|
setx destdir=abspath "$destdir"
|
||
|
|
|
||
|
|
local rel2pwd
|
||
|
|
withinpath "$destdir" "$(pwd)" && rel2pwd=1
|
||
|
|
|
||
|
|
if [ $# -eq 0 ]; then
|
||
|
|
[ -n "$rel2pwd" ] && set -- . || set -- "$destdir"
|
||
|
|
fi
|
||
|
|
|
||
|
|
local spec srcspec src dest list
|
||
|
|
local -a srcfiles
|
||
|
|
for spec in "$@"; do
|
||
|
|
setx srcspec=__template_prel_abspath "$spec" "$destdir"
|
||
|
|
withinpath "$destdir" "$srcspec" || continue
|
||
|
|
srcspec="${srcspec#$destdir}"
|
||
|
|
|
||
|
|
[ -e "$srcdir$srcspec" ] || continue
|
||
|
|
array_from_lines srcfiles "$(find "$srcdir$srcspec" -type f)"
|
||
|
|
for src in "${srcfiles[@]}"; do
|
||
|
|
dest="$destdir/${src#$srcdir/}"
|
||
|
|
|
||
|
|
list=
|
||
|
|
if [ -L "$dest" ]; then
|
||
|
|
:
|
||
|
|
elif [ -f "$dest" ]; then
|
||
|
|
testsame "$src" "$dest" && list=1
|
||
|
|
else
|
||
|
|
list=1
|
||
|
|
fi
|
||
|
|
[ -n "$list" ] || continue
|
||
|
|
|
||
|
|
if [ -n "$rel2pwd" ]; then
|
||
|
|
relpath "$dest"
|
||
|
|
else
|
||
|
|
echo "${src#$srcdir/}"
|
||
|
|
fi
|
||
|
|
done
|
||
|
|
done | csort -u
|
||
|
|
}
|
||
|
|
|
||
|
|
function template_merge() {
|
||
|
|
# Copier dans le répertoire destination $2 tous les fichiers provenant du
|
||
|
|
# répertoire source $1 correspondant aux spécifications $3..@, si ces fichiers
|
||
|
|
# n'ont pas été modifiés dans le répertoire de destination.
|
||
|
|
local srcdir="$1"; shift
|
||
|
|
__template_check_srcdir "$srcdir" || return 1
|
||
|
|
setx srcdir=abspath "$srcdir"
|
||
|
|
|
||
|
|
local destdir="${1:-.}"; shift
|
||
|
|
__template_check_destdir "$destdir" || return 1
|
||
|
|
setx destdir=abspath "$destdir"
|
||
|
|
|
||
|
|
[ $# -gt 0 ] || set -- "$destdir"
|
||
|
|
|
||
|
|
local spec srcspec src dest
|
||
|
|
local srcfiles
|
||
|
|
for spec in "$@"; do
|
||
|
|
setx srcspec=__template_prel_abspath "$spec"
|
||
|
|
if ! withinpath "$destdir" "$srcspec"; then
|
||
|
|
ewarn "$spec: fichier ignoré"
|
||
|
|
continue
|
||
|
|
fi
|
||
|
|
srcspec="${srcspec#$destdir}"
|
||
|
|
|
||
|
|
[ -e "$srcdir$srcspec" ] || continue
|
||
|
|
ebegin "$srcspec"
|
||
|
|
s=0
|
||
|
|
array_from_lines srcfiles "$(find "$srcdir$srcspec" -type f)"
|
||
|
|
for src in "${srcfiles[@]}"; do
|
||
|
|
dest="$destdir/${src#$srcdir/}"
|
||
|
|
|
||
|
|
if [ -L "$dest" ]; then
|
||
|
|
edotw 0 "LOCALLY MODIFIED: $(ppath "$dest")"
|
||
|
|
elif [ -f "$dest" ]; then
|
||
|
|
if testsame "$src" "$dest"; then
|
||
|
|
show_debug && edot 0 "ALREADY COPIED: $(ppath "$dest")"
|
||
|
|
else
|
||
|
|
edotw 0 "LOCALLY MODIFIED: $(ppath "$dest")"
|
||
|
|
fi
|
||
|
|
else
|
||
|
|
mkdirof "$dest"
|
||
|
|
cp "$src" "$dest"; r=$?
|
||
|
|
edot $r "COPY: $(ppath "$dest")"
|
||
|
|
[ $r -eq 0 ] || s=$r
|
||
|
|
fi
|
||
|
|
done
|
||
|
|
eend $s
|
||
|
|
done
|
||
|
|
}
|
||
|
|
|
||
|
|
function template_unmerge() {
|
||
|
|
# Supprimer du répertoire de destination $2 tous les fichiers provenant du
|
||
|
|
# répertoire source $1 et qui n'ont pas été modifiés. Si des chemins sont
|
||
|
|
# spécifiés avec les arguments $3..@, ne traiter que les fichiers qui
|
||
|
|
# correspondent à ces spécifications.
|
||
|
|
local srcdir="$1"; shift
|
||
|
|
__template_check_srcdir "$srcdir" || return 1
|
||
|
|
setx srcdir=abspath "$srcdir"
|
||
|
|
|
||
|
|
local destdir="${1:-.}"; shift
|
||
|
|
__template_check_destdir "$destdir" || return 1
|
||
|
|
setx destdir=abspath "$destdir"
|
||
|
|
|
||
|
|
[ $# -gt 0 ] || set -- "$destdir"
|
||
|
|
|
||
|
|
local spec srcspec src dest
|
||
|
|
local srcfiles
|
||
|
|
for spec in "$@"; do
|
||
|
|
setx srcspec=__template_prel_abspath "$spec"
|
||
|
|
if ! withinpath "$destdir" "$srcspec"; then
|
||
|
|
ewarn "$spec: fichier ignoré"
|
||
|
|
continue
|
||
|
|
fi
|
||
|
|
srcspec="${srcspec#$destdir}"
|
||
|
|
|
||
|
|
[ -e "$srcdir$srcspec" ] || continue
|
||
|
|
s=0
|
||
|
|
ebegin "$srcspec"
|
||
|
|
array_from_lines files "$(find "$srcdir$srcspec" -type f)"
|
||
|
|
for src in "${files[@]}"; do
|
||
|
|
dest="$destdir/${src#$srcdir/}"
|
||
|
|
|
||
|
|
if [ -L "$dest" ]; then
|
||
|
|
edotw 0 "LOCALLY MODIFIED: $(ppath "$dest")"
|
||
|
|
elif [ -f "$dest" ]; then
|
||
|
|
if testsame "$src" "$dest"; then
|
||
|
|
rm -f "$dest"; r=$?
|
||
|
|
edot $r "REMOVE: $(ppath "$dest")"
|
||
|
|
[ $r -eq 0 ] || s=$r
|
||
|
|
else
|
||
|
|
edotw 0 "LOCALLY MODIFIED: $(ppath "$dest")"
|
||
|
|
fi
|
||
|
|
else
|
||
|
|
show_debug && edot 0 "ALREADY REMOVED: $(ppath "$dest")"
|
||
|
|
fi
|
||
|
|
done
|
||
|
|
eend $s
|
||
|
|
done
|
||
|
|
}
|
||
|
|
|
||
|
|
function template_cleandest() {
|
||
|
|
# Supprimer dans le répertoire de destination $1 tous les répertoires vides.
|
||
|
|
# Cette fonction est habituellement utilisée après template_unmerge()
|
||
|
|
local -a dirs
|
||
|
|
[ -d "$1" ] || return 1
|
||
|
|
array_from_lines dirs "$(cd "$1"; find "$1" -type d | __template_plsort -r)"
|
||
|
|
rmdir "${dirs[@]}" 2>/dev/null
|
||
|
|
}
|
||
|
|
|
||
|
|
function template_diff() {
|
||
|
|
# Afficher les différences entre les fichiers du répertoire de destination $2 et
|
||
|
|
# les fichiers du répertoire source $1
|
||
|
|
local srcdir="$1"; shift
|
||
|
|
__template_check_srcdir "$srcdir" || return 1
|
||
|
|
setx srcdir=abspath "$srcdir"
|
||
|
|
|
||
|
|
local destdir="${1:-.}"; shift
|
||
|
|
__template_check_destdir "$destdir" || return 1
|
||
|
|
setx destdir=abspath "$destdir"
|
||
|
|
|
||
|
|
local src dest
|
||
|
|
local -a srcfiles
|
||
|
|
array_from_lines srcfiles "$(find "$srcdir" -type f)"
|
||
|
|
for src in "${srcfiles[@]}"; do
|
||
|
|
dest="$destdir/${src#$srcdir/}"
|
||
|
|
if [ -f "$dest" ] && testdiff "$src" "$dest"; then
|
||
|
|
diff -uwB "$src" "$dest"
|
||
|
|
fi
|
||
|
|
done | page_maybe -S
|
||
|
|
}
|
||
|
|
|
||
|
|
function override_display_templatectl_help() { :; }
|
||
|
|
function templatectl() {
|
||
|
|
# fonction de haut niveau qui facilite l'utilisation des fonctions template_*
|
||
|
|
# définir la fonction override_display_templatectl_help() pour l'affichage de l'aide
|
||
|
|
local -a args
|
||
|
|
local help list merge unmerge clean diff auto=1
|
||
|
|
local destdir
|
||
|
|
parse_opts "${PRETTYOPTS[@]}" \
|
||
|
|
--help help=1 \
|
||
|
|
-s:,--srcdir: srcdir= \
|
||
|
|
-o:,--destdir: destdir= \
|
||
|
|
-l,--list '$list=1; auto=' \
|
||
|
|
-m,--merge '$merge=1; auto=' \
|
||
|
|
-z,--unmerge '$unmerge=1; auto=' \
|
||
|
|
-C,--clean '$clean=1; auto=' \
|
||
|
|
-d,--diff '$diff=1; auto=' \
|
||
|
|
@ args -- "$@" && set -- "${args[@]}" || { eerror "$args"; return 1; }
|
||
|
|
|
||
|
|
[ -n "$help" ] && { override_display_templatectl_help; return 0; }
|
||
|
|
|
||
|
|
__template_check_srcdir "$srcdir" || return 1
|
||
|
|
[ -n "$destdir" ] || destdir=.
|
||
|
|
__template_check_destdir "$destdir" || return 1
|
||
|
|
[ -n "$auto" ] && list=1
|
||
|
|
|
||
|
|
[ -n "$list" ] && template_list "$srcdir" "$destdir" "$@"
|
||
|
|
[ -n "$merge" ] && template_merge "$srcdir" "$destdir" "$@"
|
||
|
|
[ -n "$unmerge" ] && template_unmerge "$srcdir" "$destdir" "$@"
|
||
|
|
[ -n "$clean" ] && template_cleandest "$destdir" "$@"
|
||
|
|
[ -n "$diff" ] && template_diff "$srcdir" "$destdir" "$@"
|
||
|
|
return 0
|
||
|
|
}
|