[prev in list] [next in list] [prev in thread] [next in thread] 

List:       openssl-cvs
Subject:    [CVS] OpenSSL: openssl/crypto/md5/asm/ md5-x86_64.pl openssl/crypto/wh...
From:       "Andy Polyakov" <appro () openssl ! org>
Date:       2008-01-13 17:42:05
Message-ID: 20080113174205.243801EAE8AC () master ! openssl ! org
[Download RAW message or body]

  OpenSSL CVS Repository
  http://cvs.openssl.org/
  ____________________________________________________________________________

  Server: cvs.openssl.org                  Name:   Andy Polyakov
  Root:   /v/openssl/cvs                   Email:  appro@openssl.org
  Module: openssl                          Date:   13-Jan-2008 18:42:05
  Branch: HEAD                             Handle: 2008011317420400

  Modified files:
    openssl/crypto          x86_64cpuid.pl
    openssl/crypto/md5/asm  md5-x86_64.pl
    openssl/crypto/whrlpool/asm
                            wp-x86_64.pl

  Log:
    Make all x86_64 modules independent on current working directory.

  Summary:
    Revision    Changes     Path
    1.5         +7  -1      openssl/crypto/md5/asm/md5-x86_64.pl
    1.3         +7  -1      openssl/crypto/whrlpool/asm/wp-x86_64.pl
    1.9         +3  -1      openssl/crypto/x86_64cpuid.pl
  ____________________________________________________________________________

  patch -p0 <<'@@ .'
  Index: openssl/crypto/md5/asm/md5-x86_64.pl
  ============================================================================
  $ cvs diff -u -r1.4 -r1.5 md5-x86_64.pl
  --- openssl/crypto/md5/asm/md5-x86_64.pl	11 Oct 2006 11:55:10 -0000	1.4
  +++ openssl/crypto/md5/asm/md5-x86_64.pl	13 Jan 2008 17:42:04 -0000	1.5
  @@ -109,7 +109,13 @@
   }
   
   my $output = shift;
  -open STDOUT,"| $^X ../perlasm/x86_64-xlate.pl $output";
  +
  +$0 =~ m/(.*[\/\\])[^\/\\]+$/; my $dir=$1; my $xlate;
  +( $xlate="${dir}x86_64-xlate.pl" and -f $xlate ) or
  +( $xlate="${dir}../../perlasm/x86_64-xlate.pl" and -f $xlate) or
  +die "can't locate x86_64-xlate.pl";
  +
  +open STDOUT,"| $^X $xlate $output";
   
   $code .= <<EOF;
   .text
  @@ .
  patch -p0 <<'@@ .'
  Index: openssl/crypto/whrlpool/asm/wp-x86_64.pl
  ============================================================================
  $ cvs diff -u -r1.2 -r1.3 wp-x86_64.pl
  --- openssl/crypto/whrlpool/asm/wp-x86_64.pl	3 Dec 2005 11:59:25 -0000	1.2
  +++ openssl/crypto/whrlpool/asm/wp-x86_64.pl	13 Jan 2008 17:42:04 -0000	1.3
  @@ -31,7 +31,13 @@
   # operand.
   
   $output=shift;
  -open STDOUT,"| $^X ../perlasm/x86_64-xlate.pl $output";
  +
  +$0 =~ m/(.*[\/\\])[^\/\\]+$/; my $dir=$1; my $xlate;
  +( $xlate="${dir}x86_64-xlate.pl" and -f $xlate ) or
  +( $xlate="${dir}../../perlasm/x86_64-xlate.pl" and -f $xlate) or
  +die "can't locate x86_64-xlate.pl";
  +
  +open STDOUT,"| $^X $xlate $output";
   
   sub L() { $code.=".byte	".join(',',@_)."\n"; }
   sub LL(){ $code.=".byte	".join(',',@_).",".join(',',@_)."\n"; }
  @@ .
  patch -p0 <<'@@ .'
  Index: openssl/crypto/x86_64cpuid.pl
  ============================================================================
  $ cvs diff -u -r1.8 -r1.9 x86_64cpuid.pl
  --- openssl/crypto/x86_64cpuid.pl	23 Aug 2007 12:01:50 -0000	1.8
  +++ openssl/crypto/x86_64cpuid.pl	13 Jan 2008 17:42:04 -0000	1.9
  @@ -99,7 +99,9 @@
   
   ___
   
  -open STDOUT,"| $^X perlasm/x86_64-xlate.pl $output";
  +$0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
  +open STDOUT,"| $^X $dir/perlasm/x86_64-xlate.pl $output";
  +
   print<<___;
   .text
   
  @@ .
______________________________________________________________________
OpenSSL Project                                 http://www.openssl.org
CVS Repository Commit List                     openssl-cvs@openssl.org
Automated List Manager                           majordomo@openssl.org
[prev in list] [next in list] [prev in thread] [next in thread]