;;
;;      $Source: Devel:cs220/RCS/Install,v $
;;      $Author: tsarna $
;;    $Revision: 2.2 $
;;        $Date: 1994/09/22 04:23:38 $
;;
;;        Gage Drivers Installation Script
;;
;;    (C) Copyright 1994 Endicor Technologies, Inc.
;;        All Rights Reserved.
;;


; Make sure that we are running under at least OS 2.04
(if (< (/ (getversion) 65536) 37)
   (abort "You must be using Kickstart 2.04 or higher to install and use the driver(s).")
)

(complete 0)

(welcome "Welcome to the Gage Driver installation utility\n"
)

(set ddestdir
   (askdir
      (prompt
         "\nIn which disk (or drawer) should the driver(s) "
         "be installed or updated?"
      )
      (help @askdir-help)
      (default "SYS:Expansion")
   )
)
(if (NOT (exists ddestdir))
   (makedir ddestdir
      (infos)
   )
)

(complete 10)

(copylib (source "Expansion/NULL")
   (dest ddestdir)
   (optional "force" "askuser")
   (infos)
)

(complete 20)

(if (exists "Expansion/CS220")
   (copylib (source "Expansion/CS220")
      (dest ddestdir)
      (optional "force" "askuser")
      (infos)
   )
)

(complete 30)

(set opts
   (askoptions
      (prompt "Please select which files you wish to install")
      (help "Select optional files to install")
      (choices
         "Autodocs (ASCII)"
         "Autodocs (PostScript)"
         "Include File (<devices/gagescope.h>)"
      )
   )
)

(complete 40)

(set adestdir "AUTODOCS:")
(if (IN opts 0)
   (
      (set adestdir
         (askdir
            (prompt
               "\nIn which directory should the Autodocs "
               "be installed or updated?"
            )
            (help @askdir-help)
            (default adestdir)
         )
      )
      (if (NOT (exists adestdir))
         (makedir adestdir
            (infos)
         )
      )

      (complete 50)

      (copyfiles
         (prompt "Installing ASCII Autodocs")
         (source "Docs/gage_xxx.doc")
         (dest adestdir)
         (infos)
      )
   )
)

(complete 60)

(if (IN opts 1)
   (
      (set adestdir
         (askdir
            (prompt
               "\nIn which directory should the PostScript "
               "Autodocs be installed or updated?"
            )
            (help @askdir-help)
            (default adestdir)
         )
      )
      (if (NOT (exists adestdir))
         (makedir adestdir
            (infos)
         )
      )

      (complete 70)

      (copyfiles
         (prompt "Installing PostScript Autodocs")
         (source "Docs/gage_xxx.doc.ps")
         (dest adestdir)
         (infos)
      )
   )
)

(complete 80)

(set idestdir "INCLUDE:devices")
(if (IN opts 2)
   (
      (set idestdir
         (askdir
            (prompt
               "\nIn which directory should the <devices/gagescope.h> "
               "C header file be installed or updated?"
            )
            (help @askdir-help)
            (default idestdir)
         )
      )
      (if (NOT (exists idestdir))
         (makedir idestdir
            (infos)
         )
      )

      (complete 90)

      (copyfiles
         (prompt "Installing <devices/gagescope.h> C header file")
         (source "include/devices/gagescope.h")
         (dest idestdir)
         (infos)
      )
   )
)

(complete 100)

(message 
   "Installation Complete. Please check the tooltypes on the "
   "driver(s) in your Expansion drawer and verify that they "
   "match the configuration of your hardware."
)

(exit (quiet))
