Merge pull request #3441 from urbit/m/dbug-state-scry

dbug: attempt to scry for state

pkg/arvo/lib/dbug.hoon

@@ -41,9 +41,17 @@
     ::
         %state
       =?  grab.dbug  =('' grab.dbug)  '-'
-      =-  [(sell -)]~
+      =;  product=^vase
+        [(sell product)]~
+      =/  state=^vase
+        ::  if the underlying app has implemented a /dbug/state scry endpoint,
+        ::  use that vase in place of +on-save's.
+        ::
+        =/  result=(each ^vase tang)
+          (mule |.(q:(need (need (on-peek:ag /x/dbug/state)))))
+        ?:(?=(%& -.result) p.result on-save:ag)
       %+  slap
-        (slop on-save:ag !>([bowl=bowl ..zuse]))
+        (slop state !>([bowl=bowl ..zuse]))
       (ream grab.dbug)
     ::
         %incoming

pkg/arvo/lib/shoe.hoon

@@ -343,7 +343,11 @@
     =^  cards  shoe  (on-leave:og path)
     [(deal cards) this]
   ::
-  ++  on-peek  on-peek:og
+  ++  on-peek
+    |=  =path
+    ^-  (unit (unit cage))
+    ?.  =(/x/dbug/state path)  ~
+    ``noun+(slop on-save:og !>(shoe=state))
   ::
   ++  on-agent
     |=  [=wire =sign:agent:gall]