summaryrefslogtreecommitdiff
blob: b46c226f8ee2ead659aa2cae251d8d3e63eb99a7 (plain)
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
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
# -*-eselect-*-  vim: ft=eselect
# Copyright 2014-2020 Gentoo Authors
# Distributed under the terms of the GNU General Public License v2

inherit config multilib

DESCRIPTION="Manage lua symlinks"
MAINTAINER="mva@gentoo.org"

HEADER_FILES="lauxlib.h luaconf.h lua.h lua.hpp lualib.h"

remove_symlinks() {
	rm -f "${EROOT}"/usr/bin/{lua,luac} &>/dev/null 
	for dir in $(get_libdirs) ; do
		rm -f "${EROOT}"${dir}/liblua.so &>/dev/null && \
		rm -f "${EROOT}"${dir}/pkgconfig/lua.pc &>/dev/null
	done
	for f in $HEADER_FILES ; do
		rm -f "${EROOT}"/usr/include/${f}
	done
	rm -f "${EROOT}"/usr/share/man/man1/lua{,c}.1{,.*} &>/dev/null
}

_dup() {
	dirname ${1}/.
}

set_symlinks() {
	local ver=${1#lua}
	local bin_prefix="${EROOT}/usr/bin"
	ln -s lua${ver} $(_dup "${bin_prefix}"/lua)
	if [[ -f "${bin_prefix}"/luac${ver} ]]; then
		ln -s luac${ver} $(_dup "${bin_prefix}"/luac)
	fi
	for dir in $(get_libdirs) ; do
		if has 'jit*' ${ver}; then
			type -p lua${ver} &>/dev/null || die -q "It's something wrong with your lua${ver} installation: it's binary leads to broken symlink"
			local abi=$(lua${ver} -e 'print(_VERSION:match("%d.%d"))')
			local libname=libluajit-${abi}.so.${ver##jit-}
			test -f "${EROOT}/${dir}/${libname}" || die -q "Can't find libluajit for lua${ver} (lua abi: ${abi})"
			ln -s ${libname} $(_dup "${EROOT}/${dir}"/liblua.so)
		else
			ln -s liblua${ver}.so $(_dup "${EROOT}/${dir}"/liblua.so)
		fi
		ln -s lua${ver}.pc $(_dup "${EROOT}/${dir}"/pkgconfig/lua.pc)
	done
	for manpage in "${EROOT}"/usr/share/man/man1/lua{,c}${ver}.1.* ; do
		test -f ${manpage} &&
		ln -s $(basename "${manpage}") $(_dup "${manpage//${ver}}")
	done
	for header in $HEADER_FILES ; do
		local hdr;
		if has 'jit*' ${ver}; then
			type -p lua${ver} &>/dev/null || die -q "lua${ver} binary is missing (or leads to broken symlink)"
			local jit_v=$(lua${ver} -e 'print(jit.version:match("%d.%d"))')
			hdr=luajit-${jit_v}/${header};
		else
			hdr=lua${ver}/${header};
		fi
		test -f "${EROOT}/usr/include/${hdr}" || die -q "Missing header: ${header}"
		ln -s "${hdr}" $(_dup "${EROOT}"/usr/include/${header})
	done
}

get_libdirs() {
	local dir libdirs
	for dir in $(list_libdirs); do
		[[ -L ${EROOT}/usr/${dir} ]] && continue
		ls "${EROOT}"/usr/${dir}/liblua*.* > /dev/null 2>&1 || continue

		libdirs+=' '/usr/${dir}
	done
	echo ${libdirs:-/usr/lib}
}

find_targets() {
	local dirs
	local prefix="${EROOT}/usr/bin/"
	for f in ${prefix}lua{5,jit-2}.* ; do
		[[ -f "${f}" ]] && dirs="${dirs} ${f##$prefix}"
	done
	echo $dirs
}

resolve_target() {
	local targets=( $(find_targets) )
	if is_number $1; then
		[[ $1 -le ${#targets[@]} && $1 -gt 0 ]] && echo "${targets[ $(( $1 - 1 )) ]}"
	elif has $1 ${targets[@]}; then
	  echo $1
	fi
}

get_active_version() {
	readlink -e "${EROOT}"/usr/bin/lua | sed -ne "s:.*/usr/bin/\([\w.-]*\):\1:p"
}

## Actual actions

## set action

describe_set() {
	echo "Sets the current version of lua"
}

describe_set_parameters() {
	echo '[--if-unset] <target>'
}

describe_set_options() {
	echo '--if-unset:  Do not replace currently selected implementation'
	echo 'target:      Target name or number (from "list" action)'
}

do_set() {
	if [ "${1}" == "--if-unset" ]; then
		if [[ -n "$(get_active_version)" ]]; then
			return
		fi
		shift
	fi

	local target=$(resolve_target $1)
	if [[ -z "${target}" ]]; then
	  die -q "You need to specify a version"
	fi
	remove_symlinks
	set_symlinks $target
}

## List action

describe_list() {
	echo 'Lists available lua versions'
}

do_list() {
	local targets
	local a
	targets=( $(find_targets) )
	a=$(get_active_version)
	for (( i = 0; i < ${#targets[@]}; i++ )) ; do
		[[ $a == ${targets[i]} ]] && targets[i]=$(highlight_marker "${targets[i]}")
	done
	write_numbered_list -m '(none found)' "${targets[@]}"
}

## Show action

describe_show() {
	echo 'Show the active lua version'
}

do_show() {
	get_active_version
}