speedtest.net via C ++

All the code below is an excerpt from one of my recent project, in which it was necessary to determine the download and upload speed. It was reluctant to reinvent the wheel , therefore, there was a desire to use the service www.speedtest.net , as the most respected and efficient of services of this type. However, as practice has shown, he turned out to be quite unfriendly and had to invent some kind of bicycle.



So, I started this part of the work with digging Google and found one interesting link - http://speedtest.net/speedtest-config.php , which loads a rather large XML file, the beginning of which I will give below.
')

2. <?xml version = "1.0" encoding = "UTF-8" ?> <settings > <client ip = "*.*.*.*" lat = "60.0000" lon = "100.0000" isp = "Samara Telecom, JSC" isprating = "3.3" rating = "5" ispdlavg = "4449" ispulavg = "1394" /> <licensekey > 9c1687ea58e5e770-1df5b7cd427370f7-4b62a84526ea1f56 </licensekey > <customer > speedtest </customer > <servers > <server url = "http://speedtest.pronea.no/speedtest/upload.php" lat = "69.6828" lon = "18.9428" name = "Tromso" country = "Norway" countrycode = "NO" sponsor = "Pronea AS" sponsorurl = "http://www.pronea.no/" id = "1327" gid = "0" bigsamples = "1" /> <server url = "http://test.nax.no/speedtest/upload.php" lat = "65.8333" lon = "13.2000" name = "Helgeland" country = "Norway" countrycode = "NO" sponsor = "Noraxess Broadband" sponsorurl = "http://www.nax.no" id = "1362" gid = "0" url2 = "http://85.221.66.41/speedtest/upload.php" bigsamples = "1" />
3. <?xml version = "1.0" encoding = "UTF-8" ?> <settings > <client ip = "*.*.*.*" lat = "60.0000" lon = "100.0000" isp = "Samara Telecom, JSC" isprating = "3.3" rating = "5" ispdlavg = "4449" ispulavg = "1394" /> <licensekey > 9c1687ea58e5e770-1df5b7cd427370f7-4b62a84526ea1f56 </licensekey > <customer > speedtest </customer > <servers > <server url = "http://speedtest.pronea.no/speedtest/upload.php" lat = "69.6828" lon = "18.9428" name = "Tromso" country = "Norway" countrycode = "NO" sponsor = "Pronea AS" sponsorurl = "http://www.pronea.no/" id = "1327" gid = "0" bigsamples = "1" /> <server url = "http://test.nax.no/speedtest/upload.php" lat = "65.8333" lon = "13.2000" name = "Helgeland" country = "Norway" countrycode = "NO" sponsor = "Noraxess Broadband" sponsorurl = "http://www.nax.no" id = "1362" gid = "0" url2 = "http://85.221.66.41/speedtest/upload.php" bigsamples = "1" />
4. <?xml version = "1.0" encoding = "UTF-8" ?> <settings > <client ip = "*.*.*.*" lat = "60.0000" lon = "100.0000" isp = "Samara Telecom, JSC" isprating = "3.3" rating = "5" ispdlavg = "4449" ispulavg = "1394" /> <licensekey > 9c1687ea58e5e770-1df5b7cd427370f7-4b62a84526ea1f56 </licensekey > <customer > speedtest </customer > <servers > <server url = "http://speedtest.pronea.no/speedtest/upload.php" lat = "69.6828" lon = "18.9428" name = "Tromso" country = "Norway" countrycode = "NO" sponsor = "Pronea AS" sponsorurl = "http://www.pronea.no/" id = "1327" gid = "0" bigsamples = "1" /> <server url = "http://test.nax.no/speedtest/upload.php" lat = "65.8333" lon = "13.2000" name = "Helgeland" country = "Norway" countrycode = "NO" sponsor = "Noraxess Broadband" sponsorurl = "http://www.nax.no" id = "1362" gid = "0" url2 = "http://85.221.66.41/speedtest/upload.php" bigsamples = "1" />
5. <?xml version = "1.0" encoding = "UTF-8" ?> <settings > <client ip = "*.*.*.*" lat = "60.0000" lon = "100.0000" isp = "Samara Telecom, JSC" isprating = "3.3" rating = "5" ispdlavg = "4449" ispulavg = "1394" /> <licensekey > 9c1687ea58e5e770-1df5b7cd427370f7-4b62a84526ea1f56 </licensekey > <customer > speedtest </customer > <servers > <server url = "http://speedtest.pronea.no/speedtest/upload.php" lat = "69.6828" lon = "18.9428" name = "Tromso" country = "Norway" countrycode = "NO" sponsor = "Pronea AS" sponsorurl = "http://www.pronea.no/" id = "1327" gid = "0" bigsamples = "1" /> <server url = "http://test.nax.no/speedtest/upload.php" lat = "65.8333" lon = "13.2000" name = "Helgeland" country = "Norway" countrycode = "NO" sponsor = "Noraxess Broadband" sponsorurl = "http://www.nax.no" id = "1362" gid = "0" url2 = "http://85.221.66.41/speedtest/upload.php" bigsamples = "1" />
6. <?xml version = "1.0" encoding = "UTF-8" ?> <settings > <client ip = "*.*.*.*" lat = "60.0000" lon = "100.0000" isp = "Samara Telecom, JSC" isprating = "3.3" rating = "5" ispdlavg = "4449" ispulavg = "1394" /> <licensekey > 9c1687ea58e5e770-1df5b7cd427370f7-4b62a84526ea1f56 </licensekey > <customer > speedtest </customer > <servers > <server url = "http://speedtest.pronea.no/speedtest/upload.php" lat = "69.6828" lon = "18.9428" name = "Tromso" country = "Norway" countrycode = "NO" sponsor = "Pronea AS" sponsorurl = "http://www.pronea.no/" id = "1327" gid = "0" bigsamples = "1" /> <server url = "http://test.nax.no/speedtest/upload.php" lat = "65.8333" lon = "13.2000" name = "Helgeland" country = "Norway" countrycode = "NO" sponsor = "Noraxess Broadband" sponsorurl = "http://www.nax.no" id = "1362" gid = "0" url2 = "http://85.221.66.41/speedtest/upload.php" bigsamples = "1" />
7. <?xml version = "1.0" encoding = "UTF-8" ?> <settings > <client ip = "*.*.*.*" lat = "60.0000" lon = "100.0000" isp = "Samara Telecom, JSC" isprating = "3.3" rating = "5" ispdlavg = "4449" ispulavg = "1394" /> <licensekey > 9c1687ea58e5e770-1df5b7cd427370f7-4b62a84526ea1f56 </licensekey > <customer > speedtest </customer > <servers > <server url = "http://speedtest.pronea.no/speedtest/upload.php" lat = "69.6828" lon = "18.9428" name = "Tromso" country = "Norway" countrycode = "NO" sponsor = "Pronea AS" sponsorurl = "http://www.pronea.no/" id = "1327" gid = "0" bigsamples = "1" /> <server url = "http://test.nax.no/speedtest/upload.php" lat = "65.8333" lon = "13.2000" name = "Helgeland" country = "Norway" countrycode = "NO" sponsor = "Noraxess Broadband" sponsorurl = "http://www.nax.no" id = "1362" gid = "0" url2 = "http://85.221.66.41/speedtest/upload.php" bigsamples = "1" />
8. <?xml version = "1.0" encoding = "UTF-8" ?> <settings > <client ip = "*.*.*.*" lat = "60.0000" lon = "100.0000" isp = "Samara Telecom, JSC" isprating = "3.3" rating = "5" ispdlavg = "4449" ispulavg = "1394" /> <licensekey > 9c1687ea58e5e770-1df5b7cd427370f7-4b62a84526ea1f56 </licensekey > <customer > speedtest </customer > <servers > <server url = "http://speedtest.pronea.no/speedtest/upload.php" lat = "69.6828" lon = "18.9428" name = "Tromso" country = "Norway" countrycode = "NO" sponsor = "Pronea AS" sponsorurl = "http://www.pronea.no/" id = "1327" gid = "0" bigsamples = "1" /> <server url = "http://test.nax.no/speedtest/upload.php" lat = "65.8333" lon = "13.2000" name = "Helgeland" country = "Norway" countrycode = "NO" sponsor = "Noraxess Broadband" sponsorurl = "http://www.nax.no" id = "1362" gid = "0" url2 = "http://85.221.66.41/speedtest/upload.php" bigsamples = "1" />

