[deb_libcec.git] / src / lib / adapter / RPi / RPiCECAdapterCommunication.cpp

/*
 * This file is part of the libCEC(R) library.
 *
 * libCEC(R) is Copyright (C) 2011-2013 Pulse-Eight Limited.  All rights reserved.
 * libCEC(R) is an original work, containing original code.
 *
 * libCEC(R) is a trademark of Pulse-Eight Limited.
 *
 * This program is dual-licensed; 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 2 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, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 *
 *
 * Alternatively, you can license this library under a commercial license,
 * please contact Pulse-Eight Licensing for more information.
 *
 * For more information contact:
 * Pulse-Eight Licensing       <license@pulse-eight.com>
 *     http://www.pulse-eight.com/
 *     http://www.pulse-eight.net/
 */

#include "env.h"

#if defined(HAVE_RPI_API)
#include "RPiCECAdapterCommunication.h"

extern "C" {
#include <bcm_host.h>
}

#include "lib/CECTypeUtils.h"
#include "lib/LibCEC.h"
#include "lib/platform/util/StdString.h"
#include "RPiCECAdapterMessageQueue.h"

using namespace CEC;
using namespace PLATFORM;

#define LIB_CEC m_callback->GetLib()

static bool g_bHostInited = false;

// callback for the RPi CEC service
void rpi_cec_callback(void *callback_data, uint32_t p0, uint32_t p1, uint32_t p2, uint32_t p3, uint32_t p4)
{
  if (callback_data)
    static_cast<CRPiCECAdapterCommunication *>(callback_data)->OnDataReceived(p0, p1, p2, p3, p4);
}

// callback for the TV service
void rpi_tv_callback(void *callback_data, uint32_t reason, uint32_t p0, uint32_t p1)
{
  if (callback_data)
    static_cast<CRPiCECAdapterCommunication *>(callback_data)->OnTVServiceCallback(reason, p0, p1);
}

CRPiCECAdapterCommunication::CRPiCECAdapterCommunication(IAdapterCommunicationCallback *callback) :
    IAdapterCommunication(callback),
    m_logicalAddress(CECDEVICE_UNKNOWN),
    m_bLogicalAddressChanged(false),
    m_previousLogicalAddress(CECDEVICE_FREEUSE),
    m_bLogicalAddressRegistered(false)
{
  m_queue = new CRPiCECAdapterMessageQueue(this);
}

CRPiCECAdapterCommunication::~CRPiCECAdapterCommunication(void)
{
  delete(m_queue);
  Close();
}

const char *ToString(const VC_CEC_ERROR_T error)
{
  switch(error)
  {
  case VC_CEC_SUCCESS:
    return "success";
  case VC_CEC_ERROR_NO_ACK:
    return "no ack";
  case VC_CEC_ERROR_SHUTDOWN:
    return "shutdown";
  case VC_CEC_ERROR_BUSY:
    return "device is busy";
  case VC_CEC_ERROR_NO_LA:
    return "no logical address";
  case VC_CEC_ERROR_NO_PA:
    return "no physical address";
  case VC_CEC_ERROR_NO_TOPO:
    return "no topology";
  case VC_CEC_ERROR_INVALID_FOLLOWER:
    return "invalid follower";
  case VC_CEC_ERROR_INVALID_ARGUMENT:
    return "invalid arg";
  default:
    return "unknown";
  }
}

bool CRPiCECAdapterCommunication::IsInitialised(void)
{
  CLockObject lock(m_mutex);
  return m_bInitialised;
}

void CRPiCECAdapterCommunication::OnTVServiceCallback(uint32_t reason, uint32_t UNUSED(p0), uint32_t UNUSED(p1))
{
  switch(reason)
  {
  case VC_HDMI_ATTACHED:
  {
    uint16_t iNewAddress = GetPhysicalAddress();
    m_callback->HandlePhysicalAddressChanged(iNewAddress);
    break;
  }
  case VC_HDMI_UNPLUGGED:
  case VC_HDMI_DVI:
  case VC_HDMI_HDMI:
  case VC_HDMI_HDCP_UNAUTH:
  case VC_HDMI_HDCP_AUTH:
  case VC_HDMI_HDCP_KEY_DOWNLOAD:
  case VC_HDMI_HDCP_SRM_DOWNLOAD:
  default:
     break;
  }
}

