package jmri.jmrix.can.cbus;

import jmri.jmrix.can.TrafficControllerScaffold;
import jmri.jmrix.can.CanMessage;
import jmri.jmrix.can.CanReply;
import jmri.Light;
import jmri.VariableLight;
import jmri.util.JUnitAppender;
import jmri.util.JUnitUtil;

import org.junit.Assert;
import org.junit.jupiter.api.*;

// import org.slf4j.Logger;
// import org.slf4j.LoggerFactory;

/**
 *
 * @author Paul Bender Copyright (C) 2017
 * @author Steve Young Copyright (C) 2018
 */
public class CbusLightTest extends jmri.implementation.AbstractLightTestBase {

    private TrafficControllerScaffold tcis = null;

    @Override
    public int numListeners() {
        return tcis.numListeners();
    }
    
    @Override
    public void checkOnMsgSent() {
        Assert.assertEquals("ON message", "[5f8] 90 01 C8 01 41",
        tcis.outbound.elementAt(tcis.outbound.size() - 1).toString());
        Assert.assertEquals("ON state", Light.ON, t.getState());
    }

    @Override
    public void checkOffMsgSent() {
        Assert.assertEquals("OFF message", "[5f8] 91 01 C8 01 41",
        tcis.outbound.elementAt(tcis.outbound.size() - 1).toString());
        Assert.assertEquals("OFF state", Light.OFF, t.getState());
    }    

    @Test
    public void testNullEvent() {
        Exception ex = Assertions.assertThrows(NullPointerException.class, () -> {
            t = new CbusLight("ML",null,tcis);
        });
        Assertions.assertNotNull(ex);
    }

    @Test
    public void testCTorShortEventSingle() {
        t = new CbusLight("ML","+7",tcis);
        Assert.assertNotNull("exists",t);
    }

    @Test
    public void testCTorShortEventSingleNegative() {
        t = new CbusLight("ML","-1234",tcis);
        Assert.assertNotNull("exists",t);
    }
    
    @Test
    public void testCTorShortEventDouble() {
        t = new CbusLight("ML","+1;-1",tcis);
        Assert.assertNotNull("exists",t);
    }
    
    
    @Test
    public void testLongEventSingleNoN() {
        t = new CbusLight("ML","+654e321",tcis);
        Assert.assertNotNull("exists",t);
    }    


    @Test
    public void testLongEventDoubleNoN() {
        t = new CbusLight("ML","-654e321;+123e456",tcis);
        Assert.assertNotNull("exists",t);
    }    
    
    
    @Test
    public void testCTorLongEventSingle() {
        t = new CbusLight("ML","+n654e321",tcis);
        Assert.assertNotNull("exists",t);
    }    
    
    @Test
    public void testCTorLongEventDouble() {
        t = new CbusLight("ML","+N299E17;-N123E456",tcis);
        Assert.assertNotNull("exists",t);
    }
    
    @Test
    public void testCTorHexEventJustOpsCode() {
        t = new CbusLight("ML","X04;X05",tcis);
        Assert.assertNotNull("exists",t);
    }

    @Test
    public void testCTorHexEventOneByte() {
        t = new CbusLight("ML","X2301;X30FF",tcis);
        Assert.assertNotNull("exists",t);
    }
    
    
    @Test
    public void testCTorHexEventTwoByte() {
        t = new CbusLight("ML","X410001;X56FFFF",tcis);
        Assert.assertNotNull("exists",t);
    }

    
    @Test
    public void testCTorHexEventThreeByte() {
        t = new CbusLight("ML","X6000010001;X72FFFFFF",tcis);
        Assert.assertNotNull("exists",t);
    }    
    
    
    
    @Test
    public void testCTorHexEventFourByte() {
        t = new CbusLight("ML","X9000010001;X91FFFFFFFF",tcis);
        Assert.assertNotNull("exists",t);
    }


    @Test
    public void testCTorHexEventFiveByte() {
        t = new CbusLight("ML","XB00D60010001;XB1FFFAAFFFFF",tcis);
        Assert.assertNotNull("exists",t);
    }


    @Test
    public void testCTorHexEventSixByte() {
        t = new CbusLight("ML","XD00D0060010001;XD1FFFAAAFFFFFE",tcis);
        Assert.assertNotNull("exists",t);
    }
    
    
    @Test
    public void testCTorHexEventSevenByte() {
        t = new CbusLight("ML","XF00D0A0600100601;XF1FFFFAAFAFFFFFE",tcis);
        Assert.assertNotNull("exists",t);
    }