And all further xml is a list of servers on which the speedtest server component is installed. When I realized that the lat and lon parameters are nothing more than latitude and longitude, that is, latitude and longitude, and I’ll have to find my nearest server with my hands - I was thrown into a cold sweat. Schliemazla, I thought, and then the magic of big C ++ began.

The _sendPacket function is a simple construction of the http package, it does not carry any scientific interest in itself, therefore, with your permission, I will skip it. Let's go straight to _getConfig.

2. void _getConfig ( )
3. {
4. std :: stringstream netspeedConfigStream = _sendPacket ( _SpeedtestServer, _SpeedtestConfigUrl ) ;
6. // Create empty property tree object
7. using boost :: property_tree :: ptree ;
8. ptree PropertyTree ;
10. // Load XML file.
11. // No namespace qualification is needed, because of Koenig
12. // lookup on the second argument. If reading fails, exception
13. // is thrown.
14. read_xml ( netspeedConfigStream, PropertyTree ) ;
16. ptree Settings = PropertyTree. get_child ( "settings" ) ;
18. // Construct client location
19. _ServerLocation * _ClientLocation ;
21. // Declare list of Server Locations
22. std :: vector < _ServerLocation > * _ServerLocationList ;
24. _ClientLocation = new _ServerLocation ( Settings. Begin ( ) - > second, false ) ;
25. _ServerLocationList = new std :: vector < _ServerLocation > ;
27. // Construct list from XML
28. BOOST_FOREACH ( ptree :: value_type & v, PropertyTree. Get_child ( "settings.servers" ) )
29. _ServerLocationList - > push_back ( _ServerLocation ( v. Second , true ) ) ;
31. std :: sort ( _ServerLocationList - > begin ( ) , _ServerLocationList - > end ( ) , _ServerLocationSortFunctor ( _ClientLocation ) ) ;
33. // Url of the nearest server
34. std :: vector < std :: string > SplitUrl ;
36. boost :: split ( SplitUrl, _ServerLocationList - > begin ( ) - > GetUrl ( ) , boost :: is_any_of ( "/" ) ) ;
38. delete _ClientLocation ;
39. delete _ServerLocationList ;
41. _NearestServer = SplitUrl [ 2 ] ;
43. for ( int i = 3 ; i < SplitUrl. size ( ) - 1 ; ++ i ) // TODO: rewrite with iterators
44. {
45. _NearestServerUrl. append ( "/" ) ;
46. _NearestServerUrl. append ( SplitUrl [ i ] ) ;
47. }
49. return ;
50. }

