github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-14 07:30:21 +00:00
Code Issues Projects Releases Wiki Activity

Remove the check_unix_password functionality from uutils.c (#297)

Browse Source 
This code has not worked for a long time.  Most systems now maintain
the password entries so that a password is not accessible through the
getpwent() interface.  The SUBR that calls this interface may be
removed at a future time.
This commit is contained in:
Nick Briggs 2021-01-25 21:53:36 -08:00 committed by GitHub
parent 91ef549b15
commit 9ca86a662f
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
7 changed files with 9 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
CMakeLists.txt
View File

@ -17,7 +17,6 @@ IF(CMAKE_C_COMPILER_ID MATCHES "SunPro")
ENDIF()
INCLUDE(CheckLibraryExists)
CHECK_LIBRARY_EXISTS(crypt crypt "" NEED_LIB_CRYPT)
CHECK_LIBRARY_EXISTS(m fmod "" NEED_LIB_M)
FIND_PACKAGE(X11 REQUIRED)
@ -408,9 +407,6 @@ ADD_LIBRARY(maiko STATIC ${MAIKO_SRCS} ${MAIKO_HDRS})
TARGET_COMPILE_DEFINITIONS(maiko PUBLIC ${MAIKO_DEFINITIONS})
TARGET_INCLUDE_DIRECTORIES(maiko PUBLIC inc)
TARGET_LINK_LIBRARIES(maiko X11::X11)
IF(NEED_LIB_CRYPT)
TARGET_LINK_LIBRARIES(maiko crypt)
ENDIF()
IF(NEED_LIB_M)
TARGET_LINK_LIBRARIES(maiko m)
ENDIF()

4
bin/makefile-cygwin.x86_64-x
View File

@ -24,8 +24,8 @@ DFLAGS = -DAIX \
-DBYTESWAP -DLOGINT $(XFLAGS) \
-DRELEASE=351
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
OBJECTDIR = ../$(RELEASENAME)/

2
bin/makefile-freebsd.386-x
View File

@ -22,7 +22,7 @@ OPTFLAGS = -O1 -gdwarf-2
DFLAGS = -DBYTESWAP -DLOGINT $(XFLAGS) \
-DRELEASE=351
LDFLAGS = -L/usr/local/lib -lX11 -lc -lm -lcrypt
LDFLAGS = -L/usr/local/lib -lX11 -lc -lm
LDELDFLAGS = -L/usr/local/lib -lX11 -lc -lm
OBJECTDIR = ../$(RELEASENAME)/

4
bin/makefile-linux.386-x
View File

@ -23,8 +23,8 @@ DFLAGS = -DAIX \
-DBYTESWAP -DLOGINT $(XFLAGS) \
-DRELEASE=351
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
OBJECTDIR = ../$(RELEASENAME)/

4
bin/makefile-linux.armv7l-x
View File

@ -23,8 +23,8 @@ DFLAGS = -DAIX \
-DBYTESWAP -DLOGINT $(XFLAGS) \
-DRELEASE=351
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
OBJECTDIR = ../$(RELEASENAME)/

4
bin/makefile-linux.x86_64-x
View File

@ -24,8 +24,8 @@ DFLAGS = -DAIX \
-DBYTESWAP -DLOGINT $(XFLAGS) \
-DRELEASE=351
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm -lcrypt
LDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
LDELDFLAGS = -L/usr/X11/lib -lX11 -lc -lm
OBJECTDIR = ../$(RELEASENAME)/

21
src/uutils.c
View File

@ -137,28 +137,7 @@ int c_string_to_lisp_string(char *C, LispPTR Lisp) {
/************************************************************************/
LispPTR check_unix_password(LispPTR *args) {
#ifndef DOS
struct passwd *pwd;
#ifndef OS5
char *crypt(const char *, const char *);
#endif /* OS5 */
char salt[3];
char name[100], pass[100];
if (lisp_string_to_c_string(args[0], name, sizeof name)) { return NIL; }
if (lisp_string_to_c_string(args[1], pass, sizeof pass)) { return NIL; }
if ((pwd = getpwnam(name)) == 0) { return (NIL); /* can't find entry for name */ }
salt[0] = pwd->pw_passwd[0];
salt[1] = pwd->pw_passwd[1];
salt[2] = '\0';
if (strcmp((char *)crypt(pass, salt), pwd->pw_passwd) == 0)
return (ATOM_T);
else
return (NIL);
#else
return ATOM_T;
#endif /* DOS */
}
/************************************************************************/