/*
 * Mesa 3-D graphics library
 * Version:  6.5
 *
 * Copyright (C) 2005-2006  Brian Paul   All Rights Reserved.
 *
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included
 * in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 */

#if !defined SLANG_ASSEMBLE_H
#define SLANG_ASSEMBLE_H

#include "slang_compile.h"

#if defined __cplusplus
extern "C" {
#endif

typedef enum slang_assembly_type_
{
	/* core */
	slang_asm_none,
	slang_asm_float_copy,
	slang_asm_float_move,
	slang_asm_float_push,
	slang_asm_float_deref,
	slang_asm_float_add,
	slang_asm_float_multiply,
	slang_asm_float_divide,
	slang_asm_float_negate,
	slang_asm_float_less,
	slang_asm_float_equal_exp,
	slang_asm_float_equal_int,
	slang_asm_float_to_int,
	slang_asm_float_sine,
	slang_asm_float_arcsine,
	slang_asm_float_arctan,
	slang_asm_float_power,
	slang_asm_float_log2,
	slang_asm_float_floor,
	slang_asm_float_ceil,
	slang_asm_float_noise1,
	slang_asm_float_noise2,
	slang_asm_float_noise3,
	slang_asm_float_noise4,
	slang_asm_int_copy,
	slang_asm_int_move,
	slang_asm_int_push,
	slang_asm_int_deref,
	slang_asm_int_to_float,
	slang_asm_int_to_addr,
	slang_asm_bool_copy,
	slang_asm_bool_move,
	slang_asm_bool_push,
	slang_asm_bool_deref,
	slang_asm_addr_copy,
	slang_asm_addr_push,
	slang_asm_addr_deref,
	slang_asm_addr_add,
	slang_asm_addr_multiply,
	slang_asm_vec4_tex2d,
	slang_asm_jump,
	slang_asm_jump_if_zero,
	slang_asm_enter,
	slang_asm_leave,
	slang_asm_local_alloc,
	slang_asm_local_free,
	slang_asm_local_addr,
	slang_asm_call,
	slang_asm_return,
	slang_asm_discard,
	slang_asm_exit,
	/* mesa-specific extensions */
	slang_asm_float_print,
	slang_asm_int_print,
	slang_asm_bool_print,
	slang_asm__last
} slang_assembly_type;

typedef struct slang_assembly_
{
	slang_assembly_type type;
	GLfloat literal;
	GLuint param[2];
} slang_assembly;

typedef struct slang_assembly_file_
{
	slang_assembly *code;
	GLuint count;
	GLuint capacity;
} slang_assembly_file;

GLboolean slang_assembly_file_construct (slang_assembly_file *);
GLvoid slang_assembly_file_destruct (slang_assembly_file *);
GLboolean slang_assembly_file_push (slang_assembly_file *, slang_assembly_type);
GLboolean slang_assembly_file_push_label (slang_assembly_file *, slang_assembly_type, GLuint);
GLboolean slang_assembly_file_push_label2 (slang_assembly_file *, slang_assembly_type, GLuint, GLuint);
GLboolean slang_assembly_file_push_literal (slang_assembly_file *, slang_assembly_type, GLfloat);

typedef struct slang_assembly_file_restore_point_
{
	GLuint count;
} slang_assembly_file_restore_point;

GLboolean slang_assembly_file_restore_point_save (slang_assembly_file *,
	slang_assembly_file_restore_point *);
GLboolean slang_assembly_file_restore_point_load (slang_assembly_file *,
	slang_assembly_file_restore_point *);

typedef struct slang_assembly_flow_control_
{
	GLuint loop_start;				/* for "continue" statement */
	GLuint loop_end;				/* for "break" statement */
	GLuint function_end;			/* for "return" statement */
} slang_assembly_flow_control;

typedef struct slang_assembly_local_info_
{
	GLuint ret_size;
	GLuint addr_tmp;
	GLuint swizzle_tmp;
} slang_assembly_local_info;

typedef enum
{
	slang_ref_force,
	slang_ref_forbid/*,
	slang_ref_freelance*/
} slang_ref_type;

/*
 * Holds a complete information about vector swizzle - the <swizzle> array contains
 * vector component source indices, where 0 is "x", 1 is "y", 2 is "z" and 3 is "w".
 * Example: "xwz" --> { 3, { 0, 3, 2, not used } }.
 */
typedef struct slang_swizzle_
{
	GLuint num_components;
	GLuint swizzle[4];
} slang_swizzle;

typedef struct slang_assembly_name_space_
{
	struct slang_function_scope_ *funcs;
	struct slang_struct_scope_ *structs;
	struct slang_variable_scope_ *vars;
} slang_assembly_name_space;

typedef struct slang_assemble_ctx_
{
	slang_assembly_file *file;
	struct slang_machine_ *mach;
	slang_atom_pool *atoms;
	slang_assembly_name_space space;
	slang_assembly_flow_control flow;
	slang_assembly_local_info local;
	slang_ref_type ref;
	slang_swizzle swz;
} slang_assemble_ctx;

slang_function *_slang_locate_function (slang_function_scope *funcs, slang_atom a_name,
	slang_operation *params, GLuint num_params, slang_assembly_name_space *space,
	slang_atom_pool *);

GLboolean _slang_assemble_function (slang_assemble_ctx *, struct slang_function_ *);

GLboolean _slang_cleanup_stack (slang_assemble_ctx *, slang_operation *);

GLboolean _slang_dereference (slang_assemble_ctx *, slang_operation *);

GLboolean _slang_assemble_function_call (slang_assemble_ctx *, slang_function *, slang_operation *,
	GLuint, GLboolean);

GLboolean _slang_assemble_function_call_name (slang_assemble_ctx *, const char *, slang_operation *,
	GLuint, GLboolean);

GLboolean _slang_assemble_operation (slang_assemble_ctx *, struct slang_operation_ *, slang_ref_type);

#ifdef __cplusplus
}
#endif

#endif