mirror of
https://github.com/urbit/bedrock.git
synced 2024-11-27 04:44:01 +03:00
Remove /mar dependencies we don't need to boot
This commit is contained in:
bonbud-macryg
parent
b9c6a9f7ad
commit
246e1d4e42
@ -1,14 +0,0 @@
|
||||
::
|
||||
:::: /mar/acme/order/hoon
|
||||
::
|
||||
|_ a=(set (list @t))
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun a
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun (set (list @t))
|
||||
--
|
||||
--
|
||||
@ -1,18 +0,0 @@
|
||||
/- api-store
|
||||
:: /+ lib=api-store
|
||||
::
|
||||
|_ act=action:api-store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
:: ++ json (action:enjs act)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action:api-store
|
||||
:: ++ json action:dejs:lib
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,26 +0,0 @@
|
||||
/- api-store
|
||||
:: /+ lib=api-store
|
||||
::
|
||||
|_ =store-conf:api-store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun store-conf
|
||||
++ json
|
||||
%-
|
||||
|= creds=store-conf:api-store
|
||||
^- ^json
|
||||
%- pairs:enjs:format
|
||||
:~ ['buckets' a+(turn ~(tap in buckets.creds) |=(t=@t s+t))]
|
||||
['currentBucket' s+current-bucket.creds]
|
||||
['region' s+region.creds]
|
||||
==
|
||||
store-conf
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun store-conf:api-store
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,23 +0,0 @@
|
||||
/- api-store
|
||||
:: /+ lib=api-store
|
||||
::
|
||||
|_ creds=store-results:api-store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun creds
|
||||
++ json
|
||||
^- ^json
|
||||
%- pairs:enjs:format
|
||||
:~ ['endpoint' s+endpoint.creds]
|
||||
['accessKeyId' s+access-key-id.creds]
|
||||
['secretAccessKey' s+secret-access-key.creds]
|
||||
==
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun store-results:api-store
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,12 +0,0 @@
|
||||
/- *aquarium
|
||||
|_ af=aqua-effect
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun af
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun aqua-effect
|
||||
--
|
||||
--
|
||||
@ -1,18 +0,0 @@
|
||||
::
|
||||
:::: /hoon/atom/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
:::: A minimal atom mark
|
||||
::
|
||||
=, mimes:html
|
||||
|_ ato=@
|
||||
++ grab |%
|
||||
++ noun @
|
||||
++ mime |=([* p=octs] q.p)
|
||||
--
|
||||
++ grow |%
|
||||
++ mime [/application/x-urb-unknown (as-octs ato)]
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,20 +0,0 @@
|
||||
:: /app/azimuth state snapshot
|
||||
::
|
||||
/- *dice
|
||||
::
|
||||
|_ snap=snap-state
|
||||
++ grab
|
||||
|%
|
||||
++ noun snap-state
|
||||
++ mime
|
||||
|= [mite =octs]
|
||||
(noun (cue q.octs))
|
||||
--
|
||||
::
|
||||
++ grow
|
||||
|%
|
||||
++ mime
|
||||
[/application/octet-stream (as-octs:mimes:html (jam snap))]
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,14 +0,0 @@
|
||||
/+ azimuth
|
||||
::
|
||||
|_ upd=update:azimuth
|
||||
::
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun upd
|
||||
--
|
||||
++ grab :: convert from
|
||||
|%
|
||||
++ noun update:azimuth :: from %noun
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/+ *bazaar
|
||||
::
|
||||
|_ act=action
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
++ json (action:enjs act)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action
|
||||
++ json action:dejs
|
||||
--
|
||||
--
|
||||
@ -1,14 +0,0 @@
|
||||
/+ *bazaar
|
||||
::
|
||||
|_ act=interaction
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun interaction
|
||||
--
|
||||
--
|
||||
@ -1,15 +0,0 @@
|
||||
/+ *bazaar
|
||||
::
|
||||
|_ rct=reaction
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun rct
|
||||
++ json (reaction:enjs rct)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun reaction
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- store=bazaar-store
|
||||
/+ *bazaar
|
||||
::
|
||||
|_ vi=view:store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun vi
|
||||
++ json (view:enjs vi)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun view:store
|
||||
--
|
||||
--
|
||||
@ -1,20 +0,0 @@
|
||||
:: belt: runtime belt structure
|
||||
::
|
||||
/+ dill
|
||||
::
|
||||
|_ =belt:dill
|
||||
++ grad %noun
|
||||
:: +grab: convert from
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun belt:dill
|
||||
++ json belt:dejs:dill
|
||||
--
|
||||
:: +grow: convert to
|
||||
::
|
||||
++ grow
|
||||
|%
|
||||
++ noun belt
|
||||
--
|
||||
--
|
||||
@ -1,20 +0,0 @@
|
||||
:: blit: runtime blit structure
|
||||
::
|
||||
/+ dill
|
||||
::
|
||||
|_ =blit:dill
|
||||
++ grad %noun
|
||||
:: +grab: convert from
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun blit:dill
|
||||
--
|
||||
:: +grow: convert to
|
||||
::
|
||||
++ grow
|
||||
|%
|
||||
++ noun blit
|
||||
++ json (blit:enjs:dill blit)
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/+ *bulletin
|
||||
::
|
||||
|_ act=action
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
++ json (action:enjs act)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action:store
|
||||
++ json action:dejs
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- store=bulletin
|
||||
/+ *bulletin
|
||||
::
|
||||
|_ rct=reaction:store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun rct
|
||||
++ json (reaction:enjs rct)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun reaction:store
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=chat-db
|
||||
/+ lib=chat-db
|
||||
::
|
||||
|_ =chat-vent:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun chat-vent
|
||||
++ json (en-vent:encode:lib chat-vent)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun chat-vent:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/+ *realm-chat
|
||||
::
|
||||
|_ act=action
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
:: ++ json (action:enjs act)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action
|
||||
++ json action:dejs
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/- chat-db
|
||||
/+ db-lib=chat-db
|
||||
::
|
||||
|_ act=action:chat-db
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action:chat-db
|
||||
++ json action:dejs:db-lib
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,16 +0,0 @@
|
||||
/- chat-db
|
||||
/+ db-lib=chat-db
|
||||
::
|
||||
|_ db=db-change:chat-db
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun db
|
||||
++ json (db-change:enjs:db-lib db)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun db-change:chat-db
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- chat-db
|
||||
/+ db-lib=chat-db
|
||||
::
|
||||
|_ db=db-dump:chat-db
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun db
|
||||
++ json (db-dump:enjs:db-lib db)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun db-dump:chat-db
|
||||
--
|
||||
--
|
||||
@ -1,18 +0,0 @@
|
||||
/- sur=chat-db
|
||||
/+ db-lib=chat-db
|
||||
::
|
||||
|_ m=message:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun m
|
||||
++ json
|
||||
a+(turn m |=(mp=msg-part:sur (messages-row:encode:db-lib [msg-id.mp msg-part-id.mp] mp)))
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun message:sur
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=chat-db
|
||||
/+ db-lib=chat-db
|
||||
::
|
||||
|_ log=del-log:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun log
|
||||
++ json (del-log:encode:db-lib log)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun del-log:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=chat-db
|
||||
/+ db-lib=chat-db
|
||||
::
|
||||
|_ tbl=messages-table:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun tbl
|
||||
++ json (messages-table:enjs:db-lib tbl)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun messages-table:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=realm-chat
|
||||
/+ lib=realm-chat
|
||||
::
|
||||
|_ =mutes:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun mutes
|
||||
++ json (paths:encode:lib mutes)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun mutes:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=chat-db
|
||||
/+ db-lib=chat-db
|
||||
::
|
||||
|_ r=path-row:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun r
|
||||
++ json (path-row:enjs:db-lib r)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun path-row:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=realm-chat
|
||||
/+ lib=realm-chat
|
||||
::
|
||||
|_ =pins:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun pins
|
||||
++ json (paths:encode:lib pins)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun pins:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=realm-chat
|
||||
/+ lib=realm-chat
|
||||
::
|
||||
|_ s=[push-enabled=? msg-preview-notif=?]
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun s
|
||||
++ json (settings:encode:lib s)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun [push-enabled=? msg-preview-notif=?]
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/+ *contact-store
|
||||
::
|
||||
|_ upd=update
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun upd
|
||||
++ contact-update upd
|
||||
++ json (update:enjs upd)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun update
|
||||
++ json update:dejs
|
||||
--
|
||||
--
|
||||
@ -1,2 +0,0 @@
|
||||
/= mark /mar/flag
|
||||
mark
|
||||
@ -1,2 +0,0 @@
|
||||
/= mark /mar/flag
|
||||
mark
|
||||
@ -1,15 +0,0 @@
|
||||
/+ *contact-store
|
||||
::
|
||||
|_ share=[%share =ship]
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun share
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
+$ noun [%share ship]
|
||||
++ json share:share-dejs
|
||||
--
|
||||
--
|
||||
@ -1,2 +0,0 @@
|
||||
/= mark /mar/ship
|
||||
mark
|
||||
@ -1,2 +0,0 @@
|
||||
/= mark /mar/ship
|
||||
mark
|
||||
@ -1,17 +0,0 @@
|
||||
/+ *contact-store
|
||||
::
|
||||
|_ upd=update
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun upd
|
||||
++ contact-update upd
|
||||
++ json (update:enjs upd)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun update
|
||||
++ json update:dejs
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/+ *contact-store
|
||||
::
|
||||
|_ upd=update
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun upd
|
||||
++ contact-update-0 upd
|
||||
++ json (update:enjs upd)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun update
|
||||
++ json update:dejs
|
||||
--
|
||||
--
|
||||
25
mar/css.hoon
25
mar/css.hoon
@ -1,25 +0,0 @@
|
||||
::
|
||||
:::: /hoon/css/mar
|
||||
::
|
||||
/? 310
|
||||
=, eyre
|
||||
=, mimes:html
|
||||
|_ mud=@t
|
||||
++ grow :: convert to
|
||||
|%
|
||||
++ mime [/text/css (as-octs mud)] :: convert to %mime
|
||||
++ hymn :: convert to %hymn
|
||||
|^ html
|
||||
++ style ;style
|
||||
;- (trip mud)
|
||||
==
|
||||
++ html ;html:(head:"{style}" body)
|
||||
--
|
||||
--
|
||||
++ grab
|
||||
|% :: convert from
|
||||
++ mime |=([p=mite q=octs] (@t q.q))
|
||||
++ noun @t :: clam from %noun
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,18 +0,0 @@
|
||||
/- db
|
||||
/+ lib=db
|
||||
::
|
||||
|_ act=action:db
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
:: ++ json (action:enjs act)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action:db
|
||||
++ json action:dejs:lib
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=db
|
||||
/+ lib=db
|
||||
::
|
||||
|_ changes=db-changes:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun changes
|
||||
++ json (en-db-changes:enjs:lib changes)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun db-changes:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=db
|
||||
/+ lib=db
|
||||
::
|
||||
|_ p=fullpath:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun p
|
||||
++ json (en-fullpath:enjs:lib p)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun fullpath:sur
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/- sur=db, common
|
||||
/+ lib=db
|
||||
::
|
||||
|_ r=[=row:sur =schemas:sur]
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun r
|
||||
++ json (en-row:enjs:lib row.r schemas.r)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun [=row:sur =schemas:sur]
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=db
|
||||
/+ lib=db
|
||||
::
|
||||
|_ st=versioned-state:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun st
|
||||
++ json (state:enjs:lib st)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun versioned-state:sur
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/- sur=db, common
|
||||
/+ lib=db
|
||||
::
|
||||
|_ tbl=[=type:common pt=pathed-table:sur =schemas:sur]
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun tbl
|
||||
++ json (en-table:enjs:lib type.tbl pt.tbl schemas.tbl)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun [=type:common pt=pathed-table:sur =schemas:sur]
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=db
|
||||
/+ lib=db
|
||||
::
|
||||
|_ =vent:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun vent
|
||||
++ json (en-vent:enjs:lib vent)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun vent:sur
|
||||
--
|
||||
--
|
||||
@ -1,65 +0,0 @@
|
||||
::
|
||||
:::: /hoon/belt/dill/mar
|
||||
::
|
||||
/? 310
|
||||
/- kyev, sole
|
||||
::
|
||||
::::
|
||||
::
|
||||
=, sole
|
||||
|_ dill-belt:dill
|
||||
::
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun +<.grow
|
||||
--
|
||||
++ grab :: convert from
|
||||
|%
|
||||
++ json
|
||||
=< (cork . kyev)
|
||||
|= jon=^json ^- ^kyev
|
||||
!!
|
||||
:: %- need
|
||||
:: %. jon => jo %- ot
|
||||
:: :~ mod+(cu silt (ar (su (perk ~[%ctrl %shift %alt %meta]))))
|
||||
:: :- %key
|
||||
:: %+ cu |*(a=$%([%str @t] [%act @]) ?+(-.a a %str +.a))
|
||||
:: =- (of [str+so act+(su (perk -)) ~])
|
||||
:: :~ %ctrl %shift %alt %meta %entr %esc %caps %uncap
|
||||
:: %pgup %pgdn %home %end %baxp %del %ins
|
||||
:: %up %down %left %right
|
||||
:: == ==
|
||||
++ kyev
|
||||
|= kev=^kyev ^- dill-belt:dill
|
||||
~| dill-belt-incomplete+kev
|
||||
?: ?=([%act ?(%ctrl %shift %alt %meta)] q.kev)
|
||||
[%txt ~] :: ignore
|
||||
=+ mod=(~(del in p.kev) %shift)
|
||||
?^ mod
|
||||
?^ q.kev !! :: only accept strings
|
||||
=. q.kev
|
||||
?. (~(has in p.kev) %ctrl)
|
||||
q.kev
|
||||
(con 96 q.kev) :: ctrl key decoding
|
||||
=+ cha=(tuba (trip q.kev))
|
||||
?> ?=([@ ~] cha) :: of a single character
|
||||
?+ mod !! :: modified by one buckykey
|
||||
[%ctrl ~ ~] [%mod %ctl i.cha]
|
||||
[%alt ~ ~] [%mod %met i.cha]
|
||||
==
|
||||
?@ q.kev
|
||||
[%txt (tuba (trip q.kev))]
|
||||
?+ +.q.kev !!
|
||||
%del [%del ~]
|
||||
%baxp [%bac ~]
|
||||
%entr [%ret ~]
|
||||
%up [%aro %u]
|
||||
%down [%aro %d]
|
||||
%left [%aro %l]
|
||||
%right [%aro %r]
|
||||
== :: %yow, %rez?
|
||||
::
|
||||
++ noun dill-belt:dill :: clam from %noun
|
||||
--
|
||||
--
|
||||
@ -1,29 +0,0 @@
|
||||
::
|
||||
:::: /hoon/blit/dill/mar
|
||||
::
|
||||
/? 310
|
||||
/- sole
|
||||
=, sole
|
||||
=, enjs:format
|
||||
|_ dib=dill-blit:dill
|
||||
++ grad %noun
|
||||
::
|
||||
++ grab :: convert from
|
||||
|%
|
||||
++ noun dill-blit:dill :: clam from %noun
|
||||
--
|
||||
++ grow
|
||||
|%
|
||||
++ noun dib
|
||||
++ json
|
||||
^- ^json
|
||||
?+ -.dib ~|(unsupported-blit+-.dib !!)
|
||||
%mor [%a (turn p.dib |=(a=dill-blit:dill json(dib a)))]
|
||||
%hop %+ frond %hop
|
||||
?@ p.dib (numb p.dib)
|
||||
(pairs 'x'^(numb x.p.dib) 'y'^(numb y.p.dib) ~)
|
||||
%put (frond -.dib (tape (tufa p.dib)))
|
||||
?(%bel %clr) (frond %act %s -.dib)
|
||||
==
|
||||
--
|
||||
--
|
||||
@ -1,12 +0,0 @@
|
||||
/- *dns
|
||||
|_ address
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun +<.grow
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun address
|
||||
--
|
||||
--
|
||||
@ -1,12 +0,0 @@
|
||||
/- *dns
|
||||
|_ binding
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun +<.grow
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun binding
|
||||
--
|
||||
--
|
||||
@ -1,21 +0,0 @@
|
||||
/- *dns
|
||||
|_ [ship binding]
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun +<.grow
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
+$ noun [ship binding]
|
||||
++ json
|
||||
=, dejs:format
|
||||
|= jon=json
|
||||
%. jon
|
||||
%- ot
|
||||
:~ [%ship |=(j=json ?>(?=([%s *] j) (rash +.j fed:ag)))]
|
||||
[%address |=(j=json ?>(?=([%s *] j) [%if (rash +.j ip4:eyre)]))]
|
||||
[%turf (ar so)]
|
||||
==
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- *dns
|
||||
|_ r=request
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ json
|
||||
%- pairs:enjs:format
|
||||
:~ ['ship' (ship:enjs:format ship.r)]
|
||||
['address' s+(rsh 3 (scot %if +.address.r))]
|
||||
==
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun request
|
||||
--
|
||||
--
|
||||
@ -1,25 +0,0 @@
|
||||
/+ dock=docket
|
||||
|_ =docket:dock
|
||||
++ grow
|
||||
|%
|
||||
++ mime
|
||||
^- ^mime
|
||||
[/text/x-docket (as-octt:mimes:html (spit-docket:mime:dock docket))]
|
||||
++ noun docket
|
||||
++ json (docket:enjs:dock docket)
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
::
|
||||
++ mime
|
||||
|= [=mite len=@ud tex=@]
|
||||
^- docket:dock
|
||||
%- need
|
||||
%- from-clauses:mime:dock
|
||||
!<((list clause:dock) (slap !>(~) (ream tex)))
|
||||
|
||||
::
|
||||
++ noun docket:dock
|
||||
--
|
||||
++ grad %noun
|
||||
--
|
||||
@ -1,15 +0,0 @@
|
||||
:: %drum-put: download into host system
|
||||
::
|
||||
/? 310
|
||||
|_ [path $@(@ [@ta @])]
|
||||
::
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun +<.grow
|
||||
--
|
||||
++ grab :: convert from
|
||||
|%
|
||||
+$ noun [path $@(@ [@ta @])] :: clam from %noun
|
||||
--
|
||||
--
|
||||
@ -1,12 +0,0 @@
|
||||
/- *eth-watcher
|
||||
|_ poke
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun +<.grow
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun poke
|
||||
--
|
||||
--
|
||||
@ -1,20 +0,0 @@
|
||||
:: list of ethereum logs
|
||||
::
|
||||
/+ ethereum
|
||||
::
|
||||
|_ logs=(list event-log:rpc:ethereum)
|
||||
++ grab
|
||||
|%
|
||||
++ noun (list event-log:rpc:ethereum)
|
||||
++ mime
|
||||
|= [mite =octs]
|
||||
(noun (cue q.octs))
|
||||
--
|
||||
::
|
||||
++ grow
|
||||
|%
|
||||
++ mime
|
||||
[/application/x-ethereum-logs (as-octs:mimes:html (jam logs))]
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,70 +0,0 @@
|
||||
:: list of ethereum transactions
|
||||
::
|
||||
/+ *ethereum
|
||||
=, format
|
||||
=, rpc
|
||||
=, mimes:html
|
||||
::
|
||||
|_ txs=(list transaction)
|
||||
++ u-parser
|
||||
%- cook :_ nuck:so
|
||||
|= =coin
|
||||
?> ?=(%$ -.coin)
|
||||
?> ?=(%u (end 3 p.p.coin))
|
||||
`@`q.p.coin
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ mime
|
||||
|= (pair mite octs)
|
||||
=/ wan=wain (to-wain q.q)
|
||||
?> ?=(^ wan)
|
||||
%+ murn t.wan
|
||||
|= tx=@t
|
||||
^- (unit transaction)
|
||||
?: =('' tx)
|
||||
~
|
||||
:- ~
|
||||
%+ rash tx
|
||||
;~ (glue com)
|
||||
u-parser
|
||||
u-parser
|
||||
u-parser
|
||||
;~(pfix (jest '0x') hex)
|
||||
u-parser
|
||||
;~(pfix (jest '0x') hex)
|
||||
u-parser
|
||||
==
|
||||
++ noun (list transaction)
|
||||
--
|
||||
::
|
||||
++ grow
|
||||
=> v=.
|
||||
|%
|
||||
++ mime
|
||||
=> v
|
||||
:- /text/plain
|
||||
%- as-octs %- of-wain
|
||||
=- (weld - '' ~)
|
||||
:- 'nonce,gas-price,gas,to,value,data,chain-id'
|
||||
%+ turn txs
|
||||
|= transaction
|
||||
^- @t
|
||||
%+ rap 3
|
||||
:~ (scot %ui nonce)
|
||||
','
|
||||
(scot %ui gas-price)
|
||||
','
|
||||
(scot %ui gas)
|
||||
','
|
||||
(crip (address-to-hex to))
|
||||
','
|
||||
(scot %ui value)
|
||||
','
|
||||
(crip (prefix-hex (render-hex-bytes (max 1 (met 3 data)) `@`data)))
|
||||
','
|
||||
(scot %ux chain-id)
|
||||
==
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/+ *friends
|
||||
::
|
||||
|_ act=action
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
++ json (action:enjs act)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action
|
||||
++ json action:dejs
|
||||
--
|
||||
--
|
||||
@ -1,15 +0,0 @@
|
||||
/+ *friends
|
||||
::
|
||||
|_ rct=reaction
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun rct
|
||||
++ json (reaction:enjs rct)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun reaction
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- store=friends
|
||||
/+ *friends
|
||||
::
|
||||
|_ view=view:store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun view
|
||||
++ json view:enjs
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun view:store
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/- store=groups
|
||||
/+ *groups
|
||||
|
||||
::
|
||||
|_ view=view:store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun view
|
||||
++ json (view:enjs view)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun view:store
|
||||
--
|
||||
--
|
||||
@ -1,20 +0,0 @@
|
||||
::
|
||||
:::: /hoon/helm-hi/mar
|
||||
::
|
||||
/? 310
|
||||
=, mimes:html
|
||||
=, format
|
||||
|_ txt=cord
|
||||
::
|
||||
++ grad %noun
|
||||
++ grab :: convert from
|
||||
|%
|
||||
++ noun @t :: clam from %noun
|
||||
++ json so:dejs
|
||||
--
|
||||
++ grow
|
||||
|%
|
||||
++ psal ;div: {(trip txt)}
|
||||
++ mime [text+/plain (as-octs txt)]
|
||||
--
|
||||
--
|
||||
@ -1,12 +0,0 @@
|
||||
|_ mun=ship
|
||||
::
|
||||
++ grad %noun
|
||||
++ grab
|
||||
|%
|
||||
++ noun ship
|
||||
--
|
||||
++ grow
|
||||
|%
|
||||
++ noun mun
|
||||
--
|
||||
--
|
||||
@ -1,46 +0,0 @@
|
||||
:: task: herm task for passthrough to dill
|
||||
::
|
||||
/- herm
|
||||
/+ dill
|
||||
::
|
||||
|_ =task:herm
|
||||
++ grad %noun
|
||||
:: +grab: convert from
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun task:herm
|
||||
::
|
||||
++ json
|
||||
|= jon=^json
|
||||
^+ task
|
||||
~| jon
|
||||
?> ?=([%o *] jon)
|
||||
=+ ses=(~(got by p.jon) 'session')
|
||||
?> ?=([%s *] ses)
|
||||
:- ?: =('' p.ses) %$
|
||||
(slav %tas p.ses)
|
||||
=. p.jon (~(del by p.jon) 'session')
|
||||
%. jon
|
||||
=, dejs:format
|
||||
|^ task
|
||||
++ task
|
||||
%- of
|
||||
:~ belt+belt:dejs:^dill
|
||||
blew+(ot 'w'^ni 'h'^ni ~)
|
||||
hail+ul
|
||||
open+(ot 'term'^(se %tas) 'apps'^(ar gill) ~)
|
||||
shut+ul
|
||||
==
|
||||
::
|
||||
++ gill
|
||||
(ot 'who'^(se %p) 'app'^(se %tas) ~)
|
||||
--
|
||||
--
|
||||
:: +grow: convert to
|
||||
::
|
||||
++ grow
|
||||
|%
|
||||
++ noun task
|
||||
--
|
||||
--
|
||||
@ -1,36 +0,0 @@
|
||||
:::: /hoon/hoon/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
=, eyre
|
||||
|_ own=@t
|
||||
::
|
||||
++ grow :: convert to
|
||||
|%
|
||||
++ mime `^mime`[/text/x-hoon (as-octs:mimes:html own)] :: convert to %mime
|
||||
++ hymn
|
||||
;html
|
||||
;head
|
||||
;title:"Source"
|
||||
;script@"//cdnjs.cloudflare.com/ajax/libs/codemirror/4.3.0/codemirror.js";
|
||||
;script@"/lib/syntax/hoon.js";
|
||||
;link(rel "stylesheet", href "//cdnjs.cloudflare.com/ajax/libs/".
|
||||
"codemirror/4.3.0/codemirror.min.css");
|
||||
;link/"/lib/syntax/codemirror.css"(rel "stylesheet");
|
||||
==
|
||||
;body
|
||||
;textarea#src:"{(trip own)}"
|
||||
;script:'CodeMirror.fromTextArea(src, {lineNumbers:true, readOnly:true})'
|
||||
==
|
||||
==
|
||||
++ txt
|
||||
(to-wain:format own)
|
||||
--
|
||||
++ grab
|
||||
|% :: convert from
|
||||
++ mime |=([p=mite q=octs] q.q)
|
||||
++ noun @t :: clam from %noun
|
||||
++ txt of-wain:format
|
||||
--
|
||||
++ grad %txt
|
||||
--
|
||||
@ -1,6 +0,0 @@
|
||||
::
|
||||
:::: /hoon/htm/mar
|
||||
::
|
||||
/? 310
|
||||
/= htm /mar/html
|
||||
htm
|
||||
@ -1,22 +0,0 @@
|
||||
::
|
||||
:::: /hoon/html/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
:::: compute
|
||||
::
|
||||
=, html
|
||||
|_ htm=@t
|
||||
++ grow :: convert to
|
||||
^?
|
||||
|% ::
|
||||
++ mime [/text/html (met 3 htm) htm] :: to %mime
|
||||
++ hymn (need (de-xml htm)) :: to %hymn
|
||||
-- ::
|
||||
++ grab ^?
|
||||
|% :: convert from
|
||||
++ noun @t :: clam from %noun
|
||||
++ mime |=([p=mite q=octs] q.q) :: retrieve form %mime
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,24 +0,0 @@
|
||||
::
|
||||
:::: /hoon/httr/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
=, eyre
|
||||
=, format
|
||||
|_ hit=httr
|
||||
++ grad %noun
|
||||
++ grow |% ++ wall (turn wain trip)
|
||||
++ wain (to-wain cord)
|
||||
++ json (need (de:json:html cord))
|
||||
++ cord q:octs
|
||||
++ noun hit
|
||||
++ octs
|
||||
~| hit
|
||||
?> =(2 (div p.hit 100))
|
||||
(need r.hit)
|
||||
--
|
||||
++ grab :: convert from
|
||||
|%
|
||||
++ noun httr :: clam from %noun
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
::
|
||||
:::: /hoon/hymn/mar
|
||||
::
|
||||
/? 310
|
||||
=, mimes:html
|
||||
=, html
|
||||
|_ own=manx
|
||||
::
|
||||
++ grad %noun
|
||||
++ grow :: convert to
|
||||
|%
|
||||
++ html (crip (en-xml own)) :: convert to %html
|
||||
++ mime [/text/html (as-octs html)] :: convert to %mime
|
||||
--
|
||||
++ grab |% :: convert from
|
||||
++ noun manx :: clam from %noun
|
||||
-- --
|
||||
12
mar/ico.hoon
12
mar/ico.hoon
@ -1,12 +0,0 @@
|
||||
|_ dat=@
|
||||
++ grow
|
||||
|%
|
||||
++ mime [/image/x-icon (as-octs:mimes:html dat)]
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ mime |=([p=mite q=octs] q.q)
|
||||
++ noun @
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
17
mar/jam.hoon
17
mar/jam.hoon
@ -1,17 +0,0 @@
|
||||
::
|
||||
:::: /hoon/jam/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
=, mimes:html
|
||||
|_ mud=@
|
||||
++ grow
|
||||
|%
|
||||
++ mime [/application/x-urb-jam (as-octs mud)]
|
||||
--
|
||||
++ grab
|
||||
|% :: convert from
|
||||
++ noun @ :: clam from %noun
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
25
mar/js.hoon
25
mar/js.hoon
@ -1,25 +0,0 @@
|
||||
::
|
||||
:::: /hoon/js/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
=, eyre
|
||||
|_ mud=@
|
||||
++ grow
|
||||
|%
|
||||
++ mime [/application/javascript (as-octs:mimes:html (@t mud))]
|
||||
++ hymn :: convert to %hymn
|
||||
|^ html
|
||||
++ script ;script
|
||||
;- (trip (@t mud))
|
||||
==
|
||||
++ html ;html:(head:"{script}" body)
|
||||
--
|
||||
--
|
||||
++ grab
|
||||
|% :: convert from
|
||||
++ mime |=([p=mite q=octs] (@t q.q))
|
||||
++ noun cord :: clam from %noun
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,26 +0,0 @@
|
||||
::
|
||||
:::: /hoon/json/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
:::: compute
|
||||
::
|
||||
=, eyre
|
||||
=, format
|
||||
=, html
|
||||
|_ jon=^json
|
||||
::
|
||||
++ grow :: convert to
|
||||
|%
|
||||
++ mime [/application/json (as-octs:mimes -:txt)] :: convert to %mime
|
||||
++ txt [(en:json jon)]~
|
||||
--
|
||||
++ grab
|
||||
|% :: convert from
|
||||
++ mime |=([p=mite q=octs] (fall (de:json (@t q.q)) *^json))
|
||||
++ noun ^json :: clam from %noun
|
||||
++ numb numb:enjs
|
||||
++ time time:enjs
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,42 +0,0 @@
|
||||
::
|
||||
/- *json-rpc
|
||||
::
|
||||
|_ res=response
|
||||
::
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun res
|
||||
--
|
||||
++ grab :: convert from
|
||||
|%
|
||||
++ noun response :: from noun
|
||||
++ httr :: from httr
|
||||
|= hit=httr:eyre
|
||||
^- response
|
||||
~| hit
|
||||
?: ?=(%2 (div p.hit 100))
|
||||
%- json
|
||||
?~ r.hit
|
||||
a+~
|
||||
(need (de:json:html q:u.r.hit))
|
||||
fail+hit
|
||||
++ json :: from json
|
||||
=, dejs-soft:format
|
||||
|= a=json
|
||||
^- response
|
||||
=; dere
|
||||
=+ res=((ar dere) a)
|
||||
?~ res (need (dere a))
|
||||
[%batch u.res]
|
||||
|= a=json
|
||||
^- (unit response)
|
||||
=/ res=(unit [@t json])
|
||||
::TODO breaks when no id present
|
||||
((ot id+so result+some ~) a)
|
||||
?^ res `[%result u.res]
|
||||
~| a
|
||||
:+ ~ %error %- need
|
||||
((ot id+so error+(ot code+no message+so ~) ~) a)
|
||||
--
|
||||
--
|
||||
@ -1,28 +0,0 @@
|
||||
|_ kal=waft:clay
|
||||
++ grow
|
||||
|%
|
||||
++ mime `^mime`[/text/x-kelvin (as-octs:mimes:html hoon)]
|
||||
++ noun kal
|
||||
++ hoon
|
||||
%+ rap 3
|
||||
%+ turn
|
||||
%+ sort
|
||||
~(tap in (waft-to-wefts:clay kal))
|
||||
|= [a=weft b=weft]
|
||||
?: =(lal.a lal.b)
|
||||
(gte num.a num.b)
|
||||
(gte lal.a lal.b)
|
||||
|= =weft
|
||||
(rap 3 '[%' (scot %tas lal.weft) ' ' (scot %ud num.weft) ']\0a' ~)
|
||||
::
|
||||
++ txt (to-wain:format hoon)
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun waft:clay
|
||||
++ mime
|
||||
|= [=mite len=@ud tex=@]
|
||||
(cord-to-waft:clay tex)
|
||||
--
|
||||
++ grad %noun
|
||||
--
|
||||
@ -1,13 +0,0 @@
|
||||
|_ ~
|
||||
++ grad %noun
|
||||
++ grab
|
||||
|%
|
||||
++ noun ,~
|
||||
++ json ul:dejs:format
|
||||
--
|
||||
++ grow
|
||||
|%
|
||||
++ noun ~
|
||||
++ json ~
|
||||
--
|
||||
--
|
||||
@ -1,29 +0,0 @@
|
||||
|%
|
||||
+$ install
|
||||
[local=term =ship =desk]
|
||||
--
|
||||
|_ inst=install
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun inst
|
||||
++ json
|
||||
%- pairs:enjs:format
|
||||
:~ local+s+local.inst
|
||||
desk+s+desk.inst
|
||||
ship+s+(scot %p ship.inst)
|
||||
==
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun install
|
||||
++ json
|
||||
^- $-(^json install)
|
||||
=, dejs:format
|
||||
%- ot
|
||||
:~ local+so
|
||||
ship+(su ;~(pfix sig fed:ag))
|
||||
desk+so
|
||||
==
|
||||
--
|
||||
--
|
||||
@ -1,13 +0,0 @@
|
||||
|_ =desk
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun desk
|
||||
++ json s+desk
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun ^desk
|
||||
++ json so:dejs:format
|
||||
--
|
||||
--
|
||||
@ -1,24 +0,0 @@
|
||||
/- h=hood
|
||||
|_ =pikes:h
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun pikes
|
||||
++ json
|
||||
=, enjs:format
|
||||
%- pairs
|
||||
%+ turn ~(tap by pikes)
|
||||
|= [=desk =pike:h]
|
||||
:- desk
|
||||
%- pairs
|
||||
:~ sync/?~(sync.pike ~ =,(u.sync.pike (pairs ship/s/(scot %p ship) desk/s/desk ~)))
|
||||
hash/s/(scot %uv hash.pike)
|
||||
zest/s/zest.pike
|
||||
wefts/a/(turn ~(tap in wic.pike) weft:enjs:h)
|
||||
==
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun pikes:h
|
||||
--
|
||||
--
|
||||
@ -1,13 +0,0 @@
|
||||
|_ =desk
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun desk
|
||||
++ json s+desk
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun ^desk
|
||||
++ json so:dejs:format
|
||||
--
|
||||
--
|
||||
@ -1,13 +0,0 @@
|
||||
|_ =desk
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun desk
|
||||
++ json s+desk
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun ^desk
|
||||
++ json so:dejs:format
|
||||
--
|
||||
--
|
||||
@ -1,13 +0,0 @@
|
||||
|_ =desk
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun desk
|
||||
++ json s+desk
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun ^desk
|
||||
++ json so:dejs:format
|
||||
--
|
||||
--
|
||||
@ -1,29 +0,0 @@
|
||||
|%
|
||||
+$ sync
|
||||
[local=term =ship =desk]
|
||||
--
|
||||
|_ s=sync
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun s
|
||||
++ json
|
||||
%- pairs:enjs:format
|
||||
:~ local+s+local.s
|
||||
desk+s+desk.s
|
||||
ship+s+(scot %p ship.s)
|
||||
==
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun sync
|
||||
++ json
|
||||
^- $-(^json sync)
|
||||
=, dejs:format
|
||||
%- ot
|
||||
:~ local+so
|
||||
ship+(su ;~(pfix sig fed:ag))
|
||||
desk+so
|
||||
==
|
||||
--
|
||||
--
|
||||
@ -1,13 +0,0 @@
|
||||
|_ =desk
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun desk
|
||||
++ json s+desk
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun ^desk
|
||||
++ json so:dejs:format
|
||||
--
|
||||
--
|
||||
@ -1,29 +0,0 @@
|
||||
|%
|
||||
+$ unsync
|
||||
[local=term =ship =desk]
|
||||
--
|
||||
|_ usyc=unsync
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun usyc
|
||||
++ json
|
||||
%- pairs:enjs:format
|
||||
:~ local+s+local.usyc
|
||||
desk+s+desk.usyc
|
||||
ship+s+(scot %p ship.usyc)
|
||||
==
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun unsync
|
||||
++ json
|
||||
^- $-(^json unsync)
|
||||
=, dejs:format
|
||||
%- ot
|
||||
:~ local+so
|
||||
ship+(su ;~(pfix sig fed:ag))
|
||||
desk+so
|
||||
==
|
||||
--
|
||||
--
|
||||
@ -1,18 +0,0 @@
|
||||
/- *language-server
|
||||
/+ lsp-json=language-server-json
|
||||
|_ not=all:notification
|
||||
++ grad %noun
|
||||
++ grab
|
||||
|%
|
||||
++ noun all:notification
|
||||
++ json
|
||||
|= jon=^json
|
||||
(notification:dejs:lsp-json jon)
|
||||
--
|
||||
++ grow
|
||||
|%
|
||||
++ noun not
|
||||
++ json
|
||||
(notification:enjs:lsp-json not)
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- *language-server
|
||||
/+ lsp-json=language-server-json
|
||||
|_ req=all:request
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun req
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun all:request
|
||||
++ json
|
||||
|= jon=^json
|
||||
(request:dejs:lsp-json jon)
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/- *language-server
|
||||
/+ lsp=language-server-json
|
||||
|_ res=all:response
|
||||
::
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun res
|
||||
++ json (response:enjs:lsp res)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun all:response
|
||||
--
|
||||
::
|
||||
--
|
||||
@ -1,72 +0,0 @@
|
||||
/- lens
|
||||
|_ com=command:lens
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun com
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun command:lens
|
||||
++ json
|
||||
|= jon=^json
|
||||
^- command:lens
|
||||
~| jon=jon
|
||||
%- need
|
||||
%. jon
|
||||
=< %- ot :~
|
||||
source+source
|
||||
sink+sink
|
||||
==
|
||||
=, dejs-soft:format
|
||||
|%
|
||||
++ source
|
||||
^- $-(^^json (unit source:lens))
|
||||
|= jon=^^json
|
||||
=+ tuple=%.(jon (ar source))
|
||||
?^ tuple
|
||||
`[%tuple u.tuple]
|
||||
%. jon
|
||||
%- of :~
|
||||
data+so
|
||||
dojo+so
|
||||
clay+so
|
||||
url+(su auri:de-purl:html)
|
||||
api+(su ;~(plug sym ;~(pfix col prn)))
|
||||
:- %get-api
|
||||
%- su
|
||||
;~ plug
|
||||
sym
|
||||
;~(pfix col (more fas (cook crip (star ;~(less fas prn)))))
|
||||
==
|
||||
listen-api+(su ;~(plug sym ;~(pfix col sym)))
|
||||
export+so
|
||||
import+(ot app+so base64-jam+so ~)
|
||||
export-all+none
|
||||
import-all+(ot base64-jam+so ~)
|
||||
as+(ot mark+(su sym) next+source ~)
|
||||
hoon+(ot code+so next+source ~)
|
||||
cancel+none
|
||||
==
|
||||
++ none |=(^^json (some ~))
|
||||
++ sink
|
||||
^- $-(^^json (unit sink:lens))
|
||||
%- of :~
|
||||
stdout+none
|
||||
output-file+so
|
||||
output-pill+so
|
||||
output-clay+(su (easy /sentinel/path))
|
||||
url+(su auri:de-purl:html)
|
||||
to-api+(su ;~(plug sym ;~(pfix col prn)))
|
||||
:- %send-api
|
||||
%- su
|
||||
;~ plug
|
||||
sym
|
||||
;~(pfix col (more fas (cook crip (star ;~(less fas prn)))))
|
||||
==
|
||||
command+so
|
||||
app+(su sym)
|
||||
==
|
||||
--
|
||||
--
|
||||
--
|
||||
@ -1,12 +0,0 @@
|
||||
|_ loob=?
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun loob
|
||||
++ json b+loob
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun ?
|
||||
--
|
||||
--
|
||||
18
mar/map.hoon
18
mar/map.hoon
@ -1,18 +0,0 @@
|
||||
::
|
||||
:::: /hoon/map/mar
|
||||
:: Mark for js source maps
|
||||
/? 310
|
||||
::
|
||||
=, eyre
|
||||
|_ mud=@
|
||||
++ grow
|
||||
|%
|
||||
++ mime [/application/octet-stream (as-octs:mimes:html (@t mud))]
|
||||
--
|
||||
++ grab
|
||||
|% :: convert from
|
||||
++ mime |=([p=mite q=octs] (@t q.q))
|
||||
++ noun cord :: clam from %noun
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
20
mar/md.hoon
20
mar/md.hoon
@ -1,20 +0,0 @@
|
||||
::
|
||||
:::: /hoon/md/mar
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
=, format
|
||||
=, mimes:html
|
||||
|_ txt=wain
|
||||
::
|
||||
++ grab :: convert from
|
||||
|%
|
||||
++ mime |=((pair mite octs) (to-wain q.q))
|
||||
++ noun wain :: clam from %noun
|
||||
--
|
||||
++ grow
|
||||
|%
|
||||
++ mime [/text/plain (as-octs (of-wain txt))]
|
||||
--
|
||||
++ grad %mime
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- store=membership
|
||||
/+ *membership
|
||||
::
|
||||
|_ view=view:store
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun view
|
||||
++ json (view:enjs view)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun view:store
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- notif-db
|
||||
/+ db-lib=notif-db
|
||||
::
|
||||
|_ db=db-change:notif-db
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun db
|
||||
++ json (db-change:enjs:db-lib db)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun db-change:notif-db
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- notif-db
|
||||
/+ db-lib=notif-db
|
||||
::
|
||||
|_ act=action:notif-db
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action:notif-db
|
||||
++ json action:dejs:db-lib
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=notif-db
|
||||
/+ db-lib=notif-db
|
||||
::
|
||||
|_ log=del-log:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun log
|
||||
++ json (del-log:encode:db-lib log)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun del-log:sur
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=notif-db
|
||||
/+ db-lib=notif-db
|
||||
::
|
||||
|_ db=(list notif-row:sur)
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun db
|
||||
++ json (rows:enjs:db-lib db)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun (list notif-row:sur)
|
||||
--
|
||||
--
|
||||
@ -1,16 +0,0 @@
|
||||
/- sur=realm-chat
|
||||
/+ lib=realm-chat
|
||||
::
|
||||
|_ ds=devices:sur
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun ds
|
||||
++ json (en-devices:encode:lib ds)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun devices:sur
|
||||
--
|
||||
--
|
||||
@ -1,22 +0,0 @@
|
||||
::
|
||||
:::: /hoon/noun/mar
|
||||
::
|
||||
/? 310
|
||||
!:
|
||||
:::: A minimal noun mark
|
||||
|_ non=*
|
||||
++ grab |%
|
||||
++ noun *
|
||||
--
|
||||
++ grow |%
|
||||
++ mime [/application/x-urb-jam (as-octs:mimes:html (jam non))]
|
||||
--
|
||||
++ grad
|
||||
|%
|
||||
++ form %noun
|
||||
++ diff |=(* +<)
|
||||
++ pact |=(* +<)
|
||||
++ join |=([* *] *(unit *))
|
||||
++ mash |=([[ship desk *] [ship desk *]] `*`~|(%noun-mash !!))
|
||||
--
|
||||
--
|
||||
@ -1,17 +0,0 @@
|
||||
/- common
|
||||
/+ lib=passport
|
||||
::
|
||||
|_ p=passport:common
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun p
|
||||
++ json (en-passport:enjs:lib p)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun passport:common
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,18 +0,0 @@
|
||||
/- passport
|
||||
/+ lib=passport
|
||||
::
|
||||
|_ act=action:passport
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun act
|
||||
:: ++ json (action:enjs act)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun action:passport
|
||||
++ json action:dejs:lib
|
||||
--
|
||||
--
|
||||
|
||||
@ -1,16 +0,0 @@
|
||||
/- common
|
||||
/+ lib=passport
|
||||
::
|
||||
|_ c=(list contact:common)
|
||||
++ grad %noun
|
||||
++ grow
|
||||
|%
|
||||
++ noun c
|
||||
++ json a+(turn c en-contact:enjs:lib)
|
||||
--
|
||||
::
|
||||
++ grab
|
||||
|%
|
||||
++ noun (list contact:common)
|
||||
--
|
||||
--
|
||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user