summaryrefslogtreecommitdiff
blob: 603dcedb4cab6dcbc63f3f87a8311f2ba5a1ea07 (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
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
# Copyright 2010-2016 Gentoo Foundation
# Distributed under the terms of the GNU General Public License v2

DESCRIPTION="Manage php installations"
MAINTAINER="php-bugs@gentoo.org"
MODULES="cli apache2 fpm cgi phpdbg"

#
# Output a list of link names (not full paths) belonging to the given
# SAPI. These need to be updated when the user changes his active
# target.
#
# INPUT:
#
# The name of a SAPI.
#
# OUTPUT:
#
# A space-separated list of link names belonging to the given
# SAPI. For example, the "cli" SAPI has three link names: "php phpize
# php-config". The "cgi" sapi has only "php-cgi".
#
sapi_active_link_names() {
	local sapi="${1}"

	case "${sapi}" in
		apache2) echo "mod_php.so" ;;
		cli)     echo "php phpize php-config" ;;
		fpm)     echo "php-fpm" ;;
		cgi)     echo "php-cgi" ;;
		phpdbg)  echo "phpdbg"  ;;
		*)       die "invalid SAPI name: ${sapi}" ;;
	esac
}

# The link names obtained from sapi_active_link_names() all need to
# point somewhere. Usually the target is the same as the link name
# itself, but not always. This function returns the link-target for a
# given sapi, sapi-target, and link name.
#
# INPUT:
#
# The first parameter is a SAPI name. The second parameter is the
# SAPI-target name (for example, "php7.0"). The third parameter is a
# link name.
#
# OUTPUT:
#
# The name of the target (that is, file) for the given link name.
#
sapi_link_name_target() {
	local sapi="${1}"
	local target_name="${2}"
	local link_name="${3}"

	# For now, only apache2's mod_php.so gets special treatment.
	if [[ "${sapi}" == "apache2" && "${link_name}" == "mod_php.so" ]] ; then
		local major=$(parse_target_major_version "${target_name}")
		echo "libphp${major}.so"
	else
		echo "${link_name}"
	fi
}

# Each SAPI provides a few (one or more) "active" links in a
# predictable location. The target directory (where they point) is
# fixed for a given SAPI, and this function returns it.
#
# The name "target" is unfortunate, but that's the terminology that
# "ln" uses. The link_name is the name of the link on the filesystem,
# and target is where it points.
#
# INPUT:
#
# The first parameter is the name of a SAPI. The second parameter is
# the name of a target.
#
# OUTPUT:
#
# The directory to which the given SAPI's symlinks point. For example,
# the "cli" sapi has three executable symlinks and all of them point
# to executables in /usr/lib/phpX.Y/bin.
#
sapi_active_link_target_dir() {
	local sapi="${1}"
	local target="${2}"

	local link_target_dir="@LIBDIR@/${target}/bin"
	if [[ "${sapi}" == "apache2" ]] ; then
		link_target_dir+="/../apache2"
	fi

	echo "${link_target_dir}"
}


# Each SAPI provides a few (one or more) "active" links in a
# predictable location. And fortunately that location is fixed for a
# given SAPI. For example, the "cgi" SAPI has its sole active symlink,
# /usr/bin/php-cgi, in /usr/bin. Given a SAPI name, we return the
# directory where that SAPI's links are located.
#
# INPUT:
#
# The name of a SAPI.
#
# OUTPUT:
#
# The directory in which the given SAPI's symlinks are located. For
# example, the "cli" sapi has its three executable links in "/usr/bin".
#
sapi_active_link_dir() {
	local sapi="${1}"

	case "${sapi}" in
		apache2) echo "@LIBDIR@/apache2/modules" ;;
		cli)     echo "@BINDIR@" ;;
		fpm)     echo "@BINDIR@" ;;
		cgi)     echo "@BINDIR@" ;;
		phpdbg)  echo "@BINDIR@" ;;
		*)       die "invalid SAPI name: ${sapi}" ;;
	esac
}


# Each SAPI provides at least one "active" link in a predictable
# location.  For example, the "cgi" SAPI has its active symlink at
# /usr/bin/php-cgi. Given a SAPI name we return the path to that link.
#
# Note that SAPIs may provide more than one active link -- we return
# the path for only the first.
#
# INPUT:
#
# The name of a SAPI.
#
# OUTPUT:
#
# The path of the main symlink provided by the active version of the
# given SAPI. An error is raised if the given SAPI is not valid.
#
sapi_active_link_path() {
	local sapi="${1}"
	local dir=$(sapi_active_link_dir "${sapi}")
	local link_names=( $(sapi_active_link_names "${sapi}") )

	# Use the first link name only.
	echo "${dir}/${link_names[0]}"
}


