private void r4_names(TcpClient s, OtpInputStream ibuf)
{
try
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- NAMES(r4) ");
}
OtpOutputStream obuf = new OtpOutputStream();
obuf.write4BE(EpmdPort.get());
lock (portmap)
{
foreach (KeyValuePair <string, OtpPublishedNode> pair in portmap)
{
OtpPublishedNode node = pair.Value;
string info = String.Format("name {0} at port {1}\n", node.Alive, node.Port);
byte[] bytes = Encoding.GetEncoding("iso-8859-1").GetBytes(info);
obuf.writeN(bytes);
}
}
obuf.WriteTo(s.GetStream());
}
catch (IOException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Request not responding");
}
return;
}
public override void run()
{
log.InfoFormat("[OtpEpmd] start at port {0}", EpmdPort.get());
while (!done)
{
try
{
TcpClient newsock = sock.AcceptTcpClient();
OtpEpmdConnection conn = new OtpEpmdConnection(this, newsock);
conn.start();
}
catch (Exception)
{
}
}
return;
}
// Ask epmd to close his end of the connection.
// Caller should close his epmd socket as well.
// This method is pretty forgiving...
/**
* Unregister from Epmd. Other nodes wishing to connect will no longer be
* able to.
*
* <p>
* This method does not report any failures.
*/
public static void unPublishPort(OtpLocalNode node)
{
try
{
using (TcpClient s = new TcpClient(Dns.GetHostName(), EpmdPort.get()))
{
OtpOutputStream obuf = new OtpOutputStream();
obuf.write2BE(node.Alive.Length + 1);
obuf.write1(stopReq);
obuf.writeN(Encoding.GetEncoding("iso-8859-1").GetBytes(node.Alive));
obuf.WriteTo(s.GetStream());
// don't even wait for a response (is there one?)
if (traceLevel >= traceThreshold)
{
log.Debug("-> UNPUBLISH " + node + " port=" + node.Port);
log.Debug("<- OK (assumed)");
}
}
}
catch (Exception) /* ignore all failures */
{
}
}
public static String[] lookupNames(IPAddress address)
{
try
{
OtpOutputStream obuf = new OtpOutputStream();
using (TcpClient s = new TcpClient(address.ToString(), EpmdPort.get()))
{
obuf.write2BE(1);
obuf.write1(names4req);
// send request
obuf.WriteTo(s.GetStream());
if (traceLevel >= traceThreshold)
{
log.Debug("-> NAMES (r4) ");
}
// get reply
byte[] buffer = new byte[256];
MemoryStream ms = new MemoryStream(256);
while (true)
{
int bytesRead = s.GetStream().Read(buffer, 0, buffer.Length);
if (bytesRead == -1)
{
break;
}
ms.Write(buffer, 0, bytesRead);
}
byte[] tmpbuf = ms.GetBuffer();
OtpInputStream ibuf = new OtpInputStream(tmpbuf, 0);
ibuf.read4BE(); // read port int
// int port = ibuf.read4BE();
// check if port = epmdPort
int n = tmpbuf.Length;
byte[] buf = new byte[n - 4];
Array.Copy(tmpbuf, 4, buf, 0, n - 4);
String all = OtpErlangString.newString(buf);
return(all.Split(new char[] { '\n' }));
}
}
catch (SocketException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + address);
}
catch (IOException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding when requesting names");
}
catch (OtpErlangDecodeException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (invalid response)");
}
throw new IOException("Nameserver not responding when requesting names");
}
}
/*
* this function will get an exception if it tries to talk to an r3 epmd, or
* if something else happens that it cannot forsee. In both cases we return
* an exception (and the caller should try again, using the r3 protocol). If
* we manage to successfully communicate with an r4 epmd, we return either
* the socket, or null, depending on the result.
*/
private static TcpClient r4_publish(OtpLocalNode node)
{
TcpClient s = null;
try
{
OtpOutputStream obuf = new OtpOutputStream();
s = new TcpClient(node.Host, EpmdPort.get());
obuf.write2BE(node.Alive.Length + 13);
obuf.write1(publish4req);
obuf.write2BE(node.Port);
obuf.write1(node.Type);
obuf.write1(node.Proto);
obuf.write2BE(node.DistHigh);
obuf.write2BE(node.DistLow);
obuf.write2BE(node.Alive.Length);
obuf.writeN(Encoding.GetEncoding("iso-8859-1").GetBytes(node.Alive));
obuf.write2BE(0); // No extra
// send request
obuf.WriteTo(s.GetStream());
if (traceLevel >= traceThreshold)
{
log.Debug("-> PUBLISH (r4) " + node + " port=" + node.Port);
}
// get reply
byte[] tmpbuf = new byte[100];
int n = s.GetStream().Read(tmpbuf, 0, tmpbuf.Length);
if (n < 0)
{
// this was an r3 node => not a failure (yet)
if (s != null)
{
s.Close();
}
throw new IOException("Nameserver not responding on "
+ node.Host + " when publishing " + node.Alive);
}
OtpInputStream ibuf = new OtpInputStream(tmpbuf, 0);
int response = ibuf.read1();
if (response == publish4resp)
{
int result = ibuf.read1();
if (result == 0)
{
node.Creation = ibuf.read2BE();
if (traceLevel >= traceThreshold)
{
log.Debug("<- OK");
}
return(s); // success
}
}
}
catch (SocketException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host);
}
catch (IOException)
{
// epmd closed the connection = fail
if (s != null)
{
s.Close();
}
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when publishing " + node.Alive);
}
catch (OtpErlangDecodeException)
{
if (s != null)
{
s.Close();
}
if (traceLevel >= traceThreshold)
{
log.Debug("<- (invalid response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when publishing " + node.Alive);
}
if (s != null)
{
s.Close();
}
return(null);
}
private static TcpClient r3_publish(OtpLocalNode node)
{
TcpClient s;
try
{
OtpOutputStream obuf = new OtpOutputStream();
s = new TcpClient(node.Host, EpmdPort.get());
obuf.write2BE(node.Alive.Length + 3);
obuf.write1(publish3req);
obuf.write2BE(node.Port);
obuf.writeN(Encoding.GetEncoding("iso-8859-1").GetBytes(node.Alive));
// send request
obuf.WriteTo(s.GetStream());
if (traceLevel >= traceThreshold)
{
log.Debug("-> PUBLISH (r3) " + node + " port=" + node.Port);
}
byte[] tmpbuf = new byte[100];
int n = s.GetStream().Read(tmpbuf, 0, tmpbuf.Length);
if (n < 0)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
return(null);
}
OtpInputStream ibuf = new OtpInputStream(tmpbuf, 0);
if (ibuf.read1() == publish3ok)
{
node.Creation = ibuf.read2BE();
if (traceLevel >= traceThreshold)
{
log.Debug("<- OK");
}
return(s); // success - don't close socket
}
}
catch (SocketException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host);
}
catch (IOException)
{
// epmd closed the connection = fail
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when publishing " + node.Alive);
}
catch (OtpErlangDecodeException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (invalid response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when publishing " + node.Alive);
}
return(null); // failure
}
private static int r4_lookupPort(AbstractNode node)
{
int port = 0;
try
{
OtpOutputStream obuf = new OtpOutputStream();
using (TcpClient s = new TcpClient(node.Host, EpmdPort.get()))
{
// build and send epmd request
// length[2], tag[1], alivename[n] (length = n+1)
obuf.write2BE(node.Alive.Length + 1);
obuf.write1(port4req);
obuf.writeN(Encoding.GetEncoding("iso-8859-1").GetBytes(node.Alive));
// send request
obuf.WriteTo(s.GetStream());
if (traceLevel >= traceThreshold)
{
log.Debug("-> LOOKUP (r4) " + node);
}
// receive and decode reply
// resptag[1], result[1], port[2], ntype[1], proto[1],
// disthigh[2], distlow[2], nlen[2], alivename[n],
// elen[2], edata[m]
byte[] tmpbuf = new byte[100];
int n = s.GetStream().Read(tmpbuf, 0, tmpbuf.Length);
if (n < 0)
{
// this was an r3 node => not a failure (yet)
throw new IOException("Nameserver not responding on "
+ node.Host + " when looking up " + node.Alive);
}
OtpInputStream ibuf = new OtpInputStream(tmpbuf, 0);
int response = ibuf.read1();
if (response == port4resp)
{
int result = ibuf.read1();
if (result == 0)
{
port = ibuf.read2BE();
node.Type = ibuf.read1();
node.Proto = ibuf.read1();
node.DistHigh = ibuf.read2BE();
node.DistLow = ibuf.read2BE();
// ignore rest of fields
}
}
}
}
catch (SocketException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host);
}
catch (IOException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when looking up " + node.Alive);
}
catch (OtpErlangDecodeException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (invalid response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when looking up " + node.Alive);
}
if (traceLevel >= traceThreshold)
{
if (port == 0)
{
log.Debug("<- NOT FOUND");
}
else
{
log.Debug("<- PORT " + port);
}
}
return(port);
}
private static int r3_lookupPort(AbstractNode node)
{
int port = 0;
try
{
OtpOutputStream obuf = new OtpOutputStream();
using (TcpClient s = new TcpClient(node.Host, EpmdPort.get()))
{
// build and send epmd request
// length[2], tag[1], alivename[n] (length = n+1)
obuf.write2BE(node.Alive.Length + 1);
obuf.write1(port3req);
obuf.writeN(Encoding.GetEncoding("iso-8859-1").GetBytes(node.Alive));
// send request
obuf.WriteTo(s.GetStream());
if (traceLevel >= traceThreshold)
{
log.Debug("-> LOOKUP (r3) " + node);
}
// receive and decode reply
byte[] tmpbuf = new byte[100];
s.GetStream().Read(tmpbuf, 0, tmpbuf.Length);
OtpInputStream ibuf = new OtpInputStream(tmpbuf, 0);
port = ibuf.read2BE();
}
}
catch (SocketException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host);
}
catch (IOException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (no response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when looking up " + node.Alive);
}
catch (OtpErlangDecodeException)
{
if (traceLevel >= traceThreshold)
{
log.Debug("<- (invalid response)");
}
throw new IOException("Nameserver not responding on " + node.Host
+ " when looking up " + node.Alive);
}
if (traceLevel >= traceThreshold)
{
if (port == 0)
{
log.Debug("<- NOT FOUND");
}
else
{
log.Debug("<- PORT " + port);
}
}
return(port);
}
/**
* Set the port number to be used to contact the epmd process.
* Only needed when the default port is not desired and system environment
* variable ERL_EPMD_PORT can not be read (applet).
*/
public static void useEpmdPort(int port)
{
EpmdPort.set(port);
}
public OtpEpmd()
: base("OtpEpmd", true)
{
sock = new TcpListener(new IPEndPoint(IPAddress.Any, EpmdPort.get()));
}
