/*
Copyright (C) 1996-2001 Id Software, Inc.
Copyright (C) 2002-2009 John Fitzgibbons and others
Copyright (C) 2010-2014 QuakeSpasm developers
Copyright (C) 2020-2021 Vittorio Romeo

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.

See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/
// console.c

#include <sys/types.h>
#include <time.h>
#include <sys/stat.h>
#include <fcntl.h>
#ifdef _WIN32
#include <io.h>
#else
#include <unistd.h>
#endif

#include "quakedef.hpp"
#include "quakeparms.hpp"
#include "cmd.hpp"
#include "common.hpp"
#include "console.hpp"
#include "qpic.hpp"
#include "glquake.hpp"
#include "menu.hpp"
#include "keys.hpp"
#include "client.hpp"
#include "input.hpp"
#include "screen.hpp"
#include "q_sound.hpp"
#include "zone.hpp"
#include "sys.hpp"
#include "draw.hpp"
#include "q_ctype.hpp"
#include "cmd_types.hpp"
#include "developer.hpp"

int con_linewidth;

float con_cursorspeed = 4;

#define CON_TEXTSIZE \
    (1024 * 1024)         // ericw -- was 65536. johnfitz -- new default size
#define CON_MINSIZE 16384 // johnfitz -- old default, now the minimum size

int con_buffersize; // johnfitz -- user can now override default

bool con_forcedup; // because no entities to refresh

int con_totallines; // total lines in console scrollback
int con_backscroll; // lines up from bottom to display
int con_current;    // where next message will be printed
int con_x;          // offset in current line for next print
char* con_text = nullptr;

cvar_t con_notifytime = {"con_notifytime", "3", CVAR_NONE};         // seconds
cvar_t con_logcenterprint = {"con_logcenterprint", "1", CVAR_NONE}; // johnfitz

char con_lastcenterstring[1024]; // johnfitz

// QSS
void (*con_redirect_flush)(
    const char* buffer); // call this to flush the redirection buffer (for rcon)
char con_redirect_buffer[8192];


#define NUM_CON_TIMES 8
float con_times[NUM_CON_TIMES]; // realtime time the line was generated
                                // for transparent notify lines

int con_vislines;

bool con_debuglog = false;

bool con_initialized;


/*
================
Con_Quakebar -- johnfitz -- returns a bar of the desired length, but never wider
than the console

includes a newline, unless len >= con_linewidth.
================
*/
const char* Con_Quakebar(int len)
{
    static char bar[42];
    int i;

    len = q_min(len, (int)sizeof(bar) - 2);
    len = q_min(len, con_linewidth);

    bar[0] = '\35';
    for(i = 1; i < len - 1; i++)
    {
        bar[i] = '\36';
    }
    bar[len - 1] = '\37';

    if(len < con_linewidth)
    {
        bar[len] = '\n';
        bar[len + 1] = 0;
    }
    else
    {
        bar[len] = 0;
    }

    return bar;
}

/*
================
Con_ToggleConsole_f
================
*/
extern int history_line; // johnfitz

void Con_ToggleConsole_f()
{
    if(key_dest == key_console /* || (key_dest == key_game && con_forcedup)*/)
    {
        key_lines[edit_line][1] = 0; // clear any typing
        key_linepos = 1;
        con_backscroll = 0; // johnfitz -- toggleconsole should return you to
                            // the bottom of the scrollback
        history_line = edit_line; // johnfitz -- it should also return you to
                                  // the bottom of the command history

        if(cls.state == ca_connected)
        {
            key_dest = key_game;
        }
        else
        {
            M_Menu_Main_f();
        }
    }
    else
    {
        key_dest = key_console;
    }

    SCR_EndLoadingPlaque();
    memset(con_times, 0, sizeof(con_times));

    IN_UpdateGrabs();
}

/*
================
Con_Clear_f
================
*/
static void Con_Clear_f()
{
    if(con_text)
    {
        Q_memset(con_text, ' ',
            con_buffersize); // johnfitz -- con_buffersize replaces CON_TEXTSIZE
    }
    con_backscroll =
        0; // johnfitz -- if console is empty, being scrolled up is confusing
}

/*
================
Con_Dump_f -- johnfitz -- adapted from quake2 source
================
*/
static void Con_Dump_f()
{
    int l;
    int x;
    const char* line;
    FILE* f;
    char buffer[1024];
    char name[MAX_OSPATH];

    q_snprintf(name, sizeof(name), "%s/condump.txt", com_gamedir);
    COM_CreatePath(name);
    f = fopen(name, "w");
    if(!f)
    {
        Con_Printf("ERROR: couldn't open file %s.\n", name);
        return;
    }

    // skip initial empty lines
    for(l = con_current - con_totallines + 1; l <= con_current; l++)
    {
        line = con_text + (l % con_totallines) * con_linewidth;
        for(x = 0; x < con_linewidth; x++)
        {
            if(line[x] != ' ')
            {
                break;
            }
        }

        if(x != con_linewidth)
        {
            break;
        }
    }

    // write the remaining lines
    buffer[con_linewidth] = 0;
    for(; l <= con_current; l++)
    {
        line = con_text + (l % con_totallines) * con_linewidth;
        strncpy(buffer, line, con_linewidth);
        for(x = con_linewidth - 1; x >= 0; x--)
        {
            if(buffer[x] == ' ')
            {
                buffer[x] = 0;
            }
            else
            {
                break;
            }
        }
        for(x = 0; buffer[x]; x++)
        {
            buffer[x] &= 0x7f;
        }

        fprintf(f, "%s\n", buffer);
    }

    fclose(f);
    Con_Printf("Dumped console text to %s.\n", name);
}

