commit perl-Data-UUID

20 Sep 2006

Hello community,

here is the log from the commit of package perl-Data-UUID
checked in at Wed Sep 20 09:47:12 CEST 2006.

--------

--- perl-Data-UUID/perl-Data-UUID.changes	2006-09-18 13:00:14.000000000 +0200
+++ perl-Data-UUID/perl-Data-UUID.changes	2006-09-20 07:42:35.000000000 +0200
@@ -1,0 +2,6 @@
+Wed Sep 20 07:41:45 CEST 2006 - lmuelle@suse.de
+
+- Update to version 0.145.
+  + Win32 compatibility/compilation improvements (rt #21486).
+
+-------------------------------------------------------------------

Old:
----
  Data-UUID-0.143.tar.gz

New:
----
  Data-UUID-0.145.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Data-UUID.spec ++++++
--- /var/tmp/diff_new_pack.aWMIbt/_old	2006-09-20 09:46:54.000000000 +0200
+++ /var/tmp/diff_new_pack.aWMIbt/_new	2006-09-20 09:46:54.000000000 +0200
@@ -1,5 +1,5 @@
 #
-# spec file for package perl-Data-UUID (Version 0.143)
+# spec file for package perl-Data-UUID (Version 0.145)
 #
 # Copyright (c) 2006 SUSE LINUX Products GmbH, Nuernberg, Germany.
 # This file and all modifications and additions to the pristine
@@ -17,7 +17,7 @@
 Requires:       perl = %{perl_version}
 Autoreqprov:    on
 Summary:        Perl extension for generating Globally/Universally Unique Identifiers (GUIDs/UUIDs)
-Version:        0.143
+Version:        0.145
 Release:        1
 Source:         http://cpan.org/modules/by-module/Data/Data-UUID-%{version}.tar.gz
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
@@ -66,6 +66,9 @@
 /var/adm/perl-modules/%{name}
 
 %changelog -n perl-Data-UUID
+* Wed Sep 20 2006 - lmuelle@suse.de
+- Update to version 0.145.
+  + Win32 compatibility/compilation improvements (rt #21486).
 * Mon Sep 18 2006 - lmuelle@suse.de
 - Update to version 0.143.
 - more tick-tracking fixes (rt #21486) -- thanks MERIJNB!

++++++ Data-UUID-0.143.tar.gz -> Data-UUID-0.145.tar.gz ++++++
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Data-UUID-0.143/Changes new/Data-UUID-0.145/Changes
--- old/Data-UUID-0.143/Changes	2006-09-18 04:13:11.000000000 +0200
+++ new/Data-UUID-0.145/Changes	2006-09-20 00:25:55.000000000 +0200
@@ -1,5 +1,8 @@
 Revision history for Perl extension Data::UUID.
 
+0.145 Sun Sep 17 22:12 2006
+  - Win32 compatibility/compilation improvements (rt #21486) -- thanks MERIJNB!
+
 0.143 Sun Sep 17 22:12 2006
   - more tick-tracking fixes (rt #21486) -- thanks MERIJNB!
 
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Data-UUID-0.143/META.yml new/Data-UUID-0.145/META.yml
--- old/Data-UUID-0.143/META.yml	2006-09-18 04:15:37.000000000 +0200
+++ new/Data-UUID-0.145/META.yml	2006-09-20 00:28:01.000000000 +0200
@@ -1,7 +1,7 @@
 # http://module-build.sourceforge.net/META-spec.html
 #XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
 name:         Data-UUID
-version:      0.143
+version:      0.145
 version_from: UUID.pm
 installdirs:  site
 requires:
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Data-UUID-0.143/UUID.h new/Data-UUID-0.145/UUID.h
--- old/Data-UUID-0.143/UUID.h	2006-09-06 04:16:06.000000000 +0200
+++ new/Data-UUID-0.145/UUID.h	2006-09-20 00:24:54.000000000 +0200
@@ -7,10 +7,6 @@
 #ifndef WIN32
 #include 
 #endif
-#ifndef _MSC_VER
-// No unistd.h in MS VC
-#include 
-#endif
 #include 
 #include "md5.h"
 
@@ -35,9 +31,13 @@
 #else
 #  define PTR2ul(p)	INT2PTR(unsigned long,p)	
 #endif
-#if defined __cygwin__ || __mingw32__
+
+
+#if defined __cygwin__ || __mingw32__ || _WIN32
 #include 
+#include 
 #endif
+
 #if defined __darwin__
 #include 
 #endif
@@ -52,11 +52,21 @@
 
 #define UUID_STATE			".UUID_STATE"
 #define UUID_NODEID			".UUID_NODEID"
+
+#if defined __cygwin__ || __mingw32__ || _WIN32
+#define UUID_STATE_NV_STORE		_STDIR"\\"UUID_STATE
+#define UUID_NODEID_NV_STORE		_STDIR"\\"UUID_NODEID
+#else
 #define UUID_STATE_NV_STORE		_STDIR"/"UUID_STATE
 #define UUID_NODEID_NV_STORE		_STDIR"/"UUID_NODEID
+#endif
 
 #define UUIDS_PER_TICK 1024
+#if defined(_WIN32)
+#define I64(C) C##i64
+#else
 #define I64(C) C##LL
+#endif
 
 #define F_BIN 0
 #define F_STR 1
@@ -65,16 +75,27 @@
 
 #define CHECK(f1, f2) if (f1 != f2) RETVAL = f1 < f2 ? -1 : 1;
 
-typedef unsigned int       unsigned32;
-typedef unsigned short     unsigned16;
-typedef unsigned char      unsigned8;
-typedef unsigned char      byte;
-#ifndef _MSC_VER
-typedef unsigned long long unsigned64_t;
-# else
-typedef unsigned __int64 unsigned64_t;
-// http://msdn2.microsoft.com/en-us/library/296az74e.aspx - Integer Limits
-#endif
+#if defined(_WIN32)
+//types not available on windows
+typedef __int64 int64_t;
+typedef unsigned __int64 uint64_t;
+typedef __int32 int32_t;
+typedef unsigned __int32 uint32_t;
+typedef __int16 int16_t;
+typedef unsigned __int16 uint16_t;
+typedef __int8 int8_t;
+typedef unsigned __int8 uint8_t;
+typedef int pid_t;
+#else //SunCC or gcc
+#include 
+#endif
+
+typedef uint32_t         unsigned32;
+typedef uint16_t         unsigned16;
+typedef uint8_t          unsigned8;
+typedef uint8_t          byte;
+typedef uint64_t         unsigned64_t;
+
 typedef unsigned64_t       perl_uuid_time_t;
 
 #if   defined __solaris__ || defined __linux__
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Data-UUID-0.143/UUID.pm new/Data-UUID-0.145/UUID.pm
--- old/Data-UUID-0.143/UUID.pm	2006-09-18 04:14:14.000000000 +0200
+++ new/Data-UUID-0.145/UUID.pm	2006-09-20 00:25:28.000000000 +0200
@@ -19,8 +19,7 @@
    NameSpace_URL
    NameSpace_X500
 );
-$VERSION = '0.143';
-
+$VERSION = '0.145';
 
 # Preloaded methods go here.
 
diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Data-UUID-0.143/UUID.xs new/Data-UUID-0.145/UUID.xs
--- old/Data-UUID-0.143/UUID.xs	2006-09-18 04:10:24.000000000 +0200
+++ new/Data-UUID-0.145/UUID.xs	2006-09-20 00:24:54.000000000 +0200
@@ -307,7 +307,7 @@
    if ( self->state.ts == I64(0) ||
       memcmp(&(self->nodeid), &(self->state.node), sizeof(uuid_node_t)))
       clockseq = true_random();
-   else if (timestamp < self->state.ts)
+   else if (timestamp <= self->state.ts)
       clockseq++;
 
    format_uuid_v1(&uuid, clockseq, timestamp, self->nodeid);


++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++



Remember to have fun...

---------------------------------------------------------------------
To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org
For additional commands, e-mail: opensuse-commit+help@opensuse.org

    

commit perl-Data-UUID

root＠suse.de