#!/bin/sh
#
#
#    Copyright (c) 2004 Brocade Communications Systems, Inc.
#    All rights reserved.
#
#
# NAME
#     chipcreditshow - disply credit registers for all ports in a chip
# 
# SYNOPSIS
#      chipcreditshow [slot/]chip
# 
# AVAILABILITY
#      all users
# 
# DESCRIPTION
#      This command will display the credit register contents for all ports
#      in the specified chip
# 
# OPTIONS
#      [slot/]chip
#                Specify  the  index  of  the chip within the blade
#                specified by slot to be displayed. If slot is  not
#                specified,  the  current slot will be assumed. You
#                can set the current slot by execution  of  setslot
#                command.
# 
# EXAMPLES: Please see ptCreditShow.sh.in for examples of credit register
#           displays.
#      
# SEE ALSO
#      ptcreditshow(1d)
# 

def_slot=0
shtyp=portmap

#
#
# Load library -- must be first.
#
home="/fabos/share"
util="diagcommon.sh"
portmapuitl="debugcommon.sh"
ok=0
for f in "./$util" "$FABOSHOME/share/$util" "$home/$util" ; do
	if [ -r $f ] ; then
		. $f
		ok=1
		break;
	fi
done
if [ $ok -ne 1 ] ; then
	echo "Error -- could not locate $util"
	exit 3
fi

ok=0
for f in "./$portmapuitl" "$FABOSHOME/share/$portmapuitl" "$home/$portmapuitl" ; do
	if [ -r $f ] ; then
		. $f
		ok=1
		break;
	fi
done
if [ $ok -ne 1 ] ; then
	echo "Error -- could not locate $util"
	exit 3
fi

#
# get sys info for multi blade
#
multiBlade=`isMultiBlade`
if [ $multiBlade = TRUE ]
then
     syntax="`/bin/basename $0` [slot/]chip"
else
     syntax="`/bin/basename $0` chip"
fi
#
# Preprocessing command arguments 
#

slot=${FABOS_SLOTNO:-$def_slot}

dashslot_found=0
permslot_set=0
permchip_set=0
tempchip_set=0

for param in $@ ; do

    #
    # if the previous param was "--slot" :
    #
    # 1) we check if the current param is a number.
    # 2) we check if slot/port parameter already set the slot number.
    # 3) we set $slot_num with current parameter if none of the above
    #    condition is met. otherwise we just shift or generate error.
    #
    if [ $dashslot_found -eq 1 ] ; then
	num_matched=`echo $param | /bin/sed 's/[0-9]\{1,\}//'`
	if [ -z $num_matched ] ; then
	    if [ $permslot_set -ne 1 ] ; then
		slot=$param
	    fi
	    dashslot_found=0
	    shift ; continue
	else
	    echo "Invalid slot number : $param"
	    exit 3
	fi
    fi

    dashslot_matched=`echo $param | /bin/sed 's/[-]\{1,\}slot//'`
    if [ -z $dashslot_matched ] ; then
	dashslot_found=1
	shift ;	continue
    fi

    slotchip_matched=`echo $param | /bin/sed 's/[0-9]\{1,\}\/[0-9]\{1,\}//'`
    if [ -z $slotchip_matched ] ; then
	slot=`echo $param | /bin/sed 's/\/[0-9]\{1,\}//'`
	chip=`echo $param | /bin/sed 's/[0-9]\{1,\}\///'`
	permchip_set=1
	permchip_set=1
	shift ;	continue
    fi

    num_matched=`echo $param | /bin/sed 's/[0-9]\{1,\}//'`
    if [ -z $num_matched ] ; then
	if [ $permchip_set -ne 1 ] && [ $tempchip_set -ne 1 ] ; then
	    chip=$param
	    tempchip_set=1
	    shift ; continue
	fi
    fi
done

#
# At this point, $port should have a valid value and no parameter
# should remain.
#
if [ -z $chip ] ; then
    err "Invalid command"
    exit 4
fi

case "$#" in
    0)  ;;
    *)  err "Invalid command" ; exit 4 ;;
esac

#
#
#
slot=`getValue $slot`
if [ $? != 0 ] ; then exit 3 ; fi
chip=`getValue $chip`
if [ $? != 0 ] ; then exit 3 ; fi

enableSlotProc $slot
if [ $? != 0 ] ; then exit 3 ; fi
if [ $chip -lt 0 ] || [ $chip -gt 7 ] ; then
   err "Chip: $chip invalid number"
   exit 4
fi
if [ $multiBlade = TRUE ]
then
    slot_message=" Slot: $slot"
else
    slot_message=""
fi

path="/proc/fabos/blade/$slot"

file=$path/$shtyp
if [ -z $file ] ; then
   err "Port: $port not found."
else
   echo ""
   echo "Slot= $slot, Chip= $chip"
   get_chip_line_in_minis_chip_port_list $file $chip
   echo ""


   # find the file location based on the slot

   next_line=0

   # Here we read the portmap to find all the appropriate ports.  This is
   # platform independent.  We used to hard-code the ports list.
   get_CH_portmap_list $file -CH $chip | while read line
   do
      if [ "$line" = "" ] ; then
         continue
      fi

      STR_CTL=`/bin/echo $line | /usr/bin/cut -d" " -f1`
      if [ "$STR_CTL" = "CTL" ] ; then
         next_line=1
         continue
      fi

      if [ $next_line -eq 1 ] ; then
         next_line=2
         continue
      fi

      if [ $next_line -ne 2 ] ; then
         continue
      fi

      _bport=`/bin/echo $line | /usr/bin/cut -d" " -f2`
      ptcreditshow -slot $slot $_bport 
   done

fi
# disable the proc entries of this slot
disableSlotProc $slot

