El 29/10/2014 a las #4, Ulises González Horta escribió:
El mié, 29-10-2014 a las 19:24 -0400, Arian Molina Aguilera escribió:
Alguien que sepa programación en perl que me tire al privado necesito
una ayudita.
Que necesitas?? tu duda puedes ayudar a otros...
quiero modificar el helper del squid para autenticación contra bd, el
cual esta programado en perl, pero yo tengo la bd en mysql, exactamente
igual que como tengo los usuarios y password con sus hash en md5, que
importe del archivo passwd el cual se generaron con htpasswd, la
herramienta del apache, ahora bien estos no me autentican con el helper
squid_db_auth ya que los md5 no son los mismos que generan dicha función
de mysql, o php, o cualquier otra que se ajuste al estándar, leyendo e
investigando por ahí htpasswd de apache, usa su propio algoritmo md5 el
cual no es estándar y ahora esas contraseñas no me funcionan,
investigando más he encontrado un htpasswd.pl [1] , programado en perl,
el cual funciona igual que el del apache, y usa los modulos
Authen::Htpasswd [2] y Apache::Htpasswd [3] , ahora quiero que
utilizando los mismo reprogramar squid_db_auth, para que la validación
de los password, es decir los hash que tengo almacenado en mysql, se
comporte exactamente igual que hace el htpasswd, y estos si me validen,
ya que no puedo volverles a migrar la contraseña a todos los usuarios,
para que vuelvan a generar en md5 con el standar que si valida, y
tampoco cuento con una herramienta web para que los usuarios remotamente
hagan ese cambio de contraseña y se generen los hash en md5
correctamente, si alguien que conozca perl pueda echarle un ojos a los
enlaces que hago referencia y pueda ayudarme con esto, seguro también
contribuiría a ayudar a muchos otros más. Un Salu2 y gracias.
[1] https://gist.github.com/ggl/4966699
[2]
http://search.cpan.org/~mstrout/Authen-Htpasswd-0.171/lib/Authen/Htpasswd.pm
[3] http://search.cpan.org/~kmeltz/Apache-Htpasswd-1.9/Htpasswd.pm
--
Ing. Arian Molina Aguilera
Administrador de Redes y Servicios Telemáticos
Linux Usuario Registrado #392892
Telfs: +53(7)2047874, +53(7)204-2710 ext 123
jabber: ar...@artex.sa
Nodo Central ARTex S.A. La Habana. Cuba.
--
Este mensaje ha sido analizado por MailScanner
en busca de virus y otros contenidos peligrosos,
y se considera que está limpio.
______________________________________________________________________
Lista de correos del Grupo de Usuarios de Tecnologías Libres de Cuba.
Gutl-l@jovenclub.cu
https://listas.jovenclub.cu/cgi-bin/mailman/listinfo/gutl-l