nasm-parser.c

支持AMD64的汇编编译器源码

/*
 * NASM-compatible parser
 *
 *  Copyright (C) 2001  Peter Johnson
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND OTHER CONTRIBUTORS ``AS IS''
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR OTHER CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */
#include <util.h>
/*@unused@*/ RCSID("$Id: nasm-parser.c 1152 2004-10-02 06:18:30Z peter $");

#define YASM_LIB_INTERNAL
#include <libyasm.h>

#include "nasm-parser.h"


static void
nasm_parser_do_parse(yasm_object *object, yasm_preproc *pp, yasm_arch *a,
		     yasm_objfmt *of, FILE *f, const char *in_filename,
		     int save_input, yasm_section *def_sect)
{
    yasm_parser_nasm parser_nasm;

    parser_nasm.object = object;
    parser_nasm.linemap = yasm_object_get_linemap(parser_nasm.object);
    parser_nasm.symtab = yasm_object_get_symtab(parser_nasm.object);

    parser_nasm.in = f;

    parser_nasm.locallabel_base = (char *)NULL;
    parser_nasm.locallabel_base_len = 0;

    parser_nasm.preproc = pp;
    parser_nasm.arch = a;
    parser_nasm.objfmt = of;

    parser_nasm.cur_section = def_sect;
    parser_nasm.prev_bc = yasm_section_bcs_first(def_sect);

    parser_nasm.save_input = save_input;
    parser_nasm.save_last = 0;

    /* initialize scanner structure */
    parser_nasm.s.bot = NULL;
    parser_nasm.s.tok = NULL;
    parser_nasm.s.ptr = NULL;
    parser_nasm.s.cur = NULL;
    parser_nasm.s.pos = NULL;
    parser_nasm.s.lim = NULL;
    parser_nasm.s.top = NULL;
    parser_nasm.s.eof = NULL;
    parser_nasm.s.tchar = 0;
    parser_nasm.s.tline = 0;
    parser_nasm.s.cline = 1;

    parser_nasm.state = INITIAL;

    /* yacc debugging, needs YYDEBUG set in bison.y.in to work */
    /* nasm_parser_debug = 1; */

    nasm_parser_parse(&parser_nasm);

    nasm_parser_cleanup(&parser_nasm);

    /* Free locallabel base if necessary */
    if (parser_nasm.locallabel_base)
	yasm_xfree(parser_nasm.locallabel_base);
}

/* Define valid preprocessors to use with this parser */
static const char *nasm_parser_preproc_keywords[] = {
    "raw",
    "nasm",
    NULL
};

/* Define parser structure -- see parser.h for details */
yasm_parser_module yasm_nasm_LTX_parser = {
    YASM_PARSER_VERSION,
    "NASM-compatible parser",
    "nasm",
    nasm_parser_preproc_keywords,
    "nasm",
    nasm_parser_do_parse
};