/*
THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.  
COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
*/
/*
 * $Source: Smoke:miner:source:main::RCS:network.c $
 * $Revision: 1.27 $
 * $Author: allender $
 * $Date: 1995/11/13 13:40:20 $
 * 
 * Routines for managing network play.
 * 
 */

#pragma off (unreferenced)
static char rcsid[] = "$Id: network.c 1.27 1995/11/13 13:40:20 allender Exp $";
#pragma on (unreferenced)

#ifdef NETWORK

#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#include <Events.h>
#include <Errors.h>		// for appletalk networking errors

#include "dtypes.h"
#include "args.h"
#include "timer.h"
#include "mono.h"
#include "ipx.h"
#include "newmenu.h"
#include "key.h"
#include "gauges.h"
#include "object.h"
#include "error.h"
#include "netmisc.h"
#include "laser.h"
#include "gamesave.h"
#include "gamemine.h"
#include "player.h"
#include "gameseq.h"
#include "fireball.h"
#include "network.h"
#include "game.h"
#include "multi.h"
#include "endlevel.h"
#include "palette.h"
#include "fuelcen.h"
#include "menu.h"
#include "sounds.h"
#include "text.h"
#include "kmatrix.h"
#include "newdemo.h"
#include "multibot.h"
#include "wall.h"
#include "bm.h"
#include "effects.h"
#include "physics.h"
#include "powerup.h"
#include "byteswap.h"
#include "macnet.h"
#include "appltalk.h"
#include "macsys.h"

#ifdef MAC_SHAREWARE
#define PID_REQUEST 				11
#define PID_SYNC					13
#define PID_PDATA					14
#define PID_ADDPLAYER				15
#define PID_DUMP					17
#define PID_ENDLEVEL				18
#define PID_QUIT_JOINING			20
#define PID_OBJECT_DATA				21
#define PID_GAME_LIST				22
#define PID_GAME_INFO				24
#define PID_GAME_VALIDATE			50
#define PID_GAME_VALIDATED			51
#else
#define PID_REQUEST 				25
#define PID_SYNC					27
#define PID_PDATA					28
#define PID_ADDPLAYER				29
#define PID_DUMP					31
#define PID_ENDLEVEL				32
#define PID_QUIT_JOINING			34
#define PID_OBJECT_DATA				35
#define PID_GAME_LIST				36
#define PID_GAME_INFO				37
#define PID_GAME_VALIDATE			40
#define PID_GAME_VALIDATED			41
#endif

#define PID_APPLETALK_PDATA			42

#define NETGAME_ANARCHY				0
#define NETGAME_TEAM_ANARCHY		1
#define NETGAME_ROBOT_ANARCHY		2
#define NETGAME_COOPERATIVE			3

#define MAX_ACTIVE_NETGAMES 			4
netgame_info Active_games[MAX_ACTIVE_NETGAMES];
int num_active_games = 0;

#ifdef MAC_SHAREWARE
extern ubyte contest_active;
#endif

// function for the user to choose which appletalk zone they want to look for games in

#define MAX_ZONES			255
#define MAX_ZONE_LENGTH		33
#define DEFAULT_ZONE_NAME	"\p*"
#define MAX_REGISTER_TRIES	5					// maximum time we will try and register a netgame
char Network_zone_name[MAX_ZONE_LENGTH];		// zone name game being played in for appletalk
char Zone_names[MAX_ZONES][MAX_ZONE_LENGTH];	// total list of zones that we can see
ubyte appletalk_use_broadcast = 0;
ubyte Network_game_validated = 0;		// validates a game before being able to join
ubyte Network_game_validate_choice = 0;
ubyte Network_appletalk_type = 0;		// type of appletalk network game is being played on

#define LOCALTALK_TYPE	0
#define ETHERTALK_TYPE	1
#define TOKENTALK_TYPE	2
#define OTHERTALK_TYPE	3

int	Network_debug=0;
int	Network_active=0;

int Network_status = 0;
int	Network_games_changed = 0;

int	Network_socket = 0;
int	Network_allow_socket_changes = 0;
int Network_game_type;

// For rejoin object syncing

int	Network_rejoined = 0;       // Did WE rejoin this game?
int	Network_new_game = 0;		 // Is this the first level of a new game?
int	Network_send_objects = 0;  // Are we in the process of sending objects to a player?
int	Network_send_objnum = -1;   // What object are we sending next?
int	Network_player_added = 0;   // Is this a new player or a returning player?
int	Network_send_object_mode = 0; // What type of objects are we sending, static or dynamic?
sequence_packet	Network_player_rejoining; // Who is rejoining now?

fix	LastPacketTime[MAX_PLAYERS]; // For timeouts of idle/crashed players

int 	PacketUrgent = 0;

frame_info 	MySyncPack;
ubyte 		MySyncPackInitialized = 0;		// Set to 1 if the MySyncPack is zeroed.
ushort 		my_segments_checksum = 0;

sequence_packet My_Seq;

extern obj_position Player_init[MAX_PLAYERS];

#define DUMP_CLOSED 0
#define DUMP_FULL 1
#define DUMP_ENDLEVEL 2
#define DUMP_DORK 3
#define DUMP_ABORTED 4
#define DUMP_CONNECTED 5
#define DUMP_LEVEL 6

int network_wait_for_snyc();
void network_update_netgame();
void network_send_endlevel_sub(int player_num);
void network_send_game_info(netplayer_info *their);
void network_read_endlevel_packet(ubyte *data);
void network_read_object_packet(ubyte *data);
void network_read_sync_packet( netgame_info * sp );
void network_flush();
void network_listen();
void network_read_pdata_packet(ubyte *data );
void network_send_objects();
void network_send_rejoin_sync(int pnum);
void network_dump_player(netplayer_info *their, int why);
void network_release_registered_game(void);
void network_read_appletalk_pdata_packet( ubyte *data );

byte object_buffer[IPX_MAX_DATA_SIZE];		// used for tmp netgame packets as well as sending object data

void
network_init(void)
{
	// So you want to play a netgame, eh?  Let's a get a few things
	// straight

	int save_pnum = Player_num;

	memset(&Netgame, 0, sizeof(netgame_info));
	memset(&My_Seq, 0, sizeof(sequence_packet));
	My_Seq.type = PID_REQUEST;
	memcpy(My_Seq.player.callsign, Players[Player_num].callsign, CALLSIGN_LEN+1);
	if (Network_game_type == IPX_GAME) {
		memcpy(My_Seq.player.network_info.ipx_info.node, ipx_get_my_local_address(), 6);
		memcpy(My_Seq.player.network_info.ipx_info.server, ipx_get_my_server_address(), 4 );
	} else if (Network_game_type == APPLETALK_GAME) {
		My_Seq.player.network_info.appletalk_info.aNode = appletalk_get_my_node();
		My_Seq.player.network_info.appletalk_info.aNet = appletalk_get_my_net();
		My_Seq.player.network_info.appletalk_info.aSocket = appletalk_get_my_socket();
	}

	for (Player_num = 0; Player_num < MAX_NUM_NET_PLAYERS; Player_num++)
		init_player_stats_game();

	Player_num = save_pnum;		
	multi_new_game();
	Network_new_game = 1;
	Fuelcen_control_center_destroyed = 0;
	network_flush();
}

// three functions to validate that a network game can be joined

void network_send_validate_game()
{
	int i;
	sequence_packet me;

	if (Network_game_type != APPLETALK_GAME)
		return;

	mprintf((0, "Sending validate_game request.\n"));
	me.type = PID_GAME_VALIDATE;
	memcpy( me.player.callsign, Players[Player_num].callsign, CALLSIGN_LEN+1 );
	me.player.network_info.appletalk_info.aNode = appletalk_get_my_node();
	me.player.network_info.appletalk_info.aNet = appletalk_get_my_net();
	me.player.network_info.appletalk_info.aSocket = appletalk_get_my_socket();
	for (i = 0; i < Active_games[Network_game_validate_choice].numplayers; i++) {
		appletalk_send_packet_data( (ubyte *)&me, sizeof(sequence_packet), Active_games[Network_game_validate_choice].players[i].network_info.appletalk_info.aNode,
									Active_games[Network_game_validate_choice].players[i].network_info.appletalk_info.aNet,
									Active_games[Network_game_validate_choice].players[i].network_info.appletalk_info.aSocket);
	}
}

void network_process_validate_game(netplayer_info *their)
{
	char old_type, old_status;

	old_type = Netgame.type;
	old_status = Netgame.game_status;

	Netgame.type = PID_GAME_VALIDATED;
	if (Endlevel_sequence || Fuelcen_control_center_destroyed)
		Netgame.game_status = NETSTAT_ENDLEVEL;

	if (Network_game_type == IPX_GAME) {
		send_netgame_packet(their->network_info.ipx_info.server, their->network_info.ipx_info.node);
	} else if (Network_game_type == APPLETALK_GAME) {
//		send_netgame_packet_appletalk( their->network_info.appletalk_info.aNode, their->network_info.appletalk_info.aNet, their->network_info.appletalk_info.aSocket );
		appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), their->network_info.appletalk_info.aNode,
									their->network_info.appletalk_info.aNet, their->network_info.appletalk_info.aSocket );
	}

	Netgame.type = old_type;
	Netgame.game_status = old_status;
}

void network_process_game_validated(ubyte *data)
{
	int i, j, loc;

	if ( Network_game_type != APPLETALK_GAME )
		return;
		
	if ( Network_game_type == APPLETALK_GAME )
		memcpy(&Active_games[Network_game_validate_choice], data, sizeof(netgame_info));
	Network_game_validated = 1;
}


#define ENDLEVEL_SEND_INTERVAL F1_0*2
#define ENDLEVEL_IDLE_TIME	F1_0*10
	
void 
network_endlevel_poll( int nitems, newmenu_item * menus, int * key, int citem )
{
	// Polling loop for End-of-level menu

	static fix t1 = 0;
	int i = 0;
	int num_ready = 0;
	int num_escaped = 0;
	int goto_secret = 0;

	int previous_state[MAX_NUM_NET_PLAYERS];
	int previous_seconds_left;

	menus = menus;
	citem = citem;
	nitems = nitems;
	key = key;

	// Send our endlevel packet at regular intervals

	if (timer_get_approx_seconds() > t1+ENDLEVEL_SEND_INTERVAL)
	{
		network_send_endlevel_packet();
		t1 = timer_get_approx_seconds();
	}

	for (i = 0; i < N_players; i++)
		previous_state[i] = Players[i].connected;

	previous_seconds_left = Fuelcen_seconds_left;

	network_listen();

	for (i = 0; i < N_players; i++)
	{
		if (previous_state[i] != Players[i].connected)		
		{
			sprintf(menus[i].text, "%s %s", Players[i].callsign, CONNECT_STATES(Players[i].connected));
			menus[i].redraw = 1;
		}
		if (Players[i].connected == 1)
		{
			// Check timeout for idle players
			if (timer_get_approx_seconds() > LastPacketTime[i]+ENDLEVEL_IDLE_TIME)
			{
				mprintf((0, "idle timeout for player %d.\n", i));
				Players[i].connected = 0;
				network_send_endlevel_sub(i);
			}				
		}

#ifdef MAC_SHAREWARE
		if ((Players[i].connected != 1) && (Players[i].connected != 5))
#else
		if ((Players[i].connected != 1) && (Players[i].connected != 5) && (Players[i].connected != 6))
#endif
			num_ready++;
		if (Players[i].connected != 1)
			num_escaped++;
		if (Players[i].connected == 4)
			goto_secret = 1;
	}

	if (num_escaped == N_players) // All players are out of the mine
	{
		Fuelcen_seconds_left = -1;
	}

	if (previous_seconds_left != Fuelcen_seconds_left)
	{
		if (Fuelcen_seconds_left < 0)
		{
			sprintf(menus[N_players].text, TXT_REACTOR_EXPLODED);
			menus[N_players].redraw = 1;
		}
		else
		{
			sprintf(menus[N_players].text, "%s: %d %s  ", TXT_TIME_REMAINING, Fuelcen_seconds_left, TXT_SECONDS);
			menus[N_players].redraw = 1;
		}
	}

	if (num_ready == N_players) // All players have checked in or are disconnected
	{
		if (goto_secret)
			*key = -3;
		else
			*key = -2;
	}
}

void 
network_endlevel_poll2( int nitems, newmenu_item * menus, int * key, int citem )
{
	// Polling loop for End-of-level menu

	static fix t1 = 0;
	int i = 0;
	int num_ready = 0;
	int goto_secret = 0;

	menus = menus;
	citem = citem;
	nitems = nitems;
	key = key;

	// Send our endlevel packet at regular intervals

	if (timer_get_approx_seconds() > t1+ENDLEVEL_SEND_INTERVAL)
	{
		network_send_endlevel_packet();
		t1 = timer_get_approx_seconds();
	}

	network_listen();

	for (i = 0; i < N_players; i++)
	{
#ifdef MAC_SHAREWARE
		if ((Players[i].connected != 1) && (Players[i].connected != 5))
#else
		if ((Players[i].connected != 1) && (Players[i].connected != 5) && (Players[i].connected != 6))
#endif
			num_ready++;
		if (Players[i].connected == 4)
			goto_secret = 1;
	}

	if (num_ready == N_players) // All players have checked in or are disconnected
	{
		if (goto_secret)
			*key = -3;
		else
			*key = -2;
	}
}

int
network_endlevel(int *secret)
{
	// Do whatever needs to be done between levels

	newmenu_item m[MAX_NUM_NET_PLAYERS+1];
	char menu_text[MAX_NUM_NET_PLAYERS+1][80];
	int i, choice;

	char text[80];

	Function_mode = FMODE_MENU;

	network_flush();

	Network_status = NETSTAT_ENDLEVEL; // We are between levels

	network_listen();

	network_send_endlevel_packet();

newmenu:
	// Setup menu text pointers and zero them
	for (i=0; i<N_players; i++) 
	{
		m[i].type = NM_TYPE_TEXT;
		m[i].text = menu_text[i];
		sprintf(m[i].text, "%s %s", Players[i].callsign, CONNECT_STATES(Players[i].connected));
		LastPacketTime[i] = timer_get_approx_seconds();
	}
	m[N_players].type = NM_TYPE_TEXT;
	m[N_players].text = menu_text[N_players];

	if (Fuelcen_seconds_left < 0)
		sprintf(m[N_players].text, TXT_REACTOR_EXPLODED);
	else
		sprintf(m[N_players].text, "%s: %d %s  ", TXT_TIME_REMAINING, Fuelcen_seconds_left, TXT_SECONDS);

menu:
	sprintf(text, "%s\n%s", TXT_WAITING, TXT_ESC_ABORT);

//	choice=newmenu_do3(NULL, text, N_players+1, m, network_endlevel_poll, 0, "STARS.PCX", 600, 320);
	choice=newmenu_do3(NULL, text, N_players+1, m, network_endlevel_poll, 0, "STARS.PCX", 620, 320);

	if (choice==-1) {
		newmenu_item m2[2];

		m2[0].type = m2[1].type = NM_TYPE_MENU;
		m2[0].text = TXT_YES; m2[1].text = TXT_NO;
		choice = newmenu_do1(NULL, TXT_SURE_LEAVE_GAME, 2, m2, network_endlevel_poll2, 1);
		if (choice == 0)
		{
			Players[Player_num].connected = 0;
			network_send_endlevel_packet();
			network_send_endlevel_packet();
			network_release_registered_game();
			longjmp(LeaveGame,0);
		}	
		if (choice > -2)
			goto newmenu;
	}

//	kmatrix_view();

	if (choice > -2)
		goto menu;
	
	if (choice == -3)
		*secret = 1; // If any player went to the secret level, we go to the secret level

	network_send_endlevel_packet();
	network_send_endlevel_packet();
	MySyncPackInitialized = 0;

	network_update_netgame();

	return(0);
}

int 
can_join_netgame(netgame_info *game)
{
	// Can this player rejoin a netgame in progress?

	int i, num_players;

	if (game->game_status == NETSTAT_STARTING)
		return 1;

	if (game->game_status != NETSTAT_PLAYING)
		return 0;

	// Game is in progress, figure out if this guy can re-join it

	num_players = game->numplayers;

	if (!(game->game_flags & NETGAME_FLAG_CLOSED)) {
		// Look for player that is not connected
		if (game->numplayers < game->max_numplayers)
			return 1;

		for (i = 0; i < num_players; i++) {
			if (game->players[i].connected == 0)
				return 1;
		}
		return 0;
	}

	// Search to see if we were already in this closed netgame in progress


	for (i = 0; i < num_players; i++)
		if (Network_game_type == IPX_GAME) {
			if ( (!stricmp(Players[Player_num].callsign, game->players[i].callsign)) &&
				  (!memcmp(My_Seq.player.network_info.ipx_info.node, game->players[i].network_info.ipx_info.node, 6)) &&
				  (!memcmp(My_Seq.player.network_info.ipx_info.server, game->players[i].network_info.ipx_info.server, 4)) ) {
				break;
			}
		} else if (Network_game_type == APPLETALK_GAME) {
			if ( (!stricmp(Players[Player_num].callsign, game->players[i].callsign)) &&
				  (My_Seq.player.network_info.appletalk_info.aNode == game->players[i].network_info.appletalk_info.aNode) &&
				  (My_Seq.player.network_info.appletalk_info.aNet == game->players[i].network_info.appletalk_info.aNet) ) {
				break;
			}
		
		}

	if (i != num_players)
		return 1;
	return 0;
}