void CRPiCECAdapterCommunication::OnDataReceived(uint32_t header, uint32_t p0, uint32_t p1, uint32_t p2, uint32_t p3)
{
  VC_CEC_NOTIFY_T reason = (VC_CEC_NOTIFY_T)CEC_CB_REASON(header);

#ifdef CEC_DEBUGGING
  LIB_CEC->AddLog(CEC_LOG_DEBUG, "received data: header:%08X p0:%08X p1:%08X p2:%08X p3:%08X reason:%x", header, p0, p1, p2, p3, reason);
#endif

  switch (reason)
  {
  case VC_CEC_RX:
    // CEC data received
    {
      // translate into a VC_CEC_MESSAGE_T
      VC_CEC_MESSAGE_T message;
      vc_cec_param2message(header, p0, p1, p2, p3, &message);

      // translate to a cec_command
      cec_command command;
      cec_command::Format(command,
          (cec_logical_address)message.initiator,
          (cec_logical_address)message.follower,
          (cec_opcode)CEC_CB_OPCODE(p0));

      // copy parameters
      for (uint8_t iPtr = 1; iPtr < message.length; iPtr++)
        command.PushBack(message.payload[iPtr]);

      // send to libCEC
      m_callback->OnCommandReceived(command);
    }
    break;
  case VC_CEC_TX:
    {
      // handle response to a command that was sent earlier
      m_queue->MessageReceived((cec_opcode)CEC_CB_OPCODE(p0), (cec_logical_address)CEC_CB_INITIATOR(p0), (cec_logical_address)CEC_CB_FOLLOWER(p0), CEC_CB_RC(header));
    }
    break;
  case VC_CEC_BUTTON_PRESSED:
  case VC_CEC_REMOTE_PRESSED:
    {
      // translate into a cec_command
      cec_command command;
      cec_command::Format(command,
                          (cec_logical_address)CEC_CB_INITIATOR(p0),
                          (cec_logical_address)CEC_CB_FOLLOWER(p0),
                          reason == VC_CEC_BUTTON_PRESSED ? CEC_OPCODE_USER_CONTROL_PRESSED : CEC_OPCODE_VENDOR_REMOTE_BUTTON_DOWN);
      command.parameters.PushBack((uint8_t)CEC_CB_OPERAND1(p0));

      // send to libCEC
      m_callback->OnCommandReceived(command);
    }
    break;
  case VC_CEC_BUTTON_RELEASE:
  case VC_CEC_REMOTE_RELEASE:
    {
      // translate into a cec_command
      cec_command command;
      cec_command::Format(command,
                          (cec_logical_address)CEC_CB_INITIATOR(p0),
                          (cec_logical_address)CEC_CB_FOLLOWER(p0),
                          reason == VC_CEC_BUTTON_PRESSED ? CEC_OPCODE_USER_CONTROL_RELEASE : CEC_OPCODE_VENDOR_REMOTE_BUTTON_UP);
      command.parameters.PushBack((uint8_t)CEC_CB_OPERAND1(p0));

      // send to libCEC
      m_callback->OnCommandReceived(command);
    }
    break;
  case VC_CEC_LOGICAL_ADDR:
    {
      CLockObject lock(m_mutex);
      m_previousLogicalAddress = m_logicalAddress;
      if (CEC_CB_RC(header) == VCHIQ_SUCCESS)
      {
        m_bLogicalAddressChanged = true;
        m_logicalAddress = (cec_logical_address)(p0 & 0xF);
        LIB_CEC->AddLog(CEC_LOG_DEBUG, "logical address changed to %s (%x)", LIB_CEC->ToString(m_logicalAddress), m_logicalAddress);
      }
      else
      {
        m_logicalAddress = CECDEVICE_FREEUSE;
        LIB_CEC->AddLog(CEC_LOG_DEBUG, "failed to change the logical address, reset to %s (%x)", LIB_CEC->ToString(m_logicalAddress), m_logicalAddress);
      }
      m_logicalAddressCondition.Signal();
    }
    break;
  case VC_CEC_LOGICAL_ADDR_LOST:
    {
      // the logical address was taken by another device
      cec_logical_address previousAddress = m_logicalAddress == CECDEVICE_BROADCAST ? m_previousLogicalAddress : m_logicalAddress;
      m_logicalAddress = CECDEVICE_UNKNOWN;

      // notify libCEC that we lost our LA when the connection was initialised
      bool bNotify(false);
      {
        CLockObject lock(m_mutex);
        bNotify = m_bInitialised && m_bLogicalAddressRegistered;
      }
      if (bNotify)
        m_callback->HandleLogicalAddressLost(previousAddress);
    }
    break;
  case VC_CEC_TOPOLOGY:
    break;
  default:
    LIB_CEC->AddLog(CEC_LOG_DEBUG, "ignoring unknown reason %x", reason);
    break;
  }
}

