<?php

define('IS_ERROR', 'error=1');
class DirectAdminLicense {


	var $version = '0.3.2';
	var $remote_host = "https://www.directadmin.com";
	var $user_agent = "DirectAdminLicense Class";
	var $uid = 0;
	var $password = '';

	var $result = '';
	var $error = false;
	var $error_string = '';

	function __construct($client_uid, $client_password)
	{
		$this->uid = $client_uid;
		$this->password = $client_password;
	}

	function reset()
	{
		$this->result='';
		$this->error=false;
		$this->error_string='';
	}

	function exists($lid)
	{
		$licenses = $this->get_licenses($lid);
		if ($licenses === false)
			return false;

		return array_key_exists($lid, $licenses);
	}

	function get_all_licenses() {
		return $this->get_licenses();
	}
	function get_all_active_licenses() {
		return $this->get_licenses('','','Y');
	}
	function get_all_inactive_licenses() {
		return $this->get_licenses('','','N');
	}

	// Licenses that have been recently downloaded
	function get_all_recent_licenses() {
		return $this->get_licenses('','','Y', '31');
	}

	// Llicenses that have not been recently downloaded, or never downloaded.
	// This is what you'd use to find lincenses you can re-use.
	function get_all_non_recent_licenses() {
		return $this->get_licenses('','','Y', '-31');
	}

	function get_license_from_lid($lid)
	{
		$licenses = $this->get_licenses($lid);

		if ($licenses === false)
			return false;

		if (array_key_exists($lid, $licenses))
			return $licenses[$lid];

		//if already have error, string is likely set.
		if (!$this->error)
		{
			$this->error_string .= "Cannot find LID $lid in result";
			$this->error = true;
		}
		return false;
	}

	function get_license_from_ip($ip)
	{
		$licenses = $this->get_licenses('', $ip);

		if ($licenses === false)
			return false;

		foreach ($licenses as $license)
		{
			if (array_key_exists('ip', $license) && $license['ip'] == $ip)
			return $license;
		}

		//if already have error, string is likely set.
		if (!$this->error)
		{
			$this->error_string .= "Cannot find LID from IP '$ip' in result";
			$this->error = true;
		}
		return false;
	}


	//******************************************************************
	//* CHANGE THE IP OF THE LICENSE(only for approved accounts)
	function change_ip($lid, $new_ip) {
		return $this->do_special($lid, 'saveip', 'ip', $new_ip);
	}

	//******************************************************************
	//* CHANGE THE OS OF THE LICENSE
	function change_os($lid, $new_os) {
		return $this->do_special($lid, 'saveos', 'os', $new_os);
	}
	//******************************************************************
	//* CHANGE THE NAME OF THE LICENSE
	function change_name($lid, $new_name) {
		return $this->do_special($lid, 'savename', 'name', $new_name);
	}

	//******************************************************************
	//* LIST ALL OPERATING SYSTEMS
	//* active='' for all.  'yes' for actives, 'no' for inactives.
	//* Just use get_active_os_list() for the 'yes' case.
	function get_os_list($active='')
	{
		$vars = array();
		if ($active != '')
			$vars['active'] = $active;

		$ch = $this->get_curl("/clients/api/os_list.php", $vars);

		$this->run_curl($ch);

		if ($this->error)
			return false;

		if ($this->result_has_error())
			return false;

		$os_list = array();

		$raw_lines = explode("\n", $this->result);
		foreach ($raw_lines as $line)
		{
			if ($line == '') continue;

			list($name, $text) = explode('=', $line);
			if ($name == '' || $text == '') continue;
			$os_list[$name] = $text;
		}

		return $os_list;
	}
	function get_active_os_list() {
		return $this->show_os_list('yes');
	}


	//******************************************************************
	//* List All Available Products and their pid numbers.
	function get_products()
	{
		$ch = $this->get_curl("/clients/api/products.php");

		$this->run_curl($ch);

		if ($this->error)
			return false;

		if ($this->result_has_error())
			return false;

		$product_list = array();

		$raw_lines = explode("\n", $this->result);
		foreach ($raw_lines as $line)
		{
			if ($line == '') continue;

			list($name, $text) = explode('=', $line);
			if ($name == '' || $text == '') continue;
			$product_list[$name] = $text;
		}

		return $product_list;
	}