void
network_disconnect_player(int playernum)
{
	// A player has disconnected from the net game, take whatever steps are
	// necessary 

	if (playernum == Player_num) 
	{
		Int3(); // Weird, see Rob
		return;
	}

	Players[playernum].connected = 0;
	Netgame.players[playernum].connected = 0;

//	create_player_appearance_effect(&Objects[Players[playernum].objnum]);
	multi_make_player_ghost(playernum);

#ifndef SHAREWARE
	if (Newdemo_state == ND_STATE_RECORDING)
		newdemo_record_multi_disconnect(playernum);
#endif

#ifndef MAC_SHAREWARE
	multi_strip_robots(playernum);
#endif
}
		
void
network_new_player(netplayer_info *their)
{
	int objnum;
	int pnum;

	pnum = their->connected;

	Assert(pnum >= 0);
	Assert(pnum < MaxNumNetPlayers);	
	
	objnum = Players[pnum].objnum;

#ifndef SHAREWARE
	if (Newdemo_state == ND_STATE_RECORDING) {
		int new_player;

		if (pnum == N_players)
			new_player = 1;
		else
			new_player = 0;
		newdemo_record_multi_connect(pnum, new_player, their->callsign);
	}
#endif

	memcpy(Players[pnum].callsign, their->callsign, CALLSIGN_LEN+1);
	memcpy(Netgame.players[pnum].callsign, their->callsign, CALLSIGN_LEN+1);

	if (Network_game_type == IPX_GAME) {
		if ( (*(uint *)their->network_info.ipx_info.server) != 0 )
			ipx_get_local_target( their->network_info.ipx_info.server, their->network_info.ipx_info.node, Players[pnum].net_address );
		else
			memcpy(Players[pnum].net_address, their->network_info.ipx_info.node, 6);
	
		memcpy(Netgame.players[pnum].network_info.ipx_info.node, their->network_info.ipx_info.node, 6);
		memcpy(Netgame.players[pnum].network_info.ipx_info.server, their->network_info.ipx_info.server, 4);
	} else if (Network_game_type == APPLETALK_GAME) {
		Netgame.players[pnum].network_info.appletalk_info.aNode = their->network_info.appletalk_info.aNode;
		Netgame.players[pnum].network_info.appletalk_info.aNet = their->network_info.appletalk_info.aNet;
		Netgame.players[pnum].network_info.appletalk_info.aSocket = their->network_info.appletalk_info.aSocket;
	}
	Players[pnum].n_packets_got = 0;
	Players[pnum].connected = 1;
	Players[pnum].net_kills_total = 0;
	Players[pnum].net_killed_total = 0;
	memset(kill_matrix[pnum], 0, MAX_PLAYERS*sizeof(short)); 
	Players[pnum].score = 0;
	Players[pnum].flags = 0;

	if (pnum == N_players)
	{
		N_players++;
		Netgame.numplayers = N_players;
	}

	digi_play_sample(SOUND_HUD_MESSAGE, F1_0);

	HUD_init_message("'%s' %s\n", their->callsign, TXT_JOINING);
	
	multi_make_ghost_player(pnum);

#ifndef MAC_SHAREWARE
	multi_send_score();
#endif

//	create_player_appearance_effect(&Objects[objnum]);
}

void network_welcome_player(netplayer_info *their)
{
 	// Add a player to a game already in progress
	ubyte local_address[6];
	int player_num;
	int i;

	// Don't accept new players if we're ending this level.  Its safe to
	// ignore since they'll request again later

	if ((Endlevel_sequence) || (Fuelcen_control_center_destroyed))
	{
		mprintf((0, "Ignored request from new player to join during endgame.\n"));
		network_dump_player(their, DUMP_ENDLEVEL);
		return; 
	}

	if (Network_send_objects)
	{
		// Ignore silently, we're already responding to someone and we can't
		// do more than one person at a time.  If we don't dump them they will
		// re-request in a few seconds.
		return;
	}

	if (their->connected != Current_level_num)
	{
		mprintf((0, "Dumping player due to old level number.\n"));
		network_dump_player(their, DUMP_LEVEL);
		return;
	}

	player_num = -1;
	memset(&Network_player_rejoining, 0, sizeof(sequence_packet));
	Network_player_added = 0;

	if (Network_game_type == IPX_GAME) {
		ipx_get_local_target( their->network_info.ipx_info.server, their->network_info.ipx_info.node, local_address );
	}

	for (i = 0; i < N_players; i++)
	{
		if ( (Network_game_type == IPX_GAME) && (!stricmp(Players[i].callsign, their->callsign )) && (!memcmp(Players[i].net_address,local_address, 6)) ) 
		{
			player_num = i;
			break;
		} else if ( (Network_game_type == APPLETALK_GAME) && (!stricmp(Players[i].callsign, their->callsign)) &&
				    (Netgame.players[i].network_info.appletalk_info.aNode == their->network_info.appletalk_info.aNode) &&
					(Netgame.players[i].network_info.appletalk_info.aNet == their->network_info.appletalk_info.aNet)) {
			player_num = i;
			break;
		}
	}

	if (player_num == -1)
	{
		// Player is new to this game

		if ( !(Netgame.game_flags & NETGAME_FLAG_CLOSED) && (N_players < MaxNumNetPlayers))
		{
			// Add player in an open slot, game not full yet

			player_num = N_players;
			Network_player_added = 1;
		}
		else if (Netgame.game_flags & NETGAME_FLAG_CLOSED)
		{
			// Slots are open but game is closed

			network_dump_player(their, DUMP_CLOSED);
			return;
		}
		else
		{
			// Slots are full but game is open, see if anyone is
			// disconnected and replace the oldest player with this new one
		
			int oldest_player = -1;
			fix oldest_time = timer_get_approx_seconds();

			Assert(N_players == MaxNumNetPlayers);

			for (i = 0; i < N_players; i++)
			{
				if ( (!Players[i].connected) && (LastPacketTime[i] < oldest_time))
				{
					oldest_time = LastPacketTime[i];
					oldest_player = i;
				}
			}

			if (oldest_player == -1)
			{
				// Everyone is still connected 

				network_dump_player(their, DUMP_FULL);
				return;
			}
			else
			{	
				// Found a slot!

				player_num = oldest_player;
				Network_player_added = 1;
			}
		}
	}
	else 
	{
		// Player is reconnecting
		
		if (Players[player_num].connected)
		{
			mprintf((0, "Extra REQUEST from player ignored.\n"));
			return;
		}

#ifndef SHAREWARE
		if (Newdemo_state == ND_STATE_RECORDING)
			newdemo_record_multi_reconnect(player_num);
#endif

		Network_player_added = 0;

		digi_play_sample(SOUND_HUD_MESSAGE, F1_0);

		HUD_init_message("'%s' %s", Players[player_num].callsign, TXT_REJOIN);
	}

	// Send updated Objects data to the new/returning player

//MWA	Network_player_rejoining = *their;
	Network_player_rejoining.type = PID_REQUEST;
	Network_player_rejoining.player = *their;
	Network_player_rejoining.player.connected = player_num;
	Network_send_objects = 1;
	Network_send_objnum = -1;

	network_send_objects();
}

int network_objnum_is_past(int objnum)
{
	// determine whether or not a given object number has already been sent
	// to a re-joining player.
	
	int player_num = Network_player_rejoining.player.connected;
	int obj_mode = !((object_owner[objnum] == -1) || (object_owner[objnum] == player_num));

	if (!Network_send_objects)
		return 0; // We're not sending objects to a new player

	if (obj_mode > Network_send_object_mode)
		return 0;
	else if (obj_mode < Network_send_object_mode)
	 	return 1;
	else if (objnum < Network_send_objnum)
		return 1;
	else
		return 0;
}

#define OBJ_PACKETS_PER_FRAME 1

#ifndef MAC_SHAREWARE
void network_send_door_updates(void)
{
	// Send door status when new player joins
	
	int i;

	for (i = 0; i < Num_walls; i++)
	{
		if ((Walls[i].type == WALL_DOOR) && ((Walls[i].state == WALL_DOOR_OPENING) || (Walls[i].state == WALL_DOOR_WAITING)))
			multi_send_door_open(Walls[i].segnum, Walls[i].sidenum);
		else if ((Walls[i].type == WALL_BLASTABLE) && (Walls[i].flags & WALL_BLASTED))
			multi_send_door_open(Walls[i].segnum, Walls[i].sidenum);
		else if ((Walls[i].type == WALL_BLASTABLE) && (Walls[i].hps != WALL_HPS))
			multi_send_hostage_door_status(i);
	}

}	

void network_process_monitor_vector(int vector)
{
	int i, j;
	int count = 0;
	segment *seg;
	
	for (i=0; i <= Highest_segment_index; i++)
	{
		int tm, ec, bm;
		seg = &Segments[i];
		for (j = 0; j < 6; j++)
		{
			if ( ((tm = seg->sides[j].tmap_num2) != 0) &&
				  ((ec = TmapInfo[tm&0x3fff].eclip_num) != -1) &&
 				  ((bm = Effects[ec].dest_bm_num) != -1) )
			{
				if (vector & (1 << count))
				{
					seg->sides[j].tmap_num2 = bm | (tm&0xc000);
					mprintf((0, "Monitor %d blown up.\n", count));
				}
				else
					mprintf((0, "Monitor %d intact.\n", count));
				count++;
				Assert(count < 32);
			}
		}
	}
}

int network_create_monitor_vector(void)
{
	int i, j, k;
	int num_blown_bitmaps = 0;
	int monitor_num = 0;
	int blown_bitmaps[7];
	int vector = 0;
	segment *seg;

	for (i=0; i < Num_effects; i++)
	{
		if (Effects[i].dest_bm_num > 0) {
			for (j = 0; j < num_blown_bitmaps; j++)
				if (blown_bitmaps[j] == Effects[i].dest_bm_num)
					break;
			if (j == num_blown_bitmaps)
				blown_bitmaps[num_blown_bitmaps++] = Effects[i].dest_bm_num;
		}
	}		
		
	for (i = 0; i < num_blown_bitmaps; i++)
		mprintf((0, "Blown bitmap #%d = %d.\n", i, blown_bitmaps[i]));
	
	Assert(num_blown_bitmaps <= 7);

	for (i=0; i <= Highest_segment_index; i++)
	{
		int tm, ec;
		seg = &Segments[i];
		for (j = 0; j < 6; j++)
		{
			if ((tm = seg->sides[j].tmap_num2) != 0) 
			{
				if ( ((ec = TmapInfo[tm&0x3fff].eclip_num) != -1) &&
 					  (Effects[ec].dest_bm_num != -1) )
				{
					mprintf((0, "Monitor %d intact.\n", monitor_num));
					monitor_num++;
					Assert(monitor_num < 32);
				}
				else
				{
					for (k = 0; k < num_blown_bitmaps; k++)
					{
						if ((tm&0x3fff) == blown_bitmaps[k])
						{
							mprintf((0, "Monitor %d destroyed.\n", monitor_num));
							vector |= (1 << monitor_num);
							monitor_num++;
							Assert(monitor_num < 32);
							break;
						}
					}
				}
			}
		}
	}
	mprintf((0, "Final monitor vector %x.\n", vector));
	return(vector);
}

void network_stop_resync(netplayer_info *their)
{
	if (Network_game_type == IPX_GAME) {
		if ( (!memcmp(Network_player_rejoining.player.network_info.ipx_info.node, their->network_info.ipx_info.node, 6)) &&
			  (!memcmp(Network_player_rejoining.player.network_info.ipx_info.server, their->network_info.ipx_info.server, 4)) &&
			 (!stricmp(Network_player_rejoining.player.callsign, their->callsign)) )
		{
			mprintf((0, "Aborting resync for player %s.\n", their->callsign));
			Network_send_objects = 0;
			Network_send_objnum = -1;
		}
	} else if (Network_game_type == APPLETALK_GAME) {
		if ( (Network_player_rejoining.player.network_info.appletalk_info.aNode == their->network_info.appletalk_info.aNode) &&
			 (Network_player_rejoining.player.network_info.appletalk_info.aNet == their->network_info.appletalk_info.aNet) &&
			 (!stricmp(Network_player_rejoining.player.callsign, their->callsign)) )
		{
			mprintf((0, "Aborting resync for player %s.\n", their->callsign));
			Network_send_objects = 0;
			Network_send_objnum = -1;
		}
	}
}
#endif

void network_send_objects(void)
{
	short remote_objnum;
	byte owner;
	int loc, i, h;
	object tmpobj;
	short tmps;

	static int obj_count = 0;
	static int frame_num = 0;

	int obj_count_frame = 0;
	int player_num = Network_player_rejoining.player.connected;

	// Send clear objects array trigger and send player num

	Assert(Network_send_objects != 0);
	Assert(player_num >= 0);
	Assert(player_num < MaxNumNetPlayers);

	if (Endlevel_sequence || Fuelcen_control_center_destroyed)
	{
		// Endlevel started before we finished sending the goods, we'll
		// have to stop and try again after the level.

		network_dump_player(&(Network_player_rejoining.player), DUMP_ENDLEVEL);
		Network_send_objects = 0; 
		return;
	}

	for (h = 0; h < OBJ_PACKETS_PER_FRAME; h++) // Do more than 1 per frame, try to speed it up without
															  // over-stressing the receiver.
	{
		obj_count_frame = 0;
		memset(object_buffer, 0, IPX_MAX_DATA_SIZE);
		object_buffer[0] = PID_OBJECT_DATA;
		loc = 3;
	
		if (Network_send_objnum == -1)
		{
			obj_count = 0;
			Network_send_object_mode = 0;
//			mprintf((0, "Sending object array to player %d.\n", player_num));
//MWA		*(short *)(object_buffer+loc) = -1;		loc += 2;
			tmps = swapshort((ushort)-1);
			memcpy(&(object_buffer[loc]), &tmps, 2);	loc += 2;
			object_buffer[loc] = (byte)player_num; 		loc += 1;
														loc += 2; // Placeholder for remote_objnum, not used here
			Network_send_objnum = 0;
			obj_count_frame = 1;
			frame_num = 0;
		}
		
		for (i = Network_send_objnum; i <= Highest_object_index; i++)
		{
#ifdef MAC_SHAREWARE
			if ((Objects[i].type != OBJ_POWERUP) && (Objects[i].type != OBJ_PLAYER) &&
				 (Objects[i].type != OBJ_CNTRLCEN) && (Objects[i].type != OBJ_GHOST) &&
				 (Objects[i].type != OBJ_ROBOT))
				continue;
#else
			if ((Objects[i].type != OBJ_POWERUP) && (Objects[i].type != OBJ_PLAYER) &&
				 (Objects[i].type != OBJ_CNTRLCEN) && (Objects[i].type != OBJ_GHOST) &&
				 (Objects[i].type != OBJ_ROBOT) && (Objects[i].type != OBJ_HOSTAGE))
				continue;
#endif
			if ((Network_send_object_mode == 0) && ((object_owner[i] != -1) && (object_owner[i] != player_num)))
				continue;
			if ((Network_send_object_mode == 1) && ((object_owner[i] == -1) || (object_owner[i] == player_num)))
				continue;
	
			if ( ((IPX_MAX_DATA_SIZE-1) - loc) < (sizeof(object)+5) )
				break; // Not enough room for another object

			obj_count_frame++;
			obj_count++;
	
			remote_objnum = objnum_local_to_remote((short)i, &owner);
			Assert(owner == object_owner[i]);

//MWA		*(short *)(object_buffer+loc) = i;								loc += 2;
//MWA		object_buffer[loc] = owner;										loc += 1;
//MWA		*(short *)(object_buffer+loc) = remote_objnum; 					loc += 2;
//MWA		memcpy(object_buffer+loc, &Objects[i], sizeof(object));	loc += sizeof(object);

			tmps = swapshort((short)i);
			memcpy(&(object_buffer[loc]), &tmps, 2);						loc += 2;
			object_buffer[loc] = owner;										loc += 1;
			tmps = swapshort(remote_objnum);
			memcpy(&(object_buffer[loc]), &tmps, 2);						loc += 2;
			if (Network_game_type == IPX_GAME) {
				memcpy(&tmpobj, &(Objects[i]), sizeof(object));
				swap_object(&tmpobj);
				memcpy(&(object_buffer[loc]), &tmpobj, sizeof(object));			loc += sizeof(object);
			} else if (Network_game_type == APPLETALK_GAME) {
				memcpy(object_buffer+loc, &(Objects[i]), sizeof(object));		loc += sizeof(object);
			}

//			mprintf((0, "..packing object %d, remote %d\n", i, remote_objnum));
		}

		if (obj_count_frame) // Send any objects we've buffered
		{
			frame_num++;
	
			Network_send_objnum = i;
			object_buffer[1] = obj_count_frame;
			object_buffer[2] = frame_num;
//			mprintf((0, "Object packet %d contains %d objects.\n", frame_num, obj_count_frame));

			Assert(loc <= IPX_MAX_DATA_SIZE);

			if (Network_game_type == IPX_GAME)
				ipx_send_internetwork_packet_data( object_buffer, loc, Network_player_rejoining.player.network_info.ipx_info.server, Network_player_rejoining.player.network_info.ipx_info.node );
			else if (Network_game_type == APPLETALK_GAME)
				appletalk_send_packet_data( object_buffer, loc, Network_player_rejoining.player.network_info.appletalk_info.aNode,
											Network_player_rejoining.player.network_info.appletalk_info.aNet,
											Network_player_rejoining.player.network_info.appletalk_info.aSocket);
		}

		if (i > Highest_object_index)
		{
			if (Network_send_object_mode == 0)
			{
				Network_send_objnum = 0;
				Network_send_object_mode = 1; // go to next mode
			}
			else 
			{
				Assert(Network_send_object_mode == 1);

				frame_num++;
				// Send count so other side can make sure he got them all
//				mprintf((0, "Sending end marker in packet #%d.\n", frame_num));
//				mprintf((0, "Sent %d objects.\n", obj_count));
				object_buffer[0] = PID_OBJECT_DATA;
				object_buffer[1] = 1;
				object_buffer[2] = frame_num;
//MWA				*(short *)(object_buffer+3) = -2;
//MWA				*(short *)(object_buffer+6) = obj_count;
				tmps = swapshort((ushort)-2);
				memcpy(&(object_buffer[3]), &tmps, 2);
				tmps = swapshort(obj_count);
				memcpy(&(object_buffer[6]), &tmps, 2);
				if (Network_game_type == IPX_GAME)
					ipx_send_internetwork_packet_data(object_buffer, 8, Network_player_rejoining.player.network_info.ipx_info.server, Network_player_rejoining.player.network_info.ipx_info.node);
				else if (Network_game_type == APPLETALK_GAME)
					appletalk_send_packet_data( object_buffer, 8, Network_player_rejoining.player.network_info.appletalk_info.aNode,
												Network_player_rejoining.player.network_info.appletalk_info.aNet,
												Network_player_rejoining.player.network_info.appletalk_info.aSocket);
			
				// Send sync packet which tells the player who he is and to start!
				network_send_rejoin_sync(player_num);

				// Turn off send object mode
				Network_send_objnum = -1;
				Network_send_objects = 0;
				obj_count = 0;
				return;
			} // mode == 1;
		} // i > Highest_object_index
	} // For PACKETS_PER_FRAME
}

