Httpd :: useradmin Gerenciamento de bancos de dados do usuário do servidor HTTP.
Baixe Agora

Httpd :: useradmin Classificação e resumo

Httpd :: useradmin Tag

base de dados do utilizador Módulo Perl. Http. servidor http. Banco de dados do usuário.

Httpd :: useradmin Descrição

Gerenciamento de bancos de dados do usuário do servidor HTTP. Httpd :: useradmins é um módulo Perl para o gerenciamento de bancos de dados do usuário do servidor HTTP.Synopsis Use httpd :: useradmin (); este software destina-se a fornecer uma interface genérica que esconde as inconsistências em todas as implementações do servidor HTTP de bancos de dados do usuário e do grupo.Methodsnew () Aqui está onde descobrimos o que é diferente sobre o seu servidor. Alguns exemplos: @dbm = (dbtype => 'dbm', db => '.htpasswd', servidor => 'apache'); $ user = novo httpd :: useradmin @dbm; Isso cria um objeto que o banco de dados é um arquivo DBM chamado '.htpasswd', em um formato que o servidor Apache entende. @Text = (dbtype => 'text', db => '.htpasswd', servidor => 'ncsa'); $ User = New httpd :: useradmin @text; Isso cria um objeto cujo banco de dados é um arquivo de texto simples chamado '.htpasswd', em um formato que o servidor NCSA entende. @Sql = (dbtype => "sql", host => ", #server hostname port =>" ", #server porta db =>" www ", #database nome User =>" ", #database login nome => "" ", #database login senha criptografar =>" Crypt ", driver de método #Entryption =>" msql ", #driver for DBI Server =>" Apache ", #http Server Type, não obrigatório UserTable =>" WWW Usuários ", #table com nomes de campo abaixo Namefield =>" User ", #field para o nome Passwordfield =>" Senha ", #field para a senha); $ user = novo httpd :: useradmin @sql; Isso cria um objeto que o banco de dados do MSQL é chamado de 'www', com um esquema que o servidor Apache (extensão) entende. Lista completa de atributos construtores: Nota: Os nomes de atributo são DBTYPE insensível em minúsculas - o tipo de banco de dados, um dos 'DBM', 'Texto' ou 'SQL' (padrão é 'DBM') DB - O nome do banco de dados (padrão é '.htpasswd' for dbm e text bashateses) servidor - nome do servidor http (padrão é a classe genérica, que funciona com NCSA, Apache e possivelmente outros) Nota: Executar 'perl t / support.t matrix' para ver o que é atualmente Criptografia disponível - uma de 'cripta', 'MD5', ou 'nenhuma' (nenhuma criptografia. Padrões para bloqueio de 'cripto' - Boolean, bloqueio e arquivos DBM (padrão é verdadeiro) Caminho - Os arquivos de DB relativos são resolvidos para esse valor (O padrão é '.' ') Debug - Boolean, ative os sinalizadores do modo de depuração - a leitura, escreva e crie flags. Existem quatro modos: RWC - o padrão, aberto para leitura, escrita e criação. RW - Aberto para leitura e escrita. . R - aberto apenas para leitura. W - Aberto para escrever apenas. Específico para arquivos DBM: DBMF - A implementação do arquivo DBM para usar (padrão é 'NDBM') Modo - o modo de criação de arquivos, Defau Lts para '0644' específico para DBI: falamos com um servidor SQL através da interface DBI do Tim Bunce. Para mais informações, consulte: http://www.hermetica.com/technologia/dbi/ host - Server HostName Port - Server Port user - Nome de login de banco de dados Auth - Driver de senha de login do banco de dados - Driver for DBI (padrão é 'msql') UserTable - tabela com nomes de campo abaixo do campo Namefield - campo para o nome (padrão é 'user') Passwordfield - campo para a senha (padrão é 'senha') daqui, as coisas devem parecer as mesmas para todos. $ Senha, ) Adicionar ($ Username, $ Senha, \% Fields) Adicionar um usuário. Falha se $ de nome de usuário existir no banco de dados se ($ user-> adicionar ('dougm', 'secret')) {Imprimir "Você tem o poder! ";} Você pode precisar passar campos adicionais, como o nome real do usuário. Isso depende do seu servidor, é claro. $ User-> Adicionar ('Joeuus', 'Tentativo' ',' Joseph A. User ') ; Você também pode passar um conjunto de pares de nome / valor de campo na forma de um HASH Ref. Exemplo $ user-> Adicionar ('Joeuuser', 'Try2Guess', ', {' NAME '=>' Joseph A. User ',' Credit_limit '=> 2000}); excluir ($ username) Exclua um usuário se ($ user-> excluir (' dougm ')) {imprimir "ele se foi ";} Suspender ($ username) Suspender um usuário se ($ user-> suspender ('dougm')) {print" conta suspensa ";} Unsuspend ($ Nome de usuário) Suspender Um usuário suspenso se ($ user-> insuspender ('Dougm') {print" conta restaurada ao normal ";} existe ($ Nome de usuário) Verdadeiro Se $ Nome de usuário é encontrado no banco de dados se ($ user-> existir ('dougm')) {die" oh não! ";} senha () retorna a senha criptografada para um usuário $ passwd = $ user-> Senha ("Dougm"); útil para copiar usuários para outro banco de dados.fetch ($ username, campos @) buscar uma lista de valores de campo do usuário indicado. Os nomes de campo podem ser fornecidos como uma lista ou como Uma referência de matriz. O valor de retorno é uma referência a um hash contendo os pares de campo / valor.list () retorna uma lista de nomes de usuário no banco de dados atual @users = $ user-> listUpdate ($ username, $ senha) Atualização ($ Nome de usuário, $ Senha, \% Fields) SQL somente atualizar $ username com uma nova senha $ se ($ user-> update ('dougm', 'idunno')) {print "atualizado ";} Com servidores SQL, você pode atualizar outros campos na tabela passando uma referência de hash: $ user-> update ('dougm', 'idunno', {'credit_limit' => 1000}); um valor indefinido no valor O campo de senha deixará o campo inalterado.Group () Corte curto para criar um objeto httpd :: groupadmin. Todos os atributos aplicáveis são herdados, mas podem ser substituídos. $ Group = $ user-> grupo (nome => 'WWW-Group' ); (Consulte httpd :: groupadmin) Converter (@attributes) Converta um banco de dados. $ Dbmuser = $ user-> Converter (@apache); bloqueio () Desbloquear () Esses métodos fornecem controle do mecanismo de travamento . $ User = New httpd :: useradmin (bloqueio => 0); #Turn Off Auto-Bloqueio $ Usuário-> Bloquear; #lock o banco de dados do objeto $ user-> Adicionar ($ username, $ passwd); #write durante o arquivo é bloqueado $ user-> desbloquear; liberar o lockdb ($ dbname); selecione um banco de dados diferente. $ olddb = $ user-> db ($ newdb); imprimir "agora estamos lendo e escrevendo" $ newdb ", feito com '$ olddb'n "; flags () Obtenha ou defina ler, escreva, crie as alterações do commit flags.commit no disco (para texto Arquivos) .Message Digest DatableSeCently, você pode armazenar informações de usuário em um formato para servidores que suportam a autenticação de digeros de mensagens. Aqui está um exemplo: $ User = New httpd :: useradmin (db => '.htdigest', criptografar => 'md5'); ($ Nome de Usuário, $ Realm, $ Senha) = ('Joeuser', 'Algum Place', '14Me'); #O checksum contém mais informações que apenas uma senha $ user-> Adicionar ($ username, "$ username: $ reino: $ senha"); $ user-> update ($ username, "$ username: $ reino: newone"); $ info = $ user-> senha ($ nome de usuário); ($ Realm, $ shecksum) = split (":", $ info); $ user-> excluir ($ nome de usuário); Requisitos: · Perl.

Httpd :: useradmin Software Relacionado