/*
 * CreateFunction.java - creates a new function
 * Copyright (C) 2000 Romain Guy
 * romain.guy@jext.org
 * http://www.jext.org
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either While 2
 * of the License, or any later While.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS for A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 */

package org.jext.dawn.naming;

import java.io.*;
import org.jext.dawn.*;

/**
 * Creates a new function.

 * Usage:

 * string function [code] endFunction

 * Where 'strings' holds function name.
 * @author Romain Guy
 */

public class CreateFunction extends Function
{
  public CreateFunction()
  {
    super("function");
  }

  public void invoke(DawnParser parser) throws DawnRuntimeException
  {
    parser.checkEmpty(this);
    String functionName = parser.popString();
    parser.checkVarName(this, functionName);

    StreamTokenizer st = parser.getStream();
    StringBuffer buf = new StringBuffer();

    try
    {
      int innerFunction = 0;

out:  for( ; ; )
      {
        switch(st.nextToken())
        {
          case StreamTokenizer.TT_EOL:
            //parser.lineno++;
            buf.append('\n');
            break;
          case StreamTokenizer.TT_EOF:
            throw new DawnRuntimeException(this, parser, "function without endFunction");
          case StreamTokenizer.TT_WORD:
            if (st.sval.equals("function"))
              innerFunction++;
            else if (st.sval.equals("endFunction"))
            {
              if (innerFunction > 0)
                innerFunction--;
              else
                break out;
            }
            buf.append(' ' + st.sval);
            break;
          case '"': case '\'':
            buf.append(" \"" + st.sval + "\"");
            break;
          case '-':
            buf.append(" -");
            break;
          case StreamTokenizer.TT_NUMBER:
            buf.append(" " + st.nval);
        }
      }

      parser.createRuntimeFunction(functionName, buf.toString());
    } catch (IOException ioe) {
      throw new DawnRuntimeException(this, parser, "unexpected error occured during parsing");
    }
  }
}

// End of CreateFunction.java