t_rpc_client.cpp

Go to the documentation of this file.

/*****************************************************************************\
*                                                                             *
*  Name   : test_rpc_client                                                   *
*  Author : Chris Koeritz                                                     *
*                                                                             *
*******************************************************************************
* Copyright (c) 1995-$now By Author.  This program is free software; you can  *
* redistribute it and/or modify it under the terms of the GNU General Public  *
* License as published by the Free Software Foundation; either version 2 of   *
* the License or (at your option) any later version.  This is online at:      *
*     http://www.fsf.org/copyleft/gpl.html                                    *
* Please send any updates to: fred@gruntose.com                               *
\*****************************************************************************/

#include "shared_code.rh"
#include "t_rpc_client.h"

#include <basis/chaos.h>
#include <basis/guards.h>
#include <geometric/rectangle.cpp>
#include <mfc_ext/debugging_console_window.h>
#include <mfc_ext/debugging_frame.h>
#include <opsystem/path_configuration.h>
#include <data_struct/static_memory_gremlin.h>
#include <win_ext/event_ex.h>

HOOPLE_STARTUP_CODE;

using namespace geometric;

const int CLIENT_WIN_TIMER_ID = 298;
  // the identifier for our window's timer.


const u_int point_alert = POINT_ALERT();

BEGIN_MESSAGE_MAP(test_rpc_client, CFrameWnd)
  //{{AFX_MSG_MAP(test_rpc_client)
  ON_WM_CREATE()
  ON_WM_CLOSE()
  ON_WM_TIMER()
  //}}AFX_MSG_MAP
  ON_COMMAND(CM_FILE_OPEN_CLI, menu_open_rpc)
  ON_COMMAND(CM_FILE_CLOSE_CLI, menu_close_rpc)
  ON_COMMAND(CM_FILE_QUIT_CLI, menu_exit_program)
  ON_COMMAND(CM_START_RANDOM, menu_start_random)
  ON_COMMAND(CM_STOP_RANDOM, menu_stop_random)
  ON_REGISTERED_MESSAGE(point_alert, handle_update)
END_MESSAGE_MAP()


test_rpc_client::test_rpc_client()
: CFrameWnd(),
#ifdef DEBUG_RPC
  console(new debugging_frame()),
#endif
  my_client(NIL),
  rando(new chaos)
{}

test_rpc_client::~test_rpc_client()
{
  WHACK(rando);
  WHACK(my_client);
}

void test_rpc_client::start_timer(int interval)
{ SetTimer(CLIENT_WIN_TIMER_ID, interval, NIL); }

void test_rpc_client::stop_timer() { ::KillTimer(GetSafeHwnd(), CLIENT_WIN_TIMER_ID); }

void test_rpc_client::menu_start_random() { start_timer(40); }

void test_rpc_client::menu_stop_random() { stop_timer(); }

int test_rpc_client::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
  if (CFrameWnd::OnCreate(lpCreateStruct) == -1) return -1;

#ifdef DEBUG_RPC
  console->console().name(path_configuration::make_logfile_name
      ("t_rpccli.log"));
  if (!console->Create(NIL, "RPC Client Bug Console")) return -1;
  console->show();
#endif

  the_menu.LoadMenu(CLIENT_MENU);
  SetMenu(&the_menu);

  HICON icon = LoadIcon(AfxGetInstanceHandle(),
      MAKEINTRESOURCE(RPC_tester_icon));
  SetIcon(icon, true);  // large icon.
  SetIcon(icon, false);  // small icon.

  return 0;
}

void test_rpc_client::OnClose()
{
  menu_close_rpc();
  stop_timer();
  CFrameWnd::OnClose();
}

void test_rpc_client::OnTimer(u_int formal(timer_id))
{
  stop_timer();
  if (!my_client) return;
  if (rando->inclusive(0, 999) < 200) {
    RECT temp;
    GetClientRect(&temp);
    screen_rectangle window_size(temp.left, temp.top, temp.right, temp.bottom);
    rpc_point to_fill(rando->inclusive(0, window_size.width()),
        rando->inclusive(0, window_size.height()));
    my_client->add_point(to_fill);
  }
  menu_start_random();
}

void test_rpc_client::menu_exit_program() { PostMessage(WM_CLOSE); }

void test_rpc_client::menu_open_rpc()
{
  if (my_client) {
#ifdef DEBUG_RPC
    console->console().print("the rpc client is already open.");
#endif
    return;
  }
  window_handle recip = NIL;
#ifdef DEBUG_RPC
  recip = console->GetSafeHwnd();
#endif
  my_client = new example_rpc_client(this, recip);
}

void test_rpc_client::menu_close_rpc()
{
  stop_timer();
  if (my_client) {
    delete my_client;
    my_client = NIL;
  }
}

LRESULT test_rpc_client::handle_update(WPARAM formal(wp), LPARAM formal(lp))
{
  FUNCDEF("handle_update");
  if (!my_client)
    deadly_error(name().s(), func, "no rpc client to get points from!");
  my_client->updates_waiting();
  return 0;
}


class rpc_client_test_application : public CWinApp
{
public:
  rpc_client_test_application() : CWinApp() {}

  virtual BOOL InitInstance();
};


BOOL rpc_client_test_application::InitInstance()
{
  test_rpc_client *new_main = new test_rpc_client();
  ASSERT_VALID(new_main);
  if (new_main) {
    new_main->Create(NIL, "rpc client test");  // invoke the creator.

    // assign the main window pointer to our new window.
    m_pMainWnd = new_main;  // assign the root window to our new one.

    // make the window visible.
    m_pMainWnd->ShowWindow(m_nCmdShow);
  }
  return true;
}

rpc_client_test_application theApp;

---