Browse Source
• update dhall-genode revision • render top-level init config with lib.renderDhallInit • convert Init.Start.config to optionals • lib.validate renderDhallInit XML20.02
6 changed files with 119 additions and 89 deletions
@ -1,24 +1,33 @@
|
||||
let Genode = env:DHALL_GENODE |
||||
|
||||
in λ(_ : {}) |
||||
→ { test-libc = |
||||
Genode.Init.Start::{ |
||||
, binary = "test-libc" |
||||
, resources = { caps = 200, ram = Genode.units.MiB 400 } |
||||
, routes = [ Genode.ServiceRoute.parent "Timer" ] |
||||
, config = |
||||
Genode.Prelude.XML.text |
||||
'' |
||||
<config> |
||||
<vfs> |
||||
<dir name="dev"> |
||||
<log/> |
||||
<inline name="rtc">2019-08-20 15:01</inline> |
||||
</dir> |
||||
</vfs> |
||||
<libc stdout="/dev/log" stderr="/dev/log" rtc="/dev/rtc"/> |
||||
</config> |
||||
'' |
||||
in λ ( _ |
||||
: {} |
||||
) |
||||
→ Genode.Init::{ |
||||
, verbose = True |
||||
, children = |
||||
toMap |
||||
{ test-libc = |
||||
Genode.Init.Start::{ |
||||
, binary = "test-libc" |
||||
, resources = { caps = 200, ram = Genode.units.MiB 400 } |
||||
, routes = [ Genode.ServiceRoute.parent "Timer" ] |
||||
, config = |
||||
Some |
||||
( Genode.Prelude.XML.text |
||||
'' |
||||
<config> |
||||
<vfs> |
||||
<dir name="dev"> |
||||
<log/> |
||||
<inline name="rtc">2019-08-20 15:01</inline> |
||||
</dir> |
||||
</vfs> |
||||
<libc stdout="/dev/log" stderr="/dev/log" rtc="/dev/rtc"/> |
||||
</config> |
||||
'' |
||||
) |
||||
} |
||||
: Genode.Init.Start.Type |
||||
} |
||||
: Genode.Init.Start.Type |
||||
} |
||||
|
@ -1,3 +1,8 @@
|
||||
let Genode = env:DHALL_GENODE ? ../dhall-genode/package.dhall |
||||
|
||||
in λ(_ : {}) → { test-log = Genode.Init.Start::{ binary = "test-log" } } |
||||
in λ(_ : {}) |
||||
→ Genode.Init::{ |
||||
, verbose = True |
||||
, children = |
||||
toMap { test-log = Genode.Init.Start::{ binary = "test-log" } } |
||||
} |
||||
|
@ -1,11 +1,16 @@
|
||||
let Genode = env:DHALL_GENODE ? ../dhall-genode/package.dhall |
||||
|
||||
in λ(_ : {}) |
||||
→ { test-signal = |
||||
Genode.Init.Start::{ |
||||
, binary = "test-signal" |
||||
, resources = { caps = 500, ram = Genode.units.MiB 10 } |
||||
, routes = [ Genode.ServiceRoute.parent "Timer" ] |
||||
→ Genode.Init::{ |
||||
, verbose = True |
||||
, children = |
||||
toMap |
||||
{ test-signal = |
||||
Genode.Init.Start::{ |
||||
, binary = "test-signal" |
||||
, resources = { caps = 500, ram = Genode.units.MiB 10 } |
||||
, routes = [ Genode.ServiceRoute.parent "Timer" ] |
||||
} |
||||
: Genode.Init.Start.Type |
||||
} |
||||
: Genode.Init.Start.Type |
||||
} |
||||
|
Loading…
Reference in new issue