static void
clear_game (void)
{
int x, y;
for (y = 0; y < WORLD_SIDE_LEN; y++) {
for (x = 0; x < WORLD_SIDE_LEN; x++) {
clear_mappoint (CST_GREEN, x, y);
MP_POL(x,y) = 0;
}
}
total_time = 0;
coal_survey_done = 0;
numof_shanties = 0;
numof_communes = 0;
numof_substations = 0;
numof_health_centres = 0;
numof_markets = 0;
max_pop_ever = 0;
total_evacuated = 0;
total_births = 0;
total_money = 0;
tech_level = 0;
init_inventory();
update_avail_modules(0);
}
void config_pc(dungeon_t *d)
{
/* This should be in the PC constructor, now. */
pc *the_pc;
//One-Punch mode dice: pc_dice(0xFFFFFFFE, 1, 1)
static dice pc_dice(0, 1, 4);
the_pc = new pc;
d->pc = (character *) the_pc;
the_pc->symbol = '@';
place_pc(d);
the_pc->speed = PC_SPEED;
the_pc->hp = PC_HP;
the_pc->next_turn = 0;
the_pc->alive = 1;
the_pc->sequence_number = 0;
the_pc->color.push_back(COLOR_WHITE);
the_pc->damage = &pc_dice;
the_pc->name = "Isabella Garcia-Shapiro";
d->charmap[the_pc->position[dim_y]]
[the_pc->position[dim_x]] = (character *) d->pc;
dijkstra(d);
dijkstra_tunnel(d);
init_inventory(d);
}
void check_env_map7(t_data *data)
{
if (data->map.end == 1)
{
init_main(data);
init_text(data);
init_map(data);
init_inventory(data);
bunny_delete_sound(&data->menu.menu_music->sound);
init_menu(data);
data->menu.menu_value = 1;
}
if ((data->mouse->x >= 13 && data->mouse->x <= 249) &&
(data->mouse->y >= 182 && data->mouse->y <= 367))
{
if (data->player_pos != 0)
position_handle(182, 330, data);
else
{
load_map6(data);
}
}
else
check_env_map7_2(data);
}
int init_player(t_game *game_data, t_player *player)
{
(void) game_data;
player->level = 1;
player->inventory = NULL;
player->cycles_to_die = BASE_FOOD * FOOD_CONSUMING_CYCLE;
if (init_inventory(player) == -1)
return (-1);
if (init_player_exec_line(player) == -1)
return (-1);
player->orientation = UP;
return (0);
}
void load_test_assets()
{
item_types = Arena_Push_Array(game->play_arena, Item_Info, Max_Item_Info_Count);
_add_item(none, 0, 0, 0);
_add_item(hooknife, 1, 0, 5);
_add_item(rope, 8, 1, 5);
_add_item(book, 64, 2, 5);
_add_item(rock, 64, 3, 0);
init_inventory(&inventory, 9, 6, game->play_arena);
Item_Stack* stack = new_item_stack(item_types + 1, game->play_arena);
printf("%0x \n", (usize)stack);
inventory_add_item(&inventory, &stack);
printf("%0x \n", (usize)stack);
}
static int __init init_irix_binfmt(void)
{
extern int init_inventory(void);
extern asmlinkage unsigned long sys_call_table;
extern asmlinkage unsigned long sys_call_table_irix5;
init_inventory();
/*
* Copy the IRIX5 syscall table (8000 bytes) into the main syscall
* table. The IRIX5 calls are located by an offset of 8000 bytes
* from the beginning of the main table.
*/
memcpy((void *) ((unsigned long) &sys_call_table + 8000),
&sys_call_table_irix5, 8000);
return register_binfmt(&irix_format);
}
inv_t *load_inventory(FILE *f)
{
char str[9];
inv_t *i;
int j;
fread(str, sizeof(char), 9, f);
if(strncmp(str, "INVENTORY", 9)) {
fprintf(stderr, "DEBUG: %s:%d - Inventory not where I expected!\n", __FILE__, __LINE__);
return false;
}
i = init_inventory();
fread(&i->num_used, sizeof(short), 1, f);
fread(&i->gold, sizeof(int), 1, f);
for(j = 0; j < 52; j++)
i->object[j] = load_object(f);
return i;
}
int parse_monsters()
{
config_setting_t *cfg_monsters;
int i, j, boolval, tmp, id;
char sname[100];
const char *value;
char string[50];
cfg_monsters = config_lookup(cf, "monsters");
i = config_setting_length(cfg_monsters);
game->monsterdefs = i;
printf("Parsing monster file... We have %d monsters", i);
/*
* main monster parsing loop
* goes through each possible setting, looks it up in the cfg file
* and adds it to a monster structure which is then placed in the
* linked list monsterdefs.
*/
for(j=0;j<i;j++) {
monster_t *m;
m = (monster_t *) gtmalloc(sizeof(monster_t));
id = j+1;
sprintf(sname, "monsters.[%d].name", j);
config_lookup_string(cf, sname, &value);
strcpy(m->name, value);
sprintf(sname, "monsters.[%d].str", j);
config_lookup_int(cf, sname, &(m->attr.str));
sprintf(sname, "monsters.[%d].phy", j);
config_lookup_int(cf, sname, &(m->attr.phy));
sprintf(sname, "monsters.[%d].intl", j);
config_lookup_int(cf, sname, &(m->attr.intl));
sprintf(sname, "monsters.[%d].wis", j);
config_lookup_int(cf, sname, &(m->attr.wis));
sprintf(sname, "monsters.[%d].dex", j);
config_lookup_int(cf, sname, &(m->attr.dex));
sprintf(sname, "monsters.[%d].cha", j);
config_lookup_int(cf, sname, &(m->attr.cha));
sprintf(sname, "monsters.[%d].appearance", j);
config_lookup_string(cf, sname, &value);
m->c = (char) *value;
sprintf(sname, "monsters.[%d].level", j);
config_lookup_int(cf, sname, &(m->level));
sprintf(sname, "monsters.[%d].hp", j);
config_lookup_int(cf, sname, &(m->hp));
m->maxhp = m->hp;
sprintf(sname, "monsters.[%d].speed", j);
config_lookup_int(cf, sname, &(m->speed));
sprintf(sname, "monsters.[%d].havegold", j);
if(config_lookup_bool(cf, sname, &boolval))
if(boolval)
setbit(m->flags, MF_CANHAVEGOLD);
sprintf(sname, "monsters.[%d].useweapon", j);
if(config_lookup_bool(cf, sname, &boolval))
if(boolval)
setbit(m->flags, MF_CANUSEWEAPON);
sprintf(sname, "monsters.[%d].usearmor", j);
if(config_lookup_bool(cf, sname, &boolval))
if(boolval)
setbit(m->flags, MF_CANUSEARMOR);
sprintf(sname, "monsters.[%d].aitype", j);
config_lookup_int(cf, sname, &tmp);
m->ai = aitable[tmp];
m->mid = tmp; // for monsterdefs, mid holds aitableindex
m->id = id;
m->viewradius = 12; // temporary solution?!
// Let's give the monster a weapon!
if(hasbit(m->flags, MF_CANUSEWEAPON)) {
int x;
obj_t *o;
sprintf(sname, "monsters.[%d].weapon", j);
config_lookup_string(cf, sname, &value);
strcpy(string, value);
x = get_objdef_by_name(string);
m->inventory = init_inventory();
o = spawn_object(x, 0);
m->inventory->object[0] = o;
m->weapon = o;
}
if(hasbit(m->flags, MF_CANHAVEGOLD)) {
if(!m->inventory)
m->inventory = init_inventory();
m->inventory->gold += ri(0, 15*m->level);
}
//if(m->weapon)
//fprintf(stderr, "DEBUG: %s:%d - %s has the weapon called a %s\n", __FILE__, __LINE__, m->name, m->weapon->basename);
/*
* the following was written in one go, it's beautiful and seems totally bugfree!!
*/
m->head = monsterdefs->head;
monsterdefs->next = m;
m->next = NULL;
m->prev = monsterdefs;
monsterdefs = m;
printf("."); // "progress bar"
}
printf(" OK\n");
monsterdefs->head->x = i; // store number of monsters in x of head.
return 0;
}
void load_city_2(char *cname)
{
int i, x, y, p;
int dumbint = 0;
int num_pbars, pbar_data_size;
int pbar_tmp;
int dummy;
gzFile gzfile;
char s[512];
clear_game();
gzfile = gzopen(cname, "rb");
if (gzfile == NULL) {
printf(_("Can't open <%s> (gzipped)"), cname);
do_error("Can't open it!");
}
sscanf(gzgets(gzfile, s, 256), "%d", &ldsv_version);
if (ldsv_version < WATERWELL_V2) {
gzclose(gzfile);
load_city_old( cname );
/* Fix desert frontier for old saved games and scenarios */
desert_frontier(0, 0, WORLD_SIDE_LEN, WORLD_SIDE_LEN);
return;
}
fprintf(stderr, " ldsv_version = %i \n", ldsv_version);
use_waterwell = true;
init_pbars();
num_pbars = NUM_PBARS;
pbar_data_size = PBAR_DATA_SIZE;
init_inventory();
print_time_for_year();
// Easier debugging from saved game: #Line = 100 x + y + 1 (first line = ldsv_version)
for (x = 0; x < WORLD_SIDE_LEN; x++) {
for (y = 0; y < WORLD_SIDE_LEN; y++) {
gzgets(gzfile, s, 512);
// TY po fl cr or i1 i2 i3 i4 i5 i6 i7 PL al ec ws gp wa wp ww wn g1 g2 g3 g4 DA TK AN d4 d5 d6 d7 d8 d9
sscanf(s, "%hi %d %i %hu %hu %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d"
, &MP_TYPE(x, y)
, &MP_INFO(x, y).population
, &MP_INFO(x, y).flags
, &MP_INFO(x, y).coal_reserve
, &MP_INFO(x, y).ore_reserve
, &MP_INFO(x, y).int_1
, &MP_INFO(x, y).int_2
, &MP_INFO(x, y).int_3
, &MP_INFO(x, y).int_4
, &MP_INFO(x, y).int_5
, &MP_INFO(x, y).int_6
, &MP_INFO(x, y).int_7
, &MP_POL(x, y)
, &ground[x][y].altitude
, &ground[x][y].ecotable
, &ground[x][y].wastes
, &ground[x][y].pollution
, &ground[x][y].water_alt
, &ground[x][y].water_pol
, &ground[x][y].water_wast
, &ground[x][y].water_next
, &ground[x][y].int1
, &ground[x][y].int2
, &ground[x][y].int3
, &ground[x][y].int4
, &MP_DATE(x,y) // d1 = date of built
, &MP_TECH(x,y) // d2 = tech at build time
, &MP_ANIM(x,y) // d3 = animation_time (see reset_animation_time mess :)
, &dumbint // d4 could be image index for smooth animation, cf windmill anim_tile
, &dumbint // d5 percentage of activity to choose family of pic
, &dumbint // d6
, &dumbint // d7
, &dumbint // d8
, &dumbint // d9
);
if (get_group_of_type(MP_TYPE(x, y)) == GROUP_MARKET)
inventory(x, y);
}
}
set_map_groups();
sscanf(gzgets(gzfile, s, 256), "%d", &main_screen_originx);
sscanf(gzgets(gzfile, s, 256), "%d", &main_screen_originy);
sscanf(gzgets(gzfile, s, 256), "%d", &total_time);
for (x = 0; x < MAX_NUMOF_SUBSTATIONS; x++) {
sscanf(gzgets(gzfile, s, 256), "%d", &substationx[x]);
sscanf(gzgets(gzfile, s, 256), "%d", &substationy[x]);
}
sscanf(gzgets(gzfile, s, 256), "%d", &numof_substations);
for (x = 0; x < MAX_NUMOF_MARKETS; x++) {
sscanf(gzgets(gzfile, s, 256), "%d", &marketx[x]);
sscanf(gzgets(gzfile, s, 256), "%d", &markety[x]);
}
sscanf(gzgets(gzfile, s, 256), "%d", &numof_markets);
sscanf(gzgets(gzfile, s, 256), "%d", &people_pool);
sscanf(gzgets(gzfile, s, 256), "%o", &total_money);
sscanf(gzgets(gzfile, s, 256), "%d", &income_tax_rate);
sscanf(gzgets(gzfile, s, 256), "%d", &coal_tax_rate);
sscanf(gzgets(gzfile, s, 256), "%d", &dole_rate);
sscanf(gzgets(gzfile, s, 256), "%d", &transport_cost_rate);
sscanf(gzgets(gzfile, s, 256), "%d", &goods_tax_rate);
sscanf(gzgets(gzfile, s, 256), "%d", &export_tax);
sscanf(gzgets(gzfile, s, 256), "%d", &export_tax_rate);
sscanf(gzgets(gzfile, s, 256), "%d", &import_cost);
sscanf(gzgets(gzfile, s, 256), "%d", &import_cost_rate);
sscanf(gzgets(gzfile, s, 256), "%d", &tech_level);
sscanf(gzgets(gzfile, s, 256), "%d", &tpopulation);
sscanf(gzgets(gzfile, s, 256), "%d", &tstarving_population);
sscanf(gzgets(gzfile, s, 256), "%d", &tunemployed_population);
sscanf(gzgets(gzfile, s, 256), "%d", &x); /* waste_goods obsolete */
sscanf(gzgets(gzfile, s, 256), "%d", &power_made);
sscanf(gzgets(gzfile, s, 256), "%d", &power_used);
sscanf(gzgets(gzfile, s, 256), "%d", &coal_made);
sscanf(gzgets(gzfile, s, 256), "%d", &coal_used);
sscanf(gzgets(gzfile, s, 256), "%d", &goods_made);
sscanf(gzgets(gzfile, s, 256), "%d", &goods_used);
sscanf(gzgets(gzfile, s, 256), "%d", &ore_made);
sscanf(gzgets(gzfile, s, 256), "%d", &ore_used);
sscanf(gzgets(gzfile, s, 256), "%d", &dummy); /* &diff_old_population */
/* Update variables calculated from those above */
housed_population = tpopulation / ((total_time % NUMOF_DAYS_IN_MONTH) + 1);
/* Get size of monthgraph array */
sscanf(gzgets(gzfile, s, 256), "%d", &i);
for (x = 0; x < i; x++) {
/* If more entries in file than will fit on screen,
then we need to skip past them. */
if (x >= monthgraph_size) {
sscanf(gzgets(gzfile, s, 256), "%d", &dummy); /* &monthgraph_pop[x] */
sscanf(gzgets(gzfile, s, 256), "%d", &dummy); /* &monthgraph_starve[x] */
sscanf(gzgets(gzfile, s, 256), "%d", &dummy); /* &monthgraph_nojobs[x] */
sscanf(gzgets(gzfile, s, 256), "%d", &dummy); /* &monthgraph_ppool[x] */
} else {
sscanf(gzgets(gzfile, s, 256), "%d", &monthgraph_pop[x]);
sscanf(gzgets(gzfile, s, 256), "%d", &monthgraph_starve[x]);
sscanf(gzgets(gzfile, s, 256), "%d", &monthgraph_nojobs[x]);
sscanf(gzgets(gzfile, s, 256), "%d", &monthgraph_ppool[x]);
}
}
/* If screen bigger than number of entries in file, pad with zeroes */
while (x < monthgraph_size) {
monthgraph_pop[x] = 0;
monthgraph_starve[x] = 0;
monthgraph_nojobs[x] = 0;
monthgraph_ppool[x] = 0;
x++;
}
sscanf(gzgets(gzfile, s, 256), "%d", &rockets_launched);
sscanf(gzgets(gzfile, s, 256), "%d", &rockets_launched_success);
sscanf(gzgets(gzfile, s, 256), "%d", &coal_survey_done);
for (x = 0; x < pbar_data_size; x++) {
for (p = 0; p < num_pbars; p++) {
sscanf(gzgets(gzfile, s, 256), "%d", &(pbar_tmp));
update_pbar(p, pbar_tmp, 1);
}
}
for (p = 0; p < num_pbars; p++)
pbars[p].data_size = pbar_data_size;
for (p = 0; p < num_pbars; p++) {
sscanf(gzgets(gzfile, s, 256), "%d", &(pbars[p].oldtot));
sscanf(gzgets(gzfile, s, 256), "%d", &(pbars[p].diff));
}
sscanf(gzgets(gzfile, s, 256), "%d", &cheat_flag);
sscanf(gzgets(gzfile, s, 256), "%d", &total_pollution_deaths);
sscanf(gzgets(gzfile, s, 256), "%f", &pollution_deaths_history);
sscanf(gzgets(gzfile, s, 256), "%d", &total_starve_deaths);
sscanf(gzgets(gzfile, s, 256), "%f", &starve_deaths_history);
sscanf(gzgets(gzfile, s, 256), "%d", &total_unemployed_years);
sscanf(gzgets(gzfile, s, 256), "%f", &unemployed_history);
sscanf(gzgets(gzfile, s, 256), "%d", &max_pop_ever);
sscanf(gzgets(gzfile, s, 256), "%d", &total_evacuated);
sscanf(gzgets(gzfile, s, 256), "%d", &total_births);
for (x = 0; x < NUMOF_MODULES; x++)
sscanf(gzgets(gzfile, s, 256), "%d", &(module_help_flag[x]));
sscanf(gzgets(gzfile, s, 256), "%128s", given_scene);
if (strncmp(given_scene, "dummy", 5) == 0 || strlen(given_scene) < 3)
given_scene[0] = 0;
sscanf(gzgets(gzfile, s, 256), "%128s", s);
if (strncmp(given_scene, "dummy", 5) != 0)
sscanf(s, "%d", &highest_tech_level);
else
highest_tech_level = 0;
gzgets(gzfile, s, 200);
if (sscanf
(s, "sust %d %d %d %d %d %d %d %d %d %d", &sust_dig_ore_coal_count, &sust_port_count, &sust_old_money_count,
&sust_old_population_count, &sust_old_tech_count, &sust_fire_count, &sust_old_money, &sust_old_population,
&sust_old_tech, &sustain_flag) == 10) {
sust_dig_ore_coal_tip_flag = sust_port_flag = 1;
} else
sustain_flag = sust_dig_ore_coal_count = sust_port_count
= sust_old_money_count = sust_old_population_count
= sust_old_tech_count = sust_fire_count = sust_old_money = sust_old_population = sust_old_tech = 0;
gzgets(gzfile, s, 80);
sscanf(s, "arid %d %d", &global_aridity, &global_mountainity);
gzclose(gzfile);
/* FIXME: AL1 this is initialisation stuff, should go elsewhere */
// Engine stuff
if (tech_level > MODERN_WINDMILL_TECH)
modern_windmill_flag = 1;
numof_shanties = count_groups(GROUP_SHANTY);
numof_communes = count_groups(GROUP_COMMUNE);
/* set up the university intake. */
x = count_groups(GROUP_UNIVERSITY);
if (x > 0) {
university_intake_rate = (count_groups(GROUP_SCHOOL) * 20) / x;
if (university_intake_rate > 100)
university_intake_rate = 100;
} else
university_intake_rate = 50;
print_total_money();
//reset_animation_times
//get alt_min, alt_max
alt_min = 2000000000;
alt_max = -alt_min;
for ( y = 0; y < WORLD_SIDE_LEN; y++){
for ( x = 0; x < WORLD_SIDE_LEN; x++) {
MP_ANIM(x,y) = 0;
if (MP_GROUP(x, y) == GROUP_FIRE){
MP_INFO(x, y).int_3 = 0;
}
if (alt_min > ALT(x,y)){
alt_min = ALT(x,y);
}
if (alt_max < ALT(x,y)){
alt_max = ALT(x,y);
}
}
}
alt_step = (alt_max - alt_min) /10;
map_power_grid(true); /* WCK: Is this safe to do here?
* AL1: No, in NG_1.1
* In case of error message with ok_dial_box
* the dialog cannot appear because the screen
* is not set up => crash.
* FIXME: move all initialisation elsewhere, in
* engine.cpp or simulate.cpp.
*/
// UI stuff
if (main_screen_originx > WORLD_SIDE_LEN - getMainWindowWidth() / 16 - 1)
main_screen_originx = WORLD_SIDE_LEN - getMainWindowWidth() / 16 - 1;
if (main_screen_originy > WORLD_SIDE_LEN - getMainWindowHeight() / 16 - 1)
main_screen_originy = WORLD_SIDE_LEN - getMainWindowHeight() / 16 - 1;
unhighlight_module_button(selected_module);
selected_module = sbut[7]; /* 7 is track. Watch out though! */
highlight_module_button(selected_module);
set_selected_module(CST_TRACK_LR);
connect_transport(1, 1, WORLD_SIDE_LEN - 2, WORLD_SIDE_LEN - 2);
/* Fix desert frontier for old saved games and scenarios */
desert_frontier(0, 0, WORLD_SIDE_LEN, WORLD_SIDE_LEN);
}
void
load_city (char *cname)
{
unsigned long q;
int i, x, y, z, n, p;
int num_pbars, pbar_data_size;
int pbar_tmp;
int dummy;
gzFile gzfile;
char s[256];
gzfile = gzopen( cname, "rb" );
if ( gzfile == NULL) {
printf (_("Can't open <%s> (gzipped)"), cname);
do_error ("Can't open it!");
}
/* Add version to shared global variables for playing/saving games without waterwell */
sscanf( gzgets( gzfile, s, 256 ), "%d", &ldsv_version);
if (ldsv_version < MIN_LOAD_VERSION) {
ok_dial_box ("too-old.mes", BAD, 0L);
gzclose( gzfile );
return;
}
fprintf(stderr," ldsv_version = %i \n", ldsv_version);
if (ldsv_version < MIN_WATERWELL_VERSION) {
/* ok_dial_box ("no-waterwell.mes", GOOD, 0L);*/
use_waterwell=false;
} else {
use_waterwell=true;
/* needed until it is written in the saved file
* in case of load after having played an old game
*/
}
init_pbars();
num_pbars = NUM_PBARS;
pbar_data_size = PBAR_DATA_SIZE;
init_inventory();
print_time_for_year();
q = (unsigned long) sizeof (Map_Point_Info);
prog_box (_("Loading scene"), 0);
for (x = 0; x < WORLD_SIDE_LEN; x++) {
for (y = 0; y < WORLD_SIDE_LEN; y++) {
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).population) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).flags) + z) = n;
}
for (z = 0; z < sizeof(unsigned short); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).coal_reserve) + z) = n;
}
for (z = 0; z < sizeof(unsigned short); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).ore_reserve) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_1) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_2) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_3) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_4) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_5) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_6) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_7) + z) = n;
}
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
MP_POL(x,y) = (unsigned short) n;
sscanf( gzgets( gzfile, s, 256 ), "%d", &n);
MP_TYPE(x,y) = (short) n;
if (get_group_of_type(MP_TYPE(x,y)) == GROUP_MARKET)
inventory(x,y);
}
if (((93 * x) / WORLD_SIDE_LEN) % 3 == 0)
prog_box ("", (93 * x) / WORLD_SIDE_LEN);
}
check_endian ();
set_map_groups ();
sscanf( gzgets( gzfile, s, 256 ), "%d", &main_screen_originx);
sscanf( gzgets( gzfile, s, 256 ), "%d", &main_screen_originy);
if (main_screen_originx > WORLD_SIDE_LEN - getMainWindowWidth() / 16 - 1)
main_screen_originx = WORLD_SIDE_LEN - getMainWindowWidth() / 16 - 1;
if (main_screen_originy > WORLD_SIDE_LEN - getMainWindowHeight() / 16 - 1)
main_screen_originy = WORLD_SIDE_LEN - getMainWindowHeight() / 16 - 1;
sscanf( gzgets( gzfile, s, 256 ), "%d", &total_time);
if (ldsv_version <= MM_MS_C_VER)
i = OLD_MAX_NUMOF_SUBSTATIONS;
else
i = MAX_NUMOF_SUBSTATIONS;
for (x = 0; x < i; x++)
{
sscanf( gzgets( gzfile, s, 256 ), "%d", &substationx[x]);
sscanf( gzgets( gzfile, s, 256 ), "%d", &substationy[x]);
}
prog_box ("", 92);
sscanf( gzgets( gzfile, s, 256 ), "%d", &numof_substations);
if (ldsv_version <= MM_MS_C_VER)
i = OLD_MAX_NUMOF_MARKETS;
else
i = MAX_NUMOF_MARKETS;
for (x = 0; x < i; x++)
{
sscanf( gzgets( gzfile, s, 256 ), "%d", &marketx[x]);
sscanf( gzgets( gzfile, s, 256 ), "%d", &markety[x]);
}
prog_box ("", 94);
sscanf( gzgets( gzfile, s, 256 ), "%d", &numof_markets);
sscanf( gzgets( gzfile, s, 256 ), "%d", &people_pool);
sscanf( gzgets( gzfile, s, 256 ), "%d", &total_money);
sscanf( gzgets( gzfile, s, 256 ), "%d", &income_tax_rate);
sscanf( gzgets( gzfile, s, 256 ), "%d", &coal_tax_rate);
sscanf( gzgets( gzfile, s, 256 ), "%d", &dole_rate);
sscanf( gzgets( gzfile, s, 256 ), "%d", &transport_cost_rate);
sscanf( gzgets( gzfile, s, 256 ), "%d", &goods_tax_rate);
sscanf( gzgets( gzfile, s, 256 ), "%d", &export_tax);
sscanf( gzgets( gzfile, s, 256 ), "%d", &export_tax_rate);
sscanf( gzgets( gzfile, s, 256 ), "%d", &import_cost);
sscanf( gzgets( gzfile, s, 256 ), "%d", &import_cost_rate);
sscanf( gzgets( gzfile, s, 256 ), "%d", &tech_level);
if (tech_level > MODERN_WINDMILL_TECH)
modern_windmill_flag = 1;
sscanf( gzgets( gzfile, s, 256 ), "%d", &tpopulation);
sscanf( gzgets( gzfile, s, 256 ), "%d", &tstarving_population);
sscanf( gzgets( gzfile, s, 256 ), "%d", &tunemployed_population);
sscanf( gzgets( gzfile, s, 256 ), "%d", &x); /* waste_goods obsolete */
sscanf( gzgets( gzfile, s, 256 ), "%d", &power_made);
sscanf( gzgets( gzfile, s, 256 ), "%d", &power_used);
sscanf( gzgets( gzfile, s, 256 ), "%d", &coal_made);
sscanf( gzgets( gzfile, s, 256 ), "%d", &coal_used);
sscanf( gzgets( gzfile, s, 256 ), "%d", &goods_made);
sscanf( gzgets( gzfile, s, 256 ), "%d", &goods_used);
sscanf( gzgets( gzfile, s, 256 ), "%d", &ore_made);
sscanf( gzgets( gzfile, s, 256 ), "%d", &ore_used);
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &diff_old_population */
/* Update variables calculated from those above */
housed_population = tpopulation / NUMOF_DAYS_IN_MONTH;
prog_box ("", 96);
/* Get size of monthgraph array */
if (ldsv_version <= MG_C_VER) {
i = 120;
} else {
sscanf( gzgets( gzfile, s, 256 ), "%d", &i);
}
for (x = 0; x < i; x++) {
/* If more entries in file than will fit on screen,
then we need to skip past them. */
if (x >= monthgraph_size) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &monthgraph_pop[x] */
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &monthgraph_starve[x] */
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &monthgraph_nojobs[x] */
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &monthgraph_ppool[x] */
} else {
sscanf( gzgets( gzfile, s, 256 ), "%d", &monthgraph_pop[x]);
sscanf( gzgets( gzfile, s, 256 ), "%d", &monthgraph_starve[x]);
sscanf( gzgets( gzfile, s, 256 ), "%d", &monthgraph_nojobs[x]);
sscanf( gzgets( gzfile, s, 256 ), "%d", &monthgraph_ppool[x]);
}
/* If our save file is old, skip past obsolete diffgraph entries */
if (ldsv_version <= MG_C_VER) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &diffgraph_power[x] */
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &diffgraph_coal[x] */
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &diffgraph_goods[x] */
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &diffgraph_ore[x] */
sscanf( gzgets( gzfile, s, 256 ), "%d", &dummy); /* &diffgraph_population[x] */
}
}
/* If screen bigger than number of entries in file, pad with zeroes */
while (x < monthgraph_size) {
monthgraph_pop[x] = 0;
monthgraph_starve[x] = 0;
monthgraph_nojobs[x] = 0;
monthgraph_ppool[x] = 0;
x++;
}
prog_box ("", 98);
sscanf( gzgets( gzfile, s, 256 ), "%d", &rockets_launched);
sscanf( gzgets( gzfile, s, 256 ), "%d", &rockets_launched_success);
sscanf( gzgets( gzfile, s, 256 ), "%d", &coal_survey_done);
for (x = 0; x < pbar_data_size; x++) {
for (p = 0; p < num_pbars; p++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &(pbar_tmp));
update_pbar(p,pbar_tmp,1);
/* sscanf( gzgets( gzfile, s, 256 ), "%d", &(pbars[p].data[x])); */
}
}
for (p = 0; p < num_pbars; p++)
pbars[p].data_size = pbar_data_size;
prog_box ("", 99);
for (p = 0; p < num_pbars; p++) {
sscanf( gzgets( gzfile, s, 256 ), "%d", &(pbars[p].oldtot));
sscanf( gzgets( gzfile, s, 256 ), "%d", &(pbars[p].diff));
}
sscanf( gzgets( gzfile, s, 256 ), "%d", &cheat_flag);
sscanf( gzgets( gzfile, s, 256 ), "%d", &total_pollution_deaths);
sscanf( gzgets( gzfile, s, 256 ), "%f", &pollution_deaths_history);
sscanf( gzgets( gzfile, s, 256 ), "%d", &total_starve_deaths);
sscanf( gzgets( gzfile, s, 256 ), "%f", &starve_deaths_history);
sscanf( gzgets( gzfile, s, 256 ), "%d", &total_unemployed_years);
sscanf( gzgets( gzfile, s, 256 ), "%f", &unemployed_history);
sscanf( gzgets( gzfile, s, 256 ), "%d", &max_pop_ever);
sscanf( gzgets( gzfile, s, 256 ), "%d", &total_evacuated);
sscanf( gzgets( gzfile, s, 256 ), "%d", &total_births);
for (x = 0; x < NUMOF_MODULES; x++)
sscanf( gzgets( gzfile, s, 256 ), "%d", &(module_help_flag[x]));
sscanf( gzgets( gzfile, s, 256 ), "%d", &x); /* just dummy reads */
sscanf( gzgets( gzfile, s, 256 ), "%d", &x); /* for backwards compatibility. */
/* 10 dummy strings, for missed out things, have been put in save. */
/* Input from this point uses them. */
/* XXX: WCK: Huh? Missed out things? */
sscanf( gzgets( gzfile, s, 256 ), "%128s", given_scene);
if (strncmp (given_scene, "dummy", 5) == 0 || strlen (given_scene) < 3)
given_scene[0] = 0;
sscanf( gzgets( gzfile, s, 256 ), "%128s", s);
if (strncmp (given_scene, "dummy", 5) != 0)
sscanf (s, "%d", &highest_tech_level);
else
highest_tech_level = 0;
gzgets( gzfile, s, 80 ); /* this is the CR */
if (sscanf (s, "sust %d %d %d %d %d %d %d %d %d %d"
,&sust_dig_ore_coal_count, &sust_port_count
,&sust_old_money_count, &sust_old_population_count
,&sust_old_tech_count, &sust_fire_count
,&sust_old_money, &sust_old_population, &sust_old_tech
,&sustain_flag) == 10)
{
sust_dig_ore_coal_tip_flag = sust_port_flag = 1;
/* GCS FIX: Check after loading file if screen is drawn OK */
/* draw_sustainable_window (); */
}
else
sustain_flag = sust_dig_ore_coal_count = sust_port_count
= sust_old_money_count = sust_old_population_count
= sust_old_tech_count = sust_fire_count
= sust_old_money = sust_old_population = sust_old_tech = 0;
if (use_waterwell == true) {
}
gzclose( gzfile );
numof_shanties = count_groups (GROUP_SHANTY);
numof_communes = count_groups (GROUP_COMMUNE);
prog_box ("", 100);
/* set up the university intake. */
x = count_groups (GROUP_UNIVERSITY);
if (x > 0) {
university_intake_rate
= (count_groups (GROUP_SCHOOL) * 20) / x;
if (university_intake_rate > 100)
university_intake_rate = 100;
}
else
university_intake_rate = 50;
/*Al1 : What is this ? This does nothing, the value are saved in MP_INFO.int_
* for (x = 0; x < WORLD_SIDE_LEN; x++)
* for (y = 0; y < WORLD_SIDE_LEN; y++)
* update_tech_dep (x, y);
*/
unhighlight_module_button (selected_module);
selected_module = sbut[7]; /* 7 is track. Watch out though! */
highlight_module_button (selected_module);
set_selected_module (CST_TRACK_LR);
print_total_money ();
reset_animation_times ();
/* update tech dep for compatibility with old games */
for (x = 0; x < WORLD_SIDE_LEN; x++)
for (y = 0; y < WORLD_SIDE_LEN; y++) {
switch (MP_GROUP(x,y)) {
case (GROUP_WINDMILL):
MP_INFO(x,y).int_1 = (int)(WINDMILL_POWER
+ (((double) MP_INFO(x,y).int_2 * WINDMILL_POWER)
/ MAX_TECH_LEVEL));
break;
case (GROUP_COAL_POWER):
MP_INFO(x,y).int_1 = (int)(POWERS_COAL_OUTPUT
+ (((double) MP_INFO(x,y).int_4 * POWERS_COAL_OUTPUT)
/ MAX_TECH_LEVEL));
break;
case (GROUP_SOLAR_POWER):
MP_INFO(x,y).int_1 = (int)(POWERS_SOLAR_OUTPUT
+ (((double) MP_INFO(x,y).int_2 * POWERS_SOLAR_OUTPUT)
/ MAX_TECH_LEVEL));
break;
}
}
map_power_grid(true); /* WCK: Is this safe to do here?
* AL1: No, in NG_1.1
* In case of error message with ok_dial_box
* the dialog cannot appear because the screen
* is not set up => crash.
* FIXME: move all initialisation elsewhere, in
* engine.cpp or simulate.cpp.
*/
}
void
load_city (char *cname)
{
unsigned long q;
int i, x, y, z, n, p, ver;
int num_pbars, pbar_data_size;
int pbar_tmp;
int dummy;
FILE *ofile;
char s[256];
if ((ofile = fopen_read_gzipped (cname)) == NULL) {
printf (_("Can't open <%s> (gzipped)"), cname);
do_error ("Can't open it!");
}
fscanf (ofile, "%d", &ver);
if (ver < MIN_LOAD_VERSION) {
ok_dial_box ("too-old.mes", BAD, 0L);
fclose_read_gzipped (ofile);
return;
}
init_pbars();
num_pbars = NUM_PBARS;
pbar_data_size = PBAR_DATA_SIZE;
init_inventory();
print_time_for_year();
q = (unsigned long) sizeof (Map_Point_Info);
prog_box (_("Loading scene"), 0);
for (x = 0; x < WORLD_SIDE_LEN; x++) {
for (y = 0; y < WORLD_SIDE_LEN; y++) {
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).population) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).flags) + z) = n;
}
for (z = 0; z < sizeof(unsigned short); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).coal_reserve) + z) = n;
}
for (z = 0; z < sizeof(unsigned short); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).ore_reserve) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_1) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_2) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_3) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_4) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_5) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_6) + z) = n;
}
for (z = 0; z < sizeof(int); z++) {
fscanf (ofile, "%d", &n);
*(((unsigned char *) &MP_INFO(x,y).int_7) + z) = n;
}
fscanf (ofile, "%d", &n);
MP_POL(x,y) = (unsigned short) n;
fscanf (ofile, "%d", &n);
MP_TYPE(x,y) = (short) n;
if (get_group_of_type(MP_TYPE(x,y)) == GROUP_MARKET)
inventory(x,y);
}
if (((93 * x) / WORLD_SIDE_LEN) % 3 == 0)
prog_box ("", (93 * x) / WORLD_SIDE_LEN);
}
check_endian ();
set_map_groups ();
fscanf (ofile, "%d", &main_screen_originx);
fscanf (ofile, "%d", &main_screen_originy);
if (main_screen_originx > WORLD_SIDE_LEN - scr.main_win.w / 16 - 1)
main_screen_originx = WORLD_SIDE_LEN - scr.main_win.w / 16 - 1;
if (main_screen_originy > WORLD_SIDE_LEN - scr.main_win.h / 16 - 1)
main_screen_originy = WORLD_SIDE_LEN - scr.main_win.h / 16 - 1;
fscanf (ofile, "%d", &total_time);
if (ver <= MM_MS_C_VER)
i = OLD_MAX_NUMOF_SUBSTATIONS;
else
i = MAX_NUMOF_SUBSTATIONS;
for (x = 0; x < i; x++)
{
fscanf (ofile, "%d", &substationx[x]);
fscanf (ofile, "%d", &substationy[x]);
}
prog_box ("", 92);
fscanf (ofile, "%d", &numof_substations);
if (ver <= MM_MS_C_VER)
i = OLD_MAX_NUMOF_MARKETS;
else
i = MAX_NUMOF_MARKETS;
for (x = 0; x < i; x++)
{
fscanf (ofile, "%d", &marketx[x]);
fscanf (ofile, "%d", &markety[x]);
}
prog_box ("", 94);
fscanf (ofile, "%d", &numof_markets);
fscanf (ofile, "%d", &people_pool);
fscanf (ofile, "%d", &total_money);
fscanf (ofile, "%d", &income_tax_rate);
fscanf (ofile, "%d", &coal_tax_rate);
fscanf (ofile, "%d", &dole_rate);
fscanf (ofile, "%d", &transport_cost_rate);
fscanf (ofile, "%d", &goods_tax_rate);
fscanf (ofile, "%d", &export_tax);
fscanf (ofile, "%d", &export_tax_rate);
fscanf (ofile, "%d", &import_cost);
fscanf (ofile, "%d", &import_cost_rate);
fscanf (ofile, "%d", &tech_level);
if (tech_level > MODERN_WINDMILL_TECH)
modern_windmill_flag = 1;
fscanf (ofile, "%d", &tpopulation);
fscanf (ofile, "%d", &tstarving_population);
fscanf (ofile, "%d", &tunemployed_population);
fscanf (ofile, "%d", &x); /* waste_goods obsolete */
fscanf (ofile, "%d", &power_made);
fscanf (ofile, "%d", &power_used);
fscanf (ofile, "%d", &coal_made);
fscanf (ofile, "%d", &coal_used);
fscanf (ofile, "%d", &goods_made);
fscanf (ofile, "%d", &goods_used);
fscanf (ofile, "%d", &ore_made);
fscanf (ofile, "%d", &ore_used);
fscanf (ofile, "%d", &dummy); /* &diff_old_population */
/* Update variables calculated from those above */
housed_population = tpopulation / NUMOF_DAYS_IN_MONTH;
prog_box ("", 96);
/* Get size of monthgraph array */
if (ver <= MG_C_VER) {
i = 120;
} else {
fscanf (ofile, "%d", &i);
}
for (x = 0; x < i; x++) {
/* If more entries in file than will fit on screen,
then we need to skip past them. */
if (x >= monthgraph_size) {
fscanf (ofile, "%d", &dummy); /* &monthgraph_pop[x] */
fscanf (ofile, "%d", &dummy); /* &monthgraph_starve[x] */
fscanf (ofile, "%d", &dummy); /* &monthgraph_nojobs[x] */
fscanf (ofile, "%d", &dummy); /* &monthgraph_ppool[x] */
} else {
fscanf (ofile, "%d", &monthgraph_pop[x]);
fscanf (ofile, "%d", &monthgraph_starve[x]);
fscanf (ofile, "%d", &monthgraph_nojobs[x]);
fscanf (ofile, "%d", &monthgraph_ppool[x]);
}
/* If our save file is old, skip past obsolete diffgraph entries */
if (ver <= MG_C_VER) {
fscanf (ofile, "%d", &dummy); /* &diffgraph_power[x] */
fscanf (ofile, "%d", &dummy); /* &diffgraph_coal[x] */
fscanf (ofile, "%d", &dummy); /* &diffgraph_goods[x] */
fscanf (ofile, "%d", &dummy); /* &diffgraph_ore[x] */
fscanf (ofile, "%d", &dummy); /* &diffgraph_population[x] */
}
}
/* If screen bigger than number of entries in file, pad with zeroes */
while (x < monthgraph_size) {
monthgraph_pop[x] = 0;
monthgraph_starve[x] = 0;
monthgraph_nojobs[x] = 0;
monthgraph_ppool[x] = 0;
x++;
}
prog_box ("", 98);
fscanf (ofile, "%d", &rockets_launched);
fscanf (ofile, "%d", &rockets_launched_success);
fscanf (ofile, "%d", &coal_survey_done);
for (x = 0; x < pbar_data_size; x++) {
for (p = 0; p < num_pbars; p++) {
fscanf (ofile, "%d", &(pbar_tmp));
update_pbar(p,pbar_tmp,1);
/* fscanf (ofile, "%d", &(pbars[p].data[x])); */
}
}
for (p = 0; p < num_pbars; p++)
pbars[p].data_size = pbar_data_size;
prog_box ("", 99);
for (p = 0; p < num_pbars; p++) {
fscanf (ofile, "%d", &(pbars[p].oldtot));
fscanf (ofile, "%d", &(pbars[p].diff));
}
fscanf (ofile, "%d", &cheat_flag);
fscanf (ofile, "%d", &total_pollution_deaths);
fscanf (ofile, "%f", &pollution_deaths_history);
fscanf (ofile, "%d", &total_starve_deaths);
fscanf (ofile, "%f", &starve_deaths_history);
fscanf (ofile, "%d", &total_unemployed_years);
fscanf (ofile, "%f", &unemployed_history);
fscanf (ofile, "%d", &max_pop_ever);
fscanf (ofile, "%d", &total_evacuated);
fscanf (ofile, "%d", &total_births);
for (x = 0; x < NUMOF_MODULES; x++)
fscanf (ofile, "%d", &(module_help_flag[x]));
fscanf (ofile, "%d", &x); /* just dummy reads */
fscanf (ofile, "%d", &x); /* for backwards compatibility. */
/* 10 dummy strings, for missed out things, have been put in save. */
/* Input from this point uses them. */
/* XXX: WCK: Huh? Missed out things? */
fscanf (ofile, "%128s", given_scene);
if (strncmp (given_scene, "dummy", 5) == 0 || strlen (given_scene) < 3)
given_scene[0] = 0;
fscanf (ofile, "%128s", s);
if (strncmp (given_scene, "dummy", 5) != 0)
sscanf (s, "%d", &highest_tech_level);
else
highest_tech_level = 0;
fgets (s, 80, ofile); /* this is the CR */
fgets (s, 80, ofile);
if (sscanf (s, "sust %d %d %d %d %d %d %d %d %d %d"
,&sust_dig_ore_coal_count, &sust_port_count
,&sust_old_money_count, &sust_old_population_count
,&sust_old_tech_count, &sust_fire_count
,&sust_old_money, &sust_old_population, &sust_old_tech
,&sustain_flag) == 10)
{
sust_dig_ore_coal_tip_flag = sust_port_flag = 1;
/* GCS FIX: Check after loading file if screen is drawn OK */
/* draw_sustainable_window (); */
}
else
sustain_flag = sust_dig_ore_coal_count = sust_port_count
= sust_old_money_count = sust_old_population_count
= sust_old_tech_count = sust_fire_count
= sust_old_money = sust_old_population = sust_old_tech = 0;
fclose_read_gzipped (ofile);
numof_shanties = count_groups (GROUP_SHANTY);
numof_communes = count_groups (GROUP_COMMUNE);
prog_box ("", 100);
/* set up the university intake. */
x = count_groups (GROUP_UNIVERSITY);
if (x > 0) {
university_intake_rate
= (count_groups (GROUP_SCHOOL) * 20) / x;
if (university_intake_rate > 100)
university_intake_rate = 100;
}
else
university_intake_rate = 50;
for (x = 0; x < WORLD_SIDE_LEN; x++)
{
for (y = 0; y < WORLD_SIDE_LEN; y++)
{
update_tech_dep (x, y);
}
}
unhighlight_module_button (selected_module);
selected_module = sbut[7]; /* 7 is track. Watch out though! */
highlight_module_button (selected_module);
set_selected_module (CST_TRACK_LR);
print_total_money ();
reset_animation_times ();
map_power_grid (); /* WCK: Is this safe to do here? */
}
asmlinkage void __init start_kernel(void)
{
char * command_line;
#ifdef __SMP__
static int boot_cpu = 1;
/* "current" has been set up, we need to load it now */
if (!boot_cpu)
initialize_secondary();
boot_cpu = 0;
#endif
/*
* Interrupts are still disabled. Do necessary setups, then
* enable them
*/
printk(linux_banner);
setup_arch(&command_line, &memory_start, &memory_end);
memory_start = paging_init(memory_start,memory_end);
trap_init();
init_IRQ();
sched_init();
time_init();
parse_options(command_line);
/*
* HACK ALERT! This is early. We're enabling the console before
* we've done PCI setups etc, and console_init() must be aware of
* this. But we do want output early, in case something goes wrong.
*/
memory_start = console_init(memory_start,memory_end);
#ifdef CONFIG_MODULES
init_modules();
#endif
if (prof_shift) {
prof_buffer = (unsigned int *) memory_start;
/* only text is profiled */
prof_len = (unsigned long) &_etext - (unsigned long) &_stext;
prof_len >>= prof_shift;
memory_start += prof_len * sizeof(unsigned int);
memset(prof_buffer, 0, prof_len * sizeof(unsigned int));
}
#ifdef CONFIG_REMOTE_DEBUG
set_debug_traps();
/* breakpoint(); */ /* execute a BREAK insn */
#endif
memory_start = kmem_cache_init(memory_start, memory_end);
sti();
calibrate_delay();
#ifdef CONFIG_CPU_R5900
r5900_init();
#endif
#ifdef CONFIG_BLK_DEV_INITRD
if (initrd_start && !initrd_below_start_ok && initrd_start < memory_start) {
printk(KERN_CRIT "initrd overwritten (0x%08lx < 0x%08lx) - "
"disabling it.\n",initrd_start,memory_start);
initrd_start = 0;
}
#endif
#ifdef CONFIG_BINFMT_IRIX
init_inventory ();
#endif
mem_init(memory_start,memory_end);
kmem_cache_sizes_init();
#ifdef CONFIG_PROC_FS
proc_root_init();
#endif
uidcache_init();
filescache_init();
dcache_init();
vma_init();
buffer_init();
signals_init();
inode_init();
file_table_init();
#if defined(CONFIG_SYSVIPC)
ipc_init();
#endif
#if defined(CONFIG_QUOTA)
dquot_init_hash();
#endif
check_bugs();
printk("POSIX conformance testing by UNIFIX\n");
/*
* We count on the initial thread going ok
* Like idlers init is an unlocked kernel thread, which will
* make syscalls (and thus be locked).
*/
smp_init();
kernel_thread(init, NULL, CLONE_FS | CLONE_FILES | CLONE_SIGHAND);
current->need_resched = 1;
cpu_idle(NULL);
}