int CRPiCECAdapterCommunication::InitHostCEC(void)
{
  VCHIQ_INSTANCE_T vchiq_instance;
  int iResult;

  if ((iResult = vchiq_initialise(&vchiq_instance)) != VCHIQ_SUCCESS)
  {
    LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vchiq_initialise failed (%d)", __FUNCTION__, iResult);
    CStdString strError;
    strError.Format("%s - vchiq_initialise failed (%d)", __FUNCTION__, iResult);
    m_strError = strError;
    return iResult;
  }
  LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vchiq_initialise succeeded", __FUNCTION__);

  if ((iResult = vchi_initialise(&m_vchi_instance)) != VCHIQ_SUCCESS)
  {
    LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vchi_initialise failed (%d)", __FUNCTION__, iResult);
    CStdString strError;
    strError.Format("%s - vchi_initialise failed (%d)", __FUNCTION__, iResult);
    m_strError = strError;
    return iResult;
  }
  LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vchi_initialise succeeded", __FUNCTION__);

  vchiq_instance = (VCHIQ_INSTANCE_T)m_vchi_instance;

  m_vchi_connection = vchi_create_connection(single_get_func_table(),
      vchi_mphi_message_driver_func_table());

  if ((iResult = vchi_connect(&m_vchi_connection, 1, m_vchi_instance)) != VCHIQ_SUCCESS)
  {
    LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vchi_connect failed (%d)", __FUNCTION__, iResult);
    CStdString strError;
    strError.Format("%s - vchi_connect failed (%d)", __FUNCTION__, iResult);
    m_strError = strError;
    return iResult;
  }
  LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vchi_connect succeeded", __FUNCTION__);

  return VCHIQ_SUCCESS;
}

bool CRPiCECAdapterCommunication::Open(uint32_t iTimeoutMs /* = CEC_DEFAULT_CONNECT_TIMEOUT */, bool UNUSED(bSkipChecks) /* = false */, bool bStartListening)
{
  Close();

  if (InitHostCEC() != VCHIQ_SUCCESS)
    return false;

  if (bStartListening)
  {
    // enable passive mode
    vc_cec_set_passive(true);

    // register the callbacks
    vc_cec_register_callback(rpi_cec_callback, (void*)this);
    vc_tv_register_callback(rpi_tv_callback, (void*)this);

    // release previous LA
    vc_cec_release_logical_address();
    if (!m_logicalAddressCondition.Wait(m_mutex, m_bLogicalAddressChanged, iTimeoutMs))
    {
      LIB_CEC->AddLog(CEC_LOG_ERROR, "failed to release the previous LA");
      return false;
    }

    // register LA "freeuse"
    if (RegisterLogicalAddress(CECDEVICE_FREEUSE))
    {
      LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vc_cec initialised", __FUNCTION__);
      CLockObject lock(m_mutex);
      m_bInitialised = true;
    }
    else
      LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vc_cec could not be initialised", __FUNCTION__);
  }

  return true;
}

uint16_t CRPiCECAdapterCommunication::GetPhysicalAddress(void)
{
  uint16_t iPA(CEC_INVALID_PHYSICAL_ADDRESS);
  if (!IsInitialised())
    return iPA;

  if (vc_cec_get_physical_address(&iPA) == VCHIQ_SUCCESS)
    LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - physical address = %04x", __FUNCTION__, iPA);
  else
  {
    LIB_CEC->AddLog(CEC_LOG_WARNING, "%s - failed to get the physical address", __FUNCTION__);
    iPA = CEC_INVALID_PHYSICAL_ADDRESS;
  }

  return iPA;
}

void CRPiCECAdapterCommunication::Close(void)
{
  {
    CLockObject lock(m_mutex);
    if (m_bInitialised)
      m_bInitialised = false;
    else
      return;
  }
  vc_tv_unregister_callback(rpi_tv_callback);

  UnregisterLogicalAddress();

  // disable passive mode
  vc_cec_set_passive(false);

  if (!g_bHostInited)
  {
    g_bHostInited = false;
    bcm_host_deinit();
  }
}

std::string CRPiCECAdapterCommunication::GetError(void) const
{
  std::string strError(m_strError);
  return strError;
}

cec_adapter_message_state CRPiCECAdapterCommunication::Write(const cec_command &data, bool &UNUSED(bRetry), uint8_t UNUSED(iLineTimeout), bool bIsReply)
{
  // ensure that the source LA is registered
  if (!RegisterLogicalAddress(data.initiator))
  {
    LIB_CEC->AddLog(CEC_LOG_DEBUG, "failed to register logical address %s (%X)", CCECTypeUtils::ToString(data.initiator), data.initiator);
    return (data.initiator == data.destination) ? ADAPTER_MESSAGE_STATE_SENT_NOT_ACKED : ADAPTER_MESSAGE_STATE_ERROR;
  }

  if (!data.opcode_set && data.initiator == data.destination)
  {
    // registration of the logical address would have failed
    return ADAPTER_MESSAGE_STATE_SENT_NOT_ACKED;
  }

  return m_queue->Write(data, bIsReply) ? ADAPTER_MESSAGE_STATE_SENT_ACKED : ADAPTER_MESSAGE_STATE_SENT_NOT_ACKED;
}

uint16_t CRPiCECAdapterCommunication::GetFirmwareVersion(void)
{
  return VC_CECSERVICE_VER;
}

cec_logical_address CRPiCECAdapterCommunication::GetLogicalAddress(void)
{
  {
    CLockObject lock(m_mutex);
    if (m_logicalAddress != CECDEVICE_UNKNOWN)
      return m_logicalAddress;
  }

  CEC_AllDevices_T address;
  return (vc_cec_get_logical_address(&address) == VCHIQ_SUCCESS) ?
      (cec_logical_address)address : CECDEVICE_UNKNOWN;
}

