// +build integration

/*
Real-time Online/Offline Charging System (OCS) for Telecom & ISP environments
Copyright (C) ITsysCOM GmbH

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program.  If not, see <http://www.gnu.org/licenses/>
*/

package agents

import (
	"bytes"
	"crypto/tls"
	"crypto/x509"
	"fmt"
	"io/ioutil"
	"net/http"
	"net/rpc"
	"net/rpc/jsonrpc"
	"path"
	"reflect"
	"testing"
	"time"

	"github.com/cgrates/cgrates/config"
	"github.com/cgrates/cgrates/engine"
	"github.com/cgrates/cgrates/utils"
)

var (
	haCfgPath string
	haCfg     *config.CGRConfig
	haRPC     *rpc.Client
	httpC     *http.Client // so we can cache the connection
	err       error
	isTls     bool
)

var sTestsHA = []func(t *testing.T){
	testHAitResetDB,
	testHAitStartEngine,
	testHAitApierRpcConn,
	testHAitTPFromFolder,
	testHAitAuthDryRun,
	testHAitAuth1001,
	testHAitCDRmtcall,
	testHAitCDRmtcall2,
	testHAitStopEngine,
}

func TestHAitSimple(t *testing.T) {
	haCfgPath = path.Join(*dataDir, "conf", "samples", "httpagent")
	// Init config first
	var err error
	haCfg, err = config.NewCGRConfigFromPath(haCfgPath)
	if err != nil {
		t.Error(err)
	}
	haCfg.DataFolderPath = *dataDir // Share DataFolderPath through config towards StoreDb for Flush()
	config.SetCgrConfig(haCfg)
	httpC = new(http.Client)
	for _, stest := range sTestsHA {
		t.Run("httpagent", stest)
	}
}

func TestHA2itWithTls(t *testing.T) {
	haCfgPath = path.Join(*dataDir, "conf", "samples", "httpagenttls")
	// Init config first
	var err error
	haCfg, err = config.NewCGRConfigFromPath(haCfgPath)
	if err != nil {
		t.Error(err)
	}
	haCfg.DataFolderPath = *dataDir // Share DataFolderPath through config towards StoreDb for Flush()
	config.SetCgrConfig(haCfg)
	//make http client with tls
	cert, err := tls.LoadX509KeyPair(haCfg.TlsCfg().ClientCerificate, haCfg.TlsCfg().ClientKey)
	if err != nil {
		t.Error(err)
	}

	// Load CA cert
	caCert, err := ioutil.ReadFile(haCfg.TlsCfg().CaCertificate)
	if err != nil {
		t.Error(err)
	}
	rootCAs, _ := x509.SystemCertPool()
	if ok := rootCAs.AppendCertsFromPEM(caCert); !ok {
		t.Error("Cannot append CA")
	}

	// Setup HTTPS client
	tlsConfig := &tls.Config{
		Certificates: []tls.Certificate{cert},
		RootCAs:      rootCAs,
	}
	transport := &http.Transport{TLSClientConfig: tlsConfig}
	httpC = &http.Client{Transport: transport}
	isTls = true
	for _, stest := range sTestsHA {
		t.Run("httpagenttls", stest)
	}
}

// Remove data in both rating and accounting db
func testHAitResetDB(t *testing.T) {
	if err := engine.InitDataDb(haCfg); err != nil {
		t.Fatal(err)
	}
	if err := engine.InitStorDb(haCfg); err != nil {
		t.Fatal(err)
	}
}

// Start CGR Engine
func testHAitStartEngine(t *testing.T) {
	if _, err := engine.StopStartEngine(haCfgPath, *waitRater); err != nil {
		t.Fatal(err)
	}
}

// Connect rpc client to rater
func testHAitApierRpcConn(t *testing.T) {
	var err error
	haRPC, err = jsonrpc.Dial("tcp", haCfg.ListenCfg().RPCJSONListen) // We connect over JSON so we can also troubleshoot if needed
	if err != nil {
		t.Fatal(err)
	}
}

// Load the tariff plan, creating accounts and their balances
func testHAitTPFromFolder(t *testing.T) {
	attrs := &utils.AttrLoadTpFromFolder{FolderPath: path.Join(*dataDir, "tariffplans", "oldtutorial")}
	var loadInst utils.LoadInstance
	if err := haRPC.Call("ApierV2.LoadTariffPlanFromFolder", attrs, &loadInst); err != nil {
		t.Error(err)
	}
	time.Sleep(time.Duration(*waitRater) * time.Millisecond) // Give time for scheduler to execute topups
	//add a default charger
	chargerProfile := &engine.ChargerProfile{
		Tenant:       "cgrates.org",
		ID:           "Default",
		RunID:        utils.MetaDefault,
		AttributeIDs: []string{"*none"},
		Weight:       20,
	}
	var result string
	if err := haRPC.Call("ApierV1.SetChargerProfile", chargerProfile, &result); err != nil {
		t.Error(err)
	} else if result != utils.OK {
		t.Error("Unexpected reply returned", result)
	}
}