/*
================
Con_ClearNotify
================
*/
void Con_ClearNotify()
{
    int i;

    for(i = 0; i < NUM_CON_TIMES; i++)
    {
        con_times[i] = 0;
    }
}


/*
================
Con_MessageMode_f
================
*/
static void Con_MessageMode_f()
{
    if(cls.state != ca_connected || cls.demoplayback)
    {
        return;
    }
    chat_team = false;
    key_dest = key_message;
}

/*
================
Con_MessageMode2_f
================
*/
static void Con_MessageMode2_f()
{
    if(cls.state != ca_connected || cls.demoplayback)
    {
        return;
    }
    chat_team = true;
    key_dest = key_message;
}


/*
================
Con_CheckResize

If the line width has changed, reformat the buffer.
================
*/
void Con_CheckResize()
{
    const int width = (vid.conwidth >> 3) -
                      2; // johnfitz -- use vid.conwidth instead of vid.width

    if(width == con_linewidth)
    {
        return;
    }

    const int oldwidth = con_linewidth;
    con_linewidth = width;

    const int oldtotallines = con_totallines;
    con_totallines =
        con_buffersize /
        con_linewidth; // johnfitz -- con_buffersize replaces CON_TEXTSIZE

    int numlines = oldtotallines;

    if(con_totallines < numlines)
    {
        numlines = con_totallines;
    }

    int numchars = oldwidth;

    if(con_linewidth < numchars)
    {
        numchars = con_linewidth;
    }

    const int mark = Hunk_LowMark(); // johnfitz
    // johnfitz -- tbuf no longer a static array
    char* tbuf = (char*)Hunk_Alloc(con_buffersize); // johnfitz

    Q_memcpy(tbuf, con_text,
        con_buffersize); // johnfitz -- con_buffersize replaces CON_TEXTSIZE
    Q_memset(con_text, ' ',
        con_buffersize); // johnfitz -- con_buffersize replaces CON_TEXTSIZE

    for(int i = 0; i < numlines; i++)
    {
        for(int j = 0; j < numchars; j++)
        {
            con_text[(con_totallines - 1 - i) * con_linewidth + j] =
                tbuf[((con_current - i + oldtotallines) % oldtotallines) *
                         oldwidth +
                     j];
        }
    }

    Hunk_FreeToLowMark(mark); // johnfitz

    Con_ClearNotify();

    con_backscroll = 0;
    con_current = con_totallines - 1;
}


/*
================
Con_Init
================
*/
void Con_Init()
{
    int i;

    // johnfitz -- user settable console buffer size
    i = COM_CheckParm("-consize");
    if(i && i < com_argc - 1)
    {
        con_buffersize = q_max(CON_MINSIZE, Q_atoi(com_argv[i + 1]) * 1024);
    }
    else
    {
        con_buffersize = CON_TEXTSIZE;
    }
    // johnfitz

    con_text = (char*)Hunk_AllocName(con_buffersize,
        "context"); // johnfitz -- con_buffersize replaces CON_TEXTSIZE
    Q_memset(con_text, ' ',
        con_buffersize); // johnfitz -- con_buffersize replaces CON_TEXTSIZE
    con_linewidth = -1;

    // johnfitz -- no need to run Con_CheckResize here
    con_linewidth = 38;
    con_totallines =
        con_buffersize /
        con_linewidth; // johnfitz -- con_buffersize replaces CON_TEXTSIZE
    con_backscroll = 0;
    con_current = con_totallines - 1;
    // johnfitz

    Con_Printf("Console initialized.\n");

    Cvar_RegisterVariable(&con_notifytime);
    Cvar_RegisterVariable(&con_logcenterprint); // johnfitz

    Cmd_AddCommand("toggleconsole", Con_ToggleConsole_f);
    Cmd_AddCommand("messagemode", Con_MessageMode_f);
    Cmd_AddCommand("messagemode2", Con_MessageMode2_f);
    Cmd_AddCommand("clear", Con_Clear_f);
    Cmd_AddCommand("condump", Con_Dump_f); // johnfitz
    con_initialized = true;
}


/*
===============
Con_Linefeed
===============
*/
static void Con_Linefeed()
{
    // johnfitz -- improved scrolling
    if(con_backscroll)
    {
        con_backscroll++;
    }
    if(con_backscroll > con_totallines - (glheight >> 3) - 1)
    {
        con_backscroll = con_totallines - (glheight >> 3) - 1;
    }
    // johnfitz

    con_x = 0;
    con_current++;
    Q_memset(&con_text[(con_current % con_totallines) * con_linewidth], ' ',
        con_linewidth);
}