void network_send_rejoin_sync(int player_num)
{
	int i, j;

	Players[player_num].connected = 1; // connect the new guy
	LastPacketTime[player_num] = timer_get_approx_seconds();

	if (Endlevel_sequence || Fuelcen_control_center_destroyed)
	{
		// Endlevel started before we finished sending the goods, we'll
		// have to stop and try again after the level.

		network_dump_player(&(Network_player_rejoining.player), DUMP_ENDLEVEL);
		Network_send_objects = 0; 
		return;
	}

	if (Network_player_added)
	{
		Network_player_rejoining.type = PID_ADDPLAYER;
		Network_player_rejoining.player.connected = player_num;
		network_new_player(&(Network_player_rejoining.player));

		for (i = 0; i < N_players; i++)
		{
			if ( (i != player_num) && (i != Player_num) && (Players[i].connected)) {
				if (Network_game_type == IPX_GAME) {
//MWA				ipx_send_packet_data( (ubyte *)&Network_player_rejoining, sizeof(sequence_packet), Netgame.players[i].server, Netgame.players[i].node, Players[i].net_address);
					send_sequence_packet( Network_player_rejoining, Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node, Players[i].net_address);
				} else if (Network_game_type == APPLETALK_GAME) {
//					send_sequence_packet_appletalk( Network_player_rejoining, Netgame.players[i].network_info.appletalk_info.aNode,
//												Netgame.players[i].network_info.appletalk_info.aNet, Netgame.players[i].network_info.appletalk_info.aSocket);
					appletalk_send_packet_data( (ubyte *)&Network_player_rejoining, sizeof(sequence_packet), Netgame.players[i].network_info.appletalk_info.aNode,
												Netgame.players[i].network_info.appletalk_info.aNet, Netgame.players[i].network_info.appletalk_info.aSocket);
				}
			}
		}
	}	

	// Send sync packet to the new guy

	network_update_netgame();

	// Fill in the kill list
	for (j=0; j<MAX_PLAYERS; j++)
	{
		for (i=0; i<MAX_PLAYERS;i++)
			Netgame.kills[j][i] = kill_matrix[j][i];
		Netgame.killed[j] = Players[j].net_killed_total;
		Netgame.player_kills[j] = Players[j].net_kills_total;
#ifndef MAC_SHAREWARE
		Netgame.player_score[j] = Players[j].score;
#endif
	}	

#ifndef MAC_SHAREWARE
	Netgame.level_time = Players[Player_num].time_level;
	Netgame.monitor_vector = network_create_monitor_vector();
#endif

	mprintf((0, "Sending rejoin sync packet!!!\n"));

#if 0			//  OLD PC WAY!!!!!
 	ipx_send_internetwork_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Network_player_rejoining.player.server, Network_player_rejoining.player.node );
 	ipx_send_internetwork_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Network_player_rejoining.player.server, Network_player_rejoining.player.node ); // repeat for safety
 	ipx_send_internetwork_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Network_player_rejoining.player.server, Network_player_rejoining.player.node ); // repeat for safety
#endif
	if (Network_game_type == IPX_GAME) {
		send_netgame_packet(Network_player_rejoining.player.network_info.ipx_info.server, Network_player_rejoining.player.network_info.ipx_info.node );
		send_netgame_packet(Network_player_rejoining.player.network_info.ipx_info.server, Network_player_rejoining.player.network_info.ipx_info.node );
		send_netgame_packet(Network_player_rejoining.player.network_info.ipx_info.server, Network_player_rejoining.player.network_info.ipx_info.node );
	} else if (Network_game_type == APPLETALK_GAME) {
#if 0
		send_netgame_packet_appletalk( Network_player_rejoining.player.network_info.appletalk_info.aNode,
										Network_player_rejoining.player.network_info.appletalk_info.aNet,
										Network_player_rejoining.player.network_info.appletalk_info.aSocket);
		send_netgame_packet_appletalk( Network_player_rejoining.player.network_info.appletalk_info.aNode,
										Network_player_rejoining.player.network_info.appletalk_info.aNet,
										Network_player_rejoining.player.network_info.appletalk_info.aSocket);
		send_netgame_packet_appletalk( Network_player_rejoining.player.network_info.appletalk_info.aNode,
										Network_player_rejoining.player.network_info.appletalk_info.aNet,
										Network_player_rejoining.player.network_info.appletalk_info.aSocket);
#endif
		appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Network_player_rejoining.player.network_info.appletalk_info.aNode,
									Network_player_rejoining.player.network_info.appletalk_info.aNet,
									Network_player_rejoining.player.network_info.appletalk_info.aSocket);
		appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Network_player_rejoining.player.network_info.appletalk_info.aNode,
									Network_player_rejoining.player.network_info.appletalk_info.aNet,
									Network_player_rejoining.player.network_info.appletalk_info.aSocket);
		appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Network_player_rejoining.player.network_info.appletalk_info.aNode,
									Network_player_rejoining.player.network_info.appletalk_info.aNet,
									Network_player_rejoining.player.network_info.appletalk_info.aSocket);
	}

#ifndef MAC_SHAREWARE
	network_send_door_updates();
#endif
	return;
}

char * network_get_player_name( int objnum )
{
	if ( objnum < 0 ) return NULL; 
	if ( Objects[objnum].type != OBJ_PLAYER ) return NULL;
	if ( Objects[objnum].id >= MAX_PLAYERS ) return NULL;
	if ( Objects[objnum].id >= N_players ) return NULL;
	
	return Players[Objects[objnum].id].callsign;
}


void network_add_player(netplayer_info *p)
{
	int i;
	
	mprintf((0, "Got add player request!\n"));

	for (i=0; i<N_players; i++ )	{
		if (Network_game_type == IPX_GAME) {
			if ( !memcmp( Netgame.players[i].network_info.ipx_info.node, p->network_info.ipx_info.node, 6) &&
				 !memcmp(Netgame.players[i].network_info.ipx_info.server, p->network_info.ipx_info.server, 4))	{
				return;		// already got them
			}
		} else if (Network_game_type == APPLETALK_GAME) {
			if ( (Netgame.players[i].network_info.appletalk_info.aNode == p->network_info.appletalk_info.aNode) &&
				 (Netgame.players[i].network_info.appletalk_info.aNet == p->network_info.appletalk_info.aNet)) {
				 	return;
			}
		}
	}
		
	if ( N_players >= MAX_PLAYERS )	
		return;		// too many of em

	memcpy( Netgame.players[N_players].callsign, p->callsign, CALLSIGN_LEN+1 );
	if (Network_game_type == IPX_GAME) {
		memcpy( Netgame.players[N_players].network_info.ipx_info.node, p->network_info.ipx_info.node, 6 );
		memcpy( Netgame.players[N_players].network_info.ipx_info.server, p->network_info.ipx_info.server, 4 );
	} else if (Network_game_type == APPLETALK_GAME) {
		Netgame.players[N_players].network_info.appletalk_info.aNode = p->network_info.appletalk_info.aNode;
		Netgame.players[N_players].network_info.appletalk_info.aNet = p->network_info.appletalk_info.aNet;
		Netgame.players[N_players].network_info.appletalk_info.aSocket = p->network_info.appletalk_info.aSocket;
	}
	Netgame.players[N_players].connected = 1;
	Players[N_players].connected = 1;
	LastPacketTime[N_players] = timer_get_approx_seconds();
	N_players++;
	Netgame.numplayers = N_players;

	// Broadcast updated info

	network_send_game_info(NULL);
}

// One of the players decided not to join the game

void network_remove_player(netplayer_info *p)
{
	int i,pn;
	
	pn = -1;
	for (i=0; i<N_players; i++ )	{
		if ( (Network_game_type == IPX_GAME) && !memcmp(Netgame.players[i].network_info.ipx_info.node, p->network_info.ipx_info.node, 6) && !memcmp(Netgame.players[i].network_info.ipx_info.server, p->network_info.ipx_info.server, 4)) {
			pn = i;
			break;
		} else if ( (Network_game_type == APPLETALK_GAME) && (Netgame.players[i].network_info.appletalk_info.aNode == p->network_info.appletalk_info.aNode) &&
					(Netgame.players[i].network_info.appletalk_info.aNet == p->network_info.appletalk_info.aNet) ) {
			pn = i;
			break;
		}
	}
	
	if (pn < 0 ) return;

	for (i=pn; i<N_players-1; i++ )	{
		memcpy( Netgame.players[i].callsign, Netgame.players[i+1].callsign, CALLSIGN_LEN+1 );
		if (Network_game_type == IPX_GAME) {
			memcpy( Netgame.players[i].network_info.ipx_info.node, Netgame.players[i+1].network_info.ipx_info.node, 6 );
			memcpy( Netgame.players[i].network_info.ipx_info.server, Netgame.players[i+1].network_info.ipx_info.server, 4 );
		} else if (Network_game_type == APPLETALK_GAME) {
			Netgame.players[i].network_info.appletalk_info.aNode = Netgame.players[i+1].network_info.appletalk_info.aNode;
			Netgame.players[i].network_info.appletalk_info.aNet = Netgame.players[i+1].network_info.appletalk_info.aNet;
			Netgame.players[i].network_info.appletalk_info.aSocket = Netgame.players[i+1].network_info.appletalk_info.aSocket;
		}
	}
		
	N_players--;
	Netgame.numplayers = N_players;

	// Broadcast new info

	network_send_game_info(NULL);

}

void
network_dump_player(netplayer_info *their, int why)
{
	// Inform player that he was not chosen for the netgame

	sequence_packet temp;

	temp.type = PID_DUMP;
	memcpy(temp.player.callsign, Players[Player_num].callsign, CALLSIGN_LEN+1);
	temp.player.connected = why;
//MWA	ipx_send_internetwork_packet_data( (ubyte *)&temp, sizeof(sequence_packet), server, node);
	if (Network_game_type == IPX_GAME)
		send_sequence_packet( temp, their->network_info.ipx_info.server, their->network_info.ipx_info.node, NULL);
	else if (Network_game_type == APPLETALK_GAME)
//		send_sequence_packet_appletalk( temp, their->network_info.appletalk_info.aNode, their->network_info.appletalk_info.aNet, their->network_info.appletalk_info.aSocket);
		appletalk_send_packet_data( (ubyte *)&temp, sizeof(sequence_packet), their->network_info.appletalk_info.aNode, their->network_info.appletalk_info.aNet, their->network_info.appletalk_info.aSocket);
}

void
network_send_game_list_request(void)
{
	// Send a broadcast request for game info

	sequence_packet me;

	mprintf((0, "Sending game_list request.\n"));
	me.type = PID_GAME_LIST;
	memcpy( me.player.callsign, Players[Player_num].callsign, CALLSIGN_LEN+1 );
	if (Network_game_type == IPX_GAME) {
		memcpy( me.player.network_info.ipx_info.node, ipx_get_my_local_address(), 6 );
		memcpy( me.player.network_info.ipx_info.server, ipx_get_my_server_address(), 4 );
//MWA	ipx_send_broadcast_packet_data( (ubyte *)&me, sizeof(sequence_packet) );
		send_sequence_packet( me, NULL, NULL, NULL);
	} else if (Network_game_type == APPLETALK_GAME) {
		me.player.network_info.appletalk_info.aNode = appletalk_get_my_node();
		me.player.network_info.appletalk_info.aNet = appletalk_get_my_net();
		me.player.network_info.appletalk_info.aSocket = appletalk_get_my_socket();
		if (!appletalk_use_broadcast)
			appletalk_send_game_info( (ubyte *)&me, sizeof(sequence_packet), Network_zone_name );
		else
			appletalk_send_broadcast_packet_data( (ubyte *)&me, sizeof(sequence_packet) );
	}
	
}

void
network_update_netgame(void)
{
	// Update the netgame struct with current game variables

	int i, j;

	if (Network_status == NETSTAT_STARTING)
		return;

	Netgame.numplayers = N_players;
	Netgame.game_status = Network_status;
	Netgame.max_numplayers = MaxNumNetPlayers;

	for (i = 0; i < MAX_NUM_NET_PLAYERS; i++) 
	{
		Netgame.players[i].connected = Players[i].connected;
		for(j = 0; j < MAX_NUM_NET_PLAYERS; j++)
			Netgame.kills[i][j] = kill_matrix[i][j];
		Netgame.killed[i] = Players[i].net_killed_total;
		Netgame.player_kills[i] = Players[i].net_kills_total;
#ifndef MAC_SHAREWARE
		Netgame.player_score[i] = Players[i].score;
		Netgame.player_flags[i] = (Players[i].flags & (PLAYER_FLAGS_BLUE_KEY | PLAYER_FLAGS_RED_KEY | PLAYER_FLAGS_GOLD_KEY));
#endif
	}
	Netgame.team_kills[0] = team_kills[0];
	Netgame.team_kills[1] = team_kills[1];
	Netgame.levelnum = Current_level_num;
}

void
network_send_endlevel_sub(int player_num)
{
	endlevel_info end;
	int i;

	// Send an endlevel packet for a player
	end.type 		= PID_ENDLEVEL;
	end.player_num = player_num;
	end.connected	= Players[player_num].connected;
	end.kills		= Players[player_num].net_kills_total;
	end.killed		= Players[player_num].net_killed_total;
	memcpy(end.kill_matrix, kill_matrix[player_num], MAX_PLAYERS*sizeof(short));

	if (Players[player_num].connected == 1) // Still playing
	{
		Assert(Fuelcen_control_center_destroyed);
	 	end.seconds_left = Fuelcen_seconds_left;
	}

//	mprintf((0, "Sending endlevel packet.\n"));

	for (i = 0; i < N_players; i++)
	{	
		if ((i != Player_num) && (i!=player_num) && (Players[i].connected)) {
			if (Network_game_type == IPX_GAME) {
//MWA			ipx_send_packet_data((ubyte *)&end, sizeof(endlevel_info), Netgame.players[i].server, Netgame.players[i].node,Players[i].net_address);
				send_endlevel_packet(&end, Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node,Players[i].net_address);
			} else if (Network_game_type == APPLETALK_GAME) {
//				send_endlevel_packet_appletalk( &end, Netgame.players[i].network_info.appletalk_info.aNode,
//											Netgame.players[i].network_info.appletalk_info.aNet,
//											Netgame.players[i].network_info.appletalk_info.aSocket);
				appletalk_send_packet_data( (ubyte *)&end, sizeof(endlevel_info), Netgame.players[i].network_info.appletalk_info.aNode,
											Netgame.players[i].network_info.appletalk_info.aNet,
											Netgame.players[i].network_info.appletalk_info.aSocket);
			}
		}
	}
}

void
network_send_endlevel_packet(void)
{
	// Send an updated endlevel status to other hosts

	network_send_endlevel_sub(Player_num);
}

