#
#  Clear out old data
#
update {
	Tmp-String-0 := "%{sql:DELETE FROM radcheck WHERE username = 'user_auth'}"
}
if (!&Tmp-String-0) {
	test_fail
}

update {
	Tmp-String-0 := "%{sql:INSERT INTO radcheck (username, attribute, op, value) VALUES ('user_auth', 'NAS-IP-Address', '==', '1.2.3.4')}"
}
if (!&Tmp-String-0) {
	test_fail
}

update {
	Tmp-String-0 := "%{sql:INSERT INTO radcheck (username, attribute, op, value) VALUES ('user_auth', 'Cleartext-Password', ':=', 'password')}"
}
if (!&Tmp-String-0) {
	test_fail
}

update {
	Tmp-String-0 := "%{sql:DELETE FROM radreply WHERE username = 'user_auth'}"
}
if (!&Tmp-String-0) {
	test_fail
}

update {
	Tmp-String-0 := "%{sql:INSERT INTO radreply (username, attribute, op, value) VALUES ('user_auth', 'Idle-Timeout', ':=', '3600')}"
}
if (!&Tmp-String-0) {
	test_fail
}

sql