    @Test
    public void threePartFail() {
        t = new CbusLight("ML","+7;-5;+11",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Can't parse CbusLight system name");
    }

    @Test
    public void badSysNameErrorLog() {
        t = new CbusLight("ML","+7;-5;+11",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Can't parse CbusLight system name");
    }

    @Test
    public void badSysNameErrorLog2() {        
        t = new CbusLight("ML","X;+N15E6",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");        
    }
    
    @Test
    public void badSysNameErrorLog3() {
        t = new CbusLight("ML","XA;+N15E6",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
        
    }
        
    @Test
    public void badSysNameErrorLog4() {        
        
        t = new CbusLight("ML","XABC;+N15E6",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }
    
    @Test
    public void badSysNameErrorLog5() {        
        t = new CbusLight("ML","XABCDE;+N15E6",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");        
    }
        
    @Test
    public void badSysNameErrorLog6() {        
        
        t = new CbusLight("ML","XABCDEF0;+N15E6",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");        
    }

    @Test
    public void badSysNameErrorLog7() {
        t = new CbusLight("ML","XABCDEF",tcis);
        JUnitAppender.assertErrorMessageStartsWith("can't make 2nd event from");
    }
        
    @Test
    public void badSysNameErrorLog8() {
        t = new CbusLight("ML",";XABCDEF",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }

    @Test
    public void badSysNameErrorLog9() {
        t = new CbusLight("ML","XABCDEF;",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }

    @Test
    public void badSysNameErrorLog10() {
        t = new CbusLight("ML",";",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }

    @Test
    public void badSysNameErrorLog11() {
        t = new CbusLight("ML",";+N15E6",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }

    @Test
    public void badSysNameErrorLog12() {
        t = new CbusLight("ML","++N156E77",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }
        
    @Test
    public void badSysNameErrorLog13() {
        t = new CbusLight("ML","--N156E77",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }
        
    @Test
    public void badSysNameErrorLog14() {
        t = new CbusLight("ML","N156E+77",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }
        
    @Test
    public void badSysNameErrorLog15() {
        t = new CbusLight("ML","N156+E77",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }
        
    @Test
    public void badSysNameErrorLog16() {
        t = new CbusLight("ML","XLKJK;XLKJK",tcis);
        JUnitAppender.assertErrorMessageStartsWith("Did not find usable sys");
    }

    @Test
    public void testShortEventSinglegetAddrOn() {
        t = new CbusLight("ML","+7",tcis);
        CanMessage m1 = ((CbusLight)t).getAddrOn();
        CanMessage m2 = new CanMessage(tcis.getCanid());
        m2.setNumDataElements(5);
        m2.setElement(0, 0x98); // ASON OPC
        m2.setElement(1, 0x00);
        m2.setElement(2, 0x00);
        m2.setElement(3, 0x00);
        m2.setElement(4, 0x07);
        Assert.assertTrue("equals same", m1.equals(m2));
    }

    @Test
    public void testShortEventSinglegetAddrOff() {
        t = new CbusLight("ML","+7",tcis);
        CanMessage m1 = ((CbusLight)t).getAddrOff();
        CanMessage m2 = new CanMessage(tcis.getCanid());
        m2.setNumDataElements(5);
        m2.setElement(0, 0x99); // ASOF OPC
        m2.setElement(1, 0x00);
        m2.setElement(2, 0x00);
        m2.setElement(3, 0x00);
        m2.setElement(4, 0x07);
        Assert.assertTrue("equals same", m1.equals(m2));
    }

    @Test
    public void testLongEventgetAddrOn() {
        t = new CbusLight("ML","+N54321E12345",tcis);
        CanMessage m1 = ((CbusLight)t).getAddrOn();
        CanMessage m2 = new CanMessage(tcis.getCanid());
        m2.setNumDataElements(5);
        m2.setElement(0, 0x90); // ACON OPC
        m2.setElement(1, 0xd4);
        m2.setElement(2, 0x31);
        m2.setElement(3, 0x30);
        m2.setElement(4, 0x39);
        Assert.assertTrue("equals same", m1.equals(m2));
    }

    @Test
    public void testLongEventgetAddrOff() {
        t = new CbusLight("ML","+N54321E12345",tcis);
        CanMessage m1 = ((CbusLight)t).getAddrOff();
        CanMessage m2 = new CanMessage(tcis.getCanid());
        m2.setNumDataElements(5);
        m2.setElement(0, 0x91); // ACOF OPC
        m2.setElement(1, 0xd4);
        m2.setElement(2, 0x31);
        m2.setElement(3, 0x30);
        m2.setElement(4, 0x39);
        Assert.assertTrue("equals same", m1.equals(m2));
        m2.setElement(0, 0x90); // ACON OPC
        Assert.assertFalse("not equals same", m1.equals(m2));
    }    
    
    @Test
    public void testCbusLightCanMessage() throws jmri.JmriException {
        t = new CbusLight("ML","+N54321E12345",tcis);
        Assert.assertTrue(t.getState() == Light.OFF); // Light.UNKNOWN ??
        CanMessage m = new CanMessage(tcis.getCanid());
        m.setNumDataElements(5);
        m.setElement(0, 0x95); // EVULN OPC
        m.setElement(1, 0xd4);
        m.setElement(2, 0x31);
        m.setElement(3, 0x30);
        m.setElement(4, 0x39);
        ((CbusLight)t).message(m);
        
        Assert.assertTrue(t.getState() == Light.OFF ); 

        m.setElement(0, 0x90); // ACON OPC
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.ON);

        m.setElement(0, 0x91); // ACOF OPC
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.OFF);
        Assert.assertTrue(tcis.outbound.isEmpty());
 
    }
    
    @Test
    public void testCbusLightCanMessageExtendedRtR() throws jmri.JmriException {
        t = new CbusLight("ML","+N54321E12345",tcis);
        Assert.assertTrue(t.getState() == Light.OFF); // Light.UNKNOWN ??
        
        CanMessage m = new CanMessage(tcis.getCanid());
        m.setNumDataElements(5);
        m.setElement(0, 0x90); // ACON OPC
        m.setElement(1, 0xd4);
        m.setElement(2, 0x31);
        m.setElement(3, 0x30);
        m.setElement(4, 0x39);
        
        m.setExtended(true);
        
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.OFF ); 

        m.setExtended(false);
        m.setRtr(true);
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.OFF );
        
        m.setRtr(false);
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.ON);
        Assert.assertTrue(tcis.outbound.isEmpty());
        
    }
    
        @Test
    public void testCbusLightCanReplyExtendedRtr() throws jmri.JmriException {
        t = new CbusLight("ML","+N54321E12345",tcis);
        Assert.assertTrue(t.getState() == Light.OFF);  // Light.UNKNOWN ??
        CanReply r = new CanReply(tcis.getCanid());
        r.setNumDataElements(5);
        r.setElement(0, 0x90); // ACON OPC
        r.setElement(1, 0xd4);
        r.setElement(2, 0x31);
        r.setElement(3, 0x30);
        r.setElement(4, 0x39);
        r.setExtended(true);
        
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.OFF);   
        
        r.setExtended(false);
        r.setRtr(true);
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.OFF );

        r.setRtr(false);
        
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.ON);
        Assert.assertTrue(tcis.outbound.isEmpty());
        
    }
    

    @Test
    public void testCbusLightCanReply() throws jmri.JmriException {
        t = new CbusLight("ML","+N54321E12345",tcis);
        Assert.assertTrue(t.getState() == Light.OFF);  // Light.UNKNOWN ??
        CanReply r = new CanReply(tcis.getCanid());
        r.setNumDataElements(5);
        r.setElement(0, 0x95); // EVULN OPC
        r.setElement(1, 0xd4);
        r.setElement(2, 0x31);
        r.setElement(3, 0x30);
        r.setElement(4, 0x39);
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.OFF);        

        r.setElement(0, 0x90); // ACON OPC
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.ON);

        r.setElement(0, 0x91); // ACOF OPC
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.OFF);
        Assert.assertTrue(tcis.outbound.isEmpty());
  
    }

    // with presence of node number should still resolve to short event turnout due to opc
    @Test
    public void testLightCanMessageShortEvWithNode() throws jmri.JmriException {
        t = new CbusLight("ML","+12345",tcis);
        CanMessage m = new CanMessage(tcis.getCanid());
        m.setNumDataElements(5);
        m.setElement(0, 0x95); // EVULN OPC
        m.setElement(1, 0xd4);
        m.setElement(2, 0x31);
        m.setElement(3, 0x30);
        m.setElement(4, 0x39);
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.OFF);
        
        m.setElement(0, 0x98); // ASON OPC
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.ON);
        
        m.setElement(0, 0x99); // ASOF OPC
        ((CbusLight)t).message(m);
        Assert.assertTrue(t.getState() == Light.OFF);
        Assert.assertTrue(tcis.outbound.isEmpty());
        
    }
    
    // with presence of node number should still resolve to short event turnout due to opc
    @Test
    public void testLightCanReplyShortEvWithNode() throws jmri.JmriException {
        t = new CbusLight("ML","+12345",tcis);
        CanReply r = new CanReply(tcis.getCanid());
        r.setNumDataElements(5);
        r.setElement(0, 0x95); // EVULN OPC
        r.setElement(1, 0xd4);
        r.setElement(2, 0x31);
        r.setElement(3, 0x30);
        r.setElement(4, 0x39);
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.OFF);
        
        r.setElement(0, 0x98); // ASON OPC
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.ON);
        
        r.setElement(0, 0x99); // ASOF OPC
        ((CbusLight) t).reply(r);
        Assert.assertTrue(t.getState() == Light.OFF);
        
        Assert.assertTrue(tcis.outbound.isEmpty());
        
    }

