Hola a todos,
recientemente he instalado pppcost para que monitoree el gasto telefónico en
mis conexiones vía módem a Internet pero el fichero ~./pppcosts no refleja
nada coherente, después de tres conexiónes de menos de 20 minutos cada una,
este es su contenido:
[EMAIL PROTECTED] cat .pppcosts
3324
25
¿Hay que ponerle alguna opción a pppcosts para que vuelque información a
~./pppcosts?, ¿qué significa lo contiene mi ~/.pppcosts?.
Por cierto, cuando conecto mediante wmppp, y tengo previamente lanzado
pppcosts, este último detecta bien cuando se produce la conexión pero el
tiempo de conexión comienza con 30 segundos, igual estoy preguntando una
idiotez porque es así como factura Telfónica pero, ¿por qué sucede esto?.
Ya por último, alguien ha actualizado a mano el fichero es-costs.c con las
tarifas actuales, por favor si esí que me lo mande pues no se de donde sacar
todos los parámetros necesarios para actualizarlo yo.
Si alguien conoce algún método mejor para vigilar el gasto telefónico, le
agradecería que me lo contase, Xose Manoel me mandó el script que adjunto
pero al intentar ejecutarlo me sucede lo siguiente:
[EMAIL PROTECTED] coste_infovia
awk: ./coste_infovia: line 87: syntax error at or near pasos
awk: ./coste_infovia: line 104: syntax error at or near *
awk: ./coste_infovia: line 108: syntax error at or near duracion
awk: ./coste_infovia: line 152: runaway regular expression /tarifa[tip ...
Saludos y gracias.
--
Javier Viñuales Gutiérrez
[EMAIL PROTECTED]
#!/usr/bin/awk -f
BEGIN {
###
# Definici¢n de variables necesarias para el programa #
###
# no podemos sacar el año del log
# por tanto tenemos que definirlo aquí
ano=1997
# a donde hacemos la llamada
id=infovía
# tarifa aplicable
tipo =local
# Coste del paso y iva aplicable
iva = 0.16
coste = 5.7
# Datos para cada tipo de tarifa (duraci¢n del paso y pasos iniciales)
pasos_iniciales[local]=1
pasos_iniciales[provincial]=2
pasos_iniciales[nacional]=3
tarifa[local,reducida]=240
tarifa[local,normal]=180
tarifa[local,punta]=180
tarifa[provincial,reducida]=46
tarifa[provincial,normal]=22.9
tarifa[provincial,punta]=20
tarifa[nacional,reducida]=20
tarifa[nacional,normal]=10.7
tarifa[nacional,punta]=7.2
}
# comienzo conexión
/Comienzo Conexión/ {
split($3,x,:)
hora=x[1]
minuto=x[2]
}
# final conexión
/Fin Conexión/ {
split($3,x,:)
duracion_v = duracion(hora, minuto, x[1], x[2])
duracion_minutos=duracion_v / 60
dia_semana_v=int(index(NulMonTueWenThuFriSatSun,$1)/3)
pasos_v=pasos(dia_semana_v,hora,duracion_v,tipo)
printf Día %6s Hora %6s Llamada a %10s %5d min: %3d pasos
%-5.6g ptas\n\
,$3,$2,id,duracion_minutos\
,pasos_v,pesetas(pasos_v)
}
##
# Funciones necesarias para el funcionamiento del programa #
##
##
# devuelve la duración en segundos dandole hora de inicio y #
# fin de algun suceso #
##
# uso: #
##
#duracion(hora_ini, minuto_ini, hora_fin, minuto_fin)#
##
# hora_ini, minuto_ini hora y minuto del comenzo #
# hora_fin, minuto_fin hora y minuto del final #
##
##
function duracion(hora_ini, minuto_ini, hora_fin, minuto_fin, horas,
minutos) {
if ( hora_ini hora_fin ) { horas = 24-hora_ini + hora_fin }
else { horas = hora_fin - hora_ini }
if ( minuto_ini minuto_fin ) { minutos =
(60-minuto_ini)+minuto_fin ;
horas = horas -1 }
else { minutos = minuto_fin - minuto_ini }
return horas*60*60+minutos*60
}
function pesetas(pasos){
###
# devuelve el coste en pesetas de un n£mero de pasos #
# #
#uso: #
# #
# pesetas(pasos)