func testHAitAuthDryRun(t *testing.T) {
	httpConst := "http"
	addr := haCfg.ListenCfg().HTTPListen
	if isTls {
		addr = haCfg.ListenCfg().HTTPTLSListen
		httpConst = "https"
	}
	reqUrl := fmt.Sprintf("%s://%s%s?request_type=OutboundAUTH&CallID=123456&Msisdn=497700056231&Imsi=2343000000000123&Destination=491239440004&MSRN=0102220233444488999&ProfileID=1&AgentID=176&GlobalMSISDN=497700056129&GlobalIMSI=214180000175129&ICCID=8923418450000089629&MCC=234&MNC=10&calltype=callback",
		httpConst, addr, haCfg.HttpAgentCfg()[0].Url)
	rply, err := httpC.Get(reqUrl)
	if err != nil {
		t.Fatal(err)
	}
	eXml := []byte(`<?xml version="1.0" encoding="UTF-8"?>
<response>
  <Allow>1</Allow>
  <Concatenated>234/Val1</Concatenated>
  <MaxDuration>1200</MaxDuration>
</response>`)
	if body, err := ioutil.ReadAll(rply.Body); err != nil {
		t.Error(err)
	} else if !reflect.DeepEqual(eXml, body) {
		t.Errorf("expecting: <%s>, received: <%s>", string(eXml), string(body))
	}
	rply.Body.Close()
	time.Sleep(time.Millisecond)
}

func testHAitAuth1001(t *testing.T) {
	acnt := "20002"
	maxDuration := 60

	attrSetBalance := utils.AttrSetBalance{
		Tenant:        "cgrates.org",
		Account:       acnt,
		BalanceType:   utils.VOICE,
		BalanceID:     utils.StringPointer("TestDynamicDebitBalance"),
		Value:         utils.Float64Pointer(float64(maxDuration) * float64(time.Second)),
		RatingSubject: utils.StringPointer("*zero5ms"),
	}
	var reply string
	if err := haRPC.Call("ApierV2.SetBalance", attrSetBalance, &reply); err != nil {
		t.Error(err)
	} else if reply != utils.OK {
		t.Errorf("Received: %s", reply)
	}
	time.Sleep(10 * time.Millisecond)

	httpConst := "http"
	addr := haCfg.ListenCfg().HTTPListen
	if isTls {
		addr = haCfg.ListenCfg().HTTPTLSListen
		httpConst = "https"
	}

	reqUrl := fmt.Sprintf("%s://%s%s?request_type=OutboundAUTH&CallID=123456&Msisdn=%s&Imsi=2343000000000123&Destination=1002&MSRN=0102220233444488999&ProfileID=1&AgentID=176&GlobalMSISDN=497700056129&GlobalIMSI=214180000175129&ICCID=8923418450000089629&MCC=234&MNC=10&calltype=callback",
		httpConst, addr, haCfg.HttpAgentCfg()[0].Url, acnt)
	rply, err := httpC.Get(reqUrl)
	if err != nil {
		t.Error(err)
	}
	eXml := []byte(fmt.Sprintf(`<?xml version="1.0" encoding="UTF-8"?>
<response>
  <Allow>1</Allow>
  <MaxDuration>%v</MaxDuration>
</response>`, maxDuration))
	if body, err := ioutil.ReadAll(rply.Body); err != nil {
		t.Error(err)
	} else if !reflect.DeepEqual(eXml, body) {
		t.Errorf("expecting: %s, received: %s", string(eXml), string(body))
	}
	rply.Body.Close()
	time.Sleep(time.Millisecond)
}

