���� JFIF �� � ( %"1"%)+...383,7(-.-
![]() Server : Apache/2.4.6 (CentOS) OpenSSL/1.0.2k-fips PHP/7.4.20 System : Linux st2.domain.com 3.10.0-1127.10.1.el7.x86_64 #1 SMP Wed Jun 3 14:28:03 UTC 2020 x86_64 User : apache ( 48) PHP Version : 7.4.20 Disable Function : NONE Directory : /proc/self/root/home/real/node-v13.0.1/deps/openssl/openssl/ms/ |
#! /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 ($#ARGV == 1) || die "usage: cmp.pl <file1> <file2>\n"; open(IN0,"<$ARGV[0]") || die "unable to open $ARGV[0]\n"; open(IN1,"<$ARGV[1]") || die "unable to open $ARGV[1]\n"; binmode IN0; binmode IN1; $tot=0; $ret=1; for (;;) { $n1=sysread(IN0,$b1,4096); $n2=sysread(IN1,$b2,4096); last if ($n1 != $n2); last if ($b1 ne $b2); last if ($n1 < 0); if ($n1 == 0) { $ret=0; last; } $tot+=$n1; } close(IN0); close(IN1); if ($ret) { printf STDERR "$ARGV[0] and $ARGV[1] are different\n"; @a1=unpack("C*",$b1); @a2=unpack("C*",$b2); for ($i=0; $i<=$#a1; $i++) { if ($a1[$i] ne $a2[$i]) { printf "%02X %02X <<\n",$a1[$i],$a2[$i]; last; } } $nm=$tot+$n1; $tot+=$i+1; printf STDERR "diff at char $tot of $nm\n"; } exit($ret);