imap-4.1 WHOSON patch (mail imap aaa patch whoson)
Ключевые слова: mail, imap, aaa, patch, whoson, (найти похожие документы)
Subj : imap-4.1 WHOSON patch
-------------------------------------------------------------------------------
Подробнее: http://www.average.org/whoson/
--- src/osdep/unix/env_unix.c.orig Sun Jun 28 21:22:53 1998
+++ src/osdep/unix/env_unix.c Mon Jul 6 20:17:39 1998
@@ -37,6 +37,10 @@
#include <sys/wait.h>
#include "write.c" /* include safe writing routines */
+#ifdef WHOSON
+#include <whoson.h>
+#endif /* WHOSON */
+
/* Get all authenticators */
#include "auths.c"
@@ -356,8 +360,15 @@
(pw = getpwnam (lcase (usr)))) &&
((pw = checkpw (pw,pwd,argc,argv)) ||
((*pwd == ' ') && (pw = getpwnam (usr)) &&
- (pw = checkpw (pw,pwd + 1,argc,argv)))))
+ (pw = checkpw (pw,pwd + 1,argc,argv))))) {
+#ifdef WHOSON
+ struct sockaddr_in sin;
+ int sinlen = sizeof (struct sockaddr_in);
+ if (getpeername(0,(struct sockaddr *) &sin,&sinlen) == 0)
+ wso_login(inet_ntoa(sin.sin_addr),user,NULL,0);
+#endif /* WHOSON */
return pw_login (pw,pw->pw_name,pw->pw_dir,argc,argv);
+ }
s = (logtry-- > 0) ? "Login failure" : "Excessive login attempts";
/* note the failure in the syslog */
syslog (LOG_INFO,"%s user=%.80s host=%.80s",s,user,tcp_clienthost ());
--- src/osdep/unix/Makefile.orig Tue Jun 30 03:40:49 1998
+++ src/osdep/unix/Makefile Mon Jul 6 20:15:26 1998
@@ -271,8 +271,8 @@
MAILSPOOL=/var/mail NEWSSPOOL=/var/spool/news \
ACTIVEFILE=/usr/share/news/active \
RSHPATH=/usr/bin/rsh \
- BASECFLAGS="-g -O2 -DNFSKLUDGE" \
- BASELDFLAGS="-lsocket -lnsl -lgen" \
+ BASECFLAGS="-g -O2 -DNFSKLUDGE -DWHOSON -I/usr/local/include" \
+ BASELDFLAGS="-lsocket -lnsl -lgen -L/usr/local/lib -lwhoson" \
RANLIB=true CC=gcc
gsu: # GCC SUN-OS