t_passive.cpp

Go to the documentation of this file.

// Implementation Details:
//
// Author: Chris Koeritz

#include "t_passive.h"

#include <basis/guards.h>
#include <basis/portable.h>
#include <opsystem/application_shell.h>
#include <loggers/console_logger.h>
#include <data_struct/static_memory_gremlin.h>
#include <wp_passive/argument_list.h>
#include <wp_passive/box.h>
#include <wp_passive/canvas.h>
#include <wp_passive/dot.h>
#include <wp_passive/label.h>
#include <wp_passive/manager.h>
#include <wp_passive/oval.h>
#include <wp_passive/ring.h>
#include <wp_passive/visible_line.h>

#include <stdio.h>

#undef LOG
#define LOG(s) program_wide_logger().log(s)

void getkey(manager &root)
{
  XFlush(root.display());
  LOG("please enter a word now.");
//  char trash[500];
  /*char c =*/ getchar();
}

template <class content>
void random_reposition(content &target, chaos &randomizer)
{
  // tests the repositioning function for the manager.
  for (int ijiji = 0; ijiji < 20000; ijiji++) {
    c_rectangle r
      (randomizer.inclusive(0, 1000),
       randomizer.inclusive(0, 1000),
       randomizer.inclusive(0, 1000),
       randomizer.inclusive(0, 1000));
    target.dimensions(r);
    XFlush(target.display());
  }
}

void four_corner_root(manager &root)
{
  // this block tests putting the root in the four corners.
  root.dimensions(c_rectangle(0, 0, 50, 50));
  getkey(root);
  root.dimensions(c_rectangle(50, 0, 100, 50));
  getkey(root);
  root.dimensions(c_rectangle(50, 50, 100, 100));
  getkey(root);
  root.dimensions(c_rectangle(0, 50, 50, 100));
  getkey(root);
  root.dimensions(default_manager_size);
}

void four_corner_canvas(canvas &testwin, manager &root)
{
  // this block tests putting the testwin in the four corners.
  testwin.dimensions(c_rectangle(0, 0, 50, 50));
  getkey(root);
  testwin.dimensions(c_rectangle(950, 0, 1000, 50));
  getkey(root);
  testwin.dimensions(c_rectangle(950, 950, 1000, 1000));
  getkey(root);
  testwin.dimensions(c_rectangle(0, 950, 50, 1000));
  getkey(root);
  testwin.dimensions(c_rectangle(100, 100, 900, 900));
}

void query_desktop(manager &root)
{
  LOG(istring("desktop reports device size as ")
    + root.device_coordinate_system().text_form()
    + " and the view is "
    + root.view_coordinate_system().text_form());
  if ( (root.device_to_view(root.device_coordinate_system())
  != root.view_coordinate_system())
      || (root.view_to_device(root.view_coordinate_system())
    != root.device_coordinate_system()) )
    deadly_error("t_passive", "desktop test:",
     "systems or transformations incorrect");
  if ( root.view_to_device(root.device_to_view(c_point(-23, -590)))
      != c_point(-23, -590))
    deadly_error("t_passive", "desktop test:",
     "point conversion is not invertible");
}

void query_manager(manager &root)
{
  LOG(istring("manager universal coordinates ") + root.universe().text_form()
    + " and its position in the view coordinates is "
    + root.dimensions().text_form());
  c_rectangle relative_device_location
    (root.view_to_device(root.dimensions())
     - root.view_to_device(root.dimensions()).vertex_1());
  if ( (root.device_to_universe(relative_device_location)
  != root.universe())
      || (root.universe_to_device(root.universe())
    != relative_device_location) )
    deadly_error("t_passive", "manager test:",
     "systems or transformations incorrect");
  if ( root.universe_to_device(root.device_to_universe(c_point(-23, -590)))
      != c_point(-23, -590))
    deadly_error("t_passive", "manager test:",
     "point conversion is not invertible");
}