# Parse and return the major version from a target name. For example,
# the "php5.6" target has a major version of "5".
#
# INPUT:
#
# The name of a valid PHP target, like php5.6 or php7.0.
#
# OUTPUT:
#
# A major version number. An error is raised if the given target is
# not valid.
#
parse_target_major_version() {
	local target="${1}"
	local major="${target:3:1}"
	case "${major}" in
		5|7) echo "${major}" ;;
		*)   die "invalid PHP target name: ${target}" ;;
	esac
}

# Remove dead active symlinks for the given SAPI.
#
# If a symlink for an SAPI is dead, then that SAPI is at least
# partially broken. For example, if the symlink to php-cgi is dead,
# then CGI just isn't going to work -- the SAPI is broken. It
# therefore makes sense to run update() after we find and remove any
# broken links. The update at least has the potential to leave things
# working.
#
# There is one potential caveat to that approach, for SAPIs with more
# than one active symlink. What if "phpize" is broken but "php" is OK?
# (Forget for the moment how that might happen...). Do we want to
# update() the entire SAPI because one of the symlinks is dead?
# Answer: I guess.
#
# INPUT:
#
# The name of the SAPI to clean up.
#
# OUTPUT:
#
# If any symlinks are removed, that fact will be announced. If an
# update occurs, that will be noted as well
#
cleanup_sapi() {
	local sapi="${1}"
	local link_dir=$(sapi_active_link_dir "${sapi}")

	for link_name in $(sapi_active_link_names "${sapi}"); do
		local link_path="${link_dir}/${link_name}"
		if [[ -L "${link_path}" && ! -e "${link_path}" ]] ; then
			rm -f "${link_path}" || die "failed to remove ${link_path}"
			echo "Removed broken symlink ${link_path}."
			update_sapi "${sapi}" # Try to fix it.
		fi
	done
}


# Update the given SAPI to the latest valid target.
#
# The "latest" target is really just the last available one in the
# list for this SAPI.
#
# INPUT:
#
# The name of a SAPI.
#
# OUTPUT:
#
# An error code "1" is returned if there are no valid targets for the
# given SAPI. Otherwise, we return whatever comes back from set_sapi()
#
update_sapi() {
	local sapi="${1}"
	local latest_target=$(find_sapi_targets "${sapi}" | tail -n 1)

	# No valid targets?
	[[ -z "${latest_target}" ]] && return 1

	# Proceed even if the current target is the latest one. This can
	# fix issues where, for example, the "phpize" symlink is broken
	# but "php" is fine and points to the latest target.
	set_sapi "${sapi}" "${latest_target}"
}


#
# Find all valid target names by searching libdir for directories like
# php5.6, php7.0, etc.
#
# OUTPUT:
#
# A space-separated list of target names, for example, "php5.6 php7.0".
#
find_targets() {
	# TODO: when there aren't any phpX.Y directories, this returns
	# "php*.*". This doesn't seem to bother our consumers, but it
	# would probably be more polite to return nothing in that case.
	cd "@LIBDIR@" && echo php*.*
}

# List all valid targets for the given SAPI. The list is obtained by
# searching the filesystem for a particular (SAPI-specific) file in
# locations determined by find_targets(). This list should therefore
# be a subset of find_targets().
#
# INPUT:
#
# The name of a SAPI.
#
# OUTPUT:
#
# The "display name" of every available target for this SAPI, one per
# line. For example,
#
#   php5.6
#   php7.0
#
find_sapi_targets() {
	local sapi="${1}"

	local pattern_suffix
	case "${sapi}" in
		apache2) pattern_suffix="apache2/libphp[57].so" ;;
		cli)     pattern_suffix="bin/php"     ;;
		fpm)     pattern_suffix="bin/php-fpm" ;;
		cgi)     pattern_suffix="bin/php-cgi" ;;
		phpdbg)  pattern_suffix="bin/phpdbg"  ;;
		*)       die "invalid SAPI name: ${sapi}" ;;
	esac

	for target in $(find_targets); do
		local pattern="@LIBDIR@/${target}/${pattern_suffix}"

		for file in $pattern; do
			[[ -f "${file}" ]] && echo "${target}"
		done
	done | @SORT@ | @UNIQ@
}