As you can see from the code, the XML is being retrieved, parsed, and the _ServerLocation structures are populated. In order to prevent violence from bicycles, the search for the nearest server was issued under the call of the STL sort, for which I had to write a sorting functor.

2. struct _ServerLocationSortFunctor
3. {
4. public :
5. _ServerLocationSortFunctor ( _ServerLocation * ClientLocation ) : _ClientLocation ( ClientLocation ) { }
7. bool operator ( ) ( _ServerLocation & _First, _ServerLocation & _Second )
8. {
9. return _ServerDist ( _ClientLocation, & _First ) < _ServerDist ( _ClientLocation, & _Second ) ;
10. }
12. private :
13. _ServerLocation * _ClientLocation ;
15. inline double deg2rad ( double ServerAplpha )
16. {
17. return ServerAplpha * PI / 180 ;
18. }
20. inline double hypot3 ( double dx, double dy, double dz )
21. {
22. return sqrt ( dx * dx + dy * dy + dz * dz ) ;
23. }
25. double _ServerDist ( _ServerLocation * _First, _ServerLocation * _Second )
26. {
27. double phi1 = deg2rad ( _First - > GetLon ( ) ) ;
28. double psi1 = deg2rad ( _First - > GetLat ( ) ) ;
29. double phi2 = deg2rad ( _Second - > GetLon ( ) ) ;
30. double psi2 = deg2rad ( _Second - > GetLat ( ) ) ;
32. double cos_psi1 = cos ( psi1 ) ;
33. double x1 = EarthRadius * cos ( phi1 ) * cos_psi1 ;
34. double y1 = EarthRadius * sin ( phi1 ) * cos_psi1 ;
35. double z1 = EarthRadius * sin ( psi1 ) ;
37. double cos_psi2 = cos ( psi2 ) ;
38. double x2 = EarthRadius * cos ( phi2 ) * cos_psi2 ;
39. double y2 = EarthRadius * sin ( phi2 ) * cos_psi2 ;
40. double z2 = EarthRadius * sin ( psi2 ) ;
42. double d = hypot3 ( x2 - x1, y2 - y1, z2 - z1 ) ;
44. return EarthRadius * acos ( 1 - ( d * d ) / ( 2 * EarthRadius * EarthRadius ) ) ;
45. }
47. } ;