bool CRPiCECAdapterCommunication::UnregisterLogicalAddress(void)
{
  CLockObject lock(m_mutex);
  if (m_logicalAddress == CECDEVICE_UNKNOWN ||
      m_logicalAddress == CECDEVICE_BROADCAST)
    return true;

  LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - releasing previous logical address", __FUNCTION__);
  {
    CLockObject lock(m_mutex);
    m_bLogicalAddressRegistered = false;
    m_bLogicalAddressChanged    = false;
  }

  vc_cec_release_logical_address();

  return m_logicalAddressCondition.Wait(m_mutex, m_bLogicalAddressChanged);
}

bool CRPiCECAdapterCommunication::RegisterLogicalAddress(const cec_logical_address address)
{
  {
    CLockObject lock(m_mutex);
    if (m_logicalAddress == address)
      return true;
  }

  if (!UnregisterLogicalAddress())
    return false;

  LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - registering address %x", __FUNCTION__, address);

  CLockObject lock(m_mutex);
  m_bLogicalAddressChanged = false;
  vc_cec_poll_address((CEC_AllDevices_T)address);

  // register the new LA
  int iRetval = vc_cec_set_logical_address((CEC_AllDevices_T)address, (CEC_DEVICE_TYPE_T)CCECTypeUtils::GetType(address), CEC_VENDOR_ID_BROADCOM);
  if (iRetval != VCHIQ_SUCCESS)
  {
    LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vc_cec_set_logical_address(%X) returned %s (%d)", __FUNCTION__, address, ToString((VC_CEC_ERROR_T)iRetval), iRetval);
    return false;
  }

  if (m_logicalAddressCondition.Wait(m_mutex, m_bLogicalAddressChanged))
  {
    m_bLogicalAddressRegistered = true;
    return true;
  }
  return false;
}

cec_logical_addresses CRPiCECAdapterCommunication::GetLogicalAddresses(void)
{
  cec_logical_addresses addresses; addresses.Clear();
  cec_logical_address current = GetLogicalAddress();
  if (current != CECDEVICE_UNKNOWN)
    addresses.Set(current);

  return addresses;
}

bool CRPiCECAdapterCommunication::SetLogicalAddresses(const cec_logical_addresses &addresses)
{
  // the current generation RPi only supports 1 LA, so just ensure that the primary address is registered
  return SupportsSourceLogicalAddress(addresses.primary) &&
      RegisterLogicalAddress(addresses.primary);
}

void CRPiCECAdapterCommunication::InitHost(void)
{
  if (!g_bHostInited)
  {
    g_bHostInited = true;
    bcm_host_init();
  }
}

#endif
Commit	Line	Data
29104708 LOK	1	/*
	2	* This file is part of the libCEC(R) library.
	3	*
16f47961	4	* libCEC(R) is Copyright (C) 2011-2013 Pulse-Eight Limited. All rights reserved.
29104708 LOK	5	* libCEC(R) is an original work, containing original code.
	6	*
	7	* libCEC(R) is a trademark of Pulse-Eight Limited.
	8	*
	9	* This program is dual-licensed; you can redistribute it and/or modify
	10	* it under the terms of the GNU General Public License as published by
	11	* the Free Software Foundation; either version 2 of the License, or
	12	* (at your option) any later version.
	13	*
	14	* This program is distributed in the hope that it will be useful,
	15	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	16	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	17	* GNU General Public License for more details.
	18	*
	19	* You should have received a copy of the GNU General Public License
	20	* along with this program; if not, write to the Free Software
	21	* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
	22	*
	23	*
	24	* Alternatively, you can license this library under a commercial license,
	25	* please contact Pulse-Eight Licensing for more information.
	26	*
	27	* For more information contact:
	28	* Pulse-Eight Licensing <license@pulse-eight.com>
	29	* http://www.pulse-eight.com/
	30	* http://www.pulse-eight.net/
	31	*/
	32
	33	#include "env.h"
	34
	35	#if defined(HAVE_RPI_API)
	36	#include "RPiCECAdapterCommunication.h"
	37
	38	extern "C" {
	39	#include <bcm_host.h>
	40	}
	41
	42	#include "lib/CECTypeUtils.h"
	43	#include "lib/LibCEC.h"
	44	#include "lib/platform/util/StdString.h"
	45	#include "RPiCECAdapterMessageQueue.h"
	46
	47	using namespace CEC;
	48	using namespace PLATFORM;
	49
	50	#define LIB_CEC m_callback->GetLib()
	51
	52	static bool g_bHostInited = false;
	53
	54	// callback for the RPi CEC service
	55	void rpi_cec_callback(void *callback_data, uint32_t p0, uint32_t p1, uint32_t p2, uint32_t p3, uint32_t p4)
	56	{
	57	if (callback_data)
	58	static_cast<CRPiCECAdapterCommunication *>(callback_data)->OnDataReceived(p0, p1, p2, p3, p4);
	59	}
	60