void
network_send_game_info(netplayer_info *their)
{
 	// Send game info to someone who requested it
	// or to all currently active players.

	int i;
	char old_type, old_status;

	mprintf((0, "Sending game info.\n"));

	network_update_netgame(); // Update the values in the netgame struct

	old_type = Netgame.type;
	old_status = Netgame.game_status;

	Netgame.type = PID_GAME_INFO;
	if (Endlevel_sequence || Fuelcen_control_center_destroyed)
		Netgame.game_status = NETSTAT_ENDLEVEL;

	if (!their) {
		if (Network_game_type == IPX_GAME) {
//MWA		ipx_send_broadcast_packet_data((ubyte *)&Netgame, sizeof(netgame_info));
			send_netgame_packet(NULL, NULL);
		} else if ( Network_game_type == APPLETALK_GAME ) {
			if (appletalk_use_broadcast)
				appletalk_send_broadcast_packet_data( (ubyte *)&Netgame, sizeof(netgame_info) );
			else {
				for (i = 0; i < N_players; i++) {
#if 0
					send_netgame_packet_appletalk( Netgame.players[i].network_info.appletalk_info.aNode,
												Netgame.players[i].network_info.appletalk_info.aNet,
												Netgame.players[i].network_info.appletalk_info.aSocket );
#endif
					appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info),
												Netgame.players[i].network_info.appletalk_info.aNode,
												Netgame.players[i].network_info.appletalk_info.aNet,
												Netgame.players[i].network_info.appletalk_info.aSocket );
				}
			}
		}
	} else	 {
		if (Network_game_type == IPX_GAME) {
//MWA		ipx_send_internetwork_packet_data((ubyte *)&Netgame, sizeof(netgame_info), their->player.server, their->player.node);
			send_netgame_packet(their->network_info.ipx_info.server, their->network_info.ipx_info.node);
		} else if (Network_game_type == APPLETALK_GAME) {
//			send_netgame_packet_appletalk( their->network_info.appletalk_info.aNode, their->network_info.appletalk_info.aNet, their->network_info.appletalk_info.aSocket );
			appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), their->network_info.appletalk_info.aNode,
										their->network_info.appletalk_info.aNet, their->network_info.appletalk_info.aSocket );
		}
	}

	Netgame.type = old_type;
	Netgame.game_status = old_status;
}	

int network_send_request(void)
{
	// Send a request to join a game 'Netgame'.  Returns 0 if we can join this
	// game, non-zero if there is some problem.
	int i;
	int loc;
	ushort tmps;
	
	loc = 0;

	Assert(Netgame.numplayers > 0);

	for (i = 0; i < MAX_NUM_NET_PLAYERS; i++)
		if (Netgame.players[i].connected)
			break;

	Assert(i < MAX_NUM_NET_PLAYERS);

	mprintf((0, "Sending game enroll request to player %d.  Level = %d\n", i, Netgame.levelnum));

//	segments_checksum = netmisc_calc_checksum( Segments, sizeof(segment)*(Highest_segment_index+1) ); 	

	My_Seq.type = PID_REQUEST;
	My_Seq.player.connected = Current_level_num;

	if (Network_game_type == IPX_GAME)  {
//MWA	ipx_send_internetwork_packet_data((ubyte *)&My_Seq, sizeof(sequence_packet), Netgame.players[i].server, Netgame.players[i].node);
		send_sequence_packet(My_Seq, Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node, NULL);
	} else if (Network_game_type == APPLETALK_GAME) {
//		send_sequence_packet_appletalk( My_Seq, Netgame.players[i].network_info.appletalk_info.aNode,
//									Netgame.players[i].network_info.appletalk_info.aNet,
//									Netgame.players[i].network_info.appletalk_info.aSocket);
		appletalk_send_packet_data( (ubyte *)&My_Seq, sizeof(sequence_packet), Netgame.players[i].network_info.appletalk_info.aNode,
									Netgame.players[i].network_info.appletalk_info.aNet,
									Netgame.players[i].network_info.appletalk_info.aSocket);
	}
	return i;
}
	
void network_process_gameinfo(ubyte *data)
{
	int i, j, loc;
//	netgame_info *new;
	netgame_info ngame;

//	new = (netgame_info *)data;		
	if ( Network_game_type == IPX_GAME )
		receive_netgame_packet(data, &ngame);
	else if ( Network_game_type == APPLETALK_GAME )
		memcpy(&ngame, data, sizeof(netgame_info));

	Network_games_changed = 1;

	mprintf((0, "Got game data for game %s.\n", ngame.game_name));

	for (i = 0; i < num_active_games; i++) {
		if ( (Network_game_type == IPX_GAME) && !stricmp(Active_games[i].game_name, ngame.game_name) && !memcmp(Active_games[i].players[0].network_info.ipx_info.node, ngame.players[0].network_info.ipx_info.node, 6)
			 && !memcmp(Active_games[i].players[0].network_info.ipx_info.server, ngame.players[0].network_info.ipx_info.server, 4))
			break;
		else if ( (Network_game_type == APPLETALK_GAME) && !stricmp(Active_games[i].game_name, ngame.game_name) && (Active_games[i].players[0].network_info.appletalk_info.aNode == ngame.players[0].network_info.appletalk_info.aNode)
			 && (Active_games[i].players[0].network_info.appletalk_info.aNet == ngame.players[0].network_info.appletalk_info.aNet) )
			break;
	}

	if ( (Network_game_type == IPX_GAME) && (i == MAX_ACTIVE_NETGAMES) )
	{
		mprintf((0, "Too many netgames.\n"));
		return;
	} else if ( (Network_game_type == APPLETALK_GAME) && (i == MAX_ACTIVE_NETGAMES) ) {
		mprintf((0, "Too many netgames.\n"));
		return;
	}
	memcpy(&Active_games[i], &ngame, sizeof(netgame_info));
	if (i == num_active_games)
		num_active_games++;

	if (Active_games[i].numplayers == 0)
	{
		// Delete this game
		for (j = i; j < num_active_games-1; j++)
			memcpy(&Active_games[j], &Active_games[j+1], sizeof(netgame_info));
		num_active_games--;
	}
}

void network_process_dump(netplayer_info *their)
{
	// Our request for join was denied.  Tell the user why.

	mprintf((0, "Dumped by player %s, type %d.\n", their->callsign, their->connected));

	nm_messagebox(NULL, 1, TXT_OK, NET_DUMP_STRINGS(their->connected));
	Network_status = NETSTAT_MENU;
} 

//#ifndef MAC_SHAREWARE	
void network_process_request(netplayer_info *their)
{
	// Player is ready to receieve a sync packet
	int i;

	mprintf((0, "Player %s ready for sync.\n", their->callsign));

	for (i = 0; i < N_players; i++) {
		if ( (Network_game_type == IPX_GAME) &&
			 !memcmp(their->network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.server, 4) &&
			 !memcmp(their->network_info.ipx_info.node, Netgame.players[i].network_info.ipx_info.node, 6) &&
			 (!stricmp(their->callsign, Netgame.players[i].callsign)) ) {
			Players[i].connected = 1;
			break;
		} else if ( (Network_game_type == APPLETALK_GAME) && (their->network_info.appletalk_info.aNode == Netgame.players[i].network_info.appletalk_info.aNode) &&
					(their->network_info.appletalk_info.aNet == Netgame.players[i].network_info.appletalk_info.aNet) ) {
			Players[i].connected = 1;
			break;
		}
	}
}
//#endif

void network_process_packet(ubyte *data, int length )
{
	netplayer_info ninfo;

	if ( Network_game_type == IPX_GAME )
		receive_netplayer_info(&(data[1]), &ninfo);	
	else if ( Network_game_type == APPLETALK_GAME )
		memcpy(&ninfo, &(data[2]), sizeof(netplayer_info));		// watch this!!! hard wired char location!!!
	
//	mprintf( (0, "Got packet of length %d, type %d\n", length, their->type ));
	
//	if ( length < sizeof(sequence_packet) ) return;

	length = length;

	switch( data[0] )	{
	
	case PID_GAME_INFO:
		mprintf((0, "GOT a PID_GAME_INFO!\n"));
		if (length != sizeof(netgame_info))
			mprintf((0, " Invalid size %d for netgame packet.\n", length));
		if (Network_status == NETSTAT_BROWSING)
			network_process_gameinfo(data);
		break;
	case PID_GAME_LIST:
		// Someone wants a list of games
		mprintf((0, "Got a PID_GAME_LIST!\n"));
		if ((Network_status == NETSTAT_PLAYING) || (Network_status == NETSTAT_STARTING) || (Network_status == NETSTAT_ENDLEVEL))
			if (network_i_am_master())
				network_send_game_info(&ninfo);
		break;
	case PID_ADDPLAYER:
		mprintf( (0, "Got NEWPLAYER message from %s.\n", ninfo.callsign));
		network_new_player(&ninfo);
		break;			
	case PID_REQUEST:
		mprintf( (0, "Got REQUEST from '%s'\n", ninfo.callsign ));
		if (Network_status == NETSTAT_STARTING)	
		{
			// Someone wants to join our game!
			network_add_player(&ninfo);
		}
//#ifndef MAC_SHAREWARE
		else if (Network_status == NETSTAT_WAITING)
		{
			// Someone is ready to recieve a sync packet
			network_process_request(&ninfo);
		}
//#endif
		else if (Network_status == NETSTAT_PLAYING)
		{
			// Someone wants to join a game in progress!
			network_welcome_player(&ninfo);
		}
		break;
	case PID_DUMP:	
		if (Network_status == NETSTAT_WAITING)
			network_process_dump(&ninfo);
		break;
	case PID_QUIT_JOINING:
		if (Network_status == NETSTAT_STARTING)
			network_remove_player( &ninfo );
#ifndef MAC_SHAREWARE
		else if ((Network_status == NETSTAT_PLAYING) && (Network_send_objects))
			network_stop_resync( &ninfo );
#endif
		break;
	case PID_SYNC:	
		if (Network_status == NETSTAT_WAITING) {
			network_read_sync_packet((netgame_info *)data);
		}
		break;
	case PID_PDATA:	
		if ((Game_mode&GM_NETWORK) && ((Network_status == NETSTAT_PLAYING)||(Network_status == NETSTAT_ENDLEVEL) )) { 
			network_read_pdata_packet(data);
		}
		break;
	case PID_APPLETALK_PDATA:
		if ((Game_mode&GM_NETWORK) && ((Network_status == NETSTAT_PLAYING)||(Network_status == NETSTAT_ENDLEVEL) )) { 
			network_read_appletalk_pdata_packet(data);
		}
		break;
	case PID_OBJECT_DATA:
		if (Network_status == NETSTAT_WAITING) 
			network_read_object_packet(data);
		break;
	case PID_ENDLEVEL:
		if ((Network_status == NETSTAT_ENDLEVEL) || (Network_status == NETSTAT_PLAYING))
			network_read_endlevel_packet(data);
		else
			mprintf((0, "Junked endlevel packet.\n"));
		break;
	case PID_GAME_VALIDATE:
		if ( network_i_am_master() )
			network_process_validate_game(&ninfo);
		break;
	case PID_GAME_VALIDATED:
		network_process_game_validated(data);
		break;
	default:
		mprintf((0, "Ignoring invalid packet type.\n"));
		Int3(); // Invalid network packet type, see ROB
	}
}

#ifndef NDEBUG
void dump_segments()
{
	FILE * fp;

	fp = fopen( "TEST.DMP", "wb" );
	fwrite( Segments, sizeof(segment)*(Highest_segment_index+1),1, fp ); 	
	fclose(fp);
	mprintf( (0, "SS=%d\n", sizeof(segment) ));
}
#endif

void
network_read_endlevel_packet( ubyte *data )
{
	// Special packet for end of level syncing

	int playernum;
	endlevel_info end;	

	if ( Network_game_type == IPX_GAME )
		receive_endlevel_packet(data, &end);
	else
		memcpy( &end, data, sizeof(endlevel_info) );

	playernum = end.player_num;
	
	Assert(playernum != Player_num);
	Assert(playernum < N_players);

	if ((Network_status == NETSTAT_PLAYING) && (end.connected != 0))
		return; // Only accept disconnect packets if we're not out of the level yet

	Players[playernum].connected = end.connected;
	memcpy(&kill_matrix[playernum][0], end.kill_matrix, MAX_PLAYERS*sizeof(short));
	Players[playernum].net_kills_total = end.kills;
	Players[playernum].net_killed_total = end.killed;

	if ((Players[playernum].connected == 1) && (end.seconds_left < Fuelcen_seconds_left))
		Fuelcen_seconds_left = end.seconds_left;

	LastPacketTime[playernum] = timer_get_approx_seconds();

//	mprintf((0, "Got endlevel packet from player %d.\n", playernum));
}

void
network_pack_objects(void)
{
	// Switching modes, pack the object array

	special_reset_objects();
}				

int
network_verify_objects(int remote, int local)
{
	int i;
	int nplayers, got_controlcen=0;

	if ((remote-local) > 10)
		return(-1);

#ifndef MAC_SHAREWARE
	if (Game_mode & GM_MULTI_ROBOTS)
		got_controlcen = 1;
#endif

	nplayers = 0;

	for (i = 0; i <= Highest_object_index; i++)
	{
		if ((Objects[i].type == OBJ_PLAYER) || (Objects[i].type == OBJ_GHOST))
			nplayers++;
		if (Objects[i].type == OBJ_CNTRLCEN)
			got_controlcen=1;
	}

	if (got_controlcen && (nplayers >= MaxNumNetPlayers))
		return(0);

	return(1);
}
	
void
network_read_object_packet( ubyte *data )
{
	// Object from another net player we need to sync with

	short objnum, remote_objnum;
	byte obj_owner;
	int segnum, i;
	object *obj;

	static int my_pnum = 0;
	static int mode = 0;
	static int object_count = 0;
	static int frame_num = 0;
	int nobj = data[1];
	int loc = 3;
	int remote_frame_num = data[2];
	
	frame_num++;

//	mprintf((0, "Object packet %d (remote #%d) contains %d objects.\n", frame_num, remote_frame_num, nobj));

	for (i = 0; i < nobj; i++)
	{
		objnum = swapshort(*(short *)(data+loc));			loc += 2;
		obj_owner = data[loc];								loc += 1;
		remote_objnum = swapshort(*(short *)(data+loc));	loc += 2;

		if (objnum == -1) 
		{
			// Clear object array
			mprintf((0, "Clearing object array.\n"));

			init_objects();
			Network_rejoined = 1;
			my_pnum = obj_owner;
			change_playernum_to(my_pnum);
			mode = 1;
			object_count = 0;
			frame_num = 1;
		}
		else if (objnum == -2)
		{
			// Special debug checksum marker for entire send
			if (mode == 1)
			{
				network_pack_objects();
				mode = 0;
			}
			mprintf((0, "Objnum -2 found in frame local %d remote %d.\n", frame_num, remote_frame_num));
			mprintf((0, "Got %d objects, expected %d.\n", object_count, remote_objnum));
			if (remote_objnum != object_count) {
				Int3();
			}
			if (network_verify_objects(remote_objnum, object_count))
			{
				// Failed to sync up 
				nm_messagebox(NULL, 1, TXT_OK, TXT_NET_SYNC_FAILED);
				Network_status = NETSTAT_MENU;				
				return;
			}
			frame_num = 0;
		}
		else 
		{
			if (frame_num != remote_frame_num)
				Int3();

			object_count++;
			if ((obj_owner == my_pnum) || (obj_owner == -1)) 
			{
				if (mode != 1)
					Int3(); // SEE ROB
				objnum = remote_objnum;
				//if (objnum > Highest_object_index)
				//{
				//	Highest_object_index = objnum;
				//	num_objects = Highest_object_index+1;
				//}
			}
			else {
				if (mode == 1)
				{
					network_pack_objects();
					mode = 0;
				}
				objnum = obj_allocate();
			}
			if (objnum != -1) {
				obj = &Objects[objnum];
				if (obj->segnum != -1)
					obj_unlink(objnum);
				Assert(obj->segnum == -1);
				Assert(objnum < MAX_OBJECTS);
				memcpy(obj,data+loc,sizeof(object));		loc += sizeof(object);
				if (Network_game_type == IPX_GAME)
					swap_object(obj);
				segnum = obj->segnum;
				obj->next = obj->prev = obj->segnum = -1;
				obj->attached_obj = -1;
				if (segnum > -1)
					obj_link(obj-Objects,segnum);
				if (obj_owner == my_pnum) 
					map_objnum_local_to_local(objnum);
				else if (obj_owner != -1)
					map_objnum_local_to_remote(objnum, remote_objnum, obj_owner);
				else
					object_owner[objnum] = -1;
			}
		} // For a standard onbject
	} // For each object in packet
}
	
void network_sync_poll( int nitems, newmenu_item * menus, int * key, int citem )
{
	// Polling loop waiting for sync packet to start game


	static fix t1 = 0;

	menus = menus;
	citem = citem;
	nitems = nitems;

	network_listen();

	if (Network_status != NETSTAT_WAITING)	// Status changed to playing, exit the menu
		*key = -2;

	if (!Network_rejoined && (timer_get_approx_seconds() > t1+F1_0*2))
	{
		int i;

		// Poll time expired, re-send request
		
		t1 = timer_get_approx_seconds();

		mprintf((0, "Re-sending join request.\n"));
		i = network_send_request();
		if (i < 0)
			*key = -2;
	}
}

