Date: Sat, 11 Sep 2004 05:30:14 GMT From: Rong-En Fan <rafan@infor.org> To: freebsd-ports-bugs@FreeBSD.org Subject: Re: ports/71572: [PATCH] devel/PPerl: take maintainership & add multiuser support Message-ID: <200409110530.i8B5UEHu093776@freefall.freebsd.org>
next in thread | raw e-mail | index | archive | help
The following reply was made to PR ports/71572; it has been noted by GNATS.
From: Rong-En Fan <rafan@infor.org>
To: FreeBSD-gnats-submit@FreeBSD.org, freebsd-ports-bugs@FreeBSD.org
Cc:
Subject: Re: ports/71572: [PATCH] devel/PPerl: take maintainership & add multiuser support
Date: Sat, 11 Sep 2004 13:29:04 +0800
The previous patch-main.c is wrong.
abandon previous patch, use following instead.
diff -ruN --exclude=CVS /usr/ports/devel/p5-PPerl/Makefile /home/rafan/tmp/ports/p5-PPerl/Makefile
--- /usr/ports/devel/p5-PPerl/Makefile Sat Sep 11 04:07:19 2004
+++ /home/rafan/tmp/ports/p5-PPerl/Makefile Sat Sep 11 04:04:51 2004
@@ -8,12 +8,13 @@
PORTNAME= PPerl
PORTVERSION= 0.25
+PORTREVISION= 1
CATEGORIES= devel perl5
MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
MASTER_SITE_SUBDIR= ../../authors/id/M/MS/MSERGEANT
PKGNAMEPREFIX= p5-
-MAINTAINER= ports@FreeBSD.org
+MAINTAINER= rafan@infor.org
COMMENT= Make perl scripts persistent in memory
USE_PERL5= yes
diff -ruN --exclude=CVS /usr/ports/devel/p5-PPerl/diff /home/rafan/tmp/ports/p5-PPerl/diff
--- /usr/ports/devel/p5-PPerl/diff Thu Jan 1 08:00:00 1970
+++ /home/rafan/tmp/ports/p5-PPerl/diff Sat Sep 11 13:27:39 2004
@@ -0,0 +1 @@
+===> Generating patch
diff -ruN --exclude=CVS /usr/ports/devel/p5-PPerl/files/patch-main.c /home/rafan/tmp/ports/p5-PPerl/files/patch-main.c
--- /usr/ports/devel/p5-PPerl/files/patch-main.c Thu Jan 1 08:00:00 1970
+++ /home/rafan/tmp/ports/p5-PPerl/files/patch-main.c Sat Sep 11 13:24:50 2004
@@ -0,0 +1,29 @@
+--- main.c.orig Sat Sep 11 03:54:05 2004
++++ main.c Sat Sep 11 03:55:32 2004
+@@ -224,13 +224,16 @@
+ char *fullpath = my_malloc(path_max);
+ int i = 0;
+
++ char euid[12];
++ sprintf(euid, "_%d", geteuid());
++
+ if (realpath(scriptname, fullpath) == NULL) {
+ perror("pperl: resolving full pathname to script failed");
+ exit(1);
+ }
+ Dx(Debug("realpath returned: %s\n", fullpath));
+ /* Ugh. I am a terrible C programmer! */
+- sockname = my_malloc(strlen(P_tmpdir) + strlen(fullpath) + 3);
++ sockname = my_malloc(strlen(P_tmpdir) + strlen(fullpath) + 3 + strlen(euid));
+ save = sockname;
+ sprintf(sockname, "%s/", P_tmpdir);
+ sockname += strlen(P_tmpdir) + 1;
+@@ -246,7 +249,7 @@
+ }
+ sockname++; i++;
+ }
+- *sockname = '\0';
++ strncat(sockname, euid, 11);
+ free(fullpath);
+ return save;
+ }
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?200409110530.i8B5UEHu093776>