The school course is not geography, not geometry in action, well, and the nearest server is found.

Further it becomes not so interesting, because the speed measurement code itself is trivial.

2. void _testLatency ( )
3. {
4. std :: string Url ( _NearestServerUrl ) ;
5. Url. append ( _LatencyUrl ) ;
7. boost :: timer LatencyTimer ;
8. _sendPacket ( _NearestServer, Url ) ;
9. _LatencyTime = LatencyTimer. elapsed ( ) ;
11. std :: cout << "PING:" << _LatencyTime << std :: endl ;
13. return ;
14. }
16. void _testDownload ( )
17. {
18. std :: string Url ( _NearestServerUrl ) ;
19. Url. append ( _DownloadUrl ) ;
21. boost :: timer DownloadTimer ;
22. std :: stringstream DownloadPacket = _sendPacket ( _NearestServer, Url ) ;
23. double DownloadTime = DownloadTimer. elapsed ( ) ;
25. double DownloadSpeed = ( DownloadPacket. str ( ) . length ( ) / ( DownloadTime - _LatencyTime ) ) * 8/1024 ;
27. std :: cout << "DOWNLOAD:" << DownloadSpeed << std :: endl ;
29. return ;
30. }
32. void _testUpload ( )
33. {
34. std :: string Url ( _NearestServerUrl ) ;
35. Url. append ( _UploadUrl ) ;
37. std :: string UploadDataValue ( _UploadBytes, 'a' ) ;
38. std :: string UploadData ( "content0 =" ) ;
40. UploadData + = UploadDataValue ;
42. boost :: timer UploadTimer ;
43. _sendPacket ( _NearestServer, Url, true , UploadData ) ;
44. double UploadTime = UploadTimer. elapsed ( ) ;
46. double UploadSpeed = ( _UploadBytes / ( UploadTime - _LatencyTime ) ) * 8/1024 ;
48. std :: cout << "UPLOAD:" << UploadSpeed << std :: endl ;
50. }

Maybe someone thread and come in handy. The code was tested on Visual Studio 2010 (the rest of the project was sharpened under Windows).

I want to say thank you to the documentation on STL and Boost, as well as to the pieces of the source code that I found on the Internet for self-study.

The full code of this opus is available at http://paste.pocoo.org/show/215424/
______________________

The text was prepared in the Blog Editor from © SoftCoder.ru