#include "ddconfig.h"
+#include <ctype.h>
+#include "i_string.h"
+
// sim
#include "simcl.h"
+#include "optioncl.h"
// local
-#include "cmdsetcl.h"
+#include "setcl.h"
+#include "cmdutil.h"
+
+
+/*
+ * Command: set memory
+ *----------------------------------------------------------------------------
+ */
+
+//int
+//cl_set_mem_cmd::do_work(class cl_sim *sim,
+// class cl_cmdline *cmdline, class cl_console *con)
+COMMAND_DO_WORK_UC(cl_set_mem_cmd)
+{
+ class cl_mem *mem= 0;
+ class cl_cmd_arg *params[4]= { cmdline->param(0),
+ cmdline->param(1),
+ cmdline->param(2),
+ cmdline->param(3) };
+
+ if (cmdline->syntax_match(uc, MEMORY ADDRESS DATALIST)) {
+ mem= params[0]->value.memory;
+ t_addr start= params[1]->value.address;
+ t_mem *array= params[2]->value.data_list.array;
+ int len= params[2]->value.data_list.len;
+
+ if (len == 0)
+ con->dd_printf("Error: no data\n");
+ else
+ {
+ int i;
+ t_addr addr;
+ for (i= 0, addr= start;
+ i < len && addr <= mem->size;
+ i++, addr++)
+ mem->set(addr, array[i]);
+ uc->check_errors();
+ mem->dump(start, start+len-1, 8, con);
+ }
+ }
+ else
+ con->dd_printf("%s\n", short_help?short_help:"Error: wrong syntax\n");
+
+ return(DD_FALSE);;
+}
/*
- * SET TIMER
+ * Command: set bit
+ *----------------------------------------------------------------------------
*/
-int
-cl_set_cmd::timer(class cl_cmdline *cmdline, class cl_console *con)
+//int
+//cl_set_bit_cmd::do_work(class cl_sim *sim,
+// class cl_cmdline *cmdline, class cl_console *con)
+COMMAND_DO_WORK_UC(cl_set_bit_cmd)
{
+ class cl_mem *mem;
+ t_addr mem_addr= 0;
+ t_mem bit_mask= 0;
class cl_cmd_arg *params[4]= { cmdline->param(0),
cmdline->param(1),
cmdline->param(2),
cmdline->param(3) };
- int what, dir;
- class cl_ticker *ticker;
- if (params[1] == 0)
+ if (cmdline->syntax_match(uc, BIT NUMBER)) {
+ mem= params[0]->value.bit.mem;
+ mem_addr= params[0]->value.bit.mem_address;
+ bit_mask= params[0]->value.bit.mask;
+ if (params[1]->value.number)
+ mem->set_bit1(mem_addr, bit_mask);
+ else
+ mem->set_bit0(mem_addr, bit_mask);
+ mem->dump(mem_addr, mem_addr, 1, con);
+ }
+ else
+ con->dd_printf("%s\n", short_help?short_help:"Error: wrong syntax\n");
+
+ return(DD_FALSE);;
+}
+
+
+/*
+ * Command: set hw
+ *----------------------------------------------------------------------------
+ */
+
+COMMAND_DO_WORK_UC(cl_set_hw_cmd)
+{
+ class cl_hw *hw= 0;
+ class cl_cmd_arg *params[1]= { cmdline->param(0)/*,
+ cmdline->param(1),
+ cmdline->param(2),
+ cmdline->param(3)*/ };
+
+ if (/*cmdline->syntax_match(uc, HW)*/params[0]->as_hw(uc)) {
+ hw= params[0]->value.hw;
+ //pn= hw->id;
+ //l= params[1]->value.number;
+ }
+ /*else if (cmdline->syntax_match(uc, NUMBER NUMBER)) {
+ pn= params[0]->value.number;
+ l= params[1]->value.number;
+ hw= uc->get_hw(HW_PORT, pn, 0);
+ }*/
+ else
+ con->dd_printf("%s\n", short_help?short_help:"Error: wrong syntax\n");
+ /*if (pn < 0 ||
+ pn > 3)
+ con->dd_printf("Error: wrong port\n");
+ else*/
{
- con->printf("Timer number is missing\n");
- return(0);
+ if (hw)
+ {
+ cmdline->shift();
+ hw->set_cmd(cmdline, con);
+ }
+ else
+ con->dd_printf("Error: no hw\n");
}
- what= (params[1])->get_ivalue();
- if ((ticker= sim->uc->get_counter(what)) != 0)
+ return(DD_FALSE);;
+}
+
+
+/*
+ * Command: set option
+ *----------------------------------------------------------------------------
+ */
+
+//int
+//cl_set_option_cmd::do_work(class cl_sim *sim,
+// class cl_cmdline *cmdline, class cl_console *con)
+COMMAND_DO_WORK_APP(cl_set_option_cmd)
+{
+ char *id= 0, *s= 0;
+ int idx;
+ class cl_cmd_arg *params[4]= { cmdline->param(0),
+ cmdline->param(1),
+ cmdline->param(2),
+ cmdline->param(3) };
+ class cl_option *option= 0;
+
+ if (cmdline->syntax_match(0, STRING STRING STRING)) {
+ id= params[0]->value.string.string;
+ char *cr= params[1]->value.string.string;
+ s= params[2]->value.string.string;
+ int n= app->options->nuof_options(id, cr);
+ if (n > 1)
+ {
+ con->dd_printf("Ambiguous option name, use number instead\n");
+ return(DD_FALSE);
+ }
+ else if (n == 0)
+ ;//con->dd_printf("Named option does not exist\n");
+ else
+ {
+ if ((option= app->options->get_option(id, cr)) == 0)
+ option= app->options->get_option(cr, id);
+ }
+ }
+ else if (cmdline->syntax_match(0/*app->get_uc()*/, NUMBER STRING)) {
+ idx= params[0]->value.number;
+ s= params[1]->value.string.string;
+ option= app->options->get_option(idx);
+ }
+ else if (cmdline->syntax_match(0/*app->get_uc()*/, STRING STRING)) {
+ id= params[0]->value.string.string;
+ s= params[1]->value.string.string;
+ int n= app->options->nuof_options(id);
+ if (n > 1)
+ {
+ con->dd_printf("Ambiguous option name, use number instead\n");
+ return(DD_FALSE);
+ }
+ else if (n == 0)
+ ;//con->dd_printf("Named option does not exist\n");
+ else
+ option= app->options->get_option(id);
+ }
+ else
+ con->dd_printf("%s\n", short_help?short_help:"Error: wrong syntax\n");
+ if (!option)
{
- con->printf("Timer %d already exists\n", what);
- return(0);
+ con->dd_printf("Option does not exist\n");
+ return(DD_FALSE);
}
- if (params[2] != 0)
- dir= (params[2])->get_ivalue();
- else
- dir= 1;
- ticker= new cl_ticker(dir, 0, 0);
- sim->uc->add_counter(ticker, what);
- return(0);
+ option->set_value(s);
+
+ return(DD_FALSE);;
}