/*
 * net/tipc/addr.c: TIPC address utility routines
 *
 * Copyright (c) 2000-2006, 2018, Ericsson AB
 * Copyright (c) 2004-2005, 2010-2011, Wind River Systems
 * Copyright (c) 2020-2021, Red Hat Inc
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the names of the copyright holders nor the names of its
 *    contributors may be used to endorse or promote products derived from
 *    this software without specific prior written permission.
 *
 * Alternatively, this software may be distributed under the terms of the
 * GNU General Public License ("GPL") version 2 as published by the Free
 * Software Foundation.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include "addr.h"
#include "core.h"

bool tipc_in_scope(bool legacy_format, u32 domain, u32 addr)
{
 if (!domain || (domain == addr))
  return true;
 if (!legacy_format)
  return false;
 if (domain == tipc_cluster_mask(addr)) /* domain <Z.C.0> */
  return true;
 if (domain == (addr & TIPC_ZONE_CLUSTER_MASK)) /* domain <Z.C.0> */
  return true;
 if (domain == (addr & TIPC_ZONE_MASK)) /* domain <Z.0.0> */
  return true;
 return false;
}

void tipc_set_node_id(struct net *net, u8 *id)
{
 struct tipc_net *tn = tipc_net(net);

 memcpy(tn->node_id, id, NODE_ID_LEN);
 tipc_nodeid2string(tn->node_id_string, id);
 tn->trial_addr = hash128to32(id);
 pr_info("Node identity %s, cluster identity %u\n",
  tipc_own_id_string(net), tn->net_id);
}

void tipc_set_node_addr(struct net *net, u32 addr)
{
 struct tipc_net *tn = tipc_net(net);
 u8 node_id[NODE_ID_LEN] = {0,};

 tn->node_addr = addr;
 if (!tipc_own_id(net)) {
  sprintf(node_id, "%x", addr);
  tipc_set_node_id(net, node_id);
 }
 tn->trial_addr = addr;
 tn->addr_trial_end = jiffies;
 pr_info("Node number set to %u\n", addr);
}

char *tipc_nodeid2string(char *str, u8 *id)
{
 int i;
 u8 c;

 /* Already a string ? */
 for (i = 0; i < NODE_ID_LEN; i++) {
  c = id[i];
  if (c >= '0' && c <= '9')
   continue;
  if (c >= 'A' && c <= 'Z')
   continue;
  if (c >= 'a' && c <= 'z')
   continue;
  if (c == '.')
   continue;
  if (c == ':')
   continue;
  if (c == '_')
   continue;
  if (c == '-')
   continue;
  if (c == '@')
   continue;
  if (c != 0)
   break;
 }
 if (i == NODE_ID_LEN) {
  memcpy(str, id, NODE_ID_LEN);
  str[NODE_ID_LEN] = 0;
  return str;
 }

 /* Translate to hex string */
 for (i = 0; i < NODE_ID_LEN; i++)
  sprintf(&str[2 * i], "%02x", id[i]);

 /* Strip off trailing zeroes */
 for (i = NODE_ID_STR_LEN - 2; str[i] == '0'; i--)
  str[i] = 0;

 return str;
}