void network_start_poll( int nitems, newmenu_item * menus, int * key, int citem )
{
	int i,n,nm;

	key=key;
	citem=citem;

	Assert(Network_status == NETSTAT_STARTING);

	if (!menus[0].value) {
			menus[0].value = 1;
			menus[0].redraw = 1;
	}

	for (i=1; i<nitems; i++ )	{
		if ( (i>= N_players) && (menus[i].value) )	{
			menus[i].value = 0;
			menus[i].redraw = 1;
		}
	}

	nm = 0;
	for (i=0; i<nitems; i++ )	{
		if ( menus[i].value )	{
			nm++;
			if ( nm > N_players )	{
				menus[i].value = 0;
				menus[i].redraw = 1;
			}
		}
	}

	if ( nm > MaxNumNetPlayers )	{
		nm_messagebox( TXT_ERROR, 1, TXT_OK, "%s %d %s", TXT_SORRY_ONLY, MaxNumNetPlayers, TXT_NETPLAYERS_IN );
		// Turn off the last player highlighted
		for (i = N_players; i > 0; i--)
			if (menus[i].value == 1) 
			{
				menus[i].value = 0;
				menus[i].redraw = 1;
				break;
			}
	}

	if (nitems > MAX_PLAYERS ) return;
	
	n = Netgame.numplayers;
	network_listen();

	if (n < Netgame.numplayers ) 	
	{
		sprintf( menus[N_players-1].text, "%d. %-16s", N_players, Netgame.players[N_players-1].callsign );
		menus[N_players-1].redraw = 1;
		if (N_players <= MaxNumNetPlayers)
		{
			menus[N_players-1].value = 1;
		}
	} 
	else if ( n > Netgame.numplayers )	
	{
		// One got removed...
		for (i=0; i<N_players; i++ )	
		{
			sprintf( menus[i].text, "%d. %-16s", i+1, Netgame.players[i].callsign );
			if (i < MaxNumNetPlayers)
				menus[i].value = 1;
			else
				menus[i].value = 0;
			menus[i].redraw = 1;
		}
		for (i=N_players; i<n; i++ )	
		{
			sprintf( menus[i].text, "%d. ", i+1 );		// Clear out the deleted entries...
			menus[i].value = 0;
			menus[i].redraw = 1;
		}
   }
}

int opt_cinvul;
int last_cinvul=0;

#pragma off (unreferenced)
void network_game_param_poll( int nitems, newmenu_item * menus, int * key, int citem )
{
#ifdef MAC_SHAREWARE
	return;
#else
 	if (menus[6].value && !menus[10].value) { 
		menus[10].value = 1;
		menus[10].redraw = 1;
	}
	if (menus[8].value) {
		if (!menus[11].value) {
			menus[11].value = 1;
			menus[11].redraw = 1;
		}
//		if (!menus[12].value) {
//			menus[12].value = 1;
//			menus[12].redraw = 1;
//		}
	}
	if ( last_cinvul != menus[opt_cinvul].value )	{
		sprintf( menus[opt_cinvul].text, "%s: %d %s", TXT_REACTOR_LIFE, menus[opt_cinvul].value*5, TXT_MINUTES_ABBREV );
		last_cinvul = menus[opt_cinvul].value;
		menus[opt_cinvul].redraw = 1;
	}		

#endif
}
#pragma on (unreferenced)

int network_get_game_params( char * game_name, int *mode, int *game_flags, int *level )
{
	int i;
	int opt, opt_name, opt_level, opt_mode, opt_closed, opt_difficulty;
	newmenu_item m[16];
	char name[NETGAME_NAME_LEN+1];
	char slevel[5];
	char level_text[32];
	char srinvul[32];

#ifndef MAC_SHAREWARE
	int new_mission_num;
	int anarchy_only;

	new_mission_num = multi_choose_mission(&anarchy_only);

	if (new_mission_num < 0)
		return -1;

	strcpy(Netgame.mission_name, Mission_list[new_mission_num].filename);
	strcpy(Netgame.mission_title, Mission_list[new_mission_num].mission_name);
	Netgame.control_invul_time = control_invul_time;
#endif
	
	sprintf( name, "%s%s", Players[Player_num].callsign, TXT_S_GAME );
	sprintf( slevel, "1" );

	opt = 0;
	m[opt].type = NM_TYPE_TEXT; m[opt].text = TXT_DESCRIPTION; opt++;

	opt_name = opt;
	m[opt].type = NM_TYPE_INPUT; m[opt].text = name; m[opt].text_len = NETGAME_NAME_LEN; opt++;

	sprintf(level_text, "%s (1-%d)", TXT_LEVEL_, Last_level);
	if (Last_secret_level < -1)
		sprintf(level_text+strlen(level_text)-1, ", S1-S%d)", -Last_secret_level);
	else if (Last_secret_level == -1)
		sprintf(level_text+strlen(level_text)-1, ", S1)");

	Assert(strlen(level_text) < 32);

	m[opt].type = NM_TYPE_TEXT; m[opt].text = level_text; opt++;

	opt_level = opt;
	m[opt].type = NM_TYPE_INPUT; m[opt].text = slevel; m[opt].text_len=4; opt++;
	m[opt].type = NM_TYPE_TEXT; m[opt].text = TXT_MODE; opt++;

	opt_mode = opt;
	m[opt].type = NM_TYPE_RADIO; m[opt].text = TXT_ANARCHY; m[opt].value=1; m[opt].group=0; opt++;
	m[opt].type = NM_TYPE_RADIO; m[opt].text = TXT_TEAM_ANARCHY; m[opt].value=0; m[opt].group=0; opt++;
	m[opt].type = NM_TYPE_RADIO; m[opt].text = TXT_ANARCHY_W_ROBOTS; m[opt].value=0; m[opt].group=0; opt++;
	m[opt].type = NM_TYPE_RADIO; m[opt].text = TXT_COOPERATIVE; m[opt].value=0; m[opt].group=0; opt++;
	m[opt].type = NM_TYPE_TEXT; m[opt].text = TXT_OPTIONS; opt++;

	opt_closed = opt;
	m[opt].type = NM_TYPE_CHECK; m[opt].text = TXT_CLOSED_GAME; m[opt].value=0; opt++;
#ifndef MAC_SHAREWARE
	m[opt].type = NM_TYPE_CHECK; m[opt].text = TXT_SHOW_ON_MAP; m[opt].value=0; opt++;
#endif

	opt_difficulty = opt;
	m[opt].type = NM_TYPE_SLIDER; m[opt].value=Player_default_difficulty; m[opt].text=TXT_DIFFICULTY; m[opt].min_value=0; m[opt].max_value=(NDL-1); opt++;

#ifndef MAC_SHAREWARE
	opt_cinvul = opt;
	sprintf( srinvul, "%s: %d %s", TXT_REACTOR_LIFE, control_invul_time * 5, TXT_MINUTES_ABBREV );
	last_cinvul = control_invul_time;
	m[opt].type = NM_TYPE_SLIDER; m[opt].value=control_invul_time; m[opt].text= srinvul; m[opt].min_value=0; m[opt].max_value=15; opt++;

	Assert(opt <= 16);
#endif

menu:
	i = newmenu_do4( NULL, TXT_NETGAME_SETUP, opt, m, network_game_param_poll, 1, NULL, -1, -1, 1 );
	
	if ( i > -1 )	{
		int j;

		for (j = 0; j < num_active_games; j++)
			if (!stricmp(Active_games[j].game_name, name))
			{
				nm_messagebox(TXT_ERROR, 1, TXT_OK, TXT_DUPLICATE_NAME);
				goto menu;
			}

		strcpy( game_name, name );
		

		if (!strnicmp(slevel, "s", 1))
			*level = -atoi(slevel+1);
		else
			*level = atoi(slevel);

		if ((*level < Last_secret_level) || (*level > Last_level) || (*level == 0))
		{
			nm_messagebox(TXT_ERROR, 1, TXT_OK, TXT_LEVEL_OUT_RANGE );
			sprintf(slevel, "1");
			goto menu;
		}
		if ( m[opt_mode].value )
	 		*mode = NETGAME_ANARCHY;

#ifdef MAC_SHAREWARE
		else 
		{
			nm_messagebox(TXT_SORRY, 1, TXT_OK, TXT_REGISTERED_ONLY );
			m[opt_mode+1].value = 0;
			m[opt_mode+2].value = 0;
			m[opt_mode+3].value = 0;
			m[opt_mode].value = 1;
			goto menu;
		}
#else
		else if (m[opt_mode+1].value) {
			*mode = NETGAME_TEAM_ANARCHY;
		}
		else if (anarchy_only) {
			nm_messagebox(NULL, 1, TXT_OK, TXT_ANARCHY_ONLY_MISSION);
			m[opt_mode+2].value = 0;
			m[opt_mode+3].value = 0;
			m[opt_mode].value = 1;
			goto menu;
		}		
		else if ( m[opt_mode+2].value )	
			*mode = NETGAME_ROBOT_ANARCHY;
		else if ( m[opt_mode+3].value ) 
			*mode = NETGAME_COOPERATIVE;
		else Int3(); // Invalid mode -- see Rob
#endif
		if (m[opt_closed].value)
			*game_flags |= NETGAME_FLAG_CLOSED;
#ifndef MAC_SHAREWARE
		if (m[opt_closed+1].value)
			*game_flags |= NETGAME_FLAG_SHOW_MAP;
#endif

		Difficulty_level = m[opt_difficulty].value;

#ifndef MAC_SHAREWARE
		//control_invul_time = atoi( srinvul )*60*F1_0;
		control_invul_time = m[opt_cinvul].value;
		Netgame.control_invul_time = control_invul_time*5*F1_0*60;
#endif
	}
	return i;
}

void
network_set_game_mode(int gamemode)
{
	Show_kill_list = 1;

	if ( gamemode == NETGAME_ANARCHY )
		Game_mode = GM_NETWORK;
	else if ( gamemode == NETGAME_ROBOT_ANARCHY )
		Game_mode = GM_NETWORK | GM_MULTI_ROBOTS;
	else if ( gamemode == NETGAME_COOPERATIVE ) 
		Game_mode = GM_NETWORK | GM_MULTI_COOP | GM_MULTI_ROBOTS;
	else if ( gamemode == NETGAME_TEAM_ANARCHY )
	{
		Game_mode = GM_NETWORK | GM_TEAM;
		Show_kill_list = 2;
	}
	else
		Int3();
	if ( (Network_game_type == APPLETALK_GAME) && (Network_appletalk_type == LOCALTALK_TYPE) ) {
		if (Game_mode & GM_MULTI_ROBOTS)
			MaxNumNetPlayers = 2;
		else
			MaxNumNetPlayers = 3;
	} else {
		if (Game_mode & GM_MULTI_ROBOTS)
			MaxNumNetPlayers = 4;
		else
			MaxNumNetPlayers = 8;
	}
}

int
network_find_game(void)
{
	// Find out whether or not there is space left on this socket

	fix t1;

	Network_status = NETSTAT_BROWSING;

	num_active_games = 0;

	show_boxed_message(TXT_WAIT);

	network_send_game_list_request();
	t1 = timer_get_approx_seconds() + F1_0*2;

	while (timer_get_approx_seconds() < t1) // Wait 3 seconds for replies
		network_listen();

	clear_boxed_message();

//	mprintf((0, "%s %d %s\n", TXT_FOUND, num_active_games, TXT_ACTIVE_GAMES));

	if ( num_active_games < MAX_ACTIVE_NETGAMES )
		return 0;
		
	return 1;
}
	
void network_read_sync_packet( netgame_info * sp )
{	
	int i, j;

	char temp_callsign[CALLSIGN_LEN+1];
	
	// This function is now called by all people entering the netgame.

	// mprintf( (0, "%s %d\n", TXT_STARTING_NETGAME, sp->levelnum ));

	if (sp != &Netgame) {
		if ( Network_game_type == IPX_GAME )
			receive_netgame_packet((ubyte *)sp, &Netgame);
		else
			memcpy( &Netgame, sp, sizeof(netgame_info) );
	}

	N_players = Netgame.numplayers;
	Difficulty_level = Netgame.difficulty;
	Network_status = Netgame.game_status;

	Assert(Function_mode != FMODE_GAME);

	// New code, 11/27

	mprintf((1, "Netgame.checksum = %d, calculated checksum = %d.\n", Netgame.segments_checksum, my_segments_checksum));

	if (Netgame.segments_checksum != my_segments_checksum)
	{
		Network_status = NETSTAT_MENU;
		nm_messagebox(TXT_ERROR, 1, TXT_OK, TXT_NETLEVEL_NMATCH);
#ifdef NDEBUG
		return;
#endif
	}

	// Discover my player number

	memcpy(temp_callsign, Players[Player_num].callsign, CALLSIGN_LEN+1);
	
	Player_num = -1;

	for (i=0; i<MAX_NUM_NET_PLAYERS; i++ )	{
		Players[i].net_kills_total = 0;
//		Players[i].net_killed_total = 0;
	}

	for (i=0; i<N_players; i++ )	{
		if ( (Network_game_type == IPX_GAME) && (!memcmp( Netgame.players[i].network_info.ipx_info.node, My_Seq.player.network_info.ipx_info.node, 6 )) &&
			 (!stricmp( Netgame.players[i].callsign, temp_callsign)) )	
		{
			Assert(Player_num == -1); // Make sure we don't find ourselves twice!  Looking for interplay reported bug
			change_playernum_to(i);
		} else if ( (Network_game_type == APPLETALK_GAME) && (Netgame.players[i].network_info.appletalk_info.aNode == My_Seq.player.network_info.appletalk_info.aNode) &&
					(!stricmp( Netgame.players[i].callsign, temp_callsign)) ) {
			Assert(Player_num == -1);
			change_playernum_to(i);
		}
		
		memcpy( Players[i].callsign, Netgame.players[i].callsign, CALLSIGN_LEN+1 );

		if (Network_game_type == IPX_GAME) {
			if ( (*(uint *)Netgame.players[i].network_info.ipx_info.server) != 0 )
				ipx_get_local_target( Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node, Players[i].net_address );
			else
				memcpy( Players[i].net_address, Netgame.players[i].network_info.ipx_info.node, 6 );
		}

		Players[i].n_packets_got=0;				// How many packets we got from them
		Players[i].n_packets_sent=0;				// How many packets we sent to them
		Players[i].connected = Netgame.players[i].connected;
		Players[i].net_kills_total += Netgame.player_kills[i];
#ifndef MAC_SHAREWARE
		if ((Network_rejoined) || (i != Player_num))
			Players[i].score = Netgame.player_score[i];
#endif		
		for (j = 0; j < MAX_NUM_NET_PLAYERS; j++)
		{
			kill_matrix[i][j] = Netgame.kills[i][j];
		}
	}

	if ( Player_num < 0 )	{
		Network_status = NETSTAT_MENU;
		return;
	}

	if (Network_rejoined) 
		for (i=0; i<N_players;i++)
			Players[i].net_killed_total = Netgame.killed[i];

#ifndef MAC_SHAREWARE
	if (Network_rejoined) {
		network_process_monitor_vector(Netgame.monitor_vector);
		Players[Player_num].time_level = Netgame.level_time;
	}
#endif

	team_kills[0] = Netgame.team_kills[0];
	team_kills[1] = Netgame.team_kills[1];
	
	Players[Player_num].connected = 1;
	Netgame.players[Player_num].connected = 1;

	if (!Network_rejoined)
		for (i=0; i<MaxNumNetPlayers; i++) {
			Objects[Players[i].objnum].pos = Player_init[Netgame.locations[i]].pos;
			Objects[Players[i].objnum].orient = Player_init[Netgame.locations[i]].orient;
		 	obj_relink(Players[i].objnum,Player_init[Netgame.locations[i]].segnum);
		}

	Objects[Players[Player_num].objnum].type = OBJ_PLAYER;

	Network_status = NETSTAT_PLAYING;
	Function_mode = FMODE_GAME;
	multi_sort_kill_list();
}

