Files
CydandClaude Fable 5 fdd9ac9d97 Initial import: Tesla Release 4.10 (Tesla:BattleTech & Tesla:Red Planet)
Archival snapshot of the Virtual World Entertainment Tesla cockpit
software, 1994-1996: MUNGA engine and L4 pod layer source (Borland
C++ 5.0), BT/RP game code, and game content (models, audio, maps,
gauges, Division renderer data). Includes third-party libraries:
Division dVS/DPL graphics, HMI SOS audio, WATTCP networking.

Files are preserved byte-for-byte (.gitattributes disables all
line-ending conversion). README.md documents the layout, target
hardware, and toolchain.

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
2026-07-02 13:21:58 -05:00

62 lines
2.1 KiB
C++

//===========================================================================//
// File: l4host.cpp //
// Project: MUNGA Brick: Connection Library //
// Contents: additional L4 data types and functions for hosts //
//---------------------------------------------------------------------------//
// Date Who Modification //
// -------- --- ---------------------------------------------------------- //
// 04/09/95 GAC Initial coding. //
//---------------------------------------------------------------------------//
// Copyright (C) 1994-1995, Virtual World Entertainment, Inc. //
// All Rights reserved worldwide //
// This unpublished sourcecode is PROPRIETARY and CONFIDENTIAL //
//===========================================================================//
#include <mungal4.hpp>
#pragma hdrstop
#if !defined(L4HOST_HPP)
# include <l4host.hpp>
#endif
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
// Constructor for l4host
//
L4Host::L4Host(
HostID host_ID,
HostType host_type,
NetworkAddress network_address,
unsigned long network_socket,
const CString &net_name):
Host(
host_ID,
host_type,
network_address),
SymbolicName(net_name)
{
NetworkSocket = network_socket;
// ConnectStatus = NoNetworkConnectionStatus;
pad_head = 0;
pad_tail = 0;
pad_size = L4HOST_PAD_BUFFER_SIZE;
#if defined(TRACE_SEND_BUFFER)
sprintf(sendBufferTraceName,"Send Buffer %d",network_address&0xff);
sendBufferTrace =
new TraceOf<int>(
sendBufferTraceName,
0,
Trace::IntegerType,
TraceSample::IntegerSnapshot
);
Register_Object(sendBufferTrace);
sendBufferTrace->TakeSnapshot(4096);
#endif
}
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
// Destructor for l4host
//
L4Host::~L4Host()
{
}