bygfoot/src/start_end.c

#include "cup.h"
#include "file.h"
#include "fixture.h"
#include "gui.h"
#include "league.h"
#include "live_game.h"
#include "main.h"
#include "maths.h"
#include "player.h"
#include "start_end.h"
#include "table.h"
#include "team.h"
#include "transfer.h"
#include "user.h"
#include "variables.h"
#include "xml_name.h"

/** Prototype of a function called at the start or
    end of a week round. */
typedef void(*WeekFunc)(void);

/** Array of functions called when a week round
    is ended. */
WeekFunc end_week_round_funcs[] =
{end_week_round_results, end_week_round_sort_tables, 
 end_week_round_update_fixtures, NULL};

/** Array of functions called when a week round
    is started. */
WeekFunc start_week_round_funcs[] =
{start_week_round_update_user_teams, NULL};

/** Array of functions called when a week
    is started. */
WeekFunc start_week_funcs[] = {start_week_update_user_teams, NULL};

WeekFunc end_week_funcs[] = {NULL};

/** Generate the teams etc. */
void
start_new_game(void)
{
    xml_name_read(PLAYER_NAMES_FILE, -1);
    start_write_variables();
    start_generate_league_teams();
    start_new_season();
    xml_name_read(PLAYER_NAMES_FILE, 1000);
}

/** Make new fixtures, nullify things etc. */
void
start_new_season(void)
{
    gint i;

    xml_name_read(PLAYER_NAMES_FILE, 1000);
    start_load_cup_teams();

    for(i=0;i<ligs->len;i++)
	fixture_write_league_fixtures(&lig(i));

    for(i=0;i<cps->len;i++)
    {
	fixture_write_cup_fixtures(&cp(i));
	/*d*/
/* 	printf("%s %d %d %d\n", */
/* 	       cp(i).name->str, cp(i).id,  */
/* 	       g_array_index(cp(i).fixtures, Fixture, 0).week_number, */
/* 	       g_array_index(cp(i).fixtures, Fixture, 0).week_round_number);	        */
    }
}

/** Fill some global variables with default values at the
    beginning of a new game. */
void
start_write_variables(void)
{
    gint i;

    season = week = week_round = 1;
    current_user = 0;
/*     week=24; week_round = 2; */
    transfer_list = g_array_new(FALSE, FALSE, sizeof(TransferPlayer));

    for(i=0;i<users->len;i++)
	file_load_user_conf_file(&usr(i));
}

/** Generate the teams in the leagues. */
void
start_generate_league_teams(void)
{
    gint i, j;    
    Team *tm;

    if(ligs->len == 0)
	main_exit_program(EXIT_NO_LEAGUES,
			  "start_generate_league_teams: no leagues found. there must be at least one league in the game.\n");

    for(i=0;i<ligs->len;i++)
    {
	for(j=0;j<lig(i).teams->len;j++)
	{
	    tm = &g_array_index(lig(i).teams, Team, j);
	    tm->stadium.capacity = 
		math_gauss_disti((gint)(lig(i).average_capacity * 0.66),
				 (gint)(lig(i).average_capacity * 1.33));
	    
	    team_generate_players(tm);
	}
    }
}

/** Load the names from the xml files for the cups
    and generate the teams. */
void
start_load_cup_teams(void)
{
    gint i, j, k;

    for(i=0;i<cps->len;i++)
	if(cp(i).type == CUP_TYPE_INTERNATIONAL)
	{
	    cup_load_choose_teams(&cp(i));
	    cup_load_choose_team_user(&cp(i));
	}
}

/** End a week round. */
void
end_week_round(void)
{
    gint i;
    gboolean new_week = TRUE;
    WeekFunc *end_func = end_week_round_funcs;

    while(*end_func != NULL)
    {
	(*end_func)();
	end_func++;
    }

    week_round++;

    for(i=0;i<ligs->len;i++)
	if(query_fixture_in_week_round(lig(i).id, week, week_round))
	{
	    new_week = FALSE;
	    break;
	}

    for(i=0;i<cps->len;i++)
	if(query_fixture_in_week_round(cp(i).id, week, week_round))
	{
	    new_week = FALSE;
	    break;
	}

    if(new_week)
    {
	week++;
	week_round = 1;

	start_week();
    }

    start_week_round();
}

