src/motif.c

   1 /*
   2  * X11 GUI for slide puzzle game
   3  * Copyright © 2022-2023 Nick Bowler
   4  *
   5  * This program is free software: you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation, either version 3 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program.  If not, see <https://www.gnu.org/licenses/>.
  17  */
  18
  19 #include <config.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <locale.h>
  23 #include <getopt.h>
  24
  25 #include <Xm/XmAll.h>
  26
  27 #include "help.h"
  28 #include "motif.h"
  29 #include "ewmhicon.h"
  30 #include "motifopt.h"
  31 #include "game.h"
  32 #include "version.h"
  33
  34 #define TIMER_UPDATE_MS 33
  35
  36 #define SPLIT_NUMERATOR    75
  37 #define SPLIT_DENOMINATOR 100
  38
  39 #define MIN(a, b) ((a) < (b) ? (a) : (b))
  40
  41 #define PROGNAME "rrace"
  42 static const char *progname = PROGNAME;
  43 static const struct option lopts[] = { LOPTS_INITIALIZER, {0} };
  44
  45 static char * const default_resources[] = {
  46         "*title: RRace",
  47         "*game.height: 371", // 365 + 2*shadowThickness
  48         "*game.width: 498",
  49
  50         "*game.XmFrame.shadowThickness: 3",
  51         "*game.XmFrame.shadowType: shadow_in",
  52         "*goalArea.leftOffset: 1",
  53
  54         "*gameNew.accelerator: Ctrl<Key>N",
  55         "*gameNew.acceleratorText: Ctrl+N",
  56         "*gameExit.accelerator: Ctrl<Key>Q",
  57         "*gameExit.acceleratorText: Ctrl+Q",
  58
  59         "*aboutDialog*pixmapTextPadding: 10",
  60
  61         NULL
  62 };
  63
  64 static void print_version(void)
  65 {
  66         version_print_head("rrace-motif", stdout);
  67         puts("License GPLv3+: GNU GPL version 3 or any later version");
  68         puts("This is free software: you are free to change and redistribute it.");
  69         puts("There is NO WARRANTY, to the extent permitted by law.");
  70 }
  71
  72 static void print_usage(FILE *f)
  73 {
  74         fprintf(f, "Usage: %s [options]\n", progname);
  75         if (f != stdout)
  76                 fprintf(f, "Try %s --help for more information.\n", progname);
  77 }
  78
  79 static void print_help(void)
  80 {
  81         struct lopt_help help = {0};
  82         const struct option *opt;
  83
  84         print_usage(stdout);
  85
  86         putchar('\n');
  87         puts("Options:");
  88         for (opt = lopts; opt->name; opt++) {
  89                 if (!lopt_get_help(opt, &help))
  90                         continue;
  91                 help_print_option(opt, help.arg, help.desc, 20);
  92         }
  93         putchar('\n');
  94
  95         printf("Report bugs to <%s>.\n", PACKAGE_BUGREPORT);
  96 }
  97
  98 static Widget early_setup(XtAppContext *app, int argc, char **argv)
  99 {
 100         Widget shell;
 101         int opt;
 102
 103         /* Check for --help/--version early (before X connection) */
 104         opterr = 0;
 105         while ((opt = getopt_long_only(argc, argv, "", lopts, NULL)) != -1) {
 106                 switch (opt) {
 107                 case LOPT_VERSION:
 108                         print_version();
 109                         exit(EXIT_SUCCESS);
 110                 case LOPT_HELP:
 111                         print_help();
 112                         exit(EXIT_SUCCESS);
 113                 }
 114         }
 115
 116         shell = XtOpenApplication(app, PACKAGE_TARNAME, NULL, 0,
 117                                   &argc, argv, (String *)default_resources,
 118                                   sessionShellWidgetClass, NULL, 0);
 119
 120         opterr = optind = 1;
 121         while ((opt = getopt_long_only(argc, argv, "", lopts, NULL)) != -1) {
 122                 switch (opt) {
 123                 default:
 124                         print_usage(stderr);
 125                         exit(EXIT_FAILURE);
 126                 }
 127         }
 128
 129         if (argv[optind]) {
 130                 fprintf(stderr, "%s: excess command-line arguments.\n",
 131                                 progname);
 132                 print_usage(stderr);
 133                 exit(EXIT_FAILURE);
 134         }
 135
 136         return shell;
 137 }
 138
 139 static void timer_tick(void *data, XtIntervalId *id)
 140 {
 141         struct app_state *state = data;
 142         XtAppContext app;
 143
 144         if (state->board.x > 4) {
 145                 /* Game is over */
 146                 state->flags &= ~FLAG_TIMER_RUNNING;
 147                 return;
 148         }
 149
 150         ui_timer_update(state, game_elapsed(&state->board));
 151         app = XtWidgetToApplicationContext(state->game);
 152         XtAppAddTimeOut(app, TIMER_UPDATE_MS, timer_tick, state);
 153 }
 154
 155 static void do_input_move(struct app_state *state, int x, int y)
 156 {
 157         uint_fast32_t mask;
 158
 159         if ((mask = game_do_move(&state->board, x, y)) != 0) {
 160                 if (game_check_goal(&state->board) == 0) {
 161                         ui_timer_update(state, game_finish(&state->board));
 162                         mask |= ~GOAL_MASK;
 163                 }
 164
 165                 x11_redraw_game(state, mask);
 166         }
 167 }
 168
 169 static void set_view_goal(struct app_state *state, int view_goal)
 170 {
 171         state->flags &= ~FLAG_VIEW_GOAL_ON_GAME;
 172         state->flags |= view_goal ? FLAG_VIEW_GOAL_ON_GAME : 0;
 173
 174         x11_redraw_game(state, game_check_goal(&state->board));
 175 }
 176
 177 static void game_input(Widget w, void *data, void *cb_data)
 178 {
 179         XmDrawingAreaCallbackStruct *cbs = cb_data;
 180         XButtonEvent *b = &cbs->event->xbutton;
 181         struct app_state *state = data;
 182
 183         switch (cbs->event->type) {
 184         case ButtonPress:
 185                 switch (b->button) {
 186                 case Button1:
 187                         if (b->state & Button3Mask)
 188                                 break;
 189
 190                         do_input_move(state, b->x / state->game_tile_sz,
 191                                              b->y / state->game_tile_sz);
 192                         break;
 193                 case Button3:
 194                         set_view_goal(state, 1);
 195                         break;
 196                 }
 197                 break;
 198         case ButtonRelease:
 199                 switch (b->button) {
 200                 case Button3:
 201                         set_view_goal(state, 0);
 202                         break;
 203                 }
 204         }
 205 }
 206
 207 static struct app_state state;
 208
 209 static Widget get_shell(Widget w)
 210 {
 211         Widget shell;
 212
 213         for (shell = w; !XtIsWMShell(shell);)
 214                 shell = XtParent(shell);
 215
 216         return shell;
 217 }
 218
 219 static void proc_exit(Widget w, XEvent *e, String *argv, Cardinal *argc)
 220 {
 221         XtAppSetExitFlag(XtWidgetToApplicationContext(w));
 222 }
 223
 224 static void proc_new_game(Widget w, XEvent *e, String *argv, Cardinal *argc)
 225 {
 226         XtAppContext app;
 227
 228         game_reset(&state.board);
 229
 230         x11_redraw_goal(&state, -1, get_shell(w));
 231         x11_redraw_game(&state, -1);
 232
 233         game_begin(&state.board);
 234         if (!(state.flags & FLAG_TIMER_RUNNING)) {
 235                 state.flags |= FLAG_TIMER_RUNNING;
 236                 timer_tick(&state, 0);
 237         }
 238 }
 239
 240 static void proc_about(Widget w, XEvent *e, String *argv, Cardinal *argc)
 241 {
 242         ui_show_about(&state, get_shell(w));
 243 }
 244
 245 static void proc_resize(Widget form, XEvent *e, String *argv, Cardinal *argc)
 246 {
 247         Widget game = XtParent(state.game);
 248         Widget goal = XtParent(state.goal);
 249         Dimension w, h, gamesz, gameborder, goalsz, goalborder;
 250         int x, y, gap;
 251
 252         XtVaGetValues(form, XmNwidth, &w, XmNheight, &h, (char *)NULL);
 253         XtVaGetValues(game, XmNshadowThickness, &gameborder, (char *)NULL);
 254         XtVaGetValues(goal, XmNshadowThickness, &goalborder,
 255                             XmNleftOffset, &gap,
 256                             (char *)NULL);
 257
 258         gamesz = MIN(h, w * SPLIT_NUMERATOR / SPLIT_DENOMINATOR);
 259         state.game_tile_sz = (gamesz - 2*gameborder) / 5;
 260         gamesz = 5*state.game_tile_sz + 2*gameborder;
 261
 262         goalsz = MIN(gamesz*3/5, w - gamesz - gap);
 263         state.goal_tile_sz = (goalsz - 2*goalborder) / 3;
 264         goalsz = 3*state.goal_tile_sz + 2*goalborder;
 265
 266         x = (w - gamesz - goalsz - gap) / 2;
 267         if (x < 2) x = 0;
 268
 269         y = (h - gamesz) / 2;
 270         if (y < 3) y = 0;
 271
 272         XtVaSetValues(game, XmNleftOffset, x, XmNtopOffset, y, (char *)NULL);
 273         XtVaSetValues(game, XmNwidth, gamesz, XmNheight, gamesz, (char *)NULL);
 274         XtVaSetValues(goal, XmNwidth, goalsz, XmNheight, goalsz, (char *)NULL);
 275 }
 276
 277 static const XtActionsRec app_actions[] = {
 278         { "gameNew", proc_new_game },
 279         { "gameExit", proc_exit },
 280         { "helpAbout", proc_about },
 281
 282         { "ResizeGameArea", proc_resize }
 283 };
 284
 285 static XtAppContext app_initialize(int argc, char **argv)
 286 {
 287         XtAppContext app;
 288         Widget shell;
 289         int i;
 290
 291         if (argc > 0)
 292                 progname = argv[0];
 293
 294         shell = early_setup(&app, argc, argv);
 295         XtAppAddActions(app, (void *)app_actions, XtNumber(app_actions));
 296         ui_initialize(&state, shell);
 297         x11_initialize(&state, shell);
 298
 299         XtAddCallback(state.game, XmNinputCallback, game_input, &state);
 300
 301         /* Begin with the game in winning state */
 302         game_reset(&state.board);
 303         for (i = 0; i < 3; i++)
 304                 state.board.game[i] = state.board.goal[i] << GOAL_SHIFT;
 305         game_finish(&state.board);
 306
 307         state.flags = ewmh_probe_wm_icon(shell);
 308         XtRealizeWidget(shell);
 309
 310         x11_redraw_goal(&state, 0, shell);
 311
 312         return app;
 313 }
 314
 315 int main(int argc, char **argv)
 316 {
 317         setlocale(LC_ALL, "");
 318         XtAppMainLoop(app_initialize(argc, argv));
 319         return 0;
 320 }