	//******************************************************************
	//* List All Available Products and their pid numbers.
	function get_user_info()
	{
		$ch = $this->get_curl("/clients/api/user_info.php");

		$this->run_curl($ch);

		if ($this->error)
			return false;

		if ($this->result_has_error())
			return false;

		parse_str($this->result, $user_info);
		return $user_info;
	}

	//******************************************************************
	//* Used to access list.php in it's various forms.
	function save_commments($lid, $tag, $desc)
	{
		$vars = array();
		$vars['tag'] = $tag;
		$vars['desc'] = $desc;
		$vars['lid'] = $lid;

		$ch = $this->get_curl("/clients/api/savecomments.php", $vars, 'POST');

		$this->run_curl($ch);

		if ($this->error)
			return false;

		if ($this->result_has_error())
			return false;

		return true;
	}


	//******************************************************************
	//* Used to create a license.
	//* $data should include: ip, pid, name, email, os, domain, payment
	function create_license($data)
	{
		$data['id'] = $this->uid;
		$data['password'] = $this->password;
		$data['api'] = 1;

		//filler data, not used or important.
		$data['pass1'] = $data['pass2'] = $data['admin_pass1'] = $data['admin_pass2'] = 'fake';
		$data['username'] = 'admin';
		$data['ns1'] = 'ns1'.$data['domain'];
		$data['ns2'] = 'ns2'.$data['domain'];
		$data['ns_on_server'] = 'no';

		$ch = $this->get_curl("/clients/api/createlicense.php", $data, 'POST');

		curl_setopt($ch, CURLOPT_REFERER, "https://www.directadmin.com/clients/createlicense.php");
		curl_setopt($ch, CURLOPT_HEADER, 1); //for X-lid

		if( !($response=curl_exec($ch)) )
		{
			$this->error_string .= curl_error($ch);
			$this->error = true;
			curl_close($ch);
			return false;
		}

		$header_size	= curl_getinfo($ch, CURLINFO_HEADER_SIZE);
		$header			= substr($response, 0, $header_size);
		$this->result	= substr($response, $header_size);
		curl_close($ch);

		if ($this->result_has_error())
			return false;

		//get X-lid header.
		$headers = $this->get_headers($header);

		if (!isset($headers['X-lid']) || !is_numeric($headers['X-lid']))
		{
			$this->error = true;
			$this->error_string = "License might be created, but cannot get X-lid header from result: ".$this->result;
			return false;
		}

		return $headers['X-lid'];
	}


	//******************************************************************
	//* Used to delete a license, if you're allowed. (approved accounts only)
	function delete_license($lid)
	{
		$vars = array();
		$vars['uid'] = $this->uid;
		$vars['password'] = $this->password;
		$vars['lid'] = $lid;
		$vars['api'] = 1;

		$ch = $this->get_curl("/cgi-bin/deletelicense", $vars, 'POST');

		curl_setopt($ch, CURLOPT_REFERER, "https://www.directadmin.com/clients/license.php");

		$this->run_curl($ch);

		if ($this->error)
			return false;

		if ($this->result_has_error())
			return false;

		return true;
	}

	//******************************************************************
	//* Used to make a balance payment on a license, if you're allowed. (approved accounts only)
	function make_payment($lid)
	{
		$vars = array();
		$vars['uid'] = $this->uid;
		$vars['password'] = $this->password;
		$vars['action'] = 'pay';
		$vars['lid'] = $lid;
		$vars['api'] = 1;

		$ch = $this->get_curl("/cgi-bin/makepayment", $vars, 'POST');

		curl_setopt($ch, CURLOPT_REFERER, "https://www.directadmin.com/clients/makepayment.php");

		$this->run_curl($ch);

		if ($this->error)
			return false;

		$this->result = trim($this->result); //output has extra newline ahead of data.

		if ($this->result_has_error())
			return false;

		return true;
	}


	//************************************************************************************************************************************
	//* PRIVATE FUNCTIONS - nothing for you to call below this point.
	//************************************************************************************************************************************


