X-Git-Url: https://code.wpia.club/?a=blobdiff_plain;f=lib%2Fopenssl%2Fcrypto%2Frc5%2Fasm%2Frc5-586.pl;h=e3e1c64242958ea55f841a32b9c196cc36cbac48;hb=02ed66432c92de70694700164f986190aad3cbc5;hp=61ac6effc69c01e73debe7667ce644e044c81469;hpb=89016837dcbf2775cd15dc8cbaba00dc6379f86e;p=cassiopeia.git diff --git a/lib/openssl/crypto/rc5/asm/rc5-586.pl b/lib/openssl/crypto/rc5/asm/rc5-586.pl index 61ac6ef..e3e1c64 100644 --- a/lib/openssl/crypto/rc5/asm/rc5-586.pl +++ b/lib/openssl/crypto/rc5/asm/rc5-586.pl @@ -1,10 +1,20 @@ -#!/usr/local/bin/perl +#! /usr/bin/env perl +# Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved. +# +# Licensed under the OpenSSL license (the "License"). You may not use +# this file except in compliance with the License. You can obtain a copy +# in the file LICENSE in the source distribution or at +# https://www.openssl.org/source/license.html + $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1; push(@INC,"${dir}","${dir}../../perlasm"); require "x86asm.pl"; require "cbc.pl"; +$output = pop; +open STDOUT,">$output"; + &asm_init($ARGV[0],"rc5-586.pl"); $RC5_MAX_ROUNDS=16; @@ -22,6 +32,8 @@ $tmp4="edx"; &cbc("RC5_32_cbc_encrypt","RC5_32_encrypt","RC5_32_decrypt",0,4,5,3,-1,-1); &asm_finish(); +close STDOUT; + sub RC5_32_encrypt { local($name,$enc)=@_;