genstr.sql

create function generate_alphanum() returns char as $$
	select substring('ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789', trunc(random() * 36)::int + 1, 1)
$$ language sql;

create function generate_alpha() returns char as $$
	select chr((65 + trunc(random() * 26))::int)
$$ language sql;

create function generate_alphanum_string(len int) returns varchar as $$
	select array_to_string(array(
		select generate_alphanum()
		from generate_series(1, len)
	), '')
$$ language sql;

create function generate_alpha_string(len int) returns varchar as $$
	select array_to_string(array(
		select generate_alpha()
		from generate_series(1, len)
	), '')
$$ language sql;