// QSS
#define ishex(c) \
    ((c >= '0' && c <= '9') || (c >= 'a' && c <= 'f') || (c >= 'A' && c <= 'F'))

static int dehex(char c)
{
    if(c >= '0' && c <= '9')
    {
        return c - '0';
    }
    if(c >= 'A' && c <= 'F')
    {
        return c - ('A' - 10);
    }
    if(c >= 'a' && c <= 'f')
    {
        return c - ('a' - 10);
    }
    return 0;
}

/*
================
Con_Print

Handles cursor positioning, line wrapping, etc
All console printing must go through this in order to be logged to disk
If no console is visible, the notify window will pop up.
================
*/
static void Con_Print(const char* txt)
{
    int y;
    int c;
    int l;
    static int cr;
    int mask;
    bool boundary;

    // con_backscroll = 0; //johnfitz -- better console scrolling

    if(txt[0] == 1)
    {
        mask = 128;                    // go to colored text
        S_LocalSound("misc/talk.wav"); // play talk wav
        txt++;
    }
    else if(txt[0] == 2)
    {
        mask = 128; // go to colored text
        txt++;
    }
    else
    {
        mask = 0;
    }

    boundary = true;

    while((c = *txt))
    {
        if(c == '^')
        {
            // parse markup like FTE/DP might.
            switch(txt[1])
            {
                case '^': // doubled up char for escaping.
                    txt++;
                    break;
                case '0': // black
                case '1': // red
                case '2': // green
                case '3': // yellow
                case '4': // blue
                case '5': // cyan
                case '6': // magenta
                case '7': // white
                case '8': // white+half-alpha
                case '9': // grey
                case 'h': // toggle half-alpha
                case 'b': // blink
                case 'd': // reset to defaults (fixme: should reset ^m without
                          // resetting \1)
                case 's': // modstack push
                case 'r': // modstack restore
                    txt += 2;
                    continue;
                case 'x': // RGB 12-bit colour
                    if(ishex(txt[2]) && ishex(txt[3]) && ishex(txt[4]))
                    {
                        txt += 4;
                        continue;
                    }
                    break; // malformed
                case '[':  // start fte's ^[text\key\value\key\value^] links
                case ']':  // end link
                    break; // fixme... skip the keys, recolour properly, etc
                    //				txt+=2;
                    //				continue;
                case '&':
                    if((ishex(txt[2]) || txt[2] == '-') &&
                        (ishex(txt[3]) || txt[3] == '-'))
                    { // ignore fte's fore/back ansi colours
                        txt += 4;
                        continue;
                    }
                    break; // malformed
                case 'm':  // toggle masking.
                    txt += 2;
                    mask ^= 128;
                    continue;
                case 'U': // ucs-2 unicode codepoint
                    if(ishex(txt[2]) && ishex(txt[3]) && ishex(txt[4]) &&
                        ishex(txt[5]))
                    {
                        c = (dehex(txt[2]) << 12) | (dehex(txt[3]) << 8) |
                            (dehex(txt[4]) << 4) | dehex(txt[5]);
                        txt += 6 - 1;

                        if(c >= 0xe000 && c <= 0xe0ff)
                        {
                            c &= 0xff; // private-use 0xE0XX maps to quake's
                                       // chars
                        }
                        else if(c >= 0x20 && c <= 0x7f)
                        {
                            c &= 0x7f; // ascii is okay too.
                        }
                        else
                        {
                            c = '?'; // otherwise its some unicode char that we
                        }
                        // don't know how to handle.
                        break;
                    }
                    break; // malformed
                case '{':  // full unicode codepoint, for chars up to 0x10ffff
                    txt += 2;
                    c = 0; // no idea
                    while(*txt)
                    {
                        if(*txt == '}')
                        {
                            txt++;
                            break;
                        }
                        if(!ishex(*txt))
                        {
                            break;
                        }
                        c <<= 4;
                        c |= dehex(*txt++);
                    }
                    txt--; // for the ++ below

                    if(c >= 0xe000 && c <= 0xe0ff)
                    {
                        c &= 0xff; // private-use 0xE0XX maps to quake's chars
                    }
                    else if(c >= 0x20 && c <= 0x7f)
                    {
                        c &= 0x7f; // ascii is okay too.
                    }
                    else
                    {
                        c = '?'; // otherwise its some unicode char that we
                    }
                    // don't know how to handle.
                    break;
            }
        }

        if(c <= ' ')
        {
            boundary = true;
        }
        else if(boundary)
        {
            // count word length
            for(l = 0; l < con_linewidth; l++)
            {
                if(txt[l] <= ' ')
                {
                    break;
                }
            }

            // word wrap
            if(l != con_linewidth && (con_x + l > con_linewidth))
            {
                con_x = 0;
            }

            boundary = false;
        }

        txt++;

        if(cr)
        {
            con_current--;
            cr = false;
        }

        if(!con_x)
        {
            Con_Linefeed();
            // mark time for transparent overlay
            if(con_current >= 0)
            {
                con_times[con_current % NUM_CON_TIMES] = realtime;
            }
        }

        switch(c)
        {
            case '\n': con_x = 0; break;

            case '\r':
                con_x = 0;
                cr = 1;
                break;

            default: // display character and advance
                y = con_current % con_totallines;
                con_text[y * con_linewidth + con_x] = c | mask;
                con_x++;
                if(con_x >= con_linewidth)
                {
                    con_x = 0;
                }
                break;
        }
    }
}


