main/console.c

   1 /*
   2  * Code for controlling the console
   3  *  Based on an old version of SDL_Console
   4  *
   5  *  Written By: Garrett Banuk <mongoose@mongeese.org>
   6  *  Code Cleanup and heavily extended by: Clemens Wacha <reflex-2000@gmx.net>
   7  *  Ported to use native Descent interfaces by: Bradley Bell <btb@icculus.org>
   8  *
   9  *  This is free, just be sure to give us credit when using it
  10  *  in any of your programs.
  11  */
  12
  13 #ifdef HAVE_CONFIG_H
  14 #include <conf.h>
  15 #endif
  16
  17 #include <stdlib.h>
  18 #include <stdio.h>
  19 #include <string.h>
  20 #include <stdarg.h>
  21 #ifndef _WIN32_WCE
  22 #include <fcntl.h>
  23 #endif
  24 #include <ctype.h>
  25 #include <unistd.h>
  26
  27 #include "console.h"
  28
  29 #include "u_mem.h"
  30 #include "gr.h"
  31 #include "key.h"
  32 #include "timer.h"
  33 #include "pstypes.h"
  34 #include "error.h"
  35 #include "cvar.h"
  36 #include "gamefont.h"
  37 #include "pcx.h"
  38 #include "cfile.h"
  39
  40
  41 #ifndef __MSDOS__
  42 int text_console_enabled = 1;
  43 #else
  44 int isvga();
  45 #define text_console_enabled (!isvga())
  46 #endif
  47
  48
  49 /* Console specific cvars */
  50 /* How discriminating we are about which messages are displayed */
  51 cvar_t con_threshold = {"con_threshold", "0",};
  52
  53 /* Private console stuff */
  54 #define CON_NUM_LINES 40
  55
  56 #define FG_COLOR    grd_curcanv->cv_font_fg_color
  57 #define get_msecs() approx_fsec_to_msec(timer_get_approx_seconds())
  58
  59 #define CON_BG_HIRES (cfexist("scoresb.pcx")?"scoresb.pcx":"scores.pcx")
  60 #define CON_BG_LORES (cfexist("scores.pcx")?"scores.pcx":"scoresb.pcx") // Mac datafiles only have scoresb.pcx
  61 #define CON_BG ((SWIDTH>=640)?CON_BG_HIRES:CON_BG_LORES)
  62
  63 //! Cut the buffer line if it becomes longer than this
  64 #define CON_CHARS_PER_LINE   128
  65 //! Cursor blink frequency in ms
  66 #define CON_BLINK_RATE       500
  67 //! Border in pixels from the most left to the first letter
  68 #define CON_CHAR_BORDER      4
  69 //! Spacing in pixels between lines
  70 #define CON_LINE_SPACE       1
  71 //! Default prompt used at the commandline
  72 #define CON_DEFAULT_PROMPT      "]"
  73 //! Scroll this many lines at a time (when pressing PGUP or PGDOWN)
  74 #define CON_LINE_SCROLL 2
  75 //! Indicator showing that you scrolled up the history
  76 #define CON_SCROLL_INDICATOR "^"
  77 //! Cursor shown if we are in insert mode
  78 #define CON_INS_CURSOR "_"
  79 //! Cursor shown if we are in overwrite mode
  80 #define CON_OVR_CURSOR "|"
  81 //! Defines the default hide key (Hide() the console if pressed)
  82 #define CON_DEFAULT_HIDEKEY     KEY_ESC
  83 //! Defines the opening/closing speed
  84 #define CON_OPENCLOSE_SPEED 50
  85
  86
  87 /*! This is a struct for the console's data */
  88 typedef struct console_information_td {
  89         int Visible;                    //! enum that tells which visible state we are in CON_HIDE, CON_SHOW, CON_RAISE, CON_LOWER
  90         int RaiseOffset;                        //! Offset used when scrolling in the console
  91         int HideKey;                    //! the key that can hide the console
  92         char **ConsoleLines;            //! List of all the past lines
  93         char **CommandLines;            //! List of all the past commands
  94         int TotalConsoleLines;          //! Total number of lines in the console
  95         int ConsoleScrollBack;          //! How much the user scrolled back in the console
  96         int TotalCommands;              //! Number of commands in the Back Commands
  97         int LineBuffer;                 //! The number of visible lines in the console (autocalculated)
  98         int VChars;                     //! The number of visible characters in one console line (autocalculated)
  99         char* Prompt;                   //! Prompt displayed in command line
 100         char Command[CON_CHARS_PER_LINE];       //! current command in command line = lcommand + rcommand
 101         char RCommand[CON_CHARS_PER_LINE];      //! left hand side of cursor
 102         char LCommand[CON_CHARS_PER_LINE];      //! right hand side of cursor
 103         char VCommand[CON_CHARS_PER_LINE];      //! current visible command line
 104         int CursorPos;                  //! Current cursor position in CurrentCommand
 105         int Offset;                     //! CommandOffset (first visible char of command) - if command is too long to fit into console
 106         int InsMode;                    //! Insert or Overwrite characters?
 107         grs_canvas *ConsoleSurface;     //! Canvas of the console
 108         grs_bitmap *BackgroundImage;    //! Background image for the console
 109         grs_bitmap *InputBackground;    //! Dirty rectangle to draw over behind the users background
 110 #if 0
 111         unsigned char ConsoleAlpha;     //! The consoles alpha level
 112 #endif
 113         int CommandScrollBack;          //! How much the users scrolled back in the command lines
 114 }
 115 ConsoleInformation;
 116 static ConsoleInformation Console;
 117 #define console (&Console)
 118
 119 /* console is ready to be written to */
 120 static int con_initialized;
 121
 122
 123 /* Internals */
 124 void CON_UpdateOffset(void);
 125 /*! Frees all the memory loaded by the console */
 126 void CON_Free(void);
 127 #if 0
 128 /*! Sets the alpha channel of an SDL_Surface to the specified value (0 - transparend,
 129  255 - opaque). Use this function also for OpenGL. */
 130 void CON_Alpha(unsigned char alpha);
 131 /*! Internal: Sets the alpha channel of an SDL_Surface to the specified value.
 132  Preconditions: the surface in question is RGBA. 0 <= a <= 255, where 0 is transparent and 255 opaque */
 133 void CON_AlphaGL(SDL_Surface *s, int alpha);
 134 /*! Sets a background image for the console */
 135 #endif
 136 int CON_Background(grs_bitmap *image);
 137 /*! Sets font info for the console */
 138 void CON_Font(grs_font *font, int fg, int bg);
 139 /*! Modify the prompt of the console */
 140 void CON_SetPrompt(char* newprompt);
 141 /*! Set the key, that invokes a CON_Hide() after press. default is ESCAPE and you can always hide using
 142  ESCAPE and the HideKey. compared against event->key.keysym.sym !! */
 143 void CON_SetHideKey(int key);
 144 /*! Internal: executes the command typed in at the console (called if you press ENTER)*/
 145 void CON_Execute(char* command);
 146 /*! Internal: Gets called when TAB was pressed */
 147 void CON_TabCompletion(void);
 148 /*! Internal: makes newline (same as printf("\n") or CON_Out("\n") ) */
 149 void CON_NewLineConsole(void);
 150 /*! Internal: shift command history (the one you can switch with the up/down keys) */
 151 void CON_NewLineCommand(void);
 152 /*! Internal: updates console after resize etc. */
 153 void CON_UpdateConsole(void);
 154
 155
 156 /*! Internal: draws the commandline the user is typing in to the screen. called by update? */
 157 void DrawCommandLine();
 158
 159 /*! Internal: Gets called if you press the LEFT key (move cursor left) */
 160 void Cursor_Left(void);
 161 /*! Internal: Gets called if you press the RIGHT key (move cursor right) */
 162 void Cursor_Right(void);
 163 /*! Internal: Gets called if you press the HOME key (move cursor to the beginning
 164         of the line */
 165 void Cursor_Home(void);
 166 /*! Internal: Gets called if you press the END key (move cursor to the end of the line*/
 167 void Cursor_End(void);
 168 /*! Internal: Called if you press DELETE (deletes character under the cursor) */
 169 void Cursor_Del(void);
 170 /*! Internal: Called if you press BACKSPACE (deletes character left of cursor) */
 171 void Cursor_BSpace(void);
 172 /*! Internal: Called if you type in a character (add the char to the command) */
 173 void Cursor_Add(int event);
 174
 175 /*! Internal: Called if you press Ctrl-C (deletes the commandline) */
 176 void Clear_Command(void);
 177 /*! Internal: Called if you press Ctrl-L (deletes the History) */
 178 void Clear_History(void);
 179
 180 /*! Internal: Called if you press UP key (switches through recent typed in commands */
 181 void Command_Up(void);
 182 /*! Internal: Called if you press DOWN key (switches through recent typed in commands */
 183 void Command_Down(void);
 184
 185
 186 /*  Takes keys from the keyboard and inputs them to the console
 187  If the event was not handled (i.e. WM events or unknown ctrl-shift
 188  sequences) the function returns the event for further processing. */
 189 int CON_Events(int event)
 190 {
 191         if(!CON_isVisible())
 192                 return event;
 193
 194         if(event & KEY_CTRLED)
 195         {
 196                 //CTRL pressed
 197                 switch(event & ~KEY_CTRLED)
 198                 {
 199                         case KEY_A:
 200                                 Cursor_Home();
 201                                 break;
 202                         case KEY_E:
 203                                 Cursor_End();
 204                                 break;
 205                         case KEY_C:
 206                                 Clear_Command();
 207                                 break;
 208                         case KEY_L:
 209                                 Clear_History();
 210                                 CON_UpdateConsole();
 211                                 break;
 212                         default:
 213                                 return event;
 214                 }
 215         }
 216         else if(event & KEY_ALTED)
 217         {
 218                 //the console does not handle ALT combinations!
 219                 return event;
 220         }
 221         else
 222         {
 223                 //first of all, check if the console hide key was pressed
 224                 if(event == console->HideKey)
 225                 {
 226                         CON_Hide();
 227                         return 0;
 228                 }
 229                 switch (event & 0xff)
 230                 {
 231                         case KEY_LSHIFT:
 232                         case KEY_RSHIFT:
 233                                 return event;
 234                         case KEY_HOME:
 235                                 if(event & KEY_SHIFTED)
 236                                 {
 237                                         console->ConsoleScrollBack = console->LineBuffer-1;
 238                                         CON_UpdateConsole();
 239                                 } else {
 240                                         Cursor_Home();
 241                                 }
 242                                 break;
 243                         case KEY_END:
 244                                 if(event & KEY_SHIFTED)
 245                                 {
 246                                         console->ConsoleScrollBack = 0;
 247                                         CON_UpdateConsole();
 248                                 } else {
 249                                         Cursor_End();
 250                                 }
 251                                 break;
 252                         case KEY_PAGEUP:
 253                                 console->ConsoleScrollBack += CON_LINE_SCROLL;
 254                                 if(console->ConsoleScrollBack > console->LineBuffer-1)
 255                                         console->ConsoleScrollBack = console->LineBuffer-1;
 256
 257                                 CON_UpdateConsole();
 258                                 break;
 259                         case KEY_PAGEDOWN:
 260                                 console->ConsoleScrollBack -= CON_LINE_SCROLL;
 261                                 if(console->ConsoleScrollBack < 0)
 262                                         console->ConsoleScrollBack = 0;
 263                                 CON_UpdateConsole();
 264                                 break;
 265                         case KEY_UP:
 266                                 Command_Up();
 267                                 break;
 268                         case KEY_DOWN:
 269                                 Command_Down();
 270                                 break;
 271                         case KEY_LEFT:
 272                                 Cursor_Left();
 273                                 break;
 274                         case KEY_RIGHT:
 275                                 Cursor_Right();
 276                                 break;
 277                         case KEY_BACKSP:
 278                                 Cursor_BSpace();
 279                                 break;
 280                         case KEY_DELETE:
 281                                 Cursor_Del();
 282                                 break;
 283                         case KEY_INSERT:
 284                                 console->InsMode = 1-console->InsMode;
 285                                 break;
 286                         case KEY_TAB:
 287                                 CON_TabCompletion();
 288                                 break;
 289                         case KEY_ENTER:
 290                                 if(strlen(console->Command) > 0) {
 291                                         CON_NewLineCommand();
 292
 293                                         // copy the input into the past commands strings
 294                                         strcpy(console->CommandLines[0], console->Command);
 295
 296                                         // display the command including the prompt
 297                                         CON_Out("%s%s", console->Prompt, console->Command);
 298                                         CON_UpdateConsole();
 299
 300                                         CON_Execute(console->Command);
 301
 302                                         Clear_Command();
 303                                         console->CommandScrollBack = -1;
 304                                 }
 305                                 break;
 306                         case KEY_LAPOSTRO:
 307                                 //deactivate Console
 308                                 CON_Hide();
 309                                 return 0;
 310                         default:
 311                                 if (key_to_ascii(event) == 255)
 312                                         break;
 313                                 if(console->InsMode)
 314                                         Cursor_Add(event);
 315                                 else {
 316                                         Cursor_Add(event);
 317                                         Cursor_Del();
 318                                 }
 319                 }
 320         }
 321         return 0;
 322 }
 323
 324 #if 0
 325 /* CON_AlphaGL() -- sets the alpha channel of an SDL_Surface to the
 326  * specified value.  Preconditions: the surface in question is RGBA.
 327  * 0 <= a <= 255, where 0 is transparent and 255 is opaque. */
 328 void CON_AlphaGL(SDL_Surface *s, int alpha) {
 329         Uint8 val;
 330         int x, y, w, h;
 331         Uint32 pixel;
 332         Uint8 r, g, b, a;
 333         SDL_PixelFormat *format;
 334         static char errorPrinted = 0;
 335
 336
 337         /* debugging assertions -- these slow you down, but hey, crashing sucks */
 338         if(!s) {
 339                 PRINT_ERROR("NULL Surface passed to CON_AlphaGL\n");
 340                 return;
 341         }
 342
 343         /* clamp alpha value to 0...255 */
 344         if(alpha < SDL_ALPHA_TRANSPARENT)
 345                 val = SDL_ALPHA_TRANSPARENT;
 346         else if(alpha > SDL_ALPHA_OPAQUE)
 347                 val = SDL_ALPHA_OPAQUE;
 348         else
 349                 val = alpha;
 350
 351         /* loop over alpha channels of each pixel, setting them appropriately. */
 352         w = s->w;
 353         h = s->h;
 354         format = s->format;
 355         switch (format->BytesPerPixel) {
 356                 case 2:
 357                         /* 16-bit surfaces don't seem to support alpha channels. */
 358                         if(!errorPrinted) {
 359                                 errorPrinted = 1;
 360                                 PRINT_ERROR("16-bit SDL surfaces do not support alpha-blending under OpenGL.\n");
 361                         }
 362                         break;
 363                 case 4: {
 364                         /* we can do this very quickly in 32-bit mode.  24-bit is more
 365                          * difficult.  And since 24-bit mode is reall the same as 32-bit,
 366                          * so it usually ends up taking this route too.  Win!  Unroll loop
 367                          * and use pointer arithmetic for extra speed. */
 368                         int numpixels = h * (w << 2);
 369                         Uint8 *pix = (Uint8 *) (s->pixels);
 370                         Uint8 *last = pix + numpixels;
 371                         Uint8 *pixel;
 372                         if((numpixels & 0x7) == 0)
 373                                 for(pixel = pix + 3; pixel < last; pixel += 32)
 374                                         *pixel = *(pixel + 4) = *(pixel + 8) = *(pixel + 12) = *(pixel + 16) = *(pixel + 20) = *(pixel + 24) = *(pixel + 28) = val;
 375                         else
 376                                 for(pixel = pix + 3; pixel < last; pixel += 4)
 377                                         *pixel = val;
 378                         break;
 379                 }
 380                 default:
 381                         /* we have no choice but to do this slowly.  <sigh> */
 382                         for(y = 0; y < h; ++y)
 383                                 for(x = 0; x < w; ++x) {
 384                                         char print = 0;
 385                                         /* Lock the surface for direct access to the pixels */
 386                                         if(SDL_MUSTLOCK(s) && SDL_LockSurface(s) < 0) {
 387                                                 PRINT_ERROR("Can't lock surface: ");
 388                                                 fprintf(stderr, "%s\n", SDL_GetError());
 389                                                 return;
 390                                         }
 391                                         pixel = DT_GetPixel(s, x, y);
 392                                         if(x == 0 && y == 0)
 393                                                 print = 1;
 394                                         SDL_GetRGBA(pixel, format, &r, &g, &b, &a);
 395                                         pixel = SDL_MapRGBA(format, r, g, b, val);
 396                                         SDL_GetRGBA(pixel, format, &r, &g, &b, &a);
 397                                         DT_PutPixel(s, x, y, pixel);
 398
 399                                         /* unlock surface again */
 400                                         if(SDL_MUSTLOCK(s))
 401                                                 SDL_UnlockSurface(s);
 402                                 }
 403                         break;
 404         }
 405 }
 406 #endif
 407
 408
 409 /* Updates the console buffer */
 410 void CON_UpdateConsole(void) {
 411         int loop;
 412         int loop2;
 413         int Screenlines;
 414         grs_canvas *canv_save;
 415         short orig_color;
 416
 417         /* Due to the Blits, the update is not very fast: So only update if it's worth it */
 418         if(!CON_isVisible())
 419                 return;
 420
 421         Screenlines = console->ConsoleSurface->cv_h / (CON_LINE_SPACE + console->ConsoleSurface->cv_font->ft_h);
 422
 423         canv_save = grd_curcanv;
 424         gr_set_current_canvas(console->ConsoleSurface);
 425
 426 #if 0
 427         SDL_FillRect(console->ConsoleSurface, NULL, SDL_MapRGBA(console->ConsoleSurface->format, 0, 0, 0, console->ConsoleAlpha));
 428 #else
 429         //gr_rect(0,0,
 430 #endif
 431
 432 #if 0
 433         if(grd_curscreen->flags & SDL_OPENGLBLIT)
 434                 SDL_SetAlpha(console->ConsoleSurface, 0, SDL_ALPHA_OPAQUE);
 435 #endif
 436
 437         /* draw the background image if there is one */
 438         if(console->BackgroundImage)
 439                 gr_bitmap(0, 0, console->BackgroundImage);
 440
 441         /* Draw the text from the back buffers, calculate in the scrollback from the user
 442          * this is a normal SDL software-mode blit, so we need to temporarily set the ColorKey
 443          * for the font, and then clear it when we're done.
 444          */
 445 #if 0
 446         if((grd_curscreen->flags & SDL_OPENGLBLIT) && (grd_curscreen->format->BytesPerPixel > 2)) {
 447                 Uint32 *pix = (Uint32 *) (CurrentFont->FontSurface->pixels);
 448                 SDL_SetColorKey(CurrentFont->FontSurface, SDL_SRCCOLORKEY, *pix);
 449         }
 450 #endif
 451
 452         //now draw text from last but second line to top
 453         for(loop = 0; loop < Screenlines-1 && loop < console->LineBuffer - console->ConsoleScrollBack; loop++) {
 454                 if(console->ConsoleScrollBack != 0 && loop == 0)
 455                         for(loop2 = 0; loop2 < (console->VChars / 5) + 1; loop2++)
 456                         {
 457                                 orig_color = FG_COLOR;
 458                                 gr_string(CON_CHAR_BORDER + (loop2*5*console->ConsoleSurface->cv_font->ft_w), (Screenlines - loop - 2) * (CON_LINE_SPACE + console->ConsoleSurface->cv_font->ft_h), CON_SCROLL_INDICATOR);
 459                                 FG_COLOR = orig_color;
 460                         }
 461                 else
 462                 {
 463                         orig_color = FG_COLOR;
 464                         gr_string(CON_CHAR_BORDER, (Screenlines - loop - 2) * (CON_LINE_SPACE + console->ConsoleSurface->cv_font->ft_h), console->ConsoleLines[console->ConsoleScrollBack + loop]);
 465                         FG_COLOR = orig_color;
 466                 }
 467         }
 468
 469         gr_set_current_canvas(canv_save);
 470
 471 #if 0
 472         if(grd_curscreen->flags & SDL_OPENGLBLIT)
 473                 SDL_SetColorKey(CurrentFont->FontSurface, 0, 0);
 474 #endif
 475 }
 476
 477 void CON_UpdateOffset(void) {
 478         switch(console->Visible) {
 479                 case CON_CLOSING:
 480                         console->RaiseOffset -= CON_OPENCLOSE_SPEED;
 481                         if(console->RaiseOffset <= 0) {
 482                                 console->RaiseOffset = 0;
 483                                 console->Visible = CON_CLOSED;
 484                         }
 485                         break;
 486                 case CON_OPENING:
 487                         console->RaiseOffset += CON_OPENCLOSE_SPEED;
 488                         if(console->RaiseOffset >= console->ConsoleSurface->cv_h) {
 489                                 console->RaiseOffset = console->ConsoleSurface->cv_h;
 490                                 console->Visible = CON_OPEN;
 491                         }
 492                         break;
 493                 case CON_OPEN:
 494                 case CON_CLOSED:
 495                         break;
 496         }
 497 }
 498
 499 /* Draws the console buffer to the screen if the console is "visible" */
 500 void CON_DrawConsole(void) {
 501         grs_canvas *canv_save;
 502         grs_bitmap *clip;
 503
 504         /* only draw if console is visible: here this means, that the console is not CON_CLOSED */
 505         if(console->Visible == CON_CLOSED)
 506                 return;
 507
 508         /* Update the scrolling offset */
 509         CON_UpdateOffset();
 510
 511         /* Update the command line since it has a blinking cursor */
 512         DrawCommandLine();
 513
 514 #if 0
 515         /* before drawing, make sure the alpha channel of the console surface is set
 516          * properly.  (sigh) I wish we didn't have to do this every frame... */
 517         if(grd_curscreen->flags & SDL_OPENGLBLIT)
 518                 CON_AlphaGL(console->ConsoleSurface, console->ConsoleAlpha);
 519 #endif
 520
 521         canv_save = grd_curcanv;
 522         gr_set_current_canvas(&grd_curscreen->sc_canvas);
 523
 524         clip = gr_create_sub_bitmap(&console->ConsoleSurface->cv_bitmap, 0, console->ConsoleSurface->cv_h - console->RaiseOffset, console->ConsoleSurface->cv_w, console->RaiseOffset);
 525
 526         gr_bitmap(0, 0, clip);
 527         gr_free_sub_bitmap(clip);
 528
 529 #if 0
 530         if(grd_curscreen->flags & SDL_OPENGLBLIT)
 531                 SDL_UpdateRects(grd_curscreen, 1, &DestRect);
 532 #endif
 533
 534         gr_set_current_canvas(canv_save);
 535 }
 536
 537
 538 /* Initializes the console */
 539 void CON_Init()
 540 {
 541         int loop;
 542
 543         console->Visible = CON_CLOSED;
 544         console->RaiseOffset = 0;
 545         console->ConsoleLines = NULL;
 546         console->CommandLines = NULL;
 547         console->TotalConsoleLines = 0;
 548         console->ConsoleScrollBack = 0;
 549         console->TotalCommands = 0;
 550         console->BackgroundImage = NULL;
 551 #if 0
 552         console->ConsoleAlpha = SDL_ALPHA_OPAQUE;
 553 #endif
 554         console->Offset = 0;
 555         console->InsMode = 1;
 556         console->CursorPos = 0;
 557         console->CommandScrollBack = 0;
 558         console->Prompt = d_strdup(CON_DEFAULT_PROMPT);
 559         console->HideKey = CON_DEFAULT_HIDEKEY;
 560
 561         /* load the console surface */
 562         console->ConsoleSurface = NULL;
 563
 564         /* Load the dirty rectangle for user input */
 565         console->InputBackground = NULL;
 566
 567         console->VChars = CON_CHARS_PER_LINE - 1;
 568         console->LineBuffer = CON_NUM_LINES;
 569
 570         console->ConsoleLines = (char **)d_malloc(sizeof(char *) * console->LineBuffer);
 571         console->CommandLines = (char **)d_malloc(sizeof(char *) * console->LineBuffer);
 572         for(loop = 0; loop <= console->LineBuffer - 1; loop++) {
 573                 console->ConsoleLines[loop] = (char *)d_calloc(CON_CHARS_PER_LINE, sizeof(char));
 574                 console->CommandLines[loop] = (char *)d_calloc(CON_CHARS_PER_LINE, sizeof(char));
 575         }
 576         memset(console->Command, 0, CON_CHARS_PER_LINE);
 577         memset(console->LCommand, 0, CON_CHARS_PER_LINE);
 578         memset(console->RCommand, 0, CON_CHARS_PER_LINE);
 579         memset(console->VCommand, 0, CON_CHARS_PER_LINE);
 580
 581         cmd_init();
 582
 583         /* Initialise the cvars */
 584         cvar_registervariable (&con_threshold);
 585
 586         con_initialized = 1;
 587
 588         atexit(CON_Free);
 589 }
 590
 591
 592 void gr_init_bitmap_alloc( grs_bitmap *bm, int mode, int x, int y, int w, int h, int bytesperline);
 593 void CON_InitGFX(int w, int h)
 594 {
 595         int pcx_error;
 596         grs_bitmap bmp;
 597         ubyte pal[256*3];
 598
 599         if (console->ConsoleSurface) {
 600                 /* resize console surface */
 601                 gr_free_bitmap_data(&console->ConsoleSurface->cv_bitmap);
 602                 gr_init_bitmap_alloc(&console->ConsoleSurface->cv_bitmap, BM_LINEAR, 0, 0, w, h, w);
 603         } else {
 604                 /* load the console surface */
 605                 console->ConsoleSurface = gr_create_canvas(w, h);
 606         }
 607
 608         /* Load the consoles font */
 609         CON_Font(SMALL_FONT, gr_getcolor(50,40,30), -1);
 610
 611         /* make sure that the size of the console is valid */
 612         if(w > grd_curscreen->sc_w || w < console->ConsoleSurface->cv_font->ft_w * 32)
 613                 w = grd_curscreen->sc_w;
 614         if(h > grd_curscreen->sc_h || h < console->ConsoleSurface->cv_font->ft_h)
 615                 h = grd_curscreen->sc_h;
 616
 617         /* Load the dirty rectangle for user input */
 618         if (console->InputBackground)
 619                 gr_free_bitmap(console->InputBackground);
 620         console->InputBackground = gr_create_bitmap(w, console->ConsoleSurface->cv_font->ft_h);
 621 #if 0
 622         SDL_FillRect(console->InputBackground, NULL, SDL_MapRGBA(console->ConsoleSurface->format, 0, 0, 0, SDL_ALPHA_OPAQUE));
 623 #endif
 624
 625         /* calculate the number of visible characters in the command line */
 626         console->VChars = (w - CON_CHAR_BORDER) / console->ConsoleSurface->cv_font->ft_w;
 627         if(console->VChars >= CON_CHARS_PER_LINE)
 628                 console->VChars = CON_CHARS_PER_LINE - 1;
 629
 630         gr_init_bitmap_data(&bmp);
 631         pcx_error = pcx_read_bitmap(CON_BG, &bmp, BM_LINEAR, pal);
 632         Assert(pcx_error == PCX_ERROR_NONE);
 633         gr_remap_bitmap_good(&bmp, pal, -1, -1);
 634         CON_Background(&bmp);
 635         gr_free_bitmap_data(&bmp);
 636 }
 637
 638
 639 /* Makes the console visible */
 640 void CON_Show(void) {
 641         console->Visible = CON_OPENING;
 642         CON_UpdateConsole();
 643 }
 644
 645 /* Hides the console (make it invisible) */
 646 void CON_Hide(void) {
 647         console->Visible = CON_CLOSING;
 648         key_flush();
 649 }
 650
 651 /* tells wether the console is visible or not */
 652 int CON_isVisible(void) {
 653         return((console->Visible == CON_OPEN) || (console->Visible == CON_OPENING));
 654 }
 655
 656 /* Frees all the memory loaded by the console */
 657 void CON_Free(void) {
 658         int i;
 659
 660         for(i = 0; i <= console->LineBuffer - 1; i++) {
 661                 d_free(console->ConsoleLines[i]);
 662                 d_free(console->CommandLines[i]);
 663         }
 664         d_free(console->ConsoleLines);
 665         d_free(console->CommandLines);
 666
 667         console->ConsoleLines = NULL;
 668         console->CommandLines = NULL;
 669
 670         if (console->ConsoleSurface)
 671                 gr_free_canvas(console->ConsoleSurface);
 672         console->ConsoleSurface = NULL;
 673
 674         if (console->BackgroundImage)
 675                 gr_free_bitmap(console->BackgroundImage);
 676         console->BackgroundImage = NULL;
 677
 678         if (console->InputBackground)
 679                 gr_free_bitmap(console->InputBackground);
 680         console->InputBackground = NULL;
 681
 682         d_free(console->Prompt);
 683
 684         con_initialized = 0;
 685 }
 686
 687
 688 /* Increments the console lines */
 689 void CON_NewLineConsole(void) {
 690         int loop;
 691         char* temp;
 692
 693         temp = console->ConsoleLines[console->LineBuffer - 1];
 694
 695         for(loop = console->LineBuffer - 1; loop > 0; loop--)
 696                 console->ConsoleLines[loop] = console->ConsoleLines[loop - 1];
 697
 698         console->ConsoleLines[0] = temp;
 699
 700         memset(console->ConsoleLines[0], 0, CON_CHARS_PER_LINE);
 701         if(console->TotalConsoleLines < console->LineBuffer - 1)
 702                 console->TotalConsoleLines++;
 703
 704         //Now adjust the ConsoleScrollBack
 705         //dont scroll if not at bottom
 706         if(console->ConsoleScrollBack != 0)
 707                 console->ConsoleScrollBack++;
 708         //boundaries
 709         if(console->ConsoleScrollBack > console->LineBuffer-1)
 710                 console->ConsoleScrollBack = console->LineBuffer-1;
 711
 712 }
 713
 714
 715 /* Increments the command lines */
 716 void CON_NewLineCommand(void) {
 717         int loop;
 718         char *temp;
 719
 720         temp  = console->CommandLines[console->LineBuffer - 1];
 721
 722
 723         for(loop = console->LineBuffer - 1; loop > 0; loop--)
 724                 console->CommandLines[loop] = console->CommandLines[loop - 1];
 725
 726         console->CommandLines[0] = temp;
 727
 728         memset(console->CommandLines[0], 0, CON_CHARS_PER_LINE);
 729         if(console->TotalCommands < console->LineBuffer - 1)
 730                 console->TotalCommands++;
 731 }
 732
 733 /* Draws the command line the user is typing in to the screen */
 734 /* completely rewritten by C.Wacha */
 735 void DrawCommandLine() {
 736         int x;
 737         int commandbuffer;
 738 #if 0
 739         grs_font* CurrentFont;
 740 #endif
 741         static unsigned int LastBlinkTime = 0;  /* Last time the consoles cursor blinked */
 742         static int LastCursorPos = 0;           // Last Cursor Position
 743         static int Blink = 0;                   /* Is the cursor currently blinking */
 744         grs_canvas *canv_save;
 745         short orig_color;
 746
 747         commandbuffer = console->VChars - strlen(console->Prompt)-1; // -1 to make cursor visible
 748
 749 #if 0
 750         CurrentFont = console->ConsoleSurface->cv_font;
 751 #endif
 752
 753         //Concatenate the left and right side to command
 754         strcpy(console->Command, console->LCommand);
 755         strncat(console->Command, console->RCommand, strlen(console->RCommand));
 756
 757         //calculate display offset from current cursor position
 758         if(console->Offset < console->CursorPos - commandbuffer)
 759                 console->Offset = console->CursorPos - commandbuffer;
 760         if(console->Offset > console->CursorPos)
 761                 console->Offset = console->CursorPos;
 762
 763         //first add prompt to visible part
 764         strcpy(console->VCommand, console->Prompt);
 765
 766         //then add the visible part of the command
 767         strncat(console->VCommand, &console->Command[console->Offset], strlen(&console->Command[console->Offset]));
 768
 769         //now display the result
 770
 771 #if 0
 772         //once again we're drawing text, so in OpenGL context we need to temporarily set up
 773         //software-mode transparency.
 774         if(grd_curscreen->flags & SDL_OPENGLBLIT) {
 775                 Uint32 *pix = (Uint32 *) (CurrentFont->FontSurface->pixels);
 776                 SDL_SetColorKey(CurrentFont->FontSurface, SDL_SRCCOLORKEY, *pix);
 777         }
 778 #endif
 779
 780         canv_save = grd_curcanv;
 781         gr_set_current_canvas(console->ConsoleSurface);
 782
 783         //first of all restore InputBackground
 784         gr_bitmap(0, console->ConsoleSurface->cv_h - console->ConsoleSurface->cv_font->ft_h, console->InputBackground);
 785
 786         //now add the text
 787         orig_color = FG_COLOR;
 788         gr_string(CON_CHAR_BORDER, console->ConsoleSurface->cv_h - console->ConsoleSurface->cv_font->ft_h, console->VCommand);
 789         FG_COLOR = orig_color;
 790
 791         //at last add the cursor
 792         //check if the blink period is over
 793         if(get_msecs() > LastBlinkTime) {
 794                 LastBlinkTime = get_msecs() + CON_BLINK_RATE;
 795                 if(Blink)
 796                         Blink = 0;
 797                 else
 798                         Blink = 1;
 799         }
 800
 801         //check if cursor has moved - if yes display cursor anyway
 802         if(console->CursorPos != LastCursorPos) {
 803                 LastCursorPos = console->CursorPos;
 804                 LastBlinkTime = get_msecs() + CON_BLINK_RATE;
 805                 Blink = 1;
 806         }
 807
 808         if(Blink) {
 809                 int prompt_width, cmd_width, h, w;
 810
 811                 gr_get_string_size(console->Prompt, &prompt_width, &h, &w);
 812                 gr_get_string_size(console->LCommand + console->Offset, &cmd_width, &h, &w);
 813                 x = CON_CHAR_BORDER + prompt_width + cmd_width;
 814                 orig_color = FG_COLOR;
 815                 if(console->InsMode)
 816                         gr_string(x, console->ConsoleSurface->cv_h - console->ConsoleSurface->cv_font->ft_h, CON_INS_CURSOR);
 817                 else
 818                         gr_string(x, console->ConsoleSurface->cv_h - console->ConsoleSurface->cv_font->ft_h, CON_OVR_CURSOR);
 819                 FG_COLOR = orig_color;
 820         }
 821
 822         gr_set_current_canvas(canv_save);
 823
 824
 825 #if 0
 826         if(grd_curscreen->flags & SDL_OPENGLBLIT) {
 827                 SDL_SetColorKey(CurrentFont->FontSurface, 0, 0);
 828         }
 829 #endif
 830 }
 831
 832 #ifdef _MSC_VER
 833 # define vsnprintf _vsnprintf
 834 #endif
 835
 836 /* Outputs text to the console (in game), up to CON_CHARS_PER_LINE chars can be entered */
 837 void CON_Out(const char *str, ...) {
 838         va_list marker;
 839         //keep some space free for stuff like CON_Out("blablabla %s", console->Command);
 840         char temp[CON_CHARS_PER_LINE + 128];
 841         char* ptemp;
 842
 843         va_start(marker, str);
 844         vsnprintf(temp, CON_CHARS_PER_LINE + 127, str, marker);
 845         va_end(marker);
 846
 847         ptemp = temp;
 848
 849         //temp now contains the complete string we want to output
 850         // the only problem is that temp is maybe longer than the console
 851         // width so we have to cut it into several pieces
 852
 853         if(console->ConsoleLines) {
 854                 while(strlen(ptemp) > console->VChars) {
 855                         CON_NewLineConsole();
 856                         strncpy(console->ConsoleLines[0], ptemp, console->VChars);
 857                         console->ConsoleLines[0][console->VChars] = '\0';
 858                         ptemp = &ptemp[console->VChars];
 859                 }
 860                 CON_NewLineConsole();
 861                 strncpy(console->ConsoleLines[0], ptemp, console->VChars);
 862                 console->ConsoleLines[0][console->VChars] = '\0';
 863                 CON_UpdateConsole();
 864         }
 865 }
 866
 867
 868 #if 0
 869 /* Sets the alpha level of the console, 0 turns off alpha blending */
 870 void CON_Alpha(unsigned char alpha) {
 871         /* store alpha as state! */
 872         console->ConsoleAlpha = alpha;
 873
 874         if((grd_curscreen->flags & SDL_OPENGLBLIT) == 0) {
 875                 if(alpha == 0)
 876                         SDL_SetAlpha(console->ConsoleSurface, 0, alpha);
 877                 else
 878                         SDL_SetAlpha(console->ConsoleSurface, SDL_SRCALPHA, alpha);
 879         }
 880
 881         //      CON_UpdateConsole();
 882 }
 883 #endif
 884
 885
 886 /* Adds  background image to the console, scaled to size of console*/
 887 int CON_Background(grs_bitmap *image)
 888 {
 889         /* Free the background from the console */
 890         if (image == NULL) {
 891                 if (console->BackgroundImage)
 892                         gr_free_bitmap(console->BackgroundImage);
 893                 console->BackgroundImage = NULL;
 894 #if 0
 895                 SDL_FillRect(console->InputBackground, NULL, SDL_MapRGBA(console->ConsoleSurface->format, 0, 0, 0, SDL_ALPHA_OPAQUE));
 896 #endif
 897                 return 0;
 898         }
 899
 900         /* Load a new background */
 901         if (console->BackgroundImage)
 902                 gr_free_bitmap(console->BackgroundImage);
 903         console->BackgroundImage = gr_create_bitmap(console->ConsoleSurface->cv_w, console->ConsoleSurface->cv_h);
 904         gr_bitmap_scale_to(image, console->BackgroundImage);
 905
 906 #if 0
 907         SDL_FillRect(console->InputBackground, NULL, SDL_MapRGBA(console->ConsoleSurface->format, 0, 0, 0, SDL_ALPHA_OPAQUE));
 908 #endif
 909         gr_bm_bitblt(console->BackgroundImage->bm_w, console->InputBackground->bm_h, 0, 0, 0, console->ConsoleSurface->cv_h - console->ConsoleSurface->cv_font->ft_h, console->BackgroundImage, console->InputBackground);
 910
 911         return 0;
 912 }
 913
 914 /* Sets font info for the console */
 915 void CON_Font(grs_font *font, int fg, int bg)
 916 {
 917         grs_canvas *canv_save;
 918
 919         canv_save = grd_curcanv;
 920         gr_set_current_canvas(console->ConsoleSurface);
 921         gr_set_curfont(font);
 922         gr_set_fontcolor(fg, bg);
 923         gr_set_current_canvas(canv_save);
 924 }
 925
 926 void gr_init_bitmap_alloc( grs_bitmap *bm, int mode, int x, int y, int w, int h, int bytesperline);
 927 /* resizes the console, has to reset alot of stuff
 928  * returns 1 on error */
 929 void CON_Resize(int w, int h)
 930 {
 931         /* make sure that the size of the console is valid */
 932         if(w > grd_curscreen->sc_w || w < console->ConsoleSurface->cv_font->ft_w * 32)
 933                 w = grd_curscreen->sc_w;
 934         if(h > grd_curscreen->sc_h || h < console->ConsoleSurface->cv_font->ft_h)
 935                 h = grd_curscreen->sc_h;
 936
 937         /* resize console surface */
 938         gr_free_bitmap_data(&console->ConsoleSurface->cv_bitmap);
 939         gr_init_bitmap_alloc(&console->ConsoleSurface->cv_bitmap, BM_LINEAR, 0, 0, w, h, w);
 940
 941         /* Load the dirty rectangle for user input */
 942         gr_free_bitmap(console->InputBackground);
 943         console->InputBackground = gr_create_bitmap(w, console->ConsoleSurface->cv_font->ft_h);
 944
 945         /* Now reset some stuff dependent on the previous size */
 946         console->ConsoleScrollBack = 0;
 947
 948         /* Reload the background image (for the input text area) in the console */
 949         if(console->BackgroundImage) {
 950 #if 0
 951                 SDL_FillRect(console->InputBackground, NULL, SDL_MapRGBA(console->ConsoleSurface->format, 0, 0, 0, SDL_ALPHA_OPAQUE));
 952 #endif
 953                 gr_bm_bitblt(console->BackgroundImage->bm_w, console->InputBackground->bm_h, 0, 0, 0, console->ConsoleSurface->cv_h - console->ConsoleSurface->cv_font->ft_h, console->BackgroundImage, console->InputBackground);
 954         }
 955
 956 #if 0
 957         /* restore the alpha level */
 958         CON_Alpha(console->ConsoleAlpha);
 959 #endif
 960 }
 961
 962 /* Sets the Prompt for console */
 963 void CON_SetPrompt(char* newprompt) {
 964         //check length so we can still see at least 1 char :-)
 965         if(strlen(newprompt) < console->VChars) {
 966                 d_free(console->Prompt);
 967                 console->Prompt = d_strdup(newprompt);
 968         } else
 969                 CON_Out("prompt too long. (max. %i chars)", console->VChars - 1);
 970 }
 971
 972 /* Sets the key that deactivates (hides) the console. */
 973 void CON_SetHideKey(int key) {
 974         console->HideKey = key;
 975 }
 976
 977 /* Executes the command entered */
 978 void CON_Execute(char* command) {
 979         cmd_append(command);
 980 }
 981
 982 void CON_TabCompletion(void) {
 983         int i,j;
 984         char* command;
 985
 986         command = d_strdup(console->LCommand);
 987         command = cmd_complete(command);
 988
 989         if(!command)
 990                 return; //no tab completion took place so return silently
 991
 992         j = strlen(command);
 993         if(j > CON_CHARS_PER_LINE - 2)
 994                 j = CON_CHARS_PER_LINE-1;
 995
 996         memset(console->LCommand, 0, CON_CHARS_PER_LINE);
 997         console->CursorPos = 0;
 998
 999         for(i = 0; i < j; i++) {
1000                 console->CursorPos++;
1001                 console->LCommand[i] = command[i];
1002         }
1003         //add a trailing space
1004         console->CursorPos++;
1005         console->LCommand[j] = ' ';
1006         console->LCommand[j+1] = '\0';
1007 }
1008
1009 void Cursor_Left(void) {
1010         char temp[CON_CHARS_PER_LINE];
1011
1012         if(console->CursorPos > 0) {
1013                 console->CursorPos--;
1014                 strcpy(temp, console->RCommand);
1015                 strcpy(console->RCommand, &console->LCommand[strlen(console->LCommand)-1]);
1016                 strcat(console->RCommand, temp);
1017                 console->LCommand[strlen(console->LCommand)-1] = '\0';
1018                 //CON_Out("L:%s, R:%s", console->LCommand, console->RCommand);
1019         }
1020 }
1021
1022 void Cursor_Right(void) {
1023         char temp[CON_CHARS_PER_LINE];
1024
1025         if(console->CursorPos < strlen(console->Command)) {
1026                 console->CursorPos++;
1027                 strncat(console->LCommand, console->RCommand, 1);
1028                 strcpy(temp, console->RCommand);
1029                 strcpy(console->RCommand, &temp[1]);
1030                 //CON_Out("L:%s, R:%s", console->LCommand, console->RCommand);
1031         }
1032 }
1033
1034 void Cursor_Home(void) {
1035         char temp[CON_CHARS_PER_LINE];
1036
1037         console->CursorPos = 0;
1038         strcpy(temp, console->RCommand);
1039         strcpy(console->RCommand, console->LCommand);
1040         strncat(console->RCommand, temp, strlen(temp));
1041         memset(console->LCommand, 0, CON_CHARS_PER_LINE);
1042 }
1043
1044 void Cursor_End(void) {
1045         console->CursorPos = strlen(console->Command);
1046         strncat(console->LCommand, console->RCommand, strlen(console->RCommand));
1047         memset(console->RCommand, 0, CON_CHARS_PER_LINE);
1048 }
1049
1050 void Cursor_Del(void) {
1051         char temp[CON_CHARS_PER_LINE];
1052
1053         if(strlen(console->RCommand) > 0) {
1054                 strcpy(temp, console->RCommand);
1055                 strcpy(console->RCommand, &temp[1]);
1056         }
1057 }
1058
1059 void Cursor_BSpace(void) {
1060         if(console->CursorPos > 0) {
1061                 console->CursorPos--;
1062                 console->Offset--;
1063                 if(console->Offset < 0)
1064                         console->Offset = 0;
1065                 console->LCommand[strlen(console->LCommand)-1] = '\0';
1066         }
1067 }
1068
1069 void Cursor_Add(int event)
1070 {
1071         if(strlen(console->Command) < CON_CHARS_PER_LINE - 1)
1072         {
1073                 console->CursorPos++;
1074                 console->LCommand[strlen(console->LCommand)] = key_to_ascii(event);
1075                 console->LCommand[strlen(console->LCommand)] = '\0';
1076         }
1077 }
1078
1079 void Clear_Command(void) {
1080         console->CursorPos = 0;
1081         memset(console->VCommand, 0, CON_CHARS_PER_LINE);
1082         memset(console->Command, 0, CON_CHARS_PER_LINE);
1083         memset(console->LCommand, 0, CON_CHARS_PER_LINE);
1084         memset(console->RCommand, 0, CON_CHARS_PER_LINE);
1085 }
1086
1087 void Clear_History(void) {
1088         int loop;
1089
1090         for(loop = 0; loop <= console->LineBuffer - 1; loop++)
1091                 memset(console->ConsoleLines[loop], 0, CON_CHARS_PER_LINE);
1092 }
1093
1094 void Command_Up(void) {
1095         if(console->CommandScrollBack < console->TotalCommands - 1) {
1096                 /* move back a line in the command strings and copy the command to the current input string */
1097                 console->CommandScrollBack++;
1098                 memset(console->RCommand, 0, CON_CHARS_PER_LINE);
1099                 console->Offset = 0;
1100                 strcpy(console->LCommand, console->CommandLines[console->CommandScrollBack]);
1101                 console->CursorPos = strlen(console->CommandLines[console->CommandScrollBack]);
1102                 CON_UpdateConsole();
1103         }
1104 }
1105
1106 void Command_Down(void) {
1107         if(console->CommandScrollBack > -1) {
1108                 /* move forward a line in the command strings and copy the command to the current input string */
1109                 console->CommandScrollBack--;
1110                 memset(console->RCommand, 0, CON_CHARS_PER_LINE);
1111                 memset(console->LCommand, 0, CON_CHARS_PER_LINE);
1112                 console->Offset = 0;
1113                 if(console->CommandScrollBack > -1)
1114                         strcpy(console->LCommand, console->CommandLines[console->CommandScrollBack]);
1115                 console->CursorPos = strlen(console->LCommand);
1116                 CON_UpdateConsole();
1117         }
1118 }
1119
1120 /* convert to ansi rgb colors 17-231 */
1121 #define PAL2ANSI(x) ((36*gr_palette[(x)*3]/11) + (6*gr_palette[(x)*3+1]/11) + (gr_palette[(x)*3+2]/11) + 16)
1122
1123 /* Print a message to the console */
1124 void con_printf(int priority, char *fmt, ...)
1125 {
1126         va_list arglist;
1127         char buffer[2048];
1128
1129         if (priority <= (con_threshold.intval))
1130         {
1131                 va_start (arglist, fmt);
1132                 vsprintf (buffer,  fmt, arglist);
1133                 va_end (arglist);
1134
1135                 if (con_initialized)
1136                         CON_Out(buffer);
1137
1138                 if (!text_console_enabled)
1139                         return;
1140
1141                 if (isatty(fileno(stdout))) {
1142                         char *buf, *p;
1143                         unsigned char color, spacing, underline;
1144
1145                         p = buf = buffer;
1146                         do
1147                                 switch (*p)
1148                                 {
1149                                 case CC_COLOR:
1150                                         *p++ = 0;
1151                                         printf("%s", buf);
1152                                         color = *p++;
1153                                         printf("\x1B[38;5;%dm", PAL2ANSI(color));
1154                                         buf = p;
1155                                         break;
1156                                 case CC_LSPACING:
1157                                         *p++ = 0;
1158                                         printf("%s", buf);
1159                                         spacing = *p++;
1160                                         //printf("<SPACING %d>", color);
1161                                         buf = p;
1162                                         break;
1163                                 case CC_UNDERLINE:
1164                                         *p++ = 0;
1165                                         printf("%s", buf);
1166                                         underline = 1;
1167                                         //printf("<UNDERLINE>");
1168                                         buf = p;
1169                                         break;
1170                                 default:
1171                                         p++;
1172                                 }
1173                         while (*p);
1174
1175                         printf("%s", buf);
1176
1177                 } else {
1178                         /* Produce a sanitised version and send it to the standard output */
1179                         char *p1, *p2;
1180
1181                         p1 = p2 = buffer;
1182                         do
1183                                 switch (*p1)
1184                                 {
1185                                 case CC_COLOR:
1186                                 case CC_LSPACING:
1187                                         p1++;
1188                                 case CC_UNDERLINE:
1189                                         p1++;
1190                                         break;
1191                                 default:
1192                                         *p2++ = *p1++;
1193                                 }
1194                         while (*p1);
1195                         *p2 = 0;
1196
1197                         printf("%s", buffer);
1198                 }
1199         }
1200 }