[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Gnash-commit] gnash ChangeLog server/Makefile.am server/asobj...
From: |
Sandro Santilli |
Subject: |
[Gnash-commit] gnash ChangeLog server/Makefile.am server/asobj... |
Date: |
Wed, 30 Aug 2006 09:11:09 +0000 |
CVSROOT: /sources/gnash
Module name: gnash
Changes by: Sandro Santilli <strk> 06/08/30 09:11:09
Modified files:
. : ChangeLog
server : Makefile.am
server/asobj : Makefile.am
Added files:
server/asobj : gstring.h string.cpp
Removed files:
server : gstring.h string.cpp
Log message:
* server/gstring.h, server/asobj/gstring.h,
server/string.cpp, server/asobj/string.cpp,
server/Makefile.am, server/asobj/Makefile.am:
Moved string class files to asobj lib.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.777&r2=1.778
http://cvs.savannah.gnu.org/viewcvs/gnash/server/Makefile.am?cvsroot=gnash&r1=1.64&r2=1.65
http://cvs.savannah.gnu.org/viewcvs/gnash/server/gstring.h?cvsroot=gnash&r1=1.5&r2=0
http://cvs.savannah.gnu.org/viewcvs/gnash/server/string.cpp?cvsroot=gnash&r1=1.13&r2=0
http://cvs.savannah.gnu.org/viewcvs/gnash/server/asobj/Makefile.am?cvsroot=gnash&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/gnash/server/asobj/gstring.h?cvsroot=gnash&rev=1.1
http://cvs.savannah.gnu.org/viewcvs/gnash/server/asobj/string.cpp?cvsroot=gnash&rev=1.1
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.777
retrieving revision 1.778
diff -u -b -r1.777 -r1.778
--- ChangeLog 30 Aug 2006 09:04:18 -0000 1.777
+++ ChangeLog 30 Aug 2006 09:11:08 -0000 1.778
@@ -1,3 +1,10 @@
+2006-08-30 Sandro Santilli <address@hidden>
+
+ * server/gstring.h, server/asobj/gstring.h,
+ server/string.cpp, server/asobj/string.cpp,
+ server/Makefile.am, server/asobj/Makefile.am:
+ Moved string class files to asobj lib.
+
2006-08-30 Vitaly Alexeev <address@hidden>
* libbase\tu_opengl_includes.h: added win32 opengl #define
Index: server/Makefile.am
===================================================================
RCS file: /sources/gnash/gnash/server/Makefile.am,v
retrieving revision 1.64
retrieving revision 1.65
diff -u -b -r1.64 -r1.65
--- server/Makefile.am 28 Aug 2006 22:09:41 -0000 1.64
+++ server/Makefile.am 30 Aug 2006 09:11:09 -0000 1.65
@@ -83,7 +83,6 @@
xmlnode.cpp \
movie_root.cpp \
xmlsocket.cpp \
- string.cpp \
action.cpp \
ActionExec.cpp \
button_character_instance.cpp \
@@ -133,7 +132,6 @@
fontlib.h \
Global.h \
gnash.h \
- gstring.h \
impl.h \
movie.h \
movie_interface.h \
Index: server/asobj/Makefile.am
===================================================================
RCS file: /sources/gnash/gnash/server/asobj/Makefile.am,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- server/asobj/Makefile.am 24 Aug 2006 00:57:20 -0000 1.5
+++ server/asobj/Makefile.am 30 Aug 2006 09:11:09 -0000 1.6
@@ -88,6 +88,7 @@
Selection.cpp \
SharedObject.cpp\
ASSound.cpp \
+ string.cpp \
Stage.cpp \
System.cpp \
TextSnapshot.cpp\
@@ -107,6 +108,7 @@
LocalConnection.h\
Microphone.h \
GMath.h \
+ gstring.h \
Mouse.h \
MovieClip.h \
MovieClipLoader.h \
Index: server/asobj/gstring.h
===================================================================
RCS file: server/asobj/gstring.h
diff -N server/asobj/gstring.h
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ server/asobj/gstring.h 30 Aug 2006 09:11:09 -0000 1.1
@@ -0,0 +1,53 @@
+//
+// Copyright (C) 2005, 2006 Free Software Foundation, Inc.
+//
+// This program is free software; you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+// GNU General Public License for more details.
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+
+// Linking Gnash statically or dynamically with other modules is making a
+// combined work based on Gnash. Thus, the terms and conditions of the GNU
+// General Public License cover the whole combination.
+//
+// As a special exception, the copyright holders of Gnash give you
+// permission to combine Gnash with free software programs or libraries
+// that are released under the GNU LGPL and with code included in any
+// release of Talkback distributed by the Mozilla Foundation. You may
+// copy and distribute such a system following the terms of the GNU GPL
+// for all but the LGPL-covered parts and Talkback, and following the
+// LGPL for the LGPL-covered parts.
+//
+// Note that people who make modified versions of Gnash are not obligated
+// to grant this special exception for their modified versions; it is their
+// choice whether to do so. The GNU General Public License gives permission
+// to release a modified version without this exception; this exception
+// also makes it possible to release a modified version which carries
+// forward this exception.
+//
+//
+//
+
+// Implementation for ActionScript String object.
+
+#ifndef GNASH_STRING_H
+#define GNASH_STRING_H
+
+namespace gnash {
+
+class as_object;
+
+// Initialize the global String class
+void string_class_init(as_object& global);
+
+}
+
+#endif // GNASH_STRING_H
Index: server/asobj/string.cpp
===================================================================
RCS file: server/asobj/string.cpp
diff -N server/asobj/string.cpp
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ server/asobj/string.cpp 30 Aug 2006 09:11:09 -0000 1.1
@@ -0,0 +1,316 @@
+//
+// Copyright (C) 2005, 2006 Free Software Foundation, Inc.
+//
+// This program is free software; you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+// GNU General Public License for more details.
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+
+// Linking Gnash statically or dynamically with other modules is making a
+// combined work based on Gnash. Thus, the terms and conditions of the GNU
+// General Public License cover the whole combination.
+//
+// As a special exception, the copyright holders of Gnash give you
+// permission to combine Gnash with free software programs or libraries
+// that are released under the GNU LGPL and with code included in any
+// release of Talkback distributed by the Mozilla Foundation. You may
+// copy and distribute such a system following the terms of the GNU GPL
+// for all but the LGPL-covered parts and Talkback, and following the
+// LGPL for the LGPL-covered parts.
+//
+// Note that people who make modified versions of Gnash are not obligated
+// to grant this special exception for their modified versions; it is their
+// choice whether to do so. The GNU General Public License gives permission
+// to release a modified version without this exception; this exception
+// also makes it possible to release a modified version which carries
+// forward this exception.
+//
+//
+//
+
+// Implementation of ActionScript String class.
+
+#include "tu_config.h"
+#include "gstring.h"
+#include "smart_ptr.h"
+#include "fn_call.h"
+#include "as_object.h"
+#include "builtin_function.h" // need builtin_function
+
+namespace gnash {
+
+// Forward declarations
+static void string_sub_str(const fn_call& fn);
+static void string_sub_string(const fn_call& fn);
+static void string_index_of(const fn_call& fn);
+static void string_from_char_code(const fn_call& fn);
+static void string_char_code_at(const fn_call& fn);
+static void string_char_at(const fn_call& fn);
+static void string_to_upper_case(const fn_call& fn);
+static void string_to_lower_case(const fn_call& fn);
+static void string_to_string(const fn_call& fn);
+static void string_ctor(const fn_call& fn);
+
+static void
+attachStringInterface(as_object& o)
+{
+ // TODO fill in the rest
+ // concat()
+ // length property
+ // slice()
+ // split()
+ // lastIndexOf()
+ o.set_member("substr", &string_sub_str);
+ o.set_member("substring", &string_sub_string);
+ o.set_member("indexOf", &string_index_of);
+ o.set_member("toString", &string_to_string);
+ o.set_member("fromCharCode", &string_from_char_code);
+ o.set_member("charAt", &string_char_at);
+ o.set_member("charCodeAt", &string_char_code_at);
+ o.set_member("toUpperCase", &string_to_upper_case);
+ o.set_member("toLowerCase", &string_to_lower_case);
+}
+
+static as_object*
+getStringInterface()
+{
+ static as_object* o=NULL;
+ if ( o == NULL )
+ {
+ o = new as_object();
+ attachStringInterface(*o);
+ }
+ return o;
+}
+
+class tu_string_as_object : public as_object
+{
+public:
+ tu_string m_string;
+
+ tu_string_as_object()
+ :
+ as_object(getStringInterface())
+ {
+ }
+};
+
+// 1st param: start_index, 2nd param: length (NOT end_index)
+static void
+string_sub_str(const fn_call& fn)
+{
+ tu_string this_string = ((tu_string_as_object*) fn.this_ptr)->m_string;
+ // Pull a slice out of this_string.
+ int start = 0;
+ int utf8_len = this_string.utf8_length();
+ int end = utf8_len;
+ if (fn.nargs >= 1)
+ {
+ start = (int) fn.arg(0).to_number();
+ if (start < 0) start = utf8_len + start;
+ start = iclamp(start, 0, utf8_len);
+ }
+ if (fn.nargs >= 2)
+ {
+ end = (int) fn.arg(1).to_number() + start;
+ end = iclamp(end, start, utf8_len);
+ }
+
+ fn.result->set_tu_string(this_string.utf8_substring(start, end));
+ return;
+}
+
+// 1st param: start_index, 2nd param: end_index
+static void
+string_sub_string(const fn_call& fn)
+{
+ tu_string this_string = ((tu_string_as_object*) fn.this_ptr)->m_string;
+ // Pull a slice out of this_string.
+ int start = 0;
+ int utf8_len = this_string.utf8_length();
+ int end = utf8_len;
+ if (fn.nargs >= 1)
+ {
+ start = (int) fn.arg(0).to_number();
+ start = iclamp(start, 0, utf8_len);
+ }
+ if (fn.nargs >= 2)
+ {
+ end = (int) fn.arg(1).to_number();
+ end = iclamp(end, 0, utf8_len);
+ }
+
+ if (end < start) swap(&start, &end); // dumb, but that's what the
docs say
+ assert(end >= start);
+
+ fn.result->set_tu_string(this_string.utf8_substring(start, end));
+ return;
+}
+
+static void
+string_index_of(const fn_call& fn)
+{
+ tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
+ assert(this_string_ptr);
+
+ if (fn.nargs < 1)
+ {
+ fn.result->set_double(-1);
+ return;
+ }
+ else
+ {
+ int start_index = 0;
+ if (fn.nargs > 1)
+ {
+ start_index = (int) fn.arg(1).to_number();
+ }
+ const char* str = this_string_ptr->m_string.c_str();
+ const char* p = strstr(
+ str + start_index, // FIXME: not UTF-8 correct!
+ fn.arg(0).to_string());
+ if (p == NULL)
+ {
+ fn.result->set_double(-1);
+ return;
+ }
+
+ fn.result->set_double(tu_string::utf8_char_count(str, p - str));
+ return;
+ }
+}
+
+static void
+string_from_char_code(const fn_call& fn)
+{
+ tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
+ assert(this_string_ptr);
+
+ tu_string result;
+
+ for (int i = 0; i < fn.nargs; i++)
+ {
+ uint32 c = (uint32) fn.arg(i).to_number();
+ result.append_wide_char(c);
+ }
+
+ fn.result->set_tu_string(result);
+}
+
+static void
+string_char_code_at(const fn_call& fn)
+{
+ tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
+ assert(this_string_ptr);
+
+ assert(fn.nargs == 1);
+
+ int index = (int) fn.arg(0).to_number();
+ if (index >= 0 && index < this_string_ptr->m_string.utf8_length())
+ {
+
fn.result->set_double(this_string_ptr->m_string.utf8_char_at(index));
+ return;
+ }
+
+ double temp = 0.0; // This variable will let us divide by zero
without a compiler warning
+ fn.result->set_double(temp/temp); // this division by zero
creates a NaN value
+ return;
+}
+
+static void
+string_char_at(const fn_call& fn)
+{
+ tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
+ assert(this_string_ptr);
+
+ assert(fn.nargs == 1);
+
+ int index = (int) fn.arg(0).to_number();
+ if (index >= 0 && index < this_string_ptr->m_string.utf8_length())
+ {
+ tu_string result;
+ result += this_string_ptr->m_string.utf8_char_at(index);
+ fn.result->set_tu_string(result);
+ return;
+ }
+
+ double temp = 0.0; // This variable will let us divide by zero
without a compiler warning
+ fn.result->set_double(temp/temp); // this division by zero
creates a NaN value
+ return;
+}
+
+static void
+string_to_upper_case(const fn_call& fn)
+{
+ tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
+ assert(this_string_ptr);
+
+ fn.result->set_tu_string(this_string_ptr->m_string.utf8_to_upper());
+ return;
+}
+
+static void
+string_to_lower_case(const fn_call& fn)
+{
+ tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
+ assert(this_string_ptr);
+
+ fn.result->set_tu_string(this_string_ptr->m_string.utf8_to_lower());
+ return;
+}
+
+static void
+string_to_string(const fn_call& fn)
+{
+ tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
+ assert(this_string_ptr);
+
+ fn.result->set_tu_string(this_string_ptr->m_string);
+}
+
+
+static void
+string_ctor(const fn_call& fn)
+{
+ smart_ptr<tu_string_as_object> str = new tu_string_as_object;
+
+ if (fn.nargs > 0)
+ {
+ str->m_string = fn.arg(0).to_tu_string();
+ }
+
+ // this shouldn't be needed
+ //attachStringInterface(*str);
+
+ fn.result->set_as_object(str.get_ptr());
+}
+
+// extern (used by Global.cpp)
+void string_class_init(as_object& global)
+{
+ // This is going to be the global String "class"/"function"
+ static builtin_function* cl=NULL;
+
+ if ( cl == NULL )
+ {
+ cl=new builtin_function(&string_ctor, getStringInterface());
+ // replicate all interface to class, to be able to access
+ // all methods as static functions
+ attachStringInterface(*cl);
+
+ }
+
+ // Register _global.String
+ global.set_member("String", cl);
+
+}
+
+} // namespace gnash
Index: server/gstring.h
===================================================================
RCS file: server/gstring.h
diff -N server/gstring.h
--- server/gstring.h 5 Jul 2006 17:10:39 -0000 1.5
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,53 +0,0 @@
-//
-// Copyright (C) 2005, 2006 Free Software Foundation, Inc.
-//
-// This program is free software; you can redistribute it and/or modify
-// it under the terms of the GNU General Public License as published by
-// the Free Software Foundation; either version 2 of the License, or
-// (at your option) any later version.
-//
-// This program is distributed in the hope that it will be useful,
-// but WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-// GNU General Public License for more details.
-// You should have received a copy of the GNU General Public License
-// along with this program; if not, write to the Free Software
-// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
-
-// Linking Gnash statically or dynamically with other modules is making a
-// combined work based on Gnash. Thus, the terms and conditions of the GNU
-// General Public License cover the whole combination.
-//
-// As a special exception, the copyright holders of Gnash give you
-// permission to combine Gnash with free software programs or libraries
-// that are released under the GNU LGPL and with code included in any
-// release of Talkback distributed by the Mozilla Foundation. You may
-// copy and distribute such a system following the terms of the GNU GPL
-// for all but the LGPL-covered parts and Talkback, and following the
-// LGPL for the LGPL-covered parts.
-//
-// Note that people who make modified versions of Gnash are not obligated
-// to grant this special exception for their modified versions; it is their
-// choice whether to do so. The GNU General Public License gives permission
-// to release a modified version without this exception; this exception
-// also makes it possible to release a modified version which carries
-// forward this exception.
-//
-//
-//
-
-// Implementation for ActionScript String object.
-
-#ifndef GNASH_STRING_H
-#define GNASH_STRING_H
-
-namespace gnash {
-
-class as_object;
-
-// Initialize the global String class
-void string_class_init(as_object& global);
-
-}
-
-#endif // GNASH_STRING_H
Index: server/string.cpp
===================================================================
RCS file: server/string.cpp
diff -N server/string.cpp
--- server/string.cpp 26 Aug 2006 13:09:53 -0000 1.13
+++ /dev/null 1 Jan 1970 00:00:00 -0000
@@ -1,316 +0,0 @@
-//
-// Copyright (C) 2005, 2006 Free Software Foundation, Inc.
-//
-// This program is free software; you can redistribute it and/or modify
-// it under the terms of the GNU General Public License as published by
-// the Free Software Foundation; either version 2 of the License, or
-// (at your option) any later version.
-//
-// This program is distributed in the hope that it will be useful,
-// but WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-// GNU General Public License for more details.
-// You should have received a copy of the GNU General Public License
-// along with this program; if not, write to the Free Software
-// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
-
-// Linking Gnash statically or dynamically with other modules is making a
-// combined work based on Gnash. Thus, the terms and conditions of the GNU
-// General Public License cover the whole combination.
-//
-// As a special exception, the copyright holders of Gnash give you
-// permission to combine Gnash with free software programs or libraries
-// that are released under the GNU LGPL and with code included in any
-// release of Talkback distributed by the Mozilla Foundation. You may
-// copy and distribute such a system following the terms of the GNU GPL
-// for all but the LGPL-covered parts and Talkback, and following the
-// LGPL for the LGPL-covered parts.
-//
-// Note that people who make modified versions of Gnash are not obligated
-// to grant this special exception for their modified versions; it is their
-// choice whether to do so. The GNU General Public License gives permission
-// to release a modified version without this exception; this exception
-// also makes it possible to release a modified version which carries
-// forward this exception.
-//
-//
-//
-
-// Implementation of ActionScript String class.
-
-#include "tu_config.h"
-#include "gstring.h"
-#include "smart_ptr.h"
-#include "fn_call.h"
-#include "as_object.h"
-#include "builtin_function.h" // need builtin_function
-
-namespace gnash {
-
-// Forward declarations
-static void string_sub_str(const fn_call& fn);
-static void string_sub_string(const fn_call& fn);
-static void string_index_of(const fn_call& fn);
-static void string_from_char_code(const fn_call& fn);
-static void string_char_code_at(const fn_call& fn);
-static void string_char_at(const fn_call& fn);
-static void string_to_upper_case(const fn_call& fn);
-static void string_to_lower_case(const fn_call& fn);
-static void string_to_string(const fn_call& fn);
-static void string_ctor(const fn_call& fn);
-
-static void
-attachStringInterface(as_object& o)
-{
- // TODO fill in the rest
- // concat()
- // length property
- // slice()
- // split()
- // lastIndexOf()
- o.set_member("substr", &string_sub_str);
- o.set_member("substring", &string_sub_string);
- o.set_member("indexOf", &string_index_of);
- o.set_member("toString", &string_to_string);
- o.set_member("fromCharCode", &string_from_char_code);
- o.set_member("charAt", &string_char_at);
- o.set_member("charCodeAt", &string_char_code_at);
- o.set_member("toUpperCase", &string_to_upper_case);
- o.set_member("toLowerCase", &string_to_lower_case);
-}
-
-static as_object*
-getStringInterface()
-{
- static as_object* o=NULL;
- if ( o == NULL )
- {
- o = new as_object();
- attachStringInterface(*o);
- }
- return o;
-}
-
-class tu_string_as_object : public as_object
-{
-public:
- tu_string m_string;
-
- tu_string_as_object()
- :
- as_object(getStringInterface())
- {
- }
-};
-
-// 1st param: start_index, 2nd param: length (NOT end_index)
-static void
-string_sub_str(const fn_call& fn)
-{
- tu_string this_string = ((tu_string_as_object*) fn.this_ptr)->m_string;
- // Pull a slice out of this_string.
- int start = 0;
- int utf8_len = this_string.utf8_length();
- int end = utf8_len;
- if (fn.nargs >= 1)
- {
- start = (int) fn.arg(0).to_number();
- if (start < 0) start = utf8_len + start;
- start = iclamp(start, 0, utf8_len);
- }
- if (fn.nargs >= 2)
- {
- end = (int) fn.arg(1).to_number() + start;
- end = iclamp(end, start, utf8_len);
- }
-
- fn.result->set_tu_string(this_string.utf8_substring(start, end));
- return;
-}
-
-// 1st param: start_index, 2nd param: end_index
-static void
-string_sub_string(const fn_call& fn)
-{
- tu_string this_string = ((tu_string_as_object*) fn.this_ptr)->m_string;
- // Pull a slice out of this_string.
- int start = 0;
- int utf8_len = this_string.utf8_length();
- int end = utf8_len;
- if (fn.nargs >= 1)
- {
- start = (int) fn.arg(0).to_number();
- start = iclamp(start, 0, utf8_len);
- }
- if (fn.nargs >= 2)
- {
- end = (int) fn.arg(1).to_number();
- end = iclamp(end, 0, utf8_len);
- }
-
- if (end < start) swap(&start, &end); // dumb, but that's what the
docs say
- assert(end >= start);
-
- fn.result->set_tu_string(this_string.utf8_substring(start, end));
- return;
-}
-
-static void
-string_index_of(const fn_call& fn)
-{
- tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
- assert(this_string_ptr);
-
- if (fn.nargs < 1)
- {
- fn.result->set_double(-1);
- return;
- }
- else
- {
- int start_index = 0;
- if (fn.nargs > 1)
- {
- start_index = (int) fn.arg(1).to_number();
- }
- const char* str = this_string_ptr->m_string.c_str();
- const char* p = strstr(
- str + start_index, // FIXME: not UTF-8 correct!
- fn.arg(0).to_string());
- if (p == NULL)
- {
- fn.result->set_double(-1);
- return;
- }
-
- fn.result->set_double(tu_string::utf8_char_count(str, p - str));
- return;
- }
-}
-
-static void
-string_from_char_code(const fn_call& fn)
-{
- tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
- assert(this_string_ptr);
-
- tu_string result;
-
- for (int i = 0; i < fn.nargs; i++)
- {
- uint32 c = (uint32) fn.arg(i).to_number();
- result.append_wide_char(c);
- }
-
- fn.result->set_tu_string(result);
-}
-
-static void
-string_char_code_at(const fn_call& fn)
-{
- tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
- assert(this_string_ptr);
-
- assert(fn.nargs == 1);
-
- int index = (int) fn.arg(0).to_number();
- if (index >= 0 && index < this_string_ptr->m_string.utf8_length())
- {
-
fn.result->set_double(this_string_ptr->m_string.utf8_char_at(index));
- return;
- }
-
- double temp = 0.0; // This variable will let us divide by zero
without a compiler warning
- fn.result->set_double(temp/temp); // this division by zero
creates a NaN value
- return;
-}
-
-static void
-string_char_at(const fn_call& fn)
-{
- tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
- assert(this_string_ptr);
-
- assert(fn.nargs == 1);
-
- int index = (int) fn.arg(0).to_number();
- if (index >= 0 && index < this_string_ptr->m_string.utf8_length())
- {
- tu_string result;
- result += this_string_ptr->m_string.utf8_char_at(index);
- fn.result->set_tu_string(result);
- return;
- }
-
- double temp = 0.0; // This variable will let us divide by zero
without a compiler warning
- fn.result->set_double(temp/temp); // this division by zero
creates a NaN value
- return;
-}
-
-static void
-string_to_upper_case(const fn_call& fn)
-{
- tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
- assert(this_string_ptr);
-
- fn.result->set_tu_string(this_string_ptr->m_string.utf8_to_upper());
- return;
-}
-
-static void
-string_to_lower_case(const fn_call& fn)
-{
- tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
- assert(this_string_ptr);
-
- fn.result->set_tu_string(this_string_ptr->m_string.utf8_to_lower());
- return;
-}
-
-static void
-string_to_string(const fn_call& fn)
-{
- tu_string_as_object* this_string_ptr = (tu_string_as_object*)
fn.this_ptr;
- assert(this_string_ptr);
-
- fn.result->set_tu_string(this_string_ptr->m_string);
-}
-
-
-static void
-string_ctor(const fn_call& fn)
-{
- smart_ptr<tu_string_as_object> str = new tu_string_as_object;
-
- if (fn.nargs > 0)
- {
- str->m_string = fn.arg(0).to_tu_string();
- }
-
- // this shouldn't be needed
- //attachStringInterface(*str);
-
- fn.result->set_as_object(str.get_ptr());
-}
-
-// extern (used by Global.cpp)
-void string_class_init(as_object& global)
-{
- // This is going to be the global String "class"/"function"
- static builtin_function* cl=NULL;
-
- if ( cl == NULL )
- {
- cl=new builtin_function(&string_ctor, getStringInterface());
- // replicate all interface to class, to be able to access
- // all methods as static functions
- attachStringInterface(*cl);
-
- }
-
- // Register _global.String
- global.set_member("String", cl);
-
-}
-
-} // namespace gnash
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Gnash-commit] gnash ChangeLog server/Makefile.am server/asobj...,
Sandro Santilli <=