// borrowed from uhexen2 by S.A. for new procs, LOG_Init, LOG_Close

static char logfilename[MAX_OSPATH]; // current logfile name
static int log_fd = -1;              // log file descriptor

/*
================
Con_DebugLog
================
*/
void Con_DebugLog(const char* msg)
{
    if(log_fd == -1)
    {
        return;
    }

    write(log_fd, msg, strlen(msg));
}


/*
================
Con_Printf

Handles cursor positioning, line wrapping, etc
================
*/
#define MAXPRINTMSG 4096
void Con_Printf(const char* fmt, ...)
{
    va_list argptr;
    char msg[MAXPRINTMSG];
    static bool inupdate;

    va_start(argptr, fmt);
    q_vsnprintf(msg, sizeof(msg), fmt, argptr);
    va_end(argptr);


    // QSS
    if(con_redirect_flush)
    {
        q_strlcat(con_redirect_buffer, msg, sizeof(con_redirect_buffer));
    }

    // also echo to debugging console
    Sys_Printf("%s", msg);

    // log all messages to file
    if(con_debuglog)
    {
        Con_DebugLog(msg);
    }

    if(!con_initialized)
    {
        return;
    }

    if(cls.state == ca_dedicated)
    {
        return; // no graphics mode
    }

    // write it to the scrollable buffer
    Con_Print(msg);

    // update the screen if the console is displayed
    if(cls.signon != SIGNONS && !scr_disabled_for_loading)
    {
        // protect against infinite loop if something in
        // SCR_UpdateScreen calls Con_Printd
        if(!inupdate)
        {
            inupdate = true;
            SCR_UpdateScreen();
            inupdate = false;
        }
    }
}

/*
================
Con_DWarning -- ericw

same as Con_Warning, but only prints if "developer" cvar is set.
use for "exceeds standard limit of" messages, which are only relevant
for developers targetting vanilla engines
================
*/
void Con_DWarning(const char* fmt, ...)
{
    if(!quake::vr::developerMode())
    {
        return; // don't confuse non-developers with techie stuff...
    }

    va_list argptr;
    char msg[MAXPRINTMSG];

    va_start(argptr, fmt);
    q_vsnprintf(msg, sizeof(msg), fmt, argptr);
    va_end(argptr);

    Con_SafePrintf("\x02Warning: ");
    Con_Printf("%s", msg);
}

/*
================
Con_Warning -- johnfitz -- prints a warning to the console
================
*/
void Con_Warning(const char* fmt, ...)
{
    va_list argptr;
    char msg[MAXPRINTMSG];

    va_start(argptr, fmt);
    q_vsnprintf(msg, sizeof(msg), fmt, argptr);
    va_end(argptr);

    Con_SafePrintf("\x02Warning: ");
    Con_Printf("%s", msg);
}

/*
================
Con_DPrintf

A Con_Printf that only shows up if the "developer" cvar is set
================
*/
void Con_DPrintf(const char* fmt, ...)
{
    if(!quake::vr::developerMode())
    {
        return; // don't confuse non-developers with techie stuff...
    }

    va_list argptr;
    char msg[MAXPRINTMSG];

    va_start(argptr, fmt);
    q_vsnprintf(msg, sizeof(msg), fmt, argptr);
    va_end(argptr);

    Con_SafePrintf("%s", msg); // johnfitz -- was Con_Printf
}

/*
================
Con_DPrintf2 -- johnfitz -- only prints if "developer" >= 2
================
*/
void Con_DPrintf2(const char* fmt, ...)
{
    va_list argptr;
    char msg[MAXPRINTMSG];

    if(quake::vr::developerMode() >= 2)
    {
        va_start(argptr, fmt);
        q_vsnprintf(msg, sizeof(msg), fmt, argptr);
        va_end(argptr);
        Con_Printf("%s", msg);
    }
}

/*
================
Con_DPrintf3 -- johnfitz -- only prints if "developer" >= 3
================
*/
void Con_DPrintf3(const char* fmt, ...)
{
    va_list argptr;
    char msg[MAXPRINTMSG];

    if(quake::vr::developerMode() >= 3)
    {
        va_start(argptr, fmt);
        q_vsnprintf(msg, sizeof(msg), fmt, argptr);
        va_end(argptr);
        Con_Printf("%s", msg);
    }
}


