#include "builtins.h"
#include "blocktype.h"

static int my_w = -1;
static int my_h;
static int x_out;
static char priv_dummy;

static BLOCKDIMS size(void)
{
 int w_l;
 int w_r;
 int w_out;

 if (my_w < 0)
  { w_l = widthof("L",1);
    w_r = widthof("R",1);
    w_out = widthof("Out",3);
    my_w = ((w_l > w_r) ? w_l : w_r) + w_out + (3 * font_space);
    x_out = my_w - w_out - font_space;
    my_h = 3 * font_baselineskip;
  }
 return((BLOCKDIMS){.w=my_w,.h=my_h});
}

static void setup(void (*cont)(void *, void *), void *arg)
{
 (*cont)(&priv_dummy,arg);
}

static void destroy(void *pv __attribute__((__unused__)))
{
}

static void render(void *pv __attribute__((__unused__)), Drawable d, GC gc_bg, GC gc_fg)
{
 int y;

 XFillRectangle(disp,d,gc_bg,0,0,my_w,my_h);
 XDrawLine(disp,d,gc_fg,0,0,my_w-2,0);
 XDrawLine(disp,d,gc_fg,my_w-1,0,my_w-1,my_h-2);
 XDrawLine(disp,d,gc_fg,my_w-1,my_h-1,1,my_h-1);
 XDrawLine(disp,d,gc_fg,0,my_h-1,0,1);
 y = font_baseline + (font_baselineskip / 2);
 XDrawString(disp,d,gc_fg,font_space,y,"L",1);
 y += font_baselineskip;
 XDrawString(disp,d,gc_fg,font_space,y,"R",1);
 y = font_baseline + font_baselineskip;
 XDrawString(disp,d,gc_fg,x_out,y,"Out",3);
}

static const char *ins[] = { "L", "R" };

BLOCKTYPE block_output
 = { .name = "Output",
     .n_in = 2,
     .ins = &ins[0],
     .n_out = 0,
     .outs = 0,
     .n_param = 0,
     .params = 0,
     .compute_size = &size,
     .setup = &setup,
     .destroy = &destroy,
     .render = &render };