| 
2334
 | 
     1  | 
#!/bin/bash -norc
  | 
| 
2295
 | 
     2  | 
#
  | 
| 
2310
 | 
     3  | 
# $Id$
  | 
| 
 | 
     4  | 
#
  | 
| 
2295
 | 
     5  | 
# DESCRIPTION: change parent of Poly/ML database
  | 
| 
2310
 | 
     6  | 
  | 
| 
2295
 | 
     7  | 
  | 
| 
 | 
     8  | 
PRG=$(basename $0)
  | 
| 
 | 
     9  | 
  | 
| 
 | 
    10  | 
function usage()
  | 
| 
 | 
    11  | 
{
 | 
| 
 | 
    12  | 
  echo
  | 
| 
 | 
    13  | 
  echo "Usage: $PRG DB PARENT"
  | 
| 
 | 
    14  | 
  echo
  | 
| 
 | 
    15  | 
  echo "  Change parent of Poly/ML database DB to PARENT (full path name!)."
  | 
| 
 | 
    16  | 
  echo
  | 
| 
 | 
    17  | 
  exit 1
  | 
| 
 | 
    18  | 
}
  | 
| 
 | 
    19  | 
  | 
| 
 | 
    20  | 
function fail()
  | 
| 
 | 
    21  | 
{
 | 
| 
2334
 | 
    22  | 
  echo "$1" >&2
  | 
| 
2295
 | 
    23  | 
  exit 2
  | 
| 
 | 
    24  | 
}
  | 
| 
 | 
    25  | 
  | 
| 
 | 
    26  | 
  | 
| 
 | 
    27  | 
## main
  | 
| 
 | 
    28  | 
  | 
| 
 | 
    29  | 
[ $# -ne 2 ] && usage
  | 
| 
 | 
    30  | 
  | 
| 
 | 
    31  | 
DB="$1"
  | 
| 
 | 
    32  | 
PARENT="$2"
  | 
| 
 | 
    33  | 
  | 
| 
 | 
    34  | 
case "$ML_SYSTEM" in
  | 
| 
 | 
    35  | 
  polyml-*)
  | 
| 
 | 
    36  | 
    [ ! -w "$DB" ] && fail "Database not writable: $DB"
  | 
| 
2310
 | 
    37  | 
    $ML_HOME/changeParent "$DB" "$PARENT"
  | 
| 
2295
 | 
    38  | 
    ;;
  | 
| 
 | 
    39  | 
  *)
  | 
| 
 | 
    40  | 
    fail "You're not set up for Poly/ML!"
  | 
| 
 | 
    41  | 
    ;;
  | 
| 
 | 
    42  | 
esac
  |