mirror of
https://github.com/genodelabs/genode.git
synced 2024-12-25 00:11:07 +00:00
bebbc87c3a
Use "depot_user" TCL procedure may be used in run scripts for tests not related to downloading specific packages. Fix #3170
227 lines
6.2 KiB
Plaintext
227 lines
6.2 KiB
Plaintext
if { ![have_spec foc] && ![have_spec nova] &&
|
|
![have_spec okl4] && ![have_spec sel4] } {
|
|
puts "Run script is not supported on this platform"
|
|
exit 0
|
|
}
|
|
|
|
# there are no drivers_interactive packages for every platform yet
|
|
if { ![have_spec pbxa9] && ![have_spec x86] } {
|
|
puts "Run script is not supported on this platform"
|
|
exit 0
|
|
}
|
|
|
|
create_boot_directory
|
|
|
|
import_from_depot [depot_user]/src/[base_src] \
|
|
[depot_user]/pkg/[drivers_interactive_pkg] \
|
|
[depot_user]/pkg/terminal \
|
|
[depot_user]/src/init \
|
|
[depot_user]/src/noux \
|
|
[depot_user]/src/posix \
|
|
[depot_user]/src/ram_fs \
|
|
[depot_user]/src/log_terminal \
|
|
[depot_user]/src/ncurses \
|
|
[depot_user]/src/bash-minimal \
|
|
[depot_user]/src/vim-minimal \
|
|
[depot_user]/src/coreutils-minimal
|
|
|
|
|
|
set build_components { server/fs_log server/cpu_sampler test/cpu_sampler }
|
|
|
|
if {[have_spec foc] || [have_spec nova]} {
|
|
lappend build_components lib/cpu_sampler_platform-$::env(KERNEL)
|
|
} else {
|
|
lappend build_components lib/cpu_sampler_platform-generic
|
|
}
|
|
|
|
#
|
|
# Build Noux packages only once
|
|
#
|
|
foreach pkg {diffutils} {
|
|
lappend_if [expr ![file exists bin/$pkg]] build_components noux-pkg/$pkg }
|
|
|
|
build $build_components
|
|
|
|
# write default vimrc file
|
|
set vimrc_fd [open "bin/vimrc" w]
|
|
puts $vimrc_fd {
|
|
set noloadplugins
|
|
set hls
|
|
set nocompatible
|
|
set laststatus=2
|
|
set noswapfile
|
|
set viminfo=}
|
|
close $vimrc_fd
|
|
|
|
append config {
|
|
<config verbose="yes">
|
|
<parent-provides>
|
|
<service name="ROM"/>
|
|
<service name="LOG"/>
|
|
<service name="RM"/>
|
|
<service name="CPU"/>
|
|
<service name="PD"/>
|
|
<service name="IRQ"/>
|
|
<service name="IO_PORT"/>
|
|
<service name="IO_MEM"/>
|
|
</parent-provides>
|
|
<default-route>
|
|
<any-service> <parent/> <any-child/> </any-service>
|
|
</default-route>
|
|
<default caps="100"/>
|
|
<start name="timer">
|
|
<resource name="RAM" quantum="1M"/>
|
|
<provides><service name="Timer"/></provides>
|
|
</start>}
|
|
|
|
append_if [get_cmd_switch --autopilot] config {
|
|
<start name="terminal">
|
|
<binary name="log_terminal"/>
|
|
<resource name="RAM" quantum="1M"/>
|
|
<provides><service name="Terminal"/></provides>
|
|
</start>}
|
|
|
|
append_if [expr ![get_cmd_switch --autopilot]] config {
|
|
<start name="drivers" caps="1000">
|
|
<resource name="RAM" quantum="32M" constrain_phys="yes"/>
|
|
<binary name="init"/>
|
|
<route>
|
|
<service name="ROM" label="config"> <parent label="drivers.config"/> </service>
|
|
<service name="Timer"> <child name="timer"/> </service>
|
|
<any-service> <parent/> </any-service>
|
|
</route>
|
|
<provides>
|
|
<service name="Input"/> <service name="Framebuffer"/>
|
|
</provides>
|
|
</start>
|
|
|
|
<start name="terminal">
|
|
<resource name="RAM" quantum="2M"/>
|
|
<provides><service name="Terminal"/></provides>
|
|
<route>
|
|
<service name="ROM" label="config"> <parent label="terminal.config"/> </service>
|
|
<any-service> <parent/> <any-child/> </any-service>
|
|
</route>
|
|
</start>}
|
|
|
|
append config {
|
|
<start name="ram_fs">
|
|
<resource name="RAM" quantum="10M"/>
|
|
<provides><service name="File_system"/></provides>
|
|
<config>
|
|
<content>
|
|
<dir name="home">
|
|
<inline name=".bashrc"> }
|
|
append_if [get_cmd_switch --autopilot] config {
|
|
FILE=/samples/cpu_sampler/samples/test-cpu_sampler/ep.*.log
|
|
while true; do if [ -e $FILE ]; then cat $FILE; fi; done }
|
|
append_if [expr ![get_cmd_switch --autopilot]] config {
|
|
echo "The sample data will appear in the /samples directory" }
|
|
append config {
|
|
</inline>
|
|
</dir>
|
|
<dir name="samples"/>
|
|
<dir name="tmp"/>
|
|
</content>
|
|
<!-- constrain sessions according to their labels -->
|
|
<policy label_prefix="fs_log" root="/samples" writeable="yes" />
|
|
<policy label="noux -> home" root="/home" writeable="yes" />
|
|
<policy label="noux -> samples" root="/samples" />
|
|
<policy label="noux -> tmp" root="/tmp" writeable="yes" />
|
|
</config>
|
|
</start>
|
|
|
|
<start name="fs_log">
|
|
<resource name="RAM" quantum="2M"/>
|
|
<provides><service name="LOG"/></provides>
|
|
<config>
|
|
<policy label="cpu_sampler" merge="true"/>
|
|
</config>
|
|
</start>
|
|
|
|
<start name="cpu_sampler">
|
|
<resource name="RAM" quantum="4M"/>
|
|
<provides>
|
|
<service name="CPU"/>
|
|
</provides>
|
|
<config sample_interval_ms="1000" sample_duration_s="10">
|
|
<policy label_prefix="test-cpu_sampler ->" />
|
|
</config>
|
|
<route>
|
|
<service name="LOG" label_prefix="samples"> <child name="fs_log"/> </service>
|
|
<any-service> <parent/> <any-child/> </any-service>
|
|
</route>
|
|
</start>
|
|
|
|
<start name="test-cpu_sampler">
|
|
<resource name="RAM" quantum="1M"/>
|
|
<config ld_verbose="yes"/>
|
|
<route>
|
|
<service name="CPU"> <child name="cpu_sampler"/> </service>
|
|
<any-service> <parent/> </any-service>
|
|
</route>
|
|
</start>
|
|
|
|
<start name="noux" caps="500">
|
|
<resource name="RAM" quantum="16M" />
|
|
<config>
|
|
<fstab>
|
|
<tar name="coreutils-minimal.tar" />
|
|
<tar name="vim-minimal.tar" />
|
|
<tar name="diffutils.tar" />
|
|
<tar name="bash-minimal.tar" />
|
|
|
|
<dir name="dev"> <zero/> <null/> </dir>
|
|
|
|
<dir name="home"> <fs label="home" /> </dir>
|
|
<dir name="samples"> <fs label="samples" /> </dir>
|
|
<dir name="tmp"> <fs label="tmp" /> </dir>
|
|
<dir name="share"> <dir name="vim"> <rom name="vimrc"/> </dir> </dir>
|
|
</fstab>
|
|
<start name="/bin/bash">
|
|
<env name="TERM" value="screen" />
|
|
<env name="HOME" value="/home" />
|
|
</start>
|
|
</config>
|
|
<route>
|
|
<service name="Terminal"> <child name="terminal"/> </service>
|
|
<any-service> <parent/> <any-child/> </any-service>
|
|
</route>
|
|
</start>
|
|
</config> }
|
|
|
|
install_config $config
|
|
|
|
#
|
|
# Boot modules
|
|
#
|
|
|
|
# evaluated by the run tool
|
|
proc binary_name_cpu_sampler_platform_lib_so { } {
|
|
if {[have_spec foc] || [have_spec nova]} {
|
|
return "cpu_sampler_platform-$::env(KERNEL).lib.so"
|
|
} else {
|
|
return "cpu_sampler_platform-generic.lib.so"
|
|
}
|
|
}
|
|
|
|
build_boot_image {
|
|
diffutils.tar vimrc
|
|
fs_log cpu_sampler cpu_sampler_platform.lib.so test-cpu_sampler
|
|
}
|
|
|
|
if { ![get_cmd_switch --autopilot] } { run_genode_until forever }
|
|
|
|
# autopilot test
|
|
|
|
append qemu_args " -nographic "
|
|
|
|
set match_string "Test started. func: 0x(\[0-9a-f\]+).*\n"
|
|
|
|
run_genode_until "$match_string" 120
|
|
|
|
regexp $match_string $output all func
|
|
|
|
run_genode_until "\\\[init -> terminal] \[0\]*$func" 90 [output_spawn_id]
|
|
|