/*
==================
Con_SafePrintf

Okay to call even when the screen can't be updated
==================
*/
void Con_SafePrintf(const char* fmt, ...)
{
    va_list argptr;
    char msg[1024];
    int temp;

    va_start(argptr, fmt);
    q_vsnprintf(msg, sizeof(msg), fmt, argptr);
    va_end(argptr);

    temp = scr_disabled_for_loading;
    scr_disabled_for_loading = true;
    Con_Printf("%s", msg);
    scr_disabled_for_loading = temp;
}

/*
================
Con_CenterPrintf -- johnfitz -- pad each line with spaces to make it
appear centered
================
*/
void Con_CenterPrintf(int linewidth, const char* fmt, ...) FUNC_PRINTF(2, 3);
void Con_CenterPrintf(int linewidth, const char* fmt, ...)
{
    va_list argptr;
    char msg[MAXPRINTMSG];  // the original message
    char line[MAXPRINTMSG]; // one line from the message
    char spaces[21];        // buffer for spaces
    char* src;
    char* dst;
    int len;
    int s;

    va_start(argptr, fmt);
    q_vsnprintf(msg, sizeof(msg), fmt, argptr);
    va_end(argptr);

    linewidth = q_min(linewidth, con_linewidth);
    for(src = msg; *src;)
    {
        dst = line;
        while(*src && *src != '\n')
        {
            *dst++ = *src++;
        }
        *dst = 0;
        if(*src == '\n')
        {
            src++;
        }

        len = strlen(line);
        if(len < linewidth)
        {
            s = (linewidth - len) / 2;
            memset(spaces, ' ', s);
            spaces[s] = 0;
            Con_Printf("%s%s\n", spaces, line);
        }
        else
        {
            Con_Printf("%s\n", line);
        }
    }
}

/*
==================
Con_LogCenterPrint -- johnfitz -- echo centerprint message to the
console
==================
*/
void Con_LogCenterPrint(const char* str)
{
    if(!strcmp(str, con_lastcenterstring))
    {
        return; // ignore duplicates
    }

    if(cl.gametype == GAME_DEATHMATCH && con_logcenterprint.value != 2)
    {
        return; // don't log in deathmatch
    }

    strcpy(con_lastcenterstring, str);

    if(con_logcenterprint.value)
    {
        Con_Printf("%s", Con_Quakebar(40));
        Con_CenterPrintf(40, "%s\n", str);
        Con_Printf("%s", Con_Quakebar(40));
        Con_ClearNotify();
    }
}

// QSS
bool Con_IsRedirected()
{
    return !!con_redirect_flush;
}

// QSS
void Con_Redirect(void (*flush)(const char*))
{
    if(con_redirect_flush)
    {
        con_redirect_flush(con_redirect_buffer);
    }

    *con_redirect_buffer = 0;
    con_redirect_flush = flush;
}


/*
==============================================================================

    TAB COMPLETION

==============================================================================
*/

// johnfitz -- tab completion stuff
// unique defs
char key_tabpartial[MAXCMDLINE];
typedef struct tab_s
{
    const char* name;
    const char* type;
    struct tab_s* next;
    struct tab_s* prev;
} tab_t;
tab_t* tablist;

// defs from elsewhere
extern bool keydown[256];

extern cmd_function_t* cmd_functions;
#define MAX_ALIAS_NAME 32
typedef struct cmdalias_s
{
    struct cmdalias_s* next;
    char name[MAX_ALIAS_NAME];
    char* value;
} cmdalias_t;
extern cmdalias_t* cmd_alias;

/*
============
AddToTabList -- johnfitz

tablist is a doubly-linked loop, alphabetized by name
============
*/

// bash_partial is the string that can be expanded,
// aka Linux Bash shell. -- S.A.
static char bash_partial[80];
static bool bash_singlematch;

void AddToTabList(const char* name, const char* type)
{
    if(!*bash_partial)
    {
        strncpy(bash_partial, name, 79);
        bash_partial[79] = '\0';
    }
    else
    {
        bash_singlematch = 0;

        // find max common between bash_partial and name
        char* i_bash = bash_partial;
        const char* i_name = name;

        while(*i_bash && (q_tolower(*i_bash) == q_tolower(*i_name))) // QSS
        {
            i_bash++;
            i_name++;
        }

        *i_bash = 0;
    }

    tab_t* t = (tab_t*)Hunk_Alloc(sizeof(tab_t));
    t->name = name;
    t->type = type;

    if(!tablist) // create list
    {
        tablist = t;
        t->next = t;
        t->prev = t;
    }
    else if(strcmp(name, tablist->name) < 0) // insert at front
    {
        t->next = tablist;
        t->prev = tablist->prev;
        t->next->prev = t;
        t->prev->next = t;
        tablist = t;
    }
    else // insert later
    {
        tab_t* insert = tablist;
        do
        {
            if(strcmp(name, insert->name) < 0)
            {
                break;
            }
            insert = insert->next;
        } while(insert != tablist);

        t->next = insert;
        t->prev = insert->prev;
        t->next->prev = t;
        t->prev->next = t;
    }
}

