epm-query_file 3.74 KB
Newer Older
1 2
#!/bin/sh
#
3 4
# Copyright (C) 2009, 2012  Etersoft
# Copyright (C) 2009, 2012  Vitaly Lipatov <lav@etersoft.ru>
5
#
6 7 8
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU Affero General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
9 10 11 12 13
# (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
14
# GNU Affero General Public License for more details.
15
#
16 17
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
18 19
#

20 21
load_helper epm-search_file

22
# copied from etersoft-build-utils/bin/rpmqf
23 24

# use and modify TOFILE recursively
25
__do_query_real_file()
26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41
{
	local LINKTO1 LINKTO
	local TOFILE
	
	# get canonical path
	if [ -e "$1" ] ; then
		TOFILE=$1
	else
		TOFILE=`which $1 2>/dev/null || echo $1`
		if [ "$TOFILE" != "$1" ] ; then
		echo "Note: $1 is placed as $TOFILE"
		fi
	fi
	
	# get value of symbolic link
	if [ -L "$TOFILE" ] ; then
42
		__do_query $TOFILE
43 44
		LINKTO=`readlink "$TOFILE"`
		echo "Note: $TOFILE is link to $LINKTO"
45
		__do_query_real_file "$LINKTO"
46
	fi
Vitaly Lipatov's avatar
Vitaly Lipatov committed
47
	FULLFILEPATH=`realpath $TOFILE`
48 49
}

50 51
dpkg_print_name_version()
{
52
	local ver i
53 54 55 56 57 58 59 60 61 62 63
	for i in $* ; do
		ver=$(dpkg -s $i 2>/dev/null | grep "Version:" | sed -e "s|Version: ||g")
		if [ -z "$ver" ] ; then
			echo "$i"
		else
			echo "$i-$ver"
		fi
	done
}


64 65
__do_query()
{
66
    local CMD
67 68 69 70 71
    case $PMTYPE in
        apt-rpm)
            CMD="rpm -qf"
            ;;
        apt-dpkg)
72
            showcmd dpkg -S $1
Vitaly Lipatov's avatar
Vitaly Lipatov committed
73
            dpkg_print_name_version $(dpkg -S $1 | grep -v "^diversion by" | sed -e "s|:.*||")
74
            return ;;
75 76 77 78 79 80
        yum-rpm|urpm-rpm)
            CMD="rpm -qf"
            ;;
        zypper-rpm)
            CMD="rpm -qf"
            ;;
81 82 83
        emerge)
            CMD="equery belongs"
            ;;
84 85 86
        pacman)
            CMD="pacman -Qo"
            ;;
87 88
        slackpkg)
            # note: need remove leading slash for grep
89
            docmd grep -R -- "$(echo $@ | sed -e 's|^/\+||g')" /var/log/packages | sed -e "s|/var/log/packages/||g"
90 91
            return
            ;;
92 93 94
        ipkg)
            CMD="ipkg files"
            ;;
95
        *)
96
            fatal "Have no suitable query command for $PMTYPE"
97 98
            ;;
    esac
99

100 101
    docmd $CMD $@
}
102

103 104 105 106 107 108 109 110 111 112

__do_short_query()
{
    local CMD
    case $PMTYPE in
        *-rpm)
            CMD="rpm -qf --queryformat %{NAME}\n"
            ;;
        NOapt-dpkg)
            showcmd dpkg -S $1
Vitaly Lipatov's avatar
Vitaly Lipatov committed
113
            dpkg_print_name_version $(dpkg -S $1 | sed -e "s|:.*||" | grep -v "^diversion by")
114 115 116 117 118 119 120 121 122 123 124 125 126
            return ;;
        NOemerge)
            CMD="equery belongs"
            ;;
        NOpacman)
            CMD="pacman -Qo"
            ;;
        NOslackpkg)
            # note: need remove leading slash for grep
            docmd grep -R "$(echo $@ | sed -e 's|^/\+||g')" /var/log/packages | sed -e "s|/var/log/packages/||g"
            return
            ;;
        *)
127
            fatal "Have no suitable query command for $PMTYPE"
128 129 130 131 132 133 134
            ;;
    esac

    docmd $CMD $@
}


135 136
epm_query_file()
{
137 138 139 140 141 142 143 144
    # in short mode print handle only real names and do short output
    # TODO: move to separate command?
    if [ -n "$short" ] ; then
        [ -n "$pkg_files" ] || fatal "Run query without file names (needed path to files)"
        __do_short_query $pkg_files
         return
    fi

145 146
    # file can exists or not
    [ -n "$pkg_filenames" ] || fatal "Run query without file names"
147

148
    for pkg in $pkg_filenames ; do
149
        __do_query_real_file "$pkg"
150 151
        __do_query $FULLFILEPATH || pkg_filenames=$pkg epm_search_file
    done
152 153

}