rixty/bygfoot
1
1
Fork 0
mirror of https://github.com/tstellar/bygfoot.git synced 2025-03-30 01:20:15 +01:00
Code Issues Projects Releases Wiki Activity
bygfoot/src/user.c

1312 lines
37 KiB
C
Raw Blame History

/*
user.c
Bygfoot Football Manager -- a small and simple GTK2-based
football management game.
http://bygfoot.sourceforge.net
Copyright (C) 2005 Gyözö Both (gyboth@bygfoot.com)
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
*/
#include "bet.h"
#include "cup.h"
#include "file.h"
#include "finance.h"
#include "fixture.h"
#include "free.h"
#include "game_gui.h"
#include "league.h"
#include "live_game.h"
#include "main.h"
#include "maths.h"
#include "misc.h"
#include "name.h"
#include "option.h"
#include "player.h"
#include "support.h"
#include "team.h"
#include "transfer.h"
#include "treeview.h"
#include "user.h"
#include "window.h"
#include "xml_mmatches.h"
#include "youth_academy.h"
/** Create a new user with default values. */
User
user_new(void)
{
#ifdef DEBUG
printf("user_new\n");
#endif
User new;
new.name = g_strdup("NONAME");
new.tm = NULL;
new.team_id = -1;
live_game_reset(&new.live_game, NULL, FALSE);
new.events = g_array_new(FALSE, FALSE, sizeof(Event));
new.history = g_array_new(FALSE, FALSE, sizeof(UserHistory));
new.options.list = NULL;
new.options.datalist = NULL;
new.sponsor.name = g_string_new("");
new.sponsor.contract = new.sponsor.benefit = -1;
new.youth_academy.players = g_array_new(FALSE, FALSE, sizeof(Player));
new.youth_academy.pos_pref = PLAYER_POS_ANY;
new.youth_academy.coach = QUALITY_AVERAGE;
new.mmatches_file = NULL;
new.mmatches = g_array_new(FALSE, FALSE, sizeof(MemMatch));
new.bets[0] = g_array_new(FALSE, FALSE, sizeof(BetUser));
new.bets[1] = g_array_new(FALSE, FALSE, sizeof(BetUser));
return new;
}
/** Move a user's team to top or bottom league
at the beginning of a new game and set up the team.
@param user The user we set up the team for. */
void
user_set_up_team_new_game(User *user)
{
#ifdef DEBUG
printf("user_set_up_team_new_game\n");
#endif
gchar buf[SMALL];
gint rndom;
/* If the user chose to start in a different league than
his team is originally in, the league is stored in the scout
variable. */
if(user->scout == -1)
{
user_set_up_team(user, TRUE);
user_history_add(user, USER_HISTORY_START_GAME,
user->tm->name,
league_cup_get_name_string(user->tm->clid), NULL, NULL);
}
else
{
rndom = math_rndi(0, lig(user->scout).teams->len - 1);
while(team_is_user(&g_array_index(lig(user->scout).teams, Team, rndom)) != -1)
rndom = math_rndi(0, lig(user->scout).teams->len - 1);
sprintf(buf, "%s", g_array_index(lig(user->scout).teams, Team, rndom).name);
misc_string_assign(&g_array_index(lig(user->scout).teams, Team, rndom).name,
user->tm->name);
misc_string_assign(&user->tm->name, buf);
user->tm = &g_array_index(lig(user->scout).teams, Team, rndom);
user->team_id = g_array_index(lig(user->scout).teams, Team, rndom).id;
user_history_add(user, USER_HISTORY_START_GAME,
user->tm->name,
league_cup_get_name_string(user->tm->clid), NULL, NULL);
user_set_up_team(user, TRUE);
}
}
/** Set up finances, remove some players etc. for a new user team.
@par am user The user whose team we set up. */
void
user_set_up_team(User *user, gboolean remove_players)
{
#ifdef DEBUG
printf("user_set_up_team\n");
#endif
gint i, j;
if(remove_players)
{
for(i=PLAYER_POS_DEFENDER; i<=PLAYER_POS_FORWARD; i++)
for(j=user->tm->players->len - 1; j > 10; j--)
if(g_array_index(user->tm->players, Player, j).pos == i &&
g_array_index(user->tm->players, Player, j).recovery != 1)
{
player_remove_from_team(user->tm, j);
break;
}
}
for(i=0;i<user->tm->players->len;i++)
g_array_index(user->tm->players, Player, i).recovery = 0;
user->scout = user->physio = QUALITY_AVERAGE;
if(sett_int("int_opt_disable_transfers"))
user->physio = QUALITY_GOOD;
user->tm->style = 0;
user_set_up_finances(user);
user_set_up_counters(user);
if(!sett_int("int_opt_disable_ya"))
youth_academy_new(user);
user->counters[COUNT_USER_NEW_SPONSOR] =
(sett_int("int_opt_disable_finances")) ? -5 : 1;
option_set_int("int_opt_user_penalty_shooter",
&user->options, -1);
}
/** Set the counters of the user to their initial values. */
void
user_set_up_counters(User *user)
{
#ifdef DEBUG
printf("user_set_up_counters\n");
#endif
gint i;
for(i=0;i<COUNT_USER_END;i++)
user->counters[i] = 0;
user->counters[COUNT_USER_LOAN] =
user->counters[COUNT_USER_POSITIVE] = -1;
user->counters[COUNT_USER_TRAININGS_LEFT_SEASON] =
const_int("int_training_camps_per_season");
}
/** Set up the user's finances when he's got a new team.
@param user The user we set up the finances for. */
void
user_set_up_finances(User *user)
{
#ifdef DEBUG
printf("user_set_up_finances\n");
#endif
gint i;
for(i=0; i<MON_OUT_END;i++)
user->money_out[0][i] = user->money_out[1][i] = 0;
for(i=0; i<MON_IN_END;i++)
user->money_in[0][i] = user->money_in[1][i] = 0;
user->debt =
user->alr_start_week =
user->alr_weekly_installment = 0;
user->money =
math_round_integer(user->tm->stadium.capacity *
math_rndi(const_int("int_initial_money_lower"),
const_int("int_initial_money_upper")), 2);
}
/** Remove a user from the game.
@param idx The index of the user in the #users array.
@param regenerate_team Whether the user's team has to be
regenerated. */
void
user_remove(gint idx, gboolean regenerate_team)
{
#ifdef DEBUG
printf("user_remove\n");
#endif
gint i;
if(regenerate_team)
{
for(i=0;i<usr(idx).tm->players->len;i++)
free_player(&g_array_index(usr(idx).tm->players, Player, i));
g_array_free(usr(idx).tm->players, TRUE);
usr(idx).tm->players = g_array_new(FALSE, FALSE, sizeof(Player));
usr(idx).tm->luck = 1;
team_generate_players_stadium(usr(idx).tm, 0);
for(i=0;i<usr(idx).tm->players->len;i++)
g_array_index(usr(idx).tm->players, Player, i).team = usr(idx).tm;
}
free_user(&usr(idx));
g_array_remove_index(users, idx);
cur_user = 0;
if(window.main != NULL)
game_gui_show_main();
}
void
user_set_player_list_attributes(const User *user, PlayerListAttribute *attribute, gint list_number)
{
#ifdef DEBUG
printf("user_set_player_list_attributes\n");
#endif
gint i, cnt = 0;
gchar prefix[SMALL];
sprintf(prefix, "int_opt_user_pl%d_att", list_number);
for(i=0;i<user->options.list->len;i++)
if(g_str_has_prefix(g_array_index(user->options.list, Option, i).name, prefix))
{
attribute->on_off[cnt] = g_array_index(user->options.list, Option, i).value;
cnt++;
}
}
/** Find out whether there are user events. */
gboolean
query_user_events()
{
#ifdef DEBUG
printf("query_user_events\n");
#endif
gint i;
for(i=0;i<users->len;i++)
if(usr(i).events->len!=0)
return TRUE;
return FALSE;
}
/** Find out whether there are user games at the specified date. */
gboolean
query_user_games_in_week_round(gint week_number, gint week_round_number)
{
#ifdef DEBUG
printf("query_user_games_in_week_round\n");
#endif
gint i;
for(i=0;i<users->len;i++)
if(query_user_game_in_week_round(i, week_number, week_round_number))
return TRUE;
return FALSE;
}
/** Find out whether the specified user has a match at the specified date. */
gboolean
query_user_game_in_week_round(gint usr_idx, gint week_number, gint week_round_number)
{
#ifdef DEBUG
printf("query_user_game_in_week_round\n");
#endif
gint i, j;
for(i=0;i<ligs->len;i++)
for(j=0;j<lig(i).fixtures->len;j++)
if(fixture_user_team_involved(&g_array_index(lig(i).fixtures, Fixture, j)) == usr_idx &&
g_array_index(lig(i).fixtures, Fixture, j).week_number == week_number &&
g_array_index(lig(i).fixtures, Fixture, j).week_round_number == week_round_number)
return TRUE;
for(i=0;i<acps->len;i++)
for(j=0;j<acp(i)->fixtures->len;j++)
if(fixture_user_team_involved(&g_array_index(acp(i)->fixtures, Fixture, j)) == usr_idx &&
g_array_index(acp(i)->fixtures, Fixture, j).week_number == week_number &&
g_array_index(acp(i)->fixtures, Fixture, j).week_round_number == week_round_number)
return TRUE;
return FALSE;
}
/** Get the user managing the team.
@param tm The team.
@return A pointer to the user. */
User*
user_from_team(const Team *tm)
{
gint i;
for(i=0;i<users->len;i++)
if(usr(i).tm == tm)
return &usr(i);
main_exit_program(EXIT_POINTER_NOT_FOUND,
"User going with team %s not found.\n",
tm->name);
return NULL;
}
/** Check the success counter of the user and offer a new job or
fire him if the counter says so. */
void
user_job_offer(User *user)
{
#ifdef DEBUG
printf("user_job_offer\n");
#endif
Team *new_team = NULL;
if(math_rnd(0, 1) > const_float("float_user_success_counter_check") ||
ABS(user->counters[COUNT_USER_SUCCESS]) <
(gfloat)const_int("int_user_success_offer_limit") * 0.9)
return;
if(user->counters[COUNT_USER_SUCCESS] <
-(gfloat)const_int("int_user_success_offer_limit") * 0.9 &&
!user->counters[COUNT_USER_WARNING])
{
user_event_add(user, EVENT_TYPE_WARNING, -1, -1, NULL,
_("The owners of %s are not satisfied with the recent performance of the team. There are rumours they're looking for a new manager."), user->tm->name);
user->counters[COUNT_USER_WARNING] = 1;
return;
}
if(math_rnd(0, 1) < const_float("float_user_success_base_prob") *
log((gfloat)ABS(user->counters[COUNT_USER_SUCCESS]) *
const_float("float_user_success_prob_factor")))
{
if(user->counters[COUNT_USER_SUCCESS] < 0)
{
new_team = team_get_new(user->tm, TRUE);
user_event_add(user, EVENT_TYPE_FIRE_FAILURE, -1, -1, new_team, NULL);
}
else if(option_int("int_opt_user_show_job_offers", &user->options))
{
new_team = team_get_new(user->tm, FALSE);
user_event_add(user, EVENT_TYPE_JOB_OFFER, -1, -1, new_team, NULL);
}
}
}
/** Update the counters of the users. */
void
user_weekly_update_counters(User *user)
{
#ifdef DEBUG
printf("user_weekly_update_counters\n");
#endif
gint rank = team_get_league_rank(user->tm);
gint teamslen = ((GArray*)(league_cup_get_teams(user->tm->clid)))->len;
gint rank_bounds[2] =
{(gint)rint(const_float("float_user_success_table_bound_upper") *
(gfloat)teamslen),
(gint)rint(const_float("float_user_success_table_bound_lower") *
(gfloat)teamslen)};
gint *cnts = user->counters;
gint increase_capacity;
gfloat increase_safety;
cnts[COUNT_USER_TRAININGS_WEEK] = 0;
if(cnts[COUNT_USER_STADIUM_CAPACITY] > 0)
{
increase_capacity = math_rndi(const_int("int_stadium_improvement_base_seats") -
const_int("int_stadium_improvement_seats_variance"),
const_int("int_stadium_improvement_base_seats") +
const_int("int_stadium_improvement_seats_variance"));
user->tm->stadium.capacity += MIN(cnts[COUNT_USER_STADIUM_CAPACITY],
increase_capacity);
cnts[COUNT_USER_STADIUM_CAPACITY] =
MAX(cnts[COUNT_USER_STADIUM_CAPACITY] - increase_capacity, 0);
}
if(cnts[COUNT_USER_STADIUM_SAFETY] > 0)
{
increase_safety = math_rnd(const_float("float_stadium_improvement_base_safety") -
const_float("float_stadium_improvement_safety_variance"),
const_float("float_stadium_improvement_base_safety") +
const_float("float_stadium_improvement_safety_variance"));
user->tm->stadium.safety += MIN((gfloat)cnts[COUNT_USER_STADIUM_SAFETY] / 100,
increase_safety);
user->tm->stadium.safety = MIN(user->tm->stadium.safety, 1);
cnts[COUNT_USER_STADIUM_SAFETY] =
MAX(cnts[COUNT_USER_STADIUM_SAFETY] - (gint)rint(increase_safety * 100), 0);
}
if(query_league_matches_in_week(league_from_clid(user->tm->clid), week))
{
if(rank < rank_bounds[0])
user->counters[COUNT_USER_SUCCESS] += (rank_bounds[0] - rank);
else if(rank > rank_bounds[1])
user->counters[COUNT_USER_SUCCESS] -= (rank - rank_bounds[1]);
else
{
if(user->counters[COUNT_USER_SUCCESS] > 0)
user->counters[COUNT_USER_SUCCESS] -= const_int("int_user_success_mediocre_rank_change");
else
user->counters[COUNT_USER_SUCCESS] += const_int("int_user_success_mediocre_rank_change");
}
}
}
/** Return a default new user event. */
Event
user_event_new(void)
{
#ifdef DEBUG
printf("user_event_new\n");
#endif
Event new;
new.user = NULL;
new.type = -1;
new.value1 = new.value2 = -1;
new.value_pointer = NULL;
new.value_string = NULL;
return new;
}
/** Add an event with the specified values to the event array of the user. */
void
user_event_add(User *user, gint type, gint value1, gint value2,
gpointer value_pointer, gchar *format, ...)
{
#ifdef DEBUG
printf("user_event_add\n");
#endif
Event new = user_event_new();
gchar text[SMALL];
va_list args;
new.user = user;
new.type = type;
new.value1 = value1;
new.value2 = value2;
new.value_pointer = value_pointer;
if(format != NULL)
{
va_start (args, format);
g_vsprintf(text, format, args);
va_end (args);
new.value_string = g_strdup(text);
}
else
new.value_string = NULL;
g_array_append_val(user->events, new);
}
/** Remove an event from the user event array.
@param user The user.
@param idx The index of the event in the array. */
void
user_event_remove(User *user, gint idx)
{
#ifdef DEBUG
printf("user_event_remove\n");
#endif
free_event(&g_array_index(user->events, Event, idx));
g_array_remove_index(user->events, idx);
}
/** Show the next event for the current user. */
void
user_event_show_next(void)
{
#ifdef DEBUG
printf("user_event_show_next\n");
#endif
Event *event = NULL;
gchar buf[SMALL],
buf2[SMALL], buf3[SMALL];
if(current_user.events->len == 0)
return;
stat4 = STATUS_SHOW_EVENT;
event = &g_array_index(current_user.events, Event, 0);
switch(event->type)
{
default:
g_warning("user_event_show_next: unknown event type %d\n", event->type);
break;
case EVENT_TYPE_PLAYER_LEFT:
game_gui_show_warning(_("%s has left your team because his contract expired."),
event->value_string);
break;
case EVENT_TYPE_WARNING:
game_gui_show_warning(event->value_string);
break;
case EVENT_TYPE_FIRE_FINANCE:
game_gui_show_job_offer((Team*)event->value_pointer, NULL,
STATUS_JOB_OFFER_FIRE_FINANCE);
break;
case EVENT_TYPE_FIRE_FAILURE:
game_gui_show_job_offer((Team*)event->value_pointer, NULL,
STATUS_JOB_OFFER_FIRE_FAILURE);
break;
case EVENT_TYPE_JOB_OFFER:
game_gui_show_job_offer((Team*)event->value_pointer, NULL,
STATUS_JOB_OFFER_SUCCESS);
break;
case EVENT_TYPE_OVERDRAW:
if(event->value1 == 1)
game_gui_show_warning(_("You have overdrawn your bank account. The team owners give you %d weeks to get above your drawing credit limit."), const_int("int_finance_overdraw_positive"));
else
game_gui_show_warning(_("You have overdrawn your bank account once again. Bear in mind that after the fourth time you get fired.\nThe team owners give you %d weeks to get above your drawing credit limit."), const_int("int_finance_overdraw_positive"));
break;
case EVENT_TYPE_TRANSFER_OFFER_USER:
game_gui_show_warning(_("Have a look at the transfer list, there's an offer for %s."),
event->value_string);
break;
case EVENT_TYPE_TRANSFER_OFFER_CPU:
game_gui_show_warning(_("Your offer for %s has been accepted. If you still want to buy him, go to the transfer list and left click on the player."),
event->value_string);
break;
case EVENT_TYPE_TRANSFER_OFFER_REJECTED_BETTER_OFFER:
misc_print_grouped_int(event->value1, buf2);
misc_print_grouped_int(event->value2, buf3);
game_gui_show_warning(_("The owners of %s have rejected your offer (%s / %s) for %s. There was a better offer for the player than yours."), ((Team*)event->value_pointer)->name, buf2, buf3, event->value_string);
break;
case EVENT_TYPE_TRANSFER_OFFER_REJECTED_FEE_WAGE:
misc_print_grouped_int(event->value1, buf2);
misc_print_grouped_int(event->value2, buf3);
game_gui_show_warning(_("The owners of %s have rejected your offer (%s / %s) for %s. Neither the fee nor the wage you offered were acceptable, they say."), ((Team*)event->value_pointer)->name, buf2, buf3, event->value_string);
break;
case EVENT_TYPE_TRANSFER_OFFER_REJECTED_FEE:
misc_print_grouped_int(event->value1, buf2);
misc_print_grouped_int(event->value2, buf3);
game_gui_show_warning(_("The owners of %s have rejected your offer (%s / %s) for %s. The team owners weren't satisfied with the fee you offered."), ((Team*)event->value_pointer)->name, buf2, buf3, event->value_string);
break;
case EVENT_TYPE_TRANSFER_OFFER_REJECTED_WAGE:
misc_print_grouped_int(event->value1, buf2);
misc_print_grouped_int(event->value2, buf3);
/* A player from a team has rejected a transfer offer. */
game_gui_show_warning(_("%s of %s has rejected your offer (%s / %s). He wasn't satisfied with the wage you offered."),
event->value_string,
((Team*)event->value_pointer)->name, buf2, buf3);
break;
case EVENT_TYPE_TRANSFER_OFFER_REJECTED_STARS:
/* A player from a team has rejected a transfer offer. */
game_gui_show_warning(_("%s of %s has rejected your offer because your team has too many star players already. 'A player of my caliber doesn't play second fiddle,' he was quoted."),
event->value_string,
((Team*)event->value_pointer)->name);
break;
case EVENT_TYPE_TRANSFER_OFFER_MONEY:
/* Buy a player from a team. */
game_gui_show_warning(_("You didn't have enough money to buy %s from %s."),
event->value_string, ((Team*)event->value_pointer)->name);
break;
case EVENT_TYPE_TRANSFER_OFFER_ROSTER:
/* Buy a player from a team. */
game_gui_show_warning(_("Your roster is full. You couldn't buy %s from %s."),
event->value_string, ((Team*)event->value_pointer)->name);
break;
case EVENT_TYPE_PLAYER_CAREER_STOP:
sprintf(buf, _("%s's injury was so severe that he can't play football on a professional level anymore. He leaves your team."), player_of_id_team(event->user->tm, event->value1)->name);
if(event->user->tm->players->len < 12)
{
strcat(buf, _(" Fortunately he's got a cousin who can help your team out."));
player_replace_by_new(player_of_id_team(event->user->tm, event->value1), TRUE);
}
else
player_remove_from_team(event->user->tm, player_id_index(event->user->tm, event->value1));
treeview_show_user_player_list();
game_gui_show_warning(buf);
break;
case EVENT_TYPE_CHARITY:
game_gui_show_warning(_("The team owners are very satisfied with your financial management. Since the team's been earning a lot of money lately, they decide to donate half of it to charity."));
break;
}
user_event_remove(&current_user, 0);
}
/** Change the team of a user. */
void
user_change_team(User *user, Team *tm)
{
#ifdef DEBUG
printf("user_change_team\n");
#endif
gint i;
gint success = user->counters[COUNT_USER_SUCCESS];
/* Reset the ticketprice of the old team to the default value */
user->tm->stadium.ticket_price = const_int("int_team_stadium_ticket_price");
user->tm = tm;
user->team_id = tm->id;
user_set_up_team(user, FALSE);
user->counters[COUNT_USER_NEW_SPONSOR] = 0;
user->counters[COUNT_USER_SUCCESS] = (success < 0) ?
0 : (gint)rint((gfloat)success / 2);
g_string_free(user->sponsor.name, TRUE);
user->sponsor = user_get_sponsor(&current_user);
for(i=user->events->len - 1; i >= 0; i--)
user_event_remove(user, i);
}
/** Check whether one of the user teams has an unfit player
in the startup formation. */
gboolean
query_user_teams_have_unfit(void)
{
#ifdef DEBUG
printf("query_user_teams_have_unfit\n");
#endif
gint i, j;
for(i=0;i<users->len;i++)
{
if(query_user_game_in_week_round(i, week, week_round))
{
for(j=0;j<11;j++)
if(g_array_index(usr(i).tm->players, Player, j).health != 0 ||
player_is_banned(&g_array_index(usr(i).tm->players, Player, j)) > 0)
return TRUE;
}
}
return FALSE;
}
/** Compare function for history sorting. */
gint
user_history_compare(gconstpointer a, gconstpointer b)
{
#ifdef DEBUG
printf("user_history_compare\n");
#endif
gint return_value = 0;
const UserHistory *his1 = (const UserHistory*)a,
*his2 = (const UserHistory*)b;
if(his1->season < his2->season)
return_value = 1;
else if(his1->season > his2->season)
return_value = -1;
else if(his1->week < his2->week)
return_value = 1;
else if(his1->week > his2->week)
return_value = -1;
return return_value;
}
/** Add an element to the user history filled with the given values. */
void
user_history_add(User *user, gint type, const gchar *team_name,
const gchar* string0, const gchar *string1,
const gchar *string2)
{
#ifdef DEBUG
printf("user_history_add\n");
#endif
gint i;
UserHistory new_history;
UserHistory *his = &new_history;
gboolean replace = FALSE;
his->team_name = his->string[0] =
his->string[1] = his->string[2] = NULL;
if(type == USER_HISTORY_WIN_FINAL ||
type == USER_HISTORY_LOSE_FINAL ||
type == USER_HISTORY_REACH_CUP_ROUND)
{
for(i=0;i<user->history->len;i++)
if((g_array_index(user->history, UserHistory, i).type ==
USER_HISTORY_WIN_FINAL ||
g_array_index(user->history, UserHistory, i).type ==
USER_HISTORY_LOSE_FINAL ||
g_array_index(user->history, UserHistory, i).type ==
USER_HISTORY_REACH_CUP_ROUND) &&
g_array_index(user->history, UserHistory, i).season == season &&
strcmp(g_array_index(user->history, UserHistory, i).team_name,
team_name) == 0 &&
strcmp(g_array_index(user->history, UserHistory, i).string[0],
string0) == 0)
{
/** Same cup round. */
if(type == USER_HISTORY_REACH_CUP_ROUND &&
string2 != NULL &&
strcmp(g_array_index(user->history, UserHistory, i).string[2],
string2) == 0)
return;
his = &g_array_index(user->history, UserHistory, i);
replace = TRUE;
break;
}
}
if(type == USER_HISTORY_PROMOTED)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_promotion");
else if(type == USER_HISTORY_RELEGATED)
user->counters[COUNT_USER_SUCCESS] -=
const_int("int_user_success_relegation");
his->season = season;
his->week = week;
his->type = type;
if(replace)
{
if(string0 != NULL)
misc_string_assign(&his->string[0], string0);
if(string1 != NULL)
misc_string_assign(&his->string[1], string1);
if(string2 != NULL)
misc_string_assign(&his->string[2], string2);
g_array_sort(user->history, (GCompareFunc)user_history_compare);
}
else
{
his->team_name = g_strdup(team_name);
if(string0 != NULL)
his->string[0] = g_strdup(string0);
if(string1 != NULL)
his->string[1] = g_strdup(string1);
if(string2 != NULL)
his->string[2] = g_strdup(string2);
g_array_prepend_val(user->history, *his);
}
}
/** Write the text corresponding to the history event
into the buffer. */
void
user_history_to_string(const UserHistory *history, gchar *buf)
{
#ifdef DEBUG
printf("user_history_to_string\n");
#endif
switch(history->type)
{
default:
g_warning("user_history_to_string: unknown history type %d.\n", history->type);
strcpy(buf, "FIXME!!!");
case USER_HISTORY_START_GAME:
/* Buy a team in a league. */
sprintf(buf, _("You start the game with %s in the %s."),
history->team_name,
history->string[0]);
break;
case USER_HISTORY_FIRE_FINANCE:
/* Team fires, team in a league. */
sprintf(buf, _("%s fires you because of financial mismanagement.\nYou find a new job with %s in the %s."),
history->team_name,
history->string[0],
history->string[1]);
break;
case USER_HISTORY_FIRE_FAILURE:
/* Team fires, team in a league. */
sprintf(buf, _("%s fires you because of unsuccessfulness.\nYou find a new job with %s in the %s."),
history->team_name,
history->string[0],
history->string[1]);
break;
case USER_HISTORY_JOB_OFFER_ACCEPTED:
/* Team in a league. Leave team. */
sprintf(buf, _("%s offer you a job in the %s.\nYou accept the challenge and leave %s."),
history->string[0],
history->string[1],
history->team_name);
break;
case USER_HISTORY_END_SEASON:
/* League name. */
sprintf(buf, _("You finish the season in the %s on rank %s."),
history->string[0],
history->string[1]);
break;
case USER_HISTORY_PROMOTED:
/* League name. */
sprintf(buf, _("You get promoted to the %s."),
history->string[0]);
break;
case USER_HISTORY_RELEGATED:
/* League name. */
sprintf(buf, _("You get relegated to the %s."),
history->string[0]);
break;
case USER_HISTORY_WIN_FINAL:
/* Cup name, team name. */
sprintf(buf, _("You win the %s final against %s."),
history->string[0],
history->string[1]);
break;
case USER_HISTORY_LOSE_FINAL:
/* Cup name, team name. */
sprintf(buf, _("You lose in the %s final against %s."),
history->string[0],
history->string[1]);
break;
case USER_HISTORY_REACH_CUP_ROUND:
/* Cup round name (e.g. Last 32), number, cup name. */
sprintf(buf, _("You reach the %s (round %s) of the %s."),
history->string[1],
history->string[2],
history->string[0]);
break;
case USER_HISTORY_CHAMPION:
/* League name. */
sprintf(buf, _("You are champion of the %s!"),
history->string[0]);
break;
}
}
/** Increase the user success counter when the user
is successful in a cup. */
void
user_add_cup_success(User *user, const Cup *cup, gint round, gint type)
{
#ifdef DEBUG
printf("user_add_cup_success\n");
#endif
gboolean international, national;
international = query_league_cup_has_property(cup->id, "international");
national = query_league_cup_has_property(cup->id, "national");
if(type == USER_HISTORY_WIN_FINAL)
{
if(international)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_international_winner");
else if(national)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_national_winner");
}
else if(type == USER_HISTORY_LOSE_FINAL)
{
if(international)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_international_final");
else if(international)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_national_winner");
const_int("int_user_success_national_final");
}
else if(type == USER_HISTORY_REACH_CUP_ROUND)
{
if(round == cup_from_clid(cup->id)->rounds->len - 2)
{
if(international)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_international_semis");
else if(national)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_national_semis");
}
else if(round == cup_from_clid(cup->id)->rounds->len - 3)
{
if(international)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_international_quarter");
else if(national)
user->counters[COUNT_USER_SUCCESS] +=
const_int("int_user_success_national_quarter");
}
}
}
/** Find out whether there's a user who
didn't have his turn before a new week round begins. */
gboolean
query_user_no_turn(void)
{
#ifdef DEBUG
printf("query_user_no_turn\n");
#endif
gint i;
for(i=0;i<users->len;i++)
if(!usr(i).counters[COUNT_USER_TOOK_TURN])
return TRUE;
return FALSE;
}
/** Get a random sponsor for the user. */
UserSponsor
user_get_sponsor(const User *user)
{
#ifdef DEBUG
printf("user_get_sponsor\n");
#endif
UserSponsor new;
gint suc_factor = (current_user.counters[COUNT_USER_SUCCESS] < 0) ? -1 : 1;
gchar *names[18] =
/* Company name. */
{_(" Systems"),
/* Company name. */
_(" Communications"),
/* Company name. */
_(" Holdings"),
/* Company name. */
_(" Industries"),
/* Company name. */
_(" Company"),
/* Company name. */
_(" Telecommunications"),
/* Company name. */
_(" Labs"),
/* Company name. */
_(" Technologies"),
/* Company name. */
_(" Chemicals"),
/* Company name. */
_(" Energy"),
/* Company name. */
_(" Bank"),
/* Company name. */
_(" Products"),
/* Company name. */
_(" Software"),
/* Company name. */
_(" Scientific"),
/* Company name. */
_(" Financial"),
/* Company name. */
_(" Petroleum"),
/* Company name. */
_(" Restaurants"),
/* Company name. */
_(" Data Systems")};
gchar *short_names[7] =
/* Company short name, leading to things like 'Marshall Data Systems Ltd.' */
{_(" Ltd."),
/* Company short name. */
_(" Assoc."),
/* Company short name. */
_(" Co."),
/* Company short name. */
_(" Ent."),
/* Company short name. Copy the '&amp;'. */
_(" &amp; Co."),
/* Company short name. */
_(" Corp."),
/* Company short name. */
_(" Group")};
gchar *name_add[3] =
/* Company addition, leading to 'Marshall & Sons Petroleum Co.'. Copy the '&amp;'. */
{_(" &amp; Sons"),
/* Company addition. Copy the '&amp;'. */
_(" &amp; Daughters"),
/* Company addition. */
_(" Bros.")};
new.name = g_string_new(name_get_random_last_name(name_get_list_from_sid(user->tm->names_file)));
if(math_rnd(0, 1) < 0.2)
g_string_append(new.name, name_add[math_rndi(0, 2)]);
g_string_append(new.name, names[math_rndi(0, 17)]);
if(math_rnd(0, 1) < 0.7)
g_string_append(new.name, short_names[math_rndi(0, 6)]);
new.contract = 4 * math_rndi(9, 36);
new.benefit = (gint)rint((((const_float("float_sponsor_wage_percentage_upper") -
const_float("float_sponsor_wage_percentage_lower")) /
(2 * (gfloat)const_int("int_user_success_offer_limit"))) *
(gfloat)current_user.counters[COUNT_USER_SUCCESS]
+ ((const_float("float_sponsor_wage_percentage_upper") -
const_float("float_sponsor_wage_percentage_lower")) / 2)) *
(1 + suc_factor * ((gfloat)new.contract / 52 - 1) *
const_float("float_sponsor_contract_length_factor")) *
(finance_wage_unit(current_user.tm) * current_user.tm->players->len));
new.benefit = math_round_integer(new.benefit, 2);
return new;
}
/** Show a list of sponsors for the user to choose from. */
void
user_show_sponsors(void)
{
#ifdef DEBUG
printf("user_show_sponsors\n");
#endif
gint i, num_offers;
GArray *sponsors = g_array_new(FALSE, FALSE, sizeof(UserSponsor));
UserSponsor sponsor;
if(ABS(current_user.counters[COUNT_USER_SUCCESS]) >=
const_int("int_user_success_offer_limit"))
num_offers = (current_user.counters[COUNT_USER_SUCCESS] < 0) ?
const_int("int_sponsor_offers_lower") :
const_int("int_sponsor_offers_upper");
else
num_offers = (gint)rint(((gfloat)(const_int("int_sponsor_offers_upper") -
const_int("int_sponsor_offers_lower")) /
(2 * (gfloat)const_int("int_user_success_offer_limit"))) *
(gfloat)current_user.counters[COUNT_USER_SUCCESS]
+ ((gfloat)(const_int("int_sponsor_offers_upper") -
const_int("int_sponsor_offers_lower")) / 2) + 1);
num_offers += math_rndi(-1, 1);
if(num_offers <= 0)
num_offers = 1;
for(i=0;i<num_offers;i++)
{
sponsor = user_get_sponsor(&current_user);
g_array_append_val(sponsors, sponsor);
}
window_create(WINDOW_SPONSORS);
treeview_show_sponsors(sponsors);
for(i=0;i<num_offers;i++)
g_string_free(g_array_index(sponsors, UserSponsor, i).name, TRUE);
g_array_free(sponsors, TRUE);
}
/** The current sponsor offers to continue. */
void
user_show_sponsor_continue(void)
{
#ifdef DEBUG
printf("user_show_sponsor_continue\n");
#endif
GArray *sponsors = g_array_new(FALSE, FALSE, sizeof(UserSponsor));
UserSponsor sponsor;
gchar buf[SMALL];
sponsor = user_get_sponsor(&current_user);
g_string_printf(sponsor.name, current_user.sponsor.name->str);
g_array_append_val(sponsors, sponsor);
window_create(WINDOW_SPONSORS);
sprintf(buf, _("Your current sponsor is satisfied with your results and would like to renew the contract. Currently they're paying you %d a week."), current_user.sponsor.benefit);
gtk_label_set_text(GTK_LABEL(lookup_widget(window.sponsors, "label_sponsors")), buf);
treeview_show_sponsors(sponsors);
g_string_free(g_array_index(sponsors, UserSponsor, 0).name, TRUE);
g_array_free(sponsors, TRUE);
stat1 = STATUS_SPONSOR_CONTINUE;
}
/** Load a MM file. */
void
user_mm_load_file(const gchar *filename, GArray *mmatches)
{
#ifdef DEBUG
printf("user_mm_load_file\n");
#endif
GString *prefix = g_string_new("");
gchar filename_local[SMALL],
matches_file[SMALL];
GArray *mm_array = (mmatches == NULL) ?
current_user.mmatches : mmatches;
strcpy(filename_local, filename);
g_string_append_len(prefix, filename_local, strlen(filename_local) - 8);
//prefix[strlen(filename_local) - 8] = '\0';
sprintf(matches_file, "%s___mmatches", prefix->str);
file_decompress(filename_local);
if(mmatches == NULL)
free_mmatches(&mm_array, TRUE);
xml_mmatches_read(matches_file, mm_array);
g_string_append(prefix, "___*");
file_remove_files(prefix);
if(mmatches == NULL)
misc_string_assign(&current_user.mmatches_file, filename_local);
g_string_free(prefix, TRUE);
}
/** Add the last match to the MM file.
@param load_file Whether to load the matches from the file first.
@param save_file Whether to save the MM array
to file afterwards. */
void
user_mm_add_last_match(gboolean load_file, gboolean save_file)
{
#ifdef DEBUG
printf("user_mm_add_last_match\n");
#endif
MemMatch new;
const Fixture *fix = current_user.live_game.fix;
gchar buf[SMALL];
if(fix->clid < ID_CUP_START)
new.competition_name = g_string_new(league_cup_get_name_string(fix->clid));
else
{
cup_round_name(fix, buf);
new.competition_name = g_string_new("");
g_string_printf(new.competition_name, "%s %s",
league_cup_get_name_string(fix->clid), buf);
}
new.country_name = g_strdup(country.name);
new.neutral = !(fix->home_advantage);
new.user_team = (fix->team_ids[0] != current_user.team_id);
new.lg = current_user.live_game;
/** This will tell the free function NOT
to free the user live game. */
current_user.live_game.started_game = -1;
current_user.live_game.units =
g_array_new(FALSE, FALSE, sizeof(LiveGameUnit));
if(load_file)
user_mm_load_file(current_user.mmatches_file, NULL);
g_array_append_val(current_user.mmatches, new);
game_gui_print_message(_("Memorable match added."));
if(save_file)
user_mm_save_file(current_user.mmatches_file,
current_user.mmatches);
}
/** Save an MM file. */
void
user_mm_save_file(const gchar *filename, const GArray *mmatches)
{
#ifdef DEBUG
printf("user_mm_save_file\n");
#endif
gchar prefix[SMALL];
strncpy(prefix, filename, strlen(filename) - 8);
prefix[strlen(filename) - 8] = '\0';
strcat(prefix, "___");
xml_mmatches_write(prefix, mmatches);
file_compress_files(filename, prefix);
}
/** Set an appropriate filename for the memorable
matches file. */
void
user_mm_set_filename(const gchar *filename, gchar *dest)
{
#ifdef DEBUG
printf("user_mm_set_filename\n");
#endif
gchar buf[SMALL];
if(g_str_has_suffix(filename, ".bmm.zip"))
{
if(dest == NULL)
misc_string_assign(&current_user.mmatches_file, filename);
else
strcpy(dest, filename);
return;
}
strcpy(buf, filename);
while(g_str_has_suffix(buf, ".bmm") ||
g_str_has_suffix(buf, ".zip"))
buf[strlen(buf) - 4] = '\0';
if(dest == NULL)
{
strcat(buf, ".bmm.zip");
misc_string_assign(&current_user.mmatches_file, buf);
}
else
sprintf(dest, "%s.bmm.zip", buf);
}
/** Import an MM file into the user's MMs. */
void
user_mm_import_file(const gchar *filename)
{
#ifdef DEBUG
printf("user_mm_import_file\n");
#endif
GArray *mm_array = g_array_new(FALSE, FALSE, sizeof(MemMatch));
gint i;
user_mm_load_file(filename, mm_array);
for(i=0;i<mm_array->len;i++)
g_array_append_val(current_user.mmatches, g_array_index(mm_array, MemMatch, i));
g_array_free(mm_array, TRUE);
}
/** Export a match to a file. */
void
user_mm_export_file(const gchar *filename)
{
#ifdef DEBUG
printf("user_mm_export_file\n");
#endif
gchar buf[SMALL];
GArray *mmatches = g_array_new(FALSE, FALSE, sizeof(MemMatch));
user_mm_set_filename(filename, buf);
g_array_append_val(mmatches, g_array_index(current_user.mmatches, MemMatch, stat4));
user_mm_save_file(buf, mmatches);
g_array_free(mmatches, TRUE);
}
Reference in New Issue View Git Blame Copy Permalink