1006 lines
26 KiB
Haxe
1006 lines
26 KiB
Haxe
|
import haxe.zip.Compress;
|
||
|
|
import haxe.zip.Uncompress;
|
||
|
|
import haxe.zip.FlushMode;
|
||
|
|
import sys.FileSystem;
|
||
|
|
import sys.db.Connection;
|
||
|
|
import sys.db.Sqlite;
|
||
|
|
import sys.db.Mysql;
|
||
|
|
import sys.FileSystem;
|
||
|
|
import haxe.io.Bytes;
|
||
|
|
import haxe.io.BytesData;
|
||
|
|
|
||
|
|
import cpp.Random;
|
||
|
|
import cpp.net.Poll;
|
||
|
|
import sys.io.File;
|
||
|
|
import sys.io.FileSeek;
|
||
|
|
import sys.net.Host;
|
||
|
|
import sys.net.Socket;
|
||
|
|
import sys.net.UdpSocket;
|
||
|
|
import sys.net.UdpSocket;
|
||
|
|
import sys.io.Process;
|
||
|
|
|
||
|
|
#if haxe4
|
||
|
|
import sys.thread.Deque;
|
||
|
|
import sys.thread.Thread;
|
||
|
|
#else
|
||
|
|
import cpp.vm.Deque;
|
||
|
|
import cpp.vm.Thread;
|
||
|
|
#end
|
||
|
|
|
||
|
|
using cpp.NativeArray;
|
||
|
|
using cpp.AtomicInt;
|
||
|
|
|
||
|
|
// These should be ignored in haxe 3.3...
|
||
|
|
import cpp.link.StaticStd;
|
||
|
|
import cpp.link.StaticRegexp;
|
||
|
|
import cpp.link.StaticZlib;
|
||
|
|
import cpp.link.StaticMysql;
|
||
|
|
import cpp.link.StaticSqlite;
|
||
|
|
|
||
|
|
|
||
|
|
@:buildXml('<include name="${HXCPP}/src/hx/libs/ssl/Build.xml"/>')
|
||
|
|
extern class SslTest
|
||
|
|
{
|
||
|
|
@:extern @:native("_hx_ssl_init")
|
||
|
|
extern public static function socket_init():Void;
|
||
|
|
}
|
||
|
|
|
||
|
|
class Test
|
||
|
|
{
|
||
|
|
static var errors = new Array<String>();
|
||
|
|
static var lastErrorCount = 0;
|
||
|
|
|
||
|
|
var x:Int;
|
||
|
|
|
||
|
|
public function new()
|
||
|
|
{
|
||
|
|
x = 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function log(t:String)
|
||
|
|
{
|
||
|
|
Sys.println(t);
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function v(t:String)
|
||
|
|
{
|
||
|
|
Sys.println(" " + t);
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function ok()
|
||
|
|
{
|
||
|
|
if (lastErrorCount==errors.length)
|
||
|
|
{
|
||
|
|
v("ok");
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
lastErrorCount=errors.length;
|
||
|
|
v("bad");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function error(e:String)
|
||
|
|
{
|
||
|
|
Sys.println("Test Failed:" + e);
|
||
|
|
errors.push(e);
|
||
|
|
return -1;
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function thisFile()
|
||
|
|
{
|
||
|
|
#if nme_install_tool
|
||
|
|
var bytes:haxe.io.Bytes = ApplicationMain.getAsset("Test.hx");
|
||
|
|
#else
|
||
|
|
var bytes = sys.io.File.getBytes("Test.hx");
|
||
|
|
#end
|
||
|
|
return bytes;
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testDb(cnx:Connection) : Int
|
||
|
|
{
|
||
|
|
v("connected :" + cnx);
|
||
|
|
if (cnx.dbName() == "SQLite") {
|
||
|
|
cnx.request("
|
||
|
|
CREATE TABLE IF NOT EXISTS UserPwd (
|
||
|
|
id INTEGER PRIMARY KEY AUTOINCREMENT,
|
||
|
|
name TEXT,
|
||
|
|
age INTEGER,
|
||
|
|
money DOUBLE,
|
||
|
|
password BLOB
|
||
|
|
)");
|
||
|
|
cnx.request("SELECT '豪鬼' test");
|
||
|
|
} else {
|
||
|
|
cnx.request("
|
||
|
|
CREATE TABLE IF NOT EXISTS UserPwd (
|
||
|
|
id INTEGER NOT NULL AUTO_INCREMENT,
|
||
|
|
name TEXT,
|
||
|
|
age INTEGER,
|
||
|
|
money DOUBLE,
|
||
|
|
password BLOB,
|
||
|
|
PRIMARY KEY(id)
|
||
|
|
)");
|
||
|
|
}
|
||
|
|
var dels = cnx.request("DELETE FROM UserPwd");
|
||
|
|
if (dels.nfields != 0)
|
||
|
|
return error("Bad DELETE'd result");
|
||
|
|
v("deleted " + dels.length + " existing rows");
|
||
|
|
|
||
|
|
cnx.request("INSERT INTO UserPwd (name,age,money,password) VALUES ('John',32,100.45,X'c0ffee')");
|
||
|
|
cnx.request("INSERT INTO UserPwd (name,age,money,password) VALUES ('Bob',14,4.50,X'deadbeef01020304')");
|
||
|
|
|
||
|
|
var rset = cnx.request("SELECT * FROM UserPwd");
|
||
|
|
|
||
|
|
var length = rset.length;
|
||
|
|
v("found "+length+" users");
|
||
|
|
if (length!=2)
|
||
|
|
return error("Bad user count");
|
||
|
|
for( row in rset )
|
||
|
|
{
|
||
|
|
var pass:Dynamic = row.password;
|
||
|
|
var password = Std.is(pass, haxe.io.BytesData) ? haxe.io.Bytes.ofData(pass) : pass;
|
||
|
|
var md5 = haxe.crypto.Md5.make(password).toHex().substr(0,8);
|
||
|
|
v(" user "+row.name+" is "+row.age+" years old, password:" + md5);
|
||
|
|
if (md5!="5f80e231" && md5!="8ed0b363")
|
||
|
|
return error("Bad binary blob store");
|
||
|
|
}
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static function testDate()
|
||
|
|
{
|
||
|
|
log("Test date");
|
||
|
|
var now = Date.now();
|
||
|
|
v(Std.string(now));
|
||
|
|
var then = Date.fromString("1977-06-11");
|
||
|
|
v(Std.string(then));
|
||
|
|
if (now.getTime()<=then.getTime())
|
||
|
|
return error("Date fromString - time travel");
|
||
|
|
|
||
|
|
var later = DateTools.makeUtc(1996,5,4,17,55,11);
|
||
|
|
v(Std.string(later));
|
||
|
|
|
||
|
|
var diff:Float = untyped __global__.__hxcpp_timezone_offset(now.mSeconds);
|
||
|
|
v("timezone offet:" + diff);
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testCompress()
|
||
|
|
{
|
||
|
|
log("Test compress");
|
||
|
|
var bytes = thisFile();
|
||
|
|
|
||
|
|
var compress = new Compress(9);
|
||
|
|
compress.setFlushMode(FlushMode.FINISH);
|
||
|
|
var buffer = haxe.io.Bytes.alloc(bytes.length * 2 + 100);
|
||
|
|
var r = compress.execute(bytes,0,buffer,0);
|
||
|
|
compress.close();
|
||
|
|
var compressed = buffer.sub(0,r.write);
|
||
|
|
v("compressed size " + compressed.length );
|
||
|
|
|
||
|
|
v("try closing too many times...");
|
||
|
|
var caughtError = false;
|
||
|
|
try
|
||
|
|
{
|
||
|
|
compress.close();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
v("correctly caught " + e );
|
||
|
|
caughtError = true;
|
||
|
|
}
|
||
|
|
if (!caughtError)
|
||
|
|
error("Zlib closed without throwing error");
|
||
|
|
|
||
|
|
var decompressed = Uncompress.run(compressed);
|
||
|
|
v("decompressed size:" + decompressed.length + "/" + bytes.length);
|
||
|
|
if (decompressed.compare(bytes)!=0)
|
||
|
|
return error("Compress/Uncompress mismatch");
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public static function testRegexp()
|
||
|
|
{
|
||
|
|
log("Test Regexp/BytesInput");
|
||
|
|
|
||
|
|
// This utf8 comment is parsed by the code ...
|
||
|
|
// su©©ess
|
||
|
|
var success = false;
|
||
|
|
var utf8Match = ~/su©+ess/u;
|
||
|
|
|
||
|
|
// This comment is parsed by the code ...
|
||
|
|
//XML<xml value="Hello World!"/>
|
||
|
|
var match = ~/^..XML/;
|
||
|
|
var input = new haxe.io.BytesInput(thisFile());
|
||
|
|
try {
|
||
|
|
while(true)
|
||
|
|
{
|
||
|
|
var line = input.readLine();
|
||
|
|
if (match.match(line))
|
||
|
|
{
|
||
|
|
var xml = Xml.parse(line.substr(5));
|
||
|
|
v("found xml:" + xml.firstElement().get("value"));
|
||
|
|
if (xml.firstElement().get("value")!="Hello World!")
|
||
|
|
return error("Bad universal greeting");
|
||
|
|
}
|
||
|
|
if (utf8Match.match(line))
|
||
|
|
{
|
||
|
|
v("found utf8:" + utf8Match.matched(0));
|
||
|
|
success = true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
} catch (e:Dynamic) { }
|
||
|
|
if (!success)
|
||
|
|
return error("Could not find success in utf8 code");
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testRegexpMixedUnicode() {
|
||
|
|
var success = true;
|
||
|
|
|
||
|
|
// when matching a utf8 subject string against a utf16 pattern and vice versa
|
||
|
|
for (pattern => subject in ["[A-Za-zÀ-ÖØ-öø-ÿ0-9]+" => "a", "[A-Z]+" => "ÀÖA"]) {
|
||
|
|
if (new EReg(pattern, "").match(subject)) {
|
||
|
|
v('"$subject" matches against ~/$pattern/');
|
||
|
|
} else {
|
||
|
|
return error('"$subject" does not match against ~/$pattern/');
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testSqlite()
|
||
|
|
{
|
||
|
|
log("Test sqlite");
|
||
|
|
var dbFile = "hxcpp.db";
|
||
|
|
var cnx = Sqlite.open(dbFile);
|
||
|
|
if (testDb(cnx)!=0)
|
||
|
|
return error("db error");
|
||
|
|
cnx.close();
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public static function testMysql()
|
||
|
|
{
|
||
|
|
log("Test mysql");
|
||
|
|
var cnx:sys.db.Connection = null;
|
||
|
|
|
||
|
|
try
|
||
|
|
{
|
||
|
|
cnx = Mysql.connect({
|
||
|
|
host : "localhost",
|
||
|
|
port : 3306,
|
||
|
|
user : "hxcpp",
|
||
|
|
pass : "hxcpp",
|
||
|
|
socket : null,
|
||
|
|
database : "hxcpp"
|
||
|
|
});
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
v("mysql got error - ok because no server" );
|
||
|
|
}
|
||
|
|
|
||
|
|
if (cnx!=null)
|
||
|
|
{
|
||
|
|
if (testDb(cnx)!=0)
|
||
|
|
error("TestDB failed");
|
||
|
|
cnx.close();
|
||
|
|
}
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testRandom()
|
||
|
|
{
|
||
|
|
log("Test Random");
|
||
|
|
var rand = new Random();
|
||
|
|
var f0 = rand.float();
|
||
|
|
var f1 = rand.float();
|
||
|
|
v('samples $f0,$f1');
|
||
|
|
if (f0==f1)
|
||
|
|
return error("Not random enough");
|
||
|
|
rand.setSeed(1);
|
||
|
|
var i0 = rand.int(256);
|
||
|
|
rand.setSeed(2);
|
||
|
|
var i1 = rand.int(256);
|
||
|
|
v('int samples $i0,$i1');
|
||
|
|
if (i0!=91 || i1!=217)
|
||
|
|
return error("Non-repeatable random seed, should be 91,217");
|
||
|
|
var tries = 0;
|
||
|
|
while(rand.int(1000)!=999)
|
||
|
|
tries++;
|
||
|
|
v('tries to 1000 = $tries');
|
||
|
|
if (tries!=749)
|
||
|
|
return error("Non-repeatable random iterations");
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function tryFunc( func ) : Bool
|
||
|
|
{
|
||
|
|
try
|
||
|
|
{
|
||
|
|
func();
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
catch(e:Dynamic) { }
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testFile()
|
||
|
|
{
|
||
|
|
log("Test File");
|
||
|
|
try
|
||
|
|
{
|
||
|
|
var filename = "testfile.txt";
|
||
|
|
tryFunc( function() FileSystem.deleteFile(filename) );
|
||
|
|
tryFunc( function() FileSystem.deleteFile(filename+"-copy") );
|
||
|
|
tryFunc( function() FileSystem.deleteFile(filename+".bin") );
|
||
|
|
tryFunc( function() FileSystem.deleteFile(filename+".out") );
|
||
|
|
|
||
|
|
var contents = "line1\nline2\n";
|
||
|
|
|
||
|
|
v("compare...");
|
||
|
|
File.saveContent(filename,contents);
|
||
|
|
if ( File.getContent(filename)!=contents )
|
||
|
|
return error("getContent mismatch");
|
||
|
|
|
||
|
|
v("copy...");
|
||
|
|
File.copy(filename,filename+"-copy");
|
||
|
|
var bytes = File.getBytes(filename+"-copy");
|
||
|
|
if ( bytes.compare( Bytes.ofString(contents) ) !=0 )
|
||
|
|
return error("copy getBytes mismatch");
|
||
|
|
|
||
|
|
File.saveBytes(filename+".bin",bytes);
|
||
|
|
|
||
|
|
v("file in...");
|
||
|
|
var fileIn = File.read(filename+".bin");
|
||
|
|
if (fileIn.readByte()!=contents.charCodeAt(0))
|
||
|
|
return error("File readByte mismatch");
|
||
|
|
var buffer = Bytes.alloc(5);
|
||
|
|
buffer.set(0,'-'.code);
|
||
|
|
buffer.set(4,'+'.code);
|
||
|
|
if (fileIn.readBytes(buffer,1,3)!=3)
|
||
|
|
return error("Could not read 3 bytes");
|
||
|
|
v( "read 3: " + buffer.toString() );
|
||
|
|
if ( buffer.toString() != "-ine+" )
|
||
|
|
return error("Bad sub-buffer readBytes");
|
||
|
|
v("seek...");
|
||
|
|
if (fileIn.tell()!=4)
|
||
|
|
return error("tell!=4");
|
||
|
|
fileIn.seek(4, SeekCur );
|
||
|
|
if (fileIn.tell()!=8)
|
||
|
|
return error("SeekCur tell!=8");
|
||
|
|
fileIn.seek(7, SeekBegin );
|
||
|
|
if (fileIn.tell()!=7)
|
||
|
|
return error("SeekSet tell!=7");
|
||
|
|
var rest = Bytes.alloc( contents.length - fileIn.tell() );
|
||
|
|
fileIn.readBytes(rest,0,rest.length);
|
||
|
|
if (fileIn.eof())
|
||
|
|
return error("File at end, but not eof");
|
||
|
|
fileIn.seek( -contents.length, SeekEnd );
|
||
|
|
if (fileIn.tell()!=0)
|
||
|
|
return error("File seek from end to beginning failed");
|
||
|
|
fileIn.close();
|
||
|
|
|
||
|
|
v("write...");
|
||
|
|
var fileOut = File.write(filename+".out");
|
||
|
|
fileOut.writeByte('W'.code);
|
||
|
|
if (fileOut.writeBytes(buffer,1,3)!=3)
|
||
|
|
return error("Could not write 3 bytes");
|
||
|
|
if (fileOut.tell()!=4)
|
||
|
|
return error("Bad tell on file write");
|
||
|
|
fileOut.flush();
|
||
|
|
if (File.getContent(filename+".out")!="Wine")
|
||
|
|
return error("Bad reading after flush");
|
||
|
|
fileOut.seek(1,SeekBegin);
|
||
|
|
fileOut.writeByte('a'.code);
|
||
|
|
fileOut.close();
|
||
|
|
var contents = File.getContent(filename+".out");
|
||
|
|
v("have :" + contents);
|
||
|
|
if (contents!="Wane")
|
||
|
|
return error("Bad readback after seek");
|
||
|
|
|
||
|
|
v("cleanup...");
|
||
|
|
FileSystem.deleteFile(filename);
|
||
|
|
FileSystem.deleteFile(filename + "-copy");
|
||
|
|
FileSystem.deleteFile(filename + ".bin");
|
||
|
|
FileSystem.deleteFile(filename + ".out");
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in testFile: " + e);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testHost()
|
||
|
|
{
|
||
|
|
log("Test Host");
|
||
|
|
try
|
||
|
|
{
|
||
|
|
var localhost = Host.localhost();
|
||
|
|
v('localhost :$localhost');
|
||
|
|
var host = new Host(localhost);
|
||
|
|
v('host :$host');
|
||
|
|
// var reverse = host.reverse();
|
||
|
|
// v('reverse :$reverse');
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in testHost: " + e);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public static function testFileSystem()
|
||
|
|
{
|
||
|
|
try
|
||
|
|
{
|
||
|
|
|
||
|
|
log("Test FileSystem");
|
||
|
|
tryFunc( function() FileSystem.deleteFile("dir/file.txt") );
|
||
|
|
tryFunc( function() FileSystem.deleteFile("dir/txt.file") );
|
||
|
|
tryFunc( function() FileSystem.deleteFile("dir/child") );
|
||
|
|
tryFunc( function() FileSystem.deleteDirectory("dir") );
|
||
|
|
|
||
|
|
v("create dir");
|
||
|
|
if (!tryFunc( function() FileSystem.createDirectory("dir") ) )
|
||
|
|
return error("Could not create 'dir'");
|
||
|
|
if (!tryFunc( function() FileSystem.createDirectory("dir/child") ) )
|
||
|
|
return error("Could not create 'dir/child'");
|
||
|
|
File.saveContent("dir/file.txt","hello");
|
||
|
|
var stat = FileSystem.stat("dir/file.txt");
|
||
|
|
v(Std.string(stat));
|
||
|
|
if (stat.size!=5)
|
||
|
|
return error("File does not contain 5 bytes");
|
||
|
|
if ( Std.string(stat.ctime).length != 19)
|
||
|
|
return error("File ctime does not appear to be a date");
|
||
|
|
|
||
|
|
v("exists");
|
||
|
|
if (!FileSystem.exists("dir"))
|
||
|
|
return error("'dir' should exist");
|
||
|
|
if (!FileSystem.exists("dir/file.txt"))
|
||
|
|
return error("'/file.txt' should exist");
|
||
|
|
var files = FileSystem.readDirectory("dir");
|
||
|
|
v("dir contents:" + files);
|
||
|
|
if (files.length!=2 || files.indexOf("file.txt")<0 || files.indexOf("child")<0)
|
||
|
|
return error("Unexpected dir contents " + (files.indexOf("file.txt") + "," + files.indexOf("child")) );
|
||
|
|
if (tryFunc( function() FileSystem.deleteDirectory("dir/junk") ) )
|
||
|
|
return error("No error deleting junk directory");
|
||
|
|
if (tryFunc( function() FileSystem.deleteFile("dir/junk") ) )
|
||
|
|
return error("No error deleting junk file");
|
||
|
|
if (tryFunc( function() FileSystem.deleteFile("dir/child") ) )
|
||
|
|
return error("No error deleting directory as file");
|
||
|
|
if (tryFunc( function() FileSystem.deleteDirectory("dir/file.txt") ) )
|
||
|
|
return error("No error deleting file as directory");
|
||
|
|
var fullPath = FileSystem.fullPath("dir/child");
|
||
|
|
v('fullPath: $fullPath');
|
||
|
|
var fullPath = FileSystem.fullPath("dir/file.txt");
|
||
|
|
v('fullPath: $fullPath');
|
||
|
|
v("isDirectory...");
|
||
|
|
if (FileSystem.isDirectory("dir/file.txt"))
|
||
|
|
return error("file appears to be a directory");
|
||
|
|
if (!FileSystem.isDirectory("dir/child"))
|
||
|
|
return error("directory appears to not be a directory");
|
||
|
|
if (FileSystem.isDirectory("dir/junk"))
|
||
|
|
return error("junk appears to be a directory");
|
||
|
|
if (FileSystem.isDirectory("dir/file.txt"))
|
||
|
|
return error("file appears to be a directory");
|
||
|
|
|
||
|
|
v("rename...");
|
||
|
|
if (tryFunc( function() FileSystem.rename("dir/a", "dir/b")) )
|
||
|
|
return error("No error renaming missing file");
|
||
|
|
FileSystem.rename("dir/file.txt","dir/txt.file");
|
||
|
|
if (!FileSystem.exists("dir/txt.file") || FileSystem.exists("dir/file.txt"))
|
||
|
|
return error("Rename seemed to go wrong " + FileSystem.readDirectory("dir"));
|
||
|
|
v("cleanup..");
|
||
|
|
FileSystem.deleteFile("dir/txt.file");
|
||
|
|
FileSystem.deleteDirectory("dir/child");
|
||
|
|
FileSystem.deleteDirectory("dir");
|
||
|
|
if (FileSystem.readDirectory(".").indexOf("dir")>=0)
|
||
|
|
return error("Directory removed, but sill there?:" + FileSystem.readDirectory("."));
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in testFileSystem: " + e);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public static function testSys()
|
||
|
|
{
|
||
|
|
log("Test Sys");
|
||
|
|
try
|
||
|
|
{
|
||
|
|
Sys.putEnv("mykey","123");
|
||
|
|
var env = Sys.getEnv("mykey");
|
||
|
|
v("got env:" + env);
|
||
|
|
if (env!="123")
|
||
|
|
return error("Bad environment get");
|
||
|
|
v("little sleep...");
|
||
|
|
var t0 = Sys.time();
|
||
|
|
Sys.sleep(0.1);
|
||
|
|
var t1 = Sys.time();
|
||
|
|
v("Slept for: " + (t1-t0));
|
||
|
|
if (t1<=t0 || (t1-t0)>10)
|
||
|
|
return error("Too sleepy");
|
||
|
|
v("CpuTime: " + Sys.cpuTime());
|
||
|
|
v("Cwd: " + Sys.getCwd());
|
||
|
|
v("Program Path: " + Sys.programPath());
|
||
|
|
var env = Sys.environment();
|
||
|
|
v("Environment mykey: " + env.get("mykey") );
|
||
|
|
if (env.get("mykey")!="123")
|
||
|
|
return error("Could not find mykey in environment");
|
||
|
|
v("Ignore getChar auto test");
|
||
|
|
v("Args: " + Sys.args());
|
||
|
|
v("SystemName: " + Sys.systemName());
|
||
|
|
v("Skipping Sys.setTimeLocale" + Sys.setTimeLocale);
|
||
|
|
// Sys.command
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in testSys: " + e);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testCommand()
|
||
|
|
{
|
||
|
|
log("Test Command");
|
||
|
|
try
|
||
|
|
{
|
||
|
|
var code = Sys.command( Sys.programPath(), ["exit", "13"]);
|
||
|
|
if (code!=13)
|
||
|
|
return error('Process exited with code $code, not 13');
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in testCommand: " + e);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function runAsProcess()
|
||
|
|
{
|
||
|
|
var args = Sys.args();
|
||
|
|
var job = args.shift();
|
||
|
|
if (job=="exit")
|
||
|
|
{
|
||
|
|
Sys.exit( Std.parseInt(args[0]) );
|
||
|
|
}
|
||
|
|
else if (job=="socket")
|
||
|
|
{
|
||
|
|
socketClient();
|
||
|
|
Sys.exit(0);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
Sys.println('Unknown job : "$job"');
|
||
|
|
Sys.exit(-99);
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testPoll()
|
||
|
|
{
|
||
|
|
log("Test poll");
|
||
|
|
try
|
||
|
|
{
|
||
|
|
|
||
|
|
var poll = new Poll(4);
|
||
|
|
poll.prepare([],[]);
|
||
|
|
var t0 = Sys.time();
|
||
|
|
v("poll...");
|
||
|
|
poll.poll([],0.1);
|
||
|
|
var t = Sys.time()-t0;
|
||
|
|
v('took ${t}s');
|
||
|
|
/*
|
||
|
|
if (t<0.1)
|
||
|
|
return error("Timeout too soon");
|
||
|
|
if (t>10)
|
||
|
|
return error("Timeout too slow");
|
||
|
|
*/
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in testPoll: " + e);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
public static function testUdpSocket()
|
||
|
|
{
|
||
|
|
log("Test UdpSocket");
|
||
|
|
try
|
||
|
|
{
|
||
|
|
|
||
|
|
var udp = new UdpSocket();
|
||
|
|
udp.close();
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in testUdpSocket: " + e);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
static var socketClientRunning = true;
|
||
|
|
public static function readOutput(proc:Process)
|
||
|
|
{
|
||
|
|
Thread.create( function() {
|
||
|
|
while(true)
|
||
|
|
{
|
||
|
|
try
|
||
|
|
{
|
||
|
|
var line = proc.stdout.readLine();
|
||
|
|
v("---> " + line);
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
var code = proc.exitCode();
|
||
|
|
v("process exit code :" + code);
|
||
|
|
socketClientRunning = false;
|
||
|
|
});
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testSocket()
|
||
|
|
{
|
||
|
|
log("Test Socket");
|
||
|
|
try
|
||
|
|
{
|
||
|
|
v("Spawn client..");
|
||
|
|
var proc = new Process( Sys.programPath(), ["socket"] );
|
||
|
|
readOutput(proc);
|
||
|
|
v("connect localhost..");
|
||
|
|
var host = new Host("localhost");
|
||
|
|
var socket = new Socket();
|
||
|
|
socket.bind(host,0xcccc);
|
||
|
|
v("listen...");
|
||
|
|
socket.listen(1);
|
||
|
|
v("accept...");
|
||
|
|
var connected = socket.accept();
|
||
|
|
v("connected!");
|
||
|
|
|
||
|
|
var input = connected.input;
|
||
|
|
var output = connected.output;
|
||
|
|
|
||
|
|
v("send...");
|
||
|
|
connected.setFastSend(true);
|
||
|
|
connected.write("ping");
|
||
|
|
var buffer = Bytes.alloc(8);
|
||
|
|
if (input.readBytes(buffer,0,8)!=8)
|
||
|
|
return error("Could not read from socket");
|
||
|
|
var got = buffer.toString();
|
||
|
|
v('got $got');
|
||
|
|
if (got!="pingpong")
|
||
|
|
return error("Bad socket read");
|
||
|
|
|
||
|
|
v("close connection..");
|
||
|
|
connected.close();
|
||
|
|
v("close original..");
|
||
|
|
socket.close();
|
||
|
|
|
||
|
|
for(wait in 0...10)
|
||
|
|
{
|
||
|
|
if (!socketClientRunning)
|
||
|
|
break;
|
||
|
|
v("wait for client...");
|
||
|
|
Sys.sleep(0.1);
|
||
|
|
}
|
||
|
|
if (socketClientRunning)
|
||
|
|
return error("Socket client did not finish");
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
return error("Unexpected error in Socket: " + e);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function socketClient()
|
||
|
|
{
|
||
|
|
log("Client proc...");
|
||
|
|
var host = new Host("localhost");
|
||
|
|
var socket:Socket = null;
|
||
|
|
for(attempt in 0...10)
|
||
|
|
{
|
||
|
|
try
|
||
|
|
{
|
||
|
|
log("Client connect...");
|
||
|
|
socket = new Socket();
|
||
|
|
socket.connect(host,0xcccc);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
catch(e:Dynamic)
|
||
|
|
{
|
||
|
|
socket.close();
|
||
|
|
socket = null;
|
||
|
|
log("Client failed :" + e);
|
||
|
|
}
|
||
|
|
log("sleep...");
|
||
|
|
Sys.sleep(0.25);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (socket==null)
|
||
|
|
Sys.exit(-1);
|
||
|
|
v("connected client");
|
||
|
|
|
||
|
|
var input = socket.input;
|
||
|
|
var output = socket.output;
|
||
|
|
|
||
|
|
var buffer = Bytes.alloc(4);
|
||
|
|
input.readBytes(buffer,0,4);
|
||
|
|
v("client got " + buffer);
|
||
|
|
output.writeBytes( Bytes.ofString( buffer.toString() + "pong" ), 0, 8);
|
||
|
|
output.flush();
|
||
|
|
|
||
|
|
v("bye");
|
||
|
|
socket.shutdown(true,true);
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testSsl() : Int
|
||
|
|
{
|
||
|
|
log("Test ssl");
|
||
|
|
SslTest.socket_init();
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testSerialization() : Int
|
||
|
|
{
|
||
|
|
log("Test serialization");
|
||
|
|
var orig:haxe.Int64 = haxe.Int64.make(0xdeadbeef,0xbeefdead);
|
||
|
|
var recon:haxe.Int64 = haxe.Unserializer.run(haxe.Serializer.run(orig));
|
||
|
|
if (orig!=recon)
|
||
|
|
error('Bad Int64 serialization $orig != $recon');
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
// Hide from optimizer
|
||
|
|
static function getOne() return 1;
|
||
|
|
|
||
|
|
public static function testThread()
|
||
|
|
{
|
||
|
|
log("Test thread");
|
||
|
|
v("atomics..");
|
||
|
|
|
||
|
|
var a:AtomicInt = getOne();
|
||
|
|
var aPtr = cpp.Pointer.addressOf(a);
|
||
|
|
if (aPtr.exchangeIf(2,3))
|
||
|
|
error("Bad exchageIf " + a);
|
||
|
|
if (!aPtr.exchangeIf(1,3))
|
||
|
|
error("No exchageIf " + a);
|
||
|
|
if (a!=3)
|
||
|
|
error("Bad exchageIf value ");
|
||
|
|
if (aPtr.atomicInc()!=3)
|
||
|
|
error("Bad atomicInc return");
|
||
|
|
if (a!=4)
|
||
|
|
error("Bad atomicInc value " + a);
|
||
|
|
if (aPtr.atomicDec()!=4)
|
||
|
|
error("Bad atomicDec return");
|
||
|
|
if (a!=3)
|
||
|
|
error("Bad atomicDec value " + a);
|
||
|
|
|
||
|
|
|
||
|
|
a = getOne();
|
||
|
|
v('deque a=$a');
|
||
|
|
|
||
|
|
var q = new Deque<Int>();
|
||
|
|
q.add(1);
|
||
|
|
q.add(2);
|
||
|
|
q.add(3);
|
||
|
|
var mainThread = Thread.current();
|
||
|
|
// +100000
|
||
|
|
Thread.create(function() {
|
||
|
|
q.pop(true);
|
||
|
|
for(i in 0...100000)
|
||
|
|
aPtr.atomicInc();
|
||
|
|
mainThread.sendMessage(null);
|
||
|
|
});
|
||
|
|
// +100000
|
||
|
|
Thread.create(function() {
|
||
|
|
q.pop(true);
|
||
|
|
for(i in 0...100000)
|
||
|
|
aPtr.atomicInc();
|
||
|
|
mainThread.sendMessage(null);
|
||
|
|
} );
|
||
|
|
// -200000
|
||
|
|
Thread.create(function() {
|
||
|
|
q.pop(true);
|
||
|
|
for(i in 0...200000)
|
||
|
|
aPtr.atomicDec();
|
||
|
|
mainThread.sendMessage(null);
|
||
|
|
} );
|
||
|
|
|
||
|
|
v("wait for reply..");
|
||
|
|
for(i in 0...3)
|
||
|
|
{
|
||
|
|
Thread.readMessage(true);
|
||
|
|
v('got $i');
|
||
|
|
}
|
||
|
|
|
||
|
|
if (a!=1)
|
||
|
|
error('Bad deque count : $a');
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testFloatReads()
|
||
|
|
{
|
||
|
|
log("Test float bytes");
|
||
|
|
|
||
|
|
var bytes =haxe.io.Bytes.alloc(1+4+8);
|
||
|
|
bytes.fill(0,1,46);
|
||
|
|
|
||
|
|
// Test unaligned read/write
|
||
|
|
bytes.setFloat(1,1.25);
|
||
|
|
bytes.setDouble(5,1.25);
|
||
|
|
|
||
|
|
if (bytes.get(0)!=46)
|
||
|
|
error("Bad byte 0");
|
||
|
|
|
||
|
|
if (bytes.getDouble(5)!=bytes.getFloat(1))
|
||
|
|
error("Bad byte read/write");
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public dynamic function getX() return x;
|
||
|
|
|
||
|
|
public static function testDynamicMember()
|
||
|
|
{
|
||
|
|
log("Test dynamic member");
|
||
|
|
var t = new Test();
|
||
|
|
if (t.getX()!=1)
|
||
|
|
error("Bad dynamic member function");
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
@:noDebug
|
||
|
|
public static function testNoDebug()
|
||
|
|
{
|
||
|
|
log("Test noDebug");
|
||
|
|
// Just testing to see it it compiles...
|
||
|
|
if ( null == new haxe.io.BytesBuffer() )
|
||
|
|
error("Bad alloc");
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
@:noDebug
|
||
|
|
public static function testNoDebugNoAlloc()
|
||
|
|
{
|
||
|
|
log("Test noDebug, no alloc");
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function testIntParsing()
|
||
|
|
{
|
||
|
|
log("Test int parsing");
|
||
|
|
var val = Std.parseInt('0x1');
|
||
|
|
if (val != 1)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 1, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' 0x1');
|
||
|
|
if (val != 1)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 1, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt('\t0x1');
|
||
|
|
if (val != 1)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 1, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' 0x');
|
||
|
|
if (val != 0)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 0, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' 0xyz');
|
||
|
|
if (val != 0)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 0, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt('-0x1');
|
||
|
|
if (val != -1)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 1, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' -0x1');
|
||
|
|
if (val != -1)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 1, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt('\t-0x1');
|
||
|
|
if (val != -1)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 1, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' -0x');
|
||
|
|
if (val != 0)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 0, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' -0xyz');
|
||
|
|
if (val != 0)
|
||
|
|
{
|
||
|
|
error('parsed hex value was not 0, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' 5');
|
||
|
|
if (val != 5)
|
||
|
|
{
|
||
|
|
error('parsed int value was not 5, $val');
|
||
|
|
}
|
||
|
|
var val = Std.parseInt(' \t\n5');
|
||
|
|
if (val != 5)
|
||
|
|
{
|
||
|
|
error('parsed int value was not 5, $val');
|
||
|
|
}
|
||
|
|
|
||
|
|
return ok();
|
||
|
|
}
|
||
|
|
|
||
|
|
public static function main()
|
||
|
|
{
|
||
|
|
var exitCode = 0;
|
||
|
|
if (Sys.args().length>0)
|
||
|
|
{
|
||
|
|
runAsProcess();
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
exitCode |= testDate();
|
||
|
|
exitCode |= testCompress();
|
||
|
|
exitCode |= testRegexp();
|
||
|
|
exitCode |= testRegexpMixedUnicode();
|
||
|
|
exitCode |= testSqlite();
|
||
|
|
exitCode |= testMysql();
|
||
|
|
exitCode |= testRandom();
|
||
|
|
exitCode |= testFile();
|
||
|
|
exitCode |= testFileSystem();
|
||
|
|
exitCode |= testHost();
|
||
|
|
exitCode |= testSys();
|
||
|
|
exitCode |= testCommand();
|
||
|
|
exitCode |= testPoll();
|
||
|
|
exitCode |= testUdpSocket();
|
||
|
|
exitCode |= testSocket();
|
||
|
|
exitCode |= testThread();
|
||
|
|
exitCode |= testSsl();
|
||
|
|
exitCode |= testSerialization();
|
||
|
|
exitCode |= testFloatReads();
|
||
|
|
exitCode |= testDynamicMember();
|
||
|
|
exitCode |= testNoDebug();
|
||
|
|
exitCode |= testNoDebugNoAlloc();
|
||
|
|
exitCode |= testIntParsing();
|
||
|
|
|
||
|
|
if (exitCode!=0)
|
||
|
|
Sys.println("############# Errors running tests:\n " + errors.join("\n ") );
|
||
|
|
else
|
||
|
|
Sys.println("All tests passed.");
|
||
|
|
Sys.exit(exitCode);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|