#!/bin/sh
# (C) 2011 by Eugeniy Mikhailov, <evgmik@gmail.com>
# vim:set ft=tcl: \
exec tclsh "$0" "$@"

# set new password for user name
#   create user 

package require sqlite3
package require md5
source ./GradeBook_lib.tcl

if { $argc < 3 } {
	puts {Usage:}
	puts "$argv0 password_database_file user_name password"
	exit
}

set db_file [lindex $argv 0] 
set user_name [lindex $argv 1] 

if { $argc >= 3 } {
	set password [lindex $argv 2] 
} else {
	set password {}
}

# override default password DB name
set GradebookServerConfig(passwords_db_file) $db_file

Set_New_Password_Non_Web $user_name $password



# vim: ts=2 sw=2 foldmethod=indent: