Changeset 16713 for lang/actionscript

Timestamp:

07/27/08 22:02:31 (5 years ago)

Author:

hoge1e3

Message:

 

Location:

lang/actionscript/todoshare

Files:

• index.cgi (modified) (2 diffs)
• js/jsonScr.js (modified) (6 diffs)
• js/tag.js (modified) (1 diff)
• perl/Tmpl.pm (modified) (1 diff)
• test/scriptTest.html (modified) (1 diff)
• test/tagTest.html (modified) (2 diffs)

lang/actionscript/todoshare/index.cgi

@@ -45 +45 @@
 sub disp {
   my $scr=<<'EOF';
-j=new JsonScript();
-j.registerAction("DELREL",function (obj,name,val,td,table) {
-   print("DE "+ obj+ " "+name+" "+val+" "+td+" "+table );  
-   $(table).firstChild/*tbody*/.removeChild($(td)); 
+JsonScript.registerAction("DELREL",function (obj,name,val,td,table) {
+//   db(["DELREL",obj,name,val],function (res) {
+//      print("DE "+ Object.toJSON(res) );  
+      $(table).firstChild/*tbody*/.removeChild($(td)); 
+      var id=""+new Date(); 
+    try{  
+      elem( $(table).firstChild, 
+         ["tr",
+           ["td",
+             ["input",{type:"text", id:id+"name", value:name}]
+           ],
+           ["td",
+             ["input",{type:"text", id:id+"val", value:val}]
+           ],
+           ["td",
+             ["button",{
+                id:id+"button", 
+                onclick:function () {
+                    print (
+                       (id+"name")+
+                       (id+"val") );
+                }
+             },"Add"]
+           ]
+         ]
+      ); } catch(e) {alert(e);}
+//   });
 });
 EOF
-  &Tmpl::page({title=>$id,script=>$scr},[span,
-     [strong,img(src=>"img/obj.png"),"$id"],
+  &Tmpl::page({title=>$id,script=>$scr},[span(id=>"top"),
+     [strong(id=>"head"),img(src=>"img/obj.png"),"$id"],
      [table(id=>$id),sub {
        my $p=shift;
-       my $res=&Obj::exe(["FINDREL",$id,any,any]);
+       my $res=&Obj::exe(["FINDREL",$id,any,any]);       
        for (@$res) {
           my $action=toJSON(
              ["DELREL", $_->{obj},$_->{name},$_->{val}, $_->{t},$id ]
           );
+          my $kms=toJSON(["KMS",$_->{obj}]);
           $p->p([&tr(id=>$_->{t}),
                 [td,$_->{name}] ,
@@ -65 +89 @@
                 [td,
                    [button(
-                           onClick=>qq(j.exec($action)) 
-                          ) ,"Forget"]
+                           onClick=>qq(JsonScript.exec($action)) 
+                          ) ,"Forget"],
+                   [button(onClick=>qq(JsonScript.exec($kms)) ),"View"]
                 ]
              ]);

lang/actionscript/todoshare/js/jsonScr.js

@@ -1 +1 @@
 
-JsonScript=Class.create ();
-JsonScript.Action=Class.create();
 
-JsonScript.Action.prototype= {
+JsonScriptClass=Class.create ();
+JsonScriptAction=Class.create();
+
+JsonScriptAction.prototype= {
    initialize: function (a){this.f=a;},
    apply: function(t,args) {
@@ -10 +11 @@
    }
 };
-JsonScript.NOP=new JsonScript.Action(function (){return this;});
+JsonScriptNOP=new JsonScriptAction(function (){return this;});
 
 function sequencial() {
         var a=$A(arguments);
-        if (a.length==0) return JsonScript.NOP;
+        if (a.length==0) return JsonScriptNOP;
         var firstExpr=a.shift();
         var firstAction=this.eval(firstExpr);
@@ -27 +28 @@
         }; 
 }
-JsonScript.prototype={
+JsonScriptClass.prototype={
   initialize:function () { 
      this.functions={};
@@ -45 +46 @@
         var argActions=$A(arguments).map(function (expr) {
           var r=env.eval(expr);
-          if (r instanceof JsonScript.Action) return r;
-          else return new JsonScript.Action(function () {
+          if (r instanceof JsonScriptAction) return r;
+          else return new JsonScriptAction(function () {
              var state=this;
              state.returnValue=r;
@@ -52 +53 @@
           });
         });
-        return new JsonScript.Action(function () {
+        return new JsonScriptAction(function () {
            var state=this;
            var pass=argActions.map(function (act){
@@ -75 +76 @@
   exec:function (prog) {
      this.compile(prog).apply(this);
+  },
+  handler: function(cmd) {
+     return "JsonScript.exec("+Object.toJSON(cmd)+")";
   }
 };
+JsonScript=new JsonScriptClass();
+
   

lang/actionscript/todoshare/js/tag.js

@@ -37 +37 @@
 function elemObj(target,o) {
   for (var i in o) {
-     target[i]=o[i];
+     if (i.match(/^on/)) {
+        if (target.addEventListener) {
+           target.addEventListener(i.substring(2),o[i],false);
+        } else {
+           target.attachEvent(i,o[i]);
+        }
+     } else {
+       target[i]=o[i];
+     }
   }
 }

lang/actionscript/todoshare/perl/Tmpl.pm

@@ -19 +19 @@
       script(src=>"suggest.js"),
       script(src=>"js/common.js"),
+      script(src=>"js/tag.js"),
       script(src=>"js/jsonScr.js"),
       [script,$opt->{script}],

lang/actionscript/todoshare/test/scriptTest.html

@@ -3 +3 @@
 <script src="../js/jsonScr.js"></script>
 <script>
-j=new JsonScript();
 
 
 
-j.registerAction("test",function (x,y) {
+JsonScript.registerAction("test",function (x,y) {
   alert(x+y);
 });
-j.registerAction("alert",function (t) {alert("ALR"+t);});
+JsonScript.registerAction("alert",function (t) {alert("ALR"+t);});
 /*function add5() {
    
 }*/
 
-add5=j.compile(["PROGN",
+add5=JsonScript.compile(["PROGN",
      ["test",3,4],
      ["test",10,22],
      ["alert","aho"]
 ]);
-add2=j.compile(["test",2,6]);
+/*add2=j.compile(["test",2,6]);
 function add3() {
   add2.apply(this);
-}
+}*/
 
 </script>

lang/actionscript/todoshare/test/tagTest.html

@@ -3 +3 @@
 <script src="../prototype.js"></script>
 <script>
+function a() {
+   alert(32);
+} 
 function add5() {
   // alert(5);
@@ -12 +15 @@
       function (t) {
          elem(t,2+3);
-      }
+      },
+      ["button",{onclick:a},"G"]
    ]);
    //elem( $("b"),"X");
-   //$("b").appendChild(document.createTextNode("Y"));
-   //alert(3);
+//   var bb=document.createElement("button");
+//   bb.attachEvent("onclick",a);
+ //  bb.addEventListener("click",a,false);
+//   elem(bb,"C");
+//   $("b").appendChild(bb);
+//alert(3);
   } catch(e) {alert(e);throw e;}
 }