From ee23271b54767e3d62abc7a25bd3917074575b8b Mon Sep 17 00:00:00 2001 From: sparky4 Date: Thu, 29 Jun 2017 18:14:40 -0500 Subject: [PATCH] ====REPO AND DEBUG WORK==== i need to make it work with wd again.... --- DEBUG.16W | 209 +++++++++++++++++++++++++++++++++++++ HEAP.16W | 39 +++++++ MMDUMP.16W | Bin 0 -> 2222 bytes make-lowercase | 63 +++++++++++ makefile | 2 +- src/util/shbat/runtest.bat | 2 +- 6 files changed, 313 insertions(+), 2 deletions(-) create mode 100755 DEBUG.16W create mode 100755 HEAP.16W create mode 100755 MMDUMP.16W create mode 100755 make-lowercase diff --git a/DEBUG.16W b/DEBUG.16W new file mode 100755 index 00000000..c18d8eff --- /dev/null +++ b/DEBUG.16W @@ -0,0 +1,209 @@ +Seg:0 Size:8351 Owner:0x0 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++Seg:209f Size:256 Owner:0x5dfc +0 +Seg:21cd Size:76 Owner:0x0 +0 +Seg:2219 Size:256 Owner:0x1c32 +0 +Seg:2319 Size:256 Owner:0x1c34 +0 +Seg:2419 Size:256 Owner:0x1c36 +0 +Seg:2519 Size:256 Owner:0x1c38 +0 +Seg:2619 Size:256 Owner:0x1c3a +0 +Seg:2719 Size:256 Owner:0x1c3c +0 +Seg:2819 Size:256 Owner:0x1c3e +0 +Seg:2919 Size:256 Owner:0x1c40 +0 +Seg:2a19 Size:256 Owner:0x1c42 +0 +Seg:2b19 Size:256 Owner:0x1c44 +0 +Seg:2c19 Size:256 Owner:0x1c46 +0 +Seg:2d19 Size:256 Owner:0x1c48 +0 +Seg:2e19 Size:256 Owner:0x1c4a +0 +Seg:2f19 Size:256 Owner:0x1c4c +0 +Seg:3019 Size:256 Owner:0x1c4e +0 +Seg:3119 Size:256 Owner:0x1c50 +0 +Seg:3219 Size:256 Owner:0x1c52 +0 +Seg:3319 Size:256 Owner:0x1c54 +0 +Seg:3419 Size:256 Owner:0x1c56 +0 +Seg:3519 Size:256 Owner:0x1c58 +0 +Seg:3619 Size:256 Owner:0x1c5a +0 +Seg:3719 Size:256 Owner:0x1c5c +0 +Seg:3819 Size:256 Owner:0x1c5e +0 +Seg:3919 Size:256 Owner:0x1c60 +0 +Seg:3a19 Size:256 Owner:0x1c62 +0 +Seg:3b19 Size:256 Owner:0x1c64 +0 +Seg:3c19 Size:256 Owner:0x1c66 +0 +Seg:3d19 Size:256 Owner:0x1c68 +0 +Seg:3e19 Size:256 Owner:0x1c6a +0 +Seg:3f19 Size:256 Owner:0x1c6c +0 +Seg:4019 Size:256 Owner:0x1c6e +0 +Seg:4119 Size:256 Owner:0x1c70 +0 +Seg:4219 Size:256 Owner:0x1c72 +0 +Seg:4319 Size:256 Owner:0x1c74 +0 +Seg:4419 Size:256 Owner:0x1c76 +0 +Seg:4519 Size:256 Owner:0x1c78 +0 +Seg:4619 Size:256 Owner:0x1c7a +0 +Seg:4719 Size:256 Owner:0x1c7c +0 +Seg:4819 Size:256 Owner:0x1c7e +0 +Seg:4919 Size:256 Owner:0x1c80 +0 +Seg:4a19 Size:256 Owner:0x1c82 +0 +Seg:4b19 Size:256 Owner:0x1c84 +0 +Seg:4c19 Size:256 Owner:0x1c86 +0 +Seg:4d19 Size:256 Owner:0x1c88 +0 +Seg:4e19 Size:256 Owner:0x1c8a +0 +Seg:4f19 Size:256 Owner:0x1c8c +0 +Seg:5019 Size:256 Owner:0x1c8e +0 +Seg:5119 Size:256 Owner:0x1c90 +0 +Seg:5219 Size:256 Owner:0x1c92 +0 +Seg:5319 Size:256 Owner:0x1c94 +0 +Seg:5419 Size:256 Owner:0x1c96 +0 +Seg:5519 Size:256 Owner:0x1c98 +0 +Seg:5619 Size:256 Owner:0x1c9a +0 +Seg:5719 Size:256 Owner:0x1c9c +0 +Seg:5819 Size:256 Owner:0x1c9e +0 +Seg:5919 Size:256 Owner:0x1ca0 +0 +Seg:5a19 Size:256 Owner:0x1ca2 +0 +Seg:5b19 Size:256 Owner:0x1ca4 +0 +Seg:5c19 Size:256 Owner:0x1ca6 +0 +Seg:5d19 Size:256 Owner:0x1ca8 +0 +Seg:5e19 Size:256 Owner:0x1caa +0 +Seg:5f19 Size:256 Owner:0x1cac +0 +Seg:6019 Size:256 Owner:0x1cae +0 +Seg:6119 Size:256 Owner:0x1cb0 +0 +Seg:6219 Size:256 Owner:0x1cb2 +0 +Seg:6319 Size:256 Owner:0x1cb4 +0 +Seg:6419 Size:256 Owner:0x1cb6 +0 +Seg:6519 Size:256 Owner:0x1cb8 +0 +Seg:6619 Size:256 Owner:0x1cba +0 +Seg:6719 Size:256 Owner:0x1cbc +0 +Seg:6819 Size:256 Owner:0x1cbe +0 +Seg:6919 Size:256 Owner:0x1cc0 +0 +Seg:6a19 Size:256 Owner:0x1cc2 +0 +Seg:6b19 Size:256 Owner:0x1cc4 +0 +Seg:6c19 Size:256 Owner:0x1cc6 +0 +Seg:6d19 Size:256 Owner:0x1cc8 +0 +Seg:6e19 Size:256 Owner:0x1cca +0 +Seg:6f19 Size:256 Owner:0x1ccc +0 +Seg:7019 Size:256 Owner:0x1cce +0 +Seg:7119 Size:256 Owner:0x1cd0 +0 +Seg:7219 Size:256 Owner:0x1cd2 +0 +Seg:7319 Size:256 Owner:0x1cd4 +0 +Seg:7419 Size:256 Owner:0x1cd6 +0 +Seg:7519 Size:256 Owner:0x1cd8 +0 +Seg:7619 Size:256 Owner:0x1cda +0 +Seg:7719 Size:256 Owner:0x1cdc +0 +Seg:7819 Size:256 Owner:0x1cde +0 +Seg:7919 Size:256 Owner:0x1ce0 +0 +Seg:7a19 Size:256 Owner:0x1ce2 +0 +Seg:7b19 Size:256 Owner:0x1ce4 +0 +Seg:7c19 Size:256 Owner:0x1ce6 +0 +Seg:7d19 Size:256 Owner:0x1ce8 +0 +Seg:7e19 Size:256 Owner:0x1cea +0 +Seg:7f19 Size:256 Owner:0x1cec +0 +Seg:8019 Size:256 Owner:0x1cee +0 +Seg:8119 Size:256 Owner:0x1cf0 +0 +Seg:8219 Size:256 Owner:0x1cf2 +0 +Seg:8319 Size:256 Owner:0x1cf4 +0 +Seg:8419 Size:256 Owner:0x1cf6 +0 +Seg:8519 Size:256 Owner:0x1cf8 +0 +Seg:8619 Size:273 Owner:0x5dfc +00000000000000000000000000000000000000000000000000000000000000000000000000 +Seg:9e04 Size:25083 Owner:0x0 + \ No newline at end of file diff --git a/HEAP.16W b/HEAP.16W new file mode 100755 index 00000000..f2513717 --- /dev/null +++ b/HEAP.16W @@ -0,0 +1,39 @@ + + == near == + + USED block at 120e:e726 of size 12 + USED block at 120e:e732 of size 322 + USED block at 120e:e874 of size 52 + USED block at 120e:e8a8 of size 20 + USED block at 120e:e8bc of size 20 + USED block at 120e:e8d0 of size 20 + USED block at 120e:e8e4 of size 20 + USED block at 120e:e8f8 of size 20 + FREE block at 120e:e90c of size 5872 +OK - end of heap + + == far == + + USED block at 220f:0016 of size 136 + FREE block at 220f:009e of size 48840 + USED block at 220f:bf66 of size 20 + FREE block at 220f:bf7a of size 16514 + FREE block at 3210:0016 of size 65510 + FREE block at 4211:0016 of size 65510 + FREE block at 5212:0016 of size 65510 + FREE block at 6213:0016 of size 65510 + FREE block at 7214:0016 of size 65510 + FREE block at 8215:0016 of size 65510 + FREE block at 9216:0016 of size 49174 +OK - end of heap + +Memory Type Total Used Free +---------------- -------- -------- -------- +Near 6358 486 5872 +Far 48992 156 48836 +---------------- -------- -------- -------- +HC_coreleft = 5870 +HC_farcoreleft = 513440 +coreleft = 5870 +farcoreleft = 513440 +stackavail = 31495 diff --git a/MMDUMP.16W b/MMDUMP.16W new file mode 100755 index 0000000000000000000000000000000000000000..87b2a62ffa07676416f3ccaa5a9a7df5b7a7cfa8 GIT binary patch literal 2222 zcmZwJt4%~f06}@ z>CNDox6oVYE%X+83%!-zN^hmN(p%}R^j3N+y^Y>RZ=<)-+vsidHhLSq zo!(Awr?=DF>FxA(dON*?-a+r6chEcN9rO-*2fdTtN$;e0(mUy$^iFywy^G#O@1l3n syXal?E_xTeo8C?Drgzi3>D}~hdN;j?-b3%9_t1ObP3!#1-u}Mi2XimR(*OVf literal 0 HcmV?d00001 diff --git a/make-lowercase b/make-lowercase new file mode 100755 index 00000000..2cd4e2a2 --- /dev/null +++ b/make-lowercase @@ -0,0 +1,63 @@ +#!/usr/bin/perl +my $top=`pwd`; chomp $top; + +sub vfat_rename($$) { + my $from,$to; + ($from,$to) = @_; + + # uppercase DOS names with the vfat driver need some forceful convincing + # to actually make them lowercase + rename($from,"$to.xxx.xx"); + rename("$to.xxx.xx",$to); +} + +sub scan($) { + my $old = `pwd`; chomp $old; + my $cur = shift @_; + my @x; + + print "scanning $cur\n"; + chdir($cur) || die; + + opendir(X,".") || return; + while (my $name = readdir(X)) { + next unless -f $name; + my $n = lc($name); + next if $n eq $name; + print "$name\n"; + rename($name,$n) || die; + vfat_rename($name,$n); + } + closedir(X); + + opendir(X,".") || return; + while (my $name = readdir(X)) { + next if $name =~ m/^\.+$/; + next if $name eq ".git"; + next if $name eq ".GIT"; + next unless -d $name; + my $n = lc($name); + next if $n eq $name; + print "$name\n"; + rename($name,$n) || die; + vfat_rename($name,$n); + } + closedir(X); + + opendir(X,".") || return; + while (my $name = readdir(X)) { + next if $name =~ m/^\.+$/; + next if $name eq ".git"; + next if $name eq ".GIT"; + next unless -d $name; + push(@x,$name); + } + closedir(X); + foreach my $name (@x) { + scan("$cur/$name"); + } + + chdir($old) || die; +} + +scan($top); diff --git a/makefile b/makefile index 85561385..82edd300 100755 --- a/makefile +++ b/makefile @@ -115,7 +115,7 @@ WCLQ=-zq UPXQ=-qqq # symbolic debug for wsample/wprof/wd -D_FLAGS=-d1+ +D_FLAGS=-d2#1+ # stacksize STKSIZ=32768 diff --git a/src/util/shbat/runtest.bat b/src/util/shbat/runtest.bat index e39cf78c..7441000e 100755 --- a/src/util/shbat/runtest.bat +++ b/src/util/shbat/runtest.bat @@ -1,3 +1,3 @@ @echo off -wsample -b=31 xcroll.exe %* +wsample -b=4 xcroll.exe %* wprof xcroll.smp -- 2.39.2