# Find the active (selected) target for the given SAPI. This is used
# to decorate the output of the `eselect php list <sapi>` command.
#
# INPUT:
#
# The name of a SAPI.
#
# OUTPUT:
#
# The "display name" of the active target for the given SAPI. For
# example, "php5.6" or "php7.0".
#
get_sapi_active_target() {
	local sapi="${1}"
	local active_symlink=$(sapi_active_link_path "${sapi}")

	if [[ -L "${active_symlink}" ]] ; then
		local active_file=$(canonicalise "${active_symlink}")
		if [[ -a "${active_file}" ]] ; then
			# This sed command (regular expression) finds a target name
			# contained in a filesystem path. For example, it parses
			# "php5.6" from "/usr/lib64/php5.6/apache2/libphp5.so".
			# The curly braces are an attempt to avoid '+' which is
			# a GNU extension.
			local sed_cmd='s:.*/\(php[0-9]\.[0-9]\{1,\}\)/.*:\1:p'
			echo "${active_file}" | @SED@ -ne "${sed_cmd}"
		fi
	fi
}

# Write an apache configuration file to load the active version of
# mod_php. The 5.x and 7.x series (at least...) have different module
# names, and so require a different apache configuration when
# switching between the two.
#
# INPUT:
#
# The name of the target (php5.6, php7.0) for which to write the
# configuration file.
#
# OUTPUT:
#
# None.
#
write_mod_php_conf() {
	local target="${1}"
	local conf_dir="@LOCALSTATEDIR@/lib/eselect-php"
	local conf_path="${conf_dir}/mod_php.conf"

	@MKDIR_P@ "${conf_dir}" || die "failed to create ${conf_dir}"

	local major=$(parse_target_major_version "${target}")
	cat <<-EOF > "${conf_path}" || die "failed to write mod_php.conf"
	<IfModule !php${major}_module>
	    LoadModule php${major}_module modules/mod_php.so
	</IfModule>
	EOF
}