void
network_send_sync(void)
{
	int i, j, np;

	// Randomize their starting locations...

	srand( TickCount() );
	for (i=0; i<MaxNumNetPlayers; i++ )	
	{
		if (Players[i].connected)
			Players[i].connected = 1; // Get rid of endlevel connect statuses
		if (Game_mode & GM_MULTI_COOP)
			Netgame.locations[i] = i;
		else {
			do 
			{
				np = rand() % MaxNumNetPlayers;
				for (j=0; j<i; j++ )	
				{
					if (Netgame.locations[j]==np)	
					{
						np =-1;
						break;
					}
				}
			} while (np<0);
			// np is a location that is not used anywhere else..
			Netgame.locations[i]=np;
//			mprintf((0, "Player %d starting in location %d\n" ,i ,np ));
		}
	}

	// Push current data into the sync packet

	network_update_netgame();
	Netgame.game_status = NETSTAT_PLAYING;
	Netgame.type = PID_SYNC;
	Netgame.segments_checksum = my_segments_checksum;

	for (i=0; i<N_players; i++ )	{
		if ((!Players[i].connected) || (i == Player_num))
			continue;

		// Send several times, extras will be ignored
		if (Network_game_type == IPX_GAME) {
			send_netgame_packet(Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node);
			send_netgame_packet(Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node);
			send_netgame_packet(Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node);
		} else if (Network_game_type == APPLETALK_GAME) {
			appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Netgame.players[i].network_info.appletalk_info.aNode,
										Netgame.players[i].network_info.appletalk_info.aNet,
										Netgame.players[i].network_info.appletalk_info.aSocket);
			appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Netgame.players[i].network_info.appletalk_info.aNode,
										Netgame.players[i].network_info.appletalk_info.aNet,
										Netgame.players[i].network_info.appletalk_info.aSocket);
			appletalk_send_packet_data( (ubyte *)&Netgame, sizeof(netgame_info), Netgame.players[i].network_info.appletalk_info.aNode,
										Netgame.players[i].network_info.appletalk_info.aNet,
										Netgame.players[i].network_info.appletalk_info.aSocket);
		}

	}	
	network_read_sync_packet(&Netgame); // Read it myself, as if I had sent it
}

void network_select_teams_poll( int nitems, newmenu_item * menus, int * key, int citem )
{
//	network_flush();
}

int
network_select_teams(void)
{
#ifndef MAC_SHAREWARE
	newmenu_item m[MAX_PLAYERS+4];
	int choice, opt, opt_team_b;
	ubyte team_vector = 0;
	char team_names[2][CALLSIGN_LEN+1];
	int i;
	int pnums[MAX_PLAYERS+2];

	// One-time initialization

	for (i = N_players/2; i < N_players; i++) // Put first half of players on team A
	{
		team_vector |= (1 << i);
	}

	sprintf(team_names[0], "%s", TXT_BLUE);
	sprintf(team_names[1], "%s", TXT_RED);

	// Here comes da menu
menu:
	m[0].type = NM_TYPE_INPUT; m[0].text = team_names[0]; m[0].text_len = CALLSIGN_LEN; 

	opt = 1;
	for (i = 0; i < N_players; i++)
	{
		if (!(team_vector & (1 << i)))
		{
			m[opt].type = NM_TYPE_MENU; m[opt].text = Netgame.players[i].callsign; pnums[opt] = i; opt++;
		}
	}
	opt_team_b = opt;
	m[opt].type = NM_TYPE_INPUT; m[opt].text = team_names[1]; m[opt].text_len = CALLSIGN_LEN; opt++;
	for (i = 0; i < N_players; i++)
	{
		if (team_vector & (1 << i))
		{
			m[opt].type = NM_TYPE_MENU; m[opt].text = Netgame.players[i].callsign; pnums[opt] = i; opt++;
		}
	}
	m[opt].type = NM_TYPE_TEXT; m[opt].text = ""; opt++;
	m[opt].type = NM_TYPE_MENU; m[opt].text = TXT_ACCEPT; opt++;

	Assert(opt <= MAX_PLAYERS+4);
	
	choice = newmenu_do4(NULL, TXT_TEAM_SELECTION, opt, m, network_select_teams_poll, 0, NULL, -1, -1, 1);

	if (choice == opt-1)
	{
		if ((opt-2-opt_team_b < 2) || (opt_team_b == 1)) 
		{
			nm_messagebox(NULL, 1, TXT_OK, TXT_TEAM_MUST_ONE);
			goto menu;
		}
		
		Netgame.team_vector = team_vector;
		strcpy(Netgame.team_name[0], team_names[0]);
		strcpy(Netgame.team_name[1], team_names[1]);
		return 1;
	}

	else if ((choice > 0) && (choice < opt_team_b)) {
		team_vector |= (1 << pnums[choice]);
	}
	else if ((choice > opt_team_b) && (choice < opt-2)) {
		team_vector &= ~(1 << pnums[choice]);
	}
	else if (choice == -1)
		return 0;
	goto menu;
#else
	return 0;
#endif
}

int
network_select_players(void)
{
	int i, j;
	newmenu_item m[MAX_PLAYERS];
	char text[MAX_PLAYERS][25];
	char title[50];
	int save_nplayers;

	network_add_player( &(My_Seq.player) );
		
	for (i=0; i< MAX_PLAYERS; i++ )	{
		sprintf( text[i], "%d.  %-16s", i+1, "" );
		m[i].type = NM_TYPE_CHECK; m[i].text = text[i]; m[i].value = 0;
	}

	m[0].value = 1;				// Assume server will play...

	sprintf( text[0], "%d. %-16s", 1, Players[Player_num].callsign );
	sprintf( title, "%s %d %s", TXT_TEAM_SELECT, MaxNumNetPlayers, TXT_TEAM_PRESS_ENTER );

GetPlayersAgain:
	j=newmenu_do1( NULL, title, MAX_PLAYERS, m, network_start_poll, 1 );

	save_nplayers = N_players;

	if (j<0) 
	{
		// Aborted!					 
		// Dump all players and go back to menu mode

abort:
		for (i=1; i<N_players; i++)
			network_dump_player(&(Netgame.players[i]), DUMP_ABORTED);

		Netgame.numplayers = 0;
		network_send_game_info(NULL); // Tell everyone we're bailing

		if (Network_game_type == APPLETALK_GAME)
			appletalk_remove_netgame();

		Network_status = NETSTAT_MENU;
		return(0);
	}

	// Count number of players chosen

	N_players = 0;
	for (i=0; i<save_nplayers; i++ )
	{
		if (m[i].value)	
			N_players++;
	}
	
	if ( N_players > MaxNumNetPlayers) {
		nm_messagebox( TXT_ERROR, 1, TXT_OK, "%s %d %s", TXT_SORRY_ONLY, MaxNumNetPlayers, TXT_NETPLAYERS_IN );
		N_players = save_nplayers;
		goto GetPlayersAgain;
	}

#ifdef NDEBUG
	if ( N_players < 2 ) 	{
		nm_messagebox( TXT_ERROR, 1, TXT_OK, TXT_TEAM_ATLEAST_TWO );
		N_players = save_nplayers;
		goto GetPlayersAgain;
	}
#endif

#ifdef NDEBUG
	if ( (Netgame.gamemode == NETGAME_TEAM_ANARCHY) && (N_players < 3) ) {
		nm_messagebox(TXT_ERROR, 1, TXT_OK, TXT_TEAM_ATLEAST_THREE );
		N_players = save_nplayers;
		goto GetPlayersAgain;
	}
#endif

	// Remove players that aren't marked.
	N_players = 0;
	for (i=0; i<save_nplayers; i++ )	{
		if (m[i].value)	
		{
			if (i > N_players)
			{
				memcpy(Netgame.players[N_players].callsign, Netgame.players[i].callsign, CALLSIGN_LEN+1);
				if (Network_game_type == IPX_GAME) {
					memcpy(Netgame.players[N_players].network_info.ipx_info.node, Netgame.players[i].network_info.ipx_info.node, 6);
					memcpy(Netgame.players[N_players].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.server, 4);
				} else if (Network_game_type == APPLETALK_GAME) {
					Netgame.players[N_players].network_info.appletalk_info.aNode = Netgame.players[i].network_info.appletalk_info.aNode;
					Netgame.players[N_players].network_info.appletalk_info.aNet = Netgame.players[i].network_info.appletalk_info.aNet;
					Netgame.players[N_players].network_info.appletalk_info.aSocket = Netgame.players[i].network_info.appletalk_info.aSocket;
				}
			}
			Players[N_players].connected = 1;
			N_players++;
		}
		else
		{
			network_dump_player(&(Netgame.players[i]), DUMP_DORK);
		}
	}

	for (i = N_players; i < MAX_NUM_NET_PLAYERS; i++) {
		memset(Netgame.players[i].callsign, 0, CALLSIGN_LEN+1);
		if (Network_game_type == IPX_GAME) {
			memset(Netgame.players[i].network_info.ipx_info.node, 0, 6);
			memset(Netgame.players[i].network_info.ipx_info.server, 0, 4);
		} else if (Network_game_type == APPLETALK_GAME) {
			Netgame.players[i].network_info.appletalk_info.aNode = 0;
			Netgame.players[i].network_info.appletalk_info.aNet = 0;
			Netgame.players[i].network_info.appletalk_info.aSocket = 0;
		}
	}

	if (Netgame.gamemode == NETGAME_TEAM_ANARCHY)
		if (!network_select_teams())
			goto abort;

	return(1); 
}

void 
network_start_game(int game_type)	
{
	int i;
	char game_name[NETGAME_NAME_LEN+1];
	int chosen_game_mode, game_flags, level;
	OSErr err;

//	Assert( sizeof(frame_info)-2 < IPX_MAX_DATA_SIZE );
	Assert( (game_type == IPX_GAME) || (game_type == APPLETALK_GAME) );
	
	if (game_type == IPX_GAME) {
		mprintf((0, "Using frame_info len %d, max %d.\n", sizeof(frame_info), IPX_MAX_DATA_SIZE));
		if ( !Network_active ) {
			nm_messagebox(NULL, 1, TXT_OK, TXT_IPX_NOT_FOUND );
			return;
		}
	} else if (game_type == APPLETALK_GAME) {
		int err;
		char buf[256];
		
		mprintf((0, "Using frame_info len %d, max %d.\n", sizeof(frame_info), APPLETALK_MAX_DATA_SIZE));
		if (Appletalk_active <= 0) {
			switch (Appletalk_active) {
			case APPLETALK_NOT_OPEN:
				sprintf(buf, "Appletalk is not currently active.\nPlease enable AppleTalk from the Chooser\nand restart Descent.");
				break;
			case APPLETALK_BAD_LISTENER:
				sprintf(buf, "The Resource Fork of Descent appears damaged.\nPlease re-install Descent or contact\nMacPlay technical support.");
				break;
			case APPLETALK_NO_LOCAL_ADDR:
				sprintf(buf, "Wow! Strange!\n\nNo Local Address.");
				break;
			case APPLETALK_NO_SOCKET:
				sprintf(buf, "All AppleTalk sockets are in use.\nTry shutting down other network\napplications and restarting Descent.\n");
				break;
			}
			nm_messagebox(NULL, 1, TXT_OK, buf);
			return;
		}
		strcpy(Network_zone_name, DEFAULT_ZONE_NAME);
	}

	Network_game_type = game_type;
	network_init();
	change_playernum_to(0);

	if (network_find_game())
	{
		nm_messagebox(NULL, 1, TXT_OK, TXT_NET_FULL);
		return;
	}

	game_flags = 0;
	i = network_get_game_params( game_name, &chosen_game_mode, &game_flags, &level );

	if (i<0) return;

	N_players = 0;

// LoadLevel(level); Old, no longer used.

	Netgame.difficulty = Difficulty_level;
	Netgame.gamemode = chosen_game_mode;
	Netgame.game_status = NETSTAT_STARTING;
	Netgame.numplayers = 0;
	Netgame.max_numplayers = MaxNumNetPlayers;
	Netgame.levelnum = level;
	Netgame.game_flags = game_flags;
	Netgame.protocol_version = MULTI_PROTO_VERSION;

	strcpy(Netgame.game_name, game_name);
	
	Network_status = NETSTAT_STARTING;

	if (Network_game_type == APPLETALK_GAME) {
		fix t1;
		int count = 0;
		newmenu_item m[4];
		
		m[0].type = NM_TYPE_MENU; m[0].text = "localtalk";
		m[1].type = NM_TYPE_MENU; m[1].text = "ethertalk";
		m[2].type = NM_TYPE_MENU; m[2].text = "other";
//		m[3].type = NM_TYPE_MENU; m[3].text = "other";

		Network_appletalk_type = newmenu_do1( NULL, "Choose Network Type", 3, m, NULL, Network_appletalk_type );

		show_boxed_message("Registering Netgame");
		do {
			err = appletalk_register_netgame( game_name, TickCount() );
			t1 = timer_get_fixed_seconds() + F1_0;
			while (timer_get_fixed_seconds() < t1) ;
			count++;
		} while ( (err == nbpDuplicate) && (count != MAX_REGISTER_TRIES) );
		clear_boxed_message();
		if ( (err == tooManyReqs) || (count == MAX_REGISTER_TRIES) ) {
			nm_messagebox(NULL, 1, TXT_OK, "AppleTalk Network is too busy.\nPlease try again shortly.");
			Game_mode = GM_GAME_OVER;
			return;
		}
	}

	network_set_game_mode(Netgame.gamemode);

	if(network_select_players())
	{
		StartNewLevel(Netgame.levelnum);
	}
	else
		Game_mode = GM_GAME_OVER;
		
#ifdef MAC_SHAREWARE
	contest_active = 0;
#endif
	
}

void restart_net_searching(newmenu_item * m)
{
	int i;
	N_players = 0;
	num_active_games = 0;

	memset(Active_games, 0, sizeof(netgame_info)*MAX_ACTIVE_NETGAMES);

	for (i = 0; i < MAX_ACTIVE_NETGAMES; i++) {
		sprintf(m[(2*i)+1].text, "%d.                                       ", i+1);
		sprintf(m[(2*i)+2].text, " \n");
		m[(2*i)+1].redraw = 1;
		m[(2*i)+2].redraw = 1;
	}
	Network_games_changed = 1;	
}

void network_join_poll( int nitems, newmenu_item * menus, int * key, int citem )
{
	// Polling loop for Join Game menu
	static fix t1 = 0;
	int i, osocket;

	menus = menus;
	citem = citem;
	nitems = nitems;
	key = key;

	if ( (Network_game_type == IPX_GAME) && Network_allow_socket_changes )	{
		osocket = Network_socket;
	
		if ( *key==KEY_PAGEUP ) 	{ Network_socket--; *key = 0; }
		if ( *key==KEY_PAGEDOWN ) 	{ Network_socket++; *key = 0; }
	
		if ( Network_socket+IPX_DEFAULT_SOCKET > 0x8000 )
			Network_socket	= 0x8000 - IPX_DEFAULT_SOCKET;
	
		if ( Network_socket+IPX_DEFAULT_SOCKET < 0 )
			Network_socket	= IPX_DEFAULT_SOCKET;
	
		if (Network_socket != osocket )		{
			sprintf( menus[0].text, "%s %+d", TXT_CURRENT_IPX_SOCKET, Network_socket );
			menus[0].redraw = 1;
			mprintf(( 0, "Changing to socket %d\n", Network_socket ));
			network_listen();
			ipx_change_default_socket( IPX_DEFAULT_SOCKET + Network_socket );
			restart_net_searching(menus);
			network_send_game_list_request();
			return;
		}
	}

	if ( (Network_game_type == IPX_GAME) && (timer_get_approx_seconds() > t1+F1_0*4) )
	{
		t1 = timer_get_approx_seconds();
		network_send_game_list_request();
	} else if ( (Network_game_type == APPLETALK_GAME) && (timer_get_approx_seconds() > t1+F1_0*10) )
	{
		hide_cursor();
		t1 = timer_get_approx_seconds();
		restart_net_searching(menus);
		show_boxed_message("Requesting list of Netgames");
		network_send_game_list_request();
		clear_boxed_message();
		show_cursor();
	}
	
	network_listen();

	if (!Network_games_changed)
		return;

	Network_games_changed = 0;

	// Copy the active games data into the menu options
	for (i = 0; i < num_active_games; i++)
	{
		int game_status = Active_games[i].game_status;
		int j, nplayers = 0;
		char levelname[4];

		for (j = 0; j < Active_games[i].numplayers; j++)
			if (Active_games[i].players[j].connected)
				nplayers++;

		if (Active_games[i].levelnum < 0)
			sprintf(levelname, "S%d", -Active_games[i].levelnum);
		else 
			sprintf(levelname, "%d", Active_games[i].levelnum);

		sprintf(menus[(2*i)+1].text, "%d. %s (%s)", i+1, Active_games[i].game_name, MODE_NAMES(Active_games[i].gamemode));

		if (game_status == NETSTAT_STARTING) 
		{
			sprintf(menus[(2*i)+2].text, "%s%s  %s%d\n", TXT_NET_FORMING, levelname, TXT_NET_PLAYERS, nplayers);
		}
		else if (game_status == NETSTAT_PLAYING)
		{
			if (can_join_netgame(&Active_games[i]))
				sprintf(menus[(2*i)+2].text, "%s%s  %s%d\n", TXT_NET_JOIN, levelname, TXT_NET_PLAYERS, nplayers);
			else
				sprintf(menus[(2*i)+2].text, "%s\n", TXT_NET_CLOSED);
		}
		else
			sprintf(menus[(2*i)+2].text, "%s\n", TXT_NET_BETWEEN);

#ifndef MAC_SHAREWARE
		if (strlen(Active_games[i].mission_name) > 0)
			sprintf(menus[(2*i)+2].text+strlen(menus[(2*i)+2].text), "%s%s", TXT_MISSION, Active_games[i].mission_title);
#endif

		Assert(strlen(menus[(2*i)+2].text) < 70);
		menus[(2*i)+1].redraw = 1;
		menus[(2*i)+2].redraw = 1;
	}

	for (i = num_active_games; i < MAX_ACTIVE_NETGAMES; i++)
	{
		sprintf(menus[(2*i)+1].text, "%d.                                       ", i+1);
		sprintf(menus[(2*i)+2].text, " \n");
		menus[(2*i)+1].redraw = 1;
		menus[(2*i)+2].redraw = 1;
	}
}

