lib/as3/main.c

   1 /* main.c
   2
   3    Flash ActionScript 3.0 compiler
   4
   5    Part of the swftools package.
   6
   7    Copyright (c) 2008 Matthias Kramm <kramm@quiss.org>
   8
   9    This program is free software; you can redistribute it and/or modify
  10    it under the terms of the GNU General Public License as published by
  11    the Free Software Foundation; either version 2 of the License, or
  12    (at your option) any later version.
  13
  14    This program is distributed in the hope that it will be useful,
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17    GNU General Public License for more details.
  18
  19    You should have received a copy of the GNU General Public License
  20    along with this program; if not, write to the Free Software
  21    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  22
  23 #include <stdlib.h>
  24 #include <stdio.h>
  25 #include <unistd.h>
  26 #include <memory.h>
  27 #include "../rfxswf.h"
  28 #include "../os.h"
  29 #include "files.h"
  30 #include "common.h"
  31 #include "tokenizer.h"
  32 #include "parser.tab.h"
  33 #include "parser.h"
  34 #include "compiler.h"
  35 #include "import.h"
  36
  37 void test_lexer(char*filename)
  38 {
  39     char*fullfilename = find_file(filename, 1);
  40     enter_file(filename, fullfilename, 0);
  41     FILE*fi = fopen(fullfilename, "rb");
  42     as3_file_input(fi);
  43     while(1) {
  44         int token = as3_lex();
  45         if(token==T_EOF)
  46             break;
  47         if(token>=32 && token<256) {
  48             printf("'%c'\n", token);
  49         } else {
  50             printf("%s\n", token2string(token, a3_lval));
  51         }
  52     }
  53 }
  54
  55 extern int a3_debug;
  56 int main(int argn, char*argv[])
  57 {
  58     char*filename = 0;
  59     char buf[512];
  60
  61     if(argn<=1) {
  62         fprintf(stderr, "please supply a filename\n");
  63         exit(1);
  64     }
  65     filename=argv[argn-1];
  66
  67 #ifdef BISONDEBUG
  68     a3_debug = 1; //if bison was called with -t
  69 #endif
  70
  71     as3_add_include_dir(getcwd(buf, 512));
  72
  73     registry_init();
  74
  75     int t=0;
  76     char*mainclass = 0;
  77     for(t=1;t<argn-1;t++) {
  78         if(!strcmp(argv[t], "-lex")) {
  79             test_lexer(filename);
  80             return 0;
  81         }
  82         if(!strcmp(argv[t], "-M")) {
  83             mainclass = argv[++t];
  84         }
  85         if(!strcmp(argv[t], "-v")) {
  86             as3_verbosity++;
  87         }
  88         if(!strcmp(argv[t], "-q")) {
  89             as3_verbosity--;
  90         }
  91         if(!strcmp(argv[t], "-D")) {
  92             char*c = argv[t+1];
  93             if(!strstr(c, "::"))
  94                 printf("Error: compile definition must contain \"::\"\n");
  95             as3_set_define(c);
  96         }
  97         if(!strcmp(argv[t], "-R")) {
  98             as3_set_option("recurse","1");
  99         }
 100         if(!strcmp(argv[t], "-I")) {
 101             as3_add_include_dir(argv[++t]);
 102         }
 103         if(!strcmp(argv[t], "-l")) {
 104             as3_import_file(argv[++t]);
 105         }
 106     }
 107
 108     //extern int avm2_debug;
 109     //avm2_debug = 1;
 110
 111     //memfile_t*m = memfile_open(filename);
 112     //as3_parse_bytearray(filename, m->data, m->len);
 113     //memfile_close(m);
 114     if(!strcmp(filename, ".")) {
 115         as3_parse_directory(".");
 116     } else {
 117         as3_parse_file(filename);
 118     }
 119
 120     void*code = as3_getcode();
 121
 122     SWF swf;
 123     memset(&swf, 0, sizeof(swf));
 124     swf.fileVersion = 9;
 125     swf.frameRate = 0x2500;
 126     swf.movieSize.xmin = swf.movieSize.ymin = 0;
 127     swf.movieSize.xmax = 20*20;
 128     swf.movieSize.ymax = 10*20;
 129
 130
 131     TAG*tag = swf.firstTag = swf_InsertTag(0, ST_SETBACKGROUNDCOLOR);
 132     swf_SetU8(tag, 0xff);
 133     swf_SetU8(tag, 0xff);
 134     swf_SetU8(tag, 0xff);
 135
 136     tag = as3_getassets(tag);
 137
 138     tag = swf_InsertTag(tag, ST_DOABC);
 139     if(!swf.firstTag && tag) swf.firstTag = tag;
 140     swf_WriteABC(tag, code);
 141
 142     if(!mainclass)
 143         mainclass = as3_getglobalclass();
 144
 145     if(mainclass) {
 146         tag = swf_InsertTag(tag, ST_SYMBOLCLASS);
 147         swf_SetU16(tag, 1);
 148         swf_SetU16(tag, 0);
 149         swf_SetString(tag, mainclass);
 150     } else {
 151         printf("Warning: no global public MovieClip subclass\n");
 152     }
 153
 154     tag = swf_InsertTag(tag, ST_SHOWFRAME);
 155     tag = swf_InsertTag(tag, ST_END);
 156
 157     swf_FreeABC(code);
 158
 159     int f = open("abc.swf",O_RDWR|O_CREAT|O_TRUNC|O_BINARY,0644);
 160     swf_WriteSWF(f,&swf);
 161     close(f);
 162
 163     swf_FreeTags(&swf);
 164
 165     return 0;
 166 }