/** Calculate the match results of a week round. */
void
end_week_round_results(void)
{
    gint i, j;

    if(week_round == 1)
    {
	for(i=0;i<ligs->len;i++)
	    for(j=0;j<lig(i).fixtures->len;j++)
		if(g_array_index(lig(i).fixtures, Fixture, j).week_number == week &&
		   g_array_index(lig(i).fixtures, Fixture, j).week_round_number == week_round &&
		   g_array_index(lig(i).fixtures, Fixture, j).attendance == -1)
		{
		    live_game_calculate_fixture(&g_array_index(lig(i).fixtures, Fixture, j));
		    /*d*/
/* 		printf("%d %d %d %25s %2d - %2d %-25s\n", week, week_round, */
/* 		       g_array_index(lig(i).fixtures, Fixture, j).clid, */
/* 		       g_array_index(lig(i).fixtures, Fixture, j).teams[0]->name->str, */
/* 		       g_array_index(lig(i).fixtures, Fixture, j).result[0][0], */
/* 		       g_array_index(lig(i).fixtures, Fixture, j).result[1][0], */
/* 		       g_array_index(lig(i).fixtures, Fixture, j).teams[1]->name->str); */
		}
    }
    else
    {
	for(i=0;i<cps->len;i++)
	    for(j=0;j<cp(i).fixtures->len;j++)
		if(g_array_index(cp(i).fixtures, Fixture, j).week_number == week &&
		   g_array_index(cp(i).fixtures, Fixture, j).week_round_number == week_round &&
		   g_array_index(cp(i).fixtures, Fixture, j).attendance == -1)
		{
		    live_game_calculate_fixture(&g_array_index(cp(i).fixtures, Fixture, j));
		    /*d*/
/* 		    printf("%d %d %d %25s %d %d %d - %d %d %d %-25s\n", week, week_round, */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).clid, */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).teams[0]->name->str, */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).result[0][0], */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).result[0][1],		        */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).result[0][2],		        */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).result[1][0],		        */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).result[1][1],		        */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).result[1][2],		        */
/* 			   g_array_index(cp(i).fixtures, Fixture, j).teams[1]->name->str); */
		}
    }

    /*d*/
    Team *tm = &g_array_index(lig(0).teams, Team, 4);
    Player *pl = NULL;
    printf("\n+++ struc %d style %d\n", tm->structure, tm->style);
    for(i=0;i<tm->players->len;i++)
    {
	pl = player_of(tm, i);
	printf("%20s p %d cp %d s %.0f cs %.0f fi %.2f\n",
	       pl->name->str, pl->pos, pl->cpos, pl->skill, pl->cskill, pl->fitness);
    }
}

/** Sort league and cup tables. */
void
end_week_round_sort_tables(void)
{
    gint i, j;

    for(i=0;i<ligs->len;i++)
	if(query_fixture_in_week_round(lig(i).id, week, week_round))
	    g_array_sort_with_data(lig(i).table.elements,
				   (GCompareDataFunc)table_element_compare_func,
				   GINT_TO_POINTER(lig(i).id));

    for(i=0;i<cps->len;i++)
	if(cp(i).tables !=  NULL && cp(i).tables->len != 0 && 
	   query_fixture_in_week_round(cp(i).id, week, week_round) &&
	   g_array_index(cp(i).fixtures, Fixture, cp(i).fixtures->len - 1).round ==
	   g_array_index(cp(i).tables, Table, 0).round)
	    for(j=0;j<cp(i).tables->len;j++)
		g_array_sort_with_data(g_array_index(cp(i).tables, Table, j).elements,
				       (GCompareDataFunc)table_element_compare_func,
				       GINT_TO_POINTER(cp(i).id));
}

/** Update cup fixtures. */
void
end_week_round_update_fixtures(void)
{
    gint i;

    for(i=0;i<cps->len;i++)
	if(cp(i).next_fixture_update_week == week &&
	   cp(i).next_fixture_update_week_round == week_round)
	    fixture_update(&cp(i));
}

/** Start a new week round. */
void
start_week_round(void)
{
    WeekFunc *start_func = start_week_round_funcs;

    while(*start_func != NULL)
    {
	(*start_func)();
	start_func++;
    }

/*     if(!user_games_this_week_round()) */
/* 	end_week_round(); */
}

/** Start a new week. */
void
start_week(void)
{
    WeekFunc *start_func = start_week_funcs;

    while(*start_func != NULL)
    {
	(*start_func)();
	start_func++;
    }
}

/** Age increase etc. of players.
    CPU teams get updated at the end of their matches
    (to avoid cup teams getting updated too often). */
void
start_week_update_user_teams(void)
{
    gint i;
    
    for(i=0;i<users->len;i++)
	team_update_user_team_weekly(usr(i).tm);
}

/** Do some things at the beginning of each new round for
    the user teams. */
void
start_week_round_update_user_teams(void)
{
    gint i;
    
    for(i=0;i<users->len;i++)
	team_update_user_team_week_roundly(usr(i).tm);
}