(PHP ActiveX) Transfer a File using Sockets (TLS or non-TLS)

Demonstrates how to two programs, one a socket writer and the other a socket reader, can transfer a file. The connection can be TLS or a regular non-encrypted TCP connection.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows Note: The php_com_dotnet.dll may need to be enabled inside of php.ini.

<?php

// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

// On the sending side, we'll load the file into a BinData object and send.
// On the receiving side, we'll read from the socket connection into a BinData, and save to a file.
// This example assumes the file is not crazy-large, and that the entire contents
// can fit into memory.  
// (If the file is too large for memory, there are other ways to send. It just involves streaming or 
// sending the file chunk-by-chunk..)

// This section of code is for the sender.
// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.BinData')
$bdToSend = new COM("Chilkat.BinData");
$success = $bdToSend->LoadFile('somePath/someFile.dat');
// Assume success for the example...

// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.Socket')
$sndSock = new COM("Chilkat.Socket");
$bUseTls = 1;
$port = 5555;
$maxWaitMs = 5000;
$success = $sndSock->Connect('some_domain_or_ip.com',$port,$bUseTls,$maxWaitMs);
// Assume success for the example...

// Tell the receiver how many bytes are coming.
$numBytes = $bdToSend->NumBytes;
$bBigEndian = 1;
$success = $sndSock->SendInt32($numBytes,$bBigEndian);

// Send the file data (sends the entire contents of bdToSend).
$success = $sndSock->SendBd($bdToSend,0,0);

// Get an acknowledgement.
$success = $sndSock->ReceiveInt32($bBigEndian);
if ($success != 1) {
    print $sndSock->LastErrorText . "\n";
    exit;
}

// Did the receiver get the correct number of bytes?
if ($sndSock->ReceivedInt != $numBytes) {
    print 'The receiver did not acknowledge with the correct number of bytes.' . "\n";
    exit;
}

print 'File sent!' . "\n";

// ------------------------------------------------------------------------------------
// The code below is for the receiving side (running on some other computer..)

// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.Socket')
$listenSock = new COM("Chilkat.Socket");

$success = $listenSock->BindAndListen(5555,25);
if ($success != 1) {
    print $listenSock->LastErrorText . "\n";
    exit;
}

// Get the next incoming connection
// Wait a maximum of 20 seconds (20000 millisec)

// rcvSock is a Chilkat.Socket
$rcvSock = $listenSock->AcceptNextConnection(20000);
if ($listenSock->LastMethodSuccess == 0) {
    print $listenSock->LastErrorText . "\n";
    exit;
}

// The sender will first send the big-endian integer for the number of bytes
// that are forthcoming..
$success = $rcvSock->ReceiveInt32($bBigEndian);
if ($success != 1) {
    print $rcvSock->LastErrorText . "\n";

    exit;
}

$numBytesComing = $rcvSock->ReceivedInt;

// Receive that many bytes..
// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.BinData')
$bdReceived = new COM("Chilkat.BinData");
$success = $rcvSock->ReceiveBdN($numBytesComing,$bdReceived);
if ($success != 1) {
    print $rcvSock->LastErrorText . "\n";

    exit;
}

// Acknowledge the sender by sending back the number of bytes we received.
$success = $rcvSock->SendInt32($bdReceived->NumBytes,$bBigEndian);

// Close the connection.
$maxWaitMs = 20;
$rcvSock->Close($maxWaitMs);

// Save the received data to a file.
$success = $bdReceived->WriteFile('somePath/someFile.dat');
// Assume success for the example...

print 'File received!' . "\n";

?>