#!/usr/bin/bash
# Why bash: because the source code is free and portable
# http://www.sunfreeware.com
#
# File: teststdio.bash
# Version: 3.0 (June 6, 2004)
# Source:  http://bear.ces.cwru.edu/vhdl
# Date:    June 6, 2004 (Copyright)
# Author:  Francis G. Wolff   Email: fxw12@po.cwru.edu
# Author:  Michael J. Knieser Email: mjknieser@knieser.com
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 1, or (at your option)
# any later version: http://www.gnu.org/licenses/gpl.html
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.   See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
set -x
if [ -e C            ]; then rm -f C;        fi #synopsys
if [ -e WORK         ]; then rm -f WORK;     fi #synopsys
if [ -e c            ]; then rm -f c;        fi #modelsim
if [ -e work         ]; then rm -f work;     fi #modelsim
if [ -e modelsim.ini ]; then rm -f modelsim.ini; fi #modelsim
if [ -e WORK.SYM     ]; then rm -f WORK.SYM; fi #symphony eda
if [ -e C.SYM        ]; then rm -f C.SYM;    fi #symphony eda

if [   -e inlet         ]; then rm -f inlet; fi
if [   -e pipe1         ]; then rm -f pipe1; fi
if [   -e pipe2         ]; then rm -f pipe2; fi

#kill the pipe
### solaris specific command "ps -af"
/usr/bin/ps -af
kill -9 `/usr/bin/ps -af | grep 'inlet [^p]*pipe1 [^p]*pipe2' | awk '{ print $2 }'`
rm -f pipe1 pipe2
rm -f inlet

gcc ../../inlet.c -o inlet

#Is pipe1 a fifo pipe?
if [ ! -p "./pipe1" ]; then mkfifo pipe1; fi
if [ ! -p "./pipe2" ]; then mkfifo pipe2; fi

./inlet -v -a -p1 ./pipe1 ./pipe2 &
cat inlet_test_file.txt > pipe1 &

if [ "${1}" == "--vcom" ]; then
  shift
  vlib c
  vlib work
  vmap c c
  vmap work work
  vcom -93 -work c ../../ctype_h.vhd
  vcom -93 -work c ../../strings_h.vhd
  vcom -93 -work c ../../debugio_h.vhd
  vcom -93 -work c ../../stdlib_h.vhd
  vcom -93 -work c ../../regexp_h.vhd
  vcom -93 -work c ../../stdio_h.vhd
  vcom -93 inlet_test.vhd
  if [ "${1}" == "--gui" ]; then
    shift
    echo "view source" >x.txt
    echo "view variables" >>x.txt
    vsim -lib work -l inlet_test_vsim_log.txt inlet_test_cfg -do x.txt
  else
    echo "run" >x.txt
    echo "quit" >>x.txt
    vsim -lib work -l inlet_test_vsim_log.txt inlet_test_cfg -c -do x.txt
  fi
else
  mkdir  C
  mkdir  WORK
  vhdlan -NOEVENT -work C ../../ctype_h.vhd
  vhdlan -NOEVENT -work C ../../strings_h.vhd
  vhdlan -NOEVENT -work C ../../debugio_h.vhd
  vhdlan -NOEVENT -work C ../../stdlib_h.vhd
  vhdlan -NOEVENT -work C ../../regexp_h.vhd
  vhdlan -NOEVENT -work C ../../stdio_h.vhd
  vhdlan -NOEVENT inlet_test.vhd

  if [ "${1}" == "--gui" ]; then
    shift
    vhdlsim inlet_test_cfg &
  else
    echo "run" >x.txt
    echo "quit" >>x.txt
    vhdlsim -e x.txt inlet_test_cfg
  fi
fi