void query_canvas(canvas &testwin, manager &root)
{
  LOG(istring("canvas posn in universal coordinates ")
    + testwin.dimensions().text_form()
    + " and its world is "
    + testwin.world().text_form());
  c_rectangle relative_device_location
    (root.universe_to_device(testwin.dimensions())
     - root.universe_to_device(testwin.dimensions()).vertex_1());
  if ( (testwin.device_to_world(relative_device_location)
  != testwin.world())
      || (testwin.world_to_device(testwin.world())
    != relative_device_location) )
    deadly_error("t_passive", "canvas test:",
     "systems or transformations incorrect");
  if ( root.universe_to_device(root.device_to_universe(c_point(-23, -590)))
      != c_point(-23, -590))
    deadly_error("t_passive", "canvas test:",
     "point conversion is not invertible");
}


class passive_tester : public application_shell
{
public:
  passive_tester() : application_shell(class_name()) {}
  IMPLEMENT_CLASS_NAME("t_passive");
  virtual int execute();
};


int passive_tester::execute()
{
  manager root("A Frisky Test Program for the Passive Parts");
//         default_universe, default_desktop_view, default_manager_size,
//         BLACK, WHITE, c_rectangle_warper::TOP_RIGHT, c_rectangle_warper::TOP_RIGHT);
  query_desktop(root);
  query_manager(root);

  root.install_gray_colormap(64);

  //four_corner_root(root);
    // test the positioning of the manager in each of the four corners of the
    // screen.

  const color orange = root.lookup("orange");
  const color brown = root.lookup("brown");
  const color wheat = root.lookup("wheat");
  const color gray = root.lookup("gray");
  const color blue(root.lookup("blue"));
  const color gold(root.lookup("gold"));
  const color red(root.lookup("red"));
  const color green(root.lookup("green"));
  const color magenta(root.lookup("MAGENTA"));

LOG("color scheme:");
LOG(isprintf("name is orange, values=%s", orange.text_form().s()));
LOG(isprintf("name is brown, values=%s", brown.text_form().s()));
LOG(isprintf("name is wheat, values=%s", wheat.text_form().s()));
LOG(isprintf("name is gray, values=%s", gray.text_form().s()));
LOG(isprintf("name is blue, values=%s", blue.text_form().s()));
LOG(isprintf("name is gold, values=%s", gold.text_form().s()));
LOG(isprintf("name is red, values=%s", red.text_form().s()));
LOG(isprintf("name is green, values=%s", green.text_form().s()));
LOG(isprintf("name is magenta, values=%s", magenta.text_form().s()));

  label continue_message
    (root, c_point(20, 10), "Type Ctrl-C to exit please.", orange, brown);
  continue_message.draw();

//  keyboard keys;

  label changed_message
    (root, c_point(20, 30), "If you see this, reset doesn't work.", red, blue);
  changed_message.draw();

  chaos randomizer;
  // random_reposition(root, randomizer);
    // causes the manager to jump around on the screen randomly.

  c_rectangle initdim(100, 100, 450, 900);
  canvas testwin(root, initdim, default_world, wheat, gray);
  query_canvas(testwin, root);
  testwin.draw();

  canvas test2
    (root, c_rectangle(550, 100, 900, 450), default_world, blue, wheat);
  test2.draw();
  canvas test3
    (root, c_rectangle(550, 550, 900, 900), default_world, gold, red);
  test3.draw();
  
  //four_corner_canvas(testwin, root);
    // tests the positioning of the canvas at the four different corners
    // of the manager.

  //random_reposition(testwin, randomizer);
    // causes the canvas to jump around.

/* canvas zorba("A canvas in the way", c_rectangle(80, 130, 430, 380)); */
LOG("a");

  visible_line red_line(testwin,
     c_line(testwin.world().vertex_1(), testwin.world().vertex_2()));
LOG("b");
c_line fredo(1, 2, 3, 4);
LOG("b.1");
LOG(istring("testwin world: ") + testwin.world().text_form());
LOG(isprintf("%f\n", testwin.world().vertex_2().x()));
LOG(isprintf("%f\n", testwin.world().vertex_1().y()));
LOG(isprintf("%f\n", testwin.world().vertex_1().x()));
LOG(isprintf("%f\n", testwin.world().vertex_2().y()));
c_line jello(testwin.world().vertex_2().x(), testwin.world().vertex_1().y(), testwin.world().vertex_1().x(), testwin.world().vertex_2().y());
LOG(istring("jello is ") + jello.text_form());
LOG("b.1.1");
  visible_line red_line2(testwin,
      c_line(testwin.world().vertex_2().x(), testwin.world().vertex_1().y(),
          testwin.world().vertex_1().x(), testwin.world().vertex_2().y()));
LOG("b.2");
  red_line.foreground(red); red_line2.foreground(red);
LOG("b.3");
  red_line.draw(); red_line2.draw();
LOG("b.4");

LOG("c");
c_line tedlo(test2.world().vertex_1(), test2.world().vertex_2());
printf((istring("newline ") + tedlo.text_form() + "\n").s());
LOG("d");
  visible_line blue_line(test2, c_line(test2.world().vertex_1(),
      test2.world().vertex_2()), blue);
LOG("e");
  visible_line blue_line2(test2,
     c_line(test2.world().vertex_2().x(), test2.world().vertex_1().y(),
     test2.world().vertex_1().x(), test2.world().vertex_2().y()), blue);
LOG("f");
  blue_line.draw();
LOG("g");
  blue_line2.draw();
LOG("h");

  visible_line green_line(test3, c_line(test3.world().vertex_1(),
      test3.world().vertex_2()), green);
LOG("i");
  visible_line green_line2(test3,
     c_line(test3.world().vertex_2().x(), test3.world().vertex_1().y(),
    test3.world().vertex_1().x(), test3.world().vertex_2().y()), green);
  green_line.draw();
  green_line2.draw();

  ring my_ring(testwin, geometric::circle(450, testwin.world().center()));
  my_ring.draw();
LOG("e");

//  box red_box(testwin, testwin.dimensions());
//  red_box.foreground(red);
//  red_box.draw();

  box full_box(testwin, c_rectangle(c_point(150, 200), c_point(480, 420)));
  full_box.set_filled(true);
  full_box.foreground(magenta);
  full_box.layer(2);
  full_box.draw();

  box full_box2(testwin, c_rectangle(c_point(200, 230), c_point(250, 650)));
  full_box2.set_filled(true);
  full_box2.foreground(green);
  full_box2.layer(4);
  full_box2.draw();

  box full_box3(testwin, c_rectangle(c_point(100, 180), c_point(220, 320)));
  full_box3.set_filled(true);
  full_box3.foreground(blue);
  full_box3.layer(3);
  full_box3.draw();

  testwin.update();
  testwin.draw();

  c_rectangle quart_world(testwin.world());
  c_point new_2(quart_world.vertex_2().x() / 2, quart_world.vertex_2().y() / 2);
  quart_world.vertex_2(new_2);
  oval my_oval(testwin, geometric::ellipse(quart_world.center(), quart_world.width() / 2,
      quart_world.height() / 2), gold);
  my_oval.draw();

guards::alert_message("hey, now going to draw over the oval; hit a key.");
//getchar();
box bo(my_oval.target(), my_oval.dimensions(), colors::WHITE);
bo.set_filled();
bo.draw();


  int i;
  for (i = 0; i < 360; i += 20) {
    c_point place_on_oval(my_oval.base().location(c_angle(i, c_angle::DEGREES)));
    box *little_box = new box
      (testwin,
       c_rectangle(place_on_oval - c_point(5, 5), place_on_oval + c_point(5, 5)),
       orange, true);
    little_box->set_filled(true);
    little_box->draw();
  }

  const int number_of_stars = 70;

LOG(isprintf("about to draw point using world size: %d %d",
int(testwin.world().width()), int(testwin.world().height())));
LOG(istring("world region: ") + testwin.world().text_form());

box *temp = new box(testwin, c_rectangle(0, 0, 20, 20), orange, true);
temp->draw();

  for (i = 0; i < number_of_stars; i++) {
    color randcol = color
      (randomizer.inclusive(1, MAXIMUM_COLOR_INTENSITY),
       randomizer.inclusive(1, MAXIMUM_COLOR_INTENSITY),
       randomizer.inclusive(1, MAXIMUM_COLOR_INTENSITY));
    int x = randomizer.inclusive(0, int(testwin.world().width()));
    int y = randomizer.inclusive(0, int(testwin.world().height()));
    ring *star = new ring(testwin, geometric::circle(5, c_point(x, y)), randcol);
//temp
//c_rectangle bxcoo(x - 5, y - 5, x + 5, y + 5);
//box *star = new box(testwin, bxcoo, randcol);

    star->draw();
  }

//  keys.get(WAIT);

  LOG("before name change");
//  getkey(root);

  root.name("A different name now!");

/*  bitmap fred;
  fred.set_canvas(&testwin);
  fred.read_bitmap("mountain.bit");
  fred.set_origin(c_point(0, 0));
  fred.draw();
  fred.set_origin(c_point(120, 50));
  fred.draw(); */

   /* if (!fred.write_bitmap("trash.bit"))
  abort_with_message("bitmap write failed"); */

/*  text jurgis("Some flashy text on the canvas....", c_point(0, 0), &testwin);
  jurgis.my_color.set_color(LIGHT_BLUE);
  jurgis.draw(); 

  text rudkis("And some that should be on the top line....");
  rudkis.set_canvas(&testwin);
  rudkis.my_color.set_color(RED);
  rudkis.goto_xy(0, 0);
  rudkis.draw();
  rudkis.my_color.set_color(colors(BLACK+1));
  for (i = 1; i < 30; i++) {
    rudkis.goto_xy(i, i);
    string new_content("Line %d, start %d...", i, i);
    rudkis.set_contents(new_content);
    rudkis.draw();
    rudkis.my_color.set_color(colors(rudkis.my_color.color() % 15 + 1));
  }
*/

/*  text boxer("This should be in a box...", c_point(40, 40), &testwin);
  boxer.my_color.set_color(WHITE);
  boxer.draw();
  c_rectangle dims = boxer.dimensions();
  dims.left_bottom -= c_point(2, 2);
  dims.right_top += c_point(2, 2);
  box ed_in(dims, &testwin);
  ed_in.my_color.set_color(GREEN);
  ed_in.draw();

  keys.get(WAIT); */

/*  for (i = 1; i < 30; i++) {
    rudkis.goto_xy(i, i);
    string new_content("Line %d, start %d...", i, i);
    rudkis.set_contents(new_content);
    rudkis.erase();
  }
  jurgis.erase();

  keys.get(WAIT); */

//  root.name("Almost ready to leave now!");

/*  rudkis.set_contents("And some that should be on the top line....");
  rudkis.goto_xy(0, 0);
  rudkis.erase();
  fred.erase();
  fred.set_origin(c_point(0, 0));
  fred.erase(); */

/*  testwin.clear();
//  keys.get(WAIT);
  char *trash2 = new char[5000];
  get_input_somehow(trash2);
//byte filer mayhap
 */

//  getkey(root);
// try acquiring and trashing all paintables?  


  changed_message.reset("This is the right message to see.");

  root.poll();
//  for (int events = 0; events < 60000; events++) root.poll_and_return(200);
//LOG(isprintf("t_passive now kicking it at %d events.", events);

  return 0;
}


HOOPLE_MAIN(passive_tester, )

---