#define LOG_MODULE PacketLogModuleVlanLayer

#include "VlanLayer.h"

#include "IPv4Layer.h"

#include "IPv6Layer.h"

#include "PayloadLayer.h"

#include "ArpLayer.h"

#include "PPPoELayer.h"

#include "MplsLayer.h"

#include "LLCLayer.h"

#include <sstream>

#include "EndianPortable.h"

namespace pcpp

{

  VlanLayer::VlanLayer(const uint16_t vlanID, bool cfi, uint8_t priority, uint16_t etherType)

  {

    allocData(sizeof(vlan_header));

    m_Protocol = VLAN;

    vlan_header* vlanHeader = getVlanHeader();

    setVlanID(vlanID);

    setCFI(cfi);

    setPriority(priority);

    vlanHeader->etherType = htobe16(etherType);

  }

  uint16_t VlanLayer::getVlanID() const

  {

    return be16toh(getVlanHeader()->vlan) & 0xFFF;

  }

  uint8_t VlanLayer::getCFI() const

  {

    return ((be16toh(getVlanHeader()->vlan) >> 12) & 1);

  }

  uint8_t VlanLayer::getPriority() const

  {

    return (be16toh(getVlanHeader()->vlan) >> 13) & 7;

  }

  void VlanLayer::setVlanID(uint16_t id)

  {

    getVlanHeader()->vlan = htobe16((be16toh(getVlanHeader()->vlan) & (~0xFFF)) | (id & 0xFFF));

  }

  void VlanLayer::setCFI(bool cfi)

  {

    getVlanHeader()->vlan = htobe16((be16toh(getVlanHeader()->vlan) & (~(1 << 12))) | ((cfi & 1) << 12));

  }

  void VlanLayer::setPriority(uint8_t priority)

  {

    getVlanHeader()->vlan = htobe16((be16toh(getVlanHeader()->vlan) & (~(7 << 13))) | ((priority & 7) << 13));

  }

  void VlanLayer::parseNextLayer()

  {

    if (m_DataLen <= sizeof(vlan_header))

      return;

    uint8_t* payload = m_Data + sizeof(vlan_header);

    size_t payloadLen = m_DataLen - sizeof(vlan_header);

    vlan_header* hdr = getVlanHeader();

    switch (be16toh(hdr->etherType))

    {

    case PCPP_ETHERTYPE_IP:

    {

      tryConstructNextLayerWithFallback<IPv4Layer, PayloadLayer>(payload, payloadLen);

      break;

    }

    case PCPP_ETHERTYPE_IPV6:

    {

      tryConstructNextLayerWithFallback<IPv6Layer, PayloadLayer>(payload, payloadLen);

      break;

    }

    case PCPP_ETHERTYPE_ARP:

    {

      constructNextLayer<ArpLayer>(payload, payloadLen);

      break;

    }

    case PCPP_ETHERTYPE_VLAN:

    case PCPP_ETHERTYPE_IEEE_802_1AD:

    {

      constructNextLayer<VlanLayer>(payload, payloadLen);

      break;

    }

    case PCPP_ETHERTYPE_PPPOES:

    {

      tryConstructNextLayerWithFallback<PPPoESessionLayer, PayloadLayer>(payload, payloadLen);

      break;

    }

    case PCPP_ETHERTYPE_PPPOED:

    {

      tryConstructNextLayerWithFallback<PPPoEDiscoveryLayer, PayloadLayer>(payload, payloadLen);

      break;

    }

    case PCPP_ETHERTYPE_MPLS:

    {

      constructNextLayer<MplsLayer>(payload, payloadLen);

      break;

    }

    default:

    {

      if ((be16toh(hdr->etherType) < 1500))

      {

        tryConstructNextLayerWithFallback<LLCLayer, PayloadLayer>(payload, payloadLen);

      }

      else

      {

        constructNextLayer<PayloadLayer>(payload, payloadLen);

      }

      break;

    }

    }

  }

  void VlanLayer::computeCalculateFields()

  {

    if (m_NextLayer == nullptr)

      return;

    switch (m_NextLayer->getProtocol())

    {

    case IPv4:

      getVlanHeader()->etherType = htobe16(PCPP_ETHERTYPE_IP);

      break;

    case IPv6:

      getVlanHeader()->etherType = htobe16(PCPP_ETHERTYPE_IPV6);

      break;

    case ARP:

      getVlanHeader()->etherType = htobe16(PCPP_ETHERTYPE_ARP);

      break;

    case VLAN:

      getVlanHeader()->etherType = htobe16(PCPP_ETHERTYPE_VLAN);

      break;

    default:

      return;

    }

  }

  std::string VlanLayer::toString() const

  {

    std::ostringstream cfiStream;

    cfiStream << (int)getCFI();

    std::ostringstream priStream;

    priStream << (int)getPriority();

    std::ostringstream idStream;

    idStream << getVlanID();

    return "VLAN Layer, Priority: " + priStream.str() + ", Vlan ID: " + idStream.str() +

           ", CFI: " + cfiStream.str();

  }

}  // namespace pcpp