vfs/extfs/urar.in

   1 #! /bin/sh
   2 #
   3 # Written by andrey joukov
   4 # (C) 1996 2:5020/337.13@fidonet.org
   5 # Updated by christian.gennerat@alcatel.fr 1999
   6 #            Andrew V. Samoilov <sav@bcs.zp.ua> 2000
   7 # beta version 2.0
   8 #
   9 # rar and unrar can be found on http://www.rarlabs.com/
  10
  11 RAR=rar
  12 UNRAR=$RAR
  13
  14 # Prefer unrar (freeware).  Try to find unrar in $PATH.
  15 save_IFS="$IFS"; IFS=:
  16 for dir in $PATH; do
  17     IFS="$save_IFS"
  18     test -z "$dir" && dir=.
  19     if test -x "$dir/unrar" -a -f "$dir/unrar"; then
  20         UNRAR="$dir/unrar"
  21         break
  22     fi
  23 done
  24
  25 if [ ! -x $UNRAR -a -x $RAR ]; then
  26     UNRAR=$RAR
  27 fi
  28
  29 mcrarfs_list ()
  30 {
  31      $UNRAR v -c- "$1" | @AWK@ -v uid=`id -u` -v gid=`id -g` '
  32 BEGIN { flag=0 }
  33 /^-------/ { flag++; if (flag > 1) exit 0; next }
  34 {
  35 if (flag == 0) next
  36 if ( !/ [0-9][0-9]:[0-9][0-9] /) str = $0  # there is no time spec in this line
  37 else {
  38     if (str ~ /^\^/)
  39         str=substr(str, 2)
  40     split($4, a, "-")
  41     if (index($6, "D") != 0)
  42         $6="drwxr-xr-x"
  43     else
  44         if (index($6, ".") != 0)
  45             $6="-rw-r--r--"
  46     printf "%s 1 %s %s %d %02d/%02d/%02d %s %s\n", $6, uid, gid, $1, a[2], a[1], a[3], $5, str
  47 }
  48 }'
  49 }
  50
  51 mcrarfs_copyin ()
  52 {
  53 # copyin by christian.gennerat@alcatel.fr
  54 # preserve pwd. It is clean, but is it necessary?
  55     pwd=`pwd`
  56 # Create a directory and copy in it the tmp file with the good name
  57     mkdir "$3.dir"
  58     cd "$3.dir"
  59     di="${2%/*}"
  60 # if file is to be written upper in the archive tree, make fake dir
  61     if test x"$di" != x"${2##*/}" ; then
  62         mkdir -p "$di"
  63     fi
  64     cp -fp "$3" "$3.dir/$2"
  65     $RAR a "$1" "$2" >/dev/null
  66     cd "$pwd"
  67     rm -rf "$3.dir"
  68 }
  69
  70 mcrarfs_copyout ()
  71 {
  72     $UNRAR p -p- -c- -inul "$1" "$2" > "$3"
  73 }
  74
  75 mcrarfs_mkdir ()
  76 {
  77 # preserve pwd. It is clean, but is it necessary?
  78     pwd=`pwd`
  79 # Create a directory and create in it a tmp directory with the good name
  80     dir=`mktemp -d "${MC_TMPDIR:-/tmp}/mctmpdir-urar.XXXXXX"` || exit 1
  81     cd "$dir"
  82     mkdir -p "$2"
  83 # rar cannot create an empty directory
  84     touch "$2"/.rarfs
  85     $RAR a -r "$1" "$2" >/dev/null
  86     $RAR d "$1" "$2/.rarfs" >/dev/null
  87     cd "$pwd"
  88     rm -rf "$dir"
  89 }
  90
  91 mcrarfs_rm ()
  92 {
  93     $RAR d "$1" "$2" >/dev/null
  94 }
  95
  96 LC_ALL=C
  97 export LC_ALL
  98
  99 umask 077
 100
 101 cmd="$1"
 102 shift
 103
 104 case "$cmd" in
 105   # Workaround for a bug in mc - directories must precede files to
 106   # avoid duplicate entries, so we sort output by filenames
 107   list)    mcrarfs_list    "$@" | sort -k 8 ;;
 108   rm)      mcrarfs_rm      "$@" ;;
 109   rmdir)   mcrarfs_rm      "$@" ;;
 110   mkdir)   mcrarfs_mkdir   "$@" ;;
 111   copyin)  mcrarfs_copyin  "$@" ;;
 112   copyout) mcrarfs_copyout "$@" ;;
 113   *) exit 1 ;;
 114 esac
 115 exit 0