File: convertimp

package info (click to toggle)
fpc 3.0.0%2Bdfsg-11
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 273,372 kB
  • sloc: pascal: 2,840,574; xml: 152,225; ansic: 9,635; asm: 8,297; java: 5,346; sh: 3,991; yacc: 3,745; php: 3,281; makefile: 2,635; lex: 2,538; sql: 267; cpp: 145; perl: 134; sed: 132; csh: 34; tcl: 7
file content (50 lines) | stat: -rw-r--r-- 1,039 bytes parent folder | download | duplicates (15)
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
#!/bin/sh

usage ()
{
  echo "$0 SOURCEDIR"
  echo ""
  echo "converts .imp, .Imp and .IMP files from DOS CR/LF to LF only and"
  echo "translates filename to lower case. Converted files are stored"
  echo "in current directory."
  echo "ad 2001/04/16"
  exit 1
}

cnv ()
{
  DESTFN=`echo "$1" | tr [A-Z] [a-z]`
  echo -n "converting $1 to $DESTDIR/$DESTFN "
  
  echo "# converted to unix by $USERNAME on $HST at $NOW" >$DESTDIR/$DESTFN
  echo "#" >>$DESTDIR/$DESTFN
  cat $1 | tr -d '\r' >> $DESTDIR/$DESTFN
  # set time/date from source
  touch -r $1 $DESTDIR/$DESTFN
  echo ""
}

if [ -x /usr/bin/tr ]; then
  if [ -x /bin/tr ]; then
    if [ -x /usr/local/bin/tr ]; then
      echo "this utility needs tr. Please install GNU textutils."
      usage
    fi
  fi
fi
[ "$1" = "" ] && usage
[ ! -d $1 ] && usage
HST=`uname -n`
NOW=`date`
DESTDIR=`pwd`
cd $1
for i in *.imp; do
  [ "$i" != "*.imp" ] && cnv $i
done
for i in *.IMP; do
  [ "$i" != "*.IMP" ] && cnv $i
done
for i in *.Imp; do
  [ "$i" != "*.Imp" ] && cnv $i
done
cd $DESTDIR