AUTEN :: PAM

Interfaz Perl a la biblioteca PAM
Descargar ahora

AUTEN :: PAM Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Nikolay Pelov
  • Sitio web del editor:
  • http://search.cpan.org/~nikip/

AUTEN :: PAM Etiquetas


AUTEN :: PAM Descripción

Interfaz Perl a la biblioteca PAM AUTEN :: PAM es un módulo PERL que proporciona una interfaz Perl a la Biblioteca Pam. La única diferencia con la interfaz PAM estándar es que en lugar de pasar una estructura PAM_CONV que tiene un parámetro de contexto adicional AppData_PTR, solo debe dar una dirección a una función de conversación escrita en Perl (ver más abajo). Si desea pasar un puntero nulo Como un valor del usuario $ en PAM_Start, use UNDEF o la versión de dos argumentos. Ambos en las dos y las versiones de tres argumentos de PAM_START se utiliza una función de conversación predeterminada (Authen :: Pam :: PAM_DEFAULT_CONV). El argumento de $ Flags es opcional para todas las funciones que lo usan, excepto PAM_SETRED. El argumento de $ PAM_STATUS también es opcional para la función PAM_EnD. Ambos argumentos se establecerán en 0 si no se administran. Los nombres de algunas constantes de la biblioteca PAM han cambiado a lo largo del tiempo. Puede usar cualquiera de los nombres conocidos para una constante dada, aunque es aconsejable utilizar el último. Cuando este módulo admite algunas de las características adicionales de la biblioteca PAM (por ejemplo, PAM_FAIL_DELAY), la constante de PAM APAM_XXX, de lo contrario tendrá un valor 1 de lo contrario. Devolverá la compatibilidad con las bibliotecas de PAM más antiguas, he agregado la constante_pam_env_functions que es verdadera si su biblioteca PAM tiene las funciones de manejo de variables de entorno (PAM_PUTENV, PAM_GETENV, PAM_GETENVLIST) .Synopsis Use Authen :: PAM; $ res = pam_start ($ Service_Name, $ PAMH); $ res = pam_start ($ service_name, $ usuario, $ PAMH); $ res = pam_start ($ service_name, $ usuario, \ my_conv_func, $ PAMH); $ res = pam_end ($ PAMH, $ PAM_STATUS); $ res = pam_authenticate ($ PAMH, $ banderas); $ res = pam_setcred ($ PAMH, $ banderas); $ res = pam_acct_mgmt ($ PAMH, $ banderas); $ res = pam_open_session ($ PAMH, $ banderas); $ res = pam_close_session ($ PAMH, $ banderas); $ res = pam_chauthtok ($ PAMH, $ banderas); $ error_str = pam_strerror ($ PAMH, $ ERNUM); $ res = pam_set_item ($ PAMH, $ Item_Type, $ Artículo); $ res = pam_get_item ($ PAMH, $ Item_Type, $ Artículo); if (have_pam_env_functions ()) {$ res = pam_putenv ($ PAMH, $ NAME_VALUE); $ val = pam_getenv ($ PAMH, $ nombre); % env = pam_getenvlist ($ PAMH); } if (have_pam_fail_delay ()) {$ res = pam_fail_delay ($ PAMH, $ MUSEC_DELAY); $ res = pam_set_item ($ PAMH, PAM_FAIL_DELAY (), \ MY_FAIL_DELAY_FUNC); } Requisitos: · Perl


AUTEN :: PAM Software relacionado