Back to Questions
1.4k
views1
comment
Convert a c# ping class in f#
f#c#

Hi,

I have to code a network monitoring sofware like a very simple Nagios, for example.

I know C#, but absolutley not F#. Despite this fact, I have chosen to write this sofware in F#.

Anyone know about how to convert this c# class in f#

It's a class to ping an IPAdress.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13

private IPAddress IPadress;
private PingReply Reply;
private Ping Pinger = new Ping();

public PingReply _pinguer(string vIPadress, string vTampon, string vEcheance)
{
		byte[] ArrayAdressIP = stringToTabAdrIP(vIPadress);
		byte[] Tampon = stringToByte(vTampon);
		int Echeance = Convert.ToInt32(vEcheance);
		IPadress = new IPAddress(ArrayAdressIP);
		Reply = Pinger.Send(IPadress, Echeance, Tampon);
		return Reply;
}

NB
stringToTabAdrIP function converts an IP adress whose type is string in a bytes array.

stringToByte function converts a standard string in a bytes array

Thanks a lot[:D]

.

Unless I'm missing something, this should be very straightforward:

1
2
3
4
5
6
7

let _pinguer vIPadress vTampon vEcheance =
    let ip = stringToTabAdrIP(vIPadress)
    let t = stringToByte(vTampon)
    let e = System.Int32.Parse(vEcheance)
    
    let ip' = new IPAddress(ip)
    pinger.Send(ip',e,t)

Note that the casing is a bit different: in F#, let-bindings are typically written in camelCase rather than PascalCase.

By on 6/2/2009 7:55 AM ()

    Topic tags

    IntelliFactory Offices Copyright (c) 2011-2012 IntelliFactory. All rights reserved.
    Home | Products | Consulting | Trainings | Blogs | Jobs | Contact Us | Terms of Use | Privacy Policy | Cookie Policy     		Built with WebSharper