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_TURN:
 224             grr_game_print (game, "\nNew round!");
 225             rr_board_set_goal_target (board, notice->u.target);
 226             gtk_widget_queue_draw (GTK_WIDGET (game->window));
 227             break;
 228         case RR_NOTICE_GAMEOVER:
 229         {
 230             char *diagram;
 231             grr_game_printf (game, "\nGame over. New game will begin now.");
 232             /* XXX: Can drop this when the BOARD NOTICE is added in the server */
 233             rr_client_show (game->client, &diagram);
 234             rr_board_parse (board, diagram);
 235             free (diagram);
 236             gtk_widget_queue_draw (GTK_WIDGET (game->window));
 237         }
 238         break;
 239         case RR_NOTICE_JOIN:
 240             grr_game_printf (game, "\nUser %s has joined the game.",
 241                              notice->u.string);
 242             break;
 243         case RR_NOTICE_WATCH:
 244             grr_game_printf (game, "\nUser %s has started watching the game.",
 245                              notice->u.string);
 246             break;
 247         case RR_NOTICE_PART:
 248             grr_game_printf (game, "\nUser %s has left the game.",
 249                              notice->u.string);
 250             break;
 251         case RR_NOTICE_BID:
 252             grr_game_printf (game, "\nUser %s bids %d.",
 253                              notice->u.bid.username,
 254                              notice->u.bid.number);
 255             break;
 256         case RR_NOTICE_REVOKE:
 257             grr_game_printf (game, "\nUser %s revokes previous bid.",
 258                              notice->u.string);
 259             break;
 260         case RR_NOTICE_ABANDON:
 261             grr_game_printf (game, "\nUser %s is willing to abandon this turn.",
 262                              notice->u.string);
 263             break;
 264         case RR_NOTICE_NOBID:
 265             grr_game_printf (game, "\nUser %s sees no point in bidding further this round",
 266                              notice->u.string);
 267             break;
 268         case RR_NOTICE_MOVE:
 269             if (game->msg_id == game->last_move_msg_id
 270                 && game->last_move_robot == notice->u.move.robot) {
 271                 game->last_move_msg_id = grr_game_printf (game, " %s",
 272                                  rr_direction_str (notice->u.move.direction));
 273             } else {
 274                 game->last_move_msg_id = grr_game_printf (game, "\nMove #%d: %s %s",
 275                                  notice->u.move.count,
 276                                  rr_robot_str (notice->u.move.robot),
 277                                  rr_direction_str (notice->u.move.direction));
 278                 game->last_move_robot = notice->u.move.robot;
 279             }
 280             break;
 281         case RR_NOTICE_UNDO:
 282             grr_game_print (game, "\nUNDO");
 283             break;
 284         case RR_NOTICE_RESET:
 285             grr_game_print (game, "\nRESET");
 286             break;
 287         case RR_NOTICE_SCORE:
 288             grr_game_printf (game, "\nScore for %s: %d.",
 289                              notice->u.bid.username,
 290                              notice->u.bid.number);
 291             break;
 292         case RR_NOTICE_ACTIVATE:
 293             grr_game_printf (game, "\nYour turn.",
 294                              notice->u.number);
 295             break;
 296         case RR_NOTICE_ACTIVE:
 297             grr_game_printf (game, "\nUser %s now active to demonstrate solution in %d moves.",
 298                                notice->u.bid.username,
 299                              notice->u.bid.number);
 300             break;
 301         case RR_NOTICE_TIMER:
 302             grr_game_printf (game, "\nTime remaining: %d seconds.",
 303                              notice->u.number);
 304             break;
 305         case RR_NOTICE_POSITION:
 306             rr_board_position_robot (board, notice->u.position.robot,
 307                                      notice->u.position.x, notice->u.position.y);
 308             gtk_widget_queue_draw (GTK_WIDGET (game->window));
 309             break;
 310         }
 311         free (notice);
 312     }
 313 }
 314
 315 static void
 316 grr_game_entry_callback (GtkWidget *widget,
 317                          grr_game_t *game)
 318 {
 319     rr_status_t status;
 320     const gchar *entry_text;
 321     char **response;
 322     int i;
 323
 324     entry_text = gtk_entry_get_text (GTK_ENTRY (game->command_entry));
 325
 326     status = rr_client_request (game->client, entry_text, &response);
 327     if (status) {
 328         grr_game_printf (game, "\nERROR: %s.", rr_status_str (status));
 329     } else {
 330         if (response[0]) {
 331             grr_game_print (game, "\n");
 332             for (i=0; response[i]; i++)
 333                 grr_game_printf (game, "%s ", response[i]);
 334         }
 335     }
 336
 337     gtk_entry_set_text (GTK_ENTRY (game->command_entry), "");
 338
 339 /* XXX: Huh? Why is this triggering valgrind?
 340     free (response);
 341 */
 342
 343 }
 344
 345 static int
 346 grr_game_printf (grr_game_t *game, const char *fmt, ...)
 347 {
 348     int msg_id;
 349
 350     va_list ap;
 351
 352     va_start (ap, fmt);
 353     msg_id = grr_game_vprintf (game, fmt, ap);
 354     va_end (ap);
 355
 356     return msg_id;
 357 }
 358
 359 static int
 360 grr_game_vprintf (grr_game_t *game, const char *fmt, va_list ap)
 361 {
 362     char *msg;
 363     int msg_id;
 364
 365     grr_sprintf_alloc_va (&msg, fmt, ap);
 366     if (msg == NULL)
 367         return 0;
 368
 369     msg_id = grr_game_print (game, msg);
 370
 371     free (msg);
 372
 373     return msg_id;
 374 }
 375
 376 static int
 377 grr_game_print (grr_game_t *game, const char *msg)
 378 {
 379     GtkTextIter iter;
 380     GtkTextMark *mark;
 381
 382     /* There might be a lighter way to do this, but this seems to
 383        work. */
 384
 385     gtk_text_buffer_get_end_iter (game->message_buffer, &iter);
 386
 387     mark = gtk_text_buffer_get_mark (game->message_buffer, "end");
 388
 389     gtk_text_buffer_move_mark (game->message_buffer, mark, &iter);
 390
 391     gtk_text_buffer_insert (game->message_buffer, &iter, msg, -1);
 392
 393     gtk_text_view_scroll_to_mark (GTK_TEXT_VIEW (game->message_view),
 394                                   mark, 0.0, TRUE, 0.0, 1.0);
 395
 396     return ++game->msg_id;
 397 }
 398
 399 static int
 400 grr_game_start_gui (grr_game_t *game)
 401 {
 402     GtkWidget *board_frame;
 403     GtkWidget *vpaned;
 404     GtkWidget *sw;
 405     GtkWidget *vbox;
 406     GtkWidget *window;
 407     GtkWidget *message_view;
 408     GtkWidget *command_entry;
 409
 410     game->window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
 411     window = game->window;
 412
 413     gtk_window_set_title (GTK_WINDOW (window), "Ricochet Robot");
 414     gtk_window_set_default_size (GTK_WINDOW (window), 512, 512);
 415
 416     g_signal_connect (G_OBJECT (window), "destroy",
 417                       G_CALLBACK (exit), NULL);
 418     gtk_container_set_border_width (GTK_CONTAINER (window), 0);
 419
 420     vbox = gtk_vbox_new (FALSE, 1);
 421     gtk_container_add (GTK_CONTAINER (window), vbox);
 422     {
 423         GtkTextIter iter;
 424         game->board_view = grr_board_view_new (game->board);
 425         grr_board_view_set_client (GRR_BOARD_VIEW (game->board_view), game->client);
 426         game->message_buffer = gtk_text_buffer_new (NULL);
 427         gtk_text_buffer_get_iter_at_offset (game->message_buffer,
 428                                             &iter, -1);
 429         gtk_text_buffer_create_mark (game->message_buffer,
 430                                      "end", &iter, FALSE);
 431         game->message_view = gtk_text_view_new_with_buffer (game->message_buffer);
 432         game->command_entry = gtk_entry_new ();
 433
 434         vpaned = gtk_vpaned_new ();
 435         gtk_container_set_border_width (GTK_CONTAINER (vpaned), 0);
 436         gtk_box_pack_start (GTK_BOX (vbox), vpaned,
 437                             TRUE, TRUE, 0);
 438         {
 439             board_frame = gtk_aspect_frame_new (NULL, 0.5, 0.5, 1.0, FALSE);
 440             gtk_paned_pack1 (GTK_PANED (vpaned), board_frame, TRUE, TRUE);
 441             {
 442                 gtk_container_add (GTK_CONTAINER (board_frame), game->board_view);
 443                 gtk_widget_show (game->board_view);
 444             }
 445             gtk_widget_show (board_frame);
 446
 447             sw = gtk_scrolled_window_new (NULL, NULL);
 448             gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw),
 449                                             GTK_POLICY_NEVER,
 450                                             GTK_POLICY_AUTOMATIC);
 451             gtk_paned_pack2 (GTK_PANED (vpaned), sw, FALSE, TRUE);
 452             {
 453                 message_view = game->message_view;
 454                 gtk_text_view_set_editable (GTK_TEXT_VIEW (message_view), FALSE);
 455                 gtk_text_view_set_cursor_visible (GTK_TEXT_VIEW (message_view), FALSE);
 456                 gtk_container_add (GTK_CONTAINER (sw), message_view);
 457                 gtk_widget_show (message_view);
 458             }
 459             gtk_widget_show (sw);
 460         }
 461         gtk_widget_show (vpaned);
 462
 463         command_entry = game->command_entry;
 464         gtk_box_pack_end (GTK_BOX (vbox), command_entry,
 465                           FALSE, FALSE, 0);
 466         gtk_widget_show (command_entry);
 467         g_signal_connect (G_OBJECT (command_entry), "activate",
 468                           G_CALLBACK (grr_game_entry_callback),
 469                           (gpointer) game);
 470     }
 471     gtk_widget_show (vbox);
 472
 473     gtk_widget_show (window);
 474
 475     gtk_main ();
 476
 477     return 0;
 478 }