void test_portal_revenue_when_train_exits_portal(test_portal_context* test_ctx, sem_coordinate* exit, int32_t expected_balance) {
sem_game* game = &(test_ctx->game);
sem_world* world = &(test_ctx->game.world);
sem_train* train = malloc(sizeof(sem_train));
sem_train_init(train);
train->state = MOVING;
train->direction = SEM_EAST;
train->has_exit_position = (exit != NULL);
if (train->has_exit_position) train->exit_position = *exit;
sem_world_add_train(world, train);
sem_car* head_car = malloc(sizeof(sem_car));
sem_coordinate_set(&(head_car->position), 2, 0);
head_car->track = sem_tile_at(world, 2, 0)->track;
sem_train_add_car(train, head_car);
sem_action action;
action.time = 2000;
action.game = &(test_ctx->game);
action.context = train;
action.function = sem_move_train_action;
action.dynamically_allocated = false;
sem_move_train_action(world->actions, &action);
sem_action* move_action = sem_heap_remove_earliest(world->actions);
move_action->function(world->actions, move_action);
sem_action* train_exit_action = sem_heap_remove_earliest(world->actions);
train_exit_action->function(world->actions, move_action);
g_assert_cmpint(game->revenue.balance, ==, expected_balance);
}
void test_train_setup(test_train_context* test_ctx, const void* data) {
#pragma unused(data)
test_ctx->world.max_x = 4;
test_ctx->world.max_y = 4;
sem_world_init_blank(&(test_ctx->world));
test_ctx->train = malloc(sizeof(sem_train));
test_ctx->train1 = malloc(sizeof(sem_train));
test_ctx->train2 = malloc(sizeof(sem_train));
sem_train_init(test_ctx->train);
sem_train_init(test_ctx->train1);
sem_train_init(test_ctx->train2);
sem_world_add_train(&(test_ctx->world), test_ctx->train);
sem_world_add_train(&(test_ctx->world), test_ctx->train1);
sem_world_add_train(&(test_ctx->world), test_ctx->train2);
}
void test_portal_train_exits_into_portal(test_portal_context* test_ctx, const void* data) {
#pragma unused(data)
sem_world* world = &(test_ctx->game.world);
sem_train* train = malloc(sizeof(sem_train));
sem_train_init(train);
train->state = MOVING;
train->direction = SEM_EAST;
sem_world_add_train(world, train);
sem_car* tail_car = malloc(sizeof(sem_car));
sem_coordinate_set(&(tail_car->position), 1, 0);
tail_car->track = sem_tile_at(world, 1, 0)->track;
sem_car* head_car = malloc(sizeof(sem_car));
sem_coordinate_set(&(head_car->position), 2, 0);
head_car->track = sem_tile_at(world, 2, 0)->track;
sem_train_add_car(train, head_car);
sem_train_add_car(train, tail_car);
sem_action action;
action.time = 2000;
action.game = &(test_ctx->game);
action.context = train;
action.function = sem_move_train_action;
action.dynamically_allocated = false;
g_assert_true(sem_move_train_action(world->actions, &action) == SEM_OK);
sem_action* move_action = sem_heap_remove_earliest(world->actions);
g_assert_nonnull(move_action);
g_assert_true(move_action->function(world->actions, move_action) == SEM_OK);
g_assert_cmpuint(train->cars, ==, 1);
g_assert_cmpuint(train->position->x, ==, 3);
g_assert_cmpuint(train->position->y, ==, 0);
move_action = sem_heap_remove_earliest(world->actions);
g_assert_nonnull(move_action);
g_assert_true(move_action->function(world->actions, move_action) == SEM_OK);
sem_action* train_exit_action = sem_heap_remove_earliest(world->actions);
g_assert_nonnull(train_exit_action);
train_exit_action->function(world->actions, move_action);
g_assert_cmpuint(world->trains->tail_idx, ==, 0);
}
void test_serialize_save_load_train() {
sem_world world;
world.max_x = 3;
world.max_y = 2;
sem_world_init_blank(&world);
sem_tile* tile = sem_tile_at(&world, 0, 1);
sem_track trackW_E;
sem_track_set(&trackW_E, SEM_WEST, SEM_EAST);
sem_tile_set_track(tile, &trackW_E);
tile = sem_tile_at(&world, 1, 1);
sem_track trackN_S_W_E;
sem_track_set(&trackN_S_W_E, SEM_NORTH, SEM_SOUTH);
trackN_S_W_E.next = &trackW_E;
sem_tile_set_track(tile, &trackN_S_W_E);
sem_train* saved_train1 = malloc(sizeof(sem_train));
sem_train* train1 = saved_train1;
sem_train_init(train1);
train1->direction = SEM_EAST;
train1->name = strdup("IC-123");
sem_car car1;
sem_coordinate_set(&(car1.position), 1, 1);
car1.track = &trackW_E;
sem_train_add_car(train1, &car1);
sem_car car2;
sem_coordinate_set(&(car2.position), 0, 1);
car2.track = &trackW_E;
sem_train_add_car(train1, &car2);
sem_world_add_train(&world, train1);
sem_train* saved_train2 = malloc(sizeof(sem_train));
sem_train* train2 = saved_train2;
sem_train_init(train2);
train2->direction = SEM_WEST;
train2->state = DERAILED;
sem_world_add_train(&world, train2);
FILE* file = save_and_load("build/test/train", &world);
g_assert_cmpuint(world.trains->tail_idx, ==, 2);
train1 = world.trains->items[0];
g_assert_true(train1->state == STOPPED);
g_assert_true(train1->direction == SEM_EAST);
g_assert_cmpuint(train1->cars, ==, 2);
g_assert_cmpstr(train1->name, ==, "IC-123");
sem_car* car = train1->head_car;
g_assert_cmpuint(car->position.x, ==, 1);
g_assert_cmpuint(car->position.y, ==, 1);
sem_track* track = car->track;
g_assert_true(track->start == SEM_WEST);
g_assert_true(track->end == SEM_EAST);
train2 = world.trains->items[1];
g_assert_true(train2->state == DERAILED);
g_assert_true(train2->direction == SEM_WEST);
sem_world_destroy(&world);
fclose(file);
}
void test_serialize_load_remove_train_action() {
sem_world world;
world.max_x = 3;
world.max_y = 1;
sem_world_init_blank(&world);
sem_tile* tile = sem_tile_at(&world, 0, 0);
sem_track trackW_E;
sem_track_set(&trackW_E, SEM_WEST, SEM_EAST);
sem_tile_set_track(tile, &trackW_E);
tile = sem_tile_at(&world, 2, 0);
sem_track trackN_S;
sem_track_set(&trackN_S, SEM_NORTH, SEM_SOUTH);
sem_tile_set_track(tile, &trackN_S);
sem_train* train1 = malloc(sizeof(sem_train));
sem_train_init(train1);
uuid_t train1_id;
uuid_copy(train1->id, train1_id);
train1->direction = SEM_NORTH;
sem_car car1;
sem_coordinate_set(&(car1.position), 2, 0);
car1.track = &trackN_S;
sem_train_add_car(train1, &car1);
sem_world_add_train(&world, train1);
sem_train* train2 = malloc(sizeof(sem_train));
sem_train_init(train2);
train2->state = DERAILED;
train2->direction = SEM_EAST;
sem_car car2;
sem_coordinate_set(&(car2.position), 0, 0);
car2.track = &trackW_E;
sem_train_add_car(train2, &car2);
sem_world_add_train(&world, train2);
// TODO: should fetch a partially-initialised sem_action from
// a factory method
sem_action action;
action.time = 5000;
action.function = remove_train_action;
action.write = sem_remove_train_action_write;
action.context = train2;
sem_heap_insert(world.actions, &action);
FILE* file = save_and_load("build/test/remove_train_action", &world);
sem_action* loaded_action = sem_heap_remove_earliest(world.actions);
g_assert_false(loaded_action == NULL);
g_assert_true(loaded_action->function(world.actions, loaded_action) == SEM_OK);
g_assert_cmpuint(world.trains->tail_idx, ==, 1);
sem_train* remaining_train = (sem_train*) world.trains->items[0];
g_assert_true(uuid_compare(remaining_train->id, train1_id) == 0);
sem_world_destroy(&world);
fclose(file);
}
