mirror of
https://github.com/urbit/shrub.git
synced 2024-12-02 08:55:07 +03:00
Merge remote-tracking branch 'ohaitch/lus-help'
Add +help scaffolding to dojo generators
This commit is contained in:
Raymond Pasco
commit
b11f924b4e
@ -1,5 +1,6 @@
|
||||
:: Set admin users
|
||||
::
|
||||
:::: /hoon/release/hood/gen
|
||||
:::: /hoon/admins/ask/gen
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Pretty-printing util, should be in lib/
|
||||
::
|
||||
:::: /hoon/pretty/cat/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Login code for web UI
|
||||
::
|
||||
:::: /hoon/code/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Make HTTP request(get only)
|
||||
::
|
||||
:::: /hoon/curl-hiss/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Fetch contents at url
|
||||
::
|
||||
:::: /hoon/curl/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Direct :curl to fetch contents at url
|
||||
::
|
||||
:::: /hoon/url/curl/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: List [number] inbox messages XX may be broken
|
||||
::
|
||||
:::: /hoon/list/gmail/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Send e-mail via gmail API
|
||||
::
|
||||
:::: /hoon/send/gmail/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: "Hello world" sample generator
|
||||
::
|
||||
:::: /hoon/hello/gen
|
||||
::
|
||||
|
||||
64
gen/help.hoon
Normal file
64
gen/help.hoon
Normal file
@ -0,0 +1,64 @@
|
||||
:: List available comands
|
||||
::
|
||||
:::: /hoon/help/gen
|
||||
::
|
||||
/? 310
|
||||
!:
|
||||
::::
|
||||
::
|
||||
|%
|
||||
++ path-heps
|
||||
|= a/path ^- tape
|
||||
?~ a ""
|
||||
|- ^- tape
|
||||
%+ welp (trip i.a)
|
||||
?~ t.a ""
|
||||
['-' $(a t.a)]
|
||||
::
|
||||
++ rend
|
||||
|= {a/@thoon b/path} ^- tank
|
||||
=; c/(pair tape tape)
|
||||
=/ tab (sub 10 (mod (lent "{p.c} ") 10))
|
||||
[%palm [" {(reap tab ' ')}" ``~] leaf+p.c leaf+q.c ~]
|
||||
:- ?- b
|
||||
$~ "/" :: XX !! maybe?
|
||||
{$hood ^} "|{(path-heps t.b)}"
|
||||
^ "+{(path-heps b)}" :: XX deal with :talk|foo
|
||||
==
|
||||
=/ c (lore a)
|
||||
?~ c "~"
|
||||
?. =(':: ' (end 3 4 i.c))
|
||||
"<undocumented>"
|
||||
(trip i.c)
|
||||
::
|
||||
++ read-at
|
||||
|= {len/@u pax/path}
|
||||
|= {nam/@t ark/arch} ^- (unit {@t path})
|
||||
?. (~(has by dir.ark) %hoon) ~
|
||||
%+ bind (file (welp pax /[nam]/hoon))
|
||||
|= a/* ^- {cord path}
|
||||
[;;(@t a) (welp (slag len pax) /[nam])]
|
||||
--
|
||||
::
|
||||
:- %say
|
||||
|= {{now/time @ our/ship ^} typ/$@($~ {p/term $~}) $~}
|
||||
=/ pax/path /(scot %p our)/home/(scot %da now)/gen :: XX hardcoded
|
||||
=+ len=(lent pax)
|
||||
=. pax ?~(typ pax (welp pax /[p.typ]))
|
||||
:- %tang %- flop ^- tang
|
||||
=+ ark=.^(arch cy+pax)
|
||||
%+ welp
|
||||
?~ typ ~
|
||||
=/ red ((read-at len (scag len pax)) p.typ ark) :: XX ugly
|
||||
(drop (bind red rend))
|
||||
|- ^- tang
|
||||
=+ =< arl=(~(tap by (~(urn by dir.ark) .)))
|
||||
|=({a/@t $~} .^(arch cy+(welp pax /[a])))
|
||||
%+ welp
|
||||
=/ dir/(list {@ path})
|
||||
(murn arl (read-at len pax))
|
||||
`tang`(turn (sort dir aor) rend)
|
||||
%- zing ^- (list tang)
|
||||
%+ turn (sort arl aor)
|
||||
|= {a/@t b/arch}
|
||||
^$(pax (welp pax /[a]), ark b)
|
||||
@ -1,3 +1,4 @@
|
||||
:: Request a planet from Tlon Inc.
|
||||
::
|
||||
:::: /hoon/ask/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Disable/enable/toggle auto-reload of kernel components
|
||||
::
|
||||
:::: /hoon/autoload/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Redeem ticket to replace current urbit with full one XX DEPRECATED
|
||||
::
|
||||
:::: /hoon/begin/hood/gen
|
||||
::
|
||||
|
||||
@ -1,5 +1,6 @@
|
||||
:: Womb: add planets/stars to balance
|
||||
::
|
||||
:::: /hoon/reinvite/hood/gen
|
||||
:::: /hoon/bonus/hood/gen
|
||||
::
|
||||
/? 310
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Reload vane/s from /=base=
|
||||
::
|
||||
:::: /hoon/breload/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: cancel pending merge
|
||||
::
|
||||
:::: /hoon/cancel/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: use passcode to claim ship
|
||||
::
|
||||
:::: /hoon/claim/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: copy file in clay
|
||||
::
|
||||
:::: /hoon/cp/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: break arvo somehow?? XX unknown
|
||||
::
|
||||
:::: /hoon/deset/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Drum: ^D, quit urbit process
|
||||
::
|
||||
:::: /hoon/exit/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: send message to an urbit
|
||||
::
|
||||
:::: /hoon/hi/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: API: input basic auth credentials for domain
|
||||
::
|
||||
:::: /hoon/init-auth-basic/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: API: input oauth1 application credentials for domain
|
||||
::
|
||||
:::: /hoon/init-oauth1/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: API: input oauth2 application credentials for domain
|
||||
::
|
||||
:::: /hoon/init-oauth2/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: API: input auth2 client_secret_*.json for .googleapis.com
|
||||
::
|
||||
:::: /hoon/google/init-oauth2/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: allocate urbits to the holder of an email
|
||||
::
|
||||
:::: /hoon/invite/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: add label to current revision of desk
|
||||
::
|
||||
:::: /hoon/label/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Drum: Connect to a console-enabled app
|
||||
::
|
||||
:::: /hoon/link/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Hood, generic: load named hood component's state from backup
|
||||
::
|
||||
:::: /hoon/load/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: use old-@p private key to distribute recycled invites
|
||||
::
|
||||
:::: /hoon/manage-old-key/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: claim other ships' children XX remove in cc-release
|
||||
::
|
||||
:::: /hoon/manage/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: show memory usage by vane
|
||||
::
|
||||
:::: /hoon/mass/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: Merge local desk from (optionally-)foreign one
|
||||
::
|
||||
:::: /hoon/merge/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: Mount path to unix
|
||||
::
|
||||
:::: /hoon/mount/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: Move file in clay
|
||||
::
|
||||
:::: /hoon/mv/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: regularly clear %ford cache XX find relevant leak
|
||||
::
|
||||
:::: /hoon/overload/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Reload %clay
|
||||
::
|
||||
:::: /hoon/rc/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Reload %zuse and all vanes
|
||||
::
|
||||
:::: /hoon/reboot/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: Transfer urbits from existing invite XX add parameters
|
||||
::
|
||||
:::: /hoon/reinvite/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: cycle private key XX unimplemented
|
||||
::
|
||||
:::: /hoon/rekey/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: release specific ships for public claiming
|
||||
::
|
||||
:::: /hoon/release/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: release a nuber of ships for public claiming
|
||||
::
|
||||
:::: /hoon/release/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Reload vane/s from desk
|
||||
::
|
||||
:::: /hoon/reload-desk/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Reload vane/s
|
||||
::
|
||||
:::: /hoon/reload/hood/gen
|
||||
::
|
||||
|
||||
@ -1,5 +1,6 @@
|
||||
:: Womb: replay events from a future lost XX move to jael
|
||||
::
|
||||
:::: /hoon/reinvite/hood/gen
|
||||
:::: /hoon/replay-womb-log/hood/gen
|
||||
::
|
||||
/? 310
|
||||
/+ womb
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Reload hoon/hoon and all vanes
|
||||
::
|
||||
:::: /hoon/reset/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Helm: Reload %ford
|
||||
::
|
||||
:::: /hoon/rf/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: Remove file from clay
|
||||
::
|
||||
:::: /hoon/rm/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Hood, generic: save named hood component's state
|
||||
::
|
||||
:::: /hoon/save/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: add entry to a .sched XX belongs in Write
|
||||
::
|
||||
:::: /hoon/schedule/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Eyre: set web root
|
||||
::
|
||||
:::: /hoon/serve/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Drum: boot unstarted app
|
||||
::
|
||||
:::: /hoon/start/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: Continuously merge local desk from (optionally-)foreign one
|
||||
::
|
||||
:::: /hoon/sync/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: List active syncs
|
||||
::
|
||||
:::: /hoon/syncs/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: merge each version of remote desk? XX clarify
|
||||
::
|
||||
:::: /hoon/track/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Womb: move all contents of invite to new email
|
||||
::
|
||||
:::: /hoon/transfer/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Drum: disconnect from console app
|
||||
::
|
||||
:::: /hoon/unlink/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: Remove unix mount
|
||||
::
|
||||
:::: /hoon/unmount/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Kiln: Remove a sync
|
||||
::
|
||||
:::: /hoon/unsync/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Arvo: toggle "verbose mode" internal event tracing
|
||||
::
|
||||
:::: /hoon/verb/hood/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Filesystem iterator XX move to lib/
|
||||
::
|
||||
:::: /hoon/subdir/ls/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Generate random moon and corresponding ticket
|
||||
::
|
||||
:::: /hoon/moon/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Create a galactic generator and ames-ready fingerprint
|
||||
::
|
||||
:::: /hoon/pope/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Compile arvo as a pill noun, usage .urbit/pill +solid
|
||||
::
|
||||
:::: /hoon/solid/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Set upstream sources for channel
|
||||
::
|
||||
:::: /hoon/federate/talk/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Load channel messages from backup
|
||||
::
|
||||
:::: /hoon/load/talk/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Enable channel logging to clay
|
||||
::
|
||||
:::: /hoon/log/talk/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Save channel messages to backup
|
||||
::
|
||||
:::: /hoon/save/talk/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Disable channel logging to clay
|
||||
::
|
||||
:::: /hoon/unlog/talk/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: generate secret for starting a ship XX |ticket in cc-release
|
||||
::
|
||||
:::: /hoon/ticket/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,7 @@
|
||||
:: Send tweet from an account
|
||||
::
|
||||
:::: /hoon/as/twit/gen
|
||||
::
|
||||
/- twitter
|
||||
::
|
||||
::::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Inspect invite contents
|
||||
::
|
||||
:::: /hoon/balance/womb/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Inspect all invites
|
||||
::
|
||||
:::: /hoon/balance/womb/gen
|
||||
::
|
||||
|
||||
@ -1,3 +1,4 @@
|
||||
:: Browse random claimable ships
|
||||
::
|
||||
:::: /hoon/shop/womb/gen
|
||||
::
|
||||
|
||||
Loading…
Reference in New Issue
Block a user