/[jscoverage]/trunk/instrument-js.cpp
ViewVC logotype

Diff of /trunk/instrument-js.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 95 by siliconforks, Wed May 7 22:50:00 2008 UTC revision 190 by siliconforks, Tue Sep 23 03:49:01 2008 UTC
# Line 17  Line 17 
17      51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.      51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18  */  */
19    
20    #include <config.h>
21    
22  #include "instrument-js.h"  #include "instrument-js.h"
23    
24  #include <assert.h>  #include <assert.h>
# Line 32  Line 34 
34  #include <jsscope.h>  #include <jsscope.h>
35  #include <jsstr.h>  #include <jsstr.h>
36    
37    #include "encoding.h"
38    #include "global.h"
39    #include "highlight.h"
40    #include "resource-manager.h"
41  #include "util.h"  #include "util.h"
42    
43  static JSRuntime * runtime = NULL;  static JSRuntime * runtime = NULL;
# Line 72  Line 78 
78  }  }
79    
80  static void print_string(JSString * s, Stream * f) {  static void print_string(JSString * s, Stream * f) {
81    for (int i = 0; i < s->length; i++) {    size_t length = JSSTRING_LENGTH(s);
82      char c = s->chars[i];    jschar * characters = JSSTRING_CHARS(s);
83      Stream_write_char(f, c);    for (size_t i = 0; i < length; i++) {
84        jschar c = characters[i];
85        if (32 <= c && c <= 126) {
86          switch (c) {
87          case '"':
88            Stream_write_string(f, "\\\"");
89            break;
90    /*
91          case '\'':
92            Stream_write_string(f, "\\'");
93            break;
94    */
95          case '\\':
96            Stream_write_string(f, "\\\\");
97            break;
98          default:
99            Stream_write_char(f, c);
100            break;
101          }
102        }
103        else {
104          switch (c) {
105          case 0x8:
106            Stream_write_string(f, "\\b");
107            break;
108          case 0x9:
109            Stream_write_string(f, "\\t");
110            break;
111          case 0xa:
112            Stream_write_string(f, "\\n");
113            break;
114          case 0xb:
115            Stream_write_string(f, "\\v");
116            break;
117          case 0xc:
118            Stream_write_string(f, "\\f");
119            break;
120          case 0xd:
121            Stream_write_string(f, "\\r");
122            break;
123          default:
124            Stream_printf(f, "\\u%04x", c);
125            break;
126          }
127        }
128    }    }
129  }  }
130    
# Line 84  Line 134 
134    print_string(s, f);    print_string(s, f);
135  }  }
136    
137  static void print_string_jsval(jsval value, Stream * f) {  static void print_regex(jsval value, Stream * f) {
138    assert(JSVAL_IS_STRING(value));    assert(JSVAL_IS_STRING(value));
139    JSString * s = JSVAL_TO_STRING(value);    JSString * s = JSVAL_TO_STRING(value);
140    print_string(s, f);    size_t length = JSSTRING_LENGTH(s);
141      jschar * characters = JSSTRING_CHARS(s);
142      for (size_t i = 0; i < length; i++) {
143        jschar c = characters[i];
144        if (32 <= c && c <= 126) {
145          Stream_write_char(f, c);
146        }
147        else {
148          Stream_printf(f, "\\u%04x", c);
149        }
150      }
151  }  }
152    
153  static void print_quoted_string_atom(JSAtom * atom, Stream * f) {  static void print_quoted_string_atom(JSAtom * atom, Stream * f) {
154    assert(ATOM_IS_STRING(atom));    assert(ATOM_IS_STRING(atom));
155    JSString * s = ATOM_TO_STRING(atom);    JSString * s = ATOM_TO_STRING(atom);
156    JSString * quoted = js_QuoteString(context, s, '"');    Stream_write_char(f, '"');
157    print_string(quoted, f);    print_string(s, f);
158      Stream_write_char(f, '"');
159  }  }
160    
161  static const char * get_op(uint8 op) {  static const char * get_op(uint8 op) {
# Line 145  Line 206 
206  static void instrument_expression(JSParseNode * node, Stream * f);  static void instrument_expression(JSParseNode * node, Stream * f);
207  static void instrument_statement(JSParseNode * node, Stream * f, int indent);  static void instrument_statement(JSParseNode * node, Stream * f, int indent);
208    
209  static void instrument_function(JSParseNode * node, Stream * f, int indent) {  enum FunctionType {
210      assert(node->pn_arity == PN_FUNC);    FUNCTION_NORMAL,
211      assert(ATOM_IS_OBJECT(node->pn_funAtom));    FUNCTION_GETTER_OR_SETTER
212      JSObject * object = ATOM_TO_OBJECT(node->pn_funAtom);  };
213      assert(JS_ObjectIsFunction(context, object));  
214      JSFunction * function = (JSFunction *) JS_GetPrivate(context, object);  static void instrument_function(JSParseNode * node, Stream * f, int indent, enum FunctionType type) {
215      assert(function);    assert(node->pn_arity == PN_FUNC);
216      assert(object == function->object);    assert(ATOM_IS_OBJECT(node->pn_funAtom));
217      Stream_printf(f, "%*s", indent, "");    JSObject * object = ATOM_TO_OBJECT(node->pn_funAtom);
218      assert(JS_ObjectIsFunction(context, object));
219      JSFunction * function = (JSFunction *) JS_GetPrivate(context, object);
220      assert(function);
221      assert(object == function->object);
222      Stream_printf(f, "%*s", indent, "");
223      if (type == FUNCTION_NORMAL) {
224      Stream_write_string(f, "function");      Stream_write_string(f, "function");
225      }
226    
227      /* function name */    /* function name */
228      if (function->atom) {    if (function->atom) {
229        Stream_write_char(f, ' ');      Stream_write_char(f, ' ');
230        print_string_atom(function->atom, f);      print_string_atom(function->atom, f);
231      }    }
232    
233      /* function parameters */    /* function parameters */
234      Stream_write_string(f, "(");    Stream_write_string(f, "(");
235      JSAtom ** params = xmalloc(function->nargs * sizeof(JSAtom *));    JSAtom ** params = xnew(JSAtom *, function->nargs);
236      for (int i = 0; i < function->nargs; i++) {    for (int i = 0; i < function->nargs; i++) {
237        /* initialize to NULL for sanity check */      /* initialize to NULL for sanity check */
238        params[i] = NULL;      params[i] = NULL;
239      }    }
240      JSScope * scope = OBJ_SCOPE(object);    JSScope * scope = OBJ_SCOPE(object);
241      for (JSScopeProperty * scope_property = SCOPE_LAST_PROP(scope); scope_property != NULL; scope_property = scope_property->parent) {    for (JSScopeProperty * scope_property = SCOPE_LAST_PROP(scope); scope_property != NULL; scope_property = scope_property->parent) {
242        if (scope_property->getter != js_GetArgument) {      if (scope_property->getter != js_GetArgument) {
243          continue;        continue;
244        }      }
245        assert(scope_property->flags & SPROP_HAS_SHORTID);      assert(scope_property->flags & SPROP_HAS_SHORTID);
246        assert((uint16) scope_property->shortid < function->nargs);      assert((uint16) scope_property->shortid < function->nargs);
247        assert(JSID_IS_ATOM(scope_property->id));      assert(JSID_IS_ATOM(scope_property->id));
248        params[(uint16) scope_property->shortid] = JSID_TO_ATOM(scope_property->id);      params[(uint16) scope_property->shortid] = JSID_TO_ATOM(scope_property->id);
249      }
250      for (int i = 0; i < function->nargs; i++) {
251        assert(params[i] != NULL);
252        if (i > 0) {
253          Stream_write_string(f, ", ");
254      }      }
255      for (int i = 0; i < function->nargs; i++) {      if (ATOM_IS_STRING(params[i])) {
256        assert(params[i] != NULL);        print_string_atom(params[i], f);
       if (i > 0) {  
         Stream_write_string(f, ", ");  
       }  
       if (ATOM_IS_STRING(params[i])) {  
         print_string_atom(params[i], f);  
       }  
257      }      }
258      Stream_write_string(f, ") {\n");    }
259      free(params);    Stream_write_string(f, ") {\n");
260      free(params);
261    
262      /* function body */    /* function body */
263      instrument_statement(node->pn_body, f, indent + 2);    instrument_statement(node->pn_body, f, indent + 2);
264    
265      Stream_write_string(f, "}\n");    Stream_write_string(f, "}\n");
266  }  }
267    
268  static void instrument_function_call(JSParseNode * node, Stream * f) {  static void instrument_function_call(JSParseNode * node, Stream * f) {
# Line 225  Line 293 
293  static void instrument_expression(JSParseNode * node, Stream * f) {  static void instrument_expression(JSParseNode * node, Stream * f) {
294    switch (node->pn_type) {    switch (node->pn_type) {
295    case TOK_FUNCTION:    case TOK_FUNCTION:
296      instrument_function(node, f, 0);      instrument_function(node, f, 0, FUNCTION_NORMAL);
297      break;      break;
298    case TOK_COMMA:    case TOK_COMMA:
299      for (struct JSParseNode * p = node->pn_head; p != NULL; p = p->pn_next) {      for (struct JSParseNode * p = node->pn_head; p != NULL; p = p->pn_next) {
# Line 432  Line 500 
500        if (p != node->pn_head) {        if (p != node->pn_head) {
501          Stream_write_string(f, ", ");          Stream_write_string(f, ", ");
502        }        }
503        instrument_expression(p->pn_left, f);  
504        Stream_write_string(f, ": ");        /* check whether this is a getter or setter */
505        instrument_expression(p->pn_right, f);        switch (p->pn_op) {
506          case JSOP_GETTER:
507            Stream_write_string(f, "get ");
508            instrument_expression(p->pn_left, f);
509            instrument_function(p->pn_right, f, 0, FUNCTION_GETTER_OR_SETTER);
510            break;
511          case JSOP_SETTER:
512            Stream_write_string(f, "set ");
513            instrument_expression(p->pn_left, f);
514            instrument_function(p->pn_right, f, 0, FUNCTION_GETTER_OR_SETTER);
515            break;
516          default:
517            instrument_expression(p->pn_left, f);
518            Stream_write_string(f, ": ");
519            instrument_expression(p->pn_right, f);
520            break;
521          }
522      }      }
523      Stream_write_char(f, '}');      Stream_write_char(f, '}');
524      break;      break;
# Line 461  Line 545 
545          JSObject * object = ATOM_TO_OBJECT(node->pn_atom);          JSObject * object = ATOM_TO_OBJECT(node->pn_atom);
546          jsval result;          jsval result;
547          js_regexp_toString(context, object, 0, NULL, &result);          js_regexp_toString(context, object, 0, NULL, &result);
548          print_string_jsval(result, f);          print_regex(result, f);
549        }        }
550        break;        break;
551      default:      default:
# Line 538  Line 622 
622  static void output_statement(JSParseNode * node, Stream * f, int indent) {  static void output_statement(JSParseNode * node, Stream * f, int indent) {
623    switch (node->pn_type) {    switch (node->pn_type) {
624    case TOK_FUNCTION:    case TOK_FUNCTION:
625      instrument_function(node, f, indent);      instrument_function(node, f, indent, FUNCTION_NORMAL);
626      break;      break;
627    case TOK_LC:    case TOK_LC:
628      assert(node->pn_arity == PN_LIST);      assert(node->pn_arity == PN_LIST);
# Line 801  Line 885 
885    output_statement(node, f, indent);    output_statement(node, f, indent);
886  }  }
887    
888  void jscoverage_instrument_js(const char * id, Stream * input, Stream * output) {  static bool characters_start_with(const jschar * characters, size_t line_start, size_t line_end, const char * prefix) {
889      const jschar * characters_end = characters + line_end;
890      const jschar * cp = characters + line_start;
891      const char * bp = prefix;
892      for (;;) {
893        if (*bp == '\0') {
894          return true;
895        }
896        else if (cp == characters_end) {
897          return false;
898        }
899        else if (*cp != *bp) {
900          return false;
901        }
902        bp++;
903        cp++;
904      }
905    }
906    
907    void jscoverage_instrument_js(const char * id, const uint16_t * characters, size_t num_characters, Stream * output) {
908    file_id = id;    file_id = id;
909    
910    /* scan the javascript */    /* scan the javascript */
911    size_t input_length = input->length;    JSTokenStream * token_stream = js_NewTokenStream(context, characters, num_characters, NULL, 1, NULL);
   jschar * base = js_InflateString(context, input->data, &input_length);  
   if (base == NULL) {  
     fatal("out of memory");  
   }  
   JSTokenStream * token_stream = js_NewTokenStream(context, base, input_length, NULL, 1, NULL);  
912    if (token_stream == NULL) {    if (token_stream == NULL) {
913      fatal("cannot create token stream from file: %s", file_id);      fatal("cannot create token stream from file: %s", file_id);
914    }    }
# Line 830  Line 928 
928    An instrumented JavaScript file has 3 sections:    An instrumented JavaScript file has 3 sections:
929    1. initialization    1. initialization
930    2. instrumented source code    2. instrumented source code
931    3. original source code (TODO)    3. original source code
932    */    */
933    
934    Stream * instrumented = Stream_new(0);    Stream * instrumented = Stream_new(0);
# Line 853  Line 951 
951    
952    /* copy the instrumented source code to the output */    /* copy the instrumented source code to the output */
953    Stream_write(output, instrumented->data, instrumented->length);    Stream_write(output, instrumented->data, instrumented->length);
   Stream_write_char(output, '\n');  
954    
955    /* copy the original source to the output */    /* conditionals */
956      bool has_conditionals = false;
957      size_t line_number = 0;
958    size_t i = 0;    size_t i = 0;
959    while (i < input_length) {    while (i < num_characters) {
960      Stream_write_string(output, "// ");      line_number++;
961      size_t line_start = i;      size_t line_start = i;
962      while (i < input_length && base[i] != '\r' && base[i] != '\n') {      jschar c;
963        bool done = false;
964        while (! done && i < num_characters) {
965          c = characters[i];
966          switch (c) {
967          case '\r':
968          case '\n':
969          case 0x2028:
970          case 0x2029:
971            done = true;
972            break;
973          default:
974            i++;
975            break;
976          }
977        }
978        size_t line_end = i;
979        if (i < num_characters) {
980        i++;        i++;
981          if (c == '\r' && i < num_characters && characters[i] == '\n') {
982            i++;
983          }
984        }
985        if (characters_start_with(characters, line_start, line_end, "//#JSCOVERAGE_IF")) {
986          if (! has_conditionals) {
987            has_conditionals = true;
988            Stream_printf(output, "_$jscoverage['%s'].conditionals = [];\n", file_id);
989          }
990          Stream_write_string(output, "if (!(");
991          for (size_t j = line_start + 16; j < line_end; j++) {
992            jschar c = characters[j];
993            if (c == '\t' || (32 <= c && c <= 126)) {
994              Stream_write_char(output, c);
995            }
996            else {
997              Stream_printf(output, "\\u%04x", c);
998            }
999          }
1000          Stream_write_string(output, ")) {\n");
1001          Stream_printf(output, "  _$jscoverage['%s'].conditionals[%d] = ", file_id, line_number);
1002        }
1003        else if (characters_start_with(characters, line_start, line_end, "//#JSCOVERAGE_ENDIF")) {
1004          Stream_printf(output, "%d;\n", line_number);
1005          Stream_printf(output, "}\n");
1006      }      }
1007      }
1008    
1009      size_t line_end = i;    /* copy the original source to the output */
1010      if (i < input_length) {    Stream_printf(output, "_$jscoverage['%s'].source = ", file_id);
1011        if (base[i] == '\r') {    jscoverage_write_source(id, characters, num_characters, output);
1012          line_end = i;    Stream_printf(output, ";\n");
1013    
1014      Stream_delete(instrumented);
1015    
1016      file_id = NULL;
1017    }
1018    
1019    void jscoverage_write_source(const char * id, const jschar * characters, size_t num_characters, Stream * output) {
1020      Stream_write_string(output, "[");
1021      if (jscoverage_highlight) {
1022        Stream * highlighted_stream = Stream_new(num_characters);
1023        jscoverage_highlight_js(context, id, characters, num_characters, highlighted_stream);
1024        size_t i = 0;
1025        while (i < highlighted_stream->length) {
1026          if (i > 0) {
1027            Stream_write_char(output, ',');
1028          }
1029    
1030          Stream_write_char(output, '"');
1031          bool done = false;
1032          while (! done) {
1033            char c = highlighted_stream->data[i];
1034            switch (c) {
1035            case 0x8:
1036              /* backspace */
1037              Stream_write_string(output, "\\b");
1038              break;
1039            case 0x9:
1040              /* horizontal tab */
1041              Stream_write_string(output, "\\t");
1042              break;
1043            case 0xa:
1044              /* line feed (new line) */
1045              done = true;
1046              break;
1047            case 0xb:
1048              /* vertical tab */
1049              Stream_write_string(output, "\\v");
1050              break;
1051            case 0xc:
1052              /* form feed */
1053              Stream_write_string(output, "\\f");
1054              break;
1055            case 0xd:
1056              /* carriage return */
1057              done = true;
1058              if (i + 1 < highlighted_stream->length && highlighted_stream->data[i + 1] == '\n') {
1059                i++;
1060              }
1061              break;
1062            case '"':
1063              Stream_write_string(output, "\\\"");
1064              break;
1065            case '\\':
1066              Stream_write_string(output, "\\\\");
1067              break;
1068            default:
1069              Stream_write_char(output, c);
1070              break;
1071            }
1072          i++;          i++;
1073          if (i < input_length && base[i] == '\n') {          if (i >= highlighted_stream->length) {
1074            i++;            done = true;
1075          }          }
1076        }        }
1077        else if (base[i] == '\n') {        Stream_write_char(output, '"');
1078          line_end = i;      }
1079        Stream_delete(highlighted_stream);
1080      }
1081      else {
1082        size_t i = 0;
1083        while (i < num_characters) {
1084          if (i > 0) {
1085            Stream_write_char(output, ',');
1086          }
1087    
1088          Stream_write_char(output, '"');
1089          bool done = false;
1090          while (! done) {
1091            jschar c = characters[i];
1092            switch (c) {
1093            case 0x8:
1094              /* backspace */
1095              Stream_write_string(output, "\\b");
1096              break;
1097            case 0x9:
1098              /* horizontal tab */
1099              Stream_write_string(output, "\\t");
1100              break;
1101            case 0xa:
1102              /* line feed (new line) */
1103              done = true;
1104              break;
1105            case 0xb:
1106              /* vertical tab */
1107              Stream_write_string(output, "\\v");
1108              break;
1109            case 0xc:
1110              /* form feed */
1111              Stream_write_string(output, "\\f");
1112              break;
1113            case 0xd:
1114              /* carriage return */
1115              done = true;
1116              if (i + 1 < num_characters && characters[i + 1] == '\n') {
1117                i++;
1118              }
1119              break;
1120            case '"':
1121              Stream_write_string(output, "\\\"");
1122              break;
1123            case '\\':
1124              Stream_write_string(output, "\\\\");
1125              break;
1126            case '&':
1127              Stream_write_string(output, "&amp;");
1128              break;
1129            case '<':
1130              Stream_write_string(output, "&lt;");
1131              break;
1132            case '>':
1133              Stream_write_string(output, "&gt;");
1134              break;
1135            case 0x2028:
1136            case 0x2029:
1137              done = true;
1138              break;
1139            default:
1140              if (32 <= c && c <= 126) {
1141                Stream_write_char(output, c);
1142              }
1143              else {
1144                Stream_printf(output, "&#%d;", c);
1145              }
1146              break;
1147            }
1148          i++;          i++;
1149            if (i >= num_characters) {
1150              done = true;
1151            }
1152        }        }
1153        else {        Stream_write_char(output, '"');
1154          abort();      }
1155      }
1156      Stream_write_string(output, "]");
1157    }
1158    
1159    void jscoverage_copy_resources(const char * destination_directory) {
1160      copy_resource("jscoverage.html", destination_directory);
1161      copy_resource("jscoverage.css", destination_directory);
1162      copy_resource("jscoverage.js", destination_directory);
1163      copy_resource("jscoverage-ie.css", destination_directory);
1164      copy_resource("jscoverage-throbber.gif", destination_directory);
1165      copy_resource("jscoverage-highlight.css", destination_directory);
1166    }
1167    
1168    /*
1169    coverage reports
1170    */
1171    
1172    struct FileCoverageList {
1173      FileCoverage * file_coverage;
1174      struct FileCoverageList * next;
1175    };
1176    
1177    struct Coverage {
1178      JSHashTable * coverage_table;
1179      struct FileCoverageList * coverage_list;
1180    };
1181    
1182    static int compare_strings(const void * p1, const void * p2) {
1183      return strcmp(p1, p2) == 0;
1184    }
1185    
1186    Coverage * Coverage_new(void) {
1187      Coverage * result = xmalloc(sizeof(Coverage));
1188      result->coverage_table = JS_NewHashTable(1024, JS_HashString, compare_strings, NULL, NULL, NULL);
1189      if (result->coverage_table == NULL) {
1190        fatal("cannot create hash table");
1191      }
1192      result->coverage_list = NULL;
1193      return result;
1194    }
1195    
1196    void Coverage_delete(Coverage * coverage) {
1197      JS_HashTableDestroy(coverage->coverage_table);
1198      struct FileCoverageList * p = coverage->coverage_list;
1199      while (p != NULL) {
1200        free(p->file_coverage->coverage_lines);
1201        if (p->file_coverage->source_lines != NULL) {
1202          for (uint32 i = 0; i < p->file_coverage->num_source_lines; i++) {
1203            free(p->file_coverage->source_lines[i]);
1204        }        }
1205          free(p->file_coverage->source_lines);
1206      }      }
1207        free(p->file_coverage->id);
1208        free(p->file_coverage);
1209        struct FileCoverageList * q = p;
1210        p = p->next;
1211        free(q);
1212      }
1213      free(coverage);
1214    }
1215    
1216      char * line = js_DeflateString(context, base + line_start, line_end - line_start);  struct EnumeratorArg {
1217      Stream_write_string(output, line);    CoverageForeachFunction f;
1218      Stream_write_char(output, '\n');    void * p;
1219      JS_free(context, line);  };
1220    
1221    static intN enumerator(JSHashEntry * entry, intN i, void * arg) {
1222      struct EnumeratorArg * enumerator_arg = arg;
1223      enumerator_arg->f(entry->value, i, enumerator_arg->p);
1224      return 0;
1225    }
1226    
1227    void Coverage_foreach_file(Coverage * coverage, CoverageForeachFunction f, void * p) {
1228      struct EnumeratorArg enumerator_arg;
1229      enumerator_arg.f = f;
1230      enumerator_arg.p = p;
1231      JS_HashTableEnumerateEntries(coverage->coverage_table, enumerator, &enumerator_arg);
1232    }
1233    
1234    int jscoverage_parse_json(Coverage * coverage, const uint8_t * json, size_t length) {
1235      jschar * base = js_InflateString(context, (char *) json, &length);
1236      if (base == NULL) {
1237        fatal("out of memory");
1238    }    }
1239    
1240    Stream_delete(instrumented);    jschar * parenthesized_json = xnew(jschar, addst(length, 2));
1241      parenthesized_json[0] = '(';
1242      memcpy(parenthesized_json + 1, base, mulst(length, sizeof(jschar)));
1243      parenthesized_json[length + 1] = ')';
1244    
1245    JS_free(context, base);    JS_free(context, base);
1246    
1247    file_id = NULL;    JSTokenStream * token_stream = js_NewTokenStream(context, parenthesized_json, length + 2, NULL, 1, NULL);
1248      if (token_stream == NULL) {
1249        fatal("cannot create token stream");
1250      }
1251    
1252      JSParseNode * root = js_ParseTokenStream(context, global, token_stream);
1253      free(parenthesized_json);
1254      if (root == NULL) {
1255        return -1;
1256      }
1257    
1258      /* root node must be TOK_LC */
1259      if (root->pn_type != TOK_LC) {
1260        return -1;
1261      }
1262      JSParseNode * semi = root->pn_u.list.head;
1263    
1264      /* the list must be TOK_SEMI and it must contain only one element */
1265      if (semi->pn_type != TOK_SEMI || semi->pn_next != NULL) {
1266        return -1;
1267      }
1268      JSParseNode * parenthesized = semi->pn_kid;
1269    
1270      /* this must be a parenthesized expression */
1271      if (parenthesized->pn_type != TOK_RP) {
1272        return -1;
1273      }
1274      JSParseNode * object = parenthesized->pn_kid;
1275    
1276      /* this must be an object literal */
1277      if (object->pn_type != TOK_RC) {
1278        return -1;
1279      }
1280    
1281      for (JSParseNode * p = object->pn_head; p != NULL; p = p->pn_next) {
1282        /* every element of this list must be TOK_COLON */
1283        if (p->pn_type != TOK_COLON) {
1284          return -1;
1285        }
1286    
1287        /* the key must be a string representing the file */
1288        JSParseNode * key = p->pn_left;
1289        if (key->pn_type != TOK_STRING || ! ATOM_IS_STRING(key->pn_atom)) {
1290          return -1;
1291        }
1292        char * id_bytes = JS_GetStringBytes(ATOM_TO_STRING(key->pn_atom));
1293    
1294        /* the value must be an object literal OR an array */
1295        JSParseNode * value = p->pn_right;
1296        if (! (value->pn_type == TOK_RC || value->pn_type == TOK_RB)) {
1297          return -1;
1298        }
1299    
1300        JSParseNode * array = NULL;
1301        JSParseNode * source = NULL;
1302        if (value->pn_type == TOK_RB) {
1303          /* an array */
1304          array = value;
1305        }
1306        else if (value->pn_type == TOK_RC) {
1307          /* an object literal */
1308          if (value->pn_count != 2) {
1309            return -1;
1310          }
1311          for (JSParseNode * element = value->pn_head; element != NULL; element = element->pn_next) {
1312            if (element->pn_type != TOK_COLON) {
1313              return -1;
1314            }
1315            JSParseNode * left = element->pn_left;
1316            if (left->pn_type != TOK_STRING || ! ATOM_IS_STRING(left->pn_atom)) {
1317              return -1;
1318            }
1319            const char * s = JS_GetStringBytes(ATOM_TO_STRING(left->pn_atom));
1320            if (strcmp(s, "coverage") == 0) {
1321              array = element->pn_right;
1322              if (array->pn_type != TOK_RB) {
1323                return -1;
1324              }
1325            }
1326            else if (strcmp(s, "source") == 0) {
1327              source = element->pn_right;
1328              if (source->pn_type != TOK_RB) {
1329                return -1;
1330              }
1331            }
1332            else {
1333              return -1;
1334            }
1335          }
1336        }
1337        else {
1338          return -1;
1339        }
1340    
1341        if (array == NULL) {
1342          return -1;
1343        }
1344    
1345        /* look up the file in the coverage table */
1346        FileCoverage * file_coverage = JS_HashTableLookup(coverage->coverage_table, id_bytes);
1347        if (file_coverage == NULL) {
1348          /* not there: create a new one */
1349          char * id = xstrdup(id_bytes);
1350          file_coverage = xmalloc(sizeof(FileCoverage));
1351          file_coverage->id = id;
1352          file_coverage->num_coverage_lines = array->pn_count;
1353          file_coverage->coverage_lines = xnew(int, array->pn_count);
1354          if (source == NULL) {
1355            file_coverage->source_lines = NULL;
1356          }
1357          else {
1358            file_coverage->num_source_lines = source->pn_count;
1359            file_coverage->source_lines = xnew(char *, source->pn_count);
1360            uint32 i = 0;
1361            for (JSParseNode * element = source->pn_head; element != NULL; element = element->pn_next, i++) {
1362              if (element->pn_type != TOK_STRING) {
1363                return -1;
1364              }
1365              file_coverage->source_lines[i] = xstrdup(JS_GetStringBytes(ATOM_TO_STRING(element->pn_atom)));
1366            }
1367            assert(i == source->pn_count);
1368          }
1369    
1370          /* set coverage for all lines */
1371          uint32 i = 0;
1372          for (JSParseNode * element = array->pn_head; element != NULL; element = element->pn_next, i++) {
1373            if (element->pn_type == TOK_NUMBER) {
1374              file_coverage->coverage_lines[i] = (int) element->pn_dval;
1375            }
1376            else if (element->pn_type == TOK_PRIMARY && element->pn_op == JSOP_NULL) {
1377              file_coverage->coverage_lines[i] = -1;
1378            }
1379            else {
1380              return -1;
1381            }
1382          }
1383          assert(i == array->pn_count);
1384    
1385          /* add to the hash table */
1386          JS_HashTableAdd(coverage->coverage_table, id, file_coverage);
1387          struct FileCoverageList * coverage_list = xmalloc(sizeof(struct FileCoverageList));
1388          coverage_list->file_coverage = file_coverage;
1389          coverage_list->next = coverage->coverage_list;
1390          coverage->coverage_list = coverage_list;
1391        }
1392        else {
1393          /* sanity check */
1394          assert(strcmp(file_coverage->id, id_bytes) == 0);
1395          if (file_coverage->num_coverage_lines != array->pn_count) {
1396            return -2;
1397          }
1398    
1399          /* merge the coverage */
1400          uint32 i = 0;
1401          for (JSParseNode * element = array->pn_head; element != NULL; element = element->pn_next, i++) {
1402            if (element->pn_type == TOK_NUMBER) {
1403              if (file_coverage->coverage_lines[i] == -1) {
1404                return -2;
1405              }
1406              file_coverage->coverage_lines[i] += (int) element->pn_dval;
1407            }
1408            else if (element->pn_type == TOK_PRIMARY && element->pn_op == JSOP_NULL) {
1409              if (file_coverage->coverage_lines[i] != -1) {
1410                return -2;
1411              }
1412            }
1413            else {
1414              return -1;
1415            }
1416          }
1417          assert(i == array->pn_count);
1418    
1419          /* if this JSON file has source, use it */
1420          if (file_coverage->source_lines == NULL && source != NULL) {
1421            file_coverage->num_source_lines = source->pn_count;
1422            file_coverage->source_lines = xnew(char *, source->pn_count);
1423            uint32 i = 0;
1424            for (JSParseNode * element = source->pn_head; element != NULL; element = element->pn_next, i++) {
1425              if (element->pn_type != TOK_STRING) {
1426                return -1;
1427              }
1428              file_coverage->source_lines[i] = xstrdup(JS_GetStringBytes(ATOM_TO_STRING(element->pn_atom)));
1429            }
1430            assert(i == source->pn_count);
1431          }
1432        }
1433      }
1434    
1435      return 0;
1436  }  }

Legend:
Removed from v.95  
changed lines
  Added in v.190

  ViewVC Help
Powered by ViewVC 1.1.24