cgit.sxemacs.org Git - pkgusr/blob - etc/pkgusr/zsh/zsh-pkgtools

   1 # -*- Shell-script -*-
   2 # Copyright (C) 2007 - 2010 Steve Youngs <steve@steveyoungs.com>
   3 #
   4 #  A collection of Zsh functions that I use day to day for maintaining
   5 #  and administering my machines.  These come in very handy if you set up
   6 #  one of your users as a "package manager".  There is a corresponding
   7 #  _zsh-pkgtools file that provides completion for most of what is here.
   8 H-pkg ()
   9 {
  10         cat<<EOF
  11
  12         fpkg [REGEXP] -- finds pkg names matching REGEXP.
  13         ppkg [NAME]   -- print pkg NAME pkg info.
  14         cpkg [CMD]    -- find what package provides CMD.
  15         lpkg          -- list installed packages.
  16         Lpkg          -- list installed packages with dates last updated.
  17         upkg [PKG]    -- date/time the last time PKG was updated.
  18         vpkg [PKG]    -- print the version of PKG.
  19         ipkg [PKG]    -- print install notes of PKG.
  20         gpkg [PKG]    -- print general notes of PKG.
  21         wpkg [PKG]    -- print PKG website URL.
  22         pkgrepo [PKG] <t> -- print the source repo location of PKG
  23                              with optional 2nd arg non-nil, also print
  24                              repo type.
  25         pkgsu [PKGUSR] -- switch to user PKGUSR.
  26         pkg_install [DESCRIPTION] [USER] [GROUP]
  27                 -- install a new package, DESCRIPTION must be quoted.
  28         pkg_ldconfig  -- Run ldconfig.
  29
  30         xtar [FILE]   -- extract tarball FILE.  sets tar(1) options
  31                          based on file type.
  32         vtar [FILE]   -- view the contents of tarball FILE.  sets tar(1)
  33                          options based on file type.
  34         ctar [FILE] [DIRECTORY]
  35                       -- create a tarball FILE of DIRECTORY.  Compression
  36                          is automatically chosen from the filename.
  37
  38
  39 EOF
  40 }
  41
  42 fpkg ()
  43 {
  44         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
  45                 echo Invalid or missing argument >&2
  46                 echo "Usage: $0 [REGEXP]" >&2
  47                 return 1
  48         else
  49                 sed -n '/^install:/,$p' /etc/group|cut -d: -f1| \
  50                   grep -i --colour ${argv[1]}
  51         fi
  52 }
  53
  54 ppkg ()
  55 {
  56         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
  57                 echo Invalid or missing argument >&2
  58                 echo "Usage: $0 [NAME]" >&2
  59                 return 1
  60         else
  61                 pinky -l $argv[1]|less
  62         fi
  63 }
  64
  65 cpkg ()
  66 {
  67         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
  68                 echo Invalid or missing argument >&2
  69                 echo "Usage: $0 [CMD]" >&2
  70                 return 1
  71         else
  72                 find $path -type f -regex "^.*/$argv[1].*$" \
  73                   -printf "%f -- (%u:%g)\n"|grep --colour '(.*)'
  74         fi
  75 }
  76
  77 lpkg ()
  78 {
  79         sed -n '/^install/p' /etc/group|cut -d: -f4|tr ',' '\n'|less
  80 }
  81
  82 upkg()
  83 {
  84         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
  85                 echo Invalid or missing argument >&2
  86                 echo "Usage: $0 [PKG]" >&2
  87                 return 1
  88         else
  89                 echo -n "$argv[1]... "
  90                 pinky -l $argv[1]|grep 'Last_Updated:.*'| \
  91                   sed 's/^      //'|grep --colour '.*'
  92         fi
  93 }
  94
  95 Lpkg ()
  96 {
  97         for pkg in $(sed -n '/^install/p' /etc/group|cut -d: -f4|tr ',' '\n'); do
  98                 printf "${pkg}\t\t\t$(pinky -l ${pkg}|grep Last_Updated|cut -d' ' -f3-)\n"
  99         done|less
 100 }
 101
 102 vpkg()
 103 {
 104         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
 105                 echo Invalid or missing argument >&2
 106                 echo "Usage: $0 [PKG]" >&2
 107                 return 1
 108         else
 109                 echo -n "$argv[1]... "
 110                 pinky -l $argv[1]|grep 'Version:.*'| \
 111                   sed 's/^      //'|grep --colour '.*'
 112         fi
 113 }
 114
 115 ipkg()
 116 {
 117         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
 118                 echo Invalid or missing argument >&2
 119                 echo "Usage: $0 [PKG]" >&2
 120                 return 1
 121         else
 122                 local top=$(pinky -l $argv[1]|grep -n "Install Notes"|cut -d: -f1)
 123                 local bot=$(pinky -l $argv[1]|grep -n "General Notes"|cut -d: -f1)
 124                 pinky -l $argv[1]|sed -n ${top},${bot}p
 125         fi
 126 }
 127
 128 gpkg()
 129 {
 130         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
 131                 echo Invalid or missing argument >&2
 132                 echo "Usage: $0 [PKG]" >&2
 133                 return 1
 134         else
 135                 local top=$(pinky -l $argv[1]|grep -n "General Notes"|cut -d: -f1)
 136                 local bot=$(pinky -l $argv[1]|grep -n "CONTENTS"|cut -d: -f1)
 137                 pinky -l $argv[1]|sed -n ${top},${bot}p
 138         fi
 139 }
 140
 141 wpkg()
 142 {
 143         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
 144                 echo Invalid or missing argument >&2
 145                 echo "Usage: $0 [PKG]" >&2
 146                 return 1
 147         else
 148                 pinky -l $argv[1]|grep --colour 'Web_Site:.*$'
 149         fi
 150 }
 151
 152 pkgrepo()
 153 {
 154         if [[ $ARGC -lt 1 || $ARGC -gt 2 ]]; then
 155                 echo Invalid or missing argument >&2
 156                 echo "Usage: $0 [PKG] <t>" >&2
 157                 return 1
 158         else
 159                 pinky -l $argv[1]|grep --colour 'Repo_Location:.*$'
 160                 [[ -n "$argv[2]" ]] && pinky -l $argv[1]|grep --colour 'Repo_Type:.*$'
 161         fi
 162 }
 163
 164 xtar()
 165 {
 166         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
 167                 echo Invalid or missing argument >&2
 168                 echo "Usage: $0 [FILE]" >&2
 169                 return 1
 170         fi
 171
 172         local opts
 173         local type
 174         local fname=$argv[1]
 175
 176         type=$(file ${fname}|cut -d' ' -f2)
 177
 178         case $type in
 179                 (tar)   opts=xf ;;
 180                 (gzip)  opts=zxf ;;
 181                 (bzip2) opts=jxf ;;
 182                 (xz)    opts=Jxf ;;
 183                 (*)
 184                         # try lzma
 185                         if lzmainfo ${fname} &>/dev/null; then
 186                                 opts=(--lzma -xf)
 187                         else
 188                                 printf "Unknown file type: %s\n" $type >&2
 189                                 return 2
 190                         fi
 191                         ;;
 192         esac
 193
 194         tar ${opts} ${fname}
 195 }
 196
 197 vtar()
 198 {
 199         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
 200                 echo Invalid or missing argument >&2
 201                 echo "Usage: $0 [FILE]" >&2
 202                 return 1
 203         fi
 204
 205         local opts
 206         local type
 207         local fname=$argv[1]
 208
 209         type=$(file ${fname}|cut -d' ' -f2)
 210
 211         case $type in
 212                 (tar)   opts=tvvvf ;;
 213                 (gzip)  opts=ztvvvf ;;
 214                 (bzip2) opts=jtvvvf ;;
 215                 (xz)    opts=Jtvvvf ;;
 216                 (*)
 217                         # lzma.  Here because lzmainfo is too stupid
 218                         if lzmainfo ${fname} &>/dev/null; then
 219                                 opts=(--lzma -tvvvf)
 220                         else
 221                                 printf "Unknown file type: %s\n" $type >&2
 222                                 return 2
 223                         fi
 224                         ;;
 225         esac
 226
 227         tar ${opts} ${fname}|less
 228 }
 229
 230 ctar()
 231 {
 232         if [[ $ARGC -ne 2 ]]; then
 233                 echo Invalid or missing argument >&2
 234                 echo "Usage: $0 [FILE] [DIRECTORY]" >&2
 235                 return 1
 236         fi
 237
 238         local opts
 239         opts=(--create --owner=0 --group=0 --auto-compress --file)
 240
 241         tar ${opts} $1 $2
 242 }
 243
 244 pkgsu()
 245 {
 246         if [[ $ARGC -lt 1 || $ARGC -gt 1 ]]; then
 247                 echo Invalid or missing argument >&2
 248                 echo "Usage: $0 [PKGUSR]" >&2
 249                 return 1
 250         else
 251                 ssh -l root localhost -t su $argv[1]
 252         fi
 253 }
 254
 255 pkg_install()
 256 {
 257         if [[ $ARGC -lt 3 || $ARGC -gt 3 ]]; then
 258                 echo Invalid or missing argument >&2
 259                 echo "Usage: $0 [DESCRIPTION] [USER] [GROUP]" >&2
 260                 return 1
 261         else
 262                 ssh -l root localhost -t install_package \
 263                   ${argv[1]} $argv[2] $argv[3]
 264         fi
 265 }
 266
 267 alias pkg_ldconfig='ssh -l root localhost -t ldconfig'
 268
 269 ### End
 270