summaryrefslogtreecommitdiffstats
path: root/ship/lib/punani
blob: ea05a4ec8445fc677e09369364afc5350d0819aa (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
#@include core
#@include _punani_db

## usage: punani_has PACKAGE
punani_has() {
  eval "_punani_${PACKER}_has \"\$1\""
}

## usage: punani_owner PACKAGE
punani_owner() {
  eval "_punani_${PACKER}_owner \"\$1\""
}

## usage: punani_install PACKAGE
punani_install() {
  eval "_punani_${PACKER}_install \"\$1\""
}

## usage: punani_remove PACKAGE
punani_remove() {
  eval "_punani_${PACKER}_remove \"\$1\""
}

## usage: _punani_resolve_package PKGNAME
_punani_resolve_package(){
  eval "set -u; echo \"\${_punanidb_${PACKER}_$1}\"" 2>/dev/null
}

## usage: _punani_select_packer
_punani_select_packer() {
  for p in ${_punani_known_packers:-null}; do
    exists $p && info "using $p" && PACKER=`echo $p | tr -d -` && break
  done
}
_punani_known_packers='pacman apt-get yum brew'
_punani_pacman_install(){ pacman --noconfirm -S --needed "$@" ;}
_punani_pacman_remove(){ pacman -Rcs "$@" ;}
_punani_pacman_has(){ pacman -Q "$1" >/dev/null;}
_punani_pacman_owner() { pacman -Qo "$1"; }
_punani_aptget_install(){ apt-get -y install "$@" ;}
_punani_aptget_remove(){ apt-get -y remove "$@" ;}
_punani_aptget_has() { dpkg -s "$1" | grep -q "Status: install";}
_punani_aptget_owner() { dpkg-query -S "$1" | cut -d: -f1;}
_punani_yum_install(){ yum -y install "$@" ;}
_punani_yum_remove(){ yum -y remove "$@" ;}
_punani_yum_has() { rpm -qa --qf "%{NAME}\n"| egrep  "^${1}\$" >/dev/null ;}
_punani_yum_owner(){ rpm -qf "$1" ;}
_punani_brew_install(){ brew install "$@"; }
_punani_brew_remove(){ brew remove "$@";}
# TODO _punani_brew_has

punani(){
  # punani UI
  _punani_usage='punani {install,remove,has,owner} PACKAGE...'
  _punani_select_packer || die 'no package manager found; no punani for you!'

  ACTION="$1"; shift

  if test $# = 0; then
    error 'no PACKAGE specified.'
    die "usage: $_punani_usage"
  fi

  for PKG; do
    RES="`_punani_resolve_package $PKG`" ||
      die "could not resolve '$PKG'; no punani for you!"

    case "$ACTION" in
      install)
        if punani_has $RES; then
          info "$RES already installed, skipping"
        else
          punani_install $RES || error "cannot install $RES with $PACKER"
        fi
        ;;
      remove)
        if ! punani_has $RES; then
          info "$RES not installed, skipping"
        else
          punani_remove $RES || error "cannot install $RES with $PACKER"
        fi
        ;;
      has)
        if punani_has $RES; then
          info "$RES is installed"
        else
          info "$RES is not installed"
        fi
        ;;
      owner)
        punani_owner $RES
        ;;
      *)
        error "bad action: $ACTION"
        die "usage: $_punani_usage"
    esac
  done
}