	//******************************************************************
	//* Setup the connection handler.
	private function get_curl($url, $vars='', $method='GET')
	{
		$var_string = '';
		$c=0;
		if ($vars != '')
		foreach($vars as $v_name=>$v_value)
		{
			if ($c++>0) $var_string.='&';
			$var_string .= urlencode($v_name).'='.urlencode($v_value);
		}

		$get_vars = '';
		if ($method == 'GET')
			$url .= '?'.$var_string;

		$ch = curl_init($this->remote_host.$url);

		curl_setopt($ch, CURLOPT_USERPWD, $this->uid.':'.$this->password);

		if ($method == 'POST')
		{
			curl_setopt($ch, CURLOPT_POST, 1);
			curl_setopt($ch, CURLOPT_POSTFIELDS, $var_string);
		}

		curl_setopt($ch, CURLOPT_HTTP_VERSION, CURL_HTTP_VERSION_1_1);
		curl_setopt($ch, CURLOPT_USERAGENT, $this->user_agent);
		curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
		curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0); //1
		curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0); //2
		curl_setopt($ch, CURLOPT_FORBID_REUSE, 1);
		curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 20);
		curl_setopt($ch, CURLOPT_TIMEOUT, 15);
		curl_setopt($ch, CURLOPT_HTTPHEADER, array('Connection: Close'));
		//curl_setopt($ch, CURLOPT_SSLVERSION, CURL_SSLVERSION_TLSv1_2);

		return $ch;
	}

	//******************************************************************
	//* Pull the trigger
	private function run_curl($ch)
	{
		if( !($this->result=curl_exec($ch)) )
		{
			$this->error_string .= curl_error($ch);
			$this->error = true;
		}
		curl_close($ch);
		return $this->result;
	}


	//******************************************************************
	//* Used to access list.php in it's various forms.
	private function do_special($lid, $action, $name, $value)
	{
		$vars = array();
		$vars[$name] = $value;
		$vars[$action] = 'yes';

		$ch = $this->get_curl("/clients/api/special.php?lid=$lid", $vars, 'POST');

		$this->run_curl($ch);

		if ($this->error)
			return false;

		if ($this->result_has_error())
			return false;

		return true;
	}


	//******************************************************************
	//* Used to access list.php in it's various forms.
	private function get_licenses($lid='', $ip='', $active='', $recent_download='')
	{
		$vars = array();
		if ($lid != '')
			$vars['lid'] = $lid;
		if ($ip != '')
			$vars['ip'] = $ip;
		if ($active != '')
			$vars['active'] = $active;
		if ($recent_download != '')
			$vars['recent_download'] = $recent_download;

		$ch = $this->get_curl("/clients/api/list.php", $vars);

		$this->run_curl($ch);

		if ($this->error)
			return false;

		if ($this->result_has_error())
			return false;

		$licenses = array();

		$raw_lines = explode("\n", $this->result);
		foreach ($raw_lines as $line)
		{
			if ($line == '') continue;

			parse_str($line, $license);
			if (!array_key_exists('lid', $license) || !is_numeric($license['lid']))
			{
				$this->error = true;
				$this->error_string .= 'Cannot find lid from: '.$line."\n";
				continue;
			}

			$licenses[$license['lid']] = $license;
		}

		return $licenses;
	}

	//******************************************************************
	//* Check the filled result for error=1, and set the text.
	private function result_has_error()
	{
		if (substr($this->result, 0, strlen(IS_ERROR)) === IS_ERROR)
		{
			parse_str($this->result, $return_variables);

			$this->error = true;
			$this->error_string .= urldecode($return_variables['text']);

			return true;
		}

		return false;
	}

	private function get_headers($header_text)
	{
		$headers = array();

		$raw_lines = explode("\n", $header_text);
		$c=0;
		foreach ($raw_lines as $line)
		{
			if ($c++==0) continue; //skip HTTP/1.1
			$line = trim($line);
			if ($line == '' || $line == "\n") continue;

			list($name, $value) = explode(':', $line);
			$headers[trim($name)] = trim($value);
		}

		return $headers;
	}


}
?>