49ba42d4 LOK	61	// callback for the TV service
	62	void rpi_tv_callback(void *callback_data, uint32_t reason, uint32_t p0, uint32_t p1)
	63	{
	64	if (callback_data)
	65	static_cast<CRPiCECAdapterCommunication *>(callback_data)->OnTVServiceCallback(reason, p0, p1);
	66	}
	67
29104708 LOK	68	CRPiCECAdapterCommunication::CRPiCECAdapterCommunication(IAdapterCommunicationCallback *callback) :
	69	IAdapterCommunication(callback),
	70	m_logicalAddress(CECDEVICE_UNKNOWN),
d1a2ed70	71	m_bLogicalAddressChanged(false),
057497c6 LOK	72	m_previousLogicalAddress(CECDEVICE_FREEUSE),
057497c6 LOK	73	m_bLogicalAddressRegistered(false)
29104708 LOK	74	{
	75	m_queue = new CRPiCECAdapterMessageQueue(this);
	76	}
	77
	78	CRPiCECAdapterCommunication::~CRPiCECAdapterCommunication(void)
	79	{
	80	delete(m_queue);
	81	Close();
	82	}
	83
	84	const char *ToString(const VC_CEC_ERROR_T error)
	85	{
	86	switch(error)
	87	{
	88	case VC_CEC_SUCCESS:
	89	return "success";
	90	case VC_CEC_ERROR_NO_ACK:
	91	return "no ack";
	92	case VC_CEC_ERROR_SHUTDOWN:
	93	return "shutdown";
	94	case VC_CEC_ERROR_BUSY:
	95	return "device is busy";
	96	case VC_CEC_ERROR_NO_LA:
	97	return "no logical address";
	98	case VC_CEC_ERROR_NO_PA:
	99	return "no physical address";
	100	case VC_CEC_ERROR_NO_TOPO:
	101	return "no topology";
	102	case VC_CEC_ERROR_INVALID_FOLLOWER:
	103	return "invalid follower";
	104	case VC_CEC_ERROR_INVALID_ARGUMENT:
	105	return "invalid arg";
	106	default:
	107	return "unknown";
	108	}
	109	}
	110
	111	bool CRPiCECAdapterCommunication::IsInitialised(void)
	112	{
	113	CLockObject lock(m_mutex);
	114	return m_bInitialised;
	115	}
	116
49ba42d4 LOK	117	void CRPiCECAdapterCommunication::OnTVServiceCallback(uint32_t reason, uint32_t UNUSED(p0), uint32_t UNUSED(p1))
	118	{
	119	switch(reason)
	120	{
49ba42d4 LOK	121	case VC_HDMI_ATTACHED:
	122	{
	123	uint16_t iNewAddress = GetPhysicalAddress();
	124	m_callback->HandlePhysicalAddressChanged(iNewAddress);
	125	break;
	126	}
c66fdf1f	127	case VC_HDMI_UNPLUGGED:
49ba42d4 LOK	128	case VC_HDMI_DVI:
	129	case VC_HDMI_HDMI:
	130	case VC_HDMI_HDCP_UNAUTH:
	131	case VC_HDMI_HDCP_AUTH:
	132	case VC_HDMI_HDCP_KEY_DOWNLOAD:
	133	case VC_HDMI_HDCP_SRM_DOWNLOAD:
	134	default:
	135	break;
	136	}
	137	}
	138
