TOOL.Category = "Wire - I/O"
TOOL.Name = "Vehicle Controller"
TOOL.Command = nil -- What is this for?
TOOL.ConfigName = ""

if CLIENT then
	language.Add("Tool_wire_vehicle_name", "Vehicle Controller Tool (Wire)")
	language.Add("Tool_wire_vehicle_desc", "Spawn/link a Wire Vehicle controller.")
	language.Add("Tool_wire_vehicle_0", "Primary: Create Vehicle controller. Secondary: Link controller.")
	language.Add("Tool_wire_vehicle_1", "Now select the Vehicle to link to.")
	language.Add("WireVehicleTool_Vehicle", "Vehicle:")
	language.Add("sboxlimit_wire_vehicles", "You've hit your Vehicle Controller limit!")
	language.Add("Undone_Wire Vehicle", "Undone Wire Vehicle Controller")
end

if SERVER then
	CreateConVar('sbox_maxwire_vehicles', 20)
end

TOOL.Model = "models/jaanus/wiretool/wiretool_siren.mdl"

cleanup.Register("wire_vehicles")

function TOOL:LeftClick(trace)
	if not trace.HitPos then return false end
	if trace.Entity:IsPlayer() then return false end
	if CLIENT then return true end

	local ply = self:GetOwner()

	if trace.Entity:IsValid() and trace.Entity:GetClass() == "gmod_wire_vehicle" and trace.Entity:GetTable().pl == ply then
		return true
	end

	if not self:GetSWEP():CheckLimit("wire_vehicles") then return false end

	local Ang = trace.HitNormal:Angle()
	Ang.pitch = Ang.pitch + 90

	local wire_vehicle = MakeWireVehicle(ply, trace.HitPos, Ang)

	wire_vehicle:SetPos(trace.HitPos - trace.HitNormal * wire_vehicle:OBBMins().z)
	
	local const = WireLib.Weld(wire_vehicle, trace.Entity, trace.PhysicsBone, true)

	undo.Create("Wire Vehicle")
		undo.AddEntity(wire_vehicle)
		undo.AddEntity(const)
		undo.SetPlayer(ply)
	undo.Finish()

	ply:AddCleanup("wire_vehicles", wire_vehicle)

	return true
end

function TOOL:RightClick(trace)
	if (self:GetStage() == 0) and trace.Entity:GetClass() == "gmod_wire_vehicle" then
		self.VehicleCont = trace.Entity
		self:SetStage(1)
		return true
	elseif self:GetStage() == 1 and trace.Entity.GetPassenger then
		self.VehicleCont:Setup(trace.Entity)
		self:SetStage(0)
		self.VehicleCont = nil
		return true
	else
		return false
	end
end

function TOOL:Reload(trace)
	self:SetStage(0)
	self.VehicleCont = nil
end

if SERVER then

	function MakeWireVehicle(pl, Pos, Ang, Keys)
		if not pl:CheckLimit("wire_vehicles") then return false end
		
		local wire_vehicle = ents.Create("gmod_wire_vehicle")
		if not wire_vehicle:IsValid() then return false end
		
		wire_vehicle:SetAngles(Ang)
		wire_vehicle:SetPos(Pos)
		wire_vehicle:Spawn()
		wire_vehicle:SetPlayer(pl)
		wire_vehicle.pl = pl
		
		pl:AddCount("wire_vehicles", wire_vehicle)
		
		return wire_vehicle
	end
	
	duplicator.RegisterEntityClass("gmod_wire_vehicle", MakeWireVehicle, "Pos", "Ang", "Vel", "aVel", "frozen")
end

function TOOL:UpdateGhostWireVehicle(ent, player)
	if  not ent or not ent:IsValid() then return end

	local tr = utilx.GetPlayerTrace(player, player:GetCursorAimVector())
	local trace = util.TraceLine(tr)

	if not trace.Hit or trace.Entity:IsPlayer() or trace.Entity:GetClass() == "gmod_wire_vehicle" then
		ent:SetNoDraw(true)
		return
	end

	local Ang = trace.HitNormal:Angle()
	Ang.pitch = Ang.pitch + 90

	ent:SetPos(trace.HitPos - trace.HitNormal * ent:OBBMins().z)
	ent:SetAngles(Ang)

	ent:SetNoDraw(false)
end

function TOOL:Think()
	if not self.GhostEntity or not self.GhostEntity:IsValid() or self.GhostEntity:GetModel() ~= self.Model then
		self:MakeGhostEntity(self.Model, Vector(0,0,0), Angle(0,0,0))
	end

	self:UpdateGhostWireVehicle(self.GhostEntity, self:GetOwner())
end

function TOOL.BuildCPanel(panel)
	panel:AddControl("Header", { Text = "#Tool_wire_vehicle_name", Description = "#Tool_wire_vehicle_desc" })
end