SOURCES: perl-User-Utmp-strcmp-fix.patch - updated to 1.8
ankry
ankry at pld-linux.org
Sat Oct 21 11:54:33 CEST 2006
Author: ankry Date: Sat Oct 21 09:54:33 2006 GMT
Module: SOURCES Tag: HEAD
---- Log message:
- updated to 1.8
---- Files affected:
SOURCES:
perl-User-Utmp-strcmp-fix.patch (1.1 -> 1.2)
---- Diffs:
================================================================
Index: SOURCES/perl-User-Utmp-strcmp-fix.patch
diff -u SOURCES/perl-User-Utmp-strcmp-fix.patch:1.1 SOURCES/perl-User-Utmp-strcmp-fix.patch:1.2
--- SOURCES/perl-User-Utmp-strcmp-fix.patch:1.1 Thu Jul 11 11:27:23 2002
+++ SOURCES/perl-User-Utmp-strcmp-fix.patch Sat Oct 21 11:54:28 2006
@@ -9,7 +9,7 @@
hv_iterinit(entry);
-@@ -240,21 +240,21 @@
+@@ -282,14 +282,14 @@
{
char* c_val;
@@ -17,34 +17,36 @@
+ c_val = SvPV(val, st_len);
strncpy(utent->ut_user, c_val, sizeof(utent->ut_user));
}
- else if(strEQ(key, "ut_id"))
+ else if (strEQ(key, "ut_line"))
{
char* c_val;
- c_val = SvPV(val, strlen);
+ c_val = SvPV(val, st_len);
- strncpy(utent->ut_id, c_val, sizeof(utent->ut_id));
+ strncpy(utent->ut_line, c_val, sizeof(utent->ut_line));
}
- else if(strEQ(key, "ut_line"))
+ else if (strEQ(key, "ut_time"))
+@@ -302,7 +302,7 @@
{
char* c_val;
- c_val = SvPV(val, strlen);
+ c_val = SvPV(val, st_len);
- strncpy(utent->ut_line, c_val, sizeof(utent->ut_line));
+ strncpy(utent->ut_id, c_val, sizeof(utent->ut_id));
}
- else if(strEQ(key, "ut_pid"))
-@@ -296,15 +296,15 @@
+ else if (strEQ(key, "ut_pid"))
+@@ -342,7 +342,7 @@
{
- char* c_val;
+ char *c_val;
- c_val = SvPV(val, strlen);
+ c_val = SvPV(val, st_len);
strncpy(utent->ut_host, c_val, sizeof(utent->ut_host));
}
#endif
+@@ -350,8 +350,8 @@
#ifdef HAS_UT_ADDR
- else if(strEQ(key, "ut_addr"))
+ else if (strEQ(key, "ut_addr"))
{
- memcpy(&utent->ut_addr, SvPV(val, strlen),
- MIN(sizeof(utent->ut_addr), strlen));
@@ -53,3 +55,46 @@
}
#endif
}
+@@ -364,7 +364,7 @@
+ char *key;
+ SV *val;
+ I32 len;
+- STRLEN strlen;
++ STRLEN st_len;
+
+ /* Initialize the entry */
+
+@@ -408,21 +408,21 @@
+ {
+ char* c_val;
+
+- c_val = SvPV(val, strlen);
++ c_val = SvPV(val, st_len);
+ strncpy(utent->ut_name, c_val, sizeof(utent->ut_name));
+ }
+ else if (strEQ(key, "ut_id"))
+ {
+ char* c_val;
+
+- c_val = SvPV(val, strlen);
++ c_val = SvPV(val, st_len);
+ strncpy(utent->ut_id, c_val, sizeof(utent->ut_id));
+ }
+ else if (strEQ(key, "ut_line"))
+ {
+ char* c_val;
+
+- c_val = SvPV(val, strlen);
++ c_val = SvPV(val, st_len);
+ strncpy(utent->ut_line, c_val, sizeof(utent->ut_line));
+ }
+ else if (strEQ(key, "ut_pid"))
+@@ -518,7 +518,7 @@
+ {
+ char* c_val;
+
+- c_val = SvPV(val, strlen);
++ c_val = SvPV(val, st_len);
+ strncpy(utent->ut_host, c_val, sizeof(utent->ut_host));
+ }
+ #endif
================================================================
---- CVS-web:
http://cvs.pld-linux.org/SOURCES/perl-User-Utmp-strcmp-fix.patch?r1=1.1&r2=1.2&f=u
More information about the pld-cvs-commit
mailing list