[Gnash-commit] gnash ChangeLog testsuite/actionscript.all/Loca...

[Rob Savoye]

CVSROOT:        /sources/gnash
Module name:    gnash
Changes by:     Rob Savoye <rsavoye>    08/01/05 03:55:01

Modified files:
        .              : ChangeLog 
        testsuite/actionscript.all: LocalConnection.as Makefile.am 
                                    NetConnection.as SharedObject.as 

Log message:
                * testsuite/actionscript.all/SharedObject.as: Use a multi level
                path.
                * testsuite/actionscript.all/NetConnection.as: Use check.a
                sinstead of dejagnu.as.
                * testsuite/actionscript.all/Makefile.am: Add libamf to the
                include paths.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.5304&r2=1.5305
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/LocalConnection.as?cvsroot=gnash&r1=1.17&r2=1.18
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/Makefile.am?cvsroot=gnash&r1=1.83&r2=1.84
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/NetConnection.as?cvsroot=gnash&r1=1.13&r2=1.14
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/SharedObject.as?cvsroot=gnash&r1=1.16&r2=1.17

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.5304
retrieving revision 1.5305
diff -u -b -r1.5304 -r1.5305
--- ChangeLog   5 Jan 2008 03:24:09 -0000       1.5304
+++ ChangeLog   5 Jan 2008 03:55:00 -0000       1.5305
@@ -1,5 +1,12 @@
 2008-01-04  Rob Savoye  <address@hidden>
 
+       * testsuite/actionscript.all/SharedObject.as: Use a multi level
+       path.
+       * testsuite/actionscript.all/NetConnection.as: Use check.a
+       sinstead of dejagnu.as.
+       * testsuite/actionscript.all/Makefile.am: Add libamf to the
+       include paths.
+
        * server/asobj/SharedObject.cpp: Use Element::init() instead of
        constructing, as it appears to have problems with some gcc
        versions. This fixes the SharedObject.as test case.

Index: testsuite/actionscript.all/LocalConnection.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/LocalConnection.as,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -b -r1.17 -r1.18
--- testsuite/actionscript.all/LocalConnection.as       29 Sep 2007 16:22:57 
-0000      1.17
+++ testsuite/actionscript.all/LocalConnection.as       5 Jan 2008 03:55:00 
-0000       1.18
@@ -20,9 +20,9 @@
 // compile this test case with Ming makeswf, and then
 // execute it like this gnash -1 -r 0 -v out.swf
 
-rcsid="$Id: LocalConnection.as,v 1.17 2007/09/29 16:22:57 strk Exp $";
+rcsid="$Id: LocalConnection.as,v 1.18 2008/01/05 03:55:00 rsavoye Exp $";
 
-#include "dejagnu.as"
+#include "check.as"
 
 #if OUTPUT_VERSION < 6
 
@@ -33,46 +33,26 @@
 var tmp = new LocalConnection;
 
 // test the LocalConnection constuctor
-if (tmp) {
-       pass("LocalConnection::LocalConnection() constructor");
-} else {
-       fail("LocalConnection::LocalConnection()");             
-}
+check_equals (typeof(tmp), 'object');
 
 // test the LocalConnection::close method
-if (tmp.close) {
-       pass("LocalConnection::close() exists");
-} else {
-       fail("LocalConnection::close() doesn't exist");
-}
+check_equals (typeof(tmp.close), 'function');
+
 // test the LocalConnection::connect method
-if (tmp.connect) {
-       pass("LocalConnection::connect() exists");
-} else {
-       fail("LocalConnection::connect() doesn't exist");
-}
+// FIXME: this should not be failing as later we find the function
+// actually works!
+xcheck_equals (typeof(tmp.connnect), 'function');
+
 // test the LocalConnection::domain method
-if (tmp.domain) {
-       pass("LocalConnection::domain() exists");
-} else {
-       fail("LocalConnection::domain() doesn't exist");
-}
+check_equals (typeof(tmp.domain), 'function');
+
 // test the LocalConnection::send method
-if (tmp.send) {
-       pass("LocalConnection::send() exists");
-} else {
-       fail("LocalConnection::send() doesn't exist");
-}
+check_equals (typeof(tmp.send), 'function');
 
 // Get the domain. By default this should be "localhost" because we
 // haven't made any connections yet,
 var domain = tmp.domain();
-if (domain  == "localhost") {
-       pass("LocalConnection::domain() returned localhost");
-} else {
-       fail("LocalConnection::domain() returned localhost");
-}
-
+check_equals (domain, "localhost");
 
 // If the listen() times out waiting for a connection, it'll set the
 // main socket file descriptor to an error condition, although the
@@ -83,37 +63,12 @@
 tmp.close();
 var ret = tmp.connect("lc_test");
 