typedef struct arg_completion_type_s
{
    const char* command;
    filelist_item_t** filelist;
} arg_completion_type_t;

static const arg_completion_type_t arg_completion_types[] = {
    {"map ", &extralevels}, {"changelevel ", &extralevels}, {"game ", &modlist},
    {"record ", &demolist}, {"playdemo ", &demolist}, {"timedemo ", &demolist}};

static const int num_arg_completion_types =
    sizeof(arg_completion_types) / sizeof(arg_completion_types[0]);

/*
============
FindCompletion -- stevenaaus
============
*/
const char* FindCompletion(
    const char* partial, filelist_item_t* filelist, int* nummatches_out)
{
    static char matched[32];
    char* i_matched;
    char* i_name;
    filelist_item_t* file;
    int init;
    int match;
    int plen;

    memset(matched, 0, sizeof(matched));
    plen = strlen(partial);
    match = 0;

    for(file = filelist, init = 0; file; file = file->next)
    {
        if(!strncmp(file->name, partial, plen))
        {
            if(init == 0)
            {
                init = 1;
                strncpy(matched, file->name, sizeof(matched) - 1);
                matched[sizeof(matched) - 1] = '\0';
            }
            else
            {
                // find max common
                i_matched = matched;
                i_name = file->name;
                while(*i_matched && (*i_matched == *i_name))
                {
                    i_matched++;
                    i_name++;
                }
                *i_matched = 0;
            }
            match++;
        }
    }

    *nummatches_out = match;

    if(match > 1)
    {
        for(file = filelist; file; file = file->next)
        {
            if(!strncmp(file->name, partial, plen))
            {
                Con_SafePrintf("   %s\n", file->name);
            }
        }
        Con_SafePrintf("\n");
    }

    return matched;
}

/*
============
BuildTabList -- johnfitz
============
*/
void BuildTabList(const char* partial)
{
    cmdalias_t* alias;
    cvar_t* cvar;
    cmd_function_t* cmd;
    int len;

    tablist = nullptr;
    len = strlen(partial);

    bash_partial[0] = 0;
    bash_singlematch = 1;

    cvar = Cvar_FindVarAfter("", CVAR_NONE);
    for(; cvar; cvar = cvar->next)
    {
        if(!q_strncasecmp(partial, cvar->name, len)) // QSS
        {
            AddToTabList(cvar->name, "cvar");
        }
    }

    for(cmd = cmd_functions; cmd; cmd = cmd->next)
    {
        if(!q_strncasecmp(partial, cmd->name, len) &&
            cmd->srctype != src_server) // QSS
        {
            AddToTabList(cmd->name, "command");
        }
    }

    for(alias = cmd_alias; alias; alias = alias->next)
    {
        if(!q_strncasecmp(partial, alias->name, len)) // QSS
        {
            AddToTabList(alias->name, "alias");
        }
    }
}

