Sign in to follow this  
Followers 0
Fabry

LanMule

7 posts in this topic

#1 ·  Posted (edited)

I wrote a simple file tranfer, like eMule, but it is only a example.

It's slow, but it supports more file. It can improve.

It needs md5deep.exe for hash. It works with API.

[autoit]#cs ----------------------------------------------------------------------------

AutoIt Version: 3.2.4.9

Author: Fabry

Script Function:

Template AutoIt script.

#ce ----------------------------------------------------------------------------

#include <GuiConstants.au3>

#Include <GuiListView.au3>

#include<String.au3>

#Include <GuiList.au3>

#include<File.au3>

#include <Process.au3>

Dim $ips[64][9], $file1, $file_pro[3], $file_RX, $est, $file_TX, $data, $termina[6], $Progress[6], $perc[6], $files[100][64], $miei[100][64]

Dim $listview, $Btn_Exit, $msg, $Status, $Btn_Insert, $ret, $Input_Index, $scaricati[5][64]

Global $gui2 = -1

$versione = '1.0.0'

UDPStartup()

$nome = @ComputerName

$My_ips = StringSplit(@IPAddress1, '.')

Dim $Broadcast = $My_ips[1] & '.' & $My_ips[2] & '.' & $My_ips[3] & '.255'

;~ AutoItSetOption('TCPTimeout', 800)

$socket1 = UDPOpen($Broadcast, 65532)

If @error = 0 Then UDPSend($socket1, @IPAddress1 & '

md5deep.exe

Edited by Fabry

A lan chat (Multilanguage)LanMuleFile transferTank gameTank 2 an online game[center]L'esperienza è il nome che tutti danno ai propri errori.Experience is the name everyone gives to their mistakes.Oscar Wilde[/center]

Share this post


Link to post
Share on other sites



It's possible sahre only one directory(default: @scriptdir\condivisi). To modify the directory to press opzioni>scegli cartella>salva. A part of code I picked it up from my chat. If someone shared some file and you just entered, press 'cerca' to refresh list of file.

Ask me more information.


A lan chat (Multilanguage)LanMuleFile transferTank gameTank 2 an online game[center]L'esperienza è il nome che tutti danno ai propri errori.Experience is the name everyone gives to their mistakes.Oscar Wilde[/center]

Share this post


Link to post
Share on other sites

Hi,

Question: why UDP and not TCP?

And i like the idea of more than one files :rolleyes:

Arjan

Share this post


Link to post
Share on other sites

Nice. Someone has finally adapted UDP... :rolleyes:

Concerning the UDP vs TCP, well, UDP is faster because the packet headers are not so complicated..

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0