int
network_wait_for_sync(void)
{
	char text[60];
	newmenu_item m[2];
	int i, choice;
	
	Network_status = NETSTAT_WAITING;

	m[0].type=NM_TYPE_TEXT; m[0].text = text;
	m[1].type=NM_TYPE_TEXT; m[1].text = TXT_NET_LEAVE;
	
	i = network_send_request();

	if (i < 0)
		return(-1);

	sprintf( m[0].text, "%s\n'%s' %s", TXT_NET_WAITING, Netgame.players[i].callsign, TXT_NET_TO_ENTER );

menu:	
	choice=newmenu_do( NULL, TXT_WAIT, 2, m, network_sync_poll );

	if (choice > -1)
		goto menu;

	if (Network_status != NETSTAT_PLAYING)	
	{
		sequence_packet me;

//		if (Network_status == NETSTAT_ENDLEVEL)
//		{
//		 	network_send_endlevel_packet(0);
//			longjmp(LeaveGame, 0);
//		}		

		mprintf((0, "Aborting join.\n"));
		me.type = PID_QUIT_JOINING;
		memcpy( me.player.callsign, Players[Player_num].callsign, CALLSIGN_LEN+1 );
		if (Network_game_type == IPX_GAME) {
			memcpy( me.player.network_info.ipx_info.node, ipx_get_my_local_address(), 6 );
			memcpy( me.player.network_info.ipx_info.server, ipx_get_my_server_address(), 4 );
//MWA		ipx_send_internetwork_packet_data( (ubyte *)&me, sizeof(sequence_packet), Netgame.players[0].server, Netgame.players[0].node );
			send_sequence_packet( me, Netgame.players[0].network_info.ipx_info.server, Netgame.players[0].network_info.ipx_info.node, NULL );
		} else if (Network_game_type == APPLETALK_GAME) {
			me.player.network_info.appletalk_info.aNode = appletalk_get_my_node();
			me.player.network_info.appletalk_info.aNet = appletalk_get_my_net();
			me.player.network_info.appletalk_info.aSocket = appletalk_get_my_socket();
//			send_sequence_packet_appletalk( me,  Netgame.players[0].network_info.appletalk_info.aNode,
//										Netgame.players[0].network_info.appletalk_info.aNet,
//										Netgame.players[0].network_info.appletalk_info.aSocket);
			appletalk_send_packet_data( (ubyte *)&me, sizeof(sequence_packet), Netgame.players[0].network_info.appletalk_info.aNode,
										Netgame.players[0].network_info.appletalk_info.aNet,
										Netgame.players[0].network_info.appletalk_info.aSocket);
		}
		N_players = 0;
		Function_mode = FMODE_MENU;
		Game_mode = GM_GAME_OVER;
		return(-1);	// they cancelled		
	}
	return(0);
}

void 
network_request_poll( int nitems, newmenu_item * menus, int * key, int citem )
{
	// Polling loop for waiting-for-requests menu

	int i = 0;
	int num_ready = 0;

	menus = menus;
	citem = citem;
	nitems = nitems;
	key = key;

	// Send our endlevel packet at regular intervals

//	if (timer_get_approx_seconds() > t1+ENDLEVEL_SEND_INTERVAL)
//	{
//		network_send_endlevel_packet();
//		t1 = timer_get_approx_seconds();
//	}

	network_listen();

	for (i = 0; i < N_players; i++)
	{
		if ((Players[i].connected == 1) || (Players[i].connected == 0))
			num_ready++;
	}

	if (num_ready == N_players) // All players have checked in or are disconnected
	{
		*key = -2;
	}
}

void
network_wait_for_requests(void)
{
	// Wait for other players to load the level before we send the sync
	int choice, i;
	newmenu_item m[1];
	
	Network_status = NETSTAT_WAITING;

	m[0].type=NM_TYPE_TEXT; m[0].text = TXT_NET_LEAVE;

	mprintf((0, "Entered wait_for_requests : N_players = %d.\n", N_players));

	for (choice = 0; choice < N_players; choice++)
		mprintf((0, "Players[%d].connected = %d.\n", choice, Players[choice].connected));

	Network_status = NETSTAT_WAITING;
	network_flush();

	Players[Player_num].connected = 1;

menu:
	choice = newmenu_do(NULL, TXT_WAIT, 1, m, network_request_poll);	

	if (choice == -1)
	{
		// User aborted
		choice = nm_messagebox(NULL, 3, TXT_YES, TXT_NO, TXT_START_NOWAIT, TXT_QUITTING_NOW);
		if (choice == 2)
			return;
		if (choice != 0)
			goto menu;
		
		// User confirmed abort
		
		for (i=0; i < N_players; i++)
			if ((Players[i].connected != 0) && (i != Player_num))
				network_dump_player(&(Netgame.players[i]), DUMP_ABORTED);

		network_release_registered_game();
		longjmp(LeaveGame, 0);	
	}
	else if (choice != -2)
		goto menu;
}

int
network_level_sync(void)
{
 	// Do required syncing between (before) levels

	int result;

	mprintf((0, "Player %d entering network_level_sync.\n", Player_num));

	MySyncPackInitialized = 0;

//	my_segments_checksum = netmisc_calc_checksum(Segments, sizeof(segment)*(Highest_segment_index+1));

	network_flush(); // Flush any old packets

	if (N_players == 0)
		result = network_wait_for_sync();
	else if (network_i_am_master())
	{
#ifndef MAC_SHAREWARE
		network_wait_for_requests();
#endif
		network_send_sync();
		result = 0;
	}
	else
		result = network_wait_for_sync();

	if (result)
	{
		Players[Player_num].connected = 0;
		network_send_endlevel_packet();
		network_release_registered_game();
		longjmp(LeaveGame, 0);
	}
	return(0);
}

int zone_sort_func(const char **e0, const char **e1)
{
	return strcmp(*e0, *e1);
}

void network_get_appletalk_zone()
{
	int num_zones, i, item, default_item;
	char **zone_list;
	char default_zone[MAX_ZONE_LENGTH];			// my zone

	Network_zone_name[0] = '\0';
	
	show_boxed_message("Looking for AppleTalk Zones");
	num_zones = appletalk_get_zone_names(&zone_list);
	clear_boxed_message();

	if (num_zones < 0)	{		// error in getting zone list...maybe no router available....
		if ( (num_zones == tooManyReqs) || (num_zones == noDataArea) ){
			nm_messagebox(NULL, 1, TXT_OK, "AppleTalk Network is too busy.\nPlease try again shortly.");
			longjmp(LeaveGame,0);
		}
		num_zones = 0;
	}
	
	if (num_zones == 0) {
		strcpy(Network_zone_name, DEFAULT_ZONE_NAME);
		return;
	}
	
	if (num_zones == 1) {
		Network_zone_name[0] = (char)(strlen(zone_list[0]));
		memcpy( &(Network_zone_name[1]), zone_list[0], strlen(zone_list[0]) );
		goto zone_done;
	}
	
// sort the zone names

	for (i = 0; i < num_zones; i++)
		strlwr(zone_list[i]);

	qsort(zone_list, num_zones, sizeof(char *), zone_sort_func);

// get my current zone so we can highlight that one first

	if (appletalk_get_my_zone(default_zone))
		default_item = 0;
	else {
		for (i = 0; i < num_zones; i++) {
			if ( !stricmp(zone_list[i], default_zone) ) {
				default_item = i;
				break;
			}
		}
	}

rezone:		
	item = newmenu_listbox1("AppleTalk Zones", num_zones, zone_list, 0, default_item, NULL, 0);
	
	if (item == -1)
		goto rezone;
		
	Network_zone_name[0] = (char)(strlen(zone_list[item]));
	memcpy( &(Network_zone_name[1]), zone_list[item], strlen(zone_list[item]) );
	
zone_done:
	for (i = 0; i < num_zones; i++)
		free(zone_list[i]);
	free(zone_list);
}


void network_join_game(int game_type)
{
	int choice, i;
	char menu_text[(MAX_ACTIVE_NETGAMES*2)+1][70];
	fix t1;
	OSErr err;
	
	newmenu_item m[((MAX_ACTIVE_NETGAMES)*2)+1];

	Network_game_type = game_type;
	
	if ( (Network_game_type == IPX_GAME) && !Network_active )
	{
		nm_messagebox(NULL, 1, TXT_OK, TXT_IPX_NOT_FOUND);
		return;
	} else if ( (Network_game_type == APPLETALK_GAME) && (Appletalk_active <= 0) ) {
		char buf[256];
		
		switch (Appletalk_active) {
			case APPLETALK_NOT_OPEN:
				sprintf(buf, "Appletalk is not currently active.\nPlease enable AppleTalk from the Chooser\nand restart Descent.");
				break;
			case APPLETALK_BAD_LISTENER:
				sprintf(buf, "The Resource Fork of Descent appears damaged.\nPlease re-install Descent or contact\nMacPlay technical support.");
				break;
			case APPLETALK_NO_LOCAL_ADDR:
				sprintf(buf, "Wow! Strange!\n\nNo Local Address.");
				break;
			case APPLETALK_NO_SOCKET:
				sprintf(buf, "All AppleTalk sockets are in use.\nTry shutting down other network\napplications and restarting Descent.\n");
				break;
		}
		nm_messagebox(NULL, 1, TXT_OK, buf);
		return;
	}

	network_init();

	N_players = 0;

	setjmp(LeaveGame);

	if (Network_game_type == APPLETALK_GAME)
		network_get_appletalk_zone();				// get the zone that we want to play a game in

	Network_status = NETSTAT_BROWSING; // We are looking at a game menu
	
	network_listen();  // Throw out old info

	if ( Network_game_type == IPX_GAME )
		network_send_game_list_request(); // broadcast a request for lists // appletalk will happen when we get to join menu

	num_active_games = 0;

	memset(m, 0, sizeof(newmenu_item)*(MAX_ACTIVE_NETGAMES*2));
	memset(Active_games, 0, sizeof(netgame_info)*MAX_ACTIVE_NETGAMES);
	
	m[0].text = menu_text[0];
	m[0].type = NM_TYPE_TEXT;
	if (Network_game_type == IPX_GAME) {
		if (Network_allow_socket_changes)
			sprintf( m[0].text, "Current IPX Socket is default%+d", Network_socket );
		else
			sprintf( m[0].text, "" );
	} else if (Network_game_type == APPLETALK_GAME)
		sprintf( m[0].text, "" );

	for (i = 0; i < MAX_ACTIVE_NETGAMES; i++) {
		m[2*i+1].text = menu_text[2*i+1];
		m[2*i+2].text = menu_text[2*i+2];
		m[2*i+1].type = NM_TYPE_MENU;
		m[2*i+2].type = NM_TYPE_TEXT;
		sprintf(m[(2*i)+1].text, "%d.                                       ", i+1);
		sprintf(m[(2*i)+2].text, " \n");
		m[(2*i)+1].redraw = 1;
		m[(2*i)+2].redraw = 1;
	}

	Network_games_changed = 1;	
remenu:
	choice=newmenu_do4(NULL, TXT_NET_SEARCHING, (MAX_ACTIVE_NETGAMES)*2+1, m, network_join_poll, 0, NULL, -1, -1, 1 );

	if (choice==-1)	{
		Network_status = NETSTAT_MENU;
		return;	// they cancelled		
	}		
	choice--;
	choice /= 2;

// if appletalk game, send update request to game host to be sure that game is
// still valid, since updates happen less frequently.

	if (choice >=num_active_games)
	{
		nm_messagebox(TXT_SORRY, 1, TXT_OK, TXT_INVALID_CHOICE);
		goto remenu;
	}

	if (Network_game_type == APPLETALK_GAME) {
		show_boxed_message(TXT_WAIT);
	
		Network_game_validated = 0;
		Network_game_validate_choice = choice;
		network_send_validate_game();
		t1 = timer_get_approx_seconds() + F1_0*3;
		
		while ( (timer_get_approx_seconds() < t1) && !Network_game_validated) // Wait 3 seconds for replies
			network_listen();
	
		clear_boxed_message();
	
		if (!Network_game_validated)
		{
			nm_messagebox(TXT_SORRY, 1, TXT_OK, "That game appears\nto be canceled.");
			goto remenu;
		}
	}
	
	// Choice has been made and looks legit
	if (Active_games[choice].game_status == NETSTAT_ENDLEVEL)
	{
		nm_messagebox(TXT_SORRY, 1, TXT_OK, TXT_NET_GAME_BETWEEN2);
		goto remenu;
	}

	if (Active_games[choice].levelnum > Last_level) {

		nm_messagebox(TXT_SORRY, 1, TXT_OK, "You do not have that level");
		goto remenu;
	}

	if (Active_games[choice].protocol_version != MULTI_PROTO_VERSION)
	{
		nm_messagebox(TXT_SORRY, 1, TXT_OK, TXT_VERSION_MISMATCH);
		goto remenu;
	}

#ifndef MAC_SHAREWARE
	{	
		// Check for valid mission name
			mprintf((0, "Loading mission:%s.\n", Active_games[choice].mission_name));
			if (!load_mission_by_name(Active_games[choice].mission_name))
			{
				nm_messagebox(NULL, 1, TXT_OK, TXT_MISSION_NOT_FOUND);
				goto remenu;
			}
	}
#endif

	if (!can_join_netgame(&Active_games[choice]))
	{
		if (Active_games[choice].numplayers == Active_games[choice].max_numplayers)
			nm_messagebox(TXT_SORRY, 1, TXT_OK, TXT_GAME_FULL);
		else
			nm_messagebox(TXT_SORRY, 1, TXT_OK, TXT_IN_PROGRESS);
		goto remenu;
	}

	// Choice is valid, prepare to join in

	memcpy(&Netgame, &Active_games[choice], sizeof(netgame_info));
	Difficulty_level = Netgame.difficulty;
	MaxNumNetPlayers = Netgame.max_numplayers;
	change_playernum_to(1);
	
// register the joining player with NBP.  This will have the nice effect of a player wanting to
// join to be able to see the netgame if this player were to become the master.

	if (Network_game_type == APPLETALK_GAME) {
		int count = 0;
		fix t1;
		
		show_boxed_message("Registering Netgame");
		do {
			err = appletalk_register_netgame( Active_games[choice].game_name, TickCount() );
			t1 = timer_get_fixed_seconds() + F1_0;
			while ( timer_get_fixed_seconds() < t1 ) ;
			count++;
		} while ( (err == nbpDuplicate) && (count != MAX_REGISTER_TRIES) );
		clear_boxed_message();
		if ( (err == tooManyReqs) || (count == MAX_REGISTER_TRIES) ) {
			nm_messagebox(NULL, 1, TXT_OK, "AppleTalk Network is too busy.\nPlease try again shortly.");
			goto remenu;
		}
	}
	network_set_game_mode(Netgame.gamemode);

#ifdef MAC_SHAREWARE
	contest_active = 0;
#endif

	StartNewLevel(Netgame.levelnum);

	return;		// look ma, we're in a game!!!
}

void network_release_registered_game()
{
	if (Network_game_type == APPLETALK_GAME)
		appletalk_remove_netgame();
}

void network_leave_game()
{
	network_do_frame(1, 1);

// if appletalk game, remove the NBP binding!

	network_release_registered_game();

	if ((network_i_am_master()) && (Network_status == NETSTAT_STARTING))
	{
		Netgame.numplayers = 0;
		network_send_game_info(NULL);
	}
	
	Players[Player_num].connected = 0;
	network_send_endlevel_packet();
	change_playernum_to(0);
	Game_mode = GM_GAME_OVER;
	network_flush();
}

void network_flush()
{
//	ubyte packet[IPX_MAX_DATA_SIZE];
	ubyte packet[APPLETALK_MAX_DATA_SIZE];		// APPLETALK_MAX_DATA is larger of the two

	if ( (Network_game_type == IPX_GAME) && !Network_active )
		return;
	if ( (Network_game_type == APPLETALK_GAME) && (Appletalk_active <= 0) )
		return;

	if (Network_game_type == IPX_GAME) {
		while (ipx_get_packet_data(packet) > 0) ;
	} else if (Network_game_type == APPLETALK_GAME) {
		while (appletalk_get_packet_data(packet) > 0) ;
	}
}

void network_listen()
{
	int size;
//	ubyte packet[IPX_MAX_DATA_SIZE];
	ubyte packet[APPLETALK_MAX_DATA_SIZE];		// appletalk is maximum size between IPX and Appletalk

	if ( (Network_game_type == IPX_GAME) && !Network_active )
		return;
	if ( (Network_game_type == APPLETALK_GAME) && (Appletalk_active <= 0) )
		return;

	if (!(Game_mode & GM_NETWORK) && (Function_mode == FMODE_GAME))
		mprintf((0, "Calling network_listen() when not in net game.\n"));

	if (Network_game_type == IPX_GAME)
		size = ipx_get_packet_data( packet );
	else
		size = appletalk_get_packet_data( packet );
		
	while ( size > 0 )	{
		network_process_packet( packet, size );
		if (Network_game_type == IPX_GAME)
			size = ipx_get_packet_data( packet );
		else
			size = appletalk_get_packet_data( packet );
	}
}

