1

/* $Id$ */

     2

     3

/** @file ai_vehicle.cpp handles the functions of the AIVehicle class */

     4

     5

#include "ai_vehicle.hpp"

     6

#include "ai_cargo.hpp"

     7

#include "../../command.h"

     8

#include "../../depot.h"

     9

#include "../../engine.h"

    10

#include "../../player.h"

    11

#include "../../vehicle.h"

    12

    13

/* static */ bool AIVehicle::IsValidEngine(EngineID engine_id)

    14

{

    15

	return ::IsEngineIndex(engine_id); // TODO: implement 'can I build this engine check'

    16

}

    17

    18

/* static */ bool AIVehicle::IsValidVehicle(VehicleID vehicle_id)

    19

{

    20

	return ::IsValidVehicleID(vehicle_id) && ::GetVehicle(vehicle_id)->owner == _current_player;

    21

}

    22

    23

EngineID AIVehicle::FindBestRoadVehicle(CargoID cargo, uint8 min_reliability)

    24

{

    25

	if (!AICargo::IsValidCargo(cargo) || min_reliability > 100) return INVALID_ENGINE;

    26

    27

	EngineID best_engine = INVALID_ENGINE;

    28

	EngineID engine_id;

    29

    30

	FOR_ALL_ENGINEIDS_OF_TYPE(engine_id, VEH_ROAD) {

    31

		/* Is the vehicle available for this player */

    32

		if (IsEngineBuildable(engine_id, VEH_ROAD, _current_player) &&

    33

				GetEngine(engine_id)->reliability * 100 >= min_reliability << 16 &&

    34

				(RoadVehInfo(engine_id)->cargo_type == cargo || CanRefitTo(engine_id, cargo))) {

    35

			best_engine = engine_id;

    36

		}

    37

	}

    38

    39

	return best_engine;

    40

}

    41

    42

VehicleID AIVehicle::BuildVehicle(TileIndex depot, EngineID engine_id)

    43

{

    44

	if (!this->IsValidEngine(engine_id)) return false;

    45

    46

	bool ret;

    47

	switch (::GetEngine(engine_id)->type) {

    48

		case VEH_ROAD: ret = this->DoCommand(depot, engine_id, 0, CMD_BUILD_ROAD_VEH); break;

    49

		default: NOT_REACHED(); return INVALID_VEHICLE; // TODO: implement trains, ships and aircraft

    50

	}

    51

    52

	return ret ? AIObject::GetNewVehicleID() : INVALID_VEHICLE;

    53

}

    54

    55

VehicleID AIVehicle::CloneVehicle(TileIndex depot, VehicleID vehicle_id, bool share_orders)

    56

{

    57

	if (!this->IsValidVehicle(vehicle_id)) return false;

    58

    59

	bool ret;

    60

	switch (::GetVehicle(vehicle_id)->type) {

    61

		case VEH_ROAD: ret = this->DoCommand(depot, vehicle_id, share_orders, CMD_CLONE_VEHICLE); break;

    62

		default: return INVALID_VEHICLE; // TODO: implement trains, ships and aircraft

    63

	}

    64

    65

	return ret ? AIObject::GetNewVehicleID() : INVALID_VEHICLE;

    66

}

    67

    68

bool AIVehicle::RefitVehicle(VehicleID vehicle_id, CargoID cargo)

    69

{

    70

	if (!this->IsValidVehicle(vehicle_id) || !AICargo::IsValidCargo(cargo)) return false;

    71

    72

	switch (::GetVehicle(vehicle_id)->type) {

    73

		case VEH_ROAD: return this->DoCommand(0, vehicle_id, cargo, CMD_REFIT_ROAD_VEH);

    74

		default: return false; // TODO: implement trains, ships and aircraft

    75

	}

    76

}

    77

    78

    79

bool AIVehicle::SellVehicle(VehicleID vehicle_id)

    80

{

    81

	if (!this->IsValidVehicle(vehicle_id)) return false;

    82

    83

	switch (::GetVehicle(vehicle_id)->type) {

    84

		case VEH_ROAD: return this->DoCommand(0, vehicle_id, 0, CMD_SELL_ROAD_VEH);

    85

		default: return false; // TODO: implement trains, ships and aircraft

    86

	}

    87

}

    88

    89

bool AIVehicle::SendVehicleToDepot(VehicleID vehicle_id)

    90

{

    91

	if (!this->IsValidVehicle(vehicle_id)) return false;

    92

    93

	switch (::GetVehicle(vehicle_id)->type) {

    94

		case VEH_ROAD: return this->DoCommand(0, vehicle_id, 0, CMD_SEND_ROADVEH_TO_DEPOT);

    95

		default: return false; // TODO: implement trains, ships and aircraft

    96

	}

    97

}

    98

    99

bool AIVehicle::StartStopVehicle(VehicleID vehicle_id)

   100

{

   101

	if (!this->IsValidVehicle(vehicle_id)) return false;

   102

   103

	switch (::GetVehicle(vehicle_id)->type) {

   104

		case VEH_ROAD: return this->DoCommand(0, vehicle_id, 0, CMD_START_STOP_ROADVEH);

   105

		default: return false; // TODO: implement trains, ships and aircraft

   106

	}

   107

}

   108

   109

bool AIVehicle::SkipVehicleOrder(VehicleID vehicle_id)

   110

{

   111

	if (!this->IsValidVehicle(vehicle_id)) return false;

   112

   113

	return this->DoCommand(0, vehicle_id, 0, CMD_SKIP_ORDER);

   114

}