Authen :: Pam.

Perl Interface para Biblioteca Pam
Baixe Agora

Authen :: Pam. Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • Nikolay Pelov
  • Site do editor:
  • http://search.cpan.org/~nikip/

Authen :: Pam. Tag


Authen :: Pam. Descrição

Interface Perl para Biblioteca Pam Authen :: Pam é um módulo Perl que fornece uma interface Perl para a Biblioteca Pam. A única diferença com a interface PAM padrão é que, em vez de passar uma estrutura Pam_Conv, que tem um parâmetro de contexto adicional AppData_ptr, você deve apenas dar um endereço a uma função de conversação escrita em Perl (veja abaixo). Se você quiser passar um ponteiro nulo Como um valor do usuário $ em Pam_Start use Undef ou a versão de dois argumentos. Ambos nas duas e três versões de argumentos da Pam_Start Uma função de conversação padrão é usada (Authen :: Pam :: Pam_Default_Conv). O argumento $ flags é opcional para todas as funções que o usam, exceto para PAM_SETCRED. O argumento $ PAM_STATUS também é opcional para a função PAM_END. Ambos os argumentos serão definidos como 0 se não for dado. Os nomes de algumas constantes da biblioteca PAM foram alterados ao longo do tempo. Você pode usar qualquer um dos nomes conhecidos para uma determinada constante, embora seja aconselhável usar o mais recente. Quando este módulo suporta alguns dos recursos adicionais da biblioteca PAM (por exemplo, PAM_FAIL_DELAY), então a constante correspondente them_pam_xxx terá um valor 1 caso contrário Retornará a compatibilidade com a compatibilidade com as bibliotecas de PAM mais antigas que adicionei a constante heve_pam_env_functions que é verdadeira se a sua biblioteca Pam tiver as funções para manusear as variáveis de ambiente (Pam_Putenv, Pam_Getenv, Pam_GetEnvList) .synopsis Use Authen :: Pam; $ res = pam_start ($ Service_name, $ Pamh); $ res = pam_start ($ service_name, $ user, $ pamh); $ res = pam_start ($ Service_name, $ user, \ my_conv_func, $ Pamh); $ res = pam_end ($ pamh, $ pam_status); $ res = pam_authenticate ($ Pamh, $ flags); $ res = pam_setCred ($ Pamh, $ flags); $ res = pam_acct_mgmt ($ Pamh, $ flags); $ res = pam_open_session ($ Pamh, $ flags); $ res = pam_close_session ($ Pamh, $ flags); $ res = pam_chauthtok ($ Pamh, $ flags); $ error_str = pam_sterrrrrrror ($ Pamh, $ errnum); $ res = pam_set_item ($ pamh, $ item_type, $ item); $ res = pam_get_item ($ pamh, $ item_type, $ item); if (heve_pam_env_functions ()) {$ res = pam_putenv ($ PamH, $ Name_Value); $ Val = pam_getenv ($ Pamh, $ nome); % env = PAM_GETENVLIST ($ PAMH); } if (heve_pam_fail_delay ()) {$ res = pam_fail_delay ($ PamH, $ musec_delay); $ res = pam_set_item ($ pamh, pam_fail_delay (), \ my_fail_delay_func); } Requisitos: · Perl.


Authen :: Pam. Software Relacionado

Sobre nós