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

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

set class [lindex $argv 0] 
if { $class eq "" } {
	set class dummy_class
} 

set dbfile $class

sqlite3 db $dbfile

#AddUserNonWeb  first_name last_name user_name password_hash group_name id_number section_num i
# dummy users
#AddUserNonWeb Ins "Instruch I"  instructor [::md5::md5 -hex qwerty] instructor 
AddUserNonWeb Ta "Taevich, I"   ta [::md5::md5 -hex qwerty] ta 
AddUserNonWeb Dan "Dandanovich" dan [::md5::md5 -hex qwerty] student 
AddUserNonWeb Ale "Alevna"      ale [::md5::md5 -hex qwerty] student 
AddUserNonWeb Jon "Jonovich"    jon [::md5::md5 -hex qwerty] student 
AddUserNonWeb Ale "Alevna"      ale {} student 



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