29104708 LOK	139	void CRPiCECAdapterCommunication::OnDataReceived(uint32_t header, uint32_t p0, uint32_t p1, uint32_t p2, uint32_t p3)
	140	{
	141	VC_CEC_NOTIFY_T reason = (VC_CEC_NOTIFY_T)CEC_CB_REASON(header);
	142
b509ba1a	143	#ifdef CEC_DEBUGGING
29104708	144	LIB_CEC->AddLog(CEC_LOG_DEBUG, "received data: header:%08X p0:%08X p1:%08X p2:%08X p3:%08X reason:%x", header, p0, p1, p2, p3, reason);
b509ba1a	145	#endif
29104708 LOK	146
	147	switch (reason)
	148	{
	149	case VC_CEC_RX:
	150	// CEC data received
	151	{
	152	// translate into a VC_CEC_MESSAGE_T
	153	VC_CEC_MESSAGE_T message;
	154	vc_cec_param2message(header, p0, p1, p2, p3, &message);
	155
	156	// translate to a cec_command
	157	cec_command command;
	158	cec_command::Format(command,
	159	(cec_logical_address)message.initiator,
	160	(cec_logical_address)message.follower,
	161	(cec_opcode)CEC_CB_OPCODE(p0));
	162
	163	// copy parameters
	164	for (uint8_t iPtr = 1; iPtr < message.length; iPtr++)
	165	command.PushBack(message.payload[iPtr]);
	166
	167	// send to libCEC
	168	m_callback->OnCommandReceived(command);
	169	}
	170	break;
	171	case VC_CEC_TX:
	172	{
	173	// handle response to a command that was sent earlier
	174	m_queue->MessageReceived((cec_opcode)CEC_CB_OPCODE(p0), (cec_logical_address)CEC_CB_INITIATOR(p0), (cec_logical_address)CEC_CB_FOLLOWER(p0), CEC_CB_RC(header));
	175	}
	176	break;
	177	case VC_CEC_BUTTON_PRESSED:
3b106c7d	178	case VC_CEC_REMOTE_PRESSED:
29104708 LOK	179	{
	180	// translate into a cec_command
	181	cec_command command;
3b106c7d LOK	182	cec_command::Format(command,
	183	(cec_logical_address)CEC_CB_INITIATOR(p0),
	184	(cec_logical_address)CEC_CB_FOLLOWER(p0),
	185	reason == VC_CEC_BUTTON_PRESSED ? CEC_OPCODE_USER_CONTROL_PRESSED : CEC_OPCODE_VENDOR_REMOTE_BUTTON_DOWN);
29104708 LOK	186	command.parameters.PushBack((uint8_t)CEC_CB_OPERAND1(p0));
	187
	188	// send to libCEC
	189	m_callback->OnCommandReceived(command);
	190	}
	191	break;
	192	case VC_CEC_BUTTON_RELEASE:
3b106c7d	193	case VC_CEC_REMOTE_RELEASE:
29104708 LOK	194	{
	195	// translate into a cec_command
	196	cec_command command;
3b106c7d LOK	197	cec_command::Format(command,
	198	(cec_logical_address)CEC_CB_INITIATOR(p0),
	199	(cec_logical_address)CEC_CB_FOLLOWER(p0),
	200	reason == VC_CEC_BUTTON_PRESSED ? CEC_OPCODE_USER_CONTROL_RELEASE : CEC_OPCODE_VENDOR_REMOTE_BUTTON_UP);
29104708 LOK	201	command.parameters.PushBack((uint8_t)CEC_CB_OPERAND1(p0));
	202
	203	// send to libCEC
	204	m_callback->OnCommandReceived(command);
	205	}
	206	break;
	207	case VC_CEC_LOGICAL_ADDR:
	208	{
	209	CLockObject lock(m_mutex);
d1a2ed70	210	m_previousLogicalAddress = m_logicalAddress;
29104708 LOK	211	if (CEC_CB_RC(header) == VCHIQ_SUCCESS)
	212	{
	213	m_bLogicalAddressChanged = true;
	214	m_logicalAddress = (cec_logical_address)(p0 & 0xF);
	215	LIB_CEC->AddLog(CEC_LOG_DEBUG, "logical address changed to %s (%x)", LIB_CEC->ToString(m_logicalAddress), m_logicalAddress);
	216	}
	217	else
	218	{
d1a2ed70	219	m_logicalAddress = CECDEVICE_FREEUSE;
29104708 LOK	220	LIB_CEC->AddLog(CEC_LOG_DEBUG, "failed to change the logical address, reset to %s (%x)", LIB_CEC->ToString(m_logicalAddress), m_logicalAddress);
	221	}
	222	m_logicalAddressCondition.Signal();
	223	}
	224	break;
7d27bafc LOK	225	case VC_CEC_LOGICAL_ADDR_LOST:
	226	{
	227	// the logical address was taken by another device
d1a2ed70	228	cec_logical_address previousAddress = m_logicalAddress == CECDEVICE_BROADCAST ? m_previousLogicalAddress : m_logicalAddress;
7d27bafc	229	m_logicalAddress = CECDEVICE_UNKNOWN;
f60ee8b3	230
40119e0c	231	// notify libCEC that we lost our LA when the connection was initialised
057497c6 LOK	232	bool bNotify(false);
	233	{
	234	CLockObject lock(m_mutex);
	235	bNotify = m_bInitialised && m_bLogicalAddressRegistered;
	236	}
	237	if (bNotify)
40119e0c	238	m_callback->HandleLogicalAddressLost(previousAddress);
7d27bafc LOK	239	}
7d27bafc LOK	240	break;
29104708	241	case VC_CEC_TOPOLOGY:
29104708 LOK	242	break;
	243	default:
	244	LIB_CEC->AddLog(CEC_LOG_DEBUG, "ignoring unknown reason %x", reason);
	245	break;
	246	}
	247	}
	248
	249	int CRPiCECAdapterCommunication::InitHostCEC(void)
	250	{
	251	VCHIQ_INSTANCE_T vchiq_instance;
	252	int iResult;
	253
	254	if ((iResult = vchiq_initialise(&vchiq_instance)) != VCHIQ_SUCCESS)
	255	{
	256	LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vchiq_initialise failed (%d)", __FUNCTION__, iResult);
	257	CStdString strError;
	258	strError.Format("%s - vchiq_initialise failed (%d)", __FUNCTION__, iResult);
	259	m_strError = strError;
	260	return iResult;
	261	}
	262	LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vchiq_initialise succeeded", __FUNCTION__);
	263
	264	if ((iResult = vchi_initialise(&m_vchi_instance)) != VCHIQ_SUCCESS)
	265	{
	266	LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vchi_initialise failed (%d)", __FUNCTION__, iResult);
	267	CStdString strError;
	268	strError.Format("%s - vchi_initialise failed (%d)", __FUNCTION__, iResult);
	269	m_strError = strError;
	270	return iResult;
	271	}
	272	LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vchi_initialise succeeded", __FUNCTION__);
	273
	274	vchiq_instance = (VCHIQ_INSTANCE_T)m_vchi_instance;
	275
	276	m_vchi_connection = vchi_create_connection(single_get_func_table(),
	277	vchi_mphi_message_driver_func_table());
	278
	279	if ((iResult = vchi_connect(&m_vchi_connection, 1, m_vchi_instance)) != VCHIQ_SUCCESS)
	280	{
	281	LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vchi_connect failed (%d)", __FUNCTION__, iResult);
	282	CStdString strError;
	283	strError.Format("%s - vchi_connect failed (%d)", __FUNCTION__, iResult);
	284	m_strError = strError;
	285	return iResult;
	286	}
	287	LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vchi_connect succeeded", __FUNCTION__);
	288
	289	return VCHIQ_SUCCESS;
	290	}
	291
