From 49b35ff9c21e9deefb10303effe65be575c65957 Mon Sep 17 00:00:00 2001 From: marcansoft Date: Sat, 20 Feb 2010 21:56:46 +0000 Subject: [PATCH] More CRLF -> LF --- tools/mkversion.pl | 8 +++--- tools/srecswap.pl | 70 +++++++++++++++++++++++----------------------- 2 files changed, 39 insertions(+), 39 deletions(-) diff --git a/tools/mkversion.pl b/tools/mkversion.pl index a3ec2f2b..351bac91 100644 --- a/tools/mkversion.pl +++ b/tools/mkversion.pl @@ -25,7 +25,7 @@ if(open(SVNINFO, "svn info $main_dir|")) { } } close(SVNINFO); - + if(open(SVNSTATUS, "svn status $main_dir|")) { $clean = 1; while() { @@ -36,9 +36,9 @@ if(open(SVNINFO, "svn info $main_dir|")) { } close(SVNINFO); } - + } else { - # Strategy two: look for .svn/entries. The third line should be "dir", the fourth line should contain + # Strategy two: look for .svn/entries. The third line should be "dir", the fourth line should contain # the currently checked out revision, the eleventh line should contain the last changed revision. # revision. if(open(ENTRIES, "$main_dir/.svn/entries")) { @@ -59,7 +59,7 @@ $compiletime[5] += 1900; my $ctime = sprintf("%6\$04i-%5\$02i-%4\$02i %3\$02i:%2\$02i:%1\$02i", @compiletime); print < +#include "proxmark3.h" /* Generated file, do not edit */ struct version_information __attribute__((section(".version_information"))) version_information = { VERSION_INFORMATION_MAGIC, diff --git a/tools/srecswap.pl b/tools/srecswap.pl index 24ef8e84..fd6f9a94 100644 --- a/tools/srecswap.pl +++ b/tools/srecswap.pl @@ -1,35 +1,35 @@ -#!/usr/bin/perl - -# endian-swap S records; we need this because the JTAG tools we're using -# expect the memory image in byte-swapped format -# -# Jonathan Westhues, April 2004 - -if(@ARGV == 0) { - die "usage: $0 file-to-endian-swap.s19 > out.s19\n"; -} - -while(<>) { - chomp; - - if(/^S0/) { - next; - } - if(/^S7/) { - print "$_\n"; - next; - } - - if(not /^S3(..)(........)(.*)(..)$/) { - die "bad S record at line $.\n"; - } - - $data = $3; - $checksum = $4; - - print "S3$1$2"; - while($data =~ m#(..)(..)(..)(..)#g) { - print "$4$3$2$1"; - } - print "$checksum\n"; -} +#!/usr/bin/perl + +# endian-swap S records; we need this because the JTAG tools we're using +# expect the memory image in byte-swapped format +# +# Jonathan Westhues, April 2004 + +if(@ARGV == 0) { + die "usage: $0 file-to-endian-swap.s19 > out.s19\n"; +} + +while(<>) { + chomp; + + if(/^S0/) { + next; + } + if(/^S7/) { + print "$_\n"; + next; + } + + if(not /^S3(..)(........)(.*)(..)$/) { + die "bad S record at line $.\n"; + } + + $data = $3; + $checksum = $4; + + print "S3$1$2"; + while($data =~ m#(..)(..)(..)(..)#g) { + print "$4$3$2$1"; + } + print "$checksum\n"; +} -- 2.39.2