Httpd :: useradmin

Gestión de bases de datos de usuarios del servidor HTTP.
Descargar ahora

Httpd :: useradmin Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Lincoln D. Stein
  • Sitio web del editor:
  • http://search.cpan.org/~lds/

Httpd :: useradmin Etiquetas


Httpd :: useradmin Descripción

Gestión de las bases de datos de usuarios del servidor HTTP. Httpd :: useradmin es un módulo PERL para la administración de las bases de datos de usuarios del servidor HTTP.Synopsis Use httpd :: useradmin (); Este software está destinado a proporcionar una interfaz genérica que oculta las inconsistencias en las implementaciones de los usuarios de los usuarios y el grupo HTTP. () Aquí está donde descubrimos lo que es diferente sobre su servidor. Algunos ejemplos: @dbm = (dbtype => 'dbm', db => '.htpasswd', servidor => 'apache'); $ usuario = nuevo httpd :: useradmin @dbm; Esto crea un objeto que la base de datos de DBM es un archivo DBM llamado '.htpasswd', en un formato que entiende el servidor de Apache. @Text = (dbtype => 'texto', db => '.htpasswd', servidor => 'ncsa'); $ usuario = nuevo httpd :: useradmin @text; Esto crea un objeto cuya base de datos es un archivo de texto simple llamado '.htpasswd', en un formato que entiende el servidor NCSA. @Sql = (dbtype => "sql", host => "", #server hostName Port => "", #server Port DB => "www", #database name user => "", #database login name name auth => "", contraseña de inicio de sesión #database CIPT => "Crypt", #Ecryption Method Driver => "MSQL", #driver para el servidor DBI => "Apache", #HTTP Tipo de servidor, no requerido USERABLE => "www- Usuarios ", # mesa con nombres de campo debajo de NameField =>" User ", #field for the Name Passwordfield =>" contraseña ", #field para la contraseña); $ usuario = nuevo httpd :: useradmin @sql; Esto crea un objeto que la base de datos MSQL se llama 'www', con un esquema que entiende el servidor de apache (extensión). Lista completa de atributos constructores: Nota: los nombres de atributos son DBType insensible a mayúsculas: el tipo de base de datos, uno de 'DBM', 'Texto', o 'SQL' (predeterminado es 'DBM') DB - El nombre de la base de datos (predeterminado es '.htpasswd' para bases de datos de DBM y de texto) Server - Nombre del servidor HTTP (predeterminado es la clase genérica, que funciona con NCSA, Apache y posiblemente otros) Nota: Ejecute 'Perl t / support.t matrix' para ver qué es compatible actualmente Encrypt Disponible: uno de 'crypt', 'MD5', O 'Ninguno' (sin cifrado. Por defecto de 'crypt' Bloqueo - Boolean, Block Text y los archivos DBM (predeterminado es verdadero) Ruta: los archivos DB relativos se resuelven a este valor (Predeterminado es '.') Debug - Boolean, encienda las banderas de modo de depuración: la lectura, escriba y cree banderas. Hay cuatro modos: RWC: el valor predeterminado, abierto para leer, escribir y crear. RW - ABIERTO PARA LECTARSE Y ESCRIBIR . R - Abre solo para leer. W - Abrir para escribir solo. Específico a los archivos DBM: DBMF - La implementación de archivos DBM para usar (predeterminado es 'ndbm') Modo: el modo de creación de archivos, DEFAU LTS a '0644' específico para DBI: Hablamos con un servidor SQL a través de la interfaz DBI de Tim Bunce. Para obtener más información, consulte: http://www.hermetica.com/technologia/dbi/ host - servidor hostName Port - Server Port User - Nombre de la base de datos Nombre de inicio de sesión Auth - Base de datos Inicio de sesión Contraseña Conducir - Conductor para DBI (predeterminado es 'MSQL') USERABLE - Tabla con nombres de campo debajo de NameField - Campo para el nombre (predeterminado es 'usuario') PasswerField - Campo para la contraseña (predeterminado es 'contraseña') desde aquí, las cosas deben verse igual para todos .add ($ nombre de usuario, $ contraseña, ) Agregar ($ nombre de usuario, $ contraseña, \% campos) Agregar un usuario. Falla si se existe un nombre de usuario de $ en la base de datos si ($ user->> Agregar ('Dougm', 'Secret')) {imprimir "¡Tienes el poder! ";} Es posible que deba pasar campos adicionales, como el nombre real del usuario. Esto depende de su servidor, por supuesto. $ Usuario-> Agregar ('Joeuser', 'Try2GUESS', '', 'Joseph A. usuario') ; También puede pasar un conjunto de pares de nombre / valor de campo en forma de hash ref. Ejemplo $ USer-> Agregar ('Joeuser', 'Try2GUESS', '', {'nombre' => 'Joseph A. usuario ',' Credit_limit '=> 2000}); Eliminar ($ nombre de usuario) Eliminar un usuario if ($ user->> eliminar (' dougm ')) {imprimir "se ha ido ";} Suspender ($ nombre de usuario) Suspender a un usuario si ($ USUARIO-> Suspender ('Dougm')) {impresión" Cuenta suspendida ";} Desenfender ($ nombre de usuario) Desgroundar un usuario suspendido si ($ USUARIO-> Untuspend ('Dougm')) {impresión" Cuenta restaurada a la normalidad ";} existe ($ nombre de usuario) true si $ nombre de usuario se encuentra en la base de datos si ($ user-> existe ('dougm')) {die" oh no! ";} contraseña () devuelve la contraseña cifrada para un usuario $ passwd = $ user-> contraseña ("dougm"); Útil para copiar a los usuarios a otra base de datos. Pedir ($ Nombre de usuario, @ Campos) Obtener una lista de valores de campo del usuario indicado. Los nombres de los campos se pueden proporcionar como una lista o como una referencia de matriz. El valor de retorno es una referencia a un hash que contiene los pares de campo / valor. Lista () devuelve una lista de nombres de usuario en la base de datos actual @users = $ user-> listupdate ($ username, $ contraseña) actualización ($ Nombre de usuario, $ contraseña, \% Fields) SQL Solo actualice $ nombre de usuario con una nueva contraseña de $ if ($ user-> update ('dougm', 'idunno')) {impresión "actualizada ";} Con los servidores SQL, puede actualizar otros campos en la tabla pasando una referencia de hash: $ USUARD-> Actualización ('Dougm', 'Idunno', {'credit_limit' => 1000}); un valor indefinido en el El campo Contraseña dejará el campo sin cambios. Grupo () Corte corto para crear un objeto HTTPD :: GroupAdmin. Todos los atributos aplicables se heredan, pero se pueden anular. $ Grupo = $ User-> Grupo (nombre => 'www-group' ); (Ver httpd :: groupadmin) convertir (@attributes) Convertir una base de datos. $ Dbmuser = $ usuario-> convertir (@apache); bloqueo () Desbloquear () Estos métodos le dan el control del mecanismo de bloqueo . $ USER = NUEVO HTTPD :: UserAdmin (Bloqueo => 0); # para desactivar el bloqueo automático $ USUARIO DE USUARIO-> BLOQUEO; #LOCK LA DATABA DE LA DATABA DE USUARIO $ USUARIO-> Agregar ($ nombre de usuario, $ passwd); #write while está bloqueado $ user-> desbloqueo; Libera el LockDB ($ DBNAME); Seleccione una base de datos diferente. $ Olddb = $ user-> db ($ newdb); Imprimir "Ahora estamos leyendo y escribiendo '$ NEWDB', hecho con '$ olddb'n "; banderas () Obtenga o establezca Leer, escriba, cree banders.commit comete cambios en el disco (para texto Archivos) .Message Digest User DatabaseCurrentamente, puede almacenar información de usuario en un formato para servidores que admiten la autenticación de la digestión del mensaje. Aquí hay un ejemplo: $ usuario = nuevo httpd :: useradmin (db => '.htdigest', cifrado => 'MD5'); ($ nombre de usuario, $ reino, $ contraseña) = ('Joeuser', 'En algún lugar', '14ME'); #La suma de comprobación contiene más información que solo una contraseña $ usuario-> agregue ($ nombre de usuario, "$ nombre de usuario: $ reino: $ contraseña"); $ user-> Actualizar ($ nombre de usuario, "$ nombre de usuario: $ realm: newone"); $ info = $ user-> contraseña ($ nombre de usuario); ($ Realm, $ CheckSum) = Split (":", $ info); $ user-> eliminar ($ nombre de usuario); Requisitos: · Perl


Httpd :: useradmin Software relacionado