#!/bin/bash

# VERBOSE=
VERBOSE=0

# not root?  be root
[ "$EUID" -ne 0 ] && exec kdesu -c "$0 $*"

SERVER=`kdialog -caption "Konfig" --inputbox "<qml>Add meg a.
POP3 szolgltatd cmt..<br>(Amennyiben meg akarod szaktani a konfigurlst, trld a mezt s nyomd meg a mgsem gombot)<p>

PL: mail.szolgaltato.hu/com/net/stb vagy a mezben lthat minta..</qml>" pop3.szolgaltato.hu 1 ""` 

[ $VERBOSE ] && echo Szolgltat: $SERVER

if [ "$SERVER" = "" ]; then # ?
  exec kdialog -caption "Megszktottad" --sorry "<qml>Megszaktottad
    a program konfigurlst...</qml>"
fi # no new ?

if [ "$SERVER" = "pop3.szolgaltato.hu" ]; then # ?
     kdialog -caption "Megszaktva" --msgbox "<qml>gy nem fog
    mkdni a program, mdostanod kell a paramtereket..:((.</qml>"
    exec ./vmailmon_conf
    exit 0;
fi # no new ?

USER=`kdialog -caption "Konfig" --inputbox "<qml>Add meg a.
szolgltatd ltal adott fehasznl neved..<p>

ez igy nz ki ltalban:<br> felhasznalonev@$SERVER</qml>" Neved 1 ""` 

[ $VERBOSE ] && echo USER: $USER


if [ "$USER" = "" ]; then # ?
  exec kdialog -caption "Hiba trtnt" --msgbox "<qml>Hiba..
    Hinyz felhasznlnv</qml>"
fi # no  ?

if [ "$USER" = "Neved" ]; then # ?
  kdialog -caption "Hiba trtnt" --msgbox "<qml>rdekes...
  Ha tged /Neved/-nek hvnak krj srgsen nv vltoztatst mert gy nem lehet programozni..:))<br>Kezd elrl..</qml>"
  exec ./vmailmon_conf
  exit 0;
fi # no ?

kdialog --sorry "most akkor gy nz ki $USER@$SERVER Folytatom..."

PASSWD=`kdialog -caption "Jelsz" --password "<qml>Add meg a.
$USER@$SERVER fikhoz elszavadat<p>

    Ezt a szolgltatd adta (persze ha nem vltoztattad meg), 
    Ez kisbet, nagybet,vagy szm lehet.</qml>" Jelsz 1 "" | tr \[A-Z] \[a-z]` 

  PASSWD_LENGTH=`echo -n $PASSWD | wc -c`
  [ $VERBOSE ] && echo Passwd: $PASSWD \[$PASSWD_LENGTH chars]

 if [ "$PASSWD" = "" ]; then # ?
     exec kdialog -caption "Megszaktva" --msgbox "<qml>Megszaktottad !
     </qml>"
 fi # no new ?

 if [ "$PASSWD" = "Jelsz" ]; then # ?
     exec kdialog -caption "Megszaktva" --error "<qml>gy nem fog mkdni
     :-((( </qml>"
 fi # no new ?

 if [ $PASSWD_LENGTH -lt 4 ]; then 
    kdialog -caption "Error" --error "Ez rvid...."
    PASSWD_GOOD=0
    exec ./vmailmon_conf  
    exit 0;
#    continue
  fi

  if [ $PASSWD_LENGTH -gt 10 ]; then 
    kdialog -caption "Error" --msgbox "Ez hossz....."
    PASSWD_GOOD=0
    exec ./vmailmon_conf
    exit 0;
#    continue
  fi

    PASSWD_GOOD=0

until [ $PASSWD_GOOD -eq 1 ];
do

  PASSWD_GOOD=1

  PASSWD_RAW=`kdialog -caption "Jelsz jra" --password "<qml>Add
  meg a jelszavadat jra..<p>

    Ezt a szolgltatd adta persze (ha nem vltoztattad meg), 
    Ez kisbet, Nagybet, vagy szm lehet.</qml>" 25 1 "" | tr \[A-Z] \[a-z]` 

  PASSWD_RAW=`echo $PASSWD_RAW | tr -c -d \[:alnum:]_`

  PASSWD_LENGTH=`echo -n $PASSWD | wc -c`
  [ $VERBOSE ] && echo Passwd: $PASSWD \[$PASSWD_LENGTH chars]

  if [ "$PASSWD" != "$PASSWD_RAW" ]; then # forbidden characters
    kdialog -caption "Error" --error "Hiba, rd be jra taln akkor
     sikerl.. "
    PASSWD_GOOD=0
    continue
  fi

  if [ "$PASSWD" = "" ]; then # no PASSWD?
    exec kdialog -caption "PASSWD canceled" --msgbox "<qml>Jelsz nlkl 
      nem fog mkdni..:((.</qml>"
  fi # no PASSWD?

  if [ $PASSWD=$PASSWD_RAW ]; then 
    kdialog -caption "Rendben" --msgbox "oks..."
#    PASSWD_GOOD=0
    continue
  fi

  if [ $PASSWD_LENGTH -lt 4 ]; then 
    kdialog -caption "Error" --error "Ez rvid...."
    PASSWD_GOOD=0
    continue
  fi

  if [ $PASSWD_LENGTH -gt 10 ]; then 
    kdialog -caption "Error" --error "Ez hossz....."
    PASSWD_GOOD=0
    continue
  fi

done

# add config
CONFIG_TEXT=`echo  1::$SERVER:$USER:$PASSWD > /usr/local/VgroupTeam/vDesktop/vmailmon.conf`


    kdialog --sorry "vge" 

fi 