    public void checkStatusRequestMsgSent() {
        Assert.assertEquals("same object", ("[5f8] 92 01 C8 01 41"), 
            (tcis.outbound.elementAt(tcis.outbound.size() - 1).toString()));
    }    

    public void checkShortStatusRequestMsgSent() {
        Assert.assertEquals("same object", ("[5f8] 9A 00 00 D4 31"), 
            (tcis.outbound.elementAt(tcis.outbound.size() - 1).toString()));
    } 

    @Test
    public void testRequestUpdate() {
        
        t.requestUpdateFromLayout();
        checkStatusRequestMsgSent();

        t = new CbusLight("ML","+54321",tcis);
        t.requestUpdateFromLayout();
        checkShortStatusRequestMsgSent();

    }
    
    @Test
    public void testAddRemoveListener() {    
        int testnum = numListeners();
        CbusLight t2 = new CbusLight("ML", "+N777E8321",tcis);
        int testnum2 = numListeners();
        Assert.assertEquals("number increased",testnum , testnum2-1 );
        t2.dispose();
        int testnum3 = numListeners();
        Assert.assertEquals("number decreased",testnum , testnum3 );
        
    }

    @Disabled("CbusLight doesn't extend AbstractVariableLight. Rewrite test? / Daniel Bergqvist (danielb987) June 17, 2020")
    @Test
    public void testIntensity() {

        Assertions.assertInstanceOf(VariableLight.class, t);
        Assert.assertTrue(0 == ((VariableLight)t).getCurrentIntensity());
        ((VariableLight)t).setTargetIntensity(1);
        Assert.assertTrue(1.0 == ((VariableLight)t).getCurrentIntensity());
        Assert.assertEquals("intensity on","[5f8] 90 01 C8 01 41" , 
            (tcis.outbound.elementAt(tcis.outbound.size() - 1).toString()) );
        ((VariableLight)t).setTargetIntensity(0.0);
        Assert.assertTrue(0 == ((VariableLight)t).getCurrentIntensity());
        Assert.assertEquals("intensity on","[5f8] 91 01 C8 01 41" , 
            (tcis.outbound.elementAt(tcis.outbound.size() - 1).toString()) );        
        
         // t.setTargetIntensity(0.25); not currently defined for CBUS
    }
    
    @Test
    public void testDoNewStateinvalid(){
        
        t = new CbusLight("M","+12345",tcis);
        ((CbusLight) t).doNewState(Light.OFF,999);
        JUnitAppender.assertWarnMessage("illegal state requested for Light: ML+12345");
        
    }

    @BeforeEach
    @Override
    public void setUp() {
        JUnitUtil.setUp();
        tcis = new TrafficControllerScaffold();
        t = new CbusLight("ML", "+N456E321",tcis);
    }

    @AfterEach
    public void tearDown() {
        t.dispose();
        tcis.terminateThreads();
        tcis=null;
        JUnitUtil.tearDown();
    }

    // private static final Logger log = LoggerFactory.getLogger(CbusLightTest.class);
}