# Resolve an index or target name for a given SAPI into the "display
# name" of that target.
#
# INPUT:
#
# The first parameter is the name of a SAPI. The second parameter is
# either a number (the index of a target), or a target name.
#
# OUTPUT:
#
# The "display name" of the given target for the given SAPI. For
# example, if the first parameter is "cli" and the second parameter is
# "1", then the output will be the display name of the first target
# for the cli SAPI (e.g. "php5.6").
#
# If the index or target name is invalid (that is, does not correspond
# to one of the valid targets for the given SAPI), then nothing is
# output.
#
resolv_target() {
	local sapi="${1}"
	local target="${2}"

	# $targets is an array of things like "php5.6" and "php7.0"
	local targets=( $(find_sapi_targets "${sapi}") )

	if is_number "${target}" ; then
		if [[ $target -le ${#targets[@]} && $target -gt 0 ]] ; then
			# $target looks like an index into the $targets array.
			echo "${targets[ $(( $target - 1 )) ]}"
		fi
	elif has "${target}" ${targets[@]} ; then
		# $target is the *name* of a valid target for this SAPI.
		echo "${target}"
	fi
}


# Die if the given module name is not valid.
#
# INPUT:
#
# A module name.
#
# OUTPUT:
#
# None; the function will die() if the given module name is invalid
# (that is, not one of our declared $MODULES), and do nothing
# otherwise.
#
check_module() {
	local module="${1}"
	has "${module}" $MODULES || \
		die -q "Please choose one of the following modules: ${MODULES}"
}

## Actual actions

# Perform the "list" action for the given SAPI.
#
# INPUT:
#
# The SAPI name.
#
# OUTPUT:
#
# A numbered and decorated list of targets for the given SAPI.
#
list_sapi() {
	local sapi="${1}"
	local targets=( $(find_sapi_targets "${sapi}") )
	local active=$(get_sapi_active_target "${sapi}")

	for (( i = 0; i < ${#targets[@]}; i++ )) ; do
		if [[ $active == ${targets[i]} ]] ; then
			targets[i]=$(highlight_marker "${targets[i]}")
		fi
	done
	write_numbered_list -m "(none found)" "${targets[@]}"
}


# Perform the "set" action for the given SAPI.
#
# INPUT:
#
# The first parameter is the SAPI name, and the second parameter is
# the desired target.
#
# OUTPUT:
#
# None.
#
set_sapi() {
	local sapi="${1}"
	local target="${2}"
	local target_name=$(resolv_target "${sapi}" "${target}")
	[[ -z $target_name ]] && die -q "invalid target ${target} for SAPI ${sapi}"

	local link_tgt_dir=$(sapi_active_link_target_dir "${sapi}" "${target_name}")
	local link_dir=$(sapi_active_link_dir "${sapi}")

	for link_name in $(sapi_active_link_names "${sapi}"); do
		local link_target=$(sapi_link_name_target "${sapi}" "${target_name}" "${link_name}")

		@LN_S@ --force "${link_tgt_dir}/${link_target}" \
			"${link_dir}/${link_name}" || \
			die -q "failed to create active ${link_name} symlink"
	done
}


# Check to see if the user is still using the old-style apache
# configuration with -DPHP5 and 70_mod_php5.conf. If he is, warn him
# that it is outdated, and that his eselect choices will not have any
# effect until the configuration is updated.
#
# This can be removed after around a year.
#
apache2_php5_config_check() {
	if [ -f "${EROOT}/etc/apache2/modules.d/70_mod_php5.conf" ] ; then
		local msg
		write_warning_msg "The apache2 configuration has changed in this"
		write_warning_msg "version of eselect-php. You should define \"-D PHP\""
		write_warning_msg "and not \"-D PHP5\" for apache. The module is now"
		write_warning_msg "loaded by 70_mod_php.conf (was 70_mod_php5.conf)."
		write_warning_msg "After you have changed \"-D PHP5\" to \"-D PHP\", "
		write_warning_msg "you should remove 70_mod_php5.conf to eliminate"
		write_warning_msg "this warning. Until you have done so, your eselect"
		write_warning_msg "choices for apache2 will have no effect."
		echo
	fi
}

## set action

describe_set() {
	echo "make <target> active for <module>"
}

describe_set_parameters() {
	echo "<module> <target>"
}

describe_set_options() {
	echo "module: one of: ${MODULES}"
	echo "target: target name or number (from the \"list\" action)"
}


do_set() {
	local sapi="${1}"
	local target="${2}"
	check_module "${sapi}"

	set_sapi "${sapi}" "${target}"

	if [[ "${sapi}" == "apache2" ]]; then
		apache2_php5_config_check
		write_mod_php_conf "$(resolv_target apache2 "${target}")"
		echo "Please restart apache for the changes to take effect."
	elif [[ "${sapi}" == "fpm" ]]; then
		echo "Please restart php-fpm for the changes to take effect."
	fi
}



## List action

describe_list() {
	echo "lists valid targets for <module>"
}

describe_list_parameters() {
	echo "<module>"
}

describe_list_options() {
	echo "module: one of: ${MODULES}"
}

do_list() {
	local sapi="${1}"
	check_module "${sapi}"
	list_sapi "${sapi}"
}

## Show action

describe_show() {
	echo "show the active target for <module>"
}

describe_show_parameters() {
	echo "<module>"
}

describe_show_options() {
	echo "module: one of: ${MODULES}"
}

do_show() {
	local sapi="${1}"
	check_module "${sapi}"
	get_sapi_active_target "${sapi}"
}

## update action

describe_update() {
	echo "update <module> to latest target"
}

describe_update_parameters() {
	echo "<module> [--if-unset]"
}

describe_update_options() {
	echo "module: one of: ${MODULES}"
	echo "--if-unset: do nothing if <module> target already exists"
}

do_update() {
	local sapi="${1}"
	local ifunset="${2}"

	# Input sanity check.
	check_module "${sapi}"

	# Older versions listed the flag as "ifunset" insted of "--if-unset".
	if [[ "${ifunset}" == "ifunset" || "${ifunset}" == "--if-unset" ]] ; then
		if [[ -n $(get_sapi_active_target "${sapi}") ]] ; then
			# There's already an active target for this SAPI, and the
			# user asked us to leave it alone. So we leave it alone.
			return
		fi
	fi

	update_sapi "${sapi}" || echo "Nothing to update"
}

## cleanup action

describe_cleanup() {
	echo "remove and try to fix stale links"
}

do_cleanup() {
	for sapi in $MODULES ; do
		cleanup_sapi "${sapi}"
	done

	# Remove older (and dead) apache2 symlinks. These days the symlink
	# is called mod_php.so. This cleanup code can be removed after a
	# while, after we think most people will have switched to the new
	# symlink and removed the old one.
	for link in "@LIBDIR@"/apache2/modules/libphp[57].so; do
		if [[ -L "${link}" && ! -e "${link}" ]] ; then
			rm -f "${link}" || die "failed to remove old libphp.so symlink"
			echo "Removed broken symlink ${link}."
		fi
	done
}

## list-modules action

describe_list-modules() {
	echo "output a space-separated list of valid modules"
}

do_list-modules() {
	echo "${MODULES}"
}