# konkia color  add user script ..
# yes this code is horrid 
# clean cookie
rm cookie

#login
curl -b cookie -c cookie 'http://10.192.0.43/wcd/ulogin.cgi?func=PSL_LP0_TOP&AuthType=None&TrackType=None&ExtSvType=&Lang=Auto&Mode=Public&ViewMode=Flash'


for i in {1..60}
do
echo $i
curl -b cookie -c cookie "http://10.192.0.43/wcd/scan.cgi?func=PSL_C_ABR_DEL&C_ABR_H_NUM=$i&C_ABR_H_AKI=Public"
sleep 1
done


for i in `/usr/local/sbin/antixls-0.3b.perl --tsv /home/shares/Public/contacts.xls | cut -f 4 |grep com|sed 's/@/%40/g'`
do
curl -b cookie -c cookie "http://10.192.0.43/wcd/scan.cgi?func=PSL_C_A_EML_PTR&H_NUM=new&T_NUM=&H_AKI=Public&T_NAM=$i&S_SER=Abc&C_WEL=WellUse&R_REF=Level&T_RNM=&S_LEV=0&T_ADD=$i&C_SME=Off&R_SMI=Regist&C_PTR_F_FIL="
sleep 2
done


# konkia bw 10.192.0.40 add user script ..
varnumber=0
for i in `/usr/local/sbin/antixls-0.3b.perl --tsv /home/shares/Public/contacts.xls | cut -f 4 |grep com|sed 's/@/%40/g'`
do
export varsnortname=`echo $i|awk '{gsub("%40.*",""); print}'`
echo $varsnortname
echo $varnumber

curl -b cookie -c cookie "http://10.192.0.40/M_SC_EMAIL.cgi?OneTouchShortenNumber=$varnumber&DestType=0&DestName=$varsnortname&SendAdrs=$i&OneTouchFileFormat=0&OneTouchTIFFFormat=0&submit=Apply&DataEnd=1"
let varnumber=varnumber+1
sleep 2
done


# konkia bw 10.192.0.41 add user script ..
varnumber=0
for i in `/usr/local/sbin/antixls-0.3b.perl --tsv /home/shares/Public/contacts.xls | cut -f 4 |grep com|sed 's/@/%40/g'`
do
export varsnortname=`echo $i|awk '{gsub("%40.*",""); print}'`
echo $varsnortname
echo $varnumber

curl -b cookie -c cookie "http://10.192.0.41/M_SC_EMAIL.cgi?OneTouchShortenNumber=$varnumber&DestType=0&DestName=$varsnortname&SendAdrs=$i&OneTouchFileFormat=0&OneTouchTIFFFormat=0&submit=Apply&DataEnd=1"
let varnumber=varnumber+1
sleep 2
done