/*
============
Con_TabComplete -- johnfitz
============
*/
void Con_TabComplete()
{
    char partial[MAXCMDLINE];
    const char* match;
    static char* c;
    tab_t* t;
    int i;
    int j;

    // if editline is empty, return
    if(key_lines[edit_line][1] == 0)
    {
        return;
    }

    // get partial string (space -> cursor)
    if(!key_tabpartial[0]) // first time through, find new
                           // insert point. (Otherwise, use
                           // previous.)
    {
        // work back from cursor until you find a space,
        // quote, semicolon, or prompt
        c = key_lines[edit_line] + key_linepos -
            1; // start one space left of cursor
        while(*c != ' ' && *c != '\"' && *c != ';' && c != key_lines[edit_line])
        {
            c--;
        }
        c++; // start 1 char after the separator we just
             // found
    }
    for(i = 0; c + i < key_lines[edit_line] + key_linepos; i++)
    {
        partial[i] = c[i];
    }
    partial[i] = 0;

    // Map autocomplete function -- S.A
    // Since we don't have argument completion, this hack
    // will do for now...
    for(j = 0; j < num_arg_completion_types; j++)
    {
        // arg_completion contains a command we can complete
        // the arguments for (like "map ") and a list of all
        // the maps.
        arg_completion_type_t arg_completion = arg_completion_types[j];
        const char* command_name = arg_completion.command;

        if(!strncmp(
               key_lines[edit_line] + 1, command_name, strlen(command_name)))
        {
            int nummatches = 0;
            const char* matched_map =
                FindCompletion(partial, *arg_completion.filelist, &nummatches);
            if(!*matched_map)
            {
                return;
            }
            q_strlcpy(partial, matched_map, MAXCMDLINE);
            *c = '\0';
            q_strlcat(key_lines[edit_line], partial, MAXCMDLINE);
            key_linepos = c - key_lines[edit_line] +
                          Q_strlen(matched_map); // set new cursor position
            if(key_linepos >= MAXCMDLINE)
            {
                key_linepos = MAXCMDLINE - 1;
            }
            // if only one match, append a space
            if(key_linepos < MAXCMDLINE - 1 &&
                key_lines[edit_line][key_linepos] == 0 && (nummatches == 1))
            {
                key_lines[edit_line][key_linepos] = ' ';
                key_linepos++;
                key_lines[edit_line][key_linepos] = 0;
            }
            c = key_lines[edit_line] + key_linepos;
            return;
        }
    }

    // if partial is empty, return
    if(partial[0] == 0)
    {
        return;
    }

    // trim trailing space becuase it screws up string
    // comparisons
    if(i > 0 && partial[i - 1] == ' ')
    {
        partial[i - 1] = 0;
    }

    // find a match
    const int mark = Hunk_LowMark();
    if(!key_tabpartial[0]) // first time through
    {
        q_strlcpy(key_tabpartial, partial, MAXCMDLINE);
        BuildTabList(key_tabpartial);

        if(!tablist)
        {
            return;
        }

        // print list if length > 1
        if(tablist->next != tablist)
        {
            t = tablist;
            Con_SafePrintf("\n");
            do
            {
                Con_SafePrintf("   %s (%s)\n", t->name, t->type);
                t = t->next;
            } while(t != tablist);
            Con_SafePrintf("\n");
        }

        //	match = tablist->name;
        // First time, just show maximum matching chars --
        // S.A.
        match = bash_partial;
    }
    else
    {
        BuildTabList(key_tabpartial);

        if(!tablist)
        {
            return;
        }

        // find current match -- can't save a pointer
        // because the list will be rebuilt each time
        t = tablist;
        match = keydown[K_SHIFT] ? t->prev->name : t->name;
        do
        {
            if(!Q_strcmp(t->name, partial))
            {
                match = keydown[K_SHIFT] ? t->prev->name : t->next->name;
                break;
            }
            t = t->next;
        } while(t != tablist);
    }
    Hunk_FreeToLowMark(mark); // it's okay to free it here because match is
                              // a pointer to persistent data

    // insert new match into edit line
    q_strlcpy(partial, match,
        MAXCMDLINE); // first copy match string
    q_strlcat(partial, key_lines[edit_line] + key_linepos,
        MAXCMDLINE); // then add chars after cursor
    *c = '\0';       // now copy all of this into edit line
    q_strlcat(key_lines[edit_line], partial, MAXCMDLINE);
    key_linepos =
        c - key_lines[edit_line] + Q_strlen(match); // set new cursor position
    if(key_linepos >= MAXCMDLINE)
    {
        key_linepos = MAXCMDLINE - 1;
    }

    // if cursor is at end of string, let's append a space
    // to make life easier
    if(key_linepos < MAXCMDLINE - 1 && key_lines[edit_line][key_linepos] == 0 &&
        bash_singlematch)
    {
        key_lines[edit_line][key_linepos] = ' ';
        key_linepos++;
        key_lines[edit_line][key_linepos] = 0;
        // S.A.: the map argument completion (may be in
        // combination with the bash-style display behavior
        // changes, causes weirdness when completing the
        // arguments for the changelevel command. the line
        // below "fixes" it, although I'm not sure about the
        // reason, yet, neither do I know any possible side
        // effects of it:
        c = key_lines[edit_line] + key_linepos;
    }
}

/*
==============================================================================

DRAWING

==============================================================================
*/

/*
================
Con_DrawNotify

Draws the last few lines of output transparently over the
game top
================
*/
void Con_DrawNotify()
{
    int i;
    int x;
    int v;
    const char* text;
    float time;

    GL_SetCanvas(CANVAS_NOTIFY); // johnfitz
    v = vid.conheight;           // johnfitz

    for(i = con_current - NUM_CON_TIMES + 1; i <= con_current; i++)
    {
        if(i < 0)
        {
            continue;
        }
        time = con_times[i % NUM_CON_TIMES];
        if(time == 0)
        {
            continue;
        }
        time = realtime - time;
        if(time > con_notifytime.value)
        {
            continue;
        }
        text = con_text + (i % con_totallines) * con_linewidth;

        clearnotify = 0;

        for(x = 0; x < con_linewidth; x++)
        {
            Draw_Character((x + 1) << 3, v, text[x]);
        }

        v += 8;

        scr_tileclear_updates = 0; // johnfitz
    }

    if(key_dest == key_message)
    {
        clearnotify = 0;

        if(chat_team)
        {
            Draw_String(8, v, "say_team:");
            x = 11;
        }
        else
        {
            Draw_String(8, v, "say:");
            x = 6;
        }

        text = Key_GetChatBuffer();
        i = Key_GetChatMsgLen();
        if(i > con_linewidth - x - 1)
        {
            text += i - con_linewidth + x + 1;
        }

        while(*text)
        {
            Draw_Character(x << 3, v, *text);
            x++;
            text++;
        }

        Draw_Character(x << 3, v, 10 + ((int)(realtime * con_cursorspeed) & 1));
        v += 8;

        scr_tileclear_updates = 0; // johnfitz
    }
}

