org/jpc/luaextensions/TextOutFile.java

   1 /*
   2     JPC-RR: A x86 PC Hardware Emulator
   3     Release 1
   4
   5     Copyright (C) 2007-2009 Isis Innovation Limited
   6     Copyright (C) 2009 H. Ilari Liusvaara
   7
   8     This program is free software; you can redistribute it and/or modify
   9     it under the terms of the GNU General Public License version 2 as published by
  10     the Free Software Foundation.
  11
  12     This program is distributed in the hope that it will be useful,
  13     but WITHOUT ANY WARRANTY; without even the implied warranty of
  14     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15     GNU General Public License for more details.
  16
  17     You should have received a copy of the GNU General Public License along
  18     with this program; if not, write to the Free Software Foundation, Inc.,
  19     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  20
  21     Based on JPC x86 PC Hardware emulator,
  22     A project from the Physics Dept, The University of Oxford
  23
  24     Details about original JPC can be found at:
  25
  26     www-jpc.physics.ox.ac.uk
  27
  28 */
  29
  30 package org.jpc.luaextensions;
  31
  32 import mnj.lua.*;
  33
  34 import java.io.*;
  35
  36 import org.jpc.plugins.LuaPlugin;
  37 import org.jpc.jrsr.*;
  38
  39 //Locking this class is used for preventing termination and when terminating.
  40 public class TextOutFile extends LuaPlugin.LuaResource
  41 {
  42     UTFOutputLineStream object;
  43
  44     public TextOutFile(LuaPlugin plugin, OutputStream os) throws IOException
  45     {
  46         super(plugin);
  47         object = new UTFOutputLineStream(os);
  48     }
  49
  50     public void destroy() throws IOException
  51     {
  52         object.close();
  53         object = null;
  54     }
  55
  56     public int luaCB_write(Lua l, LuaPlugin plugin)
  57     {
  58         l.pushNil();
  59         try {
  60             object.writeLine(l.checkString(2));
  61             l.pushBoolean(true);
  62         } catch(IOException e) {
  63             l.pushBoolean(false);
  64             l.pushString("IOException: " + e.getMessage());
  65             return 2;
  66         }
  67         return 1;
  68     }
  69
  70     public int luaCB_write_component(Lua l, LuaPlugin plugin)
  71     {
  72         l.pushNil();
  73         try {
  74             int c = Lua.objLen(l.value(2));
  75             if(c <= 0) {
  76                 l.pushBoolean(false);
  77                 l.pushString("Required at least one component to write.");
  78                 return 2;
  79             }
  80             Object tab = l.value(2);
  81             String[] x = new String[c];
  82             for(int i = 0; i < c; i++) {
  83                 Object obj = l.getTable(tab, new Double(i + 1));
  84                 if(obj instanceof String)
  85                    x[i] = (String)obj;
  86                 else
  87                    l.error("Can't write non-string component");
  88             }
  89             object.encodeLine((Object[])x);
  90             l.pushBoolean(true);
  91         } catch(IOException e) {
  92             l.pushBoolean(false);
  93             l.pushString("IOException: " + e.getMessage());
  94             return 2;
  95        }
  96        return 1;
  97     }
  98
  99     public int luaCB_close(Lua l, LuaPlugin plugin)
 100     {
 101         try {
 102             plugin.destroyLuaObject(l);
 103             l.pushBoolean(true);
 104         } catch(IOException e) {
 105             l.pushBoolean(false);
 106             l.pushString("IOException: " + e.getMessage());
 107             return 2;
 108         }
 109         return 1;
 110     }
 111 }