Changeset 20896

Timestamp:

10/07/08 17:37:38 (6 weeks ago)

Author:

fujidig

Message:

getstr を実装

Location:

lang/javascript/hsp-on-js/trunk/src

Files:

• builtin-funcs.js (modified) (1 diff)
• run-in-shell.js (modified) (1 diff)
• str-value.js (modified) (2 diffs)
• t.hsp (modified) (1 diff)

lang/javascript/hsp-on-js/trunk/src/builtin-funcs.js

@@ -285 +285 @@
                 v.setbyte(offset + 2, val >> 16);
                 v.setbyte(offset + 3, val >> 24);
+        },
+        0x1d: function getstr(v, src, index, separator, length) {
+                this.scanArgs(arguments, 'vvNNN');
+                index = index ? index.toIntValue()._value : 0;
+                separator = separator ? separator.toIntValue()._value & 0xff : 0;
+                length = length ? length.toIntValue()._value : 1024;
+                var result = "";
+                var i = 0;
+                var c;
+                while(i < length) {
+                        c = src.getbyte(index + i);
+                        if(c == 0) break;
+                        i ++;
+                        if(c == separator) {
+                                break;
+                        }
+                        if(c == 13) {
+                                if(src.getbyte(index + i) == 10) i ++;
+                                break;
+                        }
+                        result += String.fromCharCode(c);
+                        if((0x81 <= c && c <= 0x9F) || (0xE0 <= c && c <= 0xFC)) {
+                                result += String.fromCharCode(src.getbyte(index + i));
+                                i ++;
+                        }
+                }
+                v.assign(new StrValue(result));
+                this.strsize = new IntValue(i);
+                this.stat.assign(0, new IntValue(c));
         },
         0x20: function memcpy(destVar, srcVar, length, destOffset, srcOffset) {

lang/javascript/hsp-on-js/trunk/src/run-in-shell.js

@@ -21 +21 @@
 function main(){
         var data = [
-'\x48\x53\x50\x33\x01\x03\x00\x00\x05\x00\x00\x00\x87\x01\x00\x00',
-'\x60\x00\x00\x00\xc6\x00\x00\x00\x26\x01\x00\x00\x25\x00\x00\x00',
-'\x4b\x01\x00\x00\x08\x00\x00\x00\x53\x01\x00\x00\x34\x00\x00\x00',
-'\x87\x01\x00\x00\x00\x00\x00\x00\x87\x01\x00\x00\x00\x00\x00\x00',
-'\x87\x01\x00\x00\x00\x00\x00\x00\x87\x01\x00\x00\x00\x00\x00\x00',
-'\x87\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00',
-'\x09\x20\x0f\x00\x02\x00\x06\x00\x01\x20\x00\x00\x00\x00\x08\x00',
-'\x04\x80\x20\xa1\x07\x00\x0f\x20\x0a\x00\x01\x00\x01\x00\x01\x40',
-'\x00\x00\x04\x00\x01\x00\x00\x00\x00\x00\x08\x20\x21\x00\x01\x00',
-'\x01\x00\x04\x40\x2a\x00\x01\x40\x00\x00\x09\x20\x0f\x00\x02\x00',
-'\x0e\x00\x01\x20\x02\x00\x00\x00\x08\x00\x0d\x00\x08\x00\x00\x00',
-'\x28\x00\x04\x80\xff\xff\xff\xff\x00\x00\x29\x00\x0f\x20\x04\x00',
-'\x07\x00\x00\x00\x04\x00\x64\x00\x01\x20\x03\x00\x00\x00\x08\x00',
-'\x0d\x00\x02\x00\x00\x00\x28\x00\x01\x00\x01\x00\x00\x00\x29\x00',
-'\x0f\x20\x05\x00\x01\x20\x04\x00\x00\x00\x08\x00\x0d\x00\x08\x00',
-'\x00\x00\x28\x00\x04\x80\xff\xff\xff\xff\x00\x00\x29\x00\x09\x20',
-'\x0f\x00\x0d\x00\x00\x00\x00\x00\x28\x00\x01\x00\x04\x00\x01\x00',
-'\x02\x00\x00\x00\x01\x00\x00\x00\x29\x00\x0f\x20\x11\x00\x0f\x20',
-'\x00\x00\x07\x00\x01\x00\x74\x2e\x68\x73\x70\x00\x70\x72\x65\x70',
-'\x61\x72\x65\x00\x73\x74\x61\x72\x74\x00\x73\x69\x7a\x65\x00\x61',
-'\x00\x73\x74\x00\x6c\x65\x6e\x00\x65\x64\x00\x42\x00\x00\x00\x5d',
-'\x00\x00\x00\xfe\x00\x00\x00\x00\x00\x00\x04\x07\x0a\x08\x04\x0d',
-'\x06\x0c\x02\x0d\x0e\x00\x06\xfd\x14\x00\x00\x00\x00\xfd\x19\x00',
-'\x00\x01\x00\xfd\x1b\x00\x00\x02\x00\xfd\x1e\x00\x00\x03\x00\xfd',
-'\x22\x00\x00\x04\x00\xff\xff'
+'\x48\x53\x50\x33\x01\x03\x00\x00\x03\x00\x00\x00\x4b\x01\x00\x00',
+'\x60\x00\x00\x00\x88\x00\x00\x00\xe8\x00\x00\x00\x34\x00\x00\x00',
+'\x1c\x01\x00\x00\x08\x00\x00\x00\x24\x01\x00\x00\x27\x00\x00\x00',
+'\x4b\x01\x00\x00\x00\x00\x00\x00\x4b\x01\x00\x00\x00\x00\x00\x00',
+'\x4b\x01\x00\x00\x00\x00\x00\x00\x4b\x01\x00\x00\x00\x00\x00\x00',
+'\x4b\x01\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00',
+'\x01\x20\x00\x00\x00\x00\x08\x00\x02\x00\x06\x00\x01\x20\x01\x00',
+'\x00\x00\x08\x00\x04\x00\x00\x00\x0f\x20\x04\x00\x07\x00\x00\x00',
+'\x04\x00\x04\x00\x08\x20\x1d\x00\x01\x00\x02\x00\x01\x40\x00\x00',
+'\x01\x40\x01\x00\x04\x40\x2c\x00\x01\x20\x01\x00\x00\x00\x00\x00',
+'\x0e\x00\x06\x00\x09\x20\x0f\x00\x02\x00\x12\x00\x01\x00\x02\x00',
+'\x00\x00\x00\x00\x09\x20\x0f\x00\x02\x00\x18\x00\x0e\x00\x06\x00',
+'\x00\x00\x00\x00\x09\x20\x0f\x00\x02\x00\x23\x00\x0e\x00\x03\x00',
+'\x00\x00\x00\x00\x09\x20\x0f\x00\x0f\x20\x05\x00\x0f\x20\x11\x00',
+'\x0f\x20\x00\x00\x07\x00\x01\x00\x74\x2e\x68\x73\x70\x00\x41\x42',
+'\x43\x2c\x44\x45\x46\x2c\x45\x46\x47\x00\x6c\x6e\x20\x3d\x20\x00',
+'\x73\x74\x72\x73\x69\x7a\x65\x20\x3d\x20\x00\x73\x74\x61\x74\x20',
+'\x3d\x20\x00\x62\x75\x66\x00\x69\x00\x6c\x6e\x00\x3e\x00\x00\x00',
+'\x3e\x00\x00\x00\xfe\x00\x00\x00\x00\x00\x00\x06\x06\x00\x06\x0a',
+'\x06\x08\x08\x08\x02\x02\x06\xfd\x2b\x00\x00\x00\x00\xfd\x2f\x00',
+'\x00\x01\x00\xfd\x31\x00\x00\x02\x00\xff\xff'
         ].join('');
 

lang/javascript/hsp-on-js/trunk/src/str-value.js

@@ -7 +7 @@
 }
 
+StrValue.prototype = new Value;
+
 StrValue.EMPTY_STR = new StrValue('');
 StrValue.of = function of(str) {
@@ -14 +16 @@
         return new StrValue(str);
 }
-
-StrValue.prototype = new Value;
 
 Utils.objectExtend(StrValue.prototype, {

lang/javascript/hsp-on-js/trunk/src/t.hsp

@@ -1 @@
-mes "prepare"
-size = 500000
-sdim a, size + 1
-memset a, '*', size
-mes "start"
-st = gettime(-1)
-repeat 100
-        len = strlen(a)
+buf = "ABC,DEF,EFG"
+i = 0
+
+repeat 4
+        getstr ln, buf, i, ','
+        i += strsize
+        mes "ln = " + ln
+        mes "strsize = " + strsize
+        mes "stat = " + stat
+        mes
 loop
-ed = gettime(-1)
-mes int(ed - st)
-