6bba6e2c	292	bool CRPiCECAdapterCommunication::Open(uint32_t iTimeoutMs /* = CEC_DEFAULT_CONNECT_TIMEOUT /, bool UNUSED(bSkipChecks) / = false */, bool bStartListening)
29104708 LOK	293	{
	294	Close();
	295
	296	if (InitHostCEC() != VCHIQ_SUCCESS)
	297	return false;
	298
	299	if (bStartListening)
	300	{
	301	// enable passive mode
	302	vc_cec_set_passive(true);
	303
49ba42d4 LOK	304	// register the callbacks
	305	vc_cec_register_callback(rpi_cec_callback, (void*)this);
	306	vc_tv_register_callback(rpi_tv_callback, (void*)this);
29104708	307
6bba6e2c LOK	308	// release previous LA
	309	vc_cec_release_logical_address();
	310	if (!m_logicalAddressCondition.Wait(m_mutex, m_bLogicalAddressChanged, iTimeoutMs))
	311	{
	312	LIB_CEC->AddLog(CEC_LOG_ERROR, "failed to release the previous LA");
	313	return false;
	314	}
	315
29104708 LOK	316	// register LA "freeuse"
	317	if (RegisterLogicalAddress(CECDEVICE_FREEUSE))
	318	{
	319	LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - vc_cec initialised", __FUNCTION__);
	320	CLockObject lock(m_mutex);
	321	m_bInitialised = true;
	322	}
	323	else
	324	LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vc_cec could not be initialised", __FUNCTION__);
	325	}
	326
	327	return true;
	328	}
	329
	330	uint16_t CRPiCECAdapterCommunication::GetPhysicalAddress(void)
	331	{
	332	uint16_t iPA(CEC_INVALID_PHYSICAL_ADDRESS);
	333	if (!IsInitialised())
	334	return iPA;
	335
	336	if (vc_cec_get_physical_address(&iPA) == VCHIQ_SUCCESS)
	337	LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - physical address = %04x", __FUNCTION__, iPA);
	338	else
	339	{
	340	LIB_CEC->AddLog(CEC_LOG_WARNING, "%s - failed to get the physical address", __FUNCTION__);
	341	iPA = CEC_INVALID_PHYSICAL_ADDRESS;
	342	}
	343
	344	return iPA;
	345	}
	346
	347	void CRPiCECAdapterCommunication::Close(void)
	348	{
	349	{
	350	CLockObject lock(m_mutex);
	351	if (m_bInitialised)
	352	m_bInitialised = false;
	353	else
	354	return;
	355	}
49ba42d4 LOK	356	vc_tv_unregister_callback(rpi_tv_callback);
49ba42d4 LOK	357
29104708 LOK	358	UnregisterLogicalAddress();
	359
	360	// disable passive mode
	361	vc_cec_set_passive(false);
	362
	363	if (!g_bHostInited)
	364	{
	365	g_bHostInited = false;
	366	bcm_host_deinit();
	367	}
	368	}
	369
	370	std::string CRPiCECAdapterCommunication::GetError(void) const
	371	{
	372	std::string strError(m_strError);
	373	return strError;
	374	}
	375
	376	cec_adapter_message_state CRPiCECAdapterCommunication::Write(const cec_command &data, bool &UNUSED(bRetry), uint8_t UNUSED(iLineTimeout), bool bIsReply)
	377	{
	378	// ensure that the source LA is registered
	379	if (!RegisterLogicalAddress(data.initiator))
	380	{
	381	LIB_CEC->AddLog(CEC_LOG_DEBUG, "failed to register logical address %s (%X)", CCECTypeUtils::ToString(data.initiator), data.initiator);
	382	return (data.initiator == data.destination) ? ADAPTER_MESSAGE_STATE_SENT_NOT_ACKED : ADAPTER_MESSAGE_STATE_ERROR;
	383	}
	384
	385	if (!data.opcode_set && data.initiator == data.destination)
	386	{
	387	// registration of the logical address would have failed
	388	return ADAPTER_MESSAGE_STATE_SENT_NOT_ACKED;
	389	}
	390
	391	return m_queue->Write(data, bIsReply) ? ADAPTER_MESSAGE_STATE_SENT_ACKED : ADAPTER_MESSAGE_STATE_SENT_NOT_ACKED;
	392	}
	393
	394	uint16_t CRPiCECAdapterCommunication::GetFirmwareVersion(void)
	395	{
	396	return VC_CECSERVICE_VER;
	397	}
	398
	399	cec_logical_address CRPiCECAdapterCommunication::GetLogicalAddress(void)
	400	{
	401	{
	402	CLockObject lock(m_mutex);
	403	if (m_logicalAddress != CECDEVICE_UNKNOWN)
	404	return m_logicalAddress;
	405	}
	406
	407	CEC_AllDevices_T address;
	408	return (vc_cec_get_logical_address(&address) == VCHIQ_SUCCESS) ?
	409	(cec_logical_address)address : CECDEVICE_UNKNOWN;
	410	}
	411
	412	bool CRPiCECAdapterCommunication::UnregisterLogicalAddress(void)
	413	{
	414	CLockObject lock(m_mutex);
	415	if (m_logicalAddress == CECDEVICE_UNKNOWN \|\|
	416	m_logicalAddress == CECDEVICE_BROADCAST)
	417	return true;
	418
	419	LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - releasing previous logical address", __FUNCTION__);
057497c6 LOK	420	{
	421	CLockObject lock(m_mutex);
	422	m_bLogicalAddressRegistered = false;
	423	m_bLogicalAddressChanged = false;
	424	}
29104708 LOK	425
	426	vc_cec_release_logical_address();
	427
	428	return m_logicalAddressCondition.Wait(m_mutex, m_bLogicalAddressChanged);
	429	}
	430
	431	bool CRPiCECAdapterCommunication::RegisterLogicalAddress(const cec_logical_address address)
	432	{
	433	{
	434	CLockObject lock(m_mutex);
	435	if (m_logicalAddress == address)
	436	return true;
	437	}
	438
	439	if (!UnregisterLogicalAddress())
	440	return false;
	441
	442	LIB_CEC->AddLog(CEC_LOG_DEBUG, "%s - registering address %x", __FUNCTION__, address);
	443
	444	CLockObject lock(m_mutex);
	445	m_bLogicalAddressChanged = false;
	446	vc_cec_poll_address((CEC_AllDevices_T)address);
	447
	448	// register the new LA
	449	int iRetval = vc_cec_set_logical_address((CEC_AllDevices_T)address, (CEC_DEVICE_TYPE_T)CCECTypeUtils::GetType(address), CEC_VENDOR_ID_BROADCOM);
	450	if (iRetval != VCHIQ_SUCCESS)
	451	{
	452	LIB_CEC->AddLog(CEC_LOG_ERROR, "%s - vc_cec_set_logical_address(%X) returned %s (%d)", __FUNCTION__, address, ToString((VC_CEC_ERROR_T)iRetval), iRetval);
	453	return false;
	454	}
	455
057497c6 LOK	456	if (m_logicalAddressCondition.Wait(m_mutex, m_bLogicalAddressChanged))
	457	{
	458	m_bLogicalAddressRegistered = true;
	459	return true;
	460	}
	461	return false;
29104708 LOK	462	}
	463
	464	cec_logical_addresses CRPiCECAdapterCommunication::GetLogicalAddresses(void)
	465	{
	466	cec_logical_addresses addresses; addresses.Clear();
	467	cec_logical_address current = GetLogicalAddress();
	468	if (current != CECDEVICE_UNKNOWN)
	469	addresses.Set(current);
	470
	471	return addresses;
	472	}
	473
	474	bool CRPiCECAdapterCommunication::SetLogicalAddresses(const cec_logical_addresses &addresses)
	475	{
	476	// the current generation RPi only supports 1 LA, so just ensure that the primary address is registered
	477	return SupportsSourceLogicalAddress(addresses.primary) &&
	478	RegisterLogicalAddress(addresses.primary);
	479	}
	480
	481	void CRPiCECAdapterCommunication::InitHost(void)
	482	{
	483	if (!g_bHostInited)
	484	{
	485	g_bHostInited = true;
	486	bcm_host_init();
	487	}
	488	}
	489
	490	#endif