[PATCH v2] Limit binary dump bytes in .properties output

[BALATON Zoltan]

Some device trees can contain large chunks of binary data that result
in .properties output to get lost in the dump of all binary bytes. Put
an upper limit of the bytes dumped.

Signed-off-by: BALATON Zoltan 
---
 forth/admin/devices.fs | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/forth/admin/devices.fs b/forth/admin/devices.fs
index 38f6ad6..7397047 100644
--- a/forth/admin/devices.fs
+++ b/forth/admin/devices.fs
@@ -307,15 +307,17 @@

: .p-bytes? ( data len -- 1 | data len 0 )
   ." -- " dup . ." : "
-  swap >r 0
+  swap >r dup 100 min dup 0
   begin 2dup > while
     dup r@ + c@
     ( len n ch )

2 0.r space
     1+
-  repeat 
-  2drop r> drop 1
+  repeat
+  2drop
+  > if ." ..." then
+  r> drop 1
 ;

\ this function tries to heuristically determine the data format