git.cworth.org Git - grrobot/blob - src/grrobot.c

   1 /* grrobot - Ricochet Robot using GTK+ and Xr
   2  *
   3  * Copyright © 2003 Carl Worth
   4  *
   5  * Permission to use, copy, modify, distribute, and sell this software
   6  * and its documentation for any purpose is hereby granted without
   7  * fee, provided that the above copyright notice appear in all copies
   8  * and that both that copyright notice and this permission notice
   9  * appear in supporting documentation, and that the name of Carl Worth
  10  * not be used in advertising or publicity pertaining to distribution
  11  * of the software without specific, written prior permission.
  12  * Carl Worth makes no representations about the suitability of this
  13  * software for any purpose.  It is provided "as is" without express
  14  * or implied warranty.
  15  *
  16  * CARL WORTH DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
  17  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN
  18  * NO EVENT SHALL CARL WORTH BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  19  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS
  20  * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
  21  * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  22  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  23  *
  24  * Author: Carl Worth <carl@theworths.org>
  25  */
  26
  27 #ifdef HAVE_CONFIG_H
  28 #include "config.h"
  29 #endif
  30
  31 #include <stdio.h>
  32 #include <stdlib.h>
  33 #include <string.h>
  34
  35 #include <gtk/gtk.h>
  36
  37 #include "grr_board_view.h"
  38 #include "grr_util.h"
  39 #include "args.h"
  40
  41 typedef struct grr_game {
  42     rr_client_t *client;
  43     rr_board_t *board;
  44
  45     GtkWidget *window;
  46     GtkWidget *board_view;
  47     GtkWidget *command_entry;
  48
  49     GtkTextBuffer *message_buffer;
  50     GtkWidget *message_view;
  51     int msg_id;
  52     int last_move_msg_id;
  53     rr_robot_t last_move_robot;
  54 } grr_game_t;
  55
  56 static int
  57 grr_game_printf (grr_game_t *game, const char *fmt, ...);
  58
  59 static int
  60 grr_game_vprintf (grr_game_t *game, const char *fmt, va_list ap);
  61
  62 static int
  63 grr_game_print (grr_game_t *game, const char *msg);
  64
  65 static int
  66 grr_game_start_gui (grr_game_t *game);
  67
  68 static void
  69 grr_game_read_notices (grr_game_t *game);
  70
  71 static GSource *
  72 grr_game_notices_source_new (grr_game_t *game);
  73
  74 int
  75 main (int argc, char **argv)
  76 {
  77     args_t args;
  78     rr_status_t status;
  79     grr_game_t game;
  80     GSource *source;
  81
  82     char *diagram;
  83
  84     gtk_init (&argc, &argv);
  85
  86     args_parse (&args, argc, argv);
  87
  88     game.client = rr_client_create (args.host, args.port, args.user);
  89     if (game.client == NULL) {
  90         fprintf (stderr, "Failed connecting to %s:%s as %s\n",
  91                  args.host, args.port, args.user);
  92         return 1;
  93     }
  94
  95     status = rr_client_join (game.client, args.game);
  96     if (status == RR_STATUS_NO_GAME) {
  97         status = rr_client_new (game.client, args.game);
  98     }
  99
 100     game.board = rr_board_create (16, 16);
 101     game.msg_id = 0;
 102     game.last_move_msg_id = 0;
 103     game.last_move_robot = RR_ROBOT_NONE;
 104
 105     source = grr_game_notices_source_new (&game);
 106     g_source_set_priority (source, GDK_PRIORITY_EVENTS);
 107     g_source_attach (source, NULL);
 108     g_source_unref (source);
 109
 110     rr_client_show (game.client, &diagram);
 111     rr_board_parse (game.board, diagram);
 112     free (diagram);
 113
 114     return grr_game_start_gui (&game);
 115 }
 116
 117 typedef struct _GrrNoticeSource {
 118     GSource source;
 119     grr_game_t *game;
 120 } GrrNoticeSource;
 121
 122 static gboolean
 123 grr_game_notices_prepare (GSource   *source,
 124                           gint      *timeout)
 125 {
 126     GrrNoticeSource *src = (GrrNoticeSource*)source;
 127     grr_game_t *game = src->game;
 128     gboolean retval;
 129
 130     GDK_THREADS_ENTER ();
 131     *timeout = -1;
 132     retval = rr_client_notice_pending (game->client);
 133     GDK_THREADS_LEAVE ();
 134
 135     return retval;
 136 }
 137
 138 static gboolean
 139 grr_game_notices_check (GSource     *source)
 140 {
 141     GrrNoticeSource *src = (GrrNoticeSource*)source;
 142     grr_game_t *game = src->game;
 143     gboolean retval;
 144
 145     GDK_THREADS_ENTER ();
 146     retval = rr_client_notice_pending (game->client);
 147     GDK_THREADS_LEAVE ();
 148
 149     return retval;
 150 }
 151
 152 static gboolean
 153 grr_game_notices_dispatch (GSource      *source,
 154                            GSourceFunc  callback,
 155                            gpointer     user_data)
 156 {
 157     GrrNoticeSource *src = (GrrNoticeSource*)source;
 158     grr_game_t *game = src->game;
 159
 160     grr_game_read_notices (game);
 161
 162     return TRUE;
 163 }
 164
 165 static GSourceFuncs game_notices_funcs = {
 166   grr_game_notices_prepare,
 167   grr_game_notices_check,
 168   grr_game_notices_dispatch,
 169   NULL
 170 };
 171
 172 static GSource *
 173 grr_game_notices_source_new (grr_game_t *game)
 174 {
 175     GSource *source = g_source_new (&game_notices_funcs, sizeof (GrrNoticeSource));
 176     GrrNoticeSource *src = (GrrNoticeSource*)source;
 177     src->game = game;
 178     return source;
 179 }
 180
 181 static void
 182 grr_game_read_notices (grr_game_t *game)
 183 {
 184     rr_board_t *board = game->board;
 185     rr_status_t status;
 186     rr_notice_t *notice;
 187
 188     while (rr_client_notice_pending (game->client)) {
 189         status = rr_client_next_notice (game->client, &notice);
 190         if (status) {
 191             fprintf (stderr, "Error during rr_client_next_notice: %s\n",
 192                      rr_status_str (status));
 193             gtk_exit (1);
 194             return;
 195         }
 196
 197         switch (notice->type) {
 198         case RR_NOTICE_USER:
 199             grr_game_printf (game,
 200                              "\nGLOBAL: %s has connected.", notice->u.string);
 201             break;
 202         case RR_NOTICE_QUIT:
 203             grr_game_printf (game,
 204                              "\nGLOBAL: %s has disconnected.", notice->u.string);
 205             break;
 206         case RR_NOTICE_GAME:
 207             grr_game_printf (game,
 208                              "\nGLOBAL: New game available: %s.", notice->u.string);
 209             break;
 210         case RR_NOTICE_DISPOSE:
 211             grr_game_printf (game,
 212                              "\nGLOBAL: Game %s has been disposed.", notice->u.string);
 213             break;
 214         case RR_NOTICE_MESSAGE:
 215             grr_game_printf (game, "\n%s> %s",
 216                              notice->u.message.username,
 217                              notice->u.message.text);
 218             break;
 219         case RR_NOTICE_GAMESTATE:
 220             grr_game_printf (game, "\nGame state changed to: %s.",
 221                              rr_gamestate_str (notice->u.gamestate));
 222             break;
 223         case RR_NOTICE_JOIN:
 224             grr_game_printf (game, "\nUser %s has joined the game.",
 225                              notice->u.string);
 226             break;
 227         case RR_NOTICE_WATCH:
 228             grr_game_printf (game, "\nUser %s has started watching the game.",
 229                              notice->u.string);
 230             break;
 231         case RR_NOTICE_PART:
 232             grr_game_printf (game, "\nUser %s has left the game.",
 233                              notice->u.string);
 234             break;
 235         case RR_NOTICE_BID:
 236             grr_game_printf (game, "\nUser %s bids %d.",
 237                              notice->u.bid.username,
 238                              notice->u.bid.number);
 239             break;
 240         case RR_NOTICE_REVOKE:
 241             grr_game_printf (game, "\nUser %s revokes previous bid.",
 242                              notice->u.string);
 243             break;
 244         case RR_NOTICE_ABANDON:
 245             grr_game_printf (game, "\nUser %s is willing to abandon this turn.",
 246                              notice->u.string);
 247             break;
 248         case RR_NOTICE_NOBID:
 249             grr_game_printf (game, "\nUser %s sees no point in bidding further this round",
 250                              notice->u.string);
 251             break;
 252         case RR_NOTICE_MOVE:
 253             if (game->msg_id == game->last_move_msg_id
 254                 && game->last_move_robot == notice->u.move.robot) {
 255                 game->last_move_msg_id = grr_game_printf (game, " %s",
 256                                  rr_direction_str (notice->u.move.direction));
 257             } else {
 258                 game->last_move_msg_id = grr_game_printf (game, "\nMove #%d: %s %s",
 259                                  notice->u.move.count,
 260                                  rr_robot_str (notice->u.move.robot),
 261                                  rr_direction_str (notice->u.move.direction));
 262                 game->last_move_robot = notice->u.move.robot;
 263             }
 264             break;
 265         case RR_NOTICE_UNDO:
 266             grr_game_print (game, "\nUNDO");
 267             break;
 268         case RR_NOTICE_RESET:
 269             grr_game_print (game, "\nRESET");
 270             break;
 271         case RR_NOTICE_SCORE:
 272             grr_game_printf (game, "\nScore for %s: %d.",
 273                              notice->u.bid.username,
 274                              notice->u.bid.number);
 275             break;
 276         case RR_NOTICE_ACTIVATE:
 277             grr_game_printf (game, "\nYour turn.",
 278                              notice->u.number);
 279             break;
 280         case RR_NOTICE_ACTIVE:
 281             grr_game_printf (game, "\nUser %s now active to demonstrate solution in %d moves.",
 282                                notice->u.bid.username,
 283                              notice->u.bid.number);
 284             break;
 285         case RR_NOTICE_TIMER:
 286             grr_game_printf (game, "\nTime remaining: %d seconds.",
 287                              notice->u.number);
 288             break;
 289         case RR_NOTICE_POSITION:
 290             rr_board_position (board, notice->u.position.robot,
 291                                notice->u.position.x, notice->u.position.y);
 292             gtk_widget_queue_draw (GTK_WIDGET (game->window));
 293             break;
 294         case RR_NOTICE_TURN:
 295             grr_game_print (game, "\nNew round!");
 296             rr_board_set_goal_target (board, notice->u.target);
 297             gtk_widget_queue_draw (GTK_WIDGET (game->window));
 298             break;
 299         }
 300         free (notice);
 301     }
 302 }
 303
 304 static void
 305 grr_game_entry_callback (GtkWidget *widget,
 306                          grr_game_t *game)
 307 {
 308     rr_status_t status;
 309     const gchar *entry_text;
 310     char **response;
 311     int i;
 312
 313     entry_text = gtk_entry_get_text (GTK_ENTRY (game->command_entry));
 314
 315     status = rr_client_request (game->client, entry_text, &response);
 316     if (status) {
 317         grr_game_printf (game, "\nERROR: %s.", rr_status_str (status));
 318     } else {
 319         if (response[0]) {
 320             grr_game_print (game, "\n");
 321             for (i=0; response[i]; i++)
 322                 grr_game_printf (game, "%s ", response[i]);
 323         }
 324     }
 325
 326     gtk_entry_set_text (GTK_ENTRY (game->command_entry), "");
 327
 328 /* XXX: Huh? Why is this triggering valgrind?
 329     free (response);
 330 */
 331
 332 }
 333
 334 static int
 335 grr_game_printf (grr_game_t *game, const char *fmt, ...)
 336 {
 337     int msg_id;
 338
 339     va_list ap;
 340
 341     va_start (ap, fmt);
 342     msg_id = grr_game_vprintf (game, fmt, ap);
 343     va_end (ap);
 344
 345     return msg_id;
 346 }
 347
 348 static int
 349 grr_game_vprintf (grr_game_t *game, const char *fmt, va_list ap)
 350 {
 351     char *msg;
 352     int msg_id;
 353
 354     grr_sprintf_alloc_va (&msg, fmt, ap);
 355     if (msg == NULL)
 356         return 0;
 357
 358     msg_id = grr_game_print (game, msg);
 359
 360     free (msg);
 361
 362     return msg_id;
 363 }
 364
 365 static int
 366 grr_game_print (grr_game_t *game, const char *msg)
 367 {
 368     GtkTextIter iter;
 369     GtkTextMark *mark;
 370
 371     /* There might be a lighter way to do this, but this seems to
 372        work. */
 373
 374     gtk_text_buffer_get_end_iter (game->message_buffer, &iter);
 375
 376     mark = gtk_text_buffer_get_mark (game->message_buffer, "end");
 377
 378     gtk_text_buffer_move_mark (game->message_buffer, mark, &iter);
 379
 380     gtk_text_buffer_insert (game->message_buffer, &iter, msg, -1);
 381
 382     gtk_text_view_scroll_to_mark (GTK_TEXT_VIEW (game->message_view),
 383                                   mark, 0.0, TRUE, 0.0, 1.0);
 384
 385     return ++game->msg_id;
 386 }
 387
 388 static int
 389 grr_game_start_gui (grr_game_t *game)
 390 {
 391     GtkWidget *board_frame;
 392     GtkWidget *vpaned;
 393     GtkWidget *sw;
 394     GtkWidget *vbox;
 395     GtkWidget *window;
 396     GtkWidget *message_view;
 397     GtkWidget *command_entry;
 398
 399     game->window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
 400     window = game->window;
 401
 402     gtk_window_set_title (GTK_WINDOW (window), "Ricochet Robot");
 403     gtk_window_set_default_size (GTK_WINDOW (window), 512, 512);
 404
 405     g_signal_connect (G_OBJECT (window), "destroy",
 406                       G_CALLBACK (exit), NULL);
 407     gtk_container_set_border_width (GTK_CONTAINER (window), 0);
 408
 409     vbox = gtk_vbox_new (FALSE, 1);
 410     gtk_container_add (GTK_CONTAINER (window), vbox);
 411     {
 412         GtkTextIter iter;
 413         game->board_view = grr_board_view_new (game->board);
 414         grr_board_view_set_client (GRR_BOARD_VIEW (game->board_view), game->client);
 415         game->message_buffer = gtk_text_buffer_new (NULL);
 416         gtk_text_buffer_get_iter_at_offset (game->message_buffer,
 417                                             &iter, -1);
 418         gtk_text_buffer_create_mark (game->message_buffer,
 419                                      "end", &iter, FALSE);
 420         game->message_view = gtk_text_view_new_with_buffer (game->message_buffer);
 421         game->command_entry = gtk_entry_new ();
 422
 423         vpaned = gtk_vpaned_new ();
 424         gtk_container_set_border_width (GTK_CONTAINER (vpaned), 0);
 425         gtk_box_pack_start (GTK_BOX (vbox), vpaned,
 426                             TRUE, TRUE, 0);
 427         {
 428             board_frame = gtk_aspect_frame_new (NULL, 0.5, 0.5, 1.0, FALSE);
 429             gtk_paned_pack1 (GTK_PANED (vpaned), board_frame, TRUE, TRUE);
 430             {
 431                 gtk_container_add (GTK_CONTAINER (board_frame), game->board_view);
 432                 gtk_widget_show (game->board_view);
 433             }
 434             gtk_widget_show (board_frame);
 435
 436             sw = gtk_scrolled_window_new (NULL, NULL);
 437             gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw),
 438                                             GTK_POLICY_NEVER,
 439                                             GTK_POLICY_AUTOMATIC);
 440             gtk_paned_pack2 (GTK_PANED (vpaned), sw, FALSE, TRUE);
 441             {
 442                 message_view = game->message_view;
 443                 gtk_text_view_set_editable (GTK_TEXT_VIEW (message_view), FALSE);
 444                 gtk_text_view_set_cursor_visible (GTK_TEXT_VIEW (message_view), FALSE);
 445                 gtk_container_add (GTK_CONTAINER (sw), message_view);
 446                 gtk_widget_show (message_view);
 447             }
 448             gtk_widget_show (sw);
 449         }
 450         gtk_widget_show (vpaned);
 451
 452         command_entry = game->command_entry;
 453         gtk_box_pack_end (GTK_BOX (vbox), command_entry,
 454                           FALSE, FALSE, 0);
 455         gtk_widget_show (command_entry);
 456         g_signal_connect (G_OBJECT (command_entry), "activate",
 457                           G_CALLBACK (grr_game_entry_callback),
 458                           (gpointer) game);
 459     }
 460     gtk_widget_show (vbox);
 461
 462     gtk_widget_show (window);
 463
 464     gtk_main ();
 465
 466     return 0;
 467 }