vipnsgethostbyaddr.c

Go to the documentation of this file.

/********************************************************
 * Myricom VI-GM  networking software and documentation *
 * Copyright (c) 2001 by Myricom, Inc.                  *
 * All rights reserved.                                 *
 * See the file `COPYING' for copyright notice.         *
 ********************************************************/

#include <string.h>

#include "vipl_priv.h"


VIP_ENTRY_POINT VIP_RETURN
VipNSGetHostByAddr (VIP_NIC_HANDLE NicHandle,
                    VIP_NET_ADDRESS * Address,
                    VIP_CHAR * Name, VIP_ULONG * NameLen)
{
  VIP_UCHAR *gm_name_ptr;
  VIP_ULONG gm_name_len;
  VIP_UINT32 gm_node_id;
  VIP_NIC *vip_nic_ptr;
  gm_status_t gm_status;
  VIP_DEBUG_LABEL (("VipNSGetHostByName"));

  if (Name == NULL)
    {
      VIP_DEBUG (("Name is null"));
      return VIP_INVALID_PARAMETER;
    }

  if (NameLen == NULL)
    {
      VIP_DEBUG (("NameLen is null"));
      return VIP_INVALID_PARAMETER;
    }

  if (Address == NULL)
    {
      VIP_DEBUG (("Address is null"));
      return VIP_INVALID_PARAMETER;
    }

  /* check net address (host part) */
  if (Address->HostAddressLen < VI_GM_MAC_ADDRESS_LEN)
    {
      VIP_DEBUG (("HostAddressLen field in Address is invalid (should be %d)",
                  VI_GM_MAC_ADDRESS_LEN));
      return VIP_INVALID_PARAMETER;
    }

  /* check nic handle */
  vip_nic_ptr = (VIP_NIC *) NicHandle;
  if (VIP_INVALID_NIC_HANDLE (vip_nic_ptr))
    {
      VIP_DEBUG (("Invalid NIC handle"));
      return VIP_INVALID_PARAMETER;
    }
  VIP_MUTEX_LOCK (&(vip_nic_ptr->vip_gm_ptr->lock));
  VIP_PROGRESSION (vip_nic_ptr->vip_gm_ptr);
  VIP_MUTEX_LOCK (&(vip_nic_ptr->lock));

  /* check if the name service is initialized */
  if (vip_nic_ptr->ns_initialized == VIP_FALSE)
    {
      VIP_DEBUG (("Name service not previously initialized"));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->lock));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->vip_gm_ptr->lock));
      return VIP_ERROR_NAMESERVICE;
    }

  /* check the MAC address */
  VIP_ENTER_IOCTL (vip_nic_ptr->vip_gm_ptr);
  gm_status = gm_unique_id_to_node_id (vip_nic_ptr->vip_gm_ptr->gm_port,
                                       Address->HostAddress, &gm_node_id);
  VIP_EXIT_IOCTL (vip_nic_ptr->vip_gm_ptr);

  if (gm_status != GM_SUCCESS)
    {
      VIP_DEBUG_GM (("Unable to get the GM node id of the Myrinet board "
                     "with MAC address %x:%x:%x:%x:%x:%c",
                     Address->HostAddress[0], Address->HostAddress[1],
                     Address->HostAddress[2], Address->HostAddress[3],
                     Address->HostAddress[4], Address->HostAddress[5]));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->lock));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->vip_gm_ptr->lock));
      return VIP_ERROR_NAMESERVICE;
    }

  if (gm_node_id == GM_NO_SUCH_NODE_ID)
    {
      VIP_DEBUG (("GM does not know this MAC address"));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->lock));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->vip_gm_ptr->lock));
      return VIP_ERROR_NAMESERVICE;
    }

  VIP_MUTEX_LOCK (&vip_gm_host_name_lock);
  VIP_ENTER_IOCTL (vip_nic_ptr->vip_gm_ptr);
  gm_name_ptr = gm_node_id_to_host_name (vip_nic_ptr->vip_gm_ptr->gm_port,
                                         gm_node_id);
  VIP_EXIT_IOCTL (vip_nic_ptr->vip_gm_ptr);
  gm_name_len = strlen (gm_name_ptr);

  /* check the NameLen */
  if (*NameLen <= gm_name_len)
    {
      *NameLen = gm_name_len + 1;
      VIP_MUTEX_UNLOCK (&vip_gm_host_name_lock);
      VIP_DEBUG (("NameLen is too small (requires %d)", gm_name_len + 1));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->lock));
      VIP_MUTEX_UNLOCK (&(vip_nic_ptr->vip_gm_ptr->lock));
      return VIP_INVALID_PARAMETER;
    }

  strcpy (Name, gm_name_ptr);
  *NameLen = gm_name_len;

  VIP_MUTEX_UNLOCK (&vip_gm_host_name_lock);
  VIP_DEBUG (("Success"));
  VIP_MUTEX_UNLOCK (&(vip_nic_ptr->lock));
  VIP_MUTEX_UNLOCK (&(vip_nic_ptr->vip_gm_ptr->lock));
  return VIP_SUCCESS;
}