void network_send_data( ubyte * ptr, int len, int urgent )
{
	char check;

	if (Endlevel_sequence)
		return;

	if (!MySyncPackInitialized)	{
		MySyncPackInitialized = 1;
		memset( &MySyncPack, 0, sizeof(frame_info) );
	}
	
	if (urgent)
		PacketUrgent = 1;

	if ((MySyncPack.data_size+len) > NET_XDATA_SIZE )	{
		check = ptr[0];
		network_do_frame(1, 0);
		if (MySyncPack.data_size != 0) {
			mprintf((0, "%d bytes were added to data by network_do_frame!\n", MySyncPack.data_size));
			Int3();
		}
//		Int3();		// Trying to send too much!
//		return;
		mprintf((0, "Packet overflow, sending additional packet, type %d len %d.\n", ptr[0], len));
		Assert(check == ptr[0]);
	}

	Assert(MySyncPack.data_size+len <= NET_XDATA_SIZE);

	memcpy( &MySyncPack.data[MySyncPack.data_size], ptr, len );
	MySyncPack.data_size += len;
}

void network_timeout_player(int playernum)
{
	// Remove a player from the game if we haven't heard from them in 
	// a long time.
	int i, n = 0;

	Assert(playernum < N_players);
	Assert(playernum > -1);

	network_disconnect_player(playernum);
	create_player_appearance_effect(&Objects[Players[playernum].objnum]);

	digi_play_sample(SOUND_HUD_MESSAGE, F1_0);

	HUD_init_message("%s %s", Players[playernum].callsign, TXT_DISCONNECTING);
	for (i = 0; i < N_players; i++)
		if (Players[i].connected) 
			n++;

	if (n == 1)
	{
		nm_messagebox(NULL, 1, TXT_OK, TXT_YOU_ARE_ONLY);
	}
}

fix last_send_time = 0;
fix last_timeout_check = 0;

void network_do_frame(int force, int listen)
{
	int i;

	if (!(Game_mode&GM_NETWORK)) return;

	if ((Network_status != NETSTAT_PLAYING) || (Endlevel_sequence)) // Don't send postion during escape sequence...
		goto listen;

	last_send_time += FrameTime;
	last_timeout_check += FrameTime;

	// Send out packet 10 times per second maximum... unless they fire, then send more often...
// used this line for localtalk	if ( (last_send_time>F1_0/2) || (Network_laser_fired) || force || PacketUrgent )	{		
	if ( (Network_game_type == IPX_GAME) && (last_send_time>F1_0/10) || (Network_laser_fired) || force || PacketUrgent )	{		
		if ( Players[Player_num].connected )	{
			int objnum = Players[Player_num].objnum;
			PacketUrgent = 0;

			if (listen) {
#ifndef MAC_SHAREWARE
				multi_send_robot_frame(0);
#endif
				multi_send_fire();		// Do firing if needed..
			}

//			mprintf((0, "Send packet, %f secs, %d bytes.\n", f2fl(last_send_time), MySyncPack.data_size));

			last_send_time = 0;

			MySyncPack.type 				= PID_PDATA;
			MySyncPack.playernum 			= Player_num;
#ifdef MAC_SHAREWARE
			MySyncPack.objnum 				= Players[Player_num].objnum;
#endif
			MySyncPack.obj_segnum			= Objects[objnum].segnum;
			MySyncPack.obj_pos				= Objects[objnum].pos;
			MySyncPack.obj_orient			= Objects[objnum].orient;
#ifdef MAC_SHAREWARE
			MySyncPack.obj_phys_info		= Objects[objnum].mtype.phys_info;
#else
			MySyncPack.phys_velocity 		= Objects[objnum].mtype.phys_info.velocity;
			MySyncPack.phys_rotvel			= Objects[objnum].mtype.phys_info.rotvel;
#endif
			MySyncPack.obj_render_type		= Objects[objnum].render_type;
			MySyncPack.level_num			= Current_level_num;
	
			for (i=0; i<N_players; i++ )	{
				if ( (Players[i].connected) && (i!=Player_num ) )	{
					MySyncPack.numpackets = Players[i].n_packets_sent++;
					if (Network_game_type == IPX_GAME) {
						send_frameinfo_packet(Netgame.players[i].network_info.ipx_info.server, Netgame.players[i].network_info.ipx_info.node,Players[i].net_address );
					} else if (Network_game_type == APPLETALK_GAME) {
						appletalk_send_packet_data( (ubyte *)&MySyncPack, sizeof(frame_info)-NET_XDATA_SIZE+MySyncPack.data_size,
													Netgame.players[i].network_info.appletalk_info.aNode,
													Netgame.players[i].network_info.appletalk_info.aNet,
													Netgame.players[i].network_info.appletalk_info.aSocket);
					}
				}
			}
			MySyncPack.data_size = 0;		// Start data over at 0 length.
			if (Fuelcen_control_center_destroyed)
				network_send_endlevel_packet();
			//mprintf( (0, "Packet has %d bytes appended (TS=%d)\n", MySyncPack.data_size, sizeof(frame_info)-NET_XDATA_SIZE+MySyncPack.data_size ));
		}
	}
	else 	if ( (Network_game_type == APPLETALK_GAME) && (last_send_time>F1_0/10) || (Network_laser_fired) || force || PacketUrgent )	{		
		if ( Players[Player_num].connected )	{
			appletalk_frame_info	ainfo;
			int objnum = Players[Player_num].objnum;
			PacketUrgent = 0;

#ifndef MAC_SHAREWARE
			if (listen) {
				multi_send_robot_frame(0);
				multi_send_fire();		// Do firing if needed..
			}
#endif

//			mprintf((0, "Send packet, %f secs, %d bytes.\n", f2fl(last_send_time), MySyncPack.data_size));

			last_send_time = 0;

			ainfo.type 					= PID_APPLETALK_PDATA;
			ainfo.playernum 			= Player_num;
			ainfo.obj_render_type		= Objects[objnum].render_type;
			ainfo.level_num				= Current_level_num;
			create_shortpos(&(ainfo.obj_info), &Objects[objnum], 0);
			ainfo.data_size = MySyncPack.data_size;
			memcpy(ainfo.data, MySyncPack.data, ainfo.data_size);
	
			for (i=0; i<N_players; i++ )	{
				if ( (Players[i].connected) && (i!=Player_num ) )	{
					ainfo.numpackets = Players[i].n_packets_sent++;
					appletalk_send_packet_data( (ubyte *)&ainfo, sizeof(appletalk_frame_info)-NET_XDATA_SIZE+MySyncPack.data_size,
												Netgame.players[i].network_info.appletalk_info.aNode,
												Netgame.players[i].network_info.appletalk_info.aNet,
												Netgame.players[i].network_info.appletalk_info.aSocket);
				}
			}
			MySyncPack.data_size = 0;		// Start data over at 0 length.
			if (Fuelcen_control_center_destroyed)
				network_send_endlevel_packet();
			//mprintf( (0, "Packet has %d bytes appended (TS=%d)\n", MySyncPack.data_size, sizeof(frame_info)-NET_XDATA_SIZE+MySyncPack.data_size ));
		}
	}

	if (!listen)
		return;

	if ((last_timeout_check > F1_0) && !(Fuelcen_control_center_destroyed))
	{
		fix approx_time = timer_get_approx_seconds();
		// Check for player timeouts
		for (i = 0; i < N_players; i++)
		{
			if ((i != Player_num) && (Players[i].connected == 1))
			{
				if ((LastPacketTime[i] == 0) || (LastPacketTime[i] > approx_time))
				{
					LastPacketTime[i] = approx_time;
					continue;
				}
				if ((approx_time - LastPacketTime[i]) > (5*F1_0))
					network_timeout_player(i);
			}
		}
		last_timeout_check = 0;
	}

listen:
	if (!listen)
	{
		MySyncPack.data_size = 0;
		return;
	}
	network_listen();

	if (Network_send_objects)
		network_send_objects();
}

int missed_packets = 0;

void network_consistency_error(void)
{
	static int count = 0;

	if (count++ < 10)
		return;

	Function_mode = FMODE_MENU;
	nm_messagebox(NULL, 1, TXT_OK, TXT_CONSISTENCY_ERROR);
	Function_mode = FMODE_GAME;
	count = 0;
	multi_quit_game = 1;
	multi_leave_menu = 1;
	multi_reset_stuff();
}

void network_read_pdata_packet(ubyte *data )
{
	int loc;
	int TheirPlayernum, TheirObjnum;
	frame_info finfo;
	object * TheirObj = NULL;

	if ( Network_game_type == IPX_GAME )
		receive_frameinfo_packet(data, &finfo);	
	else if ( Network_game_type == APPLETALK_GAME )
		memcpy(&finfo, data, sizeof(frame_info) );
	
	TheirPlayernum = finfo.playernum;
#ifdef MAC_SHAREWARE
	TheirObjnum = finfo.objnum;
#else
	TheirObjnum = Players[finfo.playernum].objnum;
#endif
	
	if (TheirPlayernum < 0) {
		Int3(); // This packet is bogus!!
		return;
	}
	if (!multi_quit_game && (TheirPlayernum >= N_players)) {
		Int3(); // We missed an important packet!
		network_consistency_error();
		return;
	}
	if (Endlevel_sequence || (Network_status == NETSTAT_ENDLEVEL) )	{
		int old_Endlevel_sequence = Endlevel_sequence;
		Endlevel_sequence = 1;
		if ( finfo.data_size > 0 )	{
			// pass pd->data to some parser function....
			multi_process_bigdata( finfo.data, finfo.data_size );
		}
		Endlevel_sequence = old_Endlevel_sequence;
		return;
	}
//	mprintf((0, "Gametime = %d, Frametime = %d.\n", GameTime, FrameTime));

	if (finfo.level_num != (ubyte)Current_level_num)
	{
		mprintf((0, "Got frame packet from player %d wrong level %d!\n", finfo.playernum, finfo.level_num));
		return;
	}

	TheirObj = &Objects[TheirObjnum];

	//------------- Keep track of missed packets -----------------
	Players[TheirPlayernum].n_packets_got++;
	LastPacketTime[TheirPlayernum] = timer_get_approx_seconds();

	if  ( finfo.numpackets != Players[TheirPlayernum].n_packets_got )	{
		missed_packets += finfo.numpackets - Players[TheirPlayernum].n_packets_got;

		if ( missed_packets > 0 )	
			mprintf( (0, "Missed %d packets from player #%d (%d total)\n", finfo.numpackets-Players[TheirPlayernum].n_packets_got, TheirPlayernum, missed_packets ));
		else
			mprintf( (0, "Got %d late packets from player #%d (%d total)\n", Players[TheirPlayernum].n_packets_got-finfo.numpackets, TheirPlayernum, missed_packets ));

		Players[TheirPlayernum].n_packets_got = finfo.numpackets;
	}

	//------------ Read the player's ship's object info ----------------------
	TheirObj->pos				= finfo.obj_pos;
	TheirObj->orient			= finfo.obj_orient;
#ifdef MAC_SHAREWARE
	TheirObj->mtype.phys_info		= finfo.obj_phys_info;
#else
	TheirObj->mtype.phys_info.velocity = finfo.phys_velocity;
	TheirObj->mtype.phys_info.rotvel = finfo.phys_rotvel;
#endif

	if ((TheirObj->render_type != finfo.obj_render_type) && (finfo.obj_render_type == RT_POLYOBJ))
		multi_make_ghost_player(TheirPlayernum);

	obj_relink(TheirObjnum,finfo.obj_segnum);

	if (TheirObj->movement_type == MT_PHYSICS)
		set_thrust_from_velocity(TheirObj);

	//------------ Welcome them back if reconnecting --------------
	if (!Players[TheirPlayernum].connected)	{
		Players[TheirPlayernum].connected = 1;

#ifndef SHAREWARE
		if (Newdemo_state == ND_STATE_RECORDING)
			newdemo_record_multi_reconnect(TheirPlayernum);
#endif

		multi_make_ghost_player(TheirPlayernum);

		create_player_appearance_effect(&Objects[TheirObjnum]);

		digi_play_sample( SOUND_HUD_MESSAGE, F1_0);
		HUD_init_message( "'%s' %s", Players[TheirPlayernum].callsign, TXT_REJOIN );

#ifndef MAC_SHAREWARE
		multi_send_score();
#endif
	}

	//------------ Parse the extra data at the end ---------------

	if ( finfo.data_size > 0 )	{
		// pass finfo.data to some parser function....
		multi_process_bigdata( finfo.data, finfo.data_size );
	}
//	mprintf( (0, "Got packet with %d bytes on it!\n", finfo.data_size ));

}

void network_read_appletalk_pdata_packet(ubyte *data )
{
	int loc;
	int TheirPlayernum, TheirObjnum;
	appletalk_frame_info finfo;
	object * TheirObj = NULL;

	memcpy(&finfo, data, sizeof(appletalk_frame_info) );
	
	TheirPlayernum = finfo.playernum;
#ifdef SHAREWARE
	TheirObjnum = finfo.objnum;
#else
	TheirObjnum = Players[finfo.playernum].objnum;
#endif

	if (TheirPlayernum < 0) {
		Int3(); // This packet is bogus!!
		return;
	}
	if (!multi_quit_game && (TheirPlayernum >= N_players)) {
		Int3(); // We missed an important packet!
		network_consistency_error();
		return;
	}
	if (Endlevel_sequence || (Network_status == NETSTAT_ENDLEVEL) )	{
		int old_Endlevel_sequence = Endlevel_sequence;
		Endlevel_sequence = 1;
		if ( finfo.data_size > 0 )	{
			// pass pd->data to some parser function....
			multi_process_bigdata( finfo.data, finfo.data_size );
		}
		Endlevel_sequence = old_Endlevel_sequence;
		return;
	}
//	mprintf((0, "Gametime = %d, Frametime = %d.\n", GameTime, FrameTime));

	if (finfo.level_num != (ubyte)Current_level_num)
	{
		mprintf((0, "Got frame packet from player %d wrong level %d!\n", finfo.playernum, finfo.level_num));
		return;
	}

	TheirObj = &Objects[TheirObjnum];

	//------------- Keep track of missed packets -----------------
	Players[TheirPlayernum].n_packets_got++;
	LastPacketTime[TheirPlayernum] = timer_get_approx_seconds();

	if  ( finfo.numpackets != Players[TheirPlayernum].n_packets_got )	{
		missed_packets += finfo.numpackets - Players[TheirPlayernum].n_packets_got;

		if ( missed_packets > 0 )	
			mprintf( (0, "Missed %d packets from player #%d (%d total)\n", finfo.numpackets-Players[TheirPlayernum].n_packets_got, TheirPlayernum, missed_packets ));
		else
			mprintf( (0, "Got %d late packets from player #%d (%d total)\n", Players[TheirPlayernum].n_packets_got-finfo.numpackets, TheirPlayernum, missed_packets ));

		Players[TheirPlayernum].n_packets_got = finfo.numpackets;
	}

	//------------ Read the player's ship's object info ----------------------
	vm_vec_zero( &(TheirObj->mtype.phys_info.velocity) );		// zero velocity since using shortpos
	vm_vec_zero( &(TheirObj->mtype.phys_info.rotthrust) );		// zero velocity since using shortpos
	vm_vec_zero( &(TheirObj->mtype.phys_info.rotvel) );		// zero velocity since using shortpos
	extract_shortpos( TheirObj, &(finfo.obj_info), 0 );

	if ((TheirObj->render_type != finfo.obj_render_type) && (finfo.obj_render_type == RT_POLYOBJ))
		multi_make_ghost_player(TheirPlayernum);

//	obj_relink(TheirObjnum, TheirObj->segnum);		// extract_shortpos does this!!!!

	if (TheirObj->movement_type == MT_PHYSICS)
		set_thrust_from_velocity(TheirObj);

	//------------ Welcome them back if reconnecting --------------
	if (!Players[TheirPlayernum].connected)	{
		Players[TheirPlayernum].connected = 1;

#ifndef SHAREWARE
		if (Newdemo_state == ND_STATE_RECORDING)
			newdemo_record_multi_reconnect(TheirPlayernum);
#endif

		multi_make_ghost_player(TheirPlayernum);

		create_player_appearance_effect(&Objects[TheirObjnum]);

		digi_play_sample( SOUND_HUD_MESSAGE, F1_0);
		HUD_init_message( "'%s' %s", Players[TheirPlayernum].callsign, TXT_REJOIN );

#ifndef MAC_SHAREWARE
		multi_send_score();
#endif
	}

	//------------ Parse the extra data at the end ---------------

	if ( finfo.data_size > 0 )	{
		// pass finfo.data to some parser function....
		multi_process_bigdata( finfo.data, finfo.data_size );
	}
//	mprintf( (0, "Got packet with %d bytes on it!\n", finfo.data_size ));

}

#endif