Closed

Correct delphi code to get the SSL finger print for google

This project received 4 bids from talented freelancers with an average bid price of $204 USD.

Get free quotes for a project like this
Employer working
Project Budget
N/A
Total Bids
4
Project Description

Hi all,

I have a source code of delphi (Attached) which retrieves the SSL finger print of any site correctly:

So if I enter [url removed, login to view] I get

F5:6B:F2:44:63:B0:BD:61:36:C5:E8:72:34:6B:32:04:28:FF:4D:7C

The only issue I have with it is with [url removed, login to view] I think the http component gets the page from the local ISP and reports wrong SSL as the following:

F4:69:4A:F2:CF:F8:46:95:35:A2:44:E5:F9:CE:6A:4E:8D:33:43:45 Wrong SSL for [url removed, login to view] From local ISP via Delphi

‎25:89:c1:70:6b:04:54:43:9f:28:fa:8f:3e:d3:7c:45:05:79:9b:c4 Correct SSL for [url removed, login to view] from Chrome and Firefox webbrowser

What is required from you :

1- Fix the code to give me correct SSL finger print for [url removed, login to view]

2- If the site queried is using ECDHE as key exchange mechanism this should be displayed on different edit box ( google is using it) or popup message. U can find this in chrome browser by checking the ssl information.

3- If site is using Extended Validation SSL this should be shown on a different edit box or popup message.

4- Currently the application uses Indy components from theVCL IdHTTP1 + IdSSLIOHandlerSocketOpenSSL1 I want it to be converted to native api code so I use native code no visual component like the following example:

================

procedure [url removed, login to view];

var

HTTP: TIdHTTP;

SSL: TIdSSLIOHandlerSocketOpenSSL;

i: Integer;

HTTPResponse, HostIP: string;

begin

HTTP := [url removed, login to view](nil);

SSL := [url removed, login to view](nil);

try

[url removed, login to view] := sslvSSLv23; // set SSL version (ver 2 + 3)

[url removed, login to view] := [sslvSSLv2, sslvSSLv3, sslvTLSv1, sslvTLSv1_1,

sslvTLSv1_2];

[url removed, login to view] := [sslvrfPeer];

// set verifymode otherwise getting local ISP ssl finger print fails

[url removed, login to view] := IdSSLIOHandlerSocketOpenSSL1VerifyPeer;

// set onVerifyPeer event

[url removed, login to view] := 10 * 1000; // set connect timeout

[url removed, login to view] := 10 * 1000; // set read response timeout

[url removed, login to view] := SSL;

[url removed, login to view] := True;

================

I will attach the code I have ... I will not accept the bit unless u show me a working exe that I will test more than once site on it to make sure it does what I want.

It should be fully commented so I can modify it they way I want.

I want a working application form + button + url input text box + ssl fingerprint on memo box.

Do not use any ActiveX use pure delphi code.

project should not take more than one day after acceptance.

Need ur support if I need to tweak the code

Additional resources:

Extended Validation SSL Example: [url removed, login to view]

EV SSL resources

Cool with source code

[url removed, login to view]

IDS OF EV from Fire fox

[url removed, login to view]

Ids from wiki

[url removed, login to view]

more:

[url removed, login to view]

[url removed, login to view]

Looking to make some money?

  • Set your budget and the timeframe
  • Outline your proposal
  • Get paid for your work

Hire Freelancers who also bid on this project

    • Forbes
    • The New York Times
    • Time
    • Wall Street Journal
    • Times Online