shell-script-pt
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RES: [shell-script] ProgressBAR


From: Julio Cezar Neves - DATAPREVRJ
Subject: RES: [shell-script] ProgressBAR
Date: Wed, 8 Dec 2004 16:13:02 -0300

Aê Felipe,
Vc pode fazer em Dialog mas eu desenvolvi uma maluquice que tem o charme da
interface a caractere.

Estou te passando 2 fontes. O primeiro (spin.sh) é o principal. O segundo é
só para testar o primeiro. Vê se te serve.

$ cat spin.sh
#!/bin/sh

if  [ $# -lt 3 ]
then
        echo "
    Uso: `basename $0` <PID do proc. em background> <No. da Lin.> <No. da
Col.> [Tempo previsto p/ execucao]
"
        exit 1
fi
[ $4 ] && Tp=$4
Pon='\|/--\|/--'
Lin1=$2
Col1=$3
Lin2=`expr $Lin1 + 1`
Lin3=`expr $Lin1 + 2`
Lin4=`expr $Lin1 + 3`
Lin5=`expr $Lin1 + 4`
Lin6=`expr $Lin1 + 5`
Col2=`expr $Col1 + 1`
Col3=`expr $Col1 + 2`
Col4=`expr $Col1 + 3`
Col5=`expr $Col1 + 4`
i=0
Decorr=0
tput cup $Lin1 $Col1
echo '+-----+'
tput cup $Lin2 $Col1
echo '|     |'
tput cup $Lin3 $Col1
echo '|  +  |'
tput cup $Lin4 $Col1
echo '|     |'
tput cup $Lin5 $Col1
echo '+-----+'
tput cup $Lin6 $Col1
echo 'AGUARDE'

while kill -0 $1 2> /dev/null
do
    i=`expr $i % 8 + 1`
    case $i in
        1)  tput cup $Lin3 $Col2
            echo "  "
            tput cup $Lin2 $Col3
            echo `echo $Pon | cut -c1`
            ;;
        2)  tput cup $Lin2 $Col3
            echo " "
            tput cup $Lin2 $Col4
            echo `echo $Pon | cut -c2`
            ;;
        3)  tput cup $Lin2 $Col4
            echo " "
            tput cup $Lin2 $Col5
            echo `echo $Pon | cut -c3`
            ;;
        4)  tput cup $Lin2 $Col5
            echo " "
            tput cup $Lin3 $Col5
            echo `echo $Pon | cut -c4,5`
            ;;
        5)  tput cup $Lin3 $Col5
            echo "  "
            tput cup $Lin4 $Col5
            echo `echo $Pon | cut -c6`
            ;;
        6)  tput cup $Lin4 $Col5
            echo " "
            tput cup $Lin4 $Col4
            echo `echo $Pon | cut -c7`
            ;;
        7)  tput cup $Lin4 $Col4
            echo " "
            tput cup $Lin4 $Col3
            echo `echo $Pon | cut -c8`
            ;;
        8)  tput cup $Lin4 $Col3
            echo " "
            tput cup $Lin3 $Col2
            echo `echo $Pon | cut -c9,10`
            ;;
    esac
    sleep 1
    if  [ $Tp ]
    then
        Decorr=`expr $Decorr + 1`
        Perc=`expr $Decorr \* 100 / $Tp`
        [ $Perc -ge 100 ] && Perc=99
        [ $Perc -lt 10 ] && Perc=0$Perc
        tput cup $Lin6 $Col1
        echo "+-$Perc%-+"
    fi
done
for i in 1 2 3 4 5 6
do
        eval tput cup \$Lin$i $Col1
        echo "       "
done

$ cat tstspin.sh
clear
sleep 30 &
spin.sh $! 13 43 30

:wq
Julio Cezar Neves
- Programa de Software Livre -
Tel:+55 21 2528-7070 / +55 21 8112-9988
Fax: +55 21 2528-7646
mailto:address@hidden


| -----Mensagem original-----
| De: Felipe Chaves [mailto:address@hidden]
| Enviada em: quarta-feira, 8 de dezembro de 2004 15:37
| Para: address@hidden
| Assunto: [shell-script] ProgressBAR
| 
| 
| 
| Prezados,
| 
|  
| 
| Gostaria de saber se existe alguma forma de desenvolver um 
| progress-bar em shell, possuo um script para firewall que 
| gostaria de disponibilizar para a comunidade, só que ele 
| bloqueia sites(45000), demora uns 5 minutos para carregar 
| .... por isso gostaria de um progress ... se possível 
| parecido com o do wget.
| 
|  
| 
| Abraços,
| 
| Felipe Chaves
| 
| 
| 
| [As partes desta mensagem que não continham texto foram removidas]
| 
| 
| 
| ---------------------------------------------------------------------
| Esta lista não admite a abordagem de outras liguagens de 
| programação, como perl, C etc. Quem insistir em não seguir 
| esta regra será moderado sem prévio aviso.
| ---------------------------------------------------------------------
| Sair da lista: address@hidden
| ---------------------------------------------------------------------
| Esta lista é moderada de acordo com o previsto em 
http://www.listas-discussao.cjb.net
---------------------------------------------------------------------
 
Links do Yahoo! Grupos




 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]