diff --git a/src/server/testsuite/lyskomd.0/01.exp b/src/server/testsuite/lyskomd.0/01.exp
new file mode 100644
index 0000000000000000000000000000000000000000..ed1209630e27ccc80c23950e80c962c059593ad1
--- /dev/null
+++ b/src/server/testsuite/lyskomd.0/01.exp
@@ -0,0 +1,89 @@
+# Check return values for a lot of functions.
+
+lyskomd_start
+
+client_start 0
+talk_to client 0
+send "A\n"
+send "[holl "DejaGnu test suite"]\n"
+simple_expect "LysKOM" "connected"
+
+send "1000 62 5 [holl "bogus"] 0\n"
+simple_expect "%1000 4 5"
+
+send "1001 62 4 [holl "nono"] 0\n"
+simple_expect "%1001 10 4"
+
+send "1002 62 6 [holl "nono"] 0\n"
+simple_expect "%1002 10 6"
+
+send "1003 62 60 [holl "nono"] 0\n"
+simple_expect "%1003 10 60"
+
+send "1004 62 0 [holl "zero"] 0\n"
+simple_expect "%1004 8 0"
+
+# Turn of async messages
+send "1005 80 0 { }\n"
+simple_expect "=1005"
+
+# Test that most calls fail when the user isn't logged in.
+
+# 0:login-old may succeed
+# 1:logout always succeeds
+send "1006 1\n"
+simple_expect "=1006"
+# 2:change-conference
+send "1007 2 4\n"
+simple_expect "%1007 6 0"
+# 3:change-name
+send "1008 3 1 [holl "new name"]\n"
+simple_expect "%1008 6 0"
+# 4:change-what-i-am-doing
+send "1009 4 [holl "testing lyskomd"]\n"
+simple_expect "=1009"
+# 5:create-person-old
+send "1010 5 [holl "new person"] [holl "mypasswd"]\n"
+simple_expect "=1010 6"
+send "1011 1\n"
+simple_expect "=1011"
+# 6:get-person-stat-old
+send "1012 6 6 1\n"
+simple_expect "%1012 6 0"
+# 7:set-priv-bits
+send "1013 7 6 0000000000000000\n"
+simple_expect "%1013 6 0"
+# 8:set-passwd
+send "1014 8 5 [holl "old"] [holl "new"]\n"
+simple_expect "%1014 6 0"
+# 9:query-read-texts-old
+send "1015 9 6 6\n"
+simple_expect "=1015 $any_time 6 255 0 0 \\*"
+
+
+# Log in
+send "1016 62 5 [holl "gazonk"] 0\n"
+simple_expect "=1016"
+
+send "1017 9 5 5\n"
+simple_expect "=1017 $any_time 5 255 0 0 \\*"
+
+send "1018 27 5 0 { }\n"
+simple_expect "=1018"
+
+send "1019 9 5 5\n"
+simple_expect "=1019 $any_time 5 255 0 0 \\*"
+
+send "1020 6 6 1\n"
+simple_expect "=1020 [holl "DejaGnu test suite.unknown.@localhost"] 0000010000000000 00000000 $any_time 0 0 1 0 0 0 0 0 0 1 0 0 1"
+send "1021 6 6 0\n"
+simple_expect "=1021 0H 0000010000000000 00000000 $any_time 0 0 1 0 0 0 0 0 0 1 0 0 1"
+
+talk_to client 0
+
+send "1022 42 255\n"
+simple_expect "=1022" "42=enable succeeded"
+send "1023 44 0\n"
+simple_expect "=1023" "44=shutdown-kom succeeded"
+client_death 0
+lyskomd_death