2008/7/13 Alejandro D. Burne <alejandro.dburne@xxxxxxxxx>: > 2008/7/13 Pavel Stehule <pavel.stehule@xxxxxxxxx>: >> Hello >> >> safe it to pgfoundry http://pgfoundry.org/ >> regards >> Pavel Stehule >> >> > > May be to much for including in pgfoundry, I think to build a place to > share code developed in postgres functions (plpgsql, plpython, etc) > and to categorize them. I can help to develop it, buy my natural > language is spanish and I'm uncomfortable writing in english. > > Greetings, Alejandro > you can share code on http://www.pgsql.cz/index.php/PostgreSQL_SQL_Tricks Regards Pavel > > >> 2008/7/13 Alejandro D. Burne <alejandro.dburne@xxxxxxxxx>: >>> 2008/7/12 Alejandro D. Burne <alejandro.dburne@xxxxxxxxx>: >>>> Hi, I need to write a function that gives me a password string, no >>>> just a numbers-characters string; something like people wrote in php, >>>> its based on determined syllables and numbers. >>>> I think it be useful to other people, is there a site where one can >>>> post it and share with other postgres users? >>>> >>>> Alejandro >>>> >>> >>> Sorry, the function: >>> >>> CREATE OR REPLACE FUNCTION gen_password(plenght smallint) >>> RETURNS bpchar AS >>> $BODY$ >>> >>> DECLARE >>> lValid_Consonant bpchar DEFAULT 'BCDFGHJKMNPRSTV'; >>> lValid_Vowel bpchar DEFAULT 'AEIOUY'; >>> lValid_Numbers bpchar DEFAULT '23456789'; >>> >>> lConsonant_Length smallint DEFAULT char_length(lValid_Consonant); >>> lVowel_Length smallint DEFAULT char_length(lValid_Vowel); >>> lNumbers_Length smallint DEFAULT char_length(lValid_Numbers); >>> >>> lPassword bpchar DEFAULT ''; >>> >>> BEGIN >>> LOOP >>> IF ROUND(RANDOM()*3)<>1 THEN >>> lPassword:=lPassword||SUBSTRING(lValid_Consonant FROM >>> (ROUND(RANDOM()*(lConsonant_Length-1))+1)::integer FOR 1)|| >>> SUBSTRING(lValid_Vowel FROM >>> (ROUND(RANDOM()*(lVowel_Length-1))+1)::integer FOR 1); >>> IF ROUND(RANDOM()*2)<>1 THEN >>> lPassword:=lPassword||SUBSTRING(lValid_Consonant FROM >>> (ROUND(RANDOM()*(lConsonant_Length-1))+1)::integer FOR 1); >>> END IF; >>> ELSE >>> lPassword:=lPassword||SUBSTRING(lValid_Numbers FROM >>> (ROUND(RANDOM()*(lNumbers_Length-1))+1)::integer FOR 1); >>> END IF; >>> IF char_length(lPassword) >= plenght THEN >>> EXIT; >>> END IF; >>> END LOOP; >>> >>> RETURN SUBSTRING(lPassword FROM 1 FOR plenght); >>> END; >>> >>> $BODY$ >>> LANGUAGE 'plpgsql' VOLATILE; >>> >>> -- >>> Sent via pgsql-general mailing list (pgsql-general@xxxxxxxxxxxxxx) >>> To make changes to your subscription: >>> http://www.postgresql.org/mailpref/pgsql-general >>> >> >