func testHAitCDRmtcall(t *testing.T) {
	httpConst := "http"
	addr := haCfg.ListenCfg().HTTPListen
	if isTls {
		addr = haCfg.ListenCfg().HTTPTLSListen
		httpConst = "https"
	}
	reqUrl := fmt.Sprintf("%s://%s%s?request_type=MTCALL_CDR&timestamp=2018-08-14%%2012:03:22&call_date=2018-0814%%2012:00:49&transactionid=10000&CDR_ID=123456&carrierid=1&mcc=0&mnc=0&imsi=434180000000000&msisdn=1001&destination=1002&leg=C&leg_duration=185&reseller_charge=11.1605&client_charge=0.0000&user_charge=22.0000&IOT=0&user_balance=10.00&cli=%%2B498702190000&polo=0.0100&ddi_map=N",
		httpConst, addr, haCfg.HttpAgentCfg()[0].Url)
	rply, err := httpC.Get(reqUrl)
	if err != nil {
		t.Error(err)
	}
	eXml := []byte(`<?xml version="1.0" encoding="UTF-8"?>
<CDR_RESPONSE>
  <CDR_ID>123456</CDR_ID>
  <CDR_STATUS>1</CDR_STATUS>
</CDR_RESPONSE>`)
	if body, err := ioutil.ReadAll(rply.Body); err != nil {
		t.Error(err)
	} else if !reflect.DeepEqual(eXml, body) {
		t.Errorf("expecting: <%s>, received: <%s>", string(eXml), string(body))
	}
	rply.Body.Close()
	time.Sleep(50 * time.Millisecond)
	var cdrs []*engine.ExternalCDR
	req := utils.RPCCDRsFilter{RunIDs: []string{utils.META_DEFAULT}}
	if err := haRPC.Call(utils.ApierV2GetCDRs, req, &cdrs); err != nil {
		t.Error("Unexpected error: ", err.Error())
	} else if len(cdrs) != 1 {
		t.Error("Unexpected number of CDRs returned: ", len(cdrs))
	} else {
		if cdrs[0].Usage != "3m5s" { // should be 1 but maxUsage returns rounded version
			t.Errorf("Unexpected CDR Usage received, cdr: %s ", utils.ToJSON(cdrs[0]))
		}
		if cdrs[0].Cost != 0.2188 {
			t.Errorf("Unexpected CDR Cost received, cdr: %+v ", cdrs[0].Cost)
		}
		if cdrs[0].OriginHost != "127.0.0.1" {
			t.Errorf("Unexpected CDR OriginHost received, cdr: %+v ", cdrs[0].OriginHost)
		}
	}
}

func testHAitCDRmtcall2(t *testing.T) {
	xmlBody := `<?xml version="1.0" encoding="utf-8"?><complete-datasession-notification callid="48981764"><createtime>2005-08-26T14:17:34</createtime><reference>Data</reference><userid>528594</userid><username>447700086788</username><customerid>510163</customerid><companyname>Silliname</companyname><totalcost amount="0.1400" currency="USD">0.1400</totalcost><agenttotalcost amount="0.1400" currency="USD">0.1400</agenttotalcost><agentid>234</agentid><callleg calllegid="89357336"><number>447700086788</number><description>China, Peoples Republic of - China Unicom (CU-GSM)</description><mcc>460</mcc><mnc>001</mnc><seconds>32</seconds><bytes>4558</bytes><permegabyterate  currency="USD">1.3330</permegabyterate><cost amount="0.1400" currency="USD">0.1400</cost><agentpermegabyterate currency="USD">1.3330</agentpermegabyterate><agentcost amount="0.1400"currency="USD">0.1400</agentcost></callleg></complete-datasession-notification>`
	httpConst := "http"
	addr := haCfg.ListenCfg().HTTPListen
	if isTls {
		addr = haCfg.ListenCfg().HTTPTLSListen
		httpConst = "https"
	}
	url := fmt.Sprintf("%s://%s%s", httpConst, addr, haCfg.HttpAgentCfg()[1].Url)

	req, err := http.NewRequest("POST", url, bytes.NewBuffer([]byte(xmlBody)))
	if err != nil {
		t.Error(err)
	}
	req.Header.Add("Content-Type", "application/xml; charset=utf-8")
	resp, err := httpC.Do(req)
	if err != nil {
		t.Error(err)
	}
	resp.Body.Close()

	time.Sleep(50 * time.Millisecond)
	var cdrs []*engine.ExternalCDR
	fltr := utils.RPCCDRsFilter{RunIDs: []string{utils.META_DEFAULT}, Accounts: []string{"447700086788"}}
	if err := haRPC.Call(utils.ApierV2GetCDRs, fltr, &cdrs); err != nil {
		t.Error("Unexpected error: ", err.Error())
	} else if len(cdrs) != 1 {
		t.Error("Unexpected number of CDRs returned: ", len(cdrs))
	} else {
		if cdrs[0].Usage != "4558" { // should be 1 but maxUsage returns rounded version
			t.Errorf("Unexpected CDR Usage received, cdr: %s ", utils.ToJSON(cdrs[0]))
		}
	}
}

func testHAitStopEngine(t *testing.T) {
	if err := engine.KillEngine(*waitRater); err != nil {
		t.Error(err)
	}
}