mcs/class/Microsoft.JScript/Microsoft.JScript/FunctionObject.cs

   1 //
   2 // FunctionObject.cs:
   3 //
   4 // Author:
   5 //      Cesar Octavio Lopez Nataren
   6 //
   7 // (C) 2003, Cesar Octavio Lopez Nataren, <cesar@ciencias.unam.mx>
   8 //
   9
  10 //
  11 // Permission is hereby granted, free of charge, to any person obtaining
  12 // a copy of this software and associated documentation files (the
  13 // "Software"), to deal in the Software without restriction, including
  14 // without limitation the rights to use, copy, modify, merge, publish,
  15 // distribute, sublicense, and/or sell copies of the Software, and to
  16 // permit persons to whom the Software is furnished to do so, subject to
  17 // the following conditions:
  18 //
  19 // The above copyright notice and this permission notice shall be
  20 // included in all copies or substantial portions of the Software.
  21 //
  22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  29 //
  30
  31 using System;
  32 using System.Text;
  33 using System.Reflection;
  34 using System.Collections;
  35
  36 namespace Microsoft.JScript {
  37
  38         public class FunctionObject : ScriptFunction {
  39
  40                 internal MethodAttributes attr;
  41                 internal string name;
  42                 internal string type_annot;
  43                 internal Type return_type;
  44                 internal FormalParameterList parameters;
  45                 internal Block body;
  46
  47                 internal FunctionObject (string name, FormalParameterList p, string ret_type, Block body)
  48                 {
  49                         //
  50                         // FIXME:
  51                         // 1) Must collect the attributes given.
  52                         // 2) Check if they are semantically correct.
  53                         // 3) Assign those values to 'attr'.
  54                         //
  55                         this.attr = MethodAttributes.Public | MethodAttributes.Static;
  56
  57                         this.name = name;
  58                         this.parameters = p;
  59
  60                         this.type_annot = ret_type;
  61                         //
  62                         // FIXME: Must check that return_type it's a valid type,
  63                         // and assign that to 'return_type' field.
  64                         //
  65                         this.return_type = typeof (void);
  66
  67                         this.body = body;
  68                 }
  69
  70                 internal FunctionObject ()
  71                 {
  72                         this.parameters = new FormalParameterList ();
  73                 }
  74
  75                 public override string ToString ()
  76                 {
  77                         StringBuilder sb = new StringBuilder ();
  78
  79                         sb.Append ("function ");
  80                         sb.Append (name + " ");
  81                         sb.Append ("(");
  82
  83                         if (parameters != null)
  84                                 sb.Append (this.parameters.ToString ());
  85
  86                         sb.Append (")");
  87                         sb.Append (" : " + return_type);
  88                         sb.Append ("{");
  89
  90                         if (body != null)
  91                                 sb.Append (body.ToString ());
  92
  93                         sb.Append ("}");
  94
  95                         return sb.ToString ();
  96                 }
  97
  98                 internal Type [] params_types ()
  99                 {
 100                         if (parameters == null)
 101                                 return
 102                                         new Type [] {typeof (Object), typeof (Microsoft.JScript.Vsa.VsaEngine)};
 103                         else {
 104                                 int i, size;
 105                                 ArrayList p = parameters.ids;
 106
 107                                 size = p.Count + 2;
 108
 109                                 Type [] types = new Type [size];
 110
 111                                 types [0] = typeof (Object);
 112                                 types [1] = typeof (Microsoft.JScript.Vsa.VsaEngine);
 113
 114                                 for (i = 2; i < size; i++)
 115                                         types [i] = ((FormalParam) p [i - 2]).type;
 116
 117                                 return types;
 118                         }
 119                 }
 120         }
 121 }