Authen :: SimplePam.

Authen :: SimplePamÀº PAM ÀÎÁõ¿¡ ´ëÇÑ °£´ÜÇÑ Perl ÀÎÅÍÆäÀ̽ºÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Authen :: SimplePam. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Raul Dias
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~rsd/Authen-SimplePam-0.1.24/SimplePam.pm

Authen :: SimplePam. ű×


Authen :: SimplePam. ¼³¸í

Authen :: SimplePamÀº PAM ÀÎÁõ¿¡ ´ëÇÑ °£´ÜÇÑ Perl ÀÎÅÍÆäÀ̽ºÀÔ´Ï´Ù. Authen :: SimplePamÀº PAM ÀÎÁõ¿¡ ´ëÇÑ °£´ÜÇÑ Perl ÀÎÅÍÆäÀ̽ºÀÔ´Ï´Ù. Synopsis »ç¿ë authen :: SimplePam; $ auth = »õ·Î¿î authen :: pam; $ auth-> auth_user ($ »ç¿ëÀÚ, $ ºñ¹Ð¹øÈ£, $ ¼­ºñ½º); $ auth-> change_password ($ »ç¿ëÀÚ, $ old_password, $ new_password);ÀÌ ¸ðµâÀº PAM »ç¿ëÀ» ´Ü¼øÈ­ÇÏ¿© »ç¿ëÀÚ¸¦ ÀÎÁõÇÕ´Ï´Ù. PAM Áö½ÄÀÌ ÇÊ¿äÇÏÁö ¾Êµµ·Ï °£´ÜÇÏ°Ô ¸¸µé¾îÁÝ´Ï´Ù. APITE API´Â °£´ÜÇÕ´Ï´Ù. »õ·Î ¸¸µé±â $ USERNAME ¸Å°³ º¯¼ö°¡ ¼³Á¤µÈ °æ¿ì AUTHEN :: SIMPLEPAM Object.Username ($ username)À» ÀÛ¼ºÇÕ´Ï´Ù. »ç¿ëÀÚ À̸§À» ¼³Á¤ÇÕ´Ï´Ù. ÇöÀç Username.user ($ username)¸¦ username ()°ú µ¿ÀÏÇÏ°Ô ¹ÝȯÇÕ´Ï´Ù. À̸§ ($ username) username ()°ú µ¿ÀÏÇÕ´Ï´Ù. current_password ($ password) »ç¿ëÀÚ ÇöÀç ¾ÏÈ£ÀÔ´Ï´Ù. $ Password°¡ ÁÖ¾îÁö¸é ¾ÏÈ£°¡ ¼³Á¤µË´Ï´Ù. ÇöÀç set password.password ($ password)¸¦ current_password ()·Î ¹ÝȯÇÕ´Ï´Ù. old_password (). new_password ($ password) $ ¾ÏÈ£°¡ÀÖ´Â °æ¿ì »ç¿ëÀÚ »õ ¾ÏÈ£¸¦ ¼³Á¤ÇÕ´Ï´Ù. ÇöÀç SET SET SET »õ PASSWORD.SERVICE ($ ¼­ºñ½º)¸¦ ¹ÝȯÇÕ´Ï´Ù. $ ¼­ºñ½º°¡ Á¦°øµÇ¸é PAM ¼­ºñ½º°¡ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. ÇöÀç ¼­ºñ½º set.pam_result ()´Â ¸¶Áö¸· pAM °á°ú cress.error_code () ¿À·ù°¡ ¹ß»ýÇÏÁö ¾ÊÀ¸¸é undef¸¦ ¸®ÅÏÇÕ´Ï´Ù. ±×·¸Áö ¾ÊÀ¸¸é ¿À·ù°¡ ¹ß»ýÇÏÁö ¾ÊÀ¸¸é undef¸¦ ¹ÝȯÇÕ´Ï´Ù. ±×·¸Áö ¾ÊÀ¸¸é ¿À·ù°¡ ¹ÝȯµË´Ï´Ù. message.note ¿À·ù ¸Þ½ÃÁö°¡ pam_error_msg call.other ¿À·ù°¡ ¹ß»ýÇßÀ» ¼ö ÀÖ¾úÁö¸¸ pam_error_msg¸¦ ¼³Á¤ÇÏÁö´Â ¾Ê¾ÒÁö¸¸ frams_user () ¹× change_password () .auth_user () .auth_user ($ »ç¿ëÀÚ)ÀÇ °á°ú Äڵ忡 ÀÖ½À´Ï´Ù. , $ password, $ service)´Â passwod $ password service $ service.note¸¦ »ç¿ëÇÏ¿© $ USER, $ password ¹× $ ¼­ºñ½º°¡ ¼±Åà »çÇ×ÀÔ´Ï´Ù. ÁÖ¾îÁø °æ¿ì ÀÌÀü¿¡ ÁÖ¾îÁø ¸ðµç °ÍÀ» µ¤¾î ¾¹´Ï´Ù. $ Serice°¡ ¾ÆÁ÷ ÁöÁ¤µÇÁö ¾ÊÀº °æ¿ì 'login'.if ¾Æ´Ï¿À $ USERNAMEÀÌ ¾ÆÁ÷ ÁöÁ¤µÇÁö ¾Ê°í ÇöÀç EFECTION »ç¿ëÀÚ ID (EUID)¿¡ ±âº» ¼³Á¤µË´Ï´Ù. .It´Â authen :: simplePam ÀÚ½ÅÀÇ °á°ú Äڵ带 ¹ÝȯÇÕ´Ï´Ù. ½ÇÁ¦ PAM °á°ú Äڵ带 ¾Ë°í ½Í´Ù¸é PAM_RESULT ()¸¦ »ç¿ëÇÏ¿© °á°úÀÇ GET ¹× String Ç¥ÇöÀ» »ç¿ëÇϽʽÿÀ. °á°ú 2String () .Result2String () .Result2String () ¶Ç´Â Change_Password°¡ ¹Ýȯ ÇÑ °á°ú¸¦ º¯È¯ÇÕ´Ï´Ù ( ) ¹®ÀÚ¿­¿¡. ¿ä±¸ »çÇ× : ¡¤ Perl.


Authen :: SimplePam. °ü·Ã ¼ÒÇÁÆ®¿þ¾î

dbix :: objects.

DBIX :: Objects´Â µ¥ÀÌÅͺ£À̽º ¹ÙÀεù °´Ã¼ ÀÛ¼ºÀ» ½±°ÔÇϱâÀ§ÇÑ Perl È®ÀåÀÚÀÔ´Ï´Ù. ...

165

´Ù¿î·Îµå