mirrors
/
CnC_Remastered_Collection
mirror of https://github.com/electronicarts/CnC_Remastered_Collection.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
CnC_Remastered_Collection/REDALERT/DLLInterface.cpp

8647 lines
246 KiB
C++
Raw Blame History

//
// Copyright 2020 Electronic Arts Inc.
//
// TiberianDawn.DLL and RedAlert.dll and corresponding source code is free
// software: you can redistribute it and/or modify it under the terms of
// the GNU General Public License as published by the Free Software Foundation,
// either version 3 of the License, or (at your option) any later version.
// TiberianDawn.DLL and RedAlert.dll and corresponding source code is distributed
// in the hope that it will be useful, but with permitted additional restrictions
// under Section 7 of the GPL. See the GNU General Public License in LICENSE.TXT
// distributed with this program. You should have received a copy of the
// GNU General Public License along with permitted additional restrictions
// with this program. If not, see https://github.com/electronicarts/CnC_Remastered_Collection
/*
** DLLInterfac.cpp
**
** This is where we implement the API expected by the Instance Server.
**
** The Instance Server will pass in requests for loading and starting maps, control input from players,
** and requests for game simulation and rendering states.
**
**
*/
// Exception handling isn't enabled
#pragma warning (disable : 4530) //warning C4530: C++ exception handler used, but unwind semantics are not enabled.
#include <string>
#include <vector>
#include <set>
#include "function.h"
#include "externs.h"
#include "DLLInterface.h"
#include "Gadget.h"
#include "defines.h" // VOC_COUNT, VOX_COUNT
#include "SidebarGlyphx.h"
#include <chrono>
/*
** Externs
*/
extern int DLL_Startup(const char * command_line);
extern void Reallocate_Big_Shape_Buffer(void);
extern bool ProgEndCalled;
extern int Write_PCX_File(char* name, GraphicViewPortClass& pic, unsigned char* palette );
extern void Color_Cycle(void);
bool Debug_Write_Shape_Type(const ObjectTypeClass *type, int shapenum);
bool Debug_Write_Shape(const char *file_name, void const * shapefile, int shapenum, int flags = 0, void const * ghostdata = NULL);
typedef void (__cdecl* CNC_Event_Callback_Type)(const EventCallbackStruct &event);
typedef unsigned __int64 uint64;
typedef __int64 int64;
/*
** Audio defines
**
**
**
**
**
*/
// For compatibility with Watcom in audio enums
#pragma warning (disable : 4091)
// From RedAlert\Audio.cpp
enum ContextType;
extern struct SoundEffectNameStruct {
char const *Name; // Digitized voice file name.
int Priority; // Playback priority of this sample.
ContextType Where; // In what game context does this sample exist.
} SoundEffectName[VOC_COUNT];
// From RedAlert\Audio.cpp
extern char const* Speech[VOX_COUNT];
// From RedAlert\Audio.cpp
typedef enum {
IN_NOVAR, // No variation or alterations allowed.
IN_VAR // Infantry variance response modification.
};
/*
** Misc defines
**
**
**
**
**
*/
#define GAME_TO_PLAY Session.Type
#define MULTIPLAYER_COUNT Session.Players.Count()
#define KEYBOARD Keyboard
#define RANDOM_START_POSITION 0x7f
#define KILL_PLAYER_ON_DISCONNECT 1
/*
** DLL Interface
**
**
**
**
**
*/
extern "C" __declspec(dllexport) unsigned int __cdecl CNC_Version(unsigned int version_in);
extern "C" __declspec(dllexport) void __cdecl CNC_Init(const char *command_line, CNC_Event_Callback_Type event_callback);
extern "C" __declspec(dllexport) void __cdecl CNC_Config(const CNCRulesDataStruct& rules);
extern "C" __declspec(dllexport) void __cdecl CNC_Add_Mod_Path(const char *mod_path);
extern "C" __declspec(dllexport) bool __cdecl CNC_Get_Visible_Page(unsigned char *buffer_in, unsigned int &width, unsigned int &height);
extern "C" __declspec(dllexport) bool __cdecl CNC_Get_Palette(unsigned char(&palette_in)[256][3]);
extern "C" __declspec(dllexport) bool __cdecl CNC_Start_Instance(int scenario_index, int build_level, const char *faction, const char *game_type, const char *content_directory, int sabotaged_structure, const char *override_map_name);
extern "C" __declspec(dllexport) bool __cdecl CNC_Start_Instance_Variation(int scenario_index, int scenario_variation, int scenario_direction, int build_level, const char *faction, const char *game_type, const char *content_directory, int sabotaged_structure, const char *override_map_name);
extern "C" __declspec(dllexport) bool __cdecl CNC_Start_Custom_Instance(const char* content_directory, const char* directory_path, const char* scenario_name, int build_level, bool multiplayer);
extern "C" __declspec(dllexport) bool __cdecl CNC_Advance_Instance(uint64 player_id);
extern "C" __declspec(dllexport) bool __cdecl CNC_Get_Game_State(GameStateRequestEnum state_type, uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
extern "C" __declspec(dllexport) bool __cdecl CNC_Read_INI(int scenario_index, int scenario_variation, int scenario_direction, const char *content_directory, const char *override_map_name, char *ini_buffer, int _ini_buffer_size);
extern "C" __declspec(dllexport) void __cdecl CNC_Set_Home_Cell(int x, int y, uint64 player_id);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Game_Request(GameRequestEnum request_type);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Game_Settings_Request(int health_bar_display_mode, int resource_bar_display_mode);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Input(InputRequestEnum mouse_event, unsigned char special_key_flags, uint64 player_id, int x1, int y1, int x2, int y2);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Structure_Request(StructureRequestEnum request_type, uint64 player_id, int object_id);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Unit_Request(UnitRequestEnum request_type, uint64 player_id);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Sidebar_Request(SidebarRequestEnum request_type, uint64 player_id, int buildable_type, int buildable_id, short cell_x, short cell_y);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_SuperWeapon_Request(SuperWeaponRequestEnum request_type, uint64 player_id, int buildable_type, int buildable_id, int x1, int y1);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_ControlGroup_Request(ControlGroupRequestEnum request_type, uint64 player_id, unsigned char control_group_index);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Debug_Request(DebugRequestEnum debug_request_type, uint64 player_id, const char *object_name, int x, int y, bool unshroud, bool enemy);
extern "C" __declspec(dllexport) bool __cdecl CNC_Set_Multiplayer_Data(int scenario_index, CNCMultiplayerOptionsStruct &game_options, int num_players, CNCPlayerInfoStruct *player_list, int max_players);
extern "C" __declspec(dllexport) bool __cdecl CNC_Clear_Object_Selection(uint64 player_id);
extern "C" __declspec(dllexport) bool __cdecl CNC_Select_Object(uint64 player_id, int object_type_id, int object_to_select_id);
extern "C" __declspec(dllexport) bool __cdecl CNC_Save_Load(bool save, const char *file_path_and_name, const char *game_type);
extern "C" __declspec(dllexport) void __cdecl CNC_Set_Difficulty(int difficulty);
extern "C" __declspec(dllexport) void __cdecl CNC_Restore_Carryover_Objects(const CarryoverObjectStruct* objects);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Player_Switch_To_AI(uint64 player_id);
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Human_Team_Wins(uint64 player_id);
extern "C" __declspec(dllexport) void __cdecl CNC_Start_Mission_Timer(int time);
/*
** Class to implement the interface, and contain additional game state required by the conversion from peer/peer to client/server
**
**
**
**
**
*/
class DLLExportClass {
public:
static void Init(void);
static void Shutdown(void);
static void Config(const CNCRulesDataStruct& rules);
static void Add_Mod_Path(const char *mod_path);
static void Set_Home_Cell(int x, int y, uint64 player_id);
static void Set_Content_Directory(const char *dir);
static bool Get_Layer_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
static bool Get_Sidebar_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
static bool Start_Construction(uint64 player_id, int buildable_type, int buildable_id);
static bool Hold_Construction(uint64 player_id, int buildable_type, int buildable_id);
static bool Cancel_Construction(uint64 player_id, int buildable_type, int buildable_id);
static bool Start_Placement(uint64 player_id, int buildable_type, int buildable_id);
static BuildingClass *Get_Pending_Placement_Object(uint64 player_id, int buildable_type, int buildable_id);
static bool Get_Placement_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
static void Convert_Type(const ObjectClass *object, CNCObjectStruct &object_out);
static void DLL_Draw_Intercept(int shape_number, int x, int y, int width, int height, int flags, const ObjectClass *object, DirType rotation, long scale, const char *shape_file_name = NULL, char override_owner = HOUSE_NONE);
static void DLL_Draw_Pip_Intercept(const ObjectClass* object, int pip);
static bool Place(uint64 player_id, int buildable_type, int buildable_id, short cell_x, short cell_y);
static bool Cancel_Placement(uint64 player_id, int buildable_type, int buildable_id);
static bool Place_Super_Weapon(uint64 player_id, int buildable_type, int buildable_id, int x, int y);
static bool Create_Control_Group(unsigned char control_group_index);
static bool Add_To_Control_Group(unsigned char control_group_index);
static bool Toggle_Control_Group_Selection(unsigned char control_group_index);
static bool Construction_Action(SidebarRequestEnum construction_action, uint64 player_id, int buildable_type, int buildable_id);
static bool MP_Construction_Action(SidebarRequestEnum construction_action, uint64 player_id, int buildable_type, int buildable_id);
static bool Passes_Proximity_Check(CELL cell_in, BuildingTypeClass *placement_type, unsigned char* placement_distance);
static void Calculate_Start_Positions(void);
static void Computer_Message(bool last_player_taunt);
static void Repair_Mode(uint64 player_id);
static void Repair(uint64 player_id, int object_id);
static void Sell_Mode(uint64 player_id);
static void Sell(uint64 player_id, int object_id);
static void Repair_Sell_Cancel(uint64 player_id);
static void Scatter_Selected(uint64 player_id);
static void Select_Next_Unit(uint64 player_id);
static void Select_Previous_Unit(uint64 player_id);
static void Selected_Guard_Mode(uint64 player_id);
static void Selected_Stop(uint64 player_id);
static void Team_Units_Formation_Toggle_On(uint64 player_id);
static void Units_Queued_Movement_Toggle(uint64 player_id, bool toggle);
static void Cell_Class_Draw_It(CNCDynamicMapStruct *dynamic_map, int &entry_index, CellClass *cell_ptr, int xpixel, int ypixel, bool debug_output);
static bool Get_Dynamic_Map_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
static bool Get_Shroud_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
static bool Get_Occupier_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
static bool Get_Player_Info_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size);
static void Set_Event_Callback(CNC_Event_Callback_Type event_callback) {EventCallback = event_callback;}
static void Debug_Spawn_Unit(const char *object_name, int x, int y, bool enemy = false);
static void Debug_Spawn_All(int x, int y);
static bool Try_Debug_Spawn_Unlimbo(TechnoClass *techno, int &cell_x, int &cell_y);
static void Debug_Kill_Unit(int x, int y);
static void Debug_Heal_Unit(int x, int y);
static void On_Play_Movie(const char * movie_name, ThemeType theme, bool immediate);
static void On_Display_Briefing_Text();
static void On_Sound_Effect(const HouseClass* player_ptr, int sound_effect_index, const char* extension, int variation, COORDINATE coord);
static void On_Speech(const HouseClass* player_ptr, int speech_index);
static void On_Message(const HouseClass* player_ptr, const char* message, float timeout_seconds, EventCallbackMessageEnum message_type, int64 message_id);
static void On_Update_Map_Cell(int cell_x, int cell_y, const char* template_type_name);
static void On_Special_Weapon_Targetting(const HouseClass* player_ptr, SpecialWeaponType weapon_type);
static void On_Ping(const HouseClass* player_ptr, COORDINATE coord);
static void On_Game_Over(uint64 glyphx_player_id, bool player_wins);
static void On_Multiplayer_Game_Over(void);
static void On_Debug_Output(const char *debug_text);
static void On_Achievement(const HouseClass* player_ptr, const char *achievement_type, const char *achievement_reason);
static void On_Center_Camera(const HouseClass* player_ptr, int coord_x, int coord_y);
static void Glyphx_Queue_AI();
static void Store_Carryover_Objects();
static void Force_Human_Team_Wins(uint64 quitting_player_id);
/*
** Player context switching for input/output
*/
static bool Set_Player_Context(uint64 glyphx_player, bool force = false);
static void Reset_Player_Context(void);
static void Adjust_Internal_View(bool force_ignore_view_constraints = false);
static void Logic_Switch_Player_Context(ObjectClass *object);
static void Logic_Switch_Player_Context(HouseClass *house);
static void Refresh_Player_Control_Flags(void);
static __int64 Get_GlyphX_Player_ID(const HouseClass *house);
static void Recalculate_Placement_Distances();
static void Reset_Sidebars(void);
static SidebarGlyphxClass *Get_Current_Context_Sidebar(HouseClass *player_ptr = NULL);
static uint64 GlyphxPlayerIDs[MAX_PLAYERS];
static const void *Get_Shadow_Shapes(void) {return Map.ShadowShapes;}
static const unsigned char *Get_Shadow_Trans(void) {return &Map.ShadowTrans[0];}
static bool Legacy_Render_Enabled(void);
static bool Get_Input_Key_State(KeyNumType key);
static void Set_Special_Key_Flags(unsigned char special_key_flags);
static void Clear_Special_Key_Flags();
static bool Load(Straw &file);
static bool Save(Pipe &file);
static void Code_Pointers(void);
static void Decode_Pointers(void);
static bool Get_Game_Over() { return GameOver; }
private:
static void Calculate_Single_Player_Score(EventCallbackStruct&);
static int RA_Calculate_Leadership( HousesType player_house, int units_lost, int buildings_lost );
static int RA_Calculate_Economy( long available_money, int stolen_buildings_credits, unsigned harvested_credits, long initial_credits );
static int RA_Calculate_Score( int uspoints, int leadership, int economy );
static void Convert_Action_Type(ActionType type, ObjectClass* object, TARGET target, DllActionTypeEnum& dll_type);
static void Convert_Special_Weapon_Type(SpecialWeaponType weapon_type, DllSuperweaponTypeEnum& dll_weapon_type, char* weapon_name);
static void Fill_Sidebar_Entry_From_Special_Weapon(CNCSidebarEntryStruct& sidebar_entry_out, SuperClass*& super_weapon_out, SpecialWeaponType weapon_type);
static void Calculate_Placement_Distances(BuildingTypeClass* placement_type, unsigned char* placement_distance);
static int CurrentDrawCount;
static int TotalObjectCount;
static int SortOrder;
static CNCObjectListStruct *ObjectList;
static CNC_Event_Callback_Type EventCallback;
static int CurrentLocalPlayerIndex;
static bool GameOver;
static std::set<int64> MessagesSent;
/*
** Pseudo sidebars for players in multiplayer
*/
static SidebarGlyphxClass MultiplayerSidebars[MAX_PLAYERS];
static CELL MultiplayerStartPositions[MAX_PLAYERS];
static BuildingTypeClass *PlacementType[MAX_PLAYERS];
static unsigned char PlacementDistance[MAX_PLAYERS][MAP_CELL_TOTAL];
static unsigned char SpecialKeyFlags[MAX_PLAYERS];
/*
** Mod directories
*/
static DynamicVectorClass<char *> ModSearchPaths;
};
/*
** DLLExportClass static data
**
**
**
**
**
*/
int DLLExportClass::CurrentDrawCount = 0;
int DLLExportClass::TotalObjectCount = 0;
int DLLExportClass::SortOrder = 0;
CNCObjectListStruct *DLLExportClass::ObjectList = NULL;
SidebarGlyphxClass DLLExportClass::MultiplayerSidebars [MAX_PLAYERS];
uint64 DLLExportClass::GlyphxPlayerIDs[MAX_PLAYERS] = {0xffffffffl};
int DLLExportClass::CurrentLocalPlayerIndex = -1;
CELL DLLExportClass::MultiplayerStartPositions[MAX_PLAYERS];
BuildingTypeClass *DLLExportClass::PlacementType[MAX_PLAYERS];
unsigned char DLLExportClass::PlacementDistance[MAX_PLAYERS][MAP_CELL_TOTAL];
unsigned char DLLExportClass::SpecialKeyFlags[MAX_PLAYERS] = { 0U };
DynamicVectorClass<char *> DLLExportClass::ModSearchPaths;
std::set<int64> DLLExportClass::MessagesSent;
bool DLLExportClass::GameOver = false;
/*
** Global variables
**
**
**
**
**
*/
int DLLForceMouseX = 0;
int DLLForceMouseY = 0;
CNC_Event_Callback_Type DLLExportClass::EventCallback = NULL;
// Needed to accomodate Glyphx client sidebar. ST - 4/12/2019 5:29PM
int GlyphXClientSidebarWidthInLeptons = 0;
bool MPlayerIsHuman[MAX_PLAYERS];
int MPlayerTeamIDs[MAX_PLAYERS];
int MPlayerStartLocations[MAX_PLAYERS];
bool MPSuperWeaponDisable = false;
bool ShareAllyVisibility = true;
bool UseGlyphXStartLocations = true;
int GetRandSeed()
{
using namespace std::chrono;
time_point<system_clock> time_since_epoch = system_clock::now();
auto microseconds_since_epoch = floor<std::chrono::microseconds>(time_since_epoch);
return abs( static_cast<int>(microseconds_since_epoch.time_since_epoch().count()) );
}
void Play_Movie_GlyphX(const char * movie_name, ThemeType theme, bool immediate = false)
{
if ((movie_name[0] == 'x' || movie_name[0] == 'X') && movie_name[1] == 0) {
return;
}
DLLExportClass::On_Play_Movie(movie_name, theme, immediate);
}
void Display_Briefing_Text_GlyphX()
{
DLLExportClass::On_Display_Briefing_Text();
}
void On_Sound_Effect(int sound_index, int variation, COORDINATE coord, int house)
{
// MBL 06.17.2019
int voc = sound_index;
if (voc == VOC_NONE)
{
return;
}
// MBL 06.17.2019 - Borrowed from RedAlert\AUDIO.CPP Sound_Effect()
//
#if 1
/*
** Fetch a pointer to the sound effect data. Modify the sound as appropriate and desired.
*/
char const * ext = ""; // ".AUD";
if (SoundEffectName[voc].Where == IN_VAR) {
/*
** If there is no forced house, then use the current player
** act like house.
*/
if (house == HOUSE_NONE) {
house = PlayerPtr->ActLike;
}
/*
** Change the extension based on the variation and house accent requested.
*/
if (((1 << house) & HOUSEF_ALLIES) != 0) {
/*
** For infantry, use a variation on the response. For vehicles, always
** use the vehicle response table.
*/
if (variation < 0) {
if (ABS(variation) % 2) {
ext = ".V00";
} else {
ext = ".V02";
}
} else {
if (variation % 2) {
ext = ".V01";
} else {
ext = ".V03";
}
}
} else {
if (variation < 0) {
if (ABS(variation) % 2) {
ext = ".R00";
} else {
ext = ".R02";
}
} else {
if (variation % 2) {
ext = ".R01";
} else {
ext = ".R03";
}
}
}
}
#endif
// END MBL
DLLExportClass::On_Sound_Effect(PlayerPtr, sound_index, ext, variation, coord);
#if 0
// MBL 02.26.2019
int voc = sound_index;
if (voc == VOC_NONE)
{
return;
}
// MBL 02.26.2019 - Borrowed from AUDIO.CPP Sound_Effect()
//
char const * ext = ""; // ".AUD";
#ifdef TIBERIAN_DAWN
if (Special.IsJuvenile && SoundEffectName[voc].Where == IN_JUV) {
ext = ".JUV";
} else {
#endif
if (SoundEffectName[voc].Where == IN_VAR) {
/*
** For infantry, use a variation on the response. For vehicles, always
** use the vehicle response table.
*/
if (variation < 0) {
if (ABS(variation) % 2) {
ext = ".V00";
} else {
ext = ".V02";
}
} else {
if (variation % 2) {
ext = ".V01";
} else {
ext = ".V03";
}
}
}
#ifdef TIBERIAN_DAWN
}
#endif
// END MBL
DLLExportClass::On_Sound_Effect(PlayerPtr, sound_index, ext, variation, coord);
#endif
}
// void On_Speech(int speech_index) // MBL 02.06.2020
void On_Speech(int speech_index, HouseClass *house)
{
// DLLExportClass::On_Speech(PlayerPtr, speech_index); // MBL 02.06.2020
if (house == NULL) {
DLLExportClass::On_Speech(PlayerPtr, speech_index);
}
else
{
DLLExportClass::On_Speech(house, speech_index);
}
}
void On_Message(const char* message, float timeout_seconds, int64 id)
{
DLLExportClass::On_Message(PlayerPtr, message, timeout_seconds, MESSAGE_TYPE_DIRECT, id);
}
void On_Update_Map_Cell(int cell_x, int cell_y, const char* template_type_name)
{
DLLExportClass::On_Update_Map_Cell(cell_x, cell_y, template_type_name);
}
void On_Special_Weapon_Targetting(const HouseClass* player_ptr, SpecialWeaponType weapon_type)
{
DLLExportClass::On_Special_Weapon_Targetting(player_ptr, weapon_type);
}
void On_Ping(const HouseClass* player_ptr, COORDINATE coord)
{
DLLExportClass::On_Ping(player_ptr, coord);
}
void On_Defeated_Message(const char* message, float timeout_seconds)
{
DLLExportClass::On_Message(PlayerPtr, message, timeout_seconds, MESSAGE_TYPE_PLAYER_DEFEATED, -1);
}
void GlyphX_Debug_Print(const char *debug_text)
{
DLLExportClass::On_Debug_Output(debug_text);
}
void On_Achievement_Event(const HouseClass* player_ptr, const char *achievement_type, const char *achievement_reason)
{
DLLExportClass::On_Achievement(player_ptr, achievement_type, achievement_reason);
}
/**************************************************************************************************
* CNC_Version -- Check DLL/Server version
*
* In: Version expected
*
* Out: Actual version
*
*
*
* History: 4/9/2020 2:12PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) unsigned int __cdecl CNC_Version(unsigned int version_in)
{
// Unreferenced, but potentially useful to know which version the server is expecting
version_in;
return CNC_DLL_API_VERSION;
}
/**************************************************************************************************
* CNC_Init -- Initialize the .DLL
*
* In: Command line
*
* Out:
*
*
*
* History: 1/3/2019 11:33AM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Init(const char *command_line, CNC_Event_Callback_Type event_callback)
{
DLLExportClass::Set_Content_Directory(NULL);
DLL_Startup(command_line);
// MBL
DLLExportClass::Set_Event_Callback( event_callback );
DLLExportClass::Init();
}
/**************************************************************************************************
* DLL_Shutdown -- Shutdown the .DLL
*
* In:
*
* Out:
*
*
*
* History: 2/20/2020 1:58PM - ST
**************************************************************************************************/
void DLL_Shutdown(void)
{
DLLExportClass::Shutdown();
}
/**************************************************************************************************
* CNC_Config -- Configure the plugin
*
* In: Configuration data
*
* Out:
*
*
*
* History: 10/03/2019 - SKY
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Config(const CNCRulesDataStruct& rules)
{
DLLExportClass::Config(rules);
}
/**************************************************************************************************
* CNC_Add_Mod_Path -- Add a path to load mod files from
*
* In: Path to load mods from
*
* Out:
*
*
*
* History: 2/20/2020 2:04PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Add_Mod_Path(const char *mod_path)
{
DLLExportClass::Add_Mod_Path(mod_path);
}
/**************************************************************************************************
* CNC_Get_Visible_Page -- Get the screen buffer 'SeenBuff' from the game
*
* In: If buffer_in is null, just return info about page
*
* Out: false if not changed since last call
*
*
*
* History: 1/3/2019 11:33AM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Get_Visible_Page(unsigned char *buffer_in, unsigned int &width, unsigned int &height)
{
if (!DLLExportClass::Legacy_Render_Enabled() || (buffer_in == NULL)) {
return false;
}
/*
** Assume the seen page viewport is the same size as the page
*/
GraphicBufferClass *gbuffer = HidPage.Get_Graphic_Buffer();
if (gbuffer == NULL) {
return false;
}
int view_port_width = Map.MapCellWidth * CELL_PIXEL_W;
int view_port_height = Map.MapCellHeight * CELL_PIXEL_H;
if (view_port_width == 0 || view_port_height == 0) {
return false;
}
unsigned char *raw_buffer = (unsigned char*) gbuffer->Get_Buffer();
long raw_size = gbuffer->Get_Size();
if (raw_buffer == NULL || gbuffer->Get_Width() < view_port_width || gbuffer->Get_Height() < view_port_height) {
return false;
}
width = view_port_width;
height = view_port_height;
int pitch = gbuffer->Get_Width();
for (int i = 0; i < view_port_height; ++i, buffer_in += view_port_width, raw_buffer += pitch) {
memcpy(buffer_in, raw_buffer, view_port_width);
}
return true;
}
extern "C" __declspec(dllexport) bool __cdecl CNC_Get_Palette(unsigned char(&palette_in)[256][3])
{
memcpy(palette_in, CurrentPalette, sizeof(palette_in));
return true;
}
/**************************************************************************************************
* CNC_Set_Multiplayer_Data -- Set up for a multiplayer match
*
* In: Multiplayer data
*
* Out: false if data is bad
*
*
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Set_Multiplayer_Data(int scenario_index, CNCMultiplayerOptionsStruct &game_options, int num_players, CNCPlayerInfoStruct *player_list, int max_players)
{
if (num_players <= 0) {
return false;
}
if (num_players > min(MAX_PLAYERS, max_players)) {
return false;
}
DLLExportClass::Init();
Session.Options.Bases = game_options.MPlayerBases; // 1 = bases are on for this scenario
Session.Options.Credits = game_options.MPlayerCredits; // # credits everyone gets
Session.Options.Tiberium = game_options.MPlayerTiberium; // 1 = tiberium enabled for this scenario
Session.Options.Goodies = game_options.MPlayerGoodies; // 1 = goodies enabled for this scenario
Session.Options.Ghosts = game_options.MPlayerGhosts; // 1 = houses with no players will still play
//MPlayerSolo = game_options.MPlayerSolo; // 1 = allows a single-player net game
Session.Options.UnitCount = game_options.MPlayerUnitCount; // # units for non-base multiplayer scenarios
Special.IsShadowGrow = game_options.MPlayerShadowRegrow;
Special.IsCaptureTheFlag = game_options.CaptureTheFlag;
if (Session.Options.Tiberium) {
Special.IsTGrowth = 1;
Special.IsTSpread = 1;
} else {
Special.IsTGrowth = 0;
Special.IsTSpread = 0;
}
Session.Options.ScenarioIndex = scenario_index;
Special.IsMCVDeploy = game_options.IsMCVDeploy;
Special.UseMCVDeploy = true;
MPSuperWeaponDisable = !game_options.EnableSuperweapons; // Are superweapons available
//Session.Options.AIPlayers = WWGetPrivateProfileInt("Options", "AI", 0, buffer); //Number of AI players
Special.IsEarlyWin = game_options.DestroyStructures;
/*
** Enable Counterstrike/Aftermath units
*/
OverrideNewUnitsEnabled = game_options.MPlayerAftermathUnits;
while (Session.Players.Count() > 0) {
delete Session.Players[0];
Session.Players.Delete(Session.Players[0]);
}
for (int i=0 ; i<num_players ; i++) {
CNCPlayerInfoStruct &player_info = player_list[i];
NodeNameType *who = new NodeNameType;
strncpy(who->Name, player_info.Name, MPLAYER_NAME_MAX);
who->Name[MPLAYER_NAME_MAX - 1] = 0; // Make sure it's terminated
who->Player.House = (HousesType)player_info.House;
who->Player.Color = (PlayerColorType) player_info.ColorIndex;
Session.Players.Add (who);
/*
** Player IDs are done differently in Red Alert vs. TD.
** In TD, the ID is created from the house/color combination
** In RA, the ID is HOUSE_MULTI1 + the index into the Session.Players vector
*/
DLLExportClass::GlyphxPlayerIDs[i] = player_info.GlyphxPlayerID;
MPlayerIsHuman[i] = !player_info.IsAI;
MPlayerTeamIDs[i] = player_info.Team;
MPlayerStartLocations[i] = player_info.StartLocationIndex;
/*
** Temp fix for custom maps that don't have valid start positions set from matchmaking
*/
if (i > 0 && MPlayerStartLocations[i] == 0 && MPlayerStartLocations[0] == 0) {
MPlayerStartLocations[i] = i;
}
}
/*
** Force smart defense always on for multiplayer/skirmish
*/
Rule.IsSmartDefense = true;
return true;
}
extern "C" __declspec(dllexport) bool __cdecl CNC_Clear_Object_Selection(uint64 player_id)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
Unselect_All();
return true;
}
extern "C" __declspec(dllexport) bool __cdecl CNC_Select_Object(uint64 player_id, int object_type_id, int object_to_select_id)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
switch (object_type_id)
{
case INFANTRY:
{
for (int index = 0; index < Infantry.Count(); index++) {
InfantryClass * obj = Infantry.Ptr(index);
if (obj
&& !obj->IsInLimbo
&& obj->House->IsPlayerControl
&& Infantry.ID((InfantryClass*)obj) == object_to_select_id)
{
if (!obj->Is_Selected_By_Player())
{
obj->Select();
AllowVoice = false;
}
return true;
}
}
}
break;
case UNIT:
{
for (int index = 0; index < Units.Count(); index++) {
UnitClass * obj = Units.Ptr(index);
if (obj
&& !obj->IsInLimbo
&& obj->House->IsPlayerControl
&& Units.ID((UnitClass*)obj) == object_to_select_id)
{
if (!obj->Is_Selected_By_Player())
{
obj->Select();
AllowVoice = false;
}
return true;
}
}
}
break;
case AIRCRAFT:
{
for (int index = 0; index < Aircraft.Count(); index++) {
AircraftClass * obj = Aircraft.Ptr(index);
if (obj
&& !obj->IsInLimbo
&& obj->House->IsPlayerControl
&& Aircraft.ID((AircraftClass*)obj) == object_to_select_id)
{
if (!obj->Is_Selected_By_Player())
{
obj->Select();
AllowVoice = false;
}
return true;
}
}
}
break;
case BUILDING:
{
for (int index = 0; index < Buildings.Count(); index++) {
BuildingClass * obj = Buildings.Ptr(index);
if (obj
&& !obj->IsInLimbo
&& obj->House->IsPlayerControl
&& Buildings.ID((BuildingClass*)obj) == object_to_select_id)
{
if (!obj->Is_Selected_By_Player())
{
obj->Select();
AllowVoice = false;
}
return true;
}
}
}
break;
case VESSEL:
{
for (int index = 0; index < Vessels.Count(); index++) {
VesselClass * obj = Vessels.Ptr(index);
if (obj
&& !obj->IsInLimbo
&& obj->House->IsPlayerControl
&& Vessels.ID((VesselClass*)obj) == object_to_select_id)
{
if (!obj->Is_Selected_By_Player())
{
obj->Select();
AllowVoice = false;
}
return true;
}
}
}
break;
}
return false;
}
/**************************************************************************************************
* GlyphX_Assign_Houses -- Replacement for Assign_Houses in INI.CPP / SCNEARIO.CPP
*
* In:
*
* Out:
*
*
*
* History: 8/8/2019 12:37PM - ST
**************************************************************************************************/
void GlyphX_Assign_Houses(void)
{
/*
** RA version
*/
extern int _build_tech[11];
int assigned[MAX_PLAYERS];
bool preassigned;
int i,j,random_start_location;
HousesType house, house2;
HouseClass * housep, *housep2;
int lowest_color;
int index;
srand(timeGetTime());
/*
** Use pre-selected start locations as long as at least one has been defined, otherwise let the original code
** in SCENARIO.CPP figure it out
*/
UseGlyphXStartLocations = false;
/*
** Assign random start positions if needed.
*/
int random_start_locations[26];
int num_start_locations = 0;
int num_random_start_locations = 0;
for (i = 0; i < 26; i++) {
if (Scen.Waypoint[i] != -1) {
preassigned = false;
for (j = 0; !preassigned && (j < Session.Players.Count()); j++) {
if (MPlayerStartLocations[j] == num_start_locations) {
preassigned = true;
UseGlyphXStartLocations = true;
}
}
if (!preassigned) {
random_start_locations[num_random_start_locations] = num_start_locations;
num_random_start_locations++;
}
num_start_locations++;
}
}
if (num_random_start_locations > 1) {
for (i = 0; i < num_random_start_locations - 1; i++) {
j = i + rand() / (RAND_MAX / (num_random_start_locations - i) + 1);
int t = random_start_locations[j];
random_start_locations[j] = random_start_locations[i];
random_start_locations[i] = t;
}
}
//------------------------------------------------------------------------
// Initialize
//------------------------------------------------------------------------
for (i = 0; i < MAX_PLAYERS; i++) {
assigned[i] = 0;
}
random_start_location = 0;
// debugprint( "Assign_Houses()\n" );
//------------------------------------------------------------------------
// Assign each player in 'Players' to a multiplayer house. Players will
// be sorted by their chosen color value (this value must be unique among
// all the players).
//------------------------------------------------------------------------
for (i = 0; i < Session.Players.Count(); i++) {
//.....................................................................
// Find the player with the lowest color index
//.....................................................................
index = 0;
lowest_color = 255;
for (j = 0; j < Session.Players.Count(); j++) {
//..................................................................
// If we've already assigned this house, skip it.
//..................................................................
if (assigned[j]) {
continue;
}
if (Session.Players[j]->Player.Color < lowest_color) {
lowest_color = Session.Players[j]->Player.Color;
index = j;
}
}
//.....................................................................
// Mark this player as having been assigned.
//.....................................................................
assigned[index] = 1;
//.....................................................................
// Assign the lowest-color'd player to the next available slot in the
// HouseClass array.
//.....................................................................
house = (HousesType)(i + HOUSE_MULTI1);
housep = HouseClass::As_Pointer(house);
memset((char *)housep->IniName, 0, MPLAYER_NAME_MAX);
strncpy((char *)housep->IniName, Session.Players[index]->Name, MPLAYER_NAME_MAX - 1);
#ifdef WOLAPI_INTEGRATION
// Make another copy of name, permanent throughout entire game.
strncpy((char *)housep->InitialName, Session.Players[index]->Name, MPLAYER_NAME_MAX - 1);
#endif
housep->IsHuman = MPlayerIsHuman[index];
housep->IsPlayerControl = housep->IsHuman;
if (!housep->IsHuman) {
housep->IsStarted = true;
strncpy(housep->IniName, Text_String(TXT_COMPUTER), HOUSE_NAME_MAX);
housep->IQ = Rule.MaxIQ;
//housep->Control.TechLevel = _build_tech[BuildLevel];
}
housep->Init_Data((PlayerColorType)(Session.Players[index]->Player.Color),
Session.Players[index]->Player.House, Session.Options.Credits);
/*
** Set the start location override
*/
if (MPlayerStartLocations[index] != RANDOM_START_POSITION) {
housep->StartLocationOverride = MPlayerStartLocations[index];
} else {
if (random_start_location < num_random_start_locations) {
housep->StartLocationOverride = random_start_locations[random_start_location++];
} else {
housep->StartLocationOverride = -1;
}
}
if (index == 0) {
PlayerPtr = housep;
}
/*
** Convert the build level into an actual tech level to assign to the house.
** There isn't a one-to-one correspondence.
*/
housep->Control.TechLevel = _build_tech[BuildLevel];
housep->Assign_Handicap(Scen.Difficulty);
//.....................................................................
// Record where we placed this player
//.....................................................................
Session.Players[index]->Player.ID = house;
// debugprint( "Assigned ID of %i to %s\n", house, Session.Players[index]->Name );
}
for (i = Session.Players.Count(); i < Rule.MaxPlayers; i++) {
house = (HousesType)(i + HOUSE_MULTI1);
housep = HouseClass::As_Pointer(house);
if (housep != NULL) {
housep->IsDefeated = true;
}
}
for (i = 0; i < Session.Players.Count(); i++) {
house = Session.Players[i]->Player.ID;
housep = HouseClass::As_Pointer(house);
if (housep) {
int team = MPlayerTeamIDs[i];
for (int j=0 ; j < Session.Players.Count(); j++) {
if (i != j) {
if (team == MPlayerTeamIDs[j]) {
house2 = Session.Players[j]->Player.ID;
housep2 = HouseClass::As_Pointer(house2);
if (housep2) {
housep->Make_Ally(house2);
}
}
}
}
}
}
}
/**************************************************************************************************
* CNC_Set_Home_Cell -- Allows overriding the start position for the camera
*
*
* History: 2/14/2020 - LLL
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Set_Home_Cell(int x, int y, uint64 player_id)
{
DLLExportClass::Set_Home_Cell(x, y, player_id);
}
/**************************************************************************************************
* CNC_Start_Instance -- Load and start a cnc map -> WITHOUT SPECIFYING A SCENARIO VARIATION (SCEN_VAR)
*
* In: Map initialization parameters
*
* Out: false if map load failed
*
*
*
* History: 7/10/2019 - LLL
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Start_Instance(int scenario_index, int build_level, const char *faction, const char *game_type, const char *content_directory, int sabotaged_structure, const char *override_map_name)
{
return CNC_Start_Instance_Variation(scenario_index, (int)SCEN_VAR_NONE, (int)SCEN_DIR_EAST, build_level, faction, game_type, content_directory, sabotaged_structure, override_map_name);
}
/**************************************************************************************************
* CNC_Start_Instance -- Load and start a cnc map
*
* In: Map initialization parameters
*
* Out: false if map load failed
*
*
* Renamed and modified to accept a scenario variation 7/10/2019 - LLL
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Start_Instance_Variation(int scenario_index, int scenario_variation, int scenario_direction, int build_level, const char *faction, const char *game_type, const char *content_directory, int sabotaged_structure, const char *override_map_name)
{
if (game_type == NULL) {
return false;
}
if (faction == NULL) {
return false;
}
if (content_directory == NULL) {
return false;
}
ScenarioPlayerType scen_player = SCEN_PLAYER_NONE;
if (stricmp(faction, "SPAIN") == 0) {
scen_player = SCEN_PLAYER_SPAIN;
Whom = HOUSE_GOOD;
}
if (stricmp(faction, "GREECE") == 0 || stricmp(faction, "ALLY") == 0) {
scen_player = SCEN_PLAYER_GREECE;
Whom = HOUSE_GOOD;
}
if (stricmp(faction, "USSR") == 0) {
scen_player = SCEN_PLAYER_USSR;
Whom = HOUSE_BAD;
}
DLLExportClass::Set_Content_Directory(content_directory);
BuildLevel = build_level;
Scen.Scenario = scenario_index;
ScenarioDirType scen_dir = (ScenarioDirType)scenario_direction;
if (stricmp(game_type, "GAME_NORMAL") == 0) {
GAME_TO_PLAY = GAME_NORMAL;
if (scen_player == SCEN_PLAYER_NONE) {
return false;
}
} else {
if (stricmp(game_type, "GAME_GLYPHX_MULTIPLAYER") == 0) {
GAME_TO_PLAY = GAME_GLYPHX_MULTIPLAYER;
scen_player = SCEN_PLAYER_MPLAYER;
} else {
return false;
}
}
/*
** Load the scenario. Specify variation 'A' for the editor; for the game,
** don't specify a variation, to make 'Set_Scenario_Name()' pick a random one.
** Skip this if we've already loaded a save-game.
*/
Force_CD_Available(ALWAYS_RELOAD_CD);
if (override_map_name && strlen(override_map_name)) {
strcpy(Scen.ScenarioName, override_map_name);
} else {
Scen.Set_Scenario_Name(Scen.Scenario, scen_player, scen_dir, (ScenarioVarType)scenario_variation);
}
HiddenPage.Clear();
VisiblePage.Clear();
/*
** Set the mouse to some position where it's not going to scroll, or do something else wierd.
*/
DLLForceMouseX = 100;
DLLForceMouseY = 100;
KEYBOARD->MouseQX = 100;
KEYBOARD->MouseQY = 100;
GlyphXClientSidebarWidthInLeptons = 0;
Seed = GetRandSeed();
Scen.RandomNumber = Seed;
if (!Start_Scenario(Scen.ScenarioName)) {
return(false);
}
DLLExportClass::Reset_Sidebars();
DLLExportClass::Reset_Player_Context();
DLLExportClass::Calculate_Start_Positions();
/*
** Make sure the scroll constraints are applied. This is important for GDI 1 where the map isn't wide enough for the screen
*/
COORDINATE origin_coord = Coord_Add(Map.TacticalCoord, XY_Coord(1, 0));
Map.Set_Tactical_Position(origin_coord);
origin_coord = Coord_Add(Map.TacticalCoord, XY_Coord(-1, 0));
Map.Set_Tactical_Position(origin_coord);
if (GAME_TO_PLAY == GAME_NORMAL) {
MPSuperWeaponDisable = false;
} else {
if (MPSuperWeaponDisable) {
/*
** Write over the tecb level settings we just loaded from the Rules ini
*/
Rule.GPSTechLevel = 100;
Rule.ParaInfantryTechLevel = 100;
Rule.SpyPlaneTechLevel = 100;
Rule.ParaBombTechLevel = 100;
Rule.ChronoTechLevel = 100;
}
}
/*
** Hide the SeenBuff; force the map to render one frame. The caller can
** then fade the palette in.
** (If we loaded a game, this step will fade out the title screen. If we
** started a scenario, Start_Scenario() will have played a couple of VQ
** movies, which will have cleared the screen to black already.)
*/
//Fade_Palette_To(BlackPalette, FADE_PALETTE_MEDIUM, Call_Back);
HiddenPage.Clear();
VisiblePage.Clear();
Set_Logic_Page(SeenBuff);
/*
** Sidebar is always active in hi-res.
*/
if (!Debug_Map) {
Map.SidebarClass::Activate(1);
}
Map.Flag_To_Redraw(true);
Set_Palette(GamePalette.Get_Data());
Map.Render();
Set_Palette(GamePalette.Get_Data());
return true;
}
/**************************************************************************************************
* CNC_Read_INI -- Load an ini file into the supplied buffer
*
* In: Map initialization parameters
*
* Out: false if ini load failed
*
*
* History: 12/16/2019 11:44AM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Read_INI(int scenario_index, int scenario_variation, int scenario_direction, const char *content_directory, const char *override_map_name, char *ini_buffer, int _ini_buffer_size)
{
if (content_directory == NULL) {
return false;
}
DLLExportClass::Set_Content_Directory(content_directory);
Scen.Scenario = scenario_index;
ScenarioDirType scen_dir = (ScenarioDirType)scenario_direction;
GAME_TO_PLAY = GAME_GLYPHX_MULTIPLAYER;
ScenarioPlayerType scen_player = SCEN_PLAYER_MPLAYER;
Force_CD_Available(ALWAYS_RELOAD_CD);
if (override_map_name && strlen(override_map_name)) {
strcpy(Scen.ScenarioName, override_map_name);
} else {
Scen.Set_Scenario_Name(Scen.Scenario, scen_player, scen_dir, (ScenarioVarType)scenario_variation);
}
if (_ini_buffer_size < _ShapeBufferSize) {
GlyphX_Debug_Print("INI file buffer may be too small");
return false;
}
if (!ini_buffer) {
GlyphX_Debug_Print("No INI file buffer");
return false;
}
memset(ini_buffer, _ini_buffer_size, 0);
CCFileClass file(Scen.ScenarioName);
if (!file.Is_Available()) {
GlyphX_Debug_Print("Failed to find scenario file");
GlyphX_Debug_Print(Scen.ScenarioName);
return(false);
} else {
GlyphX_Debug_Print("Opened scenario file");
GlyphX_Debug_Print(Scen.ScenarioName);
int bytes_read = file.Read(ini_buffer, _ini_buffer_size-1);
if (bytes_read == _ini_buffer_size - 1) {
GlyphX_Debug_Print("INI file buffer is too small");
return false;
}
}
/*
** Ini buffer should be zero terminated
*/
if ((int) strlen(ini_buffer) >= _ini_buffer_size) {
GlyphX_Debug_Print("INI file buffer overrun");
return false;
}
return true;
}
/**************************************************************************************************
* CNC_Start_Custom_Instance -- Load and start a custom map
*
* In: Map initialization parameters
*
* Out: false if map load failed
*
*
*
* History: 2019/10/28 - JAS
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Start_Custom_Instance(const char* content_directory, const char* directory_path, const char* scenario_name, int build_level, bool multiplayer)
{
DLLExportClass::Set_Content_Directory(content_directory);
char fullname[_MAX_FNAME + _MAX_EXT];
snprintf(fullname, _MAX_FNAME + _MAX_EXT, "%s%s.mpr", directory_path, scenario_name);
char name_buffer[128];
char digest_buffer[32];
CCFileClass file(fullname);
INIClass ini;
ini.Load(file);
ini.Get_String("Basic", "Name", "No Name", name_buffer, sizeof(name_buffer));
ini.Get_String("Digest", "1", "No Digest", digest_buffer, sizeof(digest_buffer));
Session.Scenarios.Add(new MultiMission(fullname, name_buffer, digest_buffer, ini.Get_Bool("Basic", "Official", false), false));
BuildLevel = build_level;
ScenarioPlayerType scen_player;
strncpy(Scen.ScenarioName, fullname, _MAX_FNAME + _MAX_EXT);
if (multiplayer) {
GAME_TO_PLAY = GAME_GLYPHX_MULTIPLAYER;
} else {
GAME_TO_PLAY = GAME_NORMAL;
}
scen_player = SCEN_PLAYER_MPLAYER;
//Scen.Scenario = scenario_index;
//ScenarioDirType scen_dir = (ScenarioDirType)scenario_direction;
//if (stricmp(game_type, "GAME_NORMAL") == 0) {
// GAME_TO_PLAY = GAME_NORMAL;
//}
//else {
// if (stricmp(game_type, "GAME_GLYPHX_MULTIPLAYER") == 0) {
// GAME_TO_PLAY = GAME_GLYPHX_MULTIPLAYER;
// scen_player = SCEN_PLAYER_MPLAYER;
// }
// else {
// return false;
// }
//}
///*
//** Load the scenario. Specify variation 'A' for the editor; for the game,
//** don't specify a variation, to make 'Set_Scenario_Name()' pick a random one.
//** Skip this if we've already loaded a save-game.
//*/
//Force_CD_Available(ALWAYS_RELOAD_CD);
//if (override_map_name && strlen(override_map_name)) {
// strcpy(Scen.ScenarioName, override_map_name);
//}
//else {
// Scen.Set_Scenario_Name(Scen.Scenario, scen_player, scen_dir, (ScenarioVarType)scenario_variation);
//}
HiddenPage.Clear();
VisiblePage.Clear();
/*
** Set the mouse to some position where it's not going to scroll, or do something else wierd.
*/
DLLForceMouseX = 100;
DLLForceMouseY = 100;
KEYBOARD->MouseQX = 100;
KEYBOARD->MouseQY = 100;
GlyphXClientSidebarWidthInLeptons = 0;
Seed = GetRandSeed();
Scen.RandomNumber = Seed;
if (!Start_Scenario(Scen.ScenarioName)) {
return(false);
}
DLLExportClass::Reset_Sidebars();
DLLExportClass::Reset_Player_Context();
DLLExportClass::Calculate_Start_Positions();
/*
** Make sure the scroll constraints are applied. This is important for GDI 1 where the map isn't wide enough for the screen
*/
COORDINATE origin_coord = Coord_Add(Map.TacticalCoord, XY_Coord(1, 0));
Map.Set_Tactical_Position(origin_coord);
origin_coord = Coord_Add(Map.TacticalCoord, XY_Coord(-1, 0));
Map.Set_Tactical_Position(origin_coord);
if (GAME_TO_PLAY == GAME_NORMAL) {
MPSuperWeaponDisable = false;
}
else {
if (MPSuperWeaponDisable) {
/*
** Write over the tecb level settings we just loaded from the Rules ini
*/
Rule.GPSTechLevel = 100;
Rule.ParaInfantryTechLevel = 100;
Rule.SpyPlaneTechLevel = 100;
Rule.ParaBombTechLevel = 100;
Rule.ChronoTechLevel = 100;
}
}
/*
** Hide the SeenBuff; force the map to render one frame. The caller can
** then fade the palette in.
** (If we loaded a game, this step will fade out the title screen. If we
** started a scenario, Start_Scenario() will have played a couple of VQ
** movies, which will have cleared the screen to black already.)
*/
//Fade_Palette_To(BlackPalette, FADE_PALETTE_MEDIUM, Call_Back);
HiddenPage.Clear();
VisiblePage.Clear();
Set_Logic_Page(SeenBuff);
/*
** Sidebar is always active in hi-res.
*/
if (!Debug_Map) {
Map.SidebarClass::Activate(1);
}
Map.Flag_To_Redraw(true);
Set_Palette(GamePalette.Get_Data());
Map.Render();
Set_Palette(GamePalette.Get_Data());
return true;
}
bool Debug_Write_Shape_Type(const ObjectTypeClass *type, int shapenum)
{
char fullname[_MAX_FNAME+_MAX_EXT];
char buffer[_MAX_FNAME];
CCFileClass file;
if (type->ImageData != NULL) {
sprintf(buffer, "%s_%d", type->IniName, shapenum);
_makepath(fullname, NULL, NULL, buffer, ".PCX");
return Debug_Write_Shape(fullname, type->ImageData, shapenum);
}
return false;
}
bool Debug_Write_Shape(const char *file_name, void const * shapefile, int shapenum, int flags, void const * ghostdata)
{
/*
** Build frame returns a pointer now instead of the shapes length
*/
char *shape_pointer = (char*) Build_Frame(shapefile , shapenum , _ShapeBuffer);
if (shape_pointer == NULL) {
return false;;
}
if (Get_Last_Frame_Length() > _ShapeBufferSize) {
return false;;
}
int width = Get_Build_Frame_Width(shapefile);
int height = Get_Build_Frame_Height(shapefile);
GraphicBufferClass temp_gbuffer(width, height);
GraphicViewPortClass temp_viewport(&temp_gbuffer, 0, 0, width, height);
WindowList[WINDOW_CUSTOM][WINDOWX] = 0;
WindowList[WINDOW_CUSTOM][WINDOWY] = 0;
WindowList[WINDOW_CUSTOM][WINDOWWIDTH] = width;
WindowList[WINDOW_CUSTOM][WINDOWHEIGHT] = height;
static const char _shape_trans = 0x40;
if (flags == 0) {
Buffer_Frame_To_Page(0, 0, width, height, shape_pointer, temp_viewport, SHAPE_NORMAL|SHAPE_WIN_REL|_shape_trans); //, ghostdata, predoffset);
} else {
Buffer_Frame_To_Page(0, 0, width, height, shape_pointer, temp_viewport, flags, ghostdata);
}
Write_PCX_File((char*)file_name, temp_viewport, (unsigned char*)GamePalette.Get_Data());
return true;
}
/**************************************************************************************************
* CNC_Advance_Instance -- Process one logic frame
*
* In:
*
* Out: Is game still playing?
*
*
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Advance_Instance(uint64 player_id)
{
//DLLExportClass::Set_Event_Callback(event_callback);
if (Frame <= 10) { // Don't spam forever, but useful to know that we actually started advancing
GlyphX_Debug_Print("CNC_Advance_Instance - RA");
}
/*
** Shouldn't really need to do this, but I like the idea of always running the main loop in the context of the same player.
** Might make tbe bugs more repeatable and consistent. ST - 3/15/2019 11:58AM
*/
if (player_id != 0) {
DLLExportClass::Set_Player_Context(player_id);
} else {
DLLExportClass::Set_Player_Context(DLLExportClass::GlyphxPlayerIDs[0]);
}
#ifdef FIXIT_CSII // checked - ajw 9/28/98
TimeQuake = PendingTimeQuake;
PendingTimeQuake = false;
#else
TimeQuake = false;
#endif
/*
** Allocate extra memory for uncompressed shapes as needed
*/
Reallocate_Big_Shape_Buffer();
/*
** If there is no theme playing, but it looks like one is required, then start one
** playing. This is usually the symptom of there being no transition score.
*/
//if (SampleType && Theme.What_Is_Playing() == THEME_NONE) {
// Theme.Queue_Song(THEME_PICK_ANOTHER);
//}
/*
** Update the display, unless we're inside a dialog.
*/
//if (SpecialDialog == SDLG_NONE && GameInFocus) {
//WWMouse->Erase_Mouse(&HidPage, TRUE);
//Map.Input(input, x, y);
//if (input) {
// Keyboard_Process(input);
//}
/*
** The main loop passes these in uninitialized. ST - 2/7/2019 4:36PM
*/
KeyNumType input = KN_NONE; // Player input.
int x = 0;
int y = 0;
Map.Input(input, x, y);
//if (input) {
// Keyboard_Process(input);
//}
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER) {
/*
** Process the sidebar. ST - 4/18/2019 11:59AM
*/
HouseClass *old_player_ptr = PlayerPtr;
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
HouseClass *player_ptr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
DLLExportClass::Logic_Switch_Player_Context(player_ptr);
Sidebar_Glyphx_AI(player_ptr, input);
}
DLLExportClass::Logic_Switch_Player_Context(old_player_ptr);
}
//}
/*
** Sort the map's ground layer by y-coordinate value. This is done
** outside the IsToRedraw check, for the purposes of game sync'ing
** between machines; this way, all machines will sort the Map's
** layer in the same way, and any processing done that's based on
** the order of this layer will sync on different machines.
*/
Map.Layer[LAYER_GROUND].Sort();
/*
** AI logic operations are performed here.
*/
//Skip this block of code on first update of single-player games. This helps prevents trigger generated messages on the first update from being lost during loading screen or movie. - LLL
static bool FirstUpdate = GAME_TO_PLAY != GAME_GLYPHX_MULTIPLAYER;;
if (!FirstUpdate) {
HouseClass *old_player_ptr = PlayerPtr;
Logic.Clear_Recently_Created_Bits();
Logic.AI();
DLLExportClass::Logic_Switch_Player_Context(old_player_ptr);
}
FirstUpdate = false;
TimeQuake = false;
#ifdef FIXIT_CSII // checked - ajw 9/28/98
if (!PendingTimeQuake) {
TimeQuakeCenter = 0;
}
#endif
/*
** Manage the inter-player message list. If Manage() returns true, it means
** a message has expired & been removed, and the entire map must be updated.
*/
if (Session.Messages.Manage()) {
#ifdef WIN32
HiddenPage.Clear();
#else //WIN32
HidPage.Clear();
#endif //WIN32
Map.Flag_To_Redraw(true);
}
/*
** Process all commands that are ready to be processed.
*/
if (GAME_TO_PLAY == GAME_NORMAL) {
Queue_AI();
} else {
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER) {
DLLExportClass::Glyphx_Queue_AI();
/*
** Process the sidebar. ST - 3/22/2019 2:07PM
*/
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
HouseClass *player_ptr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
Sidebar_Glyphx_Recalc(player_ptr);
}
}
}
/*
** Keep track of elapsed time in the game.
*/
//Score.ElapsedTime += TIMER_SECOND / TICKS_PER_SECOND;
/*
** Perform any win/lose code as indicated by the global control flags.
*/
/*
** Check for player wins or loses according to global event flag.
*/
if (PlayerWins) {
//WWMouse->Erase_Mouse(&HidPage, TRUE);
PlayerLoses = false;
PlayerWins = false;
PlayerRestarts = false;
Map.Help_Text(TXT_NONE);
GlyphX_Debug_Print("PlayerWins = true");
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER) {
DLLExportClass::On_Multiplayer_Game_Over();
} else {
DLLExportClass::On_Game_Over(player_id, true);
}
//DLLExportClass::Set_Event_Callback(NULL);
return false;
}
if (PlayerLoses) {
//WWMouse->Erase_Mouse(&HidPage, TRUE);
PlayerWins = false;
PlayerLoses = false;
PlayerRestarts = false;
Map.Help_Text(TXT_NONE);
GlyphX_Debug_Print("PlayerLoses = true");
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER) {
DLLExportClass::On_Multiplayer_Game_Over();
} else {
DLLExportClass::On_Game_Over(player_id, false);
}
//DLLExportClass::Set_Event_Callback(NULL);
return false;
}
/*
** The frame logic has been completed. Increment the frame
** counter.
*/
Frame++;
/*
** Very rarely, the human players will get a message from the computer.
**
** This was disabled in the RA source code, so copying over the functionality from TD
*/
if (GAME_TO_PLAY != GAME_NORMAL && Session.Options.Ghosts && IRandom(0,10000) == 1) {
DLLExportClass::Computer_Message(false);
}
if (ProgEndCalled) {
GlyphX_Debug_Print("ProgEndCalled - GameActive = false");
GameActive = false;
}
if (DLLExportClass::Legacy_Render_Enabled()) {
Map.Render();
}
//Sync_Delay();
//DLLExportClass::Set_Event_Callback(NULL);
Color_Cycle();
return(GameActive);
}
/**************************************************************************************************
* CNC_Save_Load -- Process a save or load game action
*
* In:
*
* Out: Success?
*
*
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Save_Load(bool save, const char *file_path_and_name, const char *game_type)
{
bool result = false;
if (save) {
result = Save_Game(file_path_and_name, "internal");
} else {
if (game_type == NULL) {
return false;
}
if (stricmp(game_type, "GAME_NORMAL") == 0) {
GAME_TO_PLAY = GAME_NORMAL;
} else {
if (stricmp(game_type, "GAME_GLYPHX_MULTIPLAYER") == 0) {
GAME_TO_PLAY = GAME_GLYPHX_MULTIPLAYER;
//ScenPlayer = SCEN_PLAYER_MPLAYER;
} else {
return false;
}
}
while (Session.Players.Count() > 0) {
delete Session.Players[0];
Session.Players.Delete(Session.Players[0]);
}
result = Load_Game(file_path_and_name);
DLLExportClass::Set_Player_Context(DLLExportClass::GlyphxPlayerIDs[0], true);
Set_Logic_Page(SeenBuff);
VisiblePage.Clear();
Map.Flag_To_Redraw(true);
if (DLLExportClass::Legacy_Render_Enabled()) {
Map.Render();
}
Set_Palette(GamePalette.Get_Data());
}
return result;
}
/**************************************************************************************************
* CNC_Set_Difficulty -- Set game difficulty
*
* In:
*
* Out:
*
*
*
* History: 10/02/2019 - SKY
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Set_Difficulty(int difficulty)
{
if (GAME_TO_PLAY == GAME_NORMAL) {
Set_Scenario_Difficulty(difficulty);
}
}
/**************************************************************************************************
* CNC_Restore_Carryover_Objects
*
* History: 11/15/2019 - LLL
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Restore_Carryover_Objects(const CarryoverObjectStruct* objects)
{
//Delete the list
while (Carryover) {
CarryoverClass* cptr = (CarryoverClass*)Carryover->Get_Next();
delete Carryover;
Carryover = cptr;
}
//Populate the list
const CarryoverObjectStruct* next_object = objects;
while (next_object) {
CarryoverClass* cptr = new CarryoverClass();
cptr->RTTI = (RTTIType)next_object->RTTI;
cptr->Type.Building = (StructType)next_object->Type; //This works regardless of what the RTTI-type and the enum type, because they're all enums. - LLL
cptr->Cell = (CELL)next_object->Cell;
cptr->House = (HousesType)next_object->House;
cptr->Strength = next_object->Strength;
next_object = next_object->Next;
if (Carryover == NULL) {
Carryover = cptr;
}
else {
cptr->Add_Tail(*Carryover);
}
}
}
/**************************************************************************************************
* CNC_Handle_Player_Switch_To_AI -- Renamed 3/9/2020 - LLL
* CNC_Handle_Player_Disconnect -- Handle player disconnected during multiplayer game
*
* In:
*
* Out:
*
*
*
* History: 12/3/2019 1:46PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Player_Switch_To_AI(uint64 player_id)
{
if (PlayerWins || PlayerLoses || DLLExportClass::Get_Game_Over()) {
return;
}
GlyphX_Debug_Print("CNC_Handle_Player_Switch_To_AI");
if (GAME_TO_PLAY == GAME_NORMAL) {
return;
}
#ifdef KILL_PLAYER_ON_DISCONNECT
/*
** Kill player's units on disconnect.
*/
if (player_id != 0) {
DLLExportClass::Set_Player_Context(player_id);
if (PlayerPtr) {
PlayerPtr->Flag_To_Die();
}
}
#else //KILL_PLAYER_ON_DISCONNECT
if (player_id != 0) {
HousesType house;
HouseClass *ptr;
DLLExportClass::Set_Player_Context(player_id);
if (PlayerPtr) {
PlayerPtr->WasHuman = true;
PlayerPtr->IsHuman = false;
PlayerPtr->IQ = Rule.MaxIQ;
strcpy (PlayerPtr->IniName, Text_String(TXT_COMPUTER));
PlayerPtr->IsBaseBuilding = true;
/*
** Start the unload mission for MCVs
*/
for (int index = 0; index < Units.Count(); index++) {
UnitClass * obj = Units.Ptr(index);
if (obj && !obj->IsInLimbo && obj->House == PlayerPtr) {
if (*obj == UNIT_MCV) {
obj->Assign_Mission(MISSION_GUARD);
obj->Assign_Target(TARGET_NONE);
obj->Assign_Destination(TARGET_NONE);
obj->Assign_Mission(MISSION_UNLOAD);
obj->Commence();
}
}
}
DLLExportClass::On_Message(PlayerPtr, "", 60.0f, MESSAGE_TYPE_PLAYER_DISCONNECTED, -1);
/*
** Send the disconnect taunt message
*/
int human_count = 0;
for (house = HOUSE_MULTI1; house < (HOUSE_MULTI1 + MULTIPLAYER_COUNT); house++) {
ptr = HouseClass::As_Pointer(house);
if (ptr && ptr->IsHuman && !ptr->IsDefeated) {
human_count++;
}
}
if (human_count == 1) {
DLLExportClass::Computer_Message(true);
}
}
}
#endif //KILL_PLAYER_ON_DISCONNECT
}
/**************************************************************************************************
* CNC_Handle_Human_Team_Wins
*
* History: 3/10/2020 - LLL
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Human_Team_Wins(uint64 quitting_player_id)
{
GlyphX_Debug_Print("CNC_Handle_Human_Team_Wins");
DLLExportClass::Force_Human_Team_Wins(quitting_player_id);
}
/**************************************************************************************************
* CNC_Start_Mission_Timer
*
* History: 11/25/2019 - LLL
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Start_Mission_Timer(int time)
{
if (GameActive)
{
Scen.MissionTimer = time;
if (!Scen.MissionTimer.Is_Active()) {
Scen.MissionTimer.Start();
}
Map.Redraw_Tab();
}
}
/**************************************************************************************************
* DLLExportClass::Init -- Init the class
*
* In:
*
* Out:
*
*
*
* History: 3/12/2019 10:52AM - ST
**************************************************************************************************/
void DLLExportClass::Init(void)
{
for (int i=0 ; i<MAX_PLAYERS ; i++) {
GlyphxPlayerIDs[i] = 0xffffffffull;
}
CurrentLocalPlayerIndex = 0;
MessagesSent.clear();
}
/**************************************************************************************************
* DLLExportClass::Shutdown -- Shutdown
*
* In:
*
* Out:
*
*
*
* History: 2/20/2020 1:59PM - ST
**************************************************************************************************/
void DLLExportClass::Shutdown(void)
{
for (int i=0 ; i<ModSearchPaths.Count() ; i++) {
delete [] ModSearchPaths[i];
}
ModSearchPaths.Clear();
}
/**************************************************************************************************
* DLLExportClass::Add_Mod_Path -- Add a path to load mod files from
*
* In: Mod path
*
* Out:
*
*
*
* History: 2/20/2020 2:03PM - ST
**************************************************************************************************/
void DLLExportClass::Add_Mod_Path(const char *mod_path)
{
char *copy_path = strdup(mod_path);
ModSearchPaths.Add(copy_path);
}
/**************************************************************************************************
* DLLExportClass::Set_Content_Directory -- Update the locations that the original code will load from
*
* In: Main (official) content directory
*
* Out:
*
*
*
* History: 2/20/2020 2:03PM - ST
**************************************************************************************************/
void DLLExportClass::Set_Content_Directory(const char *content_directory)
{
CCFileClass::Clear_Search_Drives();
CCFileClass::Reset_Raw_Path();
if ((content_directory == NULL || strlen(content_directory) == 0) && ModSearchPaths.Count() == 0) {
return;
}
char *all_paths = new char [_MAX_PATH * 100];
*all_paths = 0;
for (int i=0 ; i<ModSearchPaths.Count() ; i++) {
if (i != 0) {
strcat(all_paths, ";");
}
strcat(all_paths, ModSearchPaths[i]);
}
if (ModSearchPaths.Count() && content_directory && strlen(content_directory)) {
strcat(all_paths, ";");
}
if (content_directory) {
strcat(all_paths, content_directory);
}
CCFileClass::Set_Search_Drives(all_paths);
delete [] all_paths;
}
/**************************************************************************************************
* DLLExportClass::Config
*
* History: 1/16/2020 - SKY
**************************************************************************************************/
void DLLExportClass::Config(const CNCRulesDataStruct& rules)
{
for (int i = 0; i < 3; ++i)
{
Rule.Diff[i].FirepowerBias = rules.Difficulties[i].FirepowerBias;
Rule.Diff[i].GroundspeedBias = rules.Difficulties[i].GroundspeedBias;
Rule.Diff[i].AirspeedBias = rules.Difficulties[i].AirspeedBias;
Rule.Diff[i].ArmorBias = rules.Difficulties[i].ArmorBias;
Rule.Diff[i].ROFBias = rules.Difficulties[i].ROFBias;
Rule.Diff[i].CostBias = rules.Difficulties[i].CostBias;
Rule.Diff[i].BuildSpeedBias = rules.Difficulties[i].BuildSpeedBias;
Rule.Diff[i].RepairDelay = rules.Difficulties[i].RepairDelay;
Rule.Diff[i].BuildDelay = rules.Difficulties[i].BuildDelay;
Rule.Diff[i].IsBuildSlowdown = rules.Difficulties[i].IsBuildSlowdown ? 1 : 0;
Rule.Diff[i].IsWallDestroyer = rules.Difficulties[i].IsWallDestroyer ? 1 : 0;
Rule.Diff[i].IsContentScan = rules.Difficulties[i].IsContentScan ? 1 : 0;
}
}
/**************************************************************************************************
* DLLExportClass::Set_Home_Cell
*
* History: 2/14/2020 - LLL
**************************************************************************************************/
void DLLExportClass::Set_Home_Cell(int x, int y, uint64 player_id)
{
if (GAME_TO_PLAY == GAME_NORMAL) {
MultiplayerStartPositions[0] = XY_Cell(x, y);
}
else {
for (int i = 0; i < MAX_PLAYERS && i < 4; i++) {
if (GlyphxPlayerIDs[i] == player_id) {
MultiplayerStartPositions[i] = XY_Cell(x, y);
}
}
}
}
/**************************************************************************************************
* DLLExportClass::On_Play_Movie
*
* History: 7/23/2019 - LLL
**************************************************************************************************/
void DLLExportClass::On_Play_Movie(const char * movie_name, ThemeType theme, bool immediate)
{
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_MOVIE;
new_event.Movie.MovieName = movie_name;
new_event.Movie.Theme = (int)theme;
new_event.Movie.Immediate = immediate;
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Display_Briefing_Text
*
* Called when Red Alert wants to display the mission breifing screen before a mission.
*
* History: 12/04/2019 - LLL
**************************************************************************************************/
void DLLExportClass::On_Display_Briefing_Text()
{
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_BRIEFING_SCREEN;
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Sound_Effect -- Called when C&C wants to play a sound effect
*
* In:
*
* Out:
*
*
*
* History: 2/20/2019 2:39PM - ST
**************************************************************************************************/
void DLLExportClass::On_Sound_Effect(const HouseClass* player_ptr, int sound_effect_index, const char* extension, int variation, COORDINATE coord)
{
// player_ptr could be NULL
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_SOUND_EFFECT;
new_event.SoundEffect.SFXIndex = sound_effect_index;
new_event.SoundEffect.Variation = variation;
new_event.GlyphXPlayerID = 0;
if ( player_ptr != NULL )
{
new_event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
}
if ( coord == 0 )
{
new_event.SoundEffect.PixelX = -1;
new_event.SoundEffect.PixelY = -1;
}
else
{
// Use world pixel coordinates
new_event.SoundEffect.PixelX = Lepton_To_Pixel(Coord_X(coord));
new_event.SoundEffect.PixelY = Lepton_To_Pixel(Coord_Y(coord));
}
if ( sound_effect_index >= VOC_FIRST && sound_effect_index < VOC_COUNT )
{
strncpy( new_event.SoundEffect.SoundEffectName, SoundEffectName[ sound_effect_index ].Name , 16);
if ( extension != NULL )
{
strncat( new_event.SoundEffect.SoundEffectName, extension , 16);
}
new_event.SoundEffect.SoundEffectPriority = SoundEffectName[ sound_effect_index ].Priority;
new_event.SoundEffect.SoundEffectContext = SoundEffectName[ sound_effect_index ].Where;
}
else
{
strncpy( new_event.SoundEffect.SoundEffectName, "BADINDEX", 16 );
new_event.SoundEffect.SoundEffectPriority = -1;
new_event.SoundEffect.SoundEffectContext = -1;
}
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Speech -- Called when C&C wants to play a speech line
*
* In:
*
* Out:
*
*
*
* History: 2/20/2019 2:39PM - ST
**************************************************************************************************/
void DLLExportClass::On_Speech(const HouseClass* player_ptr, int speech_index)
{
// player_ptr could be NULL
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_SPEECH;
new_event.Speech.SpeechIndex = speech_index;
new_event.GlyphXPlayerID = 0;
if (player_ptr != NULL)
{
new_event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
}
if (speech_index >= VOX_FIRST && speech_index < VOX_COUNT)
{
strncpy(new_event.Speech.SpeechName, Speech[speech_index], 16);
}
else
{
strncpy(new_event.Speech.SpeechName, "BAD_SPEECH_INDEX", 16);
}
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::RA_Calculate_Leadership --
*
* History: 10.30.2019 MBL (Based on LLL's Calculate_Single_Player_Score())
**************************************************************************************************/
int DLLExportClass::RA_Calculate_Leadership( HousesType player_house, int units_lost, int buildings_lost )
{
int house = (player_house == HOUSE_USSR || player_house == HOUSE_UKRAINE); // 0 or 1
int leadership = 0;
for (int index = 0; index < Logic.Count(); index++) {
ObjectClass* object = Logic[index];
HousesType owner = object->Owner();
if ((house) && (owner == HOUSE_USSR || owner == HOUSE_BAD || owner == HOUSE_UKRAINE)) {
leadership++;
}
else {
if ((!house) && (object->Owner() == HOUSE_GREECE)) {
leadership++;
}
}
}
if (!leadership) leadership++;
leadership = 100 * fixed(leadership, (units_lost + buildings_lost + leadership));
leadership = min(150, leadership);
return leadership;
}
/**************************************************************************************************
* DLLExportClass::RA_Calculate_Economy --
*
* History: 10.30.2019 MBL (Based on LLL's Calculate_Single_Player_Score())
**************************************************************************************************/
int DLLExportClass::RA_Calculate_Economy( long available_money, int stolen_buildings_credits, unsigned harvested_credits, long initial_credits )
{
int economy = 100 * fixed((unsigned)available_money + 1 + stolen_buildings_credits, harvested_credits + (unsigned)initial_credits + 1);
economy = min(economy, 150);
return economy;
}
/**************************************************************************************************
* DLLExportClass::RA_Calculate_Score --
*
* History: 10.30.2019 MBL (Based on LLL's Calculate_Single_Player_Score())
**************************************************************************************************/
int DLLExportClass::RA_Calculate_Score( int uspoints, int leadership, int economy )
{
int score_total = ((uspoints * leadership) / 100) + ((uspoints * economy) / 100);
if (score_total < -9999) score_total = -9999;
score_total = min(score_total, 99999);
return score_total;
}
/**************************************************************************************************
* DLLExportClass::CalculateScore*
*
* History: 10/16/2019 - LLL
**************************************************************************************************/
void DLLExportClass::Calculate_Single_Player_Score(EventCallbackStruct& event)
{
//Adapted from Red Alert SCORE.CPP Presentation() - LLL
int house = (PlayerPtr->Class->House == HOUSE_USSR || PlayerPtr->Class->House == HOUSE_UKRAINE); // 0 or 1
int good_units_lost = (HouseClass::As_Pointer(HOUSE_GOOD))->UnitsLost;
int bad_units_lost = (HouseClass::As_Pointer(HOUSE_BAD))->UnitsLost;
int neutral_units_lost = (HouseClass::As_Pointer(HOUSE_NEUTRAL))->UnitsLost;
int good_buildings_lost = (HouseClass::As_Pointer(HOUSE_GOOD))->BuildingsLost;
int bad_buildings_lost = (HouseClass::As_Pointer(HOUSE_BAD))->BuildingsLost;
int neutral_buildings_lost = (HouseClass::As_Pointer(HOUSE_NEUTRAL))->BuildingsLost;
int good_credits_harvested = (HouseClass::As_Pointer(HOUSE_GOOD))->HarvestedCredits;
int bad_credits_harvested = (HouseClass::As_Pointer(HOUSE_BAD))->HarvestedCredits;
int uspoints = 0;
for (HousesType hous = HOUSE_SPAIN; hous <= HOUSE_BAD; hous++) {
HouseClass *hows = HouseClass::As_Pointer(hous);
if (hous == HOUSE_USSR || hous == HOUSE_BAD || hous == HOUSE_UKRAINE) {
bad_units_lost += hows->UnitsLost;
bad_buildings_lost += hows->BuildingsLost;
}
else {
good_units_lost += hows->UnitsLost;
good_buildings_lost += hows->BuildingsLost;
}
if (PlayerPtr->Is_Ally(hous)) {
uspoints += hows->PointTotal;
}
}
// if(uspoints < 0) uspoints = 0;
// uspoints += 1000; //BG 1000 bonus points for winning mission
/*
** Bias the base score upward according to the difficulty level.
*/
switch (PlayerPtr->Difficulty) {
case DIFF_EASY:
uspoints += 500;
break;
case DIFF_NORMAL:
uspoints += 1500;
break;
case DIFF_HARD:
uspoints += 3500;
break;
}
/*
** Determine leadership rating.
*/
int leadership = 0;
for (int index = 0; index < Logic.Count(); index++) {
ObjectClass * object = Logic[index];
HousesType owner = object->Owner();
if ((house) && (owner == HOUSE_USSR || owner == HOUSE_BAD || owner == HOUSE_UKRAINE)) {
leadership++;
}
else {
if ((!house) && (object->Owner() == HOUSE_GREECE)) {
leadership++;
}
}
}
if (!leadership) leadership++;
leadership = 100 * fixed(leadership, (house ? bad_units_lost + bad_buildings_lost + leadership : good_units_lost + good_buildings_lost + leadership));
leadership = min(150, leadership);
/*
** Determine economy rating.
*/
// int init = PlayerPtr->Control.InitialCredits;
// int cred = PlayerPtr->Available_Money();
int economy = 100 * fixed((unsigned)PlayerPtr->Available_Money() + 1 + PlayerPtr->StolenBuildingsCredits, PlayerPtr->HarvestedCredits + (unsigned)PlayerPtr->Control.InitialCredits + 1);
economy = min(economy, 150);
int score_total = ((uspoints * leadership) / 100) + ((uspoints * economy) / 100);
if (score_total < -9999) score_total = -9999;
score_total = min(score_total, 99999);
//Score Stats
event.GameOver.Leadership = leadership;
event.GameOver.Efficiency = economy;
event.GameOver.Score = score_total;
event.GameOver.CategoryTotal = uspoints;
event.GameOver.NODKilled = bad_units_lost;
event.GameOver.GDIKilled = good_units_lost;
event.GameOver.CiviliansKilled = neutral_units_lost;
event.GameOver.NODBuildingsDestroyed = bad_buildings_lost;
event.GameOver.GDIBuildingsDestroyed = good_buildings_lost;
event.GameOver.CiviliansBuildingsDestroyed = neutral_buildings_lost;
event.GameOver.RemainingCredits = PlayerPtr->Available_Money();
if (Scen.IsSkipScore) {
event.GameOver.Score = -1;
}
}
/**************************************************************************************************
* DLLExportClass::On_Message -- Called when the game wants to display a message (ex. tutorial text)
*
* In:
*
* Out:
*
*
*
* History: 10/16/2019 - SKY
**************************************************************************************************/
void DLLExportClass::On_Message(const HouseClass* player_ptr, const char* message, float timeout_seconds, EventCallbackMessageEnum message_type, int64 message_id)
{
if (EventCallback == NULL)
{
return;
}
const char* p_msg = message;
std::string localized_text_name;
if (message_id != -1) {
if (message_id == TXT_INSUFFICIENT_FUNDS) {
localized_text_name = "TEXT_INSUFFICIENT_FUNDS_MESSAGE";
}
else if (message_id == TXT_LOW_POWER) {
localized_text_name = "TEXT_LOW_POWER_MESSAGE_001";
}
else if (message_id == TXT_POWER_TESLA) {
localized_text_name = "TEXT_LOW_POWER_MESSAGE_002";
}
else if (message_id == TXT_POWER_AAGUN) {
localized_text_name = "TEXT_LOW_POWER_MESSAGE_003";
}
else {
if (MessagesSent.find(message_id) != MessagesSent.end()) {
return;
}
MessagesSent.insert(message_id);
localized_text_name = "TEXT_RA_TUTORIAL_MESSAGE_";
localized_text_name += std::to_string(message_id);
}
p_msg = localized_text_name.c_str();
Sound_Effect(VOC_INCOMING_MESSAGE);
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_MESSAGE;
new_event.Message.Message = p_msg;
new_event.Message.TimeoutSeconds = timeout_seconds;
new_event.Message.MessageType = message_type;
new_event.Message.MessageParam1 = message_id;
new_event.GlyphXPlayerID = 0;
if (player_ptr != NULL)
{
new_event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
}
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Update_Map_Cell -- Called when an individual map cell template is updated
*
*
* History: 11/7/2019 - SKY
**************************************************************************************************/
void DLLExportClass::On_Update_Map_Cell(int cell_x, int cell_y, const char* template_type_name)
{
if (EventCallback == NULL)
{
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_UPDATE_MAP_CELL;
new_event.UpdateMapCell.CellX = cell_x;
new_event.UpdateMapCell.CellY = cell_y;
strncpy(new_event.UpdateMapCell.TemplateTypeName, template_type_name, 32);
new_event.UpdateMapCell.TemplateTypeName[31] = '\0';
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Special_Weapon_Targetting -- Called when the server initiates targetting
*
*
* History: 11/19/2019 - SKY
**************************************************************************************************/
void DLLExportClass::On_Special_Weapon_Targetting(const HouseClass* player_ptr, SpecialWeaponType weapon_type)
{
if (EventCallback == NULL)
{
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_SPECIAL_WEAPON_TARGETTING;
new_event.SpecialWeaponTargetting.Type = RTTI_SPECIAL;
new_event.SpecialWeaponTargetting.ID = weapon_type;
Convert_Special_Weapon_Type(weapon_type, new_event.SpecialWeaponTargetting.WeaponType, new_event.SpecialWeaponTargetting.Name);
new_event.GlyphXPlayerID = 0;
if (player_ptr != NULL)
{
new_event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
}
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Ping -- Called when a radar ping is needed
*
*
* History: 05/15/2019 - SKY
**************************************************************************************************/
void DLLExportClass::On_Ping(const HouseClass* player_ptr, COORDINATE coord)
{
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_PING;
new_event.Ping.CoordX = Coord_X(coord);
new_event.Ping.CoordY = Coord_Y(coord);
new_event.GlyphXPlayerID = 0;
if (player_ptr != NULL)
{
new_event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
}
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Game_Over -- Called when the C&C campaign game finishes
*
*
* History: 6/19/2019 - LLL
**************************************************************************************************/
void DLLExportClass::On_Game_Over(uint64 glyphx_Player_id, bool player_wins)
{
if (EventCallback == NULL) {
return;
}
GameOver = true;
SaveTanya = IsTanyaDead;
Scen.CarryOverTimer = Scen.MissionTimer;
// int timer = Scen.MissionTimer;
Scen.CarryOverMoney = PlayerPtr->Credits;
DLLExportClass::Store_Carryover_Objects();
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_GAME_OVER;
new_event.GlyphXPlayerID = glyphx_Player_id;
new_event.GameOver.PlayerWins = player_wins;
new_event.GameOver.AfterScoreMovieName = "";
new_event.GameOver.Multiplayer = false;
new_event.GameOver.MultiPlayerTotalPlayers = 0;
Calculate_Single_Player_Score(new_event);
VQType movie = player_wins ? Scen.WinMovie : Scen.LoseMovie;
if (movie > VQ_NONE && movie < VQ_COUNT) {
new_event.GameOver.MovieName = VQName[movie];
} else {
new_event.GameOver.MovieName = "";
}
movie = player_wins ? Scen.WinMovie2 : VQ_NONE;
if (movie > VQ_NONE && movie < VQ_COUNT) {
new_event.GameOver.MovieName2 = VQName[movie];
}
else {
new_event.GameOver.MovieName2 = "";
}
movie = player_wins ? Scen.WinMovie3 : VQ_NONE;
if (movie > VQ_NONE && movie < VQ_COUNT) {
new_event.GameOver.MovieName3 = VQName[movie];
}
else {
new_event.GameOver.MovieName3 = "";
}
movie = player_wins ? Scen.WinMovie4 : VQ_NONE;
if (movie > VQ_NONE && movie < VQ_COUNT) {
new_event.GameOver.MovieName4 = VQName[movie];
}
else {
new_event.GameOver.MovieName4 = "";
}
//Campaign win & credits
if (Scen.IsEndOfGame) {
if (PlayerPtr->ActLike == HOUSE_USSR) {
new_event.GameOver.AfterScoreMovieName = VQName[VQ_SOVFINAL];
}
else {
new_event.GameOver.AfterScoreMovieName = VQName[VQ_ALLYEND];
}
}
new_event.GameOver.SabotagedStructureType = -1;
new_event.GameOver.TimerRemaining = Scen.MissionTimer.Was_Started() ? Scen.MissionTimer.Value() : -1;
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Multiplayer_Game_Over -- Called when the C&C multiplayer game finishes
*
*
* History: 6/19/2019 - LLL
* History: 10/31/2019 - MBL - Adding the multi-player score stats support for debrief
**************************************************************************************************/
void DLLExportClass::On_Multiplayer_Game_Over(void)
{
if (EventCallback == NULL) {
return;
}
GameOver = true;
EventCallbackStruct event;
event.EventType = CALLBACK_EVENT_GAME_OVER;
// Includes AI's for skirmish
int player_count = Session.Players.Count();
// Multiplayer players data for debrief stats
event.GameOver.Multiplayer = true;
event.GameOver.MultiPlayerTotalPlayers = player_count;
for ( int player_index = 0; player_index < player_count; player_index ++ )
{
HouseClass* player_ptr = HouseClass::As_Pointer(Session.Players[ player_index ]->Player.ID);
if ( player_ptr != NULL )
{
HousesType player_house = PlayerPtr->Class->House;
int uspoints = 0;
for (HousesType hous = HOUSE_SPAIN; hous <= HOUSE_BAD; hous++) {
HouseClass* hows = HouseClass::As_Pointer(hous);
if (player_ptr->Is_Ally(hous)) {
uspoints += hows->PointTotal;
}
}
// if(uspoints < 0) uspoints = 0;
// uspoints += 1000; //BG 1000 bonus points for winning mission
// N/A for multi-player
#if 0
// Bias the base score upward according to the difficulty level.
switch (PlayerPtr->Difficulty) {
case DIFF_EASY:
uspoints += 500;
break;
case DIFF_NORMAL:
uspoints += 1500;
break;
case DIFF_HARD:
uspoints += 3500;
break;
}
#endif
int leadership = RA_Calculate_Leadership( player_ptr->Class->House, player_ptr->UnitsLost, player_ptr->BuildingsLost );
int economy = RA_Calculate_Economy( player_ptr->Available_Money(), player_ptr->StolenBuildingsCredits, player_ptr->HarvestedCredits, player_ptr->Control.InitialCredits );
int total_score = RA_Calculate_Score( uspoints, leadership, economy );
int units_killed = 0;
int structures_killed = 0;
for ( unsigned int house_index = 0; house_index < HOUSE_COUNT; house_index ++ )
{
units_killed += player_ptr->UnitsKilled[ house_index ];
structures_killed += player_ptr->BuildingsKilled[ house_index ];
}
// Populate and copy the multiplayer player data structure
GameOverMultiPlayerStatsStruct multi_player_data;
multi_player_data.GlyphXPlayerID = Get_GlyphX_Player_ID( player_ptr );
multi_player_data.IsHuman = (player_ptr->IsHuman || player_ptr->WasHuman);
multi_player_data.WasHuman = player_ptr->WasHuman;
multi_player_data.IsWinner = !player_ptr->IsDefeated;
multi_player_data.Efficiency = economy;
multi_player_data.Score = total_score;
multi_player_data.ResourcesGathered = player_ptr->HarvestedCredits;
multi_player_data.TotalUnitsKilled = units_killed;
multi_player_data.TotalStructuresKilled = structures_killed;
if ( player_index < GAME_OVER_MULTIPLAYER_MAX_PLAYERS_TRACKED )
{
event.GameOver.MultiPlayerPlayersData[ player_index ] = multi_player_data;
}
}
}
for ( int player_index = player_count; player_index < GAME_OVER_MULTIPLAYER_MAX_PLAYERS_TRACKED; player_index ++ )
{
memset( &event.GameOver.MultiPlayerPlayersData[ player_index ], 0, sizeof( GameOverMultiPlayerStatsStruct ) );
}
// Single-player N/A stuff
event.GameOver.MovieName = "";
event.GameOver.MovieName2 = "";
event.GameOver.MovieName3 = "";
event.GameOver.MovieName4 = "";
event.GameOver.AfterScoreMovieName = "";
event.GameOver.Leadership = 0;
event.GameOver.Efficiency = 0;
event.GameOver.Score = 0;
event.GameOver.NODKilled = 0;
event.GameOver.GDIKilled = 0;
event.GameOver.CiviliansKilled = 0;
event.GameOver.NODBuildingsDestroyed = 0;
event.GameOver.GDIBuildingsDestroyed = 0;
event.GameOver.CiviliansBuildingsDestroyed = 0;
event.GameOver.RemainingCredits = 0;
event.GameOver.SabotagedStructureType = 0;
event.GameOver.TimerRemaining = -1;
// Trigger an event for each human player, winner first (even if it's an AI)
for (int i = 0; i < player_count; i++) {
HouseClass *player_ptr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
if (!player_ptr->IsDefeated) {
event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
event.GameOver.IsHuman = player_ptr->IsHuman;
event.GameOver.PlayerWins = true;
event.GameOver.RemainingCredits = player_ptr->Available_Money();
EventCallback(event);
}
}
for (int i = 0; i < player_count; i++) {
HouseClass *player_ptr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
if (player_ptr->IsHuman && player_ptr->IsDefeated) {
event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
event.GameOver.IsHuman = true;
event.GameOver.PlayerWins = false;
event.GameOver.RemainingCredits = player_ptr->Available_Money();
EventCallback(event);
}
}
}
/**************************************************************************************************
* DLLExportClass::On_Achievement -- Called when something achievement-related happens
*
* In: Type of achievement, reason this happened
*
* Out:
*
*
*
* History: 11/11/2019 11:37AM - ST
**************************************************************************************************/
void DLLExportClass::On_Achievement(const HouseClass* player_ptr, const char *achievement_type, const char *achievement_reason)
{
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_ACHIEVEMENT;
new_event.Achievement.AchievementType = achievement_type;
new_event.Achievement.AchievementReason = achievement_reason;
new_event.GlyphXPlayerID = 0;
if (player_ptr != NULL) {
new_event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
}
EventCallback(new_event);
}
void DLLExportClass::On_Center_Camera(const HouseClass* player_ptr, int coord_x, int coord_y)
{
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_CENTER_CAMERA;
new_event.CenterCamera.CoordX = coord_x;
new_event.CenterCamera.CoordY = coord_y;
new_event.GlyphXPlayerID = 0;
if (player_ptr != NULL) {
new_event.GlyphXPlayerID = Get_GlyphX_Player_ID(player_ptr);
}
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::On_Debug_Output -- Called when C&C wants to print debug output
*
* In: String to print to GlyphX log system
*
* Out:
*
*
*
* History: 2/20/2019 2:39PM - ST
**************************************************************************************************/
void DLLExportClass::On_Debug_Output(const char *debug_text)
{
if (EventCallback == NULL) {
return;
}
EventCallbackStruct new_event;
new_event.EventType = CALLBACK_EVENT_DEBUG_PRINT;
new_event.DebugPrint.PrintString = debug_text;
EventCallback(new_event);
}
/**************************************************************************************************
* DLLExportClass::Force_Human_Team_Wins
*
* History: 3/10/2020 - LL
**************************************************************************************************/
void DLLExportClass::Force_Human_Team_Wins(uint64 quitting_player_id)
{
int winning_team = -1;
//Find the first human's multiplayer team.
for (int i = 0; i < Session.Players.Count(); i++)
{
if (GlyphxPlayerIDs[i] != quitting_player_id) {
HousesType house_type = Session.Players[i]->Player.ID;
HouseClass* house_class = HouseClass::As_Pointer(house_type);
if (house_class && house_class->IsHuman && !house_class->IsDefeated) {
winning_team = MPlayerTeamIDs[i];
break;
}
}
}
//Mark all players not on that team as defeated.
for (int i = 0; i < Session.Players.Count(); i++)
{
HousesType house_type = Session.Players[i]->Player.ID;
HouseClass* house_class = HouseClass::As_Pointer(house_type);
if (house_class) {
house_class->IsDefeated = MPlayerTeamIDs[i] != winning_team;
}
}
PlayerWins = true;
}
/**************************************************************************************************
* CNC_Get_Game_State -- Get game state
*
* In: Type of state requested
* Player perspective
* Buffer to contain game state
* Size of buffer
*
* Out: Game state returned in buffer
*
*
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) bool __cdecl CNC_Get_Game_State(GameStateRequestEnum state_type, uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
bool got_state = false;
switch (state_type) {
case GAME_STATE_LAYERS:
{
got_state = DLLExportClass::Get_Layer_State(player_id, buffer_in, buffer_size);
break;
}
case GAME_STATE_SIDEBAR:
{
got_state = DLLExportClass::Get_Sidebar_State(player_id, buffer_in, buffer_size);
break;
}
case GAME_STATE_PLACEMENT:
{
got_state = DLLExportClass::Get_Placement_State(player_id, buffer_in, buffer_size);
break;
}
case GAME_STATE_DYNAMIC_MAP:
got_state = DLLExportClass::Get_Dynamic_Map_State(player_id, buffer_in, buffer_size);
break;
case GAME_STATE_SHROUD:
got_state = DLLExportClass::Get_Shroud_State(player_id, buffer_in, buffer_size);
break;
case GAME_STATE_OCCUPIER:
got_state = DLLExportClass::Get_Occupier_State(player_id, buffer_in, buffer_size);
break;
case GAME_STATE_PLAYER_INFO:
got_state = DLLExportClass::Get_Player_Info_State(player_id, buffer_in, buffer_size);
break;
case GAME_STATE_STATIC_MAP:
{
if (buffer_size < sizeof(CNCMapDataStruct)) {
got_state = false;
break;
}
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_width = Map.MapCellWidth;
int map_cell_height = Map.MapCellHeight;
CNCMapDataStruct *map_data = (CNCMapDataStruct *)buffer_in;
map_data->OriginalMapCellX = map_cell_x;
map_data->OriginalMapCellY = map_cell_y;
map_data->OriginalMapCellWidth = map_cell_width;
map_data->OriginalMapCellHeight = map_cell_height;
if (map_cell_x > 0) {
map_cell_x--;
map_cell_width++;
}
if (map_cell_width < MAP_MAX_CELL_WIDTH) {
map_cell_width++;
}
if (map_cell_y > 0) {
map_cell_y--;
map_cell_height++;
}
if (map_cell_height < MAP_MAX_CELL_HEIGHT) {
map_cell_height++;
}
map_data->MapCellX = map_cell_x;
map_data->MapCellY = map_cell_y;
map_data->MapCellWidth = map_cell_width;
map_data->MapCellHeight = map_cell_height;
map_data->Theater = (CnCTheaterType) Scen.Theater;
char* dot_ptr = strchr(Scen.ScenarioName, '.');
const int count = (dot_ptr != nullptr) ? (dot_ptr - Scen.ScenarioName) : sizeof(Scen.ScenarioName);
memset(map_data->ScenarioName, 0, sizeof(map_data->ScenarioName));
strncpy(map_data->ScenarioName, Scen.ScenarioName, min(sizeof(map_data->ScenarioName) - 1, count));
int cell_index = 0;
char cell_name[_MAX_PATH];
char icon_number[32];
for (int y = 0 ; y < map_cell_height ; y++) {
for (int x = 0 ; x < map_cell_width ; x++) {
CELL cell = XY_Cell(map_cell_x+x, map_cell_y+y);
CellClass * cellptr = &Map[cell];
cell_name[0] = 0;
int icon = 0;
void *image_data = 0;
if (cellptr->Get_Template_Info(cell_name, icon, image_data)) {
itoa(icon, icon_number, 10);
strncat(cell_name, "_i", 32);
strncat(cell_name, icon_number, 32);
strncat(cell_name, ".tga", 32);
CNCStaticCellStruct &cell_info = map_data->StaticCells[cell_index++];
strncpy(cell_info.TemplateTypeName, cell_name, 32);
cell_info.IconNumber = icon;
}
}
}
got_state = true;
break;
}
default:
{
got_state = false;
break;
}
}
return got_state;
}
/**************************************************************************************************
* CNC_Handle_Game_Request
*
* Callback for when the requested movie is done playing.
*
* 7/23/2019 - LLL
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Game_Request(GameRequestEnum request_type)
{
switch (request_type)
{
case INPUT_GAME_MOVIE_DONE:
break;
}
}
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Game_Settings_Request(int health_bar_display_mode, int resource_bar_display_mode)
{
if (!DLLExportClass::Legacy_Render_Enabled()) {
return;
}
RulesClass::eHealthBarDisplayMode new_hb_mode = (RulesClass::eHealthBarDisplayMode)health_bar_display_mode;
if (new_hb_mode != Rule.HealthBarDisplayMode) {
Rule.HealthBarDisplayMode = new_hb_mode;
Map.Flag_To_Redraw(true);
}
RulesClass::eResourceBarDisplayMode new_rb_mode = (RulesClass::eResourceBarDisplayMode)resource_bar_display_mode;
if (new_rb_mode != Rule.ResourceBarDisplayMode) {
Rule.ResourceBarDisplayMode = new_rb_mode;
Map.Flag_To_Redraw(true);
}
}
void DLL_Draw_Intercept(int shape_number, int x, int y, int width, int height, int flags, const ObjectClass *object, DirType rotation, long scale, const char *shape_file_name, char override_owner)
{
DLLExportClass::DLL_Draw_Intercept(shape_number, x, y, width, height, flags, object, rotation, scale, shape_file_name, override_owner);
}
void DLL_Draw_Pip_Intercept(const ObjectClass* object, int pip)
{
DLLExportClass::DLL_Draw_Pip_Intercept(object, pip);
}
void DLLExportClass::DLL_Draw_Intercept(int shape_number, int x, int y, int width, int height, int flags, const ObjectClass *object, DirType rotation, long scale, const char *shape_file_name, char override_owner)
{
CNCObjectStruct& new_object = ObjectList->Objects[TotalObjectCount + CurrentDrawCount];
Convert_Type(object, new_object);
if (new_object.Type == UNKNOWN) {
return;
}
CNCObjectStruct* base_object = NULL;
char sub_object = 0;
for (int i = 0; i < CurrentDrawCount; ++i) {
CNCObjectStruct& draw_object = ObjectList->Objects[TotalObjectCount + i];
if (draw_object.CNCInternalObjectPointer == object) {
if (base_object == NULL) {
base_object = &draw_object;
}
sub_object++;
}
}
new_object.CNCInternalObjectPointer = (void*)object;
new_object.OccupyListLength = 0;
new_object.SortOrder = SortOrder++;
strncpy(new_object.TypeName, object->Class_Of().IniName, CNC_OBJECT_ASSET_NAME_LENGTH);
if (shape_file_name != NULL) {
strncpy(new_object.AssetName, shape_file_name, CNC_OBJECT_ASSET_NAME_LENGTH);
}
else {
strncpy(new_object.AssetName, object->Class_Of().Graphic_Name(), CNC_OBJECT_ASSET_NAME_LENGTH);
}
new_object.Owner = (base_object != NULL) ? ((override_owner != HOUSE_NONE) ? override_owner : base_object->Owner) : (char)object->Owner();
HouseClass* owner_house = nullptr;
for (int i = 0; i < Houses.Count(); ++i) {
HouseClass* hptr = Houses.Ptr(i);
if ((hptr != nullptr) && (hptr->Class->House == new_object.Owner)) {
owner_house = hptr;
break;
}
}
new_object.RemapColor = (owner_house != nullptr) ? owner_house->RemapColor : -1;
if (base_object == NULL) {
CNCObjectStruct& root_object = ObjectList->Objects[TotalObjectCount];
if (new_object.Type == BUILDING) {
BuildingClass *building = (BuildingClass*)object;
if (building->BState == BSTATE_CONSTRUCTION) {
strncat(new_object.AssetName, "MAKE", CNC_OBJECT_ASSET_NAME_LENGTH);
}
const BuildingTypeClass *building_type = building->Class;
short const *occupy_list = building_type->Occupy_List();
if (occupy_list) {
while (*occupy_list != REFRESH_EOL && new_object.OccupyListLength < MAX_OCCUPY_CELLS) {
new_object.OccupyList[new_object.OccupyListLength] = *occupy_list;
new_object.OccupyListLength++;
occupy_list++;
}
}
}
COORDINATE coord = object->Render_Coord();
CELL cell = Coord_Cell(coord);
int dimx, dimy;
object->Class_Of().Dimensions(dimx, dimy);
new_object.PositionX = x;
new_object.PositionY = y;
new_object.Width = width;
new_object.Height = height;
new_object.Altitude = object->Height;
new_object.DrawFlags = flags;
new_object.SubObject = 0;
new_object.ShapeIndex = (unsigned short)shape_number;
new_object.IsTheaterSpecific = IsTheaterShape;
new_object.Rotation = (unsigned char)rotation;
new_object.Scale = scale;
new_object.FlashingFlags = 0;
new_object.Cloak = (CurrentDrawCount > 0) ? root_object.Cloak : UNCLOAKED;
new_object.VisibleFlags = CNCObjectStruct::VISIBLE_FLAGS_ALL;
new_object.SpiedByFlags = 0U;
new_object.IsSelectable = object->Class_Of().IsSelectable;
new_object.IsSelectedMask = object->IsSelectedMask;
new_object.MaxStrength = object->Class_Of().MaxStrength;
new_object.Strength = object->Strength;
new_object.CellX = (CurrentDrawCount > 0) ? root_object.CellX : Cell_X(cell);
new_object.CellY = (CurrentDrawCount > 0) ? root_object.CellY : Cell_Y(cell);
new_object.CenterCoordX = Coord_X(object->Center_Coord());
new_object.CenterCoordY = Coord_Y(object->Center_Coord());
new_object.DimensionX = dimx;
new_object.DimensionY = dimy;
new_object.SimLeptonX = (CurrentDrawCount > 0) ? root_object.SimLeptonX : 0;
new_object.SimLeptonY = (CurrentDrawCount > 0) ? root_object.SimLeptonY : 0;
new_object.BaseObjectID = ((CurrentDrawCount > 0) && (root_object.Type != BUILDING) && (root_object.Type != VESSEL)) ? root_object.ID : 0;
new_object.BaseObjectType = ((CurrentDrawCount > 0) && (root_object.Type != BUILDING) && (root_object.Type != VESSEL)) ? root_object.Type : UNKNOWN;
new_object.NumLines = 0;
new_object.RecentlyCreated = object->IsRecentlyCreated;
new_object.NumPips = 0;
new_object.MaxPips = 0;
new_object.CanDemolish = object->Can_Demolish();
new_object.CanDemolishUnit = object->Can_Demolish_Unit();
new_object.CanRepair = object->Can_Repair();
memset(new_object.CanMove, false, sizeof(new_object.CanMove));
memset(new_object.CanFire, false, sizeof(new_object.CanFire));
memset(new_object.ActionWithSelected, DAT_NONE, sizeof(new_object.ActionWithSelected));
HouseClass* old_player_ptr = PlayerPtr;
for (int i = 0; i < Houses.Count(); ++i) {
HouseClass* hptr = Houses.Ptr(i);
if ((hptr != nullptr) && hptr->IsActive && hptr->IsHuman) {
HousesType house = hptr->Class->House;
DynamicVectorClass<ObjectClass*>& selected_objects = CurrentObject.Raw(house);
if (selected_objects.Count() > 0) {
Logic_Switch_Player_Context(hptr);
Convert_Action_Type(Best_Object_Action(selected_objects, object), (selected_objects.Count() == 1) ? selected_objects[0] : NULL, object->As_Target(), new_object.ActionWithSelected[house]);
}
}
}
Logic_Switch_Player_Context(old_player_ptr);
RTTIType what_is_object = object->What_Am_I();
new_object.IsRepairing = false;
new_object.IsDumping = false;
new_object.IsALoaner = false;
new_object.IsFactory = false;
new_object.IsPrimaryFactory = false;
new_object.IsNominal = false;
new_object.IsDog = false;
new_object.IsIronCurtain = false;
new_object.IsAntiGround = false;
new_object.IsAntiAircraft = false;
new_object.IsSubSurface = false;
new_object.IsFake = false;
new_object.ProductionAssetName[0] = '\0';
new_object.OverrideDisplayName = "\0";
bool is_building = what_is_object == RTTI_BUILDING;
if (is_building) {
const BuildingClass* building = static_cast<const BuildingClass*>(object);
new_object.IsRepairing = building->IsRepairing;
new_object.IsFactory = building->Class->Is_Factory();
new_object.IsPrimaryFactory = building->IsLeader;
new_object.IsFake = building->Class->IsFake;
}
if (object->Is_Techno()) {
const TechnoClass* techno_object = static_cast<const TechnoClass*>(object);
const TechnoTypeClass *ttype = techno_object->Techno_Type_Class();
new_object.MaxSpeed = (unsigned char)ttype->MaxSpeed;
new_object.IsALoaner = techno_object->IsALoaner;
new_object.IsNominal = ttype->IsNominal;
new_object.MaxPips = ttype->Max_Pips();
new_object.IsAntiGround = (ttype->PrimaryWeapon != NULL) && (ttype->PrimaryWeapon->Bullet != NULL) && ttype->PrimaryWeapon->Bullet->IsAntiGround;
new_object.IsAntiAircraft = (ttype->PrimaryWeapon != NULL) && (ttype->PrimaryWeapon->Bullet != NULL) && ttype->PrimaryWeapon->Bullet->IsAntiAircraft;
new_object.IsSubSurface = (ttype->PrimaryWeapon != NULL) && (ttype->PrimaryWeapon->Bullet != NULL) && ttype->PrimaryWeapon->Bullet->IsSubSurface;
new_object.IsIronCurtain = techno_object->IronCurtainCountDown > 0;
int full_name = techno_object->Full_Name();
if (full_name < 0)
{
new_object.OverrideDisplayName = Text_String(full_name);
}
HouseClass* old_player_ptr = PlayerPtr;
for (int i = 0; i < Houses.Count(); ++i) {
HouseClass* hptr = Houses.Ptr(i);
if ((hptr != nullptr) && hptr->IsActive && hptr->IsHuman) {
Logic_Switch_Player_Context(hptr);
HousesType house = hptr->Class->House;
new_object.CanMove[house] = techno_object->Can_Player_Move();
new_object.CanFire[house] = techno_object->Can_Player_Fire();
}
}
Logic_Switch_Player_Context(old_player_ptr);
}
new_object.ControlGroup = (unsigned char)(-1);
new_object.IsInFormation = false;
new_object.CanPlaceBombs = false;
if (object->Is_Foot()) {
const FootClass* foot = static_cast<const FootClass*>(object);
new_object.ControlGroup = foot->Group;
new_object.IsInFormation = foot->XFormOffset != 0x80000000UL;
}
bool is_infantry = what_is_object == RTTI_INFANTRY;
if (is_infantry) {
const InfantryClass* infantry = static_cast<const InfantryClass*>(object);
new_object.IsDog = infantry->Class->IsDog;
new_object.CanPlaceBombs = infantry->Class->IsBomber;
}
new_object.CanHarvest = false;
bool is_unit = what_is_object == RTTI_UNIT;
if (is_unit) {
const UnitClass* unit = static_cast<const UnitClass*>(object);
if (unit->Class->Type == UNIT_HARVESTER)
{
new_object.CanHarvest = true;
}
new_object.IsDumping = unit->IsDumping;
}
new_object.IsFixedWingedAircraft = false;
bool is_aircraft = what_is_object == RTTI_AIRCRAFT;
if (is_aircraft) {
const AircraftClass* aircraft = static_cast<const AircraftClass*>(object);;
new_object.IsFixedWingedAircraft = aircraft->Class->IsFixedWing;
}
switch (what_is_object)
{
case RTTI_INFANTRY:
case RTTI_INFANTRYTYPE:
case RTTI_UNIT:
case RTTI_UNITTYPE:
case RTTI_AIRCRAFT:
case RTTI_AIRCRAFTTYPE:
case RTTI_BUILDING:
case RTTI_BUILDINGTYPE:
case RTTI_VESSEL:
case RTTI_VESSELTYPE:
{
const TechnoClass* techno_object = static_cast<const TechnoClass*>(object);
new_object.FlashingFlags = techno_object->Get_Flashing_Flags();
new_object.Cloak = techno_object->Cloak;
new_object.SpiedByFlags = techno_object->Spied_By();
if (techno_object->Techno_Type_Class()->IsInvisible) {
// Hide for enemy players
HouseClass* owner = HouseClass::As_Pointer(object->Owner());
if (owner != nullptr) {
for (int i = 0; i < Houses.Count(); ++i) {
HouseClass* hptr = Houses.Ptr(i);
if ((hptr != nullptr) && hptr->IsActive && !owner->Is_Ally(hptr)) {
new_object.VisibleFlags &= ~(1 << hptr->Class->House);
}
}
}
}
}
break;
case RTTI_ANIM:
case RTTI_ANIMTYPE:
{
const AnimClass* anim_object = static_cast<const AnimClass*>(object);
new_object.Owner = anim_object->OwnerHouse;
new_object.RemapColor = -1;
new_object.VisibleFlags = anim_object->Get_Visible_Flags();
const AnimTypeClass& anim_type = static_cast<const AnimTypeClass&>(anim_object->Class_Of());
if (anim_type.VirtualName != NULL) {
strncpy(new_object.AssetName, anim_type.VirtualName, CNC_OBJECT_ASSET_NAME_LENGTH);
}
}
break;
case RTTI_TERRAIN:
case RTTI_TERRAINTYPE:
{
if (strncmp(new_object.AssetName, "MINE", CNC_OBJECT_ASSET_NAME_LENGTH) == 0) {
strncpy(new_object.AssetName, "OREMINE", CNC_OBJECT_ASSET_NAME_LENGTH);
}
}
break;
}
}
else {
new_object.MaxStrength = 0;
new_object.MaxSpeed = 0;
new_object.Strength = 0;
new_object.CellX = base_object->CellX;
new_object.CellY = base_object->CellY;
new_object.CenterCoordX = base_object->CenterCoordX;
new_object.CenterCoordY = base_object->CenterCoordY;
new_object.DimensionX = base_object->DimensionX;
new_object.DimensionY = base_object->DimensionY;
new_object.IsSelectable = false;
new_object.IsSelectedMask = 0U;
new_object.SimLeptonX = base_object->SimLeptonX;
new_object.SimLeptonY = base_object->SimLeptonY;
new_object.PositionX = x;
new_object.PositionY = y;
new_object.Width = width;
new_object.Height = height;
new_object.Altitude = base_object->Altitude;
new_object.DrawFlags = flags;
new_object.ShapeIndex = (unsigned short)shape_number;
new_object.IsTheaterSpecific = IsTheaterShape;
new_object.Rotation = (unsigned char)rotation;
new_object.Scale = scale;
new_object.SubObject = sub_object;
new_object.BaseObjectID = base_object->ID;
new_object.BaseObjectType = base_object->Type;
new_object.FlashingFlags = base_object->FlashingFlags;
new_object.Cloak = base_object->Cloak;
new_object.OccupyListLength = 0;
new_object.NumPips = 0;
new_object.MaxPips = 0;
new_object.NumLines = 0;
new_object.IsRepairing = false;
new_object.IsDumping = false;
new_object.IsALoaner = base_object->IsALoaner;
new_object.CanDemolish = base_object->CanDemolish;
new_object.CanDemolishUnit = base_object->CanDemolishUnit;
new_object.CanRepair = base_object->CanRepair;
new_object.RecentlyCreated = base_object->RecentlyCreated;
new_object.IsFactory = base_object->IsFactory;
new_object.IsPrimaryFactory = base_object->IsPrimaryFactory;
new_object.IsAntiGround = base_object->IsAntiGround;
new_object.IsAntiAircraft = base_object->IsAntiAircraft;
new_object.IsSubSurface = base_object->IsSubSurface;
new_object.IsNominal = base_object->IsNominal;
new_object.IsDog = base_object->IsDog;
new_object.IsIronCurtain = base_object->IsIronCurtain;
new_object.IsInFormation = false;
new_object.CanHarvest = base_object->CanHarvest;
new_object.CanPlaceBombs = base_object->CanPlaceBombs;
new_object.ControlGroup = base_object->ControlGroup;
new_object.VisibleFlags = base_object->VisibleFlags;
new_object.SpiedByFlags = base_object->SpiedByFlags;
new_object.IsFixedWingedAircraft = base_object->IsFixedWingedAircraft;
new_object.IsFake = base_object->IsFake;
new_object.ProductionAssetName[0] = '\0';
new_object.OverrideDisplayName = "\0";
memset(new_object.CanMove, false, sizeof(new_object.CanMove));
memset(new_object.CanFire, false, sizeof(new_object.CanFire));
memset(new_object.ActionWithSelected, DAT_NONE, sizeof(new_object.ActionWithSelected));
}
CurrentDrawCount++;
}
void DLLExportClass::DLL_Draw_Pip_Intercept(const ObjectClass* object, int pip)
{
CNCObjectStruct* base_object = NULL;
for (int i = 0; i < CurrentDrawCount; ++i) {
CNCObjectStruct& draw_object = ObjectList->Objects[TotalObjectCount + i];
if (draw_object.CNCInternalObjectPointer == object) {
base_object = &draw_object;
break;
}
}
if ((base_object != NULL) && (base_object->NumPips < MAX_OBJECT_PIPS)) {
base_object->Pips[base_object->NumPips] = pip;
base_object->NumPips++;
base_object->MaxPips = max(base_object->MaxPips, base_object->NumPips);
}
}
/**************************************************************************************************
* DLLExportClass::Get_Layer_State -- Get game objects from the layers
*
* In:
*
* Out:
*
*
*
* History: 1/29/2019 11:37AM - ST
**************************************************************************************************/
bool DLLExportClass::Get_Layer_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
player_id;
static int _export_count = 0;
bool got_state = false;
ObjectList = (CNCObjectListStruct*) buffer_in;
TotalObjectCount = 0;
/*
** Get a reference draw coordinate for cells
*/
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
if (map_cell_x > 0) {
map_cell_x--;
}
if (map_cell_y > 0) {
map_cell_y--;
}
SortOrder = 0;
/*
** Get the ground layer first and then followed by all the layers in increasing altitude.
*/
for (int layer = 0; layer < DLL_LAYER_COUNT; layer++) {
for (int index = 0; index < Map.Layer[layer].Count(); index++) {
ObjectClass *object = Map.Layer[layer][index];
if (object->IsActive) {
unsigned int memory_needed = sizeof(CNCObjectListStruct);
memory_needed += (TotalObjectCount + 10) * sizeof(CNCObjectStruct);
if (memory_needed >= buffer_size) {
return false;
}
if (object->Is_Techno()) {
/*
** Skip units tethered to buildings, since the building will draw them itself
*/
TechnoClass* techno_object = static_cast<TechnoClass*>(object);
TechnoClass* contact_object = techno_object->In_Radio_Contact() ? techno_object->Contact_With_Whom() : nullptr;
if ((object->What_Am_I() != RTTI_BUILDING) && (contact_object != nullptr) && (contact_object->What_Am_I() == RTTI_BUILDING) && contact_object->IsTethered && *((BuildingClass*)contact_object) == STRUCT_WEAP) {
continue;
}
/*
** Skip units tethered to vessels, since the vessel will draw them itself
*/
if ((contact_object != nullptr) && (contact_object->What_Am_I() == RTTI_VESSEL) && !contact_object->Is_Door_Closed() && contact_object->IsTethered && !techno_object->IsInLimbo) {
continue;
}
}
if (Debug_Map || Debug_Unshroud || (object->IsDown && !object->IsInLimbo)) {
int x, y;
Map.Coord_To_Pixel(object->Render_Coord(), x, y);
/*
** Call to Draw_It can result in multiple callbacks to the draw intercept
*/
CurrentDrawCount = 0;
object->Draw_It(x, y, WINDOW_VIRTUAL);
/*
** If the root object is a factory, then the last base object is the object in production (rendered after infiltrated buildings when selected).
** The root object is updated with the production asset name, but otherwise a separate object isn't created.
** This only occurs in skirmish and multiplayer.
*/
if ((GAME_TO_PLAY != GAME_NORMAL) && (CurrentDrawCount > 0)) {
CNCObjectStruct& root_object = ObjectList->Objects[TotalObjectCount];
if (root_object.IsFactory) {
BuildingClass* building = (BuildingClass*)root_object.CNCInternalObjectPointer;
FactoryClass* factory = building->House->IsHuman ? building->House->Fetch_Factory(building->Class->ToBuild) : building->Factory;
if (factory != nullptr) {
for (int i = CurrentDrawCount - 1; i > 0; --i) {
CNCObjectStruct& base_object = ObjectList->Objects[TotalObjectCount + i];
if (base_object.SubObject) {
continue;
}
strncpy(root_object.ProductionAssetName, base_object.TypeName, CNC_OBJECT_ASSET_NAME_LENGTH);
void* production_object = base_object.CNCInternalObjectPointer;
int new_draw_count = i;
for (int j = i + 1; j < CurrentDrawCount; ++j) {
CNCObjectStruct& cnc_object = ObjectList->Objects[TotalObjectCount + j];
if (cnc_object.CNCInternalObjectPointer != production_object) {
memcpy(ObjectList->Objects + TotalObjectCount + new_draw_count, &cnc_object, sizeof(CNCObjectStruct));
new_draw_count++;
}
}
memset(ObjectList->Objects + TotalObjectCount + new_draw_count, 0, (CurrentDrawCount - new_draw_count) * sizeof(CNCObjectStruct));
CurrentDrawCount = new_draw_count;
break;
}
}
}
}
/*
** Shadows need to be rendered before the base object so they appear underneath,
** even though they get drawn as sub-objects (after the base object)
*/
for (int i = 1; i < CurrentDrawCount; ++i) {
CNCObjectStruct& sub_object = ObjectList->Objects[TotalObjectCount + i];
if (!sub_object.SubObject) {
continue;
}
static const int shadow_flags = SHAPE_PREDATOR | SHAPE_FADING;
if (((sub_object.DrawFlags & shadow_flags) == shadow_flags) || (strncmp(sub_object.AssetName, "WAKE", CNC_OBJECT_ASSET_NAME_LENGTH) == 0)) {
if ((strncmp(sub_object.AssetName, "RROTOR", CNC_OBJECT_ASSET_NAME_LENGTH) != 0) &&
(strncmp(sub_object.AssetName, "LROTOR", CNC_OBJECT_ASSET_NAME_LENGTH) != 0)) {
for (int j = i - 1; j >= 0; --j) {
CNCObjectStruct& base_object = ObjectList->Objects[TotalObjectCount + j];
if (!base_object.SubObject && (base_object.CNCInternalObjectPointer == sub_object.CNCInternalObjectPointer)) {
int sort_order = base_object.SortOrder;
base_object.SortOrder = sub_object.SortOrder;
sub_object.SortOrder = sort_order;
break;
}
}
}
}
}
TotalObjectCount += CurrentDrawCount;
}
}
}
}
ObjectList->Count = TotalObjectCount;
if (ObjectList->Count) {
_export_count++;
return true;
}
return false;
}
void DLLExportClass::Convert_Type(const ObjectClass *object, CNCObjectStruct &object_out)
{
object_out.Type = UNKNOWN;
object_out.ID = -1;
if (object == NULL) {
return;
}
RTTIType type = object->What_Am_I();
switch (type) {
default:
break;
case RTTI_VESSEL:
object_out.Type = VESSEL;
object_out.ID = Vessels.ID((VesselClass*)object);
break;
case RTTI_INFANTRY:
object_out.Type = INFANTRY;
object_out.ID = Infantry.ID((InfantryClass*)object);
break;
case RTTI_UNIT:
object_out.Type = UNIT;
object_out.ID = Units.ID((UnitClass*)object);
break;
case RTTI_AIRCRAFT:
object_out.Type = AIRCRAFT;
object_out.ID = Aircraft.ID((AircraftClass*)object);
break;
case RTTI_BUILDING:
object_out.Type = BUILDING;
object_out.ID = Buildings.ID((BuildingClass*)object);
break;
case RTTI_BULLET:
object_out.Type = BULLET;
object_out.ID = Bullets.ID((BulletClass*)object);
break;
case RTTI_ANIM:
object_out.Type = ANIM;
object_out.ID = Anims.ID((AnimClass*)object);
break;
case RTTI_SMUDGE:
object_out.Type = SMUDGE;
object_out.ID = Smudges.ID((SmudgeClass*)object);
break;
case RTTI_TERRAIN:
object_out.Type = TERRAIN;
object_out.ID = Terrains.ID((TerrainClass*)object);
break;
}
}
/**************************************************************************************************
* CNC_Handle_Input -- Process input to the game
*
* In:
*
*
*
*
* Out: Game state returned in buffer
*
*
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Input(InputRequestEnum input_event, unsigned char special_key_flags, uint64 player_id, int x1, int y1, int x2, int y2)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
switch (input_event) {
/*
** Special keys have changed
*/
case INPUT_REQUEST_SPECIAL_KEYS:
{
DLLExportClass::Set_Special_Key_Flags(special_key_flags);
break;
}
/*
** The mouse is moving
*/
case INPUT_REQUEST_MOUSE_MOVE:
{
if (!DLLExportClass::Legacy_Render_Enabled()) {
break;
}
DLLForceMouseX = x1;
DLLForceMouseY = y1;
KEYBOARD->MouseQX = x1;
KEYBOARD->MouseQY = y1;
COORDINATE coord = Map.Pixel_To_Coord(x1, y1);
CELL cell = Coord_Cell(coord);
if (coord) {
//x -= Map.TacPixelX;
//y -= Map.TacPixelY;
/*
** Cause any displayed cursor to move along with the mouse cursor.
*/
if (cell != Map.ZoneCell) {
Map.Set_Cursor_Pos(cell);
}
}
break;
}
/*
** Player left-clicked
*/
case INPUT_REQUEST_MOUSE_LEFT_CLICK:
{
DLLExportClass::Adjust_Internal_View();
DLLForceMouseX = x1;
DLLForceMouseY = y1;
KEYBOARD->MouseQX = x1;
KEYBOARD->MouseQY = y1;
KeyNumType key = (KeyNumType)(KN_LMOUSE | KN_RLSE_BIT);
if (Map.Pixel_To_Coord(x1, y1)) {
//DisplayClass::TacButton.Clicked_On(key, GadgetClass::LEFTRELEASE, x1, y1);
DisplayClass::TacButton.Clicked_On(key, GadgetClass::LEFTRELEASE, 100, 100);
}
break;
}
/*
** Player right-clicked (on up)
*/
case INPUT_REQUEST_MOUSE_RIGHT_CLICK:
{
DLLExportClass::Adjust_Internal_View();
DLLForceMouseX = x1;
DLLForceMouseY = y1;
KEYBOARD->MouseQX = x1;
KEYBOARD->MouseQY = y1;
KeyNumType key = (KeyNumType)(KN_RMOUSE | KN_RLSE_BIT);
if (Map.Pixel_To_Coord(x1, y1)) {
//DisplayClass::TacButton.Clicked_On(key, GadgetClass::RIGHTRELEASE, x1, y1);
DisplayClass::TacButton.Clicked_On(key, GadgetClass::RIGHTRELEASE, 100, 100);
}
break;
}
/*
** Player right button down
*/
case INPUT_REQUEST_MOUSE_RIGHT_DOWN:
{
DLLExportClass::Adjust_Internal_View();
DLLForceMouseX = x1;
DLLForceMouseY = y1;
KEYBOARD->MouseQX = x1;
KEYBOARD->MouseQY = y1;
KeyNumType key = (KeyNumType)(KN_RMOUSE);
if (Map.Pixel_To_Coord(x1, y1)) {
//DisplayClass::TacButton.Clicked_On(key, GadgetClass::RIGHTPRESS, x1, y1);
DisplayClass::TacButton.Clicked_On(key, GadgetClass::RIGHTPRESS, 100, 100);
}
break;
}
/*
** Player drag selected
*/
case INPUT_REQUEST_MOUSE_AREA:
{
DLLExportClass::Adjust_Internal_View();
Map.Select_These(XYP_Coord(x1, y1), XYP_Coord(x2, y2), false);
break;
}
case INPUT_REQUEST_MOUSE_AREA_ADDITIVE:
{
DLLExportClass::Adjust_Internal_View();
Map.Select_These(XYP_Coord(x1, y1), XYP_Coord(x2, y2), true);
break;
}
case INPUT_REQUEST_SELL_AT_POSITION:
{
DLLExportClass::Adjust_Internal_View();
DLLForceMouseX = x1;
DLLForceMouseY = y1;
KEYBOARD->MouseQX = x1;
KEYBOARD->MouseQY = y1;
COORDINATE coord = Map.Pixel_To_Coord(x1, y1);
CELL cell = Coord_Cell(coord);
PlayerPtr->Sell_Wall(cell);
break;
}
case INPUT_REQUEST_SELECT_AT_POSITION:
{
DLLExportClass::Adjust_Internal_View();
DLLForceMouseX = x1;
DLLForceMouseY = y1;
Keyboard->MouseQX = x1;
Keyboard->MouseQY = y1;
COORDINATE coord = Map.Pixel_To_Coord(x1, y1);
CELL cell = Coord_Cell(coord);
if (Map.Pixel_To_Coord(x1, y1))
{
KeyNumType key = (KeyNumType)(KN_LMOUSE | KN_RLSE_BIT);
DisplayClass::TacButton.Selection_At_Mouse(GadgetClass::LEFTRELEASE, key);
}
break;
}
case INPUT_REQUEST_COMMAND_AT_POSITION:
{
DLLExportClass::Adjust_Internal_View();
DLLForceMouseX = x1;
DLLForceMouseY = y1;
Keyboard->MouseQX = x1;
Keyboard->MouseQY = y1;
COORDINATE coord = Map.Pixel_To_Coord(x1, y1);
CELL cell = Coord_Cell(coord);
if (Map.Pixel_To_Coord(x1, y1))
{
KeyNumType key = (KeyNumType)(KN_LMOUSE | KN_RLSE_BIT);
DisplayClass::TacButton.Command_Object(GadgetClass::LEFTRELEASE, key);
}
break;
}
default:
break;
}
}
/**************************************************************************************************
* CNC_Handle_Structure_Request -- Process requests to repair and sell structures.
*
* In:
*
*
* Out:
*
*
*
* History: 4/29/2019 - LLL
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Structure_Request(StructureRequestEnum request_type, uint64 player_id, int object_id)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
switch (request_type)
{
case INPUT_STRUCTURE_REPAIR_START:
DLLExportClass::Repair_Mode(player_id);
break;
case INPUT_STRUCTURE_REPAIR:
DLLExportClass::Repair(player_id, object_id);
break;
case INPUT_STRUCTURE_SELL_START:
DLLExportClass::Sell_Mode(player_id);
break;
case INPUT_STRUCTURE_SELL:
DLLExportClass::Sell(player_id, object_id);
break;
case INPUT_STRUCTURE_CANCEL:
DLLExportClass::Repair_Sell_Cancel(player_id);
break;
default:
break;
}
}
/**************************************************************************************************
* CNC_Handle_Unit_Request -- Process requests on selected units.
*
* In:
*
*
* Out:
*
*
*
* History: 10/15/2019 - SKY
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Unit_Request(UnitRequestEnum request_type, uint64 player_id)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
switch (request_type)
{
case INPUT_UNIT_SCATTER:
DLLExportClass::Scatter_Selected(player_id);
break;
case INPUT_UNIT_SELECT_NEXT:
DLLExportClass::Select_Next_Unit(player_id);
break;
case INPUT_UNIT_SELECT_PREVIOUS:
DLLExportClass::Select_Previous_Unit(player_id);
break;
case INPUT_UNIT_GUARD_MODE:
DLLExportClass::Selected_Guard_Mode(player_id);
break;
case INPUT_UNIT_STOP:
DLLExportClass::Selected_Stop(player_id);
break;
case INPUT_UNIT_FORMATION_TOGGLE:
DLLExportClass::Team_Units_Formation_Toggle_On(player_id);
break;
case INPUT_UNIT_QUEUED_MOVEMENT_ON:
// Red Alert Only
DLLExportClass::Units_Queued_Movement_Toggle(player_id, true);
break;
case INPUT_UNIT_QUEUED_MOVEMENT_OFF:
// Red Alert Only
DLLExportClass::Units_Queued_Movement_Toggle(player_id, false);
break;
default:
break;
}
}
/**************************************************************************************************
* CNC_Handle_Sidebar_Request -- Process an input request to the sidebar
*
* In:
*
*
* Out:
*
*
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Sidebar_Request(SidebarRequestEnum request_type, uint64 player_id, int buildable_type, int buildable_id, short cell_x, short cell_y)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
switch (request_type) {
// MBL 06.02.2020 - Changing right-click support for first put building on hold, and then subsequenct right-clicks to decrement that queue count for 1x or 5x; Then, 1x or 5x Left click will resume from hold
// Handle and fall through to start construction (from hold state) below
case SIDEBAR_REQUEST_START_CONSTRUCTION_MULTI:
case SIDEBAR_REQUEST_START_CONSTRUCTION:
DLLExportClass::Start_Construction(player_id, buildable_type, buildable_id);
break;
case SIDEBAR_REQUEST_HOLD_CONSTRUCTION:
DLLExportClass::Hold_Construction(player_id, buildable_type, buildable_id);
break;
case SIDEBAR_REQUEST_CANCEL_CONSTRUCTION:
DLLExportClass::Cancel_Construction(player_id, buildable_type, buildable_id);
break;
case SIDEBAR_REQUEST_START_PLACEMENT:
DLLExportClass::Start_Placement(player_id, buildable_type, buildable_id);
break;
case SIDEBAR_REQUEST_PLACE:
DLLExportClass::Place(player_id, buildable_type, buildable_id, cell_x, cell_y);
break;
case SIDEBAR_CANCEL_PLACE:
DLLExportClass::Cancel_Placement(player_id, buildable_type, buildable_id);
break;
default:
break;
}
}
/**************************************************************************************************
* CNC_Handle_SuperWeapon_Request
*
* In:
*
*
* Out:
*
*
*
* History:
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_SuperWeapon_Request(SuperWeaponRequestEnum request_type, uint64 player_id, int buildable_type, int buildable_id, int x1, int y1)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
switch (request_type)
{
case SUPERWEAPON_REQUEST_PLACE_SUPER_WEAPON:
DLLExportClass::Place_Super_Weapon(player_id, buildable_type, buildable_id, x1, y1);
break;
}
}
/**************************************************************************************************
* CNC_Handle_ControlGroup_Request
*
* In:
*
*
* Out:
*
*
*
* History:
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_ControlGroup_Request(ControlGroupRequestEnum request_type, uint64 player_id, unsigned char control_group_index)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
switch (request_type)
{
case CONTROL_GROUP_REQUEST_CREATE:
DLLExportClass::Create_Control_Group(control_group_index);
break;
case CONTROL_GROUP_REQUEST_TOGGLE:
DLLExportClass::Toggle_Control_Group_Selection(control_group_index);
break;
case CONTROL_GROUP_REQUEST_ADDITIVE_SELECTION:
DLLExportClass::Add_To_Control_Group(control_group_index);
break;
}
}
/**************************************************************************************************
* DLLExportClass::Get_Layer_State -- Get a snapshot of the sidebar state
*
* In:
*
* Out:
*
*
*
* History: 1/29/2019 11:37AM - ST
**************************************************************************************************/
bool DLLExportClass::Get_Sidebar_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
CNCSidebarStruct *sidebar = (CNCSidebarStruct*) buffer_in;
unsigned int memory_needed = sizeof(*sidebar); // Base amount needed. Will need more depending on how many entries there are
int entry_index = 0;
sidebar->Credits = 0;
sidebar->CreditsCounter = 0;
sidebar->Tiberium = 0;
sidebar->MaxTiberium = 0;
sidebar->PowerProduced = 0;
sidebar->PowerDrained = 0;
sidebar->RepairBtnEnabled = false;
sidebar->SellBtnEnabled = false;
sidebar->RadarMapActive = false;
sidebar->MissionTimer = Scen.MissionTimer.Is_Active() ? (Scen.MissionTimer / TICKS_PER_SECOND) : -1;
sidebar->UnitsKilled = 0;
sidebar->BuildingsKilled = 0;
sidebar->UnitsLost = 0;
sidebar->BuildingsLost = 0;
sidebar->TotalHarvestedCredits = 0;
if (PlayerPtr) {
sidebar->Credits = PlayerPtr->Credits;
sidebar->CreditsCounter = PlayerPtr->VisibleCredits.Current; // Timed display
// sidebar->CreditsCounter = PlayerPtr->VisibleCredits.Credits; // Actual
sidebar->Tiberium = PlayerPtr->Tiberium;
sidebar->MaxTiberium = PlayerPtr->Capacity;
sidebar->PowerProduced = PlayerPtr->Power;
sidebar->PowerDrained = PlayerPtr->Drain;
sidebar->RepairBtnEnabled = PlayerPtr->BScan > 0;
sidebar->SellBtnEnabled = PlayerPtr->BScan > 0;
sidebar->RadarMapActive = PlayerPtr->Radar == RADAR_ON;
// A. Get the DestroyedBuildings and DestroyedInfantry stats if they are available at this point
if (PlayerPtr->DestroyedBuildings) {
for ( int index = 0; index < PlayerPtr->DestroyedBuildings->Get_Unit_Count(); index ++ )
{
unsigned int count = (unsigned int) PlayerPtr->DestroyedBuildings->Get_Unit_Total( index );
sidebar->BuildingsKilled += count;
}
}
if (PlayerPtr->DestroyedInfantry) {
for ( int index = 0; index < PlayerPtr->DestroyedInfantry->Get_Unit_Count(); index ++ )
{
unsigned int count = (unsigned int) PlayerPtr->DestroyedInfantry->Get_Unit_Total( index );
sidebar->UnitsKilled += count; // Includes Infantry, Vehicles, Aircraft
}
}
if (PlayerPtr->DestroyedUnits) {
for ( int index = 0; index < PlayerPtr->DestroyedUnits->Get_Unit_Count(); index ++ )
{
unsigned int count = (unsigned int) PlayerPtr->DestroyedUnits->Get_Unit_Total( index );
sidebar->UnitsKilled += count; // Includes Infantry, Vehicles, Aircraft
}
}
if (PlayerPtr->DestroyedAircraft) {
for ( int index = 0; index < PlayerPtr->DestroyedAircraft->Get_Unit_Count(); index ++ )
{
unsigned int count = (unsigned int) PlayerPtr->DestroyedAircraft->Get_Unit_Total( index );
sidebar->UnitsKilled += count; // Includes Infantry, Vehicles, Aircraft
}
}
// B. If the DestroyedBuildings and DestroyedInfantry stats seemed to be unvailable, this is another way to do it
// Note that we need to do both of these depending on which type of match we are running, as well as for Replays/Observer and live stats reporting
// We can't just do it this way for everything, as it does not work for all cases
if (sidebar->BuildingsKilled == 0)
{
for (unsigned int house_index = 0; house_index < HOUSE_COUNT; house_index ++)
{
sidebar->BuildingsKilled += PlayerPtr->BuildingsKilled[ house_index ];
}
}
if (sidebar->UnitsKilled == 0)
{
for (unsigned int house_index = 0; house_index < HOUSE_COUNT; house_index ++)
{
sidebar->UnitsKilled += PlayerPtr->UnitsKilled[ house_index ]; // Includes Infantry, Vehicles, Aircraft
}
}
sidebar->UnitsLost = PlayerPtr->UnitsLost;
sidebar->BuildingsLost = PlayerPtr->BuildingsLost;
sidebar->TotalHarvestedCredits = PlayerPtr->HarvestedCredits;
}
if (GAME_TO_PLAY == GAME_NORMAL) {
/*
** Get each sidebar column
*/
for (int c = 0 ; c < 2 ; c++) {
sidebar->EntryCount[c] = Map.Column[c].BuildableCount;
/*
** Each production slot in the column
*/
for (int b=0 ; b < Map.Column[c].BuildableCount ; b++) {
CNCSidebarEntryStruct &sidebar_entry = sidebar->Entries[entry_index++];
if ((entry_index + 1) * sizeof(CNCSidebarEntryStruct) + memory_needed > buffer_size) {
return false;
}
sidebar_entry.AssetName[0] = 0;
sidebar_entry.Type = UNKNOWN;
sidebar_entry.BuildableID = Map.Column[c].Buildables[b].BuildableID;
sidebar_entry.BuildableType = Map.Column[c].Buildables[b].BuildableType;
sidebar_entry.BuildableViaCapture = Map.Column[c].Buildables[b].BuildableViaCapture;
sidebar_entry.Fake = false;
TechnoTypeClass const * tech = Fetch_Techno_Type(Map.Column[c].Buildables[b].BuildableType, Map.Column[c].Buildables[b].BuildableID);
sidebar_entry.SuperWeaponType = SW_NONE;
if (tech) {
sidebar_entry.Cost = tech->Cost * PlayerPtr->CostBias;
sidebar_entry.PowerProvided = 0;
sidebar_entry.BuildTime = tech->Time_To_Build(PlayerPtr->Class->House); // sidebar_entry.BuildTime = tech->Time_To_Build() / 60;
strncpy(sidebar_entry.AssetName, tech->IniName, CNC_OBJECT_ASSET_NAME_LENGTH);
} else {
sidebar_entry.Cost = 0;
sidebar_entry.AssetName[0] = 0;
}
SuperClass* super_weapon = nullptr;
bool isbusy = false;
switch (Map.Column[c].Buildables[b].BuildableType) {
case RTTI_INFANTRYTYPE:
sidebar_entry.Type = INFANTRY_TYPE;
isbusy = (PlayerPtr->InfantryFactory != -1);
isbusy |= Infantry.Avail() <= 0;
break;
case RTTI_UNITTYPE:
isbusy = (PlayerPtr->UnitFactory != -1);
isbusy |= Units.Avail() <= 0;
sidebar_entry.Type = UNIT_TYPE;
break;
case RTTI_AIRCRAFTTYPE:
isbusy = (PlayerPtr->AircraftFactory != -1);
isbusy |= Aircraft.Avail() <= 0;
sidebar_entry.Type = AIRCRAFT_TYPE;
break;
case RTTI_BUILDINGTYPE:
{
isbusy = (PlayerPtr->BuildingFactory != -1);
isbusy |= Buildings.Avail() <= 0;
sidebar_entry.Type = BUILDING_TYPE;
const BuildingTypeClass* build_type = static_cast<const BuildingTypeClass*>(tech);
sidebar_entry.PowerProvided = build_type->Power - build_type->Drain;
sidebar_entry.Fake = build_type->IsFake;
}
break;
case RTTI_VESSELTYPE:
sidebar_entry.Type = VESSEL_TYPE;
isbusy = (PlayerPtr->VesselFactory != -1);
isbusy |= Vessels.Avail() <= 0;
break;
default:
sidebar_entry.Type = UNKNOWN;
break;
case RTTI_SPECIAL:
Fill_Sidebar_Entry_From_Special_Weapon(sidebar_entry, super_weapon, (SpecialWeaponType)Map.Column[c].Buildables[b].BuildableID);
break;
}
if (super_weapon != nullptr)
{
sidebar_entry.Progress = (float)super_weapon->Anim_Stage() / (float)SuperClass::ANIMATION_STAGES;
sidebar_entry.Completed = super_weapon->Is_Ready();
sidebar_entry.Constructing = super_weapon->Anim_Stage() != SuperClass::ANIMATION_STAGES;
sidebar_entry.ConstructionOnHold = false;
sidebar_entry.PlacementListLength = 0;
sidebar_entry.PowerProvided = 0;
sidebar_entry.BuildTime = super_weapon->Get_Recharge_Time();
}
else
{
int fnumber = Map.Column[c].Buildables[b].Factory;
FactoryClass * factory = NULL;
if (tech && fnumber != -1) {
factory = Factories.Raw_Ptr(fnumber);
}
sidebar_entry.Completed = false;
sidebar_entry.Constructing = false;
sidebar_entry.ConstructionOnHold = false;
sidebar_entry.Progress = 0.0f;
sidebar_entry.Busy = isbusy;
sidebar_entry.PlacementListLength = 0;
if (factory) {
if (factory->Is_Building()) {
sidebar_entry.Constructing = true;
sidebar_entry.Progress = (float)factory->Completion() / (float)FactoryClass::STEP_COUNT;
sidebar_entry.Completed = factory->Has_Completed();
}
else {
sidebar_entry.Completed = factory->Has_Completed();
if (!sidebar_entry.Completed)
{
sidebar_entry.ConstructionOnHold = true;
sidebar_entry.Progress = (float)factory->Completion() / (float)FactoryClass::STEP_COUNT;
}
if (sidebar_entry.Completed && sidebar_entry.Type == BUILDING_TYPE) {
if (tech) {
BuildingTypeClass *building_type = (BuildingTypeClass*)tech;
short const *occupy_list = building_type->Occupy_List(true);
if (occupy_list) {
while (*occupy_list != REFRESH_EOL && sidebar_entry.PlacementListLength < MAX_OCCUPY_CELLS) {
sidebar_entry.PlacementList[sidebar_entry.PlacementListLength] = *occupy_list;
sidebar_entry.PlacementListLength++;
occupy_list++;
}
}
}
}
}
}
}
}
}
} else {
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER) {
SidebarGlyphxClass *context_sidebar = DLLExportClass::Get_Current_Context_Sidebar();
/*
** Get each sidebar column
*/
for (int c = 0 ; c < 2 ; c++) {
sidebar->EntryCount[c] = context_sidebar->Column[c].BuildableCount;
/*
** Each production slot in the column
*/
for (int b=0 ; b < context_sidebar->Column[c].BuildableCount ; b++) {
CNCSidebarEntryStruct &sidebar_entry = sidebar->Entries[entry_index++];
if ((entry_index + 1) * sizeof(CNCSidebarEntryStruct) + memory_needed > buffer_size) {
return false;
}
sidebar_entry.AssetName[0] = 0;
sidebar_entry.Type = UNKNOWN;
sidebar_entry.BuildableID = context_sidebar->Column[c].Buildables[b].BuildableID;
sidebar_entry.BuildableType = context_sidebar->Column[c].Buildables[b].BuildableType;
sidebar_entry.BuildableViaCapture = context_sidebar->Column[c].Buildables[b].BuildableViaCapture;
sidebar_entry.Fake = false;
TechnoTypeClass const * tech = Fetch_Techno_Type(context_sidebar->Column[c].Buildables[b].BuildableType, context_sidebar->Column[c].Buildables[b].BuildableID);
sidebar_entry.SuperWeaponType = SW_NONE;
if (tech) {
sidebar_entry.Cost = tech->Cost;
sidebar_entry.PowerProvided = 0;
sidebar_entry.BuildTime = tech->Time_To_Build(PlayerPtr->Class->House); // sidebar_entry.BuildTime = tech->Time_To_Build() / 60;
strncpy(sidebar_entry.AssetName, tech->IniName, CNC_OBJECT_ASSET_NAME_LENGTH);
} else {
sidebar_entry.Cost = 0;
sidebar_entry.AssetName[0] = 0;
}
SuperClass* super_weapon = nullptr;
bool isbusy = false;
switch (context_sidebar->Column[c].Buildables[b].BuildableType) {
case RTTI_INFANTRYTYPE:
sidebar_entry.Type = INFANTRY_TYPE;
isbusy = (PlayerPtr->InfantryFactory != -1);
isbusy |= Infantry.Avail() <= 0;
break;
case RTTI_UNITTYPE:
isbusy = (PlayerPtr->UnitFactory != -1);
isbusy |= Units.Avail() <= 0;
sidebar_entry.Type = UNIT_TYPE;
break;
case RTTI_AIRCRAFTTYPE:
isbusy = (PlayerPtr->AircraftFactory != -1);
isbusy |= Aircraft.Avail() <= 0;
sidebar_entry.Type = AIRCRAFT_TYPE;
break;
case RTTI_BUILDINGTYPE:
{
isbusy = (PlayerPtr->BuildingFactory != -1);
isbusy |= Buildings.Avail() <= 0;
sidebar_entry.Type = BUILDING_TYPE;
const BuildingTypeClass* build_type = static_cast<const BuildingTypeClass*>(tech);
sidebar_entry.PowerProvided = build_type->Power - build_type->Drain;
sidebar_entry.Fake = build_type->IsFake;
break;
}
case RTTI_VESSELTYPE:
isbusy = (PlayerPtr->VesselFactory != -1);
isbusy |= Vessels.Avail() <= 0;
sidebar_entry.Type = VESSEL_TYPE;
break;
default:
sidebar_entry.Type = UNKNOWN;
break;
case RTTI_SPECIAL:
Fill_Sidebar_Entry_From_Special_Weapon(sidebar_entry, super_weapon, (SpecialWeaponType)sidebar_entry.BuildableID);
break;
}
if (super_weapon != nullptr)
{
sidebar_entry.Progress = (float)super_weapon->Anim_Stage() / (float)SuperClass::ANIMATION_STAGES;
sidebar_entry.Completed = super_weapon->Is_Ready();
sidebar_entry.Constructing = super_weapon->Anim_Stage() != SuperClass::ANIMATION_STAGES;
sidebar_entry.ConstructionOnHold = false;
sidebar_entry.PlacementListLength = 0;
sidebar_entry.PowerProvided = 0;
sidebar_entry.BuildTime = super_weapon->Get_Recharge_Time();
}
else
{
int fnumber = context_sidebar->Column[c].Buildables[b].Factory;
FactoryClass * factory = NULL;
if (tech && fnumber != -1) {
factory = Factories.Raw_Ptr(fnumber);
}
sidebar_entry.Completed = false;
sidebar_entry.Constructing = false;
sidebar_entry.ConstructionOnHold = false;
sidebar_entry.Progress = 0.0f;
sidebar_entry.Busy = isbusy;
sidebar_entry.PlacementListLength = 0;
if (factory) {
if (factory->Is_Building()) {
sidebar_entry.Constructing = true;
sidebar_entry.Progress = (float)factory->Completion() / (float)FactoryClass::STEP_COUNT;
sidebar_entry.Completed = factory->Has_Completed();
}
else {
sidebar_entry.Completed = factory->Has_Completed();
if (!sidebar_entry.Completed)
{
sidebar_entry.ConstructionOnHold = true;
sidebar_entry.Progress = (float)factory->Completion() / (float)FactoryClass::STEP_COUNT;
}
if (sidebar_entry.Completed && sidebar_entry.Type == BUILDING_TYPE) {
if (tech) {
BuildingTypeClass *building_type = (BuildingTypeClass*)tech;
short const *occupy_list = building_type->Occupy_List(true);
if (occupy_list) {
while (*occupy_list != REFRESH_EOL && sidebar_entry.PlacementListLength < MAX_OCCUPY_CELLS) {
sidebar_entry.PlacementList[sidebar_entry.PlacementListLength] = *occupy_list;
sidebar_entry.PlacementListLength++;
occupy_list++;
}
}
}
}
}
}
}
}
}
}
}
return true;
}
void DLLExportClass::Convert_Action_Type(ActionType type, ObjectClass* object, TARGET target, DllActionTypeEnum& dll_type)
{
switch (type)
{
case ACTION_NONE:
default:
dll_type = DAT_NONE;
break;
case ACTION_MOVE:
dll_type = DAT_MOVE;
break;
case ACTION_NOMOVE:
dll_type = DAT_NOMOVE;
break;
case ACTION_ENTER:
dll_type = DAT_ENTER;
break;
case ACTION_SELF:
dll_type = DAT_SELF;
break;
case ACTION_ATTACK:
if (Target_Legal(target) && (object != NULL) && object->Is_Techno() && ((TechnoClass*)object)->In_Range(target, 0)) {
dll_type = DAT_ATTACK;
}
else {
dll_type = DAT_ATTACK_OUT_OF_RANGE;
}
break;
case ACTION_GUARD_AREA:
dll_type = DAT_GUARD;
break;
case ACTION_HARVEST:
dll_type = DAT_ATTACK;
break;
case ACTION_SELECT:
case ACTION_TOGGLE_SELECT:
dll_type = DAT_SELECT;
break;
case ACTION_CAPTURE:
dll_type = DAT_CAPTURE;
break;
case ACTION_DAMAGE:
dll_type = DAT_DAMAGE;
break;
case ACTION_SABOTAGE:
dll_type = DAT_SABOTAGE;
break;
case ACTION_HEAL:
dll_type = DAT_HEAL;
break;
case ACTION_TOGGLE_PRIMARY:
dll_type = DAT_TOGGLE_PRIMARY;
break;
case ACTION_NO_DEPLOY:
dll_type = DAT_CANT_DEPLOY;
break;
case ACTION_GREPAIR:
dll_type = DAT_REPAIR;
break;
case ACTION_NO_GREPAIR:
dll_type = DAT_CANT_REPAIR;
break;
}
}
void DLLExportClass::Convert_Special_Weapon_Type(SpecialWeaponType weapon_type, DllSuperweaponTypeEnum& dll_weapon_type, char* weapon_name)
{
switch (weapon_type)
{
case SPC_SONAR_PULSE:
dll_weapon_type = SW_SONAR_PULSE;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_SonarPulse", 16);
}
break;
case SPC_NUCLEAR_BOMB:
dll_weapon_type = SW_NUKE;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_Nuke", 16);
}
break;
case SPC_CHRONOSPHERE:
dll_weapon_type = SW_CHRONOSPHERE;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_Chrono", 16);
}
break;
case SPC_PARA_BOMB:
dll_weapon_type = SW_PARA_BOMB;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_ParaBomb", 16);
}
break;
case SPC_PARA_INFANTRY:
dll_weapon_type = SW_PARA_INFANTRY;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_ParaInfantry", 16);
}
break;
case SPC_SPY_MISSION:
dll_weapon_type = SW_SPY_MISSION;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_SpyMission", 16);
}
break;
case SPC_IRON_CURTAIN:
dll_weapon_type = SW_IRON_CURTAIN;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_IronCurtain", 16);
}
break;
case SPC_GPS:
dll_weapon_type = SW_GPS;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_GPS", 16);
}
break;
case SPC_CHRONO2:
dll_weapon_type = SW_CHRONOSPHERE_DESTINATION;
if (weapon_name != NULL)
{
strncpy(weapon_name, "SW_Chrono2", 16);
}
break;
default:
dll_weapon_type = SW_UNKNOWN;
if (weapon_name != NULL)
{
weapon_name[0] = '\0';
}
break;
}
}
void DLLExportClass::Fill_Sidebar_Entry_From_Special_Weapon(CNCSidebarEntryStruct& sidebar_entry_out, SuperClass*& super_weapon_out, SpecialWeaponType weapon_type)
{
sidebar_entry_out.Type = SPECIAL;
switch (weapon_type)
{
case SPC_SONAR_PULSE:
case SPC_NUCLEAR_BOMB:
case SPC_CHRONOSPHERE:
case SPC_PARA_BOMB:
case SPC_PARA_INFANTRY:
case SPC_SPY_MISSION:
case SPC_IRON_CURTAIN:
case SPC_GPS:
case SPC_CHRONO2:
Convert_Special_Weapon_Type(weapon_type, sidebar_entry_out.SuperWeaponType, sidebar_entry_out.AssetName);
break;
default:
sidebar_entry_out.SuperWeaponType = SW_UNKNOWN;
sidebar_entry_out.Type = UNKNOWN;
super_weapon_out = nullptr;
return;
}
super_weapon_out = &(PlayerPtr->SuperWeapon[weapon_type]);
}
static const int _map_width_shift_bits = 7;
void DLLExportClass::Calculate_Placement_Distances(BuildingTypeClass* placement_type, unsigned char* placement_distance)
{
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_width = Map.MapCellWidth;
int map_cell_height = Map.MapCellHeight;
if (map_cell_x > 0) {
map_cell_x--;
map_cell_width++;
}
if (map_cell_width < MAP_MAX_CELL_WIDTH) {
map_cell_width++;
}
if (map_cell_y > 0) {
map_cell_y--;
map_cell_height++;
}
if (map_cell_height < MAP_MAX_CELL_WIDTH) {
map_cell_height++;
}
static const FacingType _scan_facings[] = {
FACING_E,
FACING_S,
FACING_W,
FACING_N
};
memset(placement_distance, 255U, MAP_CELL_TOTAL);
for (int y = 0; y < map_cell_height; y++) {
for (int x = 0; x < map_cell_width; x++) {
CELL cell = (CELL)map_cell_x + x + ((map_cell_y + y) << _map_width_shift_bits);
BuildingClass* base = (BuildingClass*)Map[cell].Cell_Find_Object(RTTI_BUILDING);
if ((base && base->House->Class->House == PlayerPtr->Class->House && base->Class->IsBase) ||
((placement_type->IsWall || ((Map[cell].Smudge != SMUDGE_NONE) && SmudgeTypeClass::As_Reference(Map[cell].Smudge).IsBib)) &&
Map[cell].Owner == PlayerPtr->Class->House)) {
placement_distance[cell] = 0U;
CELL startcell = cell;
for (unsigned char distance = 1U; distance <= (placement_type->Adjacent + 1U); distance++) {
startcell = Adjacent_Cell(startcell, FACING_NW);
CELL scancell = startcell;
for (int i = 0; i < ARRAY_SIZE(_scan_facings); i++) {
CELL nextcell = scancell;
for (unsigned char scan = 0U; scan <= (distance * 2U); scan++) {
scancell = nextcell;
if (Map.In_Radar(scancell)) {
placement_distance[scancell] = min(placement_distance[scancell], distance);
}
nextcell = Adjacent_Cell(scancell, _scan_facings[i]);
}
}
}
}
}
}
}
void Recalculate_Placement_Distances()
{
DLLExportClass::Recalculate_Placement_Distances();
}
void DLLExportClass::Recalculate_Placement_Distances()
{
if (PlacementType[CurrentLocalPlayerIndex] != NULL) {
Calculate_Placement_Distances(PlacementType[CurrentLocalPlayerIndex], PlacementDistance[CurrentLocalPlayerIndex]);
}
}
/**************************************************************************************************
* DLLExportClass::Get_Placement_State -- Get a snapshot of legal validity of placing a structure on all map cells
*
* In:
*
* Out:
*
*
*
* History: 2/4/2019 3:11PM - ST
**************************************************************************************************/
bool DLLExportClass::Get_Placement_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
if (PlacementType[CurrentLocalPlayerIndex] == NULL) {
return false;
}
CNCPlacementInfoStruct *placement_info = (CNCPlacementInfoStruct*) buffer_in;
unsigned int memory_needed = sizeof(*placement_info); // Base amount needed. Will need more depending on how many entries there are
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_width = Map.MapCellWidth;
int map_cell_height = Map.MapCellHeight;
if (map_cell_x > 0) {
map_cell_x--;
map_cell_width++;
}
if (map_cell_width < MAP_MAX_CELL_WIDTH) {
map_cell_width++;
}
if (map_cell_y > 0) {
map_cell_y--;
map_cell_height++;
}
if (map_cell_height < MAP_MAX_CELL_WIDTH) {
map_cell_height++;
}
memory_needed += map_cell_width * map_cell_height * sizeof(CNCPlacementCellInfoStruct);
if (memory_needed + 128 >= buffer_size) {
return false;
}
placement_info->Count = map_cell_width * map_cell_height;
int index = 0;
for (int y=0 ; y < map_cell_height ; y++) {
for (int x=0 ; x < map_cell_width ; x++) {
CELL cell = (CELL) map_cell_x + x + ((map_cell_y + y) << _map_width_shift_bits);
bool pass = Passes_Proximity_Check(cell, PlacementType[CurrentLocalPlayerIndex], PlacementDistance[CurrentLocalPlayerIndex]);
CellClass * cellptr = &Map[cell];
bool clear = cellptr->Is_Clear_To_Build(PlacementType[CurrentLocalPlayerIndex]->Speed);
CNCPlacementCellInfoStruct &placement_cell_info = placement_info->CellInfo[index++];
placement_cell_info.PassesProximityCheck = pass;
placement_cell_info.GenerallyClear = clear;
}
}
Map.ZoneOffset = 0;
return true;
}
bool DLLExportClass::Passes_Proximity_Check(CELL cell_in, BuildingTypeClass *placement_type, unsigned char* placement_distance)
{
/*
** Scan through all cells that the building foundation would cover. If any adjacent
** cells to these are of friendly persuasion, then consider the proximity check to
** have been a success.
*/
short const *occupy_list = placement_type->Occupy_List(true);
while (*occupy_list != REFRESH_EOL) {
CELL center_cell = cell_in + *occupy_list++;
if (!Map.In_Radar(center_cell)) {
return false;
}
if (placement_distance[center_cell] <= (placement_type->Adjacent + 1)) {
return true;
}
}
return false;
}
/**************************************************************************************************
* DLLExportClass::Start_Construction -- Start sidebar construction
*
* In:
*
* Out:
*
*
*
* History: 1/29/2019 11:37AM - ST
**************************************************************************************************/
bool DLLExportClass::Start_Construction(uint64 player_id, int buildable_type, int buildable_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
if (GAME_TO_PLAY == GAME_NORMAL) {
return Construction_Action(SIDEBAR_REQUEST_START_CONSTRUCTION, player_id, buildable_type, buildable_id);
}
return MP_Construction_Action(SIDEBAR_REQUEST_START_CONSTRUCTION, player_id, buildable_type, buildable_id);
}
/**************************************************************************************************
* DLLExportClass::Hold_Construction -- Pause sidebar construction
*
* In:
*
* Out:
*
*
*
* History: 6/12/2019 JAS
**************************************************************************************************/
bool DLLExportClass::Hold_Construction(uint64 player_id, int buildable_type, int buildable_id)
{
if (!DLLExportClass::Set_Player_Context(player_id))
{
return false;
}
if (GAME_TO_PLAY == GAME_NORMAL) {
return Construction_Action(SIDEBAR_REQUEST_HOLD_CONSTRUCTION, player_id, buildable_type, buildable_id);
}
return MP_Construction_Action(SIDEBAR_REQUEST_HOLD_CONSTRUCTION, player_id, buildable_type, buildable_id);
}
/**************************************************************************************************
* DLLExportClass::Cancel_Construction -- Stop sidebar construction
*
* In:
*
* Out:
*
*
*
* History: 6/12/2019 JAS
**************************************************************************************************/
bool DLLExportClass::Cancel_Construction(uint64 player_id, int buildable_type, int buildable_id)
{
if (!DLLExportClass::Set_Player_Context(player_id))
{
return false;
}
return Cancel_Placement(player_id, buildable_type, buildable_id) &&
((GAME_TO_PLAY == GAME_NORMAL) ?
Construction_Action(SIDEBAR_REQUEST_CANCEL_CONSTRUCTION, player_id, buildable_type, buildable_id) :
MP_Construction_Action(SIDEBAR_REQUEST_CANCEL_CONSTRUCTION, player_id, buildable_type, buildable_id));
}
/**************************************************************************************************
* DLLExportClass::Construction_Action -- Reproduce actions on the sidebar
*
* In:
*
* Out:
*
*
*
* History: 1/29/2019 11:37AM - ST
**************************************************************************************************/
bool DLLExportClass::Construction_Action(SidebarRequestEnum construction_action, uint64 player_id, int buildable_type, int buildable_id)
{
/*
**
** Based on SidebarClass::StripClass::SelectClass::Action
**
** Most of this code is validating that the game is in the correct state to be able to act on a sidebar icon
**
*/
for (int c = 0 ; c < 2 ; c++) {
/*
** Each production slot in the column
*/
for (int b=0 ; b < Map.Column[c].BuildableCount ; b++) {
if (Map.Column[c].Buildables[b].BuildableID == buildable_id) {
if (Map.Column[c].Buildables[b].BuildableType == buildable_type) {
int fnumber = Map.Column[c].Buildables[b].Factory;
int spc = 0;
ObjectTypeClass const * choice = NULL;
if (buildable_type != RTTI_SPECIAL) {
choice = Fetch_Techno_Type((RTTIType)buildable_type, buildable_id);
} else {
spc = buildable_id;
}
FactoryClass * factory = PlayerPtr->Fetch_Factory((RTTIType)buildable_type);
if (fnumber != -1) {
factory = Factories.Raw_Ptr(fnumber);
}
if (spc == 0 && choice) {
if (fnumber == -1 && factory != NULL) {
return(false);
}
if (factory) {
switch (construction_action)
{
case SIDEBAR_REQUEST_CANCEL_CONSTRUCTION:
On_Speech(PlayerPtr, VOX_CANCELED); // Speak(VOX_CANCELED);
OutList.Add(EventClass(EventClass::ABANDON, (RTTIType)buildable_type, buildable_id));
break;
case SIDEBAR_REQUEST_HOLD_CONSTRUCTION:
if (factory->Is_Building())
{
On_Speech(PlayerPtr, VOX_SUSPENDED); // Speak(VOX_SUSPENDED);
OutList.Add(EventClass(EventClass::SUSPEND, (RTTIType)buildable_type, buildable_id));
}
break;
default:
/*
** If this object is currently being built, then give a scold sound and text and then
** bail.
*/
if (factory->Is_Building()) {
On_Speech(PlayerPtr, VOX_NO_FACTORY); //Speak(VOX_NO_FACTORY); // "Cannot Comply"
return false;
}
else {
/*
** If production has completed, then attempt to have the object exit
** the factory or go into placement mode.
*/
if (factory->Has_Completed()) {
TechnoClass * pending = factory->Get_Object();
if (!pending && factory->Get_Special_Item()) {
// TO_DO
//Map.IsTargettingMode = true;
}
else {
BuildingClass * builder = pending->Who_Can_Build_Me(false, false);
if (!builder) {
OutList.Add(EventClass(EventClass::ABANDON, (RTTIType)buildable_type, buildable_id));
On_Speech(PlayerPtr, VOX_NO_FACTORY); //Speak(VOX_NO_FACTORY); // "Cannot Comply"
}
else {
/*
** If the completed object is a building, then change the
** game state into building placement mode. This fact is
** not transmitted to any linked computers until the moment
** the building is actually placed down.
*/
if (pending->What_Am_I() == RTTI_BUILDING) {
if (construction_action == SIDEBAR_REQUEST_START_PLACEMENT) {
PlayerPtr->Manual_Place(builder, (BuildingClass *)pending);
}
}
else {
/*
** For objects that can leave the factory under their own
** power, queue this event and process through normal house
** production channels.
*/
//OutList.Add(EventClass(EventClass::PLACE, otype, -1));
}
}
}
}
else {
/*
** The factory must have been in a suspended state. Resume construction
** normally.
*/
if (construction_action == SIDEBAR_REQUEST_START_CONSTRUCTION) {
if ((RTTIType)buildable_type == RTTI_INFANTRYTYPE)
{
On_Speech(PlayerPtr, VOX_TRAINING); // Speak(VOX_TRAINING);
}
else
{
On_Speech(PlayerPtr, VOX_BUILDING); // Speak(VOX_BUILDING);
}
OutList.Add(EventClass(EventClass::PRODUCE, (RTTIType)buildable_type, buildable_id));
return true;
}
}
}
}
} else {
switch (construction_action)
{
case SIDEBAR_REQUEST_CANCEL_CONSTRUCTION:
case SIDEBAR_REQUEST_HOLD_CONSTRUCTION:
break;
default:
/*
** If this side strip is already busy with production, then ignore the
** input and announce this fact.
*/
if ((RTTIType)buildable_type == RTTI_INFANTRYTYPE)
{
On_Speech(PlayerPtr, VOX_TRAINING); // Speak(VOX_TRAINING);
}
else
{
On_Speech(PlayerPtr, VOX_BUILDING); // Speak(VOX_BUILDING);
}
OutList.Add(EventClass(EventClass::PRODUCE, (RTTIType)buildable_type, buildable_id));
/*
** Execute immediately so we get the sidebar feedback
*/
Queue_AI();
return true;
}
}
}
}
}
}
}
return false;
}
/**************************************************************************************************
* DLLExportClass::MP_Construction_Action -- Reproduce actions on the sidebar
*
* In:
*
* Out:
*
*
*
* History: 3/26/2019 1:02PM - ST
**************************************************************************************************/
bool DLLExportClass::MP_Construction_Action(SidebarRequestEnum construction_action, uint64 player_id, int buildable_type, int buildable_id)
{
/*
**
** Based on SidebarClass::StripClass::SelectClass::Action
**
** Most of this code is validating that the game is in the correct state to be able to act on a sidebar icon
**
*/
SidebarGlyphxClass *context_sidebar = DLLExportClass::Get_Current_Context_Sidebar();
for (int c = 0 ; c < 2 ; c++) {
/*
** Each production slot in the column
*/
for (int b=0 ; b < context_sidebar->Column[c].BuildableCount ; b++) {
if (context_sidebar->Column[c].Buildables[b].BuildableID == buildable_id) {
if (context_sidebar->Column[c].Buildables[b].BuildableType == buildable_type) {
int genfactory = -1;
switch (buildable_type) {
case RTTI_INFANTRYTYPE:
genfactory = PlayerPtr->InfantryFactory;
break;
case RTTI_UNITTYPE:
genfactory = PlayerPtr->UnitFactory;
break;
case RTTI_AIRCRAFTTYPE:
genfactory = PlayerPtr->AircraftFactory;
break;
case RTTI_BUILDINGTYPE:
genfactory = PlayerPtr->BuildingFactory;
break;
default:
genfactory = -1;
break;
}
int fnumber = context_sidebar->Column[c].Buildables[b].Factory;
int spc = 0;
ObjectTypeClass const * choice = NULL;
if (buildable_type != RTTI_SPECIAL) {
choice = Fetch_Techno_Type((RTTIType)buildable_type, buildable_id);
} else {
spc = buildable_id;
}
FactoryClass * factory = NULL;
if (fnumber != -1) {
factory = Factories.Raw_Ptr(fnumber);
}
if (spc == 0 && choice) {
/*
** If there is already a factory attached to this strip but the player didn't click
** on the icon that has the attached factory, then say that the factory is busy and
** ignore the click.
*/
if (fnumber == -1 && genfactory != -1) {
On_Speech(PlayerPtr, VOX_NO_FACTORY); //Speak(VOX_NO_FACTORY); // "Cannot Comply"
return(false);
}
if (factory) {
switch (construction_action)
{
case SIDEBAR_REQUEST_CANCEL_CONSTRUCTION:
On_Speech(PlayerPtr, VOX_CANCELED); // Speak(VOX_CANCELED);
OutList.Add(EventClass(EventClass::ABANDON, (RTTIType)buildable_type, buildable_id));
break;
case SIDEBAR_REQUEST_HOLD_CONSTRUCTION:
if (factory->Is_Building())
{
On_Speech(PlayerPtr, VOX_SUSPENDED); // Speak(VOX_SUSPENDED);
OutList.Add(EventClass(EventClass::SUSPEND, (RTTIType)buildable_type, buildable_id));
}
break;
default:
/*
** If this object is currently being built, then give a scold sound and text and then
** bail.
*/
if (factory->Is_Building()) {
On_Speech(PlayerPtr, VOX_NO_FACTORY); //Speak(VOX_NO_FACTORY); // "Cannot Comply"
return false;
}
else {
/*
** If production has completed, then attempt to have the object exit
** the factory or go into placement mode.
*/
if (factory->Has_Completed()) {
TechnoClass * pending = factory->Get_Object();
if (!pending && factory->Get_Special_Item()) {
// TO_DO
//Map.IsTargettingMode = true;
}
else {
BuildingClass * builder = pending->Who_Can_Build_Me(false, false);
if (!builder) {
On_Speech(PlayerPtr, VOX_NO_FACTORY); //Speak(VOX_NO_FACTORY); // "Cannot Comply"
OutList.Add(EventClass(EventClass::ABANDON, (RTTIType)buildable_type, buildable_id));
//Speak(VOX_NO_FACTORY);
}
else {
/*
** If the completed object is a building, then change the
** game state into building placement mode. This fact is
** not transmitted to any linked computers until the moment
** the building is actually placed down.
*/
if (pending->What_Am_I() == RTTI_BUILDING) {
if (construction_action == SIDEBAR_REQUEST_START_PLACEMENT) {
if (DLLExportClass::Legacy_Render_Enabled()) {
PlayerPtr->Manual_Place(builder, (BuildingClass *)pending);
} else {
Unselect_All();
}
}
}
else {
/*
** For objects that can leave the factory under their own
** power, queue this event and process through normal house
** production channels.
*/
//OutList.Add(EventClass(EventClass::PLACE, otype, -1));
}
}
}
}
else {
/*
** The factory must have been in a suspended state. Resume construction
** normally.
*/
if (construction_action == SIDEBAR_REQUEST_START_CONSTRUCTION) {
if ((RTTIType)buildable_type == RTTI_INFANTRYTYPE)
{
On_Speech(PlayerPtr, VOX_TRAINING); // Speak(VOX_TRAINING);
}
else
{
On_Speech(PlayerPtr, VOX_BUILDING); // Speak(VOX_BUILDING);
}
OutList.Add(EventClass(EventClass::PRODUCE, (RTTIType)buildable_type, buildable_id));
return true;
}
}
}
break;
}
} else {
switch (construction_action)
{
case SIDEBAR_REQUEST_CANCEL_CONSTRUCTION:
case SIDEBAR_REQUEST_HOLD_CONSTRUCTION:
break;
default:
/*
**
*/
if ((RTTIType)buildable_type == RTTI_INFANTRYTYPE)
{
On_Speech(PlayerPtr, VOX_TRAINING); // Speak(VOX_TRAINING);
}
else
{
On_Speech(PlayerPtr, VOX_BUILDING); // Speak(VOX_BUILDING);
}
OutList.Add(EventClass(EventClass::PRODUCE, (RTTIType)buildable_type, buildable_id));
/*
** Execute immediately so we get the sidebar feedback
*/
DLLExportClass::Glyphx_Queue_AI();
return true;
}
}
}
}
}
}
}
return false;
}
/**************************************************************************************************
* DLLExportClass::Start_Placement -- Start placing a completed structure
*
* In:
*
* Out:
*
*
*
* History: 1/29/2019 11:37AM - ST
**************************************************************************************************/
bool DLLExportClass::Start_Placement(uint64 player_id, int buildable_type, int buildable_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
BuildingClass *building = Get_Pending_Placement_Object(player_id, buildable_type, buildable_id);
if (building) {
TechnoTypeClass const * tech = Fetch_Techno_Type((RTTIType)buildable_type, buildable_id);
if (tech) {
BuildingTypeClass *building_type = (BuildingTypeClass*) tech;
//short const *occupy_list = building_type->Get_Occupy_List(true);
PlacementType[CurrentLocalPlayerIndex] = building_type;
Recalculate_Placement_Distances();
if (GAME_TO_PLAY == GAME_NORMAL) {
return Construction_Action(SIDEBAR_REQUEST_START_PLACEMENT, player_id, buildable_type, buildable_id);
}
return MP_Construction_Action(SIDEBAR_REQUEST_START_PLACEMENT, player_id, buildable_type, buildable_id);
}
}
return true;
}
/**************************************************************************************************
* DLLExportClass::Cancel_Placement -- Cancel placing a completed structure
*
* In:
*
* Out:
*
*
*
* History: 2/7/2019 10:52AM - ST
**************************************************************************************************/
bool DLLExportClass::Cancel_Placement(uint64 player_id, int buildable_type, int buildable_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
PlacementType[CurrentLocalPlayerIndex] = NULL;
Map.PendingObjectPtr = 0;
Map.PendingObject = 0;
Map.PendingHouse = HOUSE_NONE;
Map.IsTargettingMode = SPC_NONE;
Map.Set_Cursor_Shape(0);
return true;
}
/**************************************************************************************************
* DLLExportClass::Place -- Place a completed structure down
*
* In:
*
* Out:
*
*
*
* History: 2/6/2019 11:51AM - ST
**************************************************************************************************/
bool DLLExportClass::Place(uint64 player_id, int buildable_type, int buildable_id, short cell_x, short cell_y)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
static const int _map_width_shift_bits = 7;
BuildingClass *building = Get_Pending_Placement_Object(player_id, buildable_type, buildable_id);
if (building) {
TechnoTypeClass const * tech = Fetch_Techno_Type((RTTIType)buildable_type, buildable_id);
if (tech) {
BuildingTypeClass *building_type = (BuildingTypeClass*) tech;
//short const *occupy_list = building_type->Get_Occupy_List(true);
PlacementType[CurrentLocalPlayerIndex] = building_type;
/*
** The cell coordinates passed in will be relative to the playable area that the client knows about
*/
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_width = Map.MapCellWidth;
int map_cell_height = Map.MapCellHeight;
if (map_cell_x > 0) {
map_cell_x--;
map_cell_width++;
}
if (map_cell_y > 0) {
map_cell_y--;
map_cell_height++;
}
CELL cell = (CELL) (map_cell_x + cell_x) + ( (map_cell_y + cell_y) << _map_width_shift_bits);
/*
** Call the place directly instead of queueing it, so we can evaluate the return code.
*/
if (PlayerPtr->Place_Object(building->What_Am_I(), cell + Map.ZoneOffset)) {
PlacementType[CurrentLocalPlayerIndex] = NULL;
}
}
}
return true;
}
BuildingClass *DLLExportClass::Get_Pending_Placement_Object(uint64 player_id, int buildable_type, int buildable_id)
{
/*
**
** Based on SidebarClass::StripClass::SelectClass::Action
**
**
*/
if (GAME_TO_PLAY == GAME_NORMAL) {
for (int c = 0 ; c < 2 ; c++) {
/*
** Each production slot in the column
*/
for (int b=0 ; b < Map.Column[c].BuildableCount ; b++) {
if (Map.Column[c].Buildables[b].BuildableID == buildable_id) {
if (Map.Column[c].Buildables[b].BuildableType == buildable_type) {
int genfactory = -1;
switch (buildable_type) {
case RTTI_INFANTRYTYPE:
genfactory = PlayerPtr->InfantryFactory;
break;
case RTTI_UNITTYPE:
genfactory = PlayerPtr->UnitFactory;
break;
case RTTI_AIRCRAFTTYPE:
genfactory = PlayerPtr->AircraftFactory;
break;
case RTTI_BUILDINGTYPE:
genfactory = PlayerPtr->BuildingFactory;
break;
default:
genfactory = -1;
break;
}
int fnumber = Map.Column[c].Buildables[b].Factory;
int spc = 0;
ObjectTypeClass const * choice = NULL;
if (buildable_type != RTTI_SPECIAL) {
choice = Fetch_Techno_Type((RTTIType)buildable_type, buildable_id);
} else {
spc = buildable_id;
}
FactoryClass * factory = NULL;
if (fnumber != -1) {
factory = Factories.Raw_Ptr(fnumber);
}
if (spc == 0 && choice) {
if (fnumber == -1 && genfactory != -1) {
return(NULL);
}
if (factory) {
/*
** If production has completed, then attempt to have the object exit
** the factory or go into placement mode.
*/
if (factory->Has_Completed()) {
TechnoClass * pending = factory->Get_Object();
if (!pending && factory->Get_Special_Item()) {
//Map.IsTargettingMode = true;
} else {
BuildingClass * builder = pending->Who_Can_Build_Me(false, false);
if (!builder) {
OutList.Add(EventClass(EventClass::ABANDON, buildable_type, buildable_id));
On_Speech(PlayerPtr, VOX_NO_FACTORY); // Speak(VOX_NO_FACTORY);
} else {
/*
** If the completed object is a building, then change the
** game state into building placement mode. This fact is
** not transmitted to any linked computers until the moment
** the building is actually placed down.
*/
if (pending->What_Am_I() == RTTI_BUILDING) {
return (BuildingClass*)pending;
//PlayerPtr->Manual_Place(builder, (BuildingClass *)pending);
}
}
}
}
}
}
}
}
}
}
} else {
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER) {
SidebarGlyphxClass *context_sidebar = DLLExportClass::Get_Current_Context_Sidebar();
for (int c = 0 ; c < 2 ; c++) {
/*
** Each production slot in the column
*/
for (int b=0 ; b < context_sidebar->Column[c].BuildableCount ; b++) {
if (context_sidebar->Column[c].Buildables[b].BuildableID == buildable_id) {
if (context_sidebar->Column[c].Buildables[b].BuildableType == buildable_type) {
int genfactory = -1;
switch (buildable_type) {
case RTTI_INFANTRYTYPE:
genfactory = PlayerPtr->InfantryFactory;
break;
case RTTI_UNITTYPE:
genfactory = PlayerPtr->UnitFactory;
break;
case RTTI_AIRCRAFTTYPE:
genfactory = PlayerPtr->AircraftFactory;
break;
case RTTI_BUILDINGTYPE:
genfactory = PlayerPtr->BuildingFactory;
break;
default:
genfactory = -1;
break;
}
int fnumber = context_sidebar->Column[c].Buildables[b].Factory;
int spc = 0;
ObjectTypeClass const * choice = NULL;
if (buildable_type != RTTI_SPECIAL) {
choice = Fetch_Techno_Type((RTTIType)buildable_type, buildable_id);
} else {
spc = buildable_id;
}
FactoryClass * factory = NULL;
if (fnumber != -1) {
factory = Factories.Raw_Ptr(fnumber);
}
if (spc == 0 && choice) {
if (fnumber == -1 && genfactory != -1) {
return(NULL);
}
if (factory) {
/*
** If production has completed, then attempt to have the object exit
** the factory or go into placement mode.
*/
if (factory->Has_Completed()) {
TechnoClass * pending = factory->Get_Object();
if (!pending && factory->Get_Special_Item()) {
//Map.IsTargettingMode = true;
} else {
BuildingClass * builder = pending->Who_Can_Build_Me(false, false);
if (!builder) {
OutList.Add(EventClass(EventClass::ABANDON, buildable_type, buildable_id));
On_Speech(PlayerPtr, VOX_NO_FACTORY); // Speak(VOX_NO_FACTORY);
} else {
/*
** If the completed object is a building, then change the
** game state into building placement mode. This fact is
** not transmitted to any linked computers until the moment
** the building is actually placed down.
*/
if (pending->What_Am_I() == RTTI_BUILDING) {
return (BuildingClass*)pending;
//PlayerPtr->Manual_Place(builder, (BuildingClass *)pending);
}
}
}
}
}
}
}
}
}
}
}
}
return NULL;
}
/**************************************************************************************************
* DLLExportClass::Place_Super_Weapon
*
* History:
**************************************************************************************************/
bool DLLExportClass::Place_Super_Weapon(uint64 player_id, int buildable_type, int buildable_id, int x, int y)
{
if (buildable_type != RTTI_SPECIAL)
{
return false;
}
COORDINATE coord = Map.Pixel_To_Coord(x, y);
CELL cell = Coord_Cell(coord);
SpecialWeaponType weapon_type = (SpecialWeaponType)buildable_id;
OutList.Add(EventClass(EventClass::SPECIAL_PLACE, weapon_type, cell));
return true;
}
/**************************************************************************************************
* DLLExportClass::Create_Control_Group
*
* History:
**************************************************************************************************/
bool DLLExportClass::Create_Control_Group(unsigned char control_group_index)
{
Handle_Team(control_group_index, 2);
return true;
}
/**************************************************************************************************
* DLLExportClass::Add_To_Control_Group
*
* History:
**************************************************************************************************/
bool DLLExportClass::Add_To_Control_Group(unsigned char control_group_index)
{
Handle_Team(control_group_index, 1);
return true;
}
/**************************************************************************************************
* DLLExportClass::Toggle_Control_Group_Selection
*
* History:
**************************************************************************************************/
bool DLLExportClass::Toggle_Control_Group_Selection(unsigned char control_group_index)
{
Handle_Team(control_group_index, 0);
return true;
}
/**************************************************************************************************
* DLLExportClass::Get_Shroud_State -- Get a snapshot of the shroud for the given player
*
* In:
*
* Out:
*
*
*
* History: 4/12/2019 3:44PM - ST
**************************************************************************************************/
bool DLLExportClass::Get_Shroud_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
CNCShroudStruct *shroud = (CNCShroudStruct*) buffer_in;
unsigned int memory_needed = sizeof(*shroud) + 256; // Base amount needed. Will need more depending on how many entries there are
int entry_index = 0;
/*
**
** Based loosely on DisplayClass::Redraw_Icons
**
**
*/
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_width = Map.MapCellWidth;
int map_cell_height = Map.MapCellHeight;
if (map_cell_x > 0) {
map_cell_x--;
map_cell_width++;
}
if (map_cell_width < MAP_MAX_CELL_WIDTH) {
map_cell_width++;
}
if (map_cell_y > 0) {
map_cell_y--;
map_cell_height++;
}
if (map_cell_height < MAP_MAX_CELL_HEIGHT) {
map_cell_height++;
}
for (int y = 0; y < map_cell_height; y++) {
for (int x = 0; x < map_cell_width; x++) {
CELL cell = XY_Cell(map_cell_x + x, map_cell_y + y);
COORDINATE coord = Cell_Coord(cell) & 0xFF00FF00L;
memory_needed += sizeof(CNCShroudEntryStruct);
if (memory_needed >= buffer_size) {
return false;
}
int xpixel;
int ypixel;
Map.Coord_To_Pixel(coord, xpixel, ypixel);
CellClass * cellptr = &Map[Coord_Cell(coord)];
CNCShroudEntryStruct &shroud_entry = shroud->Entries[entry_index];
shroud_entry.IsVisible = cellptr->Is_Visible(PlayerPtr);
shroud_entry.IsMapped = cellptr->Is_Mapped(PlayerPtr);
shroud_entry.IsJamming = cellptr->Is_Jamming(PlayerPtr);
//shroud_entry.IsVisible = cellptr->IsVisible;
//shroud_entry.IsMapped = cellptr->IsMapped;
shroud_entry.ShadowIndex = -1;
if (shroud_entry.IsMapped) {
if (!shroud_entry.IsVisible) {
shroud_entry.ShadowIndex = (char)Map.Cell_Shadow(cell, PlayerPtr);
}
}
entry_index++;
}
}
shroud->Count = entry_index;
return true;
}
/**************************************************************************************************
* DLLExportClass::Get_Occupier_State -- Get the occupier state for this player
*
* In:
*
* Out:
*
*
*
* History: 10/25/2019 - SKY
**************************************************************************************************/
bool DLLExportClass::Get_Occupier_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
UNREFERENCED_PARAMETER(player_id);
CNCOccupierHeaderStruct* occupiers = (CNCOccupierHeaderStruct*)buffer_in;
CNCOccupierEntryHeaderStruct* entry = reinterpret_cast<CNCOccupierEntryHeaderStruct*>(occupiers + 1U);
occupiers->Count = 0;
unsigned int memory_needed = sizeof(CNCOccupierHeaderStruct);
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_width = Map.MapCellWidth;
int map_cell_height = Map.MapCellHeight;
if (map_cell_x > 0) {
map_cell_x--;
map_cell_width++;
}
if (map_cell_width < MAP_MAX_CELL_WIDTH) {
map_cell_width++;
}
if (map_cell_y > 0) {
map_cell_y--;
map_cell_height++;
}
if (map_cell_height < MAP_MAX_CELL_HEIGHT) {
map_cell_height++;
}
for (int y = 0; y < map_cell_height; y++) {
for (int x = 0; x < map_cell_width; x++, occupiers->Count++) {
CELL cell = XY_Cell(map_cell_x + x, map_cell_y + y);
CellClass * cellptr = &Map[cell];
int occupier_count = 0;
ObjectClass* optr = cellptr->Cell_Occupier();
while (optr != NULL) {
occupier_count++;
optr = optr->Next;
}
memory_needed += sizeof(CNCOccupierEntryHeaderStruct) + (sizeof(CNCOccupierObjectStruct) * occupier_count);
if (memory_needed >= buffer_size) {
return false;
}
CNCOccupierObjectStruct* occupier = reinterpret_cast<CNCOccupierObjectStruct*>(entry + 1U);
entry->Count = 0;
optr = cellptr->Cell_Occupier();
for (int i = 0; i < occupier_count; i++, occupier++, entry->Count++) {
CNCObjectStruct object;
Convert_Type(optr, object);
occupier->Type = object.Type;
occupier->ID = object.ID;
optr = optr->Next;
}
entry = reinterpret_cast<CNCOccupierEntryHeaderStruct*>(occupier + 1U);
}
}
return true;
}
/**************************************************************************************************
* DLLExportClass::Get_Player_Info_State -- Get the multiplayer info for this player
*
* In:
*
* Out:
*
*
*
* History: 4/22/2019 10:33AM - ST
**************************************************************************************************/
bool DLLExportClass::Get_Player_Info_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return false;
}
CNCPlayerInfoStruct *player_info = (CNCPlayerInfoStruct*) buffer_in;
unsigned int memory_needed = sizeof(*player_info) + 32; // A little extra for no reason
if (memory_needed >= buffer_size) {
return false;
}
player_info->GlyphxPlayerID = 0;
if (PlayerPtr == NULL) {
return false;;
}
if (Session.Players.Count() > CurrentLocalPlayerIndex) {
strncpy(&player_info->Name[0], Session.Players[CurrentLocalPlayerIndex]->Name, MPLAYER_NAME_MAX);
}
player_info->Name[MPLAYER_NAME_MAX - 1] = 0; // Make sure it's terminated
player_info->House = PlayerPtr->Class->House;
player_info->AllyFlags = PlayerPtr->Get_Ally_Flags();
if (Session.Players.Count() > CurrentLocalPlayerIndex) {
player_info->ColorIndex = Session.Players[CurrentLocalPlayerIndex]->Player.Color;
} else {
player_info->ColorIndex = (PlayerPtr->Class->House == HOUSE_USSR) ? 2 : 1; // Fudge to a sensible color in campaign; 2 = red, 1 = blue
}
player_info->GlyphxPlayerID = player_id;
player_info->HomeCellX = Cell_X(MultiplayerStartPositions[CurrentLocalPlayerIndex]);
player_info->HomeCellY = Cell_Y(MultiplayerStartPositions[CurrentLocalPlayerIndex]);
player_info->IsDefeated = PlayerPtr->IsDefeated;
// Can see other players' power if ally (except for the player themself) or spying on a power plant
// Can see other players' money if spying on a resource building
player_info->SpiedPowerFlags = 0U;
player_info->SpiedMoneyFlags = 0U;
for (int i = 0; i < Houses.Count(); ++i) {
HouseClass* house = Houses.Ptr(i);
if ((house != nullptr) && house->IsActive && (house != PlayerPtr) && house->Is_Ally(PlayerPtr)) {
player_info->SpiedPowerFlags |= 1U << house->Class->House;
}
}
for (int i = 0; i < Buildings.Count(); ++i) {
BuildingClass* building = Buildings.Ptr(i);
if ((building != nullptr) && building->IsActive && (building->Spied_By() & (1U << PlayerPtr->Class->House))) {
if ((*building == STRUCT_POWER) || (*building == STRUCT_ADVANCED_POWER)) {
player_info->SpiedPowerFlags |= 1U << building->House->Class->House;
} else if ((*building == STRUCT_REFINERY) || (*building == STRUCT_STORAGE)) {
player_info->SpiedMoneyFlags |= 1U << building->House->Class->House;
}
}
}
// Populate spied data
for (char house = 0; house < MAX_HOUSES; ++house) {
HouseClass* hptr = HouseClass::As_Pointer((HousesType)house);
if ((hptr != nullptr) && hptr->IsActive) {
if (player_info->SpiedPowerFlags & (1U << house)) {
player_info->SpiedInfo[house].Power = hptr->Power;
player_info->SpiedInfo[house].Drain = hptr->Drain;
}
if (player_info->SpiedMoneyFlags & (1U << house)) {
player_info->SpiedInfo[house].Money = hptr->Available_Money();
}
}
}
// Populate selection info
if (CurrentObject.Count() > 0) {
CNCObjectStruct object;
Convert_Type(CurrentObject[0], object);
player_info->SelectedID = object.ID;
player_info->SelectedType = object.Type;
const int left = Map.MapCellX;
const int right = Map.MapCellX + Map.MapCellWidth - 1;
const int top = Map.MapCellY;
const int bottom = Map.MapCellY + Map.MapCellHeight - 1;
// Use first object with a weapon, or first object if none
ObjectClass* action_object = nullptr;
for (int i = 0; i < CurrentObject.Count(); ++i) {
ObjectClass* object = CurrentObject[i];
if (object->Is_Techno()) {
TechnoClass* techno = (TechnoClass*)object;
if (techno->Techno_Type_Class()->PrimaryWeapon != NULL || techno->Techno_Type_Class()->SecondaryWeapon != NULL) {
action_object = object;
break;
}
}
}
if (action_object == nullptr) {
action_object = CurrentObject[0];
}
int index = 0;
for (int y = top; y <= bottom; ++y) {
for (int x = left; x <= right; ++x, ++index) {
Convert_Action_Type(action_object->What_Action(XY_Cell(x, y)), (CurrentObject.Count() == 1) ? action_object : NULL, As_Target(XY_Cell(x, y)), player_info->ActionWithSelected[index]);
}
}
player_info->ActionWithSelectedCount = Map.MapCellWidth * Map.MapCellHeight;
}
else {
player_info->SelectedID = -1;
player_info->SelectedType = UNKNOWN;
player_info->ActionWithSelectedCount = 0U;
}
// Screen shake
player_info->ScreenShake = PlayerPtr->ScreenShakeTime;
// Radar jammed
player_info->IsRadarJammed = Map.Get_Jammed(PlayerPtr);
return true;
};
/**************************************************************************************************
* DLLExportClass::Get_Dynamic_Map_State -- Get a snapshot of the smudges and overlays on the terrain
*
* In:
*
* Out:
*
*
*
* History: 2/8/2019 10:45AM - ST
**************************************************************************************************/
bool DLLExportClass::Get_Dynamic_Map_State(uint64 player_id, unsigned char *buffer_in, unsigned int buffer_size)
{
/*
** Get the player for this...
*/
player_id;
static int _call_count = 0;
CNCDynamicMapStruct *dynamic_map = (CNCDynamicMapStruct*) buffer_in;
unsigned int memory_needed = sizeof(*dynamic_map) + 256; // Base amount needed. Will need more depending on how many entries there are
int entry_index = 0;
/*
**
** Based loosely on DisplayClass::Redraw_Icons
**
**
*/
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_width = Map.MapCellWidth;
int map_cell_height = Map.MapCellHeight;
if (map_cell_x > 0) {
map_cell_x--;
map_cell_width++;
}
if (map_cell_width < MAP_MAX_CELL_WIDTH) {
map_cell_width++;
}
if (map_cell_y > 0) {
map_cell_y--;
map_cell_height++;
}
if (map_cell_height < MAP_MAX_CELL_WIDTH) {
map_cell_height++;
}
int cell_index = 0;
bool debug_output = false;
//if (_call_count == 20) {
//debug_output = true;
//}
// Need to ignore view constraints for dynamic map updates, so the radar map
// has the latest tiberium state for cells outside the tactical view
DLLExportClass::Adjust_Internal_View(true);
for (int y = 0 ; y < map_cell_height ; y++) {
for (int x = 0 ; x < map_cell_width ; x++) {
CELL cell = XY_Cell(map_cell_x+x, map_cell_y+y);
COORDINATE coord = Cell_Coord(cell) & 0xFF00FF00L;
memory_needed += sizeof(CNCDynamicMapEntryStruct) * 2;
if (memory_needed >= buffer_size) {
return false;
}
/*
** Only cells flagged to be redraw are examined.
*/
//if (In_View(cell) && Is_Cell_Flagged(cell)) {
int xpixel;
int ypixel;
if (Map.Coord_To_Pixel(coord, xpixel, ypixel)) {
CellClass * cellptr = &Map[Coord_Cell(coord)];
/*
** If there is a portion of the underlying icon that could be visible,
** then draw it. Also draw the cell if the shroud is off.
*/
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER || cellptr->IsMapped || Debug_Unshroud) {
Cell_Class_Draw_It(dynamic_map, entry_index, cellptr, xpixel, ypixel, debug_output);
}
/*
** If any cell is not fully mapped, then flag it so that the shadow drawing
** process will occur. Only draw the shadow if Debug_Unshroud is false.
*/
//if (!cellptr->IsMapped && !Debug_Unshroud) {
// IsShadowPresent = true;
//}
}
//}
}
}
if (entry_index) {
_call_count++;
}
dynamic_map->Count = entry_index;
dynamic_map->VortexActive = ChronalVortex.Is_Active();
dynamic_map->VortexX = Coord_X(ChronalVortex.Get_Position());
dynamic_map->VortexY = Coord_Y(ChronalVortex.Get_Position());
dynamic_map->VortexWidth = Pixel_To_Lepton(64);
dynamic_map->VortexHeight = Pixel_To_Lepton(64);
return true;
}
/**************************************************************************************************
* DLLExportClass::Cell_Class_Draw_It -- Go through the motions of drawing a cell to get the smudge and overlay info
*
* In:
*
* Out:
*
*
*
* History: 2/8/2019 11:09AM - ST
**************************************************************************************************/
void DLLExportClass::Cell_Class_Draw_It(CNCDynamicMapStruct *dynamic_map, int &entry_index, CellClass *cell_ptr, int xpixel, int ypixel, bool debug_output)
{
/*
**
** Based on CellClass::Draw_It and SmudgeTypeClass::Draw_It
**
**
*/
CELL cell = cell_ptr->Cell_Number();
/*
** Redraw any smudge.
*/
if (cell_ptr->Smudge != SMUDGE_NONE) {
//SmudgeTypeClass::As_Reference(Smudge).Draw_It(x, y, SmudgeData);
const SmudgeTypeClass &smudge_type = SmudgeTypeClass::As_Reference(cell_ptr->Smudge);
if (smudge_type.Get_Image_Data() != NULL) {
if (debug_output) {
IsTheaterShape = true;
Debug_Write_Shape_Type(&smudge_type, 0);
IsTheaterShape = false;
}
CNCDynamicMapEntryStruct &smudge_entry = dynamic_map->Entries[entry_index++];
strncpy(smudge_entry.AssetName, smudge_type.IniName, CNC_OBJECT_ASSET_NAME_LENGTH);
smudge_entry.Type = (short) cell_ptr->Smudge;
smudge_entry.Owner = (char)cell_ptr->Owner;
smudge_entry.DrawFlags = SHAPE_WIN_REL; // Looks like smudges are drawn top left
smudge_entry.PositionX = xpixel;
smudge_entry.PositionY = ypixel;
smudge_entry.Width = Get_Build_Frame_Width(smudge_type.Get_Image_Data());
smudge_entry.Height = Get_Build_Frame_Height(smudge_type.Get_Image_Data());
smudge_entry.CellX = Cell_X(cell);
smudge_entry.CellY = Cell_Y(cell);
smudge_entry.ShapeIndex = cell_ptr->SmudgeData;
smudge_entry.IsSmudge = true;
smudge_entry.IsOverlay = false;
smudge_entry.IsResource = false;
smudge_entry.IsSellable = false;
smudge_entry.IsTheaterShape = true; // Smudges are always theater-specific
smudge_entry.IsFlag = false;
}
}
/*
** Draw the overlay object.
*/
if (cell_ptr->Overlay != OVERLAY_NONE) {
//OverlayTypeClass const & otype = OverlayTypeClass::As_Reference(Overlay);
//IsTheaterShape = (bool)otype.IsTheater;
//CC_Draw_Shape(otype.Get_Image_Data(), OverlayData, (x+(CELL_PIXEL_W>>1)), (y+(CELL_PIXEL_H>>1)), WINDOW_TACTICAL, SHAPE_CENTER|SHAPE_WIN_REL|SHAPE_GHOST, NULL, Map.UnitShadow);
//IsTheaterShape = false;
const OverlayTypeClass &overlay_type = OverlayTypeClass::As_Reference(cell_ptr->Overlay);
if (overlay_type.Get_Image_Data() != NULL) {
CNCDynamicMapEntryStruct &overlay_entry = dynamic_map->Entries[entry_index++];
if (debug_output) {
IsTheaterShape = (bool)overlay_type.IsTheater;
Debug_Write_Shape_Type(&overlay_type, 0);
IsTheaterShape = false;
}
strncpy(overlay_entry.AssetName, overlay_type.IniName, CNC_OBJECT_ASSET_NAME_LENGTH);
overlay_entry.Type = (short)cell_ptr->Overlay;
overlay_entry.Owner = (char)cell_ptr->Owner;
overlay_entry.DrawFlags = SHAPE_CENTER|SHAPE_WIN_REL|SHAPE_GHOST; // Looks like overlays are drawn centered and translucent
overlay_entry.PositionX = xpixel + (CELL_PIXEL_W>>1);
overlay_entry.PositionY = ypixel + (CELL_PIXEL_H>>1);
overlay_entry.Width = Get_Build_Frame_Width(overlay_type.Get_Image_Data());
overlay_entry.Height = Get_Build_Frame_Height(overlay_type.Get_Image_Data());
overlay_entry.CellX = Cell_X(cell);
overlay_entry.CellY = Cell_Y(cell);
overlay_entry.ShapeIndex = cell_ptr->OverlayData;
overlay_entry.IsSmudge = false;
overlay_entry.IsOverlay = true;
overlay_entry.IsResource = overlay_entry.Type >= OVERLAY_GOLD1 && overlay_entry.Type <= OVERLAY_GEMS4;
overlay_entry.IsSellable = (overlay_entry.Type >= OVERLAY_SANDBAG_WALL && overlay_entry.Type <= OVERLAY_WOOD_WALL) || overlay_entry.Type == OVERLAY_FENCE;
overlay_entry.IsTheaterShape = (bool)overlay_type.IsTheater;
overlay_entry.IsFlag = false;
}
}
if (cell_ptr->IsFlagged) {
const void* image_data = MFCD::Retrieve("FLAGFLY.SHP");
if (image_data != NULL) {
CNCDynamicMapEntryStruct &flag_entry = dynamic_map->Entries[entry_index++];
strncpy(flag_entry.AssetName, "FLAGFLY", CNC_OBJECT_ASSET_NAME_LENGTH);
flag_entry.AssetName[CNC_OBJECT_ASSET_NAME_LENGTH - 1] = 0;
flag_entry.Type = -1;
flag_entry.Owner = cell_ptr->Owner;
flag_entry.DrawFlags = SHAPE_CENTER|SHAPE_GHOST|SHAPE_FADING;
flag_entry.PositionX = xpixel + (ICON_PIXEL_W / 2);
flag_entry.PositionY = ypixel + (ICON_PIXEL_H / 2);
flag_entry.Width = Get_Build_Frame_Width(image_data);
flag_entry.Height = Get_Build_Frame_Height(image_data);
flag_entry.CellX = Cell_X(cell);
flag_entry.CellY = Cell_Y(cell);
flag_entry.ShapeIndex = Frame % 14;
flag_entry.IsSmudge = false;
flag_entry.IsOverlay = false;
flag_entry.IsResource = false;
flag_entry.IsSellable = false;
flag_entry.IsTheaterShape = false;
flag_entry.IsFlag = true;
}
}
}
/**************************************************************************************************
* DLLExportClass::Glyphx_Queue_AI -- Special queue processing for Glyphx multiplayer mode
*
* In:
*
* Out:
*
*
*
* History: 3/12/2019 10:52AM - ST
**************************************************************************************************/
void DLLExportClass::Glyphx_Queue_AI(void)
{
//------------------------------------------------------------------------
// Move events from the OutList (events generated by this player) into the
// DoList (the list of events to execute).
//------------------------------------------------------------------------
while (OutList.Count) {
OutList.First().IsExecuted = false;
if (!DoList.Add(OutList.First())) {
;
}
OutList.Next();
}
/*
** Based on Execute_DoList in queue.cpp
**
** The events have the ID of the player encoded in them, so no special per-player processing should be needed.
** When the event is created, the 'local player' is assumed to be the originator of the event, so PlayerPtr will need
** to be swapped out to represent the real originating player prior to any events being created as a result of GlyphX input
**
** ST - 3/12/2019 10:51AM
*/
for (int i = 0; i < MULTIPLAYER_COUNT; i++) {
HousesType house;
HouseClass *housep;
house = Session.Players[i]->Player.ID;
housep= HouseClass::As_Pointer (house);
//.....................................................................
// If for some reason this house doesn't exist, skip it.
// Also, if this house has exited the game, skip it. (The user can
// generate events after he exits, because the exit event is scheduled
// at least FrameSendRate*3 frames ahead. If one system gets these
// packets & another system doesn't, they'll go out of sync because
// they aren't checking the CommandCount for that house, since that
// house isn't connected any more.)
//.....................................................................
if (!housep){
continue;
}
if (!housep->IsHuman){
continue;
}
//.....................................................................
// Loop through all events
//.....................................................................
for (int j = 0; j < DoList.Count; j++) {
if (!DoList[j].IsExecuted && (unsigned)Frame >= DoList[j].Frame) {
DoList[j].Execute();
//...............................................................
// Mark this event as executed.
//...............................................................
DoList[j].IsExecuted = 1;
}
}
}
//------------------------------------------------------------------------
// Clean out the DoList
//------------------------------------------------------------------------
while (DoList.Count) {
//.....................................................................
// Discard events that have been executed, OR it's too late to execute.
// (This happens if another player exits the game; he'll leave FRAMEINFO
// events lying around in my queue. They won't have been "executed",
// because his IPX connection was destroyed.)
//.....................................................................
if ( (DoList.First().IsExecuted) || ((unsigned)Frame > DoList.First().Frame) ) {
DoList.Next();
}
else {
break;
}
}
}
CarryoverClass Test_CC(CarryoverObjectStruct* cptr)
{
CarryoverClass cc;
cc.RTTI = (RTTIType)cptr->RTTI;
cc.Type.Building = (StructType)cptr->Type; //This works regardless of what the RTTI-type and the enum type, because they're all enums. - LLL
cc.Cell = (CELL)cptr->Cell;
cc.House = (HousesType)cptr->House;
cc.Strength = cptr->Strength;
return cc;
}
/**************************************************************************************************
* DLLExportClass::Reset_Sidebars -- Init the multiplayer sidebars
*
*
*
* History: 11/8/2019 - LLL
**************************************************************************************************/
void DLLExportClass::Store_Carryover_Objects()
{
if (EventCallback == NULL || Scen.IsToCarryOver == false) {
return;
}
CarryoverObjectStruct* carryover_list = 0;
CarryoverObjectStruct* carryover_list_tail = 0;
/*
** Record all objects, that are to be part of the carry over set, into the carry over list.
*/
for (int building_index = 0; building_index < Buildings.Count(); building_index++) {
BuildingClass * building = Buildings.Ptr(building_index);
if (building && !building->IsInLimbo && building->Strength > 0) {
CarryoverClass carryover = CarryoverClass(building);
CarryoverObjectStruct* cptr = new CarryoverObjectStruct();
if (cptr) {
cptr->RTTI = carryover.RTTI;
cptr->Type = (int)carryover.Type.Building;
cptr->House = carryover.House;
cptr->Cell = carryover.Cell;
cptr->Strength = carryover.Strength;
CarryoverClass cc = Test_CC(cptr);
cc;
if (!carryover_list_tail) {
carryover_list = cptr;
carryover_list_tail = cptr;
}
else {
carryover_list_tail->Next = cptr;
carryover_list_tail = cptr;
}
}
}
}
for (int unit_index = 0; unit_index < Units.Count(); unit_index++) {
UnitClass * unit = Units.Ptr(unit_index);
if (unit && !unit->IsInLimbo && unit->Strength > 0) {
CarryoverClass carryover = CarryoverClass(unit);
CarryoverObjectStruct* cptr = new CarryoverObjectStruct();
if (cptr) {
cptr->RTTI = carryover.RTTI;
cptr->Type = (int)carryover.Type.Unit;
cptr->House = carryover.House;
cptr->Cell = carryover.Cell;
cptr->Strength = carryover.Strength;
CarryoverClass cc = Test_CC(cptr);
cc;
if (!carryover_list_tail) {
carryover_list = cptr;
carryover_list_tail = cptr;
}
else {
carryover_list_tail->Next = cptr;
carryover_list_tail = cptr;
}
}
}
}
for (int infantry_index = 0; infantry_index < Infantry.Count(); infantry_index++) {
InfantryClass * infantry = Infantry.Ptr(infantry_index);
if (infantry && !infantry->IsInLimbo && infantry->Strength > 0) {
CarryoverClass carryover = CarryoverClass(infantry);
CarryoverObjectStruct* cptr = new CarryoverObjectStruct();
if (cptr) {
cptr->RTTI = carryover.RTTI;
cptr->Type = (int)carryover.Type.Building;
cptr->House = carryover.House;
cptr->Cell = carryover.Cell;
cptr->Strength = carryover.Strength;
CarryoverClass cc = Test_CC(cptr);
cc;
if (!carryover_list_tail) {
carryover_list = cptr;
carryover_list_tail = cptr;
}
else {
carryover_list_tail->Next = cptr;
carryover_list_tail = cptr;
}
}
}
}
for (int vessel_index = 0; vessel_index < Vessels.Count(); vessel_index++) {
VesselClass * vessel = Vessels.Ptr(vessel_index);
if (vessel && !vessel->IsInLimbo && vessel->Strength > 0) {
CarryoverClass carryover = CarryoverClass(vessel);
CarryoverObjectStruct* cptr = new CarryoverObjectStruct();
if (cptr) {
cptr->RTTI = carryover.RTTI;
cptr->Type = (int)carryover.Type.Building;
cptr->House = carryover.House;
cptr->Cell = carryover.Cell;
cptr->Strength = carryover.Strength;
CarryoverClass cc = Test_CC(cptr);
cc;
if (!carryover_list_tail) {
carryover_list = cptr;
carryover_list_tail = cptr;
}
else {
carryover_list_tail->Next = cptr;
carryover_list_tail = cptr;
}
}
}
}
//Make & Send Event
EventCallbackStruct event;
event.EventType = CALLBACK_EVENT_STORE_CARRYOVER_OBJECTS;
event.CarryoverObjects.CarryoverList = carryover_list;
EventCallback(event);
//Delete the list
while (carryover_list) {
CarryoverObjectStruct* cptr = (CarryoverObjectStruct*)carryover_list->Next;
delete carryover_list;
carryover_list = cptr;
}
}
/**************************************************************************************************
* DLLExportClass::Reset_Sidebars -- Init the multiplayer sidebars
*
* In:
*
* Out:
*
*
*
* History: 3/14/2019 3:10PM - ST
**************************************************************************************************/
void DLLExportClass::Reset_Sidebars(void)
{
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
if (i >= Session.Players.Count()) {
continue;
}
if (Session.Players[i] == NULL) {
continue;
}
HouseClass *player_ptr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
MultiplayerSidebars[i].Init_Clear(player_ptr);
}
}
/**************************************************************************************************
* DLLExportClass::Set_Player_Context -- Switch the C&C local player context
*
* In:
*
* Out:
*
*
*
* History: 3/14/2019 3:20PM - ST
**************************************************************************************************/
bool DLLExportClass::Set_Player_Context(uint64 glyphx_player_id, bool force)
{
/*
** Context never needs to change in single player
*/
if (GAME_TO_PLAY == GAME_NORMAL) {
if (PlayerPtr) {
CurrentObject.Set_Active_Context(PlayerPtr->Class->House);
}
return true;
}
/*
** C&C relies a lot on PlayerPtr, which is a pointer to the 'local' player's house. Historically, in a peer-to-peer
** multiplayer game, each player's PlayerPtr pointed to their own local player.
**
** Since much of the IO logic depends on PlayerPtr being the player performing the action, we need to set PlayerPtr
** correctly depending on which player generated input or needs output
*/
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
if (GlyphxPlayerIDs[i] == glyphx_player_id) {
if (!force && i == CurrentLocalPlayerIndex) {
return true;
}
PlayerPtr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
CurrentObject.Set_Active_Context(PlayerPtr->Class->House);
CurrentLocalPlayerIndex = i;
Refresh_Player_Control_Flags();
return true;
}
}
return false;
}
/**************************************************************************************************
* DLLExportClass::Reset_Player_Context -- Clear out old player context data
*
* In:
*
* Out:
*
*
*
* History: 4/16/2019 10:36AM - ST
**************************************************************************************************/
void DLLExportClass::Reset_Player_Context(void)
{
CurrentLocalPlayerIndex = 0;
CurrentObject.Clear_All();
}
/**************************************************************************************************
* DLLExportClass::Refresh_Player_Control_Flags -- Set the IsPlayerControl flags so that the player
* in context has IsPlayerControl
*
* In:
*
* Out:
*
*
*
* History: 4/16/2019 10:36AM - ST
**************************************************************************************************/
void DLLExportClass::Refresh_Player_Control_Flags(void)
{
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
HouseClass *player_ptr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
if (player_ptr) {
if (i == CurrentLocalPlayerIndex && player_ptr->IsHuman) {
player_ptr->IsPlayerControl = true;
} else {
player_ptr->IsPlayerControl = false;
}
}
}
}
/**************************************************************************************************
* Logic_Switch_Player_Context -- Called when the internal game locic needs to switch player context
*
* In:
*
* Out:
*
*
*
* History: 4/17/2019 9:45AM - ST
**************************************************************************************************/
void Logic_Switch_Player_Context(ObjectClass *object)
{
DLLExportClass::Logic_Switch_Player_Context(object);
}
/**************************************************************************************************
* DLLExportClass::Logic_Switch_Player_Context -- Called when the internal game locic needs to switch player context
*
* In:
*
* Out:
*
*
*
* History: 4/17/2019 9:45AM - ST
**************************************************************************************************/
void DLLExportClass::Logic_Switch_Player_Context(ObjectClass *object)
{
if (object == NULL) {
return;
}
/*
** If it's not a techno, it can't be owned.
*/
if (!object->Is_Techno()) {
return;
}
TechnoClass *tech = static_cast<TechnoClass*>(object);
//HousesType house = tech->House->Class->House;
DLLExportClass::Logic_Switch_Player_Context(tech->House);
}
/**************************************************************************************************
* Logic_Switch_Player_Context -- Called when the internal game locic needs to switch player context
*
* In:
*
* Out:
*
*
*
* History: 4/17/2019 9:45AM - ST
**************************************************************************************************/
void Logic_Switch_Player_Context(HouseClass *object)
{
DLLExportClass::Logic_Switch_Player_Context(object);
}
/**************************************************************************************************
* DLLExportClass::Logic_Switch_Player_Context -- Called when the internal game locic needs to switch player context
*
* In:
*
* Out:
*
*
*
* History: 4/17/2019 9:45AM - ST
**************************************************************************************************/
void DLLExportClass::Logic_Switch_Player_Context(HouseClass *house)
{
if (GAME_TO_PLAY == GAME_NORMAL) {
CurrentObject.Set_Active_Context(PlayerPtr->Class->House);
return;
}
if (house == NULL) {
return;
}
/*
** C&C relies a lot on PlayerPtr, which is a pointer to the 'local' player's house. Historically, in a peer-to-peer
** multiplayer game, each player's PlayerPtr pointed to their own local player.
**
** Since much of the IO logic depends on PlayerPtr being the player performing the action, we need to set PlayerPtr
** correctly depending on which player generated input or needs output
*/
HousesType house_type = house->Class->House;
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
if (house_type == Session.Players[i]->Player.ID) {
if (i == CurrentLocalPlayerIndex) {
return;
}
PlayerPtr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
CurrentObject.Set_Active_Context(PlayerPtr->Class->House);
CurrentLocalPlayerIndex = i;
Refresh_Player_Control_Flags();
return;
}
}
}
/**************************************************************************************************
* DLLExportClass::Calculate_Start_Positions -- Calculate the initial view positions for the players
*
* In:
*
* Out:
*
*
*
* History: 4/16/2019 6/12/2019 3:00PM - ST
**************************************************************************************************/
void DLLExportClass::Calculate_Start_Positions(void)
{
if (GAME_TO_PLAY == GAME_NORMAL) {
MultiplayerStartPositions[0] = Scen.Views[0];
return;
}
HouseClass *player_ptr = PlayerPtr;
ScenarioInit++;
COORDINATE old_tac = Map.TacticalCoord;
for (int i=0 ; i< MULTIPLAYER_COUNT; i++) {
PlayerPtr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
if (PlayerPtr) {
long x, y;
Map.Compute_Start_Pos(x, y);
MultiplayerStartPositions[i] = XY_Cell(x, y);
}
}
Map.TacticalCoord = old_tac;
ScenarioInit--;
PlayerPtr = player_ptr;
}
/**************************************************************************************************
* DLLExportClass::Get_GlyphX_Player_ID -- Get the external GlyphX player ID from the C&C house/player pointer
* Returns 0 in single player or if player ID isn't found
*
* In:
*
* Out:
*
*
*
* History: 4/22/2019 6:23PM - ST
**************************************************************************************************/
__int64 DLLExportClass::Get_GlyphX_Player_ID(const HouseClass *house)
{
/*
** C&C relies a lot on PlayerPtr, which is a pointer to the 'local' player's house. Historically, in a peer-to-peer
** multiplayer game, each player's PlayerPtr pointed to their own local player.
**
** Since much of the IO logic depends on PlayerPtr being the player performing the action, we need to set PlayerPtr
** correctly depending on which player generated input or needs output
*/
if (GAME_TO_PLAY == GAME_NORMAL) {
return 0;
}
if (house == NULL) {
return 0;
}
HousesType house_type = house->Class->House;
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
if (house_type == Session.Players[i]->Player.ID) {
return GlyphxPlayerIDs[i];
}
}
/*
** Failure case.
*/
return 0;
}
/**************************************************************************************************
* DLLExportClass::Adjust_Internal_View -- Set the internal tactical view to encompass the input coordinates
*
* In:
*
* Out:
*
*
*
* History: 4/16/2019 3:00PM - ST
**************************************************************************************************/
void DLLExportClass::Adjust_Internal_View(bool force_ignore_view_constraints)
{
/*
** When legacy rendering is disabled (especially in multiplayer) we can get input coordinates that
** fall outside the engine's tactical view. In this case, we need to adjust the tactical view before the
** input will behave as expected.
*/
if (!force_ignore_view_constraints && Legacy_Render_Enabled()) {
/*
** Render view should already be tracking the player's local view
*/
DisplayClass::IgnoreViewConstraints = false;
return;
}
DisplayClass::IgnoreViewConstraints = true;
}
/**************************************************************************************************
* DLLExportClass::Get_Current_Context_Sidebar -- Get the sidebar data for the current player context
*
* In:
*
* Out:
*
*
*
* History: 3/14/2019 3:20PM - ST
**************************************************************************************************/
SidebarGlyphxClass *DLLExportClass::Get_Current_Context_Sidebar(HouseClass *player_ptr)
{
if (player_ptr) {
for (int i=0 ; i<MULTIPLAYER_COUNT ; i++) {
if (player_ptr == HouseClass::As_Pointer(Session.Players[i]->Player.ID)) {
return &MultiplayerSidebars[i];
}
}
}
return &MultiplayerSidebars[CurrentLocalPlayerIndex];
}
SidebarGlyphxClass *Get_Current_Context_Sidebar(HouseClass *player_ptr)
{
return DLLExportClass::Get_Current_Context_Sidebar(player_ptr);
}
/**************************************************************************************************
* DLLExportClass::Repair_Mode -- Starts the player's repair mode. All it does here is unselect all units.
*
* In:
*
* Out:
*
*
*
* History: 5/1/2019 - LLL
**************************************************************************************************/
void DLLExportClass::Repair_Mode(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
Unselect_All();
}
/**************************************************************************************************
* DLLExportClass::Repair -- Repairs a specific building
*
* In:
*
* Out:
*
*
*
* History: 5/1/2019 - LLL
**************************************************************************************************/
void DLLExportClass::Repair(uint64 player_id, int object_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
TARGET target = Build_Target(RTTI_BUILDING, object_id);
if (target != TARGET_NONE)
{
BuildingClass* building = As_Building(target);
if (building) {
if (!building->IsActive) {
GlyphX_Debug_Print("DLLExportClass::Repair -- trying to repair a non-active building");
} else {
if (building->Can_Repair() && building->House.Is_Valid() && building->House->Class->House == PlayerPtr->Class->House)
{
building->Repair(-1);
}
}
}
}
}
/**************************************************************************************************
* DLLExportClass::Sell_Mode -- Starts the player's sell mode. All it does here is unselect all units.
*
* In:
*
* Out:
*
*
*
* History: 5/1/2019 - LLL
**************************************************************************************************/
void DLLExportClass::Sell_Mode(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
Unselect_All();
}
/**************************************************************************************************
* DLLExportClass::Sell -- Sell's a player's speceific building.
*
* In:
*
* Out:
*
*
*
* History: 5/1/2019 - LLL
**************************************************************************************************/
void DLLExportClass::Sell(uint64 player_id, int object_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
TARGET target = Build_Target(RTTI_BUILDING, object_id);
if (target != TARGET_NONE)
{
BuildingClass* building = As_Building(target);
if (building) {
if (!building->IsActive) {
GlyphX_Debug_Print("DLLExportClass::Sell -- trying to sell a non-active building");
} else {
if (building->Can_Demolish() && building->House.Is_Valid() && building->House->Class->House == PlayerPtr->Class->House)
{
building->Sell_Back(1);
}
}
}
}
}
/**************************************************************************************************
* DLLExportClass::Repair_Sell_Cancel -- Ends the player's repair or sell mode. Doesn't do anything right now.
*
* In:
*
* Out:
*
*
*
* History: 5/1/2019 - LLL
**************************************************************************************************/
void DLLExportClass::Repair_Sell_Cancel(uint64 player_id)
{
//OutputDebugString("Repair_Sell_Cancel\n");
}
/**************************************************************************************************
* DLLExportClass::Scatter_Selected -- Scatter the selected units
*
* In:
*
* Out:
*
*
*
* History: 10/15/2019 - SKY
**************************************************************************************************/
void DLLExportClass::Scatter_Selected(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
if (CurrentObject.Count()) {
for (int index = 0; index < CurrentObject.Count(); index++) {
ObjectClass const * tech = CurrentObject[index];
if (tech != NULL && tech->Can_Player_Move()) {
OutList.Add(EventClass(EventClass::SCATTER, TargetClass(tech)));
}
}
}
}
/**************************************************************************************************
* DLLExportClass::Select_Next_Unit
*
* History: 03.02.2020 MBL
**************************************************************************************************/
void DLLExportClass::Select_Next_Unit(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
ObjectClass* obj = Map.Next_Object(CurrentObject.Count() ? CurrentObject[0] : NULL);
if (obj) {
Unselect_All();
obj->Select();
COORDINATE center = Map.Center_Map();
Map.Flag_To_Redraw(true);
if (center) {
On_Center_Camera(PlayerPtr, Coord_X(center), Coord_Y(center));
}
}
}
/**************************************************************************************************
* DLLExportClass::Select_Previous_Unit
*
* History: 03.02.2020 MBL
**************************************************************************************************/
void DLLExportClass::Select_Previous_Unit(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
ObjectClass* obj = Map.Prev_Object(CurrentObject.Count() ? CurrentObject[0] : NULL);
if (obj) {
Unselect_All();
obj->Select();
COORDINATE center = Map.Center_Map();
Map.Flag_To_Redraw(true);
if (center) {
On_Center_Camera(PlayerPtr, Coord_X(center), Coord_Y(center));
}
}
}
/**************************************************************************************************
* DLLExportClass::Selected_Guard_Mode
*
* History: 03.03.2020 MBL
**************************************************************************************************/
void DLLExportClass::Selected_Guard_Mode(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
if (CurrentObject.Count()) {
for (int index = 0; index < CurrentObject.Count(); index++) {
ObjectClass const * tech = CurrentObject[index];
if (tech != NULL && tech->Can_Player_Fire()) {
if (tech->Can_Player_Move()) {
OutList.Add(EventClass(TargetClass(tech), MISSION_GUARD_AREA));
} else {
OutList.Add(EventClass(TargetClass(tech), MISSION_GUARD));
}
}
}
}
}
/**************************************************************************************************
* DLLExportClass::Selected_Stop
*
* History: 03.03.2020 MBL
**************************************************************************************************/
void DLLExportClass::Selected_Stop(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
// Copied from RedAlert/Conquer.cpp - Keyboard_Process() with Options.KeyStop (VK_S)
if (CurrentObject.Count()) {
for (int index = 0; index < CurrentObject.Count(); index++) {
ObjectClass const * tech = CurrentObject[index];
if (tech != NULL && (tech->Can_Player_Move() || (tech->Can_Player_Fire() && tech->What_Am_I() != RTTI_BUILDING))) {
OutList.Add(EventClass(EventClass::IDLE, TargetClass(tech)));
}
}
}
}
/**************************************************************************************************
* DLLExportClass::Units_Queued_Movement_Toggle
*
* History: 03.03.2020 MBL
**************************************************************************************************/
void DLLExportClass::Units_Queued_Movement_Toggle(uint64 player_id, bool toggle)
{
// Currently Red Alert only
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
if (PlayerPtr != NULL)
{
PlayerPtr->IsQueuedMovementToggle = toggle;
}
}
/**************************************************************************************************
* DLLExportClass::Team_Units_Formation_Toggle_On
*
* History: 03.03.2020 MBL
**************************************************************************************************/
// extern void Toggle_Formation(void); // Code\RedAlert\Conquer.cpp
extern char FormationEvent; // Code\RedAlert\Conquer.cpp
void DLLExportClass::Team_Units_Formation_Toggle_On(uint64 player_id)
{
/*
** Get the player for this...
*/
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
//
// MBL 03.23.2020: Code here copied and modified from Toggle_Formation(), since obj->IsSelected is not supported
// Replacing with ObjectClass::Is_Selected_By_Player(HouseClass *player);
//
int team = MAX_TEAMS;
long minx = 0x7FFFFFFFL, miny = 0x7FFFFFFFL;
long maxx = 0, maxy = 0;
int index;
bool setform = 0;
TeamFormDataStruct& team_form_data = TeamFormData[PlayerPtr->Class->House];
//
// Recording support
//
if (Session.Record) {
FormationEvent = 1;
}
/*
** Find the first selected object that is a member of a team, and
** register his group as the team we're using. Once we find the team
** number, update the 'setform' flag to know whether we should be setting
** the formation's offsets, or clearing them. If they currently have
** illegal offsets (as in 0x80000000), then we're setting.
*/
for (index = 0; index < Units.Count(); index++) {
UnitClass * obj = Units.Ptr(index);
if (obj) {
if (obj->House == PlayerPtr) {
if (!obj->IsInLimbo) {
if (obj->Is_Selected_By_Player(PlayerPtr)) {
team = obj->Group;
if (team < MAX_TEAMS) {
setform = obj->XFormOffset == (int)0x80000000;
team_form_data.TeamSpeed[team] = SPEED_WHEEL;
team_form_data.TeamMaxSpeed[team] = MPH_LIGHT_SPEED;
break;
}
}
}
}
}
}
if (team >= MAX_TEAMS) {
for (index = 0; index < Infantry.Count(); index++) {
InfantryClass * obj = Infantry.Ptr(index);
if (obj) {
if (obj->House == PlayerPtr) {
if (!obj->IsInLimbo) {
if (obj->Is_Selected_By_Player(PlayerPtr)) {
team = obj->Group;
if (team < MAX_TEAMS) {
setform = obj->XFormOffset == (int)0x80000000;
team_form_data.TeamSpeed[team] = SPEED_WHEEL;
team_form_data.TeamMaxSpeed[team] = MPH_LIGHT_SPEED;
break;
}
}
}
}
}
}
}
if (team >= MAX_TEAMS) {
for (index = 0; index < Vessels.Count(); index++) {
VesselClass * obj = Vessels.Ptr(index);
if (obj) {
if (obj->House == PlayerPtr) {
if (!obj->IsInLimbo) {
if (obj->Is_Selected_By_Player(PlayerPtr)) {
team = obj->Group;
if (team < MAX_TEAMS) {
setform = obj->XFormOffset == 0x80000000UL;
team_form_data.TeamSpeed[team] = SPEED_WHEEL;
team_form_data.TeamMaxSpeed[team] = MPH_LIGHT_SPEED;
break;
}
}
}
}
}
}
}
if (team >= MAX_TEAMS) return;
/*
** Now that we have a team, let's go set (or clear) the formation offsets.
*/
for (index = 0; index < Units.Count(); index++) {
UnitClass * obj = Units.Ptr(index);
if (obj && !obj->IsInLimbo && obj->House == PlayerPtr && obj->Group == team) {
obj->Mark(MARK_CHANGE);
if (setform) {
long xc = Cell_X(Coord_Cell(obj->Center_Coord()));
long yc = Cell_Y(Coord_Cell(obj->Center_Coord()));
if (xc < minx) minx = xc;
if (xc > maxx) maxx = xc;
if (yc < miny) miny = yc;
if (yc > maxy) maxy = yc;
if (obj->Class->MaxSpeed < team_form_data.TeamMaxSpeed[team]) {
team_form_data.TeamMaxSpeed[team] = obj->Class->MaxSpeed;
team_form_data.TeamSpeed[team] = obj->Class->Speed;
}
} else {
obj->XFormOffset = obj->YFormOffset = (int)0x80000000;
}
}
}
for (index = 0; index < Infantry.Count(); index++) {
InfantryClass * obj = Infantry.Ptr(index);
if (obj && !obj->IsInLimbo && obj->House == PlayerPtr && obj->Group == team) {
obj->Mark(MARK_CHANGE);
if (setform) {
long xc = Cell_X(Coord_Cell(obj->Center_Coord()));
long yc = Cell_Y(Coord_Cell(obj->Center_Coord()));
if (xc < minx) minx = xc;
if (xc > maxx) maxx = xc;
if (yc < miny) miny = yc;
if (yc > maxy) maxy = yc;
if (obj->Class->MaxSpeed < team_form_data.TeamMaxSpeed[team]) {
team_form_data.TeamMaxSpeed[team] = obj->Class->MaxSpeed;
}
} else {
obj->XFormOffset = obj->YFormOffset = (int)0x80000000;
}
}
}
for (index = 0; index < Vessels.Count(); index++) {
VesselClass * obj = Vessels.Ptr(index);
if (obj && !obj->IsInLimbo && obj->House == PlayerPtr && obj->Group == team) {
obj->Mark(MARK_CHANGE);
if (setform) {
long xc = Cell_X(Coord_Cell(obj->Center_Coord()));
long yc = Cell_Y(Coord_Cell(obj->Center_Coord()));
if (xc < minx) minx = xc;
if (xc > maxx) maxx = xc;
if (yc < miny) miny = yc;
if (yc > maxy) maxy = yc;
if (obj->Class->MaxSpeed < team_form_data.TeamMaxSpeed[team]) {
team_form_data.TeamMaxSpeed[team] = obj->Class->MaxSpeed;
}
} else {
obj->XFormOffset = obj->YFormOffset = 0x80000000UL;
}
}
}
/*
** All the units have been counted to find the bounding rectangle and
** center of the formation, or to clear their offsets. Now, if we're to
** set them into formation, proceed to do so. Otherwise, bail.
*/
if (setform) {
int centerx = (int)((maxx - minx)/2)+minx;
int centery = (int)((maxy - miny)/2)+miny;
for (index = 0; index < Units.Count(); index++) {
UnitClass * obj = Units.Ptr(index);
if (obj && !obj->IsInLimbo && obj->House == PlayerPtr && obj->Group == team) {
long xc = Cell_X(Coord_Cell(obj->Center_Coord()));
long yc = Cell_Y(Coord_Cell(obj->Center_Coord()));
obj->XFormOffset = xc - centerx;
obj->YFormOffset = yc - centery;
}
}
for (index = 0; index < Infantry.Count(); index++) {
InfantryClass * obj = Infantry.Ptr(index);
if (obj && !obj->IsInLimbo && obj->House == PlayerPtr && obj->Group == team ) {
long xc = Cell_X(Coord_Cell(obj->Center_Coord()));
long yc = Cell_Y(Coord_Cell(obj->Center_Coord()));
obj->XFormOffset = xc - centerx;
obj->YFormOffset = yc - centery;
}
}
for (index = 0; index < Vessels.Count(); index++) {
VesselClass * obj = Vessels.Ptr(index);
if (obj && !obj->IsInLimbo && obj->House == PlayerPtr && obj->Group == team ) {
long xc = Cell_X(Coord_Cell(obj->Center_Coord()));
long yc = Cell_Y(Coord_Cell(obj->Center_Coord()));
obj->XFormOffset = xc - centerx;
obj->YFormOffset = yc - centery;
}
}
}
}
/**************************************************************************************************
* CNC_Handle_Debug_Request -- Process a debug input request
*
* In:
*
*
* Out:
*
*
* History: 1/7/2019 5:20PM - ST
**************************************************************************************************/
extern "C" __declspec(dllexport) void __cdecl CNC_Handle_Debug_Request(DebugRequestEnum debug_request_type, uint64 player_id, const char *object_name, int x, int y, bool unshroud, bool enemy)
{
if (!DLLExportClass::Set_Player_Context(player_id)) {
return;
}
switch (debug_request_type) {
case DEBUG_REQUEST_SPAWN_OBJECT:
DLLExportClass::Debug_Spawn_Unit(object_name, x, y, enemy);
break;
case DEBUG_REQUEST_FORCE_CRASH:
Debug_Force_Crash = true;
break;
case DEBUG_REQUEST_KILL_OBJECT:
if (strcmp(object_name, "HEAL") == 0) {
DLLExportClass::Debug_Heal_Unit(x, y);
}
else {
DLLExportClass::Debug_Kill_Unit(x, y);
}
break;
case DEBUG_REQUEST_END_GAME:
{
bool win = true;
const char lose[] = "LOSE";
if (strcmp(lose, object_name) == 0) {
win = false;
}
PlayerWins = win;
PlayerLoses = !win;
}
break;
case DEBUG_REQUEST_UNSHROUD:
Debug_Unshroud = unshroud;
Map.Flag_To_Redraw(true);
break;
case DEBUG_REQUEST_SUPERWEAPON_RECHARGE:
for (int i = 0; i < SPC_COUNT; ++i)
{
PlayerPtr->SuperWeapon[i].Forced_Charge(true);
}
break;
case DEBUG_REQUEST_END_PRODUCTION:
{
for (int index = 0; index < Factories.Count(); index++) {
FactoryClass* factory = Factories.Ptr(index);
if (factory->Get_House()->IsHuman) {
Factories.Ptr(index)->Force_Complete();
}
}
}
break;
case DEBUG_REQUEST_ADD_RESOURCES:
{
if (object_name) {
int amount = atoi(object_name);
PlayerPtr->Credits += amount;
if (PlayerPtr->Credits < 0) {
PlayerPtr->Credits = 0;
}
}
}
break;
case DEBUG_REQUEST_UNLOCK_BUILDABLES:
PlayerPtr->DebugUnlockBuildables = !PlayerPtr->DebugUnlockBuildables;
PlayerPtr->IsRecalcNeeded = true;
break;
case DEBUG_REQUEST_SET_GLOBAL_FLAG:
Scen.Set_Global_To(x, true);
break;
default:
break;
}
}
/**************************************************************************************************
* DLLExportClass::Debug_Spawn_All -- Debug spawn all buildable units and structures
*
* In: Object to unlimbo , x & y cell positions
*
*
* Out: True if unlimbo succeeded
*
*
*
* History: 1/22/2020 2:57PM - ST
**************************************************************************************************/
bool DLLExportClass::Try_Debug_Spawn_Unlimbo(TechnoClass *techno, int &cell_x, int &cell_y)
{
if (techno) {
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_right = map_cell_x + Map.MapCellWidth;
int map_cell_bottom = map_cell_y + Map.MapCellHeight;
map_cell_right = min(map_cell_right, cell_x + 26); // Generally try to prevent the objects from spawing off the right of the screen
int try_x = cell_x;
int try_y = cell_y;
while (try_y < map_cell_bottom) {
CELL cell = XY_Cell(try_x, try_y);
if (techno->Unlimbo(Cell_Coord(cell))) {
try_x++;
if (try_x > map_cell_right - 2) {
try_x = cell_x; //map_cell_x + 2;
try_y++;
}
cell_x = try_x;
cell_y = try_y;
return true;
}
try_x++;
if (try_x > map_cell_right - 2) {
try_x = cell_x; //map_cell_x + 2;
try_y++;
}
}
cell_x = try_x;
cell_y = try_y;
}
return false;
}
/**************************************************************************************************
* DLLExportClass::Debug_Spawn_All -- Debug spawn all buildable units and structures
*
* In:
*
* Out:
*
*
*
* History: 1/22/2020 2:57PM - ST
**************************************************************************************************/
void DLLExportClass::Debug_Spawn_All(int x, int y)
{
int map_cell_x = Map.MapCellX;
int map_cell_y = Map.MapCellY;
int map_cell_bottom = map_cell_y + Map.MapCellHeight;
int origin_x = map_cell_x + 2;
int origin_y = map_cell_y + 2;
if (x != 0 || y != 0) {
CELL screen_cell = Coord_Cell(Map.Pixel_To_Coord(x, y));
origin_x = Cell_X(screen_cell);
origin_y = Cell_Y(screen_cell);
}
int try_x = origin_x;
int try_y = origin_y;
HousesType house = PlayerPtr->Class->House;
for (StructType sindex = STRUCT_FIRST; sindex < STRUCT_COUNT; sindex++) {
BuildingTypeClass const & building_type = BuildingTypeClass::As_Reference(sindex);
if (building_type.Get_Ownable() && building_type.Level != -1) {
BuildingClass * building = new BuildingClass(building_type, house);
if (building) {
try_x = origin_x;
try_y = origin_y;
while (try_y < map_cell_bottom) {
if (Try_Debug_Spawn_Unlimbo(building, try_x, try_y)) {
break;
}
}
}
}
}
for (UnitType index = UNIT_FIRST; index < UNIT_COUNT; index++) {
UnitTypeClass const & unit_type = UnitTypeClass::As_Reference(index);
/*
** Fetch the sidebar cameo image for this building.
*/
if (unit_type.Get_Ownable() && unit_type.Level != -1) {
UnitClass * unit = (UnitClass*) unit_type.Create_One_Of(PlayerPtr);
if (unit) {
try_x = origin_x;
try_y = origin_y;
while (try_y < map_cell_bottom) {
if (Try_Debug_Spawn_Unlimbo(unit, try_x, try_y)) {
break;
}
}
}
}
}
for (InfantryType index = INFANTRY_FIRST; index < INFANTRY_COUNT; index++) {
InfantryTypeClass const &infantry_type = InfantryTypeClass::As_Reference(index);
/*
** Fetch the sidebar cameo image for this building.
*/
if (infantry_type.Get_Ownable() && infantry_type.Level != -1) {
InfantryClass * inf = (InfantryClass*) infantry_type.Create_One_Of(PlayerPtr);
if (inf) {
try_x = origin_x;
try_y = origin_y;
while (try_y < map_cell_bottom) {
if (Try_Debug_Spawn_Unlimbo(inf, try_x, try_y)) {
break;
}
}
}
}
}
for (AircraftType index = AIRCRAFT_FIRST; index < AIRCRAFT_COUNT; index++) {
AircraftTypeClass const &aircraft_type = AircraftTypeClass::As_Reference(index);
/*
** Fetch the sidebar cameo image for this building.
*/
if (aircraft_type.Get_Ownable() && aircraft_type.Level != -1) {
AircraftClass * air = (AircraftClass*) aircraft_type.Create_One_Of(PlayerPtr);
if (air) {
try_x = origin_x;
try_y = origin_y;
while (try_y < map_cell_bottom) {
if (Try_Debug_Spawn_Unlimbo(air, try_x, try_y)) {
break;
}
}
}
}
}
for (VesselType index = VESSEL_FIRST; index < VESSEL_COUNT; index++) {
VesselTypeClass const &vessel_type = VesselTypeClass::As_Reference(index);
/*
** Fetch the sidebar cameo image for this building.
*/
if (vessel_type.Get_Ownable() && vessel_type.Level != -1) {
VesselClass * boat = (VesselClass*) vessel_type.Create_One_Of(PlayerPtr);
if (boat) {
try_x = origin_x;
try_y = origin_y;
while (try_y < map_cell_bottom) {
if (Try_Debug_Spawn_Unlimbo(boat, try_x, try_y)) {
break;
}
}
}
}
}
}
/**************************************************************************************************
* DLLExportClass::Debug_Spawn_Unit -- Debug spawn a unit at the specified location
*
* In:
*
* Out:
*
*
*
* History: 3/14/2019 3:20PM - ST
**************************************************************************************************/
void DLLExportClass::Debug_Spawn_Unit(const char *object_name, int x, int y, bool enemy)
{
if (object_name == NULL) {
return;
}
if (strlen(object_name) == 0) {
return;
}
COORDINATE coord = Map.Pixel_To_Coord(x, y);
CELL cell = Coord_Cell(coord);
HousesType house = PlayerPtr->Class->House;
/*
** Place all?
*/
if (stricmp(object_name, "ALLOBJECTS") == 0) {
Debug_Spawn_All(x, y);
return;
}
/*
** If this is for the enemy, find the enemy with the most stuff
*/
if (enemy) {
unsigned max_count = 0;
for (int i = 0; i < Houses.Count(); ++i) {
const HouseClass* player = Houses.Ptr(i);
const unsigned count = player->CurUnits + player->CurBuildings + player->CurInfantry + player->CurVessels + player->CurAircraft;
if (!PlayerPtr->Is_Ally(player) && (count >= max_count)) {
house = player->Class->House;
max_count = count;
}
}
}
/*
** What is this thing?
*/
StructType structure_type = BuildingTypeClass::From_Name(object_name);
if (structure_type != STRUCT_NONE) {
BuildingClass * building = new BuildingClass(structure_type, house);
if (building) {
if (!building->Unlimbo(Cell_Coord(cell))) {
delete building;
}
}
#if (0)
Map.PendingObject = &BuildingTypeClass::As_Reference(structure_type);
Map.PendingHouse = PlayerPtr->ActLike;
Map.PendingObjectPtr = Map.PendingObject->Create_One_Of(PlayerPtr);
if (Map.PendingObjectPtr) {
Map.Set_Cursor_Pos();
Map.Set_Cursor_Shape(Map.PendingObject->Occupy_List());
//OutList.Add(EventClass(EventClass::PLACE, RTTI_BUILDING, (CELL)(cell + Map.ZoneOffset)));
}
#endif
return;
}
UnitType unit_type = UnitTypeClass::From_Name(object_name);
if (unit_type != UNIT_NONE) {
UnitClass * unit = new UnitClass(unit_type, house);
if (unit) {
unit->Unlimbo(Map.Pixel_To_Coord(x, y), DIR_N);
}
return;
}
InfantryType infantry_type = InfantryTypeClass::From_Name(object_name);
if (infantry_type != INFANTRY_NONE) {
InfantryClass * inf = new InfantryClass(infantry_type, house);
if (inf) {
inf->Unlimbo(Map.Pixel_To_Coord(x, y), DIR_N);
}
return;
}
AircraftType aircraft_type = AircraftTypeClass::From_Name(object_name);
if (aircraft_type != AIRCRAFT_NONE) {
AircraftClass * air = new AircraftClass(aircraft_type, house);
if (air) {
air->Unlimbo(Map.Pixel_To_Coord(x, y), DIR_N);
}
return;
}
VesselType vessel_type = VesselTypeClass::From_Name(object_name);
if (vessel_type != VESSEL_NONE) {
VesselClass *boat = new VesselClass(vessel_type, house);
if (boat != NULL) {
if (boat->Unlimbo(Map.Pixel_To_Coord(x, y), DIR_N)) {
boat->Enter_Idle_Mode();
} else {
delete boat;
}
}
}
OverlayType overlay_type = OverlayTypeClass::From_Name(object_name);
if (overlay_type != OVERLAY_NONE)
{
new OverlayClass(overlay_type, cell);
return;
}
}
/**************************************************************************************************
* DLLExportClass::Debug_Kill_Unit -- Kill a unit at the specified location
*
* In:
*
* Out:
*
*
*
* History: 8/19/2019 3:09PM - ST
**************************************************************************************************/
void DLLExportClass::Debug_Kill_Unit(int x, int y)
{
COORDINATE coord = Map.Pixel_To_Coord(x, y);
CELL cell = Coord_Cell(coord);
CellClass * cellptr = &Map[cell];
if (cellptr) {
ObjectClass *obj = cellptr->Cell_Object();
static const int debug_damage = 100; // 100 = Incremental damage
if (obj) {
int damage = debug_damage;
obj->Take_Damage(damage, 0, WARHEAD_HE, 0, true);
} else {
if (cellptr->Overlay != OVERLAY_NONE) {
OverlayTypeClass const * optr = &OverlayTypeClass::As_Reference(cellptr->Overlay);
if (optr->IsTiberium) {
cellptr->Reduce_Tiberium(1);
}
if (optr->IsWall) {
Map[cell].Reduce_Wall(debug_damage);
}
}
if (cellptr->TType == TEMPLATE_BRIDGE1 || cellptr->TType == TEMPLATE_BRIDGE2 ||
cellptr->TType == TEMPLATE_BRIDGE1H || cellptr->TType == TEMPLATE_BRIDGE2H ||
cellptr->TType == TEMPLATE_BRIDGE_1A || cellptr->TType == TEMPLATE_BRIDGE_1B ||
cellptr->TType == TEMPLATE_BRIDGE_2A || cellptr->TType == TEMPLATE_BRIDGE_2B ||
cellptr->TType == TEMPLATE_BRIDGE_3A || cellptr->TType == TEMPLATE_BRIDGE_3B) {
Map.Destroy_Bridge_At(cell);
}
}
}
}
void DLLExportClass::Debug_Heal_Unit(int x, int y)
{
COORDINATE coord = Map.Pixel_To_Coord(x, y);
CELL cell = Coord_Cell(coord);
CellClass * cellptr = &Map[cell];
if (cellptr) {
ObjectClass *obj = cellptr->Cell_Object();
if (obj) {
obj->Strength = obj->Class_Of().MaxStrength;
}
else {
if (cellptr->Overlay != OVERLAY_NONE) {
OverlayTypeClass const * optr = &OverlayTypeClass::As_Reference(cellptr->Overlay);
if (optr->IsTiberium) {
const int cellcount = (int)FACING_COUNT + 1;
CellClass* cells[cellcount];
cells[0] = cellptr;
for (FacingType index = FACING_N; index < FACING_COUNT; index++) {
cells[(int)index + 1] = cellptr->Adjacent_Cell(index);
}
for (int index = 0; index < cellcount; index++) {
CellClass * newcell = cells[index];
if (newcell != NULL) {
if (newcell->Can_Tiberium_Germinate()) {
switch (cellptr->Overlay) {
case OVERLAY_GOLD1:
case OVERLAY_GOLD2:
case OVERLAY_GOLD3:
case OVERLAY_GOLD4:
new OverlayClass(Random_Pick(OVERLAY_GOLD1, OVERLAY_GOLD4), newcell->Cell_Number());
newcell->OverlayData = 0;
break;
case OVERLAY_GEMS1:
case OVERLAY_GEMS2:
case OVERLAY_GEMS3:
case OVERLAY_GEMS4:
new OverlayClass(Random_Pick(OVERLAY_GEMS1, OVERLAY_GEMS4), newcell->Cell_Number());
newcell->OverlayData = 0;
break;
default:
break;
}
}
else if (newcell->Land_Type() == LAND_TIBERIUM) {
switch (newcell->Overlay) {
case OVERLAY_GOLD1:
case OVERLAY_GOLD2:
case OVERLAY_GOLD3:
case OVERLAY_GOLD4:
newcell->OverlayData = MIN(newcell->OverlayData + 1, 11);
newcell->Recalc_Attributes();
newcell->Redraw_Objects();
break;
case OVERLAY_GEMS1:
case OVERLAY_GEMS2:
case OVERLAY_GEMS3:
case OVERLAY_GEMS4:
newcell->OverlayData = MIN(newcell->OverlayData + 1, 2);
newcell->Recalc_Attributes();
newcell->Redraw_Objects();
break;
default:
break;
}
}
}
}
}
}
}
}
}
/**************************************************************************************************
* DLLExportClass::Legacy_Render_Enabled -- Is the legacy rendering enabled?
*
* In:
*
* Out:
*
*
*
* History: 4/15/2019 5:46PM - ST
**************************************************************************************************/
bool DLLExportClass::Legacy_Render_Enabled(void)
{
if (GAME_TO_PLAY == GAME_GLYPHX_MULTIPLAYER) {
unsigned int num_humans = 0U;
for (int i = 0; i < MULTIPLAYER_COUNT; ++i) {
HouseClass *player_ptr = HouseClass::As_Pointer(Session.Players[i]->Player.ID);
if (player_ptr && player_ptr->IsHuman) {
if (++num_humans > 1) break;
}
}
return num_humans < 2;
}
//return false;
return true;
}
/**************************************************************************************************
* DLLExportClass::Computer_Message -- Replacement for original Computer_Message function
*
* In:
*
* Out:
*
*
*
* History: 1/27/2020 1:42PM - ST
**************************************************************************************************/
void DLLExportClass::Computer_Message(bool last_player_taunt)
{
HousesType house;
HouseClass *ptr;
HouseClass *ai_players[MAX_PLAYERS];
int ai_player_count = 0;
/*------------------------------------------------------------------------
Find the computer house that the message will be from
------------------------------------------------------------------------*/
for (house = HOUSE_MULTI1; house < (HOUSE_MULTI1 + MULTIPLAYER_COUNT); house++) {
ptr = HouseClass::As_Pointer(house);
if (!ptr || ptr->IsHuman || ptr->IsDefeated) {
continue;
}
ai_players[ai_player_count++] = ptr;
}
if (ai_player_count) {
int ai_player_index = 0;
if (ai_player_count > 1) {
ai_player_index = IRandom(0, ai_player_count - 1);
}
int taunt_index;
if (last_player_taunt) {
taunt_index = 13;
} else {
taunt_index = IRandom(0,12);
}
On_Message(ai_players[ai_player_index], "", 15.0f, MESSAGE_TYPE_COMPUTER_TAUNT, taunt_index);
}
}
/**************************************************************************************************
* DLLExportClass::Set_Special_Key_Flags --
*
* In:
*
* Out:
*
*
*
* History: 6/27/2019 - JAS
**************************************************************************************************/
void DLLExportClass::Set_Special_Key_Flags(unsigned char special_key_flags)
{
SpecialKeyFlags[CurrentLocalPlayerIndex] = special_key_flags;
}
/**************************************************************************************************
* DLLExportClass::Clear_Special_Key_Flags --
*
* In:
*
* Out:
*
*
*
* History: 6/27/2019 - JAS
**************************************************************************************************/
void DLLExportClass::Clear_Special_Key_Flags()
{
SpecialKeyFlags[CurrentLocalPlayerIndex] = 0;
}
/**************************************************************************************************
* DLLExportClass::Get_Input_Key_State --
*
* In:
*
* Out:
*
*
*
* History: 6/27/2019 - JAS
**************************************************************************************************/
bool DLLExportClass::Get_Input_Key_State(KeyNumType key)
{
switch (key)
{
case KN_LCTRL:
return (SpecialKeyFlags[CurrentLocalPlayerIndex] & INPUT_SPECIAL_KEY_CTRL) != 0;
break;
case KN_LSHIFT:
return (SpecialKeyFlags[CurrentLocalPlayerIndex] & INPUT_SPECIAL_KEY_SHIFT) != 0;
break;
case KN_LALT:
return (SpecialKeyFlags[CurrentLocalPlayerIndex] & INPUT_SPECIAL_KEY_ALT) != 0;
break;
default:
break;
};
return false;
}
/**************************************************************************************************
* Get_Input_Key_State
*
* History: 6/27/2019 - JAS
**************************************************************************************************/
bool DLL_Export_Get_Input_Key_State(KeyNumType key)
{
return DLLExportClass::Get_Input_Key_State(key);
}
bool DLLSave(Pipe &file)
{
return DLLExportClass::Save(file);
}
bool DLLLoad(Straw &file)
{
return DLLExportClass::Load(file);
}
/**************************************************************************************************
* DLLExportClass::Save --
*
* In:
*
* Out:
*
*
*
* History: 9/10/2019 10:24AM - ST
**************************************************************************************************/
bool DLLExportClass::Save(Pipe & pipe)
{
/*
** Version first
*/
unsigned int version = CNC_DLL_API_VERSION;
pipe.Put(&version, sizeof(version));
pipe.Put(MultiplayerStartPositions, sizeof(MultiplayerStartPositions));
pipe.Put(GlyphxPlayerIDs, sizeof(GlyphxPlayerIDs));
pipe.Put(&GlyphXClientSidebarWidthInLeptons, sizeof(GlyphXClientSidebarWidthInLeptons));
pipe.Put(MPlayerIsHuman, sizeof(MPlayerIsHuman));
pipe.Put(MultiplayerStartPositions, sizeof(MultiplayerStartPositions));
pipe.Put(PlacementType, sizeof(PlacementType));
pipe.Put(&OverrideNewUnitsEnabled, sizeof(OverrideNewUnitsEnabled));
for (int i=0 ; i<MAX_PLAYERS ; i++) {
Sidebar_Glyphx_Save(pipe, &MultiplayerSidebars[i]);
int has_player = false;
if (i < Session.Players.Count() && Session.Players[i]) {
has_player = true;
pipe.Put(&has_player, sizeof(has_player));
pipe.Put(Session.Players[i], sizeof(NodeNameType));
} else {
pipe.Put(&has_player, sizeof(has_player));
}
}
pipe.Put(&Special, sizeof(Special));
/*
** Room for save game expansion
*/
unsigned char padding[4096];
memset(padding, 0, sizeof(padding));
pipe.Put(padding, sizeof(padding));
return true;
}
/**************************************************************************************************
* DLLExportClass::Load --
*
* In:
*
* Out:
*
*
*
* History: 9/10/2019 10:24AM - ST
**************************************************************************************************/
bool DLLExportClass::Load(Straw & file)
{
unsigned int version = 0;
if (file.Get(&version, sizeof(version)) != sizeof(version)) {
return false;
}
if (file.Get(MultiplayerStartPositions, sizeof(MultiplayerStartPositions)) != sizeof(MultiplayerStartPositions)) {
return false;
}
if (file.Get(GlyphxPlayerIDs, sizeof(GlyphxPlayerIDs)) != sizeof(GlyphxPlayerIDs)) {
return false;
}
if (file.Get(&GlyphXClientSidebarWidthInLeptons, sizeof(GlyphXClientSidebarWidthInLeptons)) != sizeof(GlyphXClientSidebarWidthInLeptons)) {
return false;
}
if (file.Get(MPlayerIsHuman, sizeof(MPlayerIsHuman)) != sizeof(MPlayerIsHuman)) {
return false;
}
if (file.Get(MultiplayerStartPositions, sizeof(MultiplayerStartPositions)) != sizeof(MultiplayerStartPositions)) {
return false;
}
if (file.Get(PlacementType, sizeof(PlacementType)) != sizeof(PlacementType)) {
return false;
}
if (file.Get(&OverrideNewUnitsEnabled, sizeof(OverrideNewUnitsEnabled)) != sizeof(OverrideNewUnitsEnabled)) {
return false;
}
if (Is_Aftermath_Installed()) {
if (Session.Type == GAME_SKIRMISH || Session.Type == GAME_GLYPHX_MULTIPLAYER) {
bAftermathMultiplayer = NewUnitsEnabled = OverrideNewUnitsEnabled;
}
}
Session.NumPlayers = 0;
for (int i=0 ; i<MAX_PLAYERS ; i++) {
Sidebar_Glyphx_Load(file, &MultiplayerSidebars[i]);
int has_player = false;
file.Get(&has_player, sizeof(has_player));
if (has_player) {
NodeNameType *who = new NodeNameType;
file.Get(who, sizeof(NodeNameType));
Session.Players.Add (who);
Session.NumPlayers++;
}
}
if (file.Get(&Special, sizeof(Special)) != sizeof(Special)) {
return false;
}
unsigned char padding[4096];
if (file.Get(padding, sizeof(padding)) != sizeof(padding)) {
return false;
}
return true;
}
/**************************************************************************************************
* DLLExportClass::Code_Pointers --
*
* In:
*
* Out:
*
*
*
* History: 9/10/2019 10:24AM - ST
**************************************************************************************************/
void DLLExportClass::Code_Pointers(void)
{
for (int i=0 ; i<MAX_PLAYERS ; i++) {
Sidebar_Glyphx_Code_Pointers(&MultiplayerSidebars[i]);
if (PlacementType[i]) {
PlacementType[i] = (BuildingTypeClass *) PlacementType[i]->Type;
}
}
}
/**************************************************************************************************
* DLLExportClass::Decode_Pointers --
*
* In:
*
* Out:
*
*
*
* History: 9/10/2019 10:24AM - ST
**************************************************************************************************/
void DLLExportClass::Decode_Pointers(void)
{
for (int i=0 ; i<MAX_PLAYERS ; i++) {
Sidebar_Glyphx_Decode_Pointers(&MultiplayerSidebars[i]);
if (PlacementType[i]) {
StructType type = (StructType) reinterpret_cast<unsigned int>(PlacementType[i]);
PlacementType[i] = NULL;
if (type >= STRUCT_FIRST && type < STRUCT_COUNT) {
TechnoTypeClass const * tech = Fetch_Techno_Type(RTTI_BUILDINGTYPE, type);
if (tech) {
BuildingTypeClass* build_type = (BuildingTypeClass*)(tech);
if (build_type) {
PlacementType[i] = build_type;
}
}
}
}
}
}
void DLL_Code_Pointers(void)
{
DLLExportClass::Code_Pointers();
}
void DLL_Decode_Pointers(void)
{
DLLExportClass::Decode_Pointers();
}
Reference in New Issue View Git Blame Copy Permalink