pintos-os.org Git - pintos-anon/blob - src/tests/userprog/rox-multichild.ck

   1 # -*- perl -*-
   2 use strict;
   3 use warnings;
   4 use tests::tests;
   5 check_expected ([<<'EOF']);
   6 (rox-multichild) begin
   7 (rox-multichild) open "child-rox"
   8 (rox-multichild) read "child-rox"
   9 (rox-multichild) write "child-rox"
  10 (rox-multichild) exec "child-rox 5"
  11 (child-rox) begin
  12 (child-rox) try to write "child-rox"
  13 (child-rox) exec "child-rox 4"
  14 (child-rox) begin
  15 (child-rox) try to write "child-rox"
  16 (child-rox) exec "child-rox 3"
  17 (child-rox) begin
  18 (child-rox) try to write "child-rox"
  19 (child-rox) exec "child-rox 2"
  20 (child-rox) begin
  21 (child-rox) try to write "child-rox"
  22 (child-rox) exec "child-rox 1"
  23 (child-rox) begin
  24 (child-rox) try to write "child-rox"
  25 (child-rox) try to write "child-rox"
  26 (child-rox) end
  27 child-rox: exit(12)
  28 (child-rox) try to write "child-rox"
  29 (child-rox) end
  30 child-rox: exit(12)
  31 (child-rox) try to write "child-rox"
  32 (child-rox) end
  33 child-rox: exit(12)
  34 (child-rox) try to write "child-rox"
  35 (child-rox) end
  36 child-rox: exit(12)
  37 (child-rox) try to write "child-rox"
  38 (child-rox) end
  39 child-rox: exit(12)
  40 (rox-multichild) write "child-rox"
  41 (rox-multichild) end
  42 rox-multichild: exit(0)
  43 EOF
  44 pass;