summaryrefslogtreecommitdiff
path: root/src/query.sh
blob: 0ff3dbb993bf7f71b4d525e8e07d61a98d292f25 (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
#!/bin/sh


# list all available packages
#
list () {
    find ${PACKAGES_DIR} -type f | sed "s,${PACKAGES_DIR}/,," 
}

# list installed packages
#
installed () {
    ls -1 ${SYSROOT}${INSTALLED_DIR}
}

# list all packages and lable installed ones
#
list_installed () {
    list | while read -r line; do 
        [ -d ${SYSROOT}${INSTALLED_DIR}/$line ] \
            && echo $line "[installed]" \
            || echo $line
    done
}

# search for a package based on a query
#
search () {
    if [ $# = 0 ]; then
        list_installed
    else
        list_installed | grep $(echo $@ | sed "s/ /\\|/g")
    fi
}

# list the files that belong to a package
#
files () {
    for package in $@; do
        local file="${SYSROOT}${INSTALLED_DIR}/$package/files"
        [ -f $file ] && cat $file || >&2 printf "${RED}Package ${LIGHT_RED}$package${RED} is not installed\n"
    done
}

# figure out which package a file belongs to
#
file_info () {
    for file in $@; do
        [ ! -f ${SYSROOT}$file ] && file=$(realpath $file 2>/dev/null)
        local found=false
        for pkg in $(installed); do
            for list in ${SYSROOT}${INSTALLED_DIR}/$pkg/files; do
                [ -f $list ] &&  {
                    grep -q "^/usr${file}$" $list || grep -q "^${file}$" $list && {
                        ${QUIET} && echo $pkg || printf "${LIGHT_BLUE}%s${BLUE} belongs to ${LIGHT_BLUE}%s${RESET}\n" $file $pkg
                    found=true
                    }
            }
            done
        done
        $found || {
            printf "${RED}$file does not belong to any package!\n" > /dev/stderr
            return 1
        }
        
    done
}

# extract a variable from a package info 
#
#   extract_info [file] [FIELD]
#
extract_info () {
    grep -i "^$2=" $1 | cut -d'=' -f2-
}

# pretty print a xipkg info file
#
print_info ()  {
    file=$1
    name=$(extract_info $file "NAME")
    line="${LIGHT_CYAN}%-15s ${LIGHT_BLUE}%s\n" 
    for field in Name Description Version; do 
        printf "$line" "$field" "$(extract_info $file $field)"
    done

    printf "$line" "Dependencies" "$(extract_info $file "DEPS")"
    printf "$line" "Build Date" "$(extract_info $file "DATE")"

    is_installed $name && {
        date=$(date -d @$(stat -t $file | cut -d' ' -f13))
        printf "$line" "Install Date" "$date"
        printf "$line" "Install Size" "$(QUIET=true size_of $name)"
    } || true
}
 
# print information about one or more packages
#
info () {
    for package in $@; do 
        infofile=${SYSROOT}${INSTALLED_DIR}/$package/info
        [ -f $infofile ] && {
            print_info $infofile
        } || {
            printf "Package info for $package could not be found!\n"
        }
    done
}

# get the size of a package
#
size_of () {
    local size=0 file=
    for file in $(files $@); do 
        $VERBOSE && printf "${BLACK}file $file "
        [ -f "$file" ] && {
            set -- $(stat -t $file)
            $VERBOSE && printf "has size $2"
            size=$((size+$2))
        }
        $VERBOSE && printf "\n"
    done
    echo $size
}