My favorites | Sign in
Project Home Downloads Wiki Issues Source
Checkout   Browse   Changes    
 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
# ----------------------------------------------------------------------------
# http://cbn.globoradio.com.br
# Busca e toca os últimos comentários dos comentaristas da radio CBN.
# Uso: zzcbn [-mp3] [-c COMENTARISTA] [-d data] ou zzcbn -lista
# Ex.: zzcbn -c max -d ontem
# zzcbn -c mauro -d tudo
# zzcbn -c juca -d 13/05/09
# zzcbn -c miriam
# zzcbn -mp3 -c max
#
# Autor: Rafael Machado Casali <rmcasali (a) gmail com>
# Desde: 2009-04-16
# Versão: 1
# Licença: GPL
# Requisitos: zzecho
# ----------------------------------------------------------------------------
zzcbn ()
{
zzzz -h cbn "$1" && return

local COMENTARISTAS MP3 RSS data comentarista datafile

#Comentaristas;RSS;Download
COMENTARISTAS="André_Trigueiro;andretrigueiro;andre-trigueiro;mundo
Arnaldo_Jabor;arnaldojabor;arnaldo-jabor;jabor
Carlos_Alberto_Sardenberg;carlosalbertosardenberg;sardenberg
Cony_&_Xexéo;conyxexeo;conyxexeo
Ethevaldo_Siqueira;ethevaldosiqueira;digital
Gilberto_Dimenstein;gilbertodimenstein;dimenstein
Juca_Kfouri;jucakfouri;jkfouri
Lucia_Hippolito;luciahippolito;lucia
Luis_Fernando_Correia;luisfernandocorreia;saudefoco
Mara_Luquet;maraluquet;mara
Marcos_Petrucelli;marcospetrucelli;petrucelli
Mauro_Halfeld;maurohalfeld;halfeld
Max_Gehringer;maxgehringer;max
Merval_Pereira;mervalpereira;merval
Miriam_Leitão;miriamleitao;mleitao
Renato_Machado;renatomachado;rmachado
Sérgio_Abranches;sergioabranches;ecopolitica"

RSS="http://imagens.globoradio.globo.com/cbn/rss/comentaristas/"
#MP3="http://download3.globo.com/sgr-$EXT/cbn/"
#EXT="mp3"
MP3="mms://wm-sgr-ondemand.globo.com/_aberto/sgr/1/cbn/"
EXT="wma"

#Verificacao dos parâmetros
[ "$1" ] || { zztool uso cbn; return 1; }

if [ "$1" == "-lista" ]
then
for i in $COMENTARISTAS
do
echo `echo $i | cut -d';' -f1`
done
return
fi

# Opções de linha de comando
while [ "${1#-}" != "$1" ]
do
case "$1" in
-c)
shift
comentarista="$1"
;;
-d)
shift
data="$1"
;;
-mp3)
EXT="mp3"
MP3="http://download3.globo.com/sgr-$EXT/cbn/"
;;
*)
zzecho -l vermelha "Opção inválida!!"
return 1
;;
esac
shift
done

linha=`echo $COMENTARISTAS | tr ' ' '\n' | sed "/$comentarista/!d"`
autor=`echo $linha | cut -d';' -f 3`
# [ "$data" ] || data=`LANG=en.US date "+%d %b %Y"`
# echo "$RSS`echo $linha | cut -d';' -f 2`.xml"
$ZZWWWHTML "$RSS`echo $linha | cut -d';' -f 2`.xml" | sed -n "/title/p;/pubDate/p" | sed "s/.*A\[\(.*\)]].*/\1/g" | sed "s/.*>\(.*\)<\/.*/\1/g" | sed "2d" > "$ZZTMP.comentarios"

zzecho -l ciano `cat "$ZZTMP.comentarios" | sed -n '1p'`

case "$data" in
"ontem")
datafile=`date -d "yesterday" +%y%m%d`
data=`LANG=en date -d "yesterday" "+%d %b %Y"`
cat "$ZZTMP.comentarios" | sed -n "/$data/{H;x;p;};h" > "$ZZTMP.coment"
;;
"tudo")
cat "$ZZTMP.comentarios" | sed '1d' > "$ZZTMP.coment"
;;
"")
datafile=`date '+%y%m%d'`
data=`LANG=en date "+%d %b %Y"`
cat "$ZZTMP.comentarios" | sed -n "/$data/{H;x;p;};h" > "$ZZTMP.coment"
;;
*)
if ! ( zztool testa_data "$data" || zztool testa_numero "$data" )
then
echo "Data inválida '$data', deve ser dd/mm/aaaa"
return 1
fi
data="`echo $data | sed 's/\([0-9]*\)\/\([0-9]*\)\/\([0-9]*\)/\3-\2-\1/g'`"
datafile=`date -d $data +%y%m%d`
data=`LANG=en date -d $data "+%d %b %Y"`
cat "$ZZTMP.comentarios" | sed -n "/$data/{H;x;p;};h" > "$ZZTMP.coment"


esac
Tlinhas=`cat "$ZZTMP.coment"| sed -n '$='`
[ "$Tlinhas" ] || { zzecho -l vermelho "Sem comentários"; return; }
for ((l=1;$l<=$Tlinhas;l=$l+2))
do
P=`expr $l + 1`
titulo=`cat "$ZZTMP.coment"| sed "$l!d"`
data=`cat "$ZZTMP.coment"| sed "$P!d"`
datafile=`date -d "$data" "+%y%m%d"`
hora=`LANG=en date -d "$data" "+%p"`
data=`LANG=en date -d "$data" "+%d %b %Y %H:%m"`
dois="_"
if [ "$hora" == "PM" ]
then
case "$autor" in
"sardenberg"|"mleitao"|"halfeld")
dois="2_"
;;
esac
fi
zzecho -l verde "(q) para próximo; CTRL+C para sair"
#echo $MP3`date +%Y`/colunas/$autor$dois$datafile.$EXT
echo $titulo - $data
mplayer $MP3`date +%Y`/colunas/$autor$dois$datafile.$EXT 1>/dev/null 2>/dev/null || return
done
if [ "$Tlinhas" == "0" ]
then
zzecho -l vermelho "Sem comentários"
fi
rm -f "$ZZTMP.comentarios"
rm -f "$ZZTMP.coment"
}

Change log

r710 by aureliojargas on Mar 29, 2012   Diff
SEGURANÇA: $1 colocado entre aspas na
chamada padrão zzzz -h de todas as
funções.
Go to: 
Sign in to write a code review

Older revisions

r668 by aureliojargas on Mar 28, 2012   Diff
lint: removendo espaços inúteis.
r540 by aureliojargas on May 24, 2011   Diff
COMBO: Removidos espaços e tabs
inúteis do fim das linhas, verificados
por utils/alinhamento
r524 by aureliojargas on May 23, 2011   Diff
COMBO: Agora todas as chamadas ao
zztool uso por falha na verificação
dos parâmetros possuem um return 1
depois. Assim outros scripts que usam
as funções podem detectar erros.
All revisions of this file

File info

Size: 4303 bytes, 149 lines
Powered by Google Project Hosting