Fix build of Perl-using modules of Windows

petere · petere · commit 502423180a8c · 2019-12-16T11:48:01.000+01:00
Commit f14413b broke the build of Perl-using modules on Windows. Perl might have its own definitions of uid_t and gid_t, so we hide ours, but then we can't use ours in our header files such as port.h which don't see the Perl definition. Hide our definition of getpeereid() on Windows in Perl-using modules, using PLPERL_HAVE_UID_GID define. That means we can't portably use getpeeruid() is such modules right now, but there is no need anyway.
diff --git a/src/include/port.h b/src/include/port.h
@@ -355,8 +355,11 @@ extern int	fls(int mask);
 #endif
 
 #ifndef HAVE_GETPEEREID
+/* On Windows, Perl might have incompatible definitions of uid_t and gid_t. */
+#ifndef PLPERL_HAVE_UID_GID
 extern int	getpeereid(int sock, uid_t *uid, gid_t *gid);
 #endif
+#endif
 
 #ifndef HAVE_ISINF
 extern int	isinf(double x);
