grep -q "$2" <<< $1
}
-# Post to a URL endpoint with optional JSON data
+# POST to a URL endpoint with optional JSON data
#
# Usage:
#
-# curl_post <ENDPOINT> [data]
+# curl_post <ENDPOINT> [data] [CURL_OPTIONS]
curl_post()
{
- $CURL -X POST ${2:+-H 'Content-Type: application/json' -d "$2"} $URL/$1
+ $CURL ${3:-} -X POST ${2:+-H 'Content-Type: application/json' -d "$2"} $URL/$1
}
-# Get form a URL endpoint
+# PUT to a URL endpoint with optional JSON data
#
# Usage:
#
-# curl_get <ENDPOINT>
+# curl_post <ENDPOINT> [data] [CURL_OPTIONS]
+curl_put()
+{
+ $CURL ${3:-} -X PUT ${2:+-H 'Content-Type: application/json' -d "$2"} $URL/$1
+}
+
+# GET from a URL endpoint
+#
+# Usage:
+#
+# curl_get <ENDPOINT> [CURL_OPTIONS]
curl_get()
{
- $CURL $URL/$1
+ $CURL ${2:-} $URL/$1
}
# Create a new game of the specified engine type
test "$tictactoe_game_id" != ""
TEST_END $tictactoe_game_id
+TEST_SUBSECTION "Test redirects"
+
+TEST "Redirect of /GAMEID at top level"
+redirect=$(curl_get $empires_game_id)
+test "$redirect" = "Moved Permanently. Redirecting to /empires/$empires_game_id/"
+TEST_END
+
+TEST "Redirect of lowercase /gameid at top level"
+empires_game_id_lower=$(tr '[:upper:]' '[:lower:]' <<< $empires_game_id)
+redirect=$(curl_get $empires_game_id_lower)
+test "$redirect" = "Moved Permanently. Redirecting to /$empires_game_id/"
+TEST_END
+
+TEST "Redirect of lowercase /empires/gameid"
+redirect=$(curl_get empires/$empires_game_id_lower)
+test "$redirect" = "Moved Permanently. Redirecting to /empires/$empires_game_id/"
+TEST_END
+
TEST_SECTION "Empires game"
empires_game_path=empires/$empires_game_id
test "$players" = ""
TEST_END
-TEST_REPORT
+TEST_SECTION "Tic Tac Toe game"
+
+tictactoe_game_path=tictactoe/$tictactoe_game_id
+
+tictactoe_profile()
+{
+ curl_put /profile "{ \"nickname\": \"$1\" }" "-c .cookie-tictactoe"
+}
+
+tictactoe_move()
+{
+ curl_post $tictactoe_game_path/move "{ \"move\": $1 }" "-b .cookie-tictactoe"
+}
+
+tictactoe_player_info()
+{
+ curl_get $tictactoe_game_path/events "-m 0.1 -b .cookie-tictactoe" 2>&1 \
+ | grep player-info -A 1 \
+ | grep ^data
+}
+
+tictactoe_player_name()
+{
+ curl_put $tictactoe_game_path/player "{ \"name\": \"$1\" }" "-b .cookie-tictactoe"
+}
+
+tictactoe_player_team()
+{
+ curl_put $tictactoe_game_path/player "{ \"team\": \"$1\" }" "-b .cookie-tictactoe"
+}
+
+TEST_SUBSECTION "Tic Tac Toe player-info"
+
+TEST "Hit LMNO /profile to set name to 'curl'"
+tictactoe_profile curl
+TEST_END
+
+TEST "Verify player-info event reports 'curl' name"
+result=$(tictactoe_player_info)
+test "$result" = 'data: {"id":1,"name":"curl","team":""}'
+TEST_END
+
+TEST_SUBSECTION "Tic Tac Toe /player"
+
+TEST "Change name to 'newname'"
+tictactoe_player_name newname
+result=$(tictactoe_player_info)
+test "$result" = 'data: {"id":1,"name":"newname","team":""}'
+TEST_END
+
+TEST "Change team to 'X'"
+tictactoe_player_team X
+result=$(tictactoe_player_info)
+test "$result" = 'data: {"id":1,"name":"newname","team":"X"}'
+TEST_END
+
+TEST "Change team to 'O'"
+tictactoe_player_team O
+result=$(tictactoe_player_info)
+test "$result" = 'data: {"id":1,"name":"newname","team":"O"}'
+TEST_END
+
+TEST "Verify cannot change team to 'Z'"
+tictactoe_player_team Z
+result=$(tictactoe_player_info)
+test "$result" = 'data: {"id":1,"name":"newname","team":"O"}'
+TEST_END
+
+TEST "Leave current team"
+tictactoe_player_team ""
+result=$(tictactoe_player_info)
+test "$result" = 'data: {"id":1,"name":"newname","team":""}'
+TEST_END
+
+TEST_SUBSECTION "Tic Tac Toe /move"
+
+TEST "First move doesn't require a team"
+result=$(tictactoe_move 0)
+test "$result" = '{"legal":true}'
+TEST_END
+
+TEST "Second move does require a team"
+result=$(tictactoe_move 4)
+test "$result" = '{"legal":false,"message":"It'"'"'s not your turn to move"}'
+TEST_END
+TEST "Illegal to move when it's not your turn"
+tictactoe_player_team X
+result=$(tictactoe_move 4)
+test "$result" = '{"legal":false,"message":"It'"'"'s not your turn to move"}'
+TEST_END
+
+TEST "Legal move to center square"
+tictactoe_player_team O
+result=$(tictactoe_move 4)
+test "$result" = '{"legal":true}'
+TEST_END
+
+TEST "Move to center square again is now illegal"
+tictactoe_player_team X
+result=$(tictactoe_move 4)
+test "$result" = '{"legal":false,"message":"Square is already occupied"}'
+TEST_END
+
+TEST_SECTION "Empathy game"
+
+TEST_SUBSECTION "Create a game and register 3 players"
+
+TEST "Create the game"
+empathy_game_id=$(new_game empathy)
+test "$empathy_game_id" != ""
+TEST_END $empathy_game_id
+
+empathy_game_path=empathy/$empathy_game_id
+
+empathy_profile()
+{
+ cookie_file=".cookie-empathy-$1"
+ curl_put /profile "{ \"nickname\": \"$1\" }" "-c $cookie_file"
+ echo $cookie_file
+}
+
+curl_get_event()
+{
+ curl_get $1 "-m 0.1 $3" 2>&1 \
+ | grep "^event: $2" -A 1 \
+ | grep ^data: \
+ | sed -e 's,^data: *,,'
+}
+
+empathy_player_name()
+{
+ curl_get_event $empathy_game_path/events player-info "-b $1" | jq -r .name
+}
+
+TEST "Set 'alice' in session"
+alice=$(empathy_profile alice)
+test "$alice" = ".cookie-empathy-alice"
+TEST_END
+
+TEST "Register alice and verify name"
+result=$(empathy_player_name $alice)
+test "$result" = "alice"
+TEST_END
+
+TEST "Register bob"
+bob=$(empathy_profile bob)
+result=$(empathy_player_name $bob)
+test "$result" = "bob"
+TEST_END
+
+TEST "Register charlie"
+charlie=$(empathy_profile charlie)
+result=$(empathy_player_name $charlie)
+test "$result" = "charlie"
+TEST_END
+
+TEST_SUBSECTION "Category selection"
+
+empathy_submit_prompt()
+{
+ curl_post $empathy_game_path/prompts "{ \"items\": $2, \"prompt\": \"$3\"}" "-b $1"
+}
+
+TEST "Huge numbers are rejected"
+result=$(empathy_submit_prompt $alice 10000 "10,000 Maniacs")
+test "$result" = '{"valid":false,"message":"Maximum number of items is 20"}'
+TEST_END
+
+TEST "Submit a category"
+prompt_id=$(empathy_submit_prompt $alice 4 "4 things on a beach" | jq .id)
+test "$prompt_id" = "1"
+TEST_END
+
+empathy_vote()
+{
+ curl_post $empathy_game_path/vote/$2 "" "-b $1"
+}
+
+TEST "Vote on this category"
+empathy_vote $alice $prompt_id
+test "$?" = "0"
+TEST_END
+
+empathy_start()
+{
+ curl_post $empathy_game_path/start/$2 "" "-b $1"
+}
+
+TEST "Start the game with this category"
+empathy_start $alice $prompt_id
+test "$?" = "0"
+TEST_END
+
+empathy_answer()
+{
+ curl_post $empathy_game_path/answer/$2 "{ \"answers\": [$3]}" "-b $1"
+}
+
+TEST_SUBSECTION "Submitting answers"
+
+TEST "Submit from a non-player fails"
+result=$(empathy_answer bogus $prompt_id '"Sun", "Sand", "Water", "People"')
+test "$result" = '{"valid":false,"message":"Player not found"}'
+TEST_END
+
+TEST "Submit from alice succeeds"
+result=$(empathy_answer $alice $prompt_id '"sun", "sand", "water", "people"')
+test "$result" = '{"valid":true}'
+TEST_END
+
+TEST "Submit from bob succeeds"
+result=$(empathy_answer $bob $prompt_id '"sand", "sands", "SunLight", "towels"')
+test "$result" = '{"valid":true}'
+TEST_END
+
+TEST "Submit from charlie succeeds"
+result=$(empathy_answer $charlie $prompt_id '"SunShine", "Grains of Sand", "wafer", "people"')
+test "$result" = '{"valid":true}'
+TEST_END
+
+empathy_judging()
+{
+ curl_post $empathy_game_path/judging/$2 "{ \"word_groups\": $3}" "-b $1"
+}
+
+TEST_SUBSECTION "Judging answers"
+
+empathy_ambiguities()
+{
+ curl_get_event $empathy_game_path/events game-state "-b $1" \
+ | jq .ambiguities[]
+}
+
+TEST "Received all unique words"
+# echo here is to strip newlines
+result=$(echo $(empathy_ambiguities $alice))
+test "$result" = '"Grains of Sand" "people" "sand" "sands" "sun" "SunLight" "SunShine" "towels" "wafer" "water"'
+TEST_END
+
+TEST "Submit word groups from alice"
+result=$(empathy_judging $alice $prompt_id '[["sun","sunlight","sunshine"],["sand","sands","grains of sand"],["water","wafer"]]')
+test "$result" = '{"valid":true}'
+TEST_END
+
+TEST "Submit word groups from bob"
+result=$(empathy_judging $bob $prompt_id '[["sands","grains of sand"],["water","wafer"]]')
+test "$result" = '{"valid":true}'
+TEST_END
+
+TEST "Submit word groups from charlie"
+result=$(empathy_judging $charlie $prompt_id '[["sunlight","sunshine"],["sand","grains of sand"]]')
+test "$result" = '{"valid":true}'
+TEST_END
+
+empathy_scores()
+{
+ curl_get_event $empathy_game_path/events game-state "-b $1" \
+ | jq '.scores.scores[]|.player,.score'
+}
+
+TEST_SUBSECTION "Scoring"
+
+TEST "Verify final scores as expected"
+# echo here is to strip newlines
+result=$(echo $(empathy_scores $alice))
+test "$result" = '"charlie" 9 "alice" 8 "bob" 6'
+TEST_END
+
+empathy_words_submitted()
+{
+ curl_get_event $empathy_game_path/events game-state "-b $1" \
+ | jq '.scores.words[].word'
+}
+
+TEST "Verify final list of words submitted"
+# echo here is to strip newlines
+result=$(echo $(empathy_words_submitted $alice))
+test "$result" = '"grains of sand/sand/sands" "sunlight/sunshine" "wafer/water" "people" "sun" "towels"'
+TEST_END
+
+TEST_REPORT
projects / empires-server / blobdiff