Hello community, here is the log from the commit of package perl-Sys-CPU for openSUSE:Factory checked in at 2014-03-18 13:59:25 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Sys-CPU (Old) and /work/SRC/openSUSE:Factory/.perl-Sys-CPU.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Sys-CPU" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Sys-CPU/perl-Sys-CPU.changes 2013-02-01 16:02:14.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Sys-CPU.new/perl-Sys-CPU.changes 2014-03-18 13:59:26.000000000 +0100 @@ -1,0 +2,7 @@ +Sat Mar 15 13:04:12 UTC 2014 - co...@suse.com + +- updated to 0.61 + v0.60 - Added FreeBSD support (Thanks Johan & SREZIC) + v0.61 - Fix test numbering issue + +------------------------------------------------------------------- Old: ---- Sys-CPU-0.54.tar.gz New: ---- Sys-CPU-0.61.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Sys-CPU.spec ++++++ --- /var/tmp/diff_new_pack.ozclzg/_old 2014-03-18 13:59:27.000000000 +0100 +++ /var/tmp/diff_new_pack.ozclzg/_new 2014-03-18 13:59:27.000000000 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-Sys-CPU # -# Copyright (c) 2013 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2014 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -17,7 +17,7 @@ Name: perl-Sys-CPU -Version: 0.54 +Version: 0.61 Release: 0 %define cpan_name Sys-CPU Summary: Perl extension for getting CPU information. Currently only number of CPU[cut] @@ -28,7 +28,6 @@ BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros -#BuildRequires: perl(Sys::CPU) %{perl_requires} %description ++++++ Sys-CPU-0.54.tar.gz -> Sys-CPU-0.61.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-CPU-0.54/CPU.pm new/Sys-CPU-0.61/CPU.pm --- old/Sys-CPU-0.54/CPU.pm 2012-11-13 05:52:38.000000000 +0100 +++ new/Sys-CPU-0.61/CPU.pm 2013-11-27 23:44:01.000000000 +0100 @@ -12,14 +12,14 @@ # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK # will save memory. our %EXPORT_TAGS = ( 'all' => [ qw( - cpu_count - cpu_clock - cpu_type + cpu_count + cpu_clock + cpu_type ) ] ); our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); -our $VERSION = '0.54'; +our $VERSION = '0.61'; bootstrap Sys::CPU $VERSION; @@ -36,7 +36,7 @@ =head1 SYNOPSIS use Sys::CPU; - + $number_of_cpus = Sys::CPU::cpu_count(); printf("I have %d CPU's\n",$number_of_cpus); print " Speed : ",Sys::CPU::cpu_clock(),"\n"; @@ -44,12 +44,15 @@ =head1 DESCRIPTION -In responce to a post on perlmonks.org, a module for counting the number of CPU's on a +In responce to a post on perlmonks.org, a module for counting the number of CPU's on a system. Support has now also been added for type of CPU and clock speed. While much of the code is from UNIX::Processors, win32 support has been added (but not tested). v0.45 - Corrected solaris support (Thanks Cloyce) +v0.60 - Added FreeBSD support (Thanks Johan & SREZIC) +v0.61 - Fix test numbering issue + =head2 EXPORT None by default. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-CPU-0.54/CPU.xs new/Sys-CPU-0.61/CPU.xs --- old/Sys-CPU-0.54/CPU.xs 2012-11-13 05:47:34.000000000 +0100 +++ new/Sys-CPU-0.61/CPU.xs 2013-11-27 23:40:07.000000000 +0100 @@ -40,6 +40,11 @@ #define _have_cpu_clock #define _have_cpu_type #endif +#ifdef __FreeBSD__ + #include <sys/sysctl.h> + #define _have_cpu_type + #define _have_cpu_clock +#endif #ifdef WINDOWS /* Registry Functions */ @@ -191,13 +196,18 @@ #define INTEL_CORE2 0x426f69ef #endif +#ifndef INTEL_COREI7 +#define INTEL_COREI7 0x5490B78C +#endif + char *apple_get_type_name() { - int mib[2]; - size_t len=2; + int mib[2]; + size_t len=2; int kp; - sysctlnametomib ("hw.cpufamily", mib, &len); + + sysctlnametomib ("hw.cpufamily", mib, &len); sysctl(mib, 2, NULL, &len, NULL, 0); - sysctl(mib, 2, &kp, &len, NULL, 0); + sysctl(mib, 2, &kp, &len, NULL, 0); switch (kp) { case POWERPC_G3: return "POWERPC_G3"; @@ -219,8 +229,10 @@ return "INTEL_CORE"; case INTEL_CORE2: return "INTEL_CORE2"; + case INTEL_COREI7: + return "INTEL_COREI7"; default: - return "UNKNOWN"; + return "UNKNOWN"; } } #endif /* __APPLE__ */ @@ -329,6 +341,10 @@ int value = proc_cpuinfo_clock(); if (value) clock = value; #endif +#ifdef __FreeBSD__ + size_t len = sizeof(clock); + sysctlbyname("hw.clockrate", &clock, &len, NULL, 0); +#endif #ifdef WINDOWS char *clock_str = malloc(MAX_IDENT_SIZE); /*!! untested !!*/ @@ -343,7 +359,15 @@ clock = proc_get_mhz(0); #endif #ifdef __APPLE__ - clock = CurrentProcessorSpeed(); + int mib[2]; + unsigned int freq; + size_t len; + + mib[0] = CTL_HW; + mib[1] = HW_CPU_FREQ; + len = sizeof(freq); + sysctl(mib, 2, &freq, &len, NULL, 0); + clock = freq/1000000; #endif #ifndef _have_cpu_clock processor_info_t info, *infop=&info; @@ -366,6 +390,10 @@ CODE: { char *value = NULL; +#ifdef __FreeBSD__ + size_t len = MAX_IDENT_SIZE; + sysctlbyname("hw.model", value, &len, NULL, 0); +#endif #ifdef __linux__ #if defined __s390__ || defined __s390x__ value = processor_machine_field (proc_cpuinfo_field ("processor") ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-CPU-0.54/MANIFEST new/Sys-CPU-0.61/MANIFEST --- old/Sys-CPU-0.54/MANIFEST 2010-08-16 19:44:05.000000000 +0200 +++ new/Sys-CPU-0.61/MANIFEST 2013-11-27 23:44:14.000000000 +0100 @@ -1,8 +1,9 @@ -CPU.pm -CPU.xs -Changes -MANIFEST -Makefile.PL -t/Sys-CPU.t -README -META.yml Module meta-data (added by MakeMaker) +CPU.pm +CPU.xs +Changes +MANIFEST +Makefile.PL +t/Sys-CPU.t +README +META.yml Module meta-data (added by MakeMaker) +META.json Module JSON meta-data (added by MakeMaker) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-CPU-0.54/META.json new/Sys-CPU-0.61/META.json --- old/Sys-CPU-0.54/META.json 1970-01-01 01:00:00.000000000 +0100 +++ new/Sys-CPU-0.61/META.json 2013-11-27 23:44:14.000000000 +0100 @@ -0,0 +1,39 @@ +{ + "abstract" : "unknown", + "author" : [ + "unknown" + ], + "dynamic_config" : 1, + "generated_by" : "ExtUtils::MakeMaker version 6.6302, CPAN::Meta::Converter version 2.120921", + "license" : [ + "unknown" + ], + "meta-spec" : { + "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", + "version" : "2" + }, + "name" : "Sys-CPU", + "no_index" : { + "directory" : [ + "t", + "inc" + ] + }, + "prereqs" : { + "build" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "configure" : { + "requires" : { + "ExtUtils::MakeMaker" : "0" + } + }, + "runtime" : { + "requires" : {} + } + }, + "release_status" : "stable", + "version" : "0.61" +} diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-CPU-0.54/META.yml new/Sys-CPU-0.61/META.yml --- old/Sys-CPU-0.54/META.yml 2012-11-13 05:53:09.000000000 +0100 +++ new/Sys-CPU-0.61/META.yml 2013-11-27 23:44:14.000000000 +0100 @@ -1,20 +1,21 @@ ---- #YAML:1.0 -name: Sys-CPU -version: 0.54 -abstract: ~ -author: [] -license: unknown -distribution_type: module -configure_requires: - ExtUtils::MakeMaker: 0 +--- +abstract: unknown +author: + - unknown build_requires: - ExtUtils::MakeMaker: 0 -requires: {} -no_index: - directory: - - t - - inc -generated_by: ExtUtils::MakeMaker version 6.56 + ExtUtils::MakeMaker: 0 +configure_requires: + ExtUtils::MakeMaker: 0 +dynamic_config: 1 +generated_by: 'ExtUtils::MakeMaker version 6.6302, CPAN::Meta::Converter version 2.120921' +license: unknown meta-spec: - url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + url: http://module-build.sourceforge.net/META-spec-v1.4.html + version: 1.4 +name: Sys-CPU +no_index: + directory: + - t + - inc +requires: {} +version: 0.61 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sys-CPU-0.54/t/Sys-CPU.t new/Sys-CPU-0.61/t/Sys-CPU.t --- old/Sys-CPU-0.54/t/Sys-CPU.t 2010-08-16 20:27:13.000000000 +0200 +++ new/Sys-CPU-0.61/t/Sys-CPU.t 2013-11-27 23:42:59.000000000 +0100 @@ -32,7 +32,7 @@ if (defined($type)) { print "ok 4 (CPU Type : $type)\n"; } else { - print "not ok 5 (cpu_type unavailable)\n"; + print "not ok 4 (cpu_type unavailable)\n"; } ######################### End of black magic. -- To unsubscribe, e-mail: opensuse-commit+unsubscr...@opensuse.org For additional commands, e-mail: opensuse-commit+h...@opensuse.org