[%
# vi: ft=tt2

# Return an array of shared IPv6 addresses from the interface of a given
# type for all nodes which act as a given role.
#
# @param argv.role      The role of the node to process, one of:
#                         proxy, lb, mgmt
# @param argv.type      The interface type of a node to extract the
#                       shared IPv6 from, one of:
#                         web_int, web_ext, sip_int, sip_ext, ...
# @param argv.format    Optional reformatting of IPv6 addresses.
# @param argv.status    node status [ online, offline, inactive ]
#                         default value: ['online', 'inactive']
# @return out           The array of shared IPv6 addresses.

IF !argv.status.size;
  argv.status = ['online', 'inactive'];
END;

status = {
  online = 0
  offline = 0
  inactive = 0
};
FOREACH val IN argv.status;
  status.$val = 1;
END;

blktmp.processed_hosts = {};
out = [];
FOREACH host IN hosts.keys.sort;
  NEXT UNLESS status.item(hosts.$host.status);
  NEXT UNLESS hosts.$host.role.grep('^' _ argv.role _ '$').size();
  NEXT IF blktmp.processed_hosts.$host.defined;

  FOREACH iface IN hosts.$host.interfaces;
    FOREACH realiface IN hosts.$host.keys;
      NEXT IF realiface != iface;
      NEXT UNLESS hosts.$host.$realiface.type.grep('^' _ argv.type _ '$').size();

      peer = hosts.$host.peer;
      blktmp.processed_hosts.$peer = 1;
      FOREACH ip IN hosts.$host.$realiface.shared_v6ip;
        IF argv.format == 'expand';
          WHILE ip.match('::') && ip.match(':', 1).size < 8;
            ip = ip.replace('::', '::0:');
          END;
          ip = ip.replace('::', ':');
          ip = ip.replace('^:', '0:');
          ip = ip.replace(':$', ':0');
        END;
        NEXT UNLESS ip;
        out.push(ip);
      END;
    END;
  END;
END;
out = out.sort;

-%]