-// There's no such 'getname' method of LocalConnection !!!
-check_equals(typeof(tmp.getname), 'undefined');
-check_equals(typeof(tmp.getName), 'undefined');
-check_equals(typeof(tmp.getsize), 'undefined');
-check_equals(typeof(tmp.getSize), 'undefined');
-check_equals(typeof(tmp.getallocated), 'undefined');
-check_equals(typeof(tmp.getAllocated), 'undefined');
-check_equals(typeof(LocalConnection.getname), 'undefined');
-check_equals(typeof(LocalConnection.getName), 'undefined');
-check_equals(typeof(LocalConnection.getsize), 'undefined');
-check_equals(typeof(LocalConnection.getSize), 'undefined');
-check_equals(typeof(LocalConnection.getallocated), 'undefined');
-check_equals(typeof(LocalConnection.getAllocated), 'undefined');
-
 // NOTE: This test will fail if a shared memory segment of the same
 // name exists. So the first time it'll pass, then it'll fail.
-if (ret == true) {
-       pass("LocalConnection::connect()");
-} else {       
-       fail("LocalConnection::connect()");
-}
-
-// Close the connection, and then check the state
-ret = tmp.close();
-xcheck(ret);
-
-// There's no such 'exists' method of LocalConnection !!!
-check_equals(typeof(tmp.exists), 'undefined');
+check_equals (ret, true);
 
+tmp.close();
 
 #endif // OUTPUT_VERSION >= 6
 
 totals();
-totals();

Index: testsuite/actionscript.all/Makefile.am
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/Makefile.am,v
retrieving revision 1.83
retrieving revision 1.84
diff -u -b -r1.83 -r1.84
--- testsuite/actionscript.all/Makefile.am      11 Dec 2007 12:41:30 -0000      
1.83
+++ testsuite/actionscript.all/Makefile.am      5 Jan 2008 03:55:00 -0000       
1.84
@@ -16,7 +16,7 @@
 # along with this program; if not, write to the Free Software
 # Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 
-# $Id: Makefile.am,v 1.83 2007/12/11 12:41:30 bwy Exp $
+# $Id: Makefile.am,v 1.84 2008/01/05 03:55:00 rsavoye Exp $
 
 AUTOMAKE_OPTIONS = dejagnu
 
@@ -56,8 +56,12 @@
 AM_CPPFLAGS = -I.. \
         -I$(top_srcdir)                \
         -I$(top_srcdir)/libbase \
+        -I$(top_srcdir)/libamf  \
         -I$(top_srcdir)/server  \
+        -I$(top_srcdir)/server/vm  \
+        -I$(top_srcdir)/server/asobj \
         -I$(top_srcdir)/libgeometry \
+       -I$(top_srcdir)/testsuite \
        $(LIBXML_CFLAGS)        \
        $(OPENGL_CFLAGS)        \
        $(DMALLOC_CFLAGS)       \

Index: testsuite/actionscript.all/NetConnection.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/NetConnection.as,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- testsuite/actionscript.all/NetConnection.as 26 Dec 2007 20:30:14 -0000      
1.13
+++ testsuite/actionscript.all/NetConnection.as 5 Jan 2008 03:55:00 -0000       
1.14
@@ -20,11 +20,14 @@
 // compile this test case with Ming makeswf, and then
 // execute it like this gnash -1 -r 0 -v out.swf
 
-#if OUTPUT_VERSION < 7
+#include "check.as"
+#include "dejagnu.as"
 
-check_equals(NetConnection, undefined);
+// #if OUTPUT_VERSION < 7
 
-#else // OUTPUT_VERSION >= 7
+// // check_equals(NetConnection, undefined);
+
+// #else // OUTPUT_VERSION >= 7
 
 check_equals(typeof(NetConnection), 'function');
 check_equals(typeof(NetConnection.prototype), 'object');
@@ -53,5 +56,5 @@
 }
 
 
-#endif // OUTPUT_VERSION >= 7
+//#endif // OUTPUT_VERSION >= 7
 totals();

Index: testsuite/actionscript.all/SharedObject.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/SharedObject.as,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- testsuite/actionscript.all/SharedObject.as  25 Dec 2007 05:57:26 -0000      
1.16
+++ testsuite/actionscript.all/SharedObject.as  5 Jan 2008 03:55:00 -0000       
1.17
@@ -20,7 +20,7 @@
 // compile this test case with Ming makeswf, and then
 // execute it like this gnash -1 -r 0 -v out.swf
 
-rcsid="$Id: SharedObject.as,v 1.16 2007/12/25 05:57:26 zoulunkai Exp $";
+rcsid="$Id: SharedObject.as,v 1.17 2008/01/05 03:55:00 rsavoye Exp $";
 
 #include "check.as"
 
@@ -54,7 +54,7 @@
 
 
 // FIXME: Test code that will soon be a formal test case.
-so = SharedObject.getLocal("settings");
+so = SharedObject.getLocal("level1/level2/settings", "/");
 
 // Private data
 so.name = "Joe";
@@ -78,13 +78,14 @@
 so.flush();
 
 
-newso = SharedObject.getLocal("settings");
+newso = SharedObject.getLocal("level1/level2/settings", "/");
 check_equals (typeof(newso), 'object');
 trace(newso.getSize());
 xcheck_equals (newso.getSize(), 283);
 
 if (typeof(newso.data) != 'undefined') {
     trace("New Shared Object, checking data...");
+    trace(typeof(newso.data.gain));
     check_equals (typeof(newso.data.gain), 'number');
     check_equals (newso.data.gain, so.data.gain);
     check_equals (typeof(newso.data.echosuppression), 'boolean');