/*
================
Con_DrawInput -- johnfitz -- modified to allow insert
editing

The input line scrolls horizontally if typing goes beyond
the right edge
================
*/
extern qpic_t *pic_ovr,
    *pic_ins; // johnfitz -- new cursor handling

void Con_DrawInput()
{
    int i;
    int ofs;

    if(key_dest != key_console && !con_forcedup)
    {
        return; // don't draw anything
    }

    // prestep if horizontally scrolling
    if(key_linepos >= con_linewidth)
    {
        ofs = 1 + key_linepos - con_linewidth;
    }
    else
    {
        ofs = 0;
    }

    // draw input string
    for(i = 0; key_lines[edit_line][i + ofs] && i < con_linewidth; i++)
    {
        Draw_Character(
            (i + 1) << 3, vid.conheight - 16, key_lines[edit_line][i + ofs]);
    }

    // johnfitz -- new cursor handling
    if(!((int)((realtime - key_blinktime) * con_cursorspeed) & 1))
    {
        i = key_linepos - ofs;
        Draw_Pic(
            (i + 1) << 3, vid.conheight - 16, key_insert ? pic_ins : pic_ovr);
    }
}

/*
================
Con_DrawConsole -- johnfitz -- heavy revision

Draws the console with the solid background
The typing input line at the bottom should only be drawn if
typing is allowed
================
*/
void Con_DrawConsole(int lines, bool drawinput)
{
    int i;
    int x;
    int y;
    int j;
    int sb;
    int rows;
    const char* text;
    char ver[64];

    if(lines <= 0)
    {
        return;
    }

    con_vislines = lines * vid.conheight / glheight;
    GL_SetCanvas(CANVAS_CONSOLE);

    // draw the background
    Draw_ConsoleBackground();

    // draw the buffer text
    rows = (con_vislines + 7) / 8;
    y = vid.conheight - rows * 8;
    rows -= 2; // for input and version lines
    sb = (con_backscroll) ? 2 : 0;

    for(i = con_current - rows + 1; i <= con_current - sb; i++, y += 8)
    {
        j = i - con_backscroll;
        if(j < 0)
        {
            j = 0;
        }
        text = con_text + (j % con_totallines) * con_linewidth;

        for(x = 0; x < con_linewidth; x++)
        {
            Draw_Character((x + 1) << 3, y, text[x]);
        }
    }

    // draw scrollback arrows
    if(con_backscroll)
    {
        y += 8; // blank line
        for(x = 0; x < con_linewidth; x += 4)
        {
            Draw_Character((x + 1) << 3, y, '^');
        }
        y += 8;
    }

    // draw the input prompt, user text, and cursor
    if(drawinput)
    {
        Con_DrawInput();
    }

    // draw version number in bottom right
    y += 8;
    q_snprintf(ver, sizeof(ver), "QuakeSpasm " QUAKESPASM_VER_STRING);
    for(x = 0; x < (int)strlen(ver); x++)
    {
        Draw_Character(
            (con_linewidth - strlen(ver) + x + 2) << 3, y, ver[x] /*+ 128*/);
    }
}


/*
==================
Con_NotifyBox
==================
*/
void Con_NotifyBox(const char* text)
{
    double t1;
    double t2;
    int lastkey;
    int lastchar;

    // during startup for sound / cd warnings
    Con_Printf("\n\n%s", Con_Quakebar(40)); // johnfitz
    Con_Printf("%s", text);
    Con_Printf("Press a key.\n");
    Con_Printf("%s", Con_Quakebar(40)); // johnfitz

    key_dest = key_console;
    IN_UpdateGrabs();

    Key_BeginInputGrab();
    do
    {
        t1 = Sys_DoubleTime();
        SCR_UpdateScreen();
        Sys_SendKeyEvents();
        Key_GetGrabbedInput(&lastkey, &lastchar);
        Sys_Sleep(16);
        t2 = Sys_DoubleTime();
        realtime += t2 - t1; // make the cursor blink
    } while(lastkey == -1 && lastchar == -1);
    Key_EndInputGrab();

    Con_Printf("\n");

    key_dest = key_game;
    realtime = 0; // put the cursor back to invisible

    IN_UpdateGrabs();
}


void LOG_Init(quakeparms_t* parms)
{
    time_t inittime;
    char session[24];

    if(!COM_CheckParm("-condebug"))
    {
        return;
    }

    inittime = time(nullptr);
    strftime(
        session, sizeof(session), "%m/%d/%Y %H:%M:%S", localtime(&inittime));
    q_snprintf(
        logfilename, sizeof(logfilename), "%s/qconsole.log", parms->basedir);

    //	unlink (logfilename);

    log_fd = open(logfilename, O_WRONLY | O_CREAT | O_TRUNC, 0666);
    if(log_fd == -1)
    {
        fprintf(stderr, "Error: Unable to create log file %s\n", logfilename);
        return;
    }

    con_debuglog = true;
    Con_DebugLog(va("LOG started on: %s \n", session));
}

void LOG_Close()
{
    if(log_fd == -1)
    {
        return;
    }
    close(log_fd);
    log_fd = -1;
}
