package require mysqltcl 3.05

namespace eval reqs {
namespace eval sett {

#START SETTINGS

variable req_chan "#YOUR_CHAN"

#DB CONNECTION
variable db_host "DB_HOST"
variable db_port "3306"
variable db_username "DB_USER"
variable db_password "DB_PASS"
variable db_name "DB_NAME"


#CHANNEL USER TABLE
variable db_table "TABLE_NAME"
variable db_user "USERNAME_FIELD"
variable db_pass "MD5_PASSWORDED_FIELD"

#BINDS

bind MSGM -|- "*" reqs::user_add_voice::voice_add_user


#END SETTINGS NAMESPACE
}


# SCRIPT STARTS

namespace eval user_add_voice {
proc voice_add_user {nick uhost handle text} {

set check_nick [lindex $text 0]
set get_pass [lindex $text 1]

set check_pass [md5 $get_pass]

set find_it [::mysql::connect -host $reqs::sett::db_host -port $reqs::sett::db_port -user $reqs::sett::db_username -password $reqs::sett::db_password -db $reqs::sett::db_name];
set it_find [::mysql::sel $find_it "SELECT $reqs::sett::db_user,$reqs::sett::db_pass FROM $reqs::sett::db_table WHERE $reqs::sett::db_user = '$check_nick' AND $reqs::sett::db_pass = '$check_pass'" -flatlist];
::mysql::endquery $find_it
::mysql::close $find_it

if {$it_find == ""} {putquick "NOTICE $nick :invalid login";return} else {

set valid_nick [lindex $it_find 0]
set valid_pass [lindex $it_find 1]

if {![isvoice $nick $reqs::sett::req_chan] && $check_nick == "$valid_nick" && $check_pass == "$valid_pass"} {

   putquick "MODE $reqs::sett::req_chan +v $nick"
   putquick "NOTICE $nick :thanks for logging in.."

    } else {

           return
         }
      }
   }
}

#END NAMESPACE
}