ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 18:12:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

WIP: Dump so I can go fix 881.

Browse Source
This commit is contained in:
Elliot Glaysher 2018-11-13 11:12:59 -08:00
parent 9bb899308d
commit 6514925f87
2 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
sys/vane/jael.hoon
View File

@ -737,7 +737,7 @@
^- (list move)
:~ [hen %pass /(scot %p our)/init %b %wait +(now.sys)]
[hen %give %init our]
[hen %slip %e %init our]
[hen %slip %l %init our]
[hen %slip %d %init our]
[hen %slip %g %init our]
[hen %slip %c %init our]
@ -787,7 +787,7 @@
%+ weld moz
^- (list move)
:~ [hen %give %init our]
[hen %slip %e %init our]
[hen %slip %l %init our]
[hen %slip %d %init our]
[hen %slip %g %init our]
[hen %slip %c %init our]

13
sys/vane/light.hoon
View File

@ -163,6 +163,9 @@
:: internal authentication page
::
[%login-handler ~]
:: gall subscription system
::
[%subscriptions ~]
==
:: +authentication-state: state used in the login system
::
@ -406,6 +409,9 @@
::
%login-handler
(handle-request:authentication secure address http-request)
::
%subscriptions
[~ state]
==
:: +cancel-request: handles a request being externally aborted
::
@ -446,6 +452,11 @@
::
%login-handler
[~ state]
::
%subscriptions
:: todo: this part actually matters.
::
[~ state]
==
:: +return-static-data-on-duct: returns one piece of data all at once
::
@ -837,12 +848,14 @@
:: %init: tells us what our ship name is
::
%init
~& %light-born
::
=. ship.ax [~ our.task]
:: initial value for the login handler
::
=. bindings.server-state.ax
:~ [[~ /~/login] duct [%login-handler ~]]
[[~ /~/subscription] duct [%subscription ~]]
==
[~ light-gate]
:: %born: new unix process