include/program.h

/*
 * *****************************************************************************
 *
 * Copyright 2018 Gavin D. Howard
 *
 * Permission to use, copy, modify, and/or distribute this software for any
 * purpose with or without fee is hereby granted.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH
 * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
 * AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT,
 * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
 * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
 * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
 * PERFORMANCE OF THIS SOFTWARE.
 *
 * *****************************************************************************
 *
 * Definitions for bc programs.
 *
 */

#ifndef BC_PROGRAM_H
#define BC_PROGRAM_H

#include <stdbool.h>
#include <stdint.h>

#include <bc.h>
#include <data.h>

#define BC_PROGRAM_BUF_SIZE (1024)

typedef BcStatus (*BcMathOpFunc)(BcNum*, BcNum*, BcNum*, size_t);

typedef struct BcProgram {

  BcVec ip_stack;

  size_t scale;
  size_t ibase;
  size_t obase;

  long base_max;
  long dim_max;
  long scale_max;
  long string_max;

  BcVec expr_stack;

  BcVec stack;

  BcVec locals;

  BcVec temps;

  BcVec funcs;

  BcVecO func_map;

  BcVec vars;

  BcVecO var_map;

  BcVec arrays;

  BcVecO array_map;

  BcVec strings;

  BcVec constants;

  const char* file;

  BcNum last;

  BcNum zero;
  BcNum one;

  char* num_buf;
  size_t buf_size;

} BcProgram;

typedef BcStatus (*BcExecFunc)(BcProgram*);

BcStatus bc_program_init(BcProgram* p);
void bc_program_limits(BcProgram* p);
BcStatus bc_program_func_add(BcProgram* p, char* name, size_t* idx);
BcStatus bc_program_var_add(BcProgram* p, char *name, size_t *idx);
BcStatus bc_program_array_add(BcProgram* p, char *name, size_t *idx);
BcStatus bc_program_exec(BcProgram* p);
BcStatus bc_program_printCode(BcProgram* p);
void bc_program_free(BcProgram* program);

#endif // BC_PROGRAM_H