summaryrefslogtreecommitdiff
path: root/src/instool
blob: addfc41e98b408b032622452d99817dbb3a243da (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
#!/bin/sh
set -eu

usage() {
	cat <<-'EOF'
		Usage: instool DIRECTORY (install|uninstall) TYPE FILE...
	EOF
}


DIRECTORY="${1:-}"
ACTION="${2:-}"
TYPE="${3:-}"
eval "$(assert-arg -- "$DIRECTORY" 'DIRECTORY')"
eval "$(assert-arg -- "$ACTION"    'ACTION')"
eval "$(assert-arg -- "$TYPE"      'TYPE')"
shift
shift
shift


case "$TYPE" in
	(man|mo)
		;;
	(*)
		echo "Bad type: $TYPE" >&2
		usage >&2
		exit 2
		;;
esac

case "$ACTION" in
	(install|uninstall)
		;;
	(*)
		usage >&2
		exit 2
		;;
esac



mkdirs() {
	if [ "$ACTION" = 'install' ]; then
		xargs -I% mkdir -p -- "$DIRECTORY"/%
	fi
}

man_dirnames() {
	find -- "$@" | xargs -I% basename % |
		sed 's|^\(.*\)\.\([a-z][a-z]\)\.\(.*\)$|\2/man\3|'
}

dirs_man() {
	{
		man_dirnames "$@"
		man_dirnames "$@" | cut -d/ -f2-
	} | LANG=POSIX.UTF-8 sort | uniq | mkdirs
}

type_man() {
	f="$1"
	lang="$(   basename -- "$f" | cut -d. -f2)"
	section="$(basename -- "$f" | cut -d. -f3-)"
	name="$(basename -- "${f%."$lang"."$section"}")"
	nameext="$name.$section"
	if [ "$ACTION" = install ]; then
		cp -- "$f" "$DIRECTORY/$lang/man${section}/$nameext"
		ln -fs "../en/man${section}/$nameext" \
			"$DIRECTORY/man${section}/$nameext"
	else
		rm -f -- \
			"$DIRECTORY/$lang/man${section}/$nameext" \
			"$DIRECTORY/man${section}/$nameext"
	fi
}

dirs_mo() {
	true
}

type_mo() {
	f="$1"
	lang="$(basename -- "$f" .mo)"
	name="$(basename -- "$(dirname -- "$f")")"
	dir="$DIRECTORY"/"$lang"/LC_MESSAGES
	if [ "$ACTION" = install ]; then
		mkdir -p -- "$dir"
		cp -- "$f" "$dir"/"$name".mo
	else
		rm -f -- "$dir"/"$name".mo
	fi
}


dirs_"$TYPE" "$@"
for f in "$@"; do
	type_"$TYPE" "$f"
done