#!/bin/sh # # phpquery - a PHP module manager for Debian # # Copyright 2013 Ondřej Surý # # This program is licensed at your choice under the terms of the GNU General # Public License version 2+ or under the terms of the PHP License 3.01. # # For GPL-2+: # This program is free software; you can redistribute it and/or # modify it under the terms of the GNU General Public License # as published by the Free Software Foundation; either version 2 # of the License, or (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, # USA. # # For PHP 3.01: # This source file is subject to version 3.01 of the PHP license, # that is bundled with this package in the file LICENSE, and is # available through the world-wide-web at the following url: # http://www.php.net/license/3_01.txt # If you did not receive a copy of the PHP license and are unable to # obtain it through the world-wide-web, please send a note to # license@php.net so we can mail you a copy immediately. # set -ue SCRIPT_NAME=${0##*/} QUIET=no . /usr/lib/php/php-helper usage() { [ -n "$@" ] && warning $@ echo "usage: ${SCRIPT_NAME} [ -d ] [ -q ] -v version_name -s sapi_name [ -m module_name ] [ -M ] [ -S ] [ -V ]" exit 1 } check_mod() { local version=$1 local sapi=$2 local modname=$3 if ! module_exists $version $modname; then output "No module matches $modname" return 1 fi local priority=$(get_priority $version $sapi $modname) local live_link=$(get_live_link $version $sapi $modname $priority) local live_link_content=$(get_live_link_content $version $sapi $modname $priority) found=no if [ -e "${live_link}" ] ; then if [ -h "${live_link}" ] ; then local content="$(readlink "${live_link}")" if [ "${content}" = "${live_link_content}" ] ; then found=yes fi fi if [ "$found" != "yes" ]; then output "Module $modname symlink was modified by local administrator." return 34 fi fi local state_dir="$(get_state_dir $version $sapi)" if [ -e "${state_dir}/enabled_by_admin/$modname" ]; then output "$modname (Enabled for $sapi by local administrator)" return 0 elif [ -e "${state_dir}/enabled_by_maint/$modname" ]; then output "$modname (Enabled for $sapi by maintainer script)" return 0 elif [ -e "${state_dir}/disabled_by_admin/$modname" ]; then output "No module matches $modname (Disabled for $sapi by local administrator)" return 32 elif [ -e "${state_dir}/disabled_by_maint/$modname" ]; then output "No module matches $modname (Disabled for $sapi by maintainer script)" return 33 elif [ "$found" = "yes" ]; then output "$modname (Enabled for $sapi by unknown)" return 0 else output "No module matches $modname" return 1 fi } list_mod() { local _version=$1 local _sapi=$2 local verbose=$3 local registry_dir="$(get_registry_dir)" if [ -d "$registry_dir" ]; then for mod in $(list_parts "$registry_dir"); do if [ "$_version" = "ALL" ]; then versions=$(list_version) else versions=$_version fi for version in $versions; do if [ "$_sapi" = "ALL" ]; then sapis=$(list_sapi $version) else sapis="$_sapi" fi if [ "$verbose" = "yes" ]; then for sapi in $sapis; do check_mod $version $sapi $mod done else echo $mod fi done done return 0 fi return 1 } list_version() { local version_dir="$(get_version_dir)" if [ -d "$version_dir" ]; then for version in $(list_parts_regex "$version_dir" '.*[0-9]\.[0-9]'); do echo $version; done fi } list_sapi() { local version=$1 local sapi_dir="$(get_sapi_dir $version)" if [ -d "$sapi_dir" ]; then for sapi in $(list_parts "$sapi_dir"); do echo $sapi; done fi } check_version() { local version=$1 local version_dir=$(get_version_dir) if [ -d "$version_dir/$version" ]; then return 0 fi return 1 } check_sapi() { local version=$1 local sapi=$2 local sapi_dir="$(get_sapi_dir $version)" if [ -e "$sapi_dir/$sapi" ]; then return 0 fi return 1 } action() { local action=$1 local version=$2 local sapi=$3 local mod=$4 local verbose=$5 ret=0 case "$action" in check_mod) [ -z "$version" -o -z "$sapi" ] && usage "You need to specify version (-v) and sapi (-s)" check_version "$version" || usage "Invalid PHP version ($version) specified" check_sapi "$version" "$sapi" || usage "Invalid SAPI ($sapi) specified" check_mod "$version" "$sapi" "$mod" || ret=$? ;; check_sapi) [ -z "$version" ] && usage "You need to specify version (-v)" check_version "$version" || usage "Invalid PHP version ($version) specified" check_sapi "$version" "$sapi" || ret=$? if [ "$ret" -eq 0 ]; then output "$sapi" fi ;; check_version) check_version $version || ret=$? if [ "$ret" -eq 0 ]; then output "$sapi" fi ;; list_version) list_version || ret=$?;; list_mod) list_mod "$version" "$sapi" "$verbose" || ret=$?;; list_sapi) list_sapi "$version" || ret=$?;; *) usage "Unknown action $action";; esac } verbose=no action= version= sapi= mod= double_action() { usage "Cannot use $1 and $2 at the same time, pick only one mode of operation."; } while getopts ds:m:SMqv:V opt; do case $opt in v) version="$OPTARG" ;; V) [ -n "$action" ] && double_action $action list_version; action=list_version ;; s) sapi="$OPTARG" ;; S) [ -n "$action" ] && double_action $action list_sapi action="list_sapi" ;; m) mod="$OPTARG" ;; M) [ -n "$action" ] && double_action $action list_mod action="list_mod" ;; q) QUIET=yes ;; d) verbose=yes ;; \?) usage "Unknown parameter specified";; esac done shift $(expr $OPTIND - 1) if [ -z "$action" ]; then if [ -n "$mod" ]; then action=check_mod elif [ -n "$sapi" ]; then action=check_sapi elif [ -n "$version" ]; then action=check_version else usage "You need to specify at least one action." fi fi action "$action" "$version" "$sapi" "$mod" "$verbose" exit $?