]> de.git.xonotic.org Git - xonotic/darkplaces.git/blob - console.c
Added r_shadow_bouncegrid_lightpathsize which is an alternative to blur
[xonotic/darkplaces.git] / console.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12
13 See the 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, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18
19 */
20 // console.c
21
22 #if !defined(WIN32) || defined(__MINGW32__)
23 # include <unistd.h>
24 #endif
25 #include <time.h>
26
27 #include "quakedef.h"
28 #include "thread.h"
29
30 // for u8_encodech
31 #include "ft2.h"
32
33 float con_cursorspeed = 4;
34
35 // lines up from bottom to display
36 int con_backscroll;
37
38 conbuffer_t con;
39 void *con_mutex = NULL;
40
41 #define CON_LINES(i) CONBUFFER_LINES(&con, i)
42 #define CON_LINES_LAST CONBUFFER_LINES_LAST(&con)
43 #define CON_LINES_COUNT CONBUFFER_LINES_COUNT(&con)
44
45 cvar_t con_notifytime = {CVAR_SAVE, "con_notifytime","3", "how long notify lines last, in seconds"};
46 cvar_t con_notify = {CVAR_SAVE, "con_notify","4", "how many notify lines to show"};
47 cvar_t con_notifyalign = {CVAR_SAVE, "con_notifyalign", "", "how to align notify lines: 0 = left, 0.5 = center, 1 = right, empty string = game default)"};
48
49 cvar_t con_chattime = {CVAR_SAVE, "con_chattime","30", "how long chat lines last, in seconds"};
50 cvar_t con_chat = {CVAR_SAVE, "con_chat","0", "how many chat lines to show in a dedicated chat area"};
51 cvar_t con_chatpos = {CVAR_SAVE, "con_chatpos","0", "where to put chat (negative: lines from bottom of screen, positive: lines below notify, 0: at top)"};
52 cvar_t con_chatrect = {CVAR_SAVE, "con_chatrect","0", "use con_chatrect_x and _y to position con_notify and con_chat freely instead of con_chatpos"};
53 cvar_t con_chatrect_x = {CVAR_SAVE, "con_chatrect_x","", "where to put chat, relative x coordinate of left edge on screen (use con_chatwidth for width)"};
54 cvar_t con_chatrect_y = {CVAR_SAVE, "con_chatrect_y","", "where to put chat, relative y coordinate of top edge on screen (use con_chat for line count)"};
55 cvar_t con_chatwidth = {CVAR_SAVE, "con_chatwidth","1.0", "relative chat window width"};
56 cvar_t con_textsize = {CVAR_SAVE, "con_textsize","8", "console text size in virtual 2D pixels"};
57 cvar_t con_notifysize = {CVAR_SAVE, "con_notifysize","8", "notify text size in virtual 2D pixels"};
58 cvar_t con_chatsize = {CVAR_SAVE, "con_chatsize","8", "chat text size in virtual 2D pixels (if con_chat is enabled)"};
59 cvar_t con_chatsound = {CVAR_SAVE, "con_chatsound","1", "enables chat sound to play on message"};
60
61
62 cvar_t sys_specialcharactertranslation = {0, "sys_specialcharactertranslation", "1", "terminal console conchars to ASCII translation (set to 0 if your conchars.tga is for an 8bit character set or if you want raw output)"};
63 #ifdef WIN32
64 cvar_t sys_colortranslation = {0, "sys_colortranslation", "0", "terminal console color translation (supported values: 0 = strip color codes, 1 = translate to ANSI codes, 2 = no translation)"};
65 #else
66 cvar_t sys_colortranslation = {0, "sys_colortranslation", "1", "terminal console color translation (supported values: 0 = strip color codes, 1 = translate to ANSI codes, 2 = no translation)"};
67 #endif
68
69
70 cvar_t con_nickcompletion = {CVAR_SAVE, "con_nickcompletion", "1", "tab-complete nicks in console and message input"};
71 cvar_t con_nickcompletion_flags = {CVAR_SAVE, "con_nickcompletion_flags", "11", "Bitfield: "
72                                    "0: add nothing after completion. "
73                                    "1: add the last color after completion. "
74                                    "2: add a quote when starting a quote instead of the color. "
75                                    "4: will replace 1, will force color, even after a quote. "
76                                    "8: ignore non-alphanumerics. "
77                                    "16: ignore spaces. "};
78 #define NICKS_ADD_COLOR 1
79 #define NICKS_ADD_QUOTE 2
80 #define NICKS_FORCE_COLOR 4
81 #define NICKS_ALPHANUMERICS_ONLY 8
82 #define NICKS_NO_SPACES 16
83
84 cvar_t con_completion_playdemo = {CVAR_SAVE, "con_completion_playdemo", "*.dem", "completion pattern for the playdemo command"};
85 cvar_t con_completion_timedemo = {CVAR_SAVE, "con_completion_timedemo", "*.dem", "completion pattern for the timedemo command"};
86 cvar_t con_completion_exec = {CVAR_SAVE, "con_completion_exec", "*.cfg", "completion pattern for the exec command"};
87
88 cvar_t condump_stripcolors = {CVAR_SAVE, "condump_stripcolors", "0", "strip color codes from console dumps"};
89
90 int con_linewidth;
91 int con_vislines;
92
93 qboolean con_initialized;
94
95 // used for server replies to rcon command
96 lhnetsocket_t *rcon_redirect_sock = NULL;
97 lhnetaddress_t *rcon_redirect_dest = NULL;
98 int rcon_redirect_bufferpos = 0;
99 char rcon_redirect_buffer[1400];
100 qboolean rcon_redirect_proquakeprotocol = false;
101
102 // generic functions for console buffers
103
104 void ConBuffer_Init(conbuffer_t *buf, int textsize, int maxlines, mempool_t *mempool)
105 {
106         buf->active = true;
107         buf->textsize = textsize;
108         buf->text = (char *) Mem_Alloc(mempool, textsize);
109         buf->maxlines = maxlines;
110         buf->lines = (con_lineinfo_t *) Mem_Alloc(mempool, maxlines * sizeof(*buf->lines));
111         buf->lines_first = 0;
112         buf->lines_count = 0;
113 }
114
115 /*! The translation table between the graphical font and plain ASCII  --KB */
116 static char qfont_table[256] = {
117         '\0', '#',  '#',  '#',  '#',  '.',  '#',  '#',
118         '#',  9,    10,   '#',  ' ',  13,   '.',  '.',
119         '[',  ']',  '0',  '1',  '2',  '3',  '4',  '5',
120         '6',  '7',  '8',  '9',  '.',  '<',  '=',  '>',
121         ' ',  '!',  '"',  '#',  '$',  '%',  '&',  '\'',
122         '(',  ')',  '*',  '+',  ',',  '-',  '.',  '/',
123         '0',  '1',  '2',  '3',  '4',  '5',  '6',  '7',
124         '8',  '9',  ':',  ';',  '<',  '=',  '>',  '?',
125         '@',  'A',  'B',  'C',  'D',  'E',  'F',  'G',
126         'H',  'I',  'J',  'K',  'L',  'M',  'N',  'O',
127         'P',  'Q',  'R',  'S',  'T',  'U',  'V',  'W',
128         'X',  'Y',  'Z',  '[',  '\\', ']',  '^',  '_',
129         '`',  'a',  'b',  'c',  'd',  'e',  'f',  'g',
130         'h',  'i',  'j',  'k',  'l',  'm',  'n',  'o',
131         'p',  'q',  'r',  's',  't',  'u',  'v',  'w',
132         'x',  'y',  'z',  '{',  '|',  '}',  '~',  '<',
133
134         '<',  '=',  '>',  '#',  '#',  '.',  '#',  '#',
135         '#',  '#',  ' ',  '#',  ' ',  '>',  '.',  '.',
136         '[',  ']',  '0',  '1',  '2',  '3',  '4',  '5',
137         '6',  '7',  '8',  '9',  '.',  '<',  '=',  '>',
138         ' ',  '!',  '"',  '#',  '$',  '%',  '&',  '\'',
139         '(',  ')',  '*',  '+',  ',',  '-',  '.',  '/',
140         '0',  '1',  '2',  '3',  '4',  '5',  '6',  '7',
141         '8',  '9',  ':',  ';',  '<',  '=',  '>',  '?',
142         '@',  'A',  'B',  'C',  'D',  'E',  'F',  'G',
143         'H',  'I',  'J',  'K',  'L',  'M',  'N',  'O',
144         'P',  'Q',  'R',  'S',  'T',  'U',  'V',  'W',
145         'X',  'Y',  'Z',  '[',  '\\', ']',  '^',  '_',
146         '`',  'a',  'b',  'c',  'd',  'e',  'f',  'g',
147         'h',  'i',  'j',  'k',  'l',  'm',  'n',  'o',
148         'p',  'q',  'r',  's',  't',  'u',  'v',  'w',
149         'x',  'y',  'z',  '{',  '|',  '}',  '~',  '<'
150 };
151
152 /*
153         SanitizeString strips color tags from the string in
154         and writes the result on string out
155 */
156 static void SanitizeString(char *in, char *out)
157 {
158         while(*in)
159         {
160                 if(*in == STRING_COLOR_TAG)
161                 {
162                         ++in;
163                         if(!*in)
164                         {
165                                 out[0] = STRING_COLOR_TAG;
166                                 out[1] = 0;
167                                 return;
168                         }
169                         else if (*in >= '0' && *in <= '9') // ^[0-9] found
170                         {
171                                 ++in;
172                                 if(!*in)
173                                 {
174                                         *out = 0;
175                                         return;
176                                 } else if (*in == STRING_COLOR_TAG) // ^[0-9]^ found, don't print ^[0-9]
177                                         continue;
178                         }
179                         else if (*in == STRING_COLOR_RGB_TAG_CHAR) // ^x found
180                         {
181                                 if ( isxdigit(in[1]) && isxdigit(in[2]) && isxdigit(in[3]) )
182                                 {
183                                         in+=4;
184                                         if (!*in)
185                                         {
186                                                 *out = 0;
187                                                 return;
188                                         } else if (*in == STRING_COLOR_TAG) // ^xrgb^ found, don't print ^xrgb
189                                                 continue;
190                                 }
191                                 else in--;
192                         }
193                         else if (*in != STRING_COLOR_TAG)
194                                 --in;
195                 }
196                 *out = qfont_table[*(unsigned char*)in];
197                 ++in;
198                 ++out;
199         }
200         *out = 0;
201 }
202
203 /*
204 ================
205 ConBuffer_Clear
206 ================
207 */
208 void ConBuffer_Clear (conbuffer_t *buf)
209 {
210         buf->lines_count = 0;
211 }
212
213 /*
214 ================
215 ConBuffer_Shutdown
216 ================
217 */
218 void ConBuffer_Shutdown(conbuffer_t *buf)
219 {
220         buf->active = false;
221         if (buf->text)
222                 Mem_Free(buf->text);
223         if (buf->lines)
224                 Mem_Free(buf->lines);
225         buf->text = NULL;
226         buf->lines = NULL;
227 }
228
229 /*
230 ================
231 ConBuffer_FixTimes
232
233 Notifies the console code about the current time
234 (and shifts back times of other entries when the time
235 went backwards)
236 ================
237 */
238 void ConBuffer_FixTimes(conbuffer_t *buf)
239 {
240         int i;
241         if(buf->lines_count >= 1)
242         {
243                 double diff = cl.time - CONBUFFER_LINES_LAST(buf).addtime;
244                 if(diff < 0)
245                 {
246                         for(i = 0; i < buf->lines_count; ++i)
247                                 CONBUFFER_LINES(buf, i).addtime += diff;
248                 }
249         }
250 }
251
252 /*
253 ================
254 ConBuffer_DeleteLine
255
256 Deletes the first line from the console history.
257 ================
258 */
259 void ConBuffer_DeleteLine(conbuffer_t *buf)
260 {
261         if(buf->lines_count == 0)
262                 return;
263         --buf->lines_count;
264         buf->lines_first = (buf->lines_first + 1) % buf->maxlines;
265 }
266
267 /*
268 ================
269 ConBuffer_DeleteLastLine
270
271 Deletes the last line from the console history.
272 ================
273 */
274 void ConBuffer_DeleteLastLine(conbuffer_t *buf)
275 {
276         if(buf->lines_count == 0)
277                 return;
278         --buf->lines_count;
279 }
280
281 /*
282 ================
283 ConBuffer_BytesLeft
284
285 Checks if there is space for a line of the given length, and if yes, returns a
286 pointer to the start of such a space, and NULL otherwise.
287 ================
288 */
289 static char *ConBuffer_BytesLeft(conbuffer_t *buf, int len)
290 {
291         if(len > buf->textsize)
292                 return NULL;
293         if(buf->lines_count == 0)
294                 return buf->text;
295         else
296         {
297                 char *firstline_start = buf->lines[buf->lines_first].start;
298                 char *lastline_onepastend = CONBUFFER_LINES_LAST(buf).start + CONBUFFER_LINES_LAST(buf).len;
299                 // the buffer is cyclic, so we first have two cases...
300                 if(firstline_start < lastline_onepastend) // buffer is contiguous
301                 {
302                         // put at end?
303                         if(len <= buf->text + buf->textsize - lastline_onepastend)
304                                 return lastline_onepastend;
305                         // put at beginning?
306                         else if(len <= firstline_start - buf->text)
307                                 return buf->text;
308                         else
309                                 return NULL;
310                 }
311                 else // buffer has a contiguous hole
312                 {
313                         if(len <= firstline_start - lastline_onepastend)
314                                 return lastline_onepastend;
315                         else
316                                 return NULL;
317                 }
318         }
319 }
320
321 /*
322 ================
323 ConBuffer_AddLine
324
325 Appends a given string as a new line to the console.
326 ================
327 */
328 void ConBuffer_AddLine(conbuffer_t *buf, const char *line, int len, int mask)
329 {
330         char *putpos;
331         con_lineinfo_t *p;
332
333         // developer_memory 1 during shutdown prints while conbuffer_t is being freed
334         if (!buf->active)
335                 return;
336
337         ConBuffer_FixTimes(buf);
338
339         if(len >= buf->textsize)
340         {
341                 // line too large?
342                 // only display end of line.
343                 line += len - buf->textsize + 1;
344                 len = buf->textsize - 1;
345         }
346         while(!(putpos = ConBuffer_BytesLeft(buf, len + 1)) || buf->lines_count >= buf->maxlines)
347                 ConBuffer_DeleteLine(buf);
348         memcpy(putpos, line, len);
349         putpos[len] = 0;
350         ++buf->lines_count;
351
352         //fprintf(stderr, "Now have %d lines (%d -> %d).\n", buf->lines_count, buf->lines_first, CON_LINES_LAST);
353
354         p = &CONBUFFER_LINES_LAST(buf);
355         p->start = putpos;
356         p->len = len;
357         p->addtime = cl.time;
358         p->mask = mask;
359         p->height = -1; // calculate when needed
360 }
361
362 int ConBuffer_FindPrevLine(conbuffer_t *buf, int mask_must, int mask_mustnot, int start)
363 {
364         int i;
365         if(start == -1)
366                 start = buf->lines_count;
367         for(i = start - 1; i >= 0; --i)
368         {
369                 con_lineinfo_t *l = &CONBUFFER_LINES(buf, i);
370
371                 if((l->mask & mask_must) != mask_must)
372                         continue;
373                 if(l->mask & mask_mustnot)
374                         continue;
375
376                 return i;
377         }
378
379         return -1;
380 }
381
382 const char *ConBuffer_GetLine(conbuffer_t *buf, int i)
383 {
384         static char copybuf[MAX_INPUTLINE]; // client only
385         con_lineinfo_t *l = &CONBUFFER_LINES(buf, i);
386         size_t sz = l->len+1 > sizeof(copybuf) ? sizeof(copybuf) : l->len+1;
387         strlcpy(copybuf, l->start, sz);
388         return copybuf;
389 }
390
391 /*
392 ==============================================================================
393
394 LOGGING
395
396 ==============================================================================
397 */
398
399 /// \name Logging
400 //@{
401 cvar_t log_file = {0, "log_file", "", "filename to log messages to"};
402 cvar_t log_file_stripcolors = {0, "log_file_stripcolors", "0", "strip color codes from log messages"};
403 cvar_t log_dest_udp = {0, "log_dest_udp", "", "UDP address to log messages to (in QW rcon compatible format); multiple destinations can be separated by spaces; DO NOT SPECIFY DNS NAMES HERE"};
404 char log_dest_buffer[1400]; // UDP packet
405 size_t log_dest_buffer_pos;
406 unsigned int log_dest_buffer_appending;
407 char crt_log_file [MAX_OSPATH] = "";
408 qfile_t* logfile = NULL;
409
410 unsigned char* logqueue = NULL;
411 size_t logq_ind = 0;
412 size_t logq_size = 0;
413
414 void Log_ConPrint (const char *msg);
415 //@}
416 static void Log_DestBuffer_Init(void)
417 {
418         memcpy(log_dest_buffer, "\377\377\377\377n", 5); // QW rcon print
419         log_dest_buffer_pos = 5;
420 }
421
422 static void Log_DestBuffer_Flush_NoLock(void)
423 {
424         lhnetaddress_t log_dest_addr;
425         lhnetsocket_t *log_dest_socket;
426         const char *s = log_dest_udp.string;
427         qboolean have_opened_temp_sockets = false;
428         if(s) if(log_dest_buffer_pos > 5)
429         {
430                 ++log_dest_buffer_appending;
431                 log_dest_buffer[log_dest_buffer_pos++] = 0;
432
433                 if(!NetConn_HaveServerPorts() && !NetConn_HaveClientPorts()) // then temporarily open one
434                 {
435                         have_opened_temp_sockets = true;
436                         NetConn_OpenServerPorts(true);
437                 }
438
439                 while(COM_ParseToken_Console(&s))
440                         if(LHNETADDRESS_FromString(&log_dest_addr, com_token, 26000))
441                         {
442                                 log_dest_socket = NetConn_ChooseClientSocketForAddress(&log_dest_addr);
443                                 if(!log_dest_socket)
444                                         log_dest_socket = NetConn_ChooseServerSocketForAddress(&log_dest_addr);
445                                 if(log_dest_socket)
446                                         NetConn_WriteString(log_dest_socket, log_dest_buffer, &log_dest_addr);
447                         }
448
449                 if(have_opened_temp_sockets)
450                         NetConn_CloseServerPorts();
451                 --log_dest_buffer_appending;
452         }
453         log_dest_buffer_pos = 0;
454 }
455
456 /*
457 ====================
458 Log_DestBuffer_Flush
459 ====================
460 */
461 void Log_DestBuffer_Flush(void)
462 {
463         if (con_mutex)
464                 Thread_LockMutex(con_mutex);
465         Log_DestBuffer_Flush_NoLock();
466         if (con_mutex)
467                 Thread_UnlockMutex(con_mutex);
468 }
469
470 static const char* Log_Timestamp (const char *desc)
471 {
472         static char timestamp [128]; // init/shutdown only
473         time_t crt_time;
474 #if _MSC_VER >= 1400
475         struct tm crt_tm;
476 #else
477         struct tm *crt_tm;
478 #endif
479         char timestring [64];
480
481         // Build the time stamp (ex: "Wed Jun 30 21:49:08 1993");
482         time (&crt_time);
483 #if _MSC_VER >= 1400
484         localtime_s (&crt_tm, &crt_time);
485         strftime (timestring, sizeof (timestring), "%a %b %d %H:%M:%S %Y", &crt_tm);
486 #else
487         crt_tm = localtime (&crt_time);
488         strftime (timestring, sizeof (timestring), "%a %b %d %H:%M:%S %Y", crt_tm);
489 #endif
490
491         if (desc != NULL)
492                 dpsnprintf (timestamp, sizeof (timestamp), "====== %s (%s) ======\n", desc, timestring);
493         else
494                 dpsnprintf (timestamp, sizeof (timestamp), "====== %s ======\n", timestring);
495
496         return timestamp;
497 }
498
499 static void Log_Open (void)
500 {
501         if (logfile != NULL || log_file.string[0] == '\0')
502                 return;
503
504         logfile = FS_OpenRealFile(log_file.string, "a", false);
505         if (logfile != NULL)
506         {
507                 strlcpy (crt_log_file, log_file.string, sizeof (crt_log_file));
508                 FS_Print (logfile, Log_Timestamp ("Log started"));
509         }
510 }
511
512 /*
513 ====================
514 Log_Close
515 ====================
516 */
517 void Log_Close (void)
518 {
519         if (logfile == NULL)
520                 return;
521
522         FS_Print (logfile, Log_Timestamp ("Log stopped"));
523         FS_Print (logfile, "\n");
524         FS_Close (logfile);
525
526         logfile = NULL;
527         crt_log_file[0] = '\0';
528 }
529
530
531 /*
532 ====================
533 Log_Start
534 ====================
535 */
536 void Log_Start (void)
537 {
538         size_t pos;
539         size_t n;
540         Log_Open ();
541
542         // Dump the contents of the log queue into the log file and free it
543         if (logqueue != NULL)
544         {
545                 unsigned char *temp = logqueue;
546                 logqueue = NULL;
547                 if(logq_ind != 0)
548                 {
549                         if (logfile != NULL)
550                                 FS_Write (logfile, temp, logq_ind);
551                         if(*log_dest_udp.string)
552                         {
553                                 for(pos = 0; pos < logq_ind; )
554                                 {
555                                         if(log_dest_buffer_pos == 0)
556                                                 Log_DestBuffer_Init();
557                                         n = min(sizeof(log_dest_buffer) - log_dest_buffer_pos - 1, logq_ind - pos);
558                                         memcpy(log_dest_buffer + log_dest_buffer_pos, temp + pos, n);
559                                         log_dest_buffer_pos += n;
560                                         Log_DestBuffer_Flush_NoLock();
561                                         pos += n;
562                                 }
563                         }
564                 }
565                 Mem_Free (temp);
566                 logq_ind = 0;
567                 logq_size = 0;
568         }
569 }
570
571
572
573 /*
574 ================
575 Log_ConPrint
576 ================
577 */
578 void Log_ConPrint (const char *msg)
579 {
580         static qboolean inprogress = false;
581
582         // don't allow feedback loops with memory error reports
583         if (inprogress)
584                 return;
585         inprogress = true;
586
587         // Until the host is completely initialized, we maintain a log queue
588         // to store the messages, since the log can't be started before
589         if (logqueue != NULL)
590         {
591                 size_t remain = logq_size - logq_ind;
592                 size_t len = strlen (msg);
593
594                 // If we need to enlarge the log queue
595                 if (len > remain)
596                 {
597                         size_t factor = ((logq_ind + len) / logq_size) + 1;
598                         unsigned char* newqueue;
599
600                         logq_size *= factor;
601                         newqueue = (unsigned char *)Mem_Alloc (tempmempool, logq_size);
602                         memcpy (newqueue, logqueue, logq_ind);
603                         Mem_Free (logqueue);
604                         logqueue = newqueue;
605                         remain = logq_size - logq_ind;
606                 }
607                 memcpy (&logqueue[logq_ind], msg, len);
608                 logq_ind += len;
609
610                 inprogress = false;
611                 return;
612         }
613
614         // Check if log_file has changed
615         if (strcmp (crt_log_file, log_file.string) != 0)
616         {
617                 Log_Close ();
618                 Log_Open ();
619         }
620
621         // If a log file is available
622         if (logfile != NULL)
623         {
624                 if (log_file_stripcolors.integer)
625                 {
626                         // sanitize msg
627                         size_t len = strlen(msg);
628                         char* sanitizedmsg = (char*)Mem_Alloc(tempmempool, len + 1);
629                         memcpy (sanitizedmsg, msg, len);
630                         SanitizeString(sanitizedmsg, sanitizedmsg); // SanitizeString's in pointer is always ahead of the out pointer, so this should work.
631                         FS_Print (logfile, sanitizedmsg);
632                         Mem_Free(sanitizedmsg);
633                 }
634                 else 
635                 {
636                         FS_Print (logfile, msg);
637                 }
638         }
639
640         inprogress = false;
641 }
642
643
644 /*
645 ================
646 Log_Printf
647 ================
648 */
649 void Log_Printf (const char *logfilename, const char *fmt, ...)
650 {
651         qfile_t *file;
652
653         file = FS_OpenRealFile(logfilename, "a", true);
654         if (file != NULL)
655         {
656                 va_list argptr;
657
658                 va_start (argptr, fmt);
659                 FS_VPrintf (file, fmt, argptr);
660                 va_end (argptr);
661
662                 FS_Close (file);
663         }
664 }
665
666
667 /*
668 ==============================================================================
669
670 CONSOLE
671
672 ==============================================================================
673 */
674
675 /*
676 ================
677 Con_ToggleConsole_f
678 ================
679 */
680 void Con_ToggleConsole_f (void)
681 {
682         if (COM_CheckParm ("-noconsole"))
683                 if (!(key_consoleactive & KEY_CONSOLEACTIVE_USER))
684                         return; // only allow the key bind to turn off console
685
686         // toggle the 'user wants console' bit
687         key_consoleactive ^= KEY_CONSOLEACTIVE_USER;
688         Con_ClearNotify();
689 }
690
691 /*
692 ================
693 Con_ClearNotify
694 ================
695 */
696 void Con_ClearNotify (void)
697 {
698         int i;
699         for(i = 0; i < CON_LINES_COUNT; ++i)
700                 if(!(CON_LINES(i).mask & CON_MASK_CHAT))
701                         CON_LINES(i).mask |= CON_MASK_HIDENOTIFY;
702 }
703
704
705 /*
706 ================
707 Con_MessageMode_f
708 ================
709 */
710 static void Con_MessageMode_f (void)
711 {
712         key_dest = key_message;
713         chat_mode = 0; // "say"
714         if(Cmd_Argc() > 1)
715         {
716                 dpsnprintf(chat_buffer, sizeof(chat_buffer), "%s ", Cmd_Args());
717                 chat_bufferlen = (unsigned int)strlen(chat_buffer);
718         }
719 }
720
721
722 /*
723 ================
724 Con_MessageMode2_f
725 ================
726 */
727 static void Con_MessageMode2_f (void)
728 {
729         key_dest = key_message;
730         chat_mode = 1; // "say_team"
731         if(Cmd_Argc() > 1)
732         {
733                 dpsnprintf(chat_buffer, sizeof(chat_buffer), "%s ", Cmd_Args());
734                 chat_bufferlen = (unsigned int)strlen(chat_buffer);
735         }
736 }
737
738 /*
739 ================
740 Con_CommandMode_f
741 ================
742 */
743 static void Con_CommandMode_f (void)
744 {
745         key_dest = key_message;
746         if(Cmd_Argc() > 1)
747         {
748                 dpsnprintf(chat_buffer, sizeof(chat_buffer), "%s ", Cmd_Args());
749                 chat_bufferlen = (unsigned int)strlen(chat_buffer);
750         }
751         chat_mode = -1; // command
752 }
753
754 /*
755 ================
756 Con_CheckResize
757 ================
758 */
759 void Con_CheckResize (void)
760 {
761         int i, width;
762         float f;
763
764         f = bound(1, con_textsize.value, 128);
765         if(f != con_textsize.value)
766                 Cvar_SetValueQuick(&con_textsize, f);
767         width = (int)floor(vid_conwidth.value / con_textsize.value);
768         width = bound(1, width, con.textsize/4);
769                 // FIXME uses con in a non abstracted way
770
771         if (width == con_linewidth)
772                 return;
773
774         con_linewidth = width;
775
776         for(i = 0; i < CON_LINES_COUNT; ++i)
777                 CON_LINES(i).height = -1; // recalculate when next needed
778
779         Con_ClearNotify();
780         con_backscroll = 0;
781 }
782
783 //[515]: the simplest command ever
784 //LordHavoc: not so simple after I made it print usage...
785 static void Con_Maps_f (void)
786 {
787         if (Cmd_Argc() > 2)
788         {
789                 Con_Printf("usage: maps [mapnameprefix]\n");
790                 return;
791         }
792         else if (Cmd_Argc() == 2)
793                 GetMapList(Cmd_Argv(1), NULL, 0);
794         else
795                 GetMapList("", NULL, 0);
796 }
797
798 static void Con_ConDump_f (void)
799 {
800         int i;
801         qfile_t *file;
802         if (Cmd_Argc() != 2)
803         {
804                 Con_Printf("usage: condump <filename>\n");
805                 return;
806         }
807         file = FS_OpenRealFile(Cmd_Argv(1), "w", false);
808         if (!file)
809         {
810                 Con_Printf("condump: unable to write file \"%s\"\n", Cmd_Argv(1));
811                 return;
812         }
813         if (con_mutex) Thread_LockMutex(con_mutex);
814         for(i = 0; i < CON_LINES_COUNT; ++i)
815         {
816                 if (condump_stripcolors.integer)
817                 {
818                         // sanitize msg
819                         size_t len = CON_LINES(i).len;
820                         char* sanitizedmsg = (char*)Mem_Alloc(tempmempool, len + 1);
821                         memcpy (sanitizedmsg, CON_LINES(i).start, len);
822                         SanitizeString(sanitizedmsg, sanitizedmsg); // SanitizeString's in pointer is always ahead of the out pointer, so this should work.
823                         FS_Write(file, sanitizedmsg, strlen(sanitizedmsg));
824                         Mem_Free(sanitizedmsg);
825                 }
826                 else 
827                 {
828                         FS_Write(file, CON_LINES(i).start, CON_LINES(i).len);
829                 }
830                 FS_Write(file, "\n", 1);
831         }
832         if (con_mutex) Thread_UnlockMutex(con_mutex);
833         FS_Close(file);
834 }
835
836 void Con_Clear_f (void)
837 {
838         if (con_mutex) Thread_LockMutex(con_mutex);
839         ConBuffer_Clear(&con);
840         if (con_mutex) Thread_UnlockMutex(con_mutex);
841 }
842
843 /*
844 ================
845 Con_Init
846 ================
847 */
848 void Con_Init (void)
849 {
850         con_linewidth = 80;
851         ConBuffer_Init(&con, CON_TEXTSIZE, CON_MAXLINES, zonemempool);
852         if (Thread_HasThreads())
853                 con_mutex = Thread_CreateMutex();
854
855         // Allocate a log queue, this will be freed after configs are parsed
856         logq_size = MAX_INPUTLINE;
857         logqueue = (unsigned char *)Mem_Alloc (tempmempool, logq_size);
858         logq_ind = 0;
859
860         Cvar_RegisterVariable (&sys_colortranslation);
861         Cvar_RegisterVariable (&sys_specialcharactertranslation);
862
863         Cvar_RegisterVariable (&log_file);
864         Cvar_RegisterVariable (&log_file_stripcolors);
865         Cvar_RegisterVariable (&log_dest_udp);
866
867         // support for the classic Quake option
868 // COMMANDLINEOPTION: Console: -condebug logs console messages to qconsole.log, see also log_file
869         if (COM_CheckParm ("-condebug") != 0)
870                 Cvar_SetQuick (&log_file, "qconsole.log");
871
872         // register our cvars
873         Cvar_RegisterVariable (&con_chat);
874         Cvar_RegisterVariable (&con_chatpos);
875         Cvar_RegisterVariable (&con_chatrect_x);
876         Cvar_RegisterVariable (&con_chatrect_y);
877         Cvar_RegisterVariable (&con_chatrect);
878         Cvar_RegisterVariable (&con_chatsize);
879         Cvar_RegisterVariable (&con_chattime);
880         Cvar_RegisterVariable (&con_chatwidth);
881         Cvar_RegisterVariable (&con_notify);
882         Cvar_RegisterVariable (&con_notifyalign);
883         Cvar_RegisterVariable (&con_notifysize);
884         Cvar_RegisterVariable (&con_notifytime);
885         Cvar_RegisterVariable (&con_textsize);
886         Cvar_RegisterVariable (&con_chatsound);
887
888         // --blub
889         Cvar_RegisterVariable (&con_nickcompletion);
890         Cvar_RegisterVariable (&con_nickcompletion_flags);
891
892         Cvar_RegisterVariable (&con_completion_playdemo); // *.dem
893         Cvar_RegisterVariable (&con_completion_timedemo); // *.dem
894         Cvar_RegisterVariable (&con_completion_exec); // *.cfg
895
896         Cvar_RegisterVariable (&condump_stripcolors);
897
898         // register our commands
899         Cmd_AddCommand ("toggleconsole", Con_ToggleConsole_f, "opens or closes the console");
900         Cmd_AddCommand ("messagemode", Con_MessageMode_f, "input a chat message to say to everyone");
901         Cmd_AddCommand ("messagemode2", Con_MessageMode2_f, "input a chat message to say to only your team");
902         Cmd_AddCommand ("commandmode", Con_CommandMode_f, "input a console command");
903         Cmd_AddCommand ("clear", Con_Clear_f, "clear console history");
904         Cmd_AddCommand ("maps", Con_Maps_f, "list information about available maps");
905         Cmd_AddCommand ("condump", Con_ConDump_f, "output console history to a file (see also log_file)");
906
907         con_initialized = true;
908         Con_DPrint("Console initialized.\n");
909 }
910
911 void Con_Shutdown (void)
912 {
913         if (con_mutex) Thread_LockMutex(con_mutex);
914         ConBuffer_Shutdown(&con);
915         if (con_mutex) Thread_UnlockMutex(con_mutex);
916         if (con_mutex) Thread_DestroyMutex(con_mutex);con_mutex = NULL;
917 }
918
919 /*
920 ================
921 Con_PrintToHistory
922
923 Handles cursor positioning, line wrapping, etc
924 All console printing must go through this in order to be displayed
925 If no console is visible, the notify window will pop up.
926 ================
927 */
928 static void Con_PrintToHistory(const char *txt, int mask)
929 {
930         // process:
931         //   \n goes to next line
932         //   \r deletes current line and makes a new one
933
934         static int cr_pending = 0;
935         static char buf[CON_TEXTSIZE]; // con_mutex
936         static int bufpos = 0;
937
938         if(!con.text) // FIXME uses a non-abstracted property of con
939                 return;
940
941         for(; *txt; ++txt)
942         {
943                 if(cr_pending)
944                 {
945                         ConBuffer_DeleteLastLine(&con);
946                         cr_pending = 0;
947                 }
948                 switch(*txt)
949                 {
950                         case 0:
951                                 break;
952                         case '\r':
953                                 ConBuffer_AddLine(&con, buf, bufpos, mask);
954                                 bufpos = 0;
955                                 cr_pending = 1;
956                                 break;
957                         case '\n':
958                                 ConBuffer_AddLine(&con, buf, bufpos, mask);
959                                 bufpos = 0;
960                                 break;
961                         default:
962                                 buf[bufpos++] = *txt;
963                                 if(bufpos >= con.textsize - 1) // FIXME uses a non-abstracted property of con
964                                 {
965                                         ConBuffer_AddLine(&con, buf, bufpos, mask);
966                                         bufpos = 0;
967                                 }
968                                 break;
969                 }
970         }
971 }
972
973 void Con_Rcon_Redirect_Init(lhnetsocket_t *sock, lhnetaddress_t *dest, qboolean proquakeprotocol)
974 {
975         rcon_redirect_sock = sock;
976         rcon_redirect_dest = dest;
977         rcon_redirect_proquakeprotocol = proquakeprotocol;
978         if (rcon_redirect_proquakeprotocol)
979         {
980                 // reserve space for the packet header
981                 rcon_redirect_buffer[0] = 0;
982                 rcon_redirect_buffer[1] = 0;
983                 rcon_redirect_buffer[2] = 0;
984                 rcon_redirect_buffer[3] = 0;
985                 // this is a reply to a CCREQ_RCON
986                 rcon_redirect_buffer[4] = (unsigned char)CCREP_RCON;
987         }
988         else
989                 memcpy(rcon_redirect_buffer, "\377\377\377\377n", 5); // QW rcon print
990         rcon_redirect_bufferpos = 5;
991 }
992
993 static void Con_Rcon_Redirect_Flush(void)
994 {
995         if(rcon_redirect_sock)
996         {
997                 rcon_redirect_buffer[rcon_redirect_bufferpos] = 0;
998                 if (rcon_redirect_proquakeprotocol)
999                 {
1000                         // update the length in the packet header
1001                         StoreBigLong((unsigned char *)rcon_redirect_buffer, NETFLAG_CTL | (rcon_redirect_bufferpos & NETFLAG_LENGTH_MASK));
1002                 }
1003                 NetConn_Write(rcon_redirect_sock, rcon_redirect_buffer, rcon_redirect_bufferpos, rcon_redirect_dest);
1004         }
1005         memcpy(rcon_redirect_buffer, "\377\377\377\377n", 5); // QW rcon print
1006         rcon_redirect_bufferpos = 5;
1007         rcon_redirect_proquakeprotocol = false;
1008 }
1009
1010 void Con_Rcon_Redirect_End(void)
1011 {
1012         Con_Rcon_Redirect_Flush();
1013         rcon_redirect_dest = NULL;
1014         rcon_redirect_sock = NULL;
1015 }
1016
1017 void Con_Rcon_Redirect_Abort(void)
1018 {
1019         rcon_redirect_dest = NULL;
1020         rcon_redirect_sock = NULL;
1021 }
1022
1023 /*
1024 ================
1025 Con_Rcon_AddChar
1026 ================
1027 */
1028 /// Adds a character to the rcon buffer.
1029 static void Con_Rcon_AddChar(int c)
1030 {
1031         if(log_dest_buffer_appending)
1032                 return;
1033         ++log_dest_buffer_appending;
1034
1035         // if this print is in response to an rcon command, add the character
1036         // to the rcon redirect buffer
1037
1038         if (rcon_redirect_dest)
1039         {
1040                 rcon_redirect_buffer[rcon_redirect_bufferpos++] = c;
1041                 if(rcon_redirect_bufferpos >= (int)sizeof(rcon_redirect_buffer) - 1)
1042                         Con_Rcon_Redirect_Flush();
1043         }
1044         else if(*log_dest_udp.string) // don't duplicate rcon command responses here, these are sent another way
1045         {
1046                 if(log_dest_buffer_pos == 0)
1047                         Log_DestBuffer_Init();
1048                 log_dest_buffer[log_dest_buffer_pos++] = c;
1049                 if(log_dest_buffer_pos >= sizeof(log_dest_buffer) - 1) // minus one, to allow for terminating zero
1050                         Log_DestBuffer_Flush_NoLock();
1051         }
1052         else
1053                 log_dest_buffer_pos = 0;
1054
1055         --log_dest_buffer_appending;
1056 }
1057
1058 /**
1059  * Convert an RGB color to its nearest quake color.
1060  * I'll cheat on this a bit by translating the colors to HSV first,
1061  * S and V decide if it's black or white, otherwise, H will decide the
1062  * actual color.
1063  * @param _r Red (0-255)
1064  * @param _g Green (0-255)
1065  * @param _b Blue (0-255)
1066  * @return A quake color character.
1067  */
1068 static char Sys_Con_NearestColor(const unsigned char _r, const unsigned char _g, const unsigned char _b)
1069 {
1070         float r = ((float)_r)/255.0;
1071         float g = ((float)_g)/255.0;
1072         float b = ((float)_b)/255.0;
1073         float min = min(r, min(g, b));
1074         float max = max(r, max(g, b));
1075
1076         int h; ///< Hue angle [0,360]
1077         float s; ///< Saturation [0,1]
1078         float v = max; ///< In HSV v == max [0,1]
1079
1080         if(max == min)
1081                 s = 0;
1082         else
1083                 s = 1.0 - (min/max);
1084
1085         // Saturation threshold. We now say 0.2 is the minimum value for a color!
1086         if(s < 0.2)
1087         {
1088                 // If the value is less than half, return a black color code.
1089                 // Otherwise return a white one.
1090                 if(v < 0.5)
1091                         return '0';
1092                 return '7';
1093         }
1094
1095         // Let's get the hue angle to define some colors:
1096         if(max == min)
1097                 h = 0;
1098         else if(max == r)
1099                 h = (int)(60.0 * (g-b)/(max-min))%360;
1100         else if(max == g)
1101                 h = (int)(60.0 * (b-r)/(max-min) + 120);
1102         else // if(max == b) redundant check
1103                 h = (int)(60.0 * (r-g)/(max-min) + 240);
1104
1105         if(h < 36) // *red* to orange
1106                 return '1';
1107         else if(h < 80) // orange over *yellow* to evilish-bright-green
1108                 return '3';
1109         else if(h < 150) // evilish-bright-green over *green* to ugly bright blue
1110                 return '2';
1111         else if(h < 200) // ugly bright blue over *bright blue* to darkish blue
1112                 return '5';
1113         else if(h < 270) // darkish blue over *dark blue* to cool purple
1114                 return '4';
1115         else if(h < 330) // cool purple over *purple* to ugly swiny red
1116                 return '6';
1117         else // ugly red to red closes the circly
1118                 return '1';
1119 }
1120
1121 /*
1122 ================
1123 Con_MaskPrint
1124 ================
1125 */
1126 extern cvar_t timestamps;
1127 extern cvar_t timeformat;
1128 extern qboolean sys_nostdout;
1129 void Con_MaskPrint(int additionalmask, const char *msg)
1130 {
1131         static int mask = 0;
1132         static int index = 0;
1133         static char line[MAX_INPUTLINE];
1134
1135         if (con_mutex)
1136                 Thread_LockMutex(con_mutex);
1137
1138         for (;*msg;msg++)
1139         {
1140                 Con_Rcon_AddChar(*msg);
1141                 // if this is the beginning of a new line, print timestamp
1142                 if (index == 0)
1143                 {
1144                         const char *timestamp = timestamps.integer ? Sys_TimeString(timeformat.string) : "";
1145                         // reset the color
1146                         // FIXME: 1. perhaps we should use a terminal system 2. use a constant instead of 7!
1147                         line[index++] = STRING_COLOR_TAG;
1148                         // assert( STRING_COLOR_DEFAULT < 10 )
1149                         line[index++] = STRING_COLOR_DEFAULT + '0';
1150                         // special color codes for chat messages must always come first
1151                         // for Con_PrintToHistory to work properly
1152                         if (*msg == 1 || *msg == 2 || *msg == 3)
1153                         {
1154                                 // play talk wav
1155                                 if (*msg == 1)
1156                                 {
1157                                         if (con_chatsound.value)
1158                                         {
1159                                                 if(IS_NEXUIZ_DERIVED(gamemode))
1160                                                 {
1161                                                         if(msg[1] == '\r' && cl.foundtalk2wav)
1162                                                                 S_LocalSound ("sound/misc/talk2.wav");
1163                                                         else
1164                                                                 S_LocalSound ("sound/misc/talk.wav");
1165                                                 }
1166                                                 else
1167                                                 {
1168                                                         if (msg[1] == '(' && cl.foundtalk2wav)
1169                                                                 S_LocalSound ("sound/misc/talk2.wav");
1170                                                         else
1171                                                                 S_LocalSound ("sound/misc/talk.wav");
1172                                                 }
1173                                         }
1174                                 }
1175                                 
1176                                 // Send to chatbox for say/tell (1) and messages (3)
1177                                 // 3 is just so that a message can be sent to the chatbox without a sound.
1178                                 if (*msg == 1 || *msg == 3)
1179                                         mask = CON_MASK_CHAT;
1180                                 
1181                                 line[index++] = STRING_COLOR_TAG;
1182                                 line[index++] = '3';
1183                                 msg++;
1184                                 Con_Rcon_AddChar(*msg);
1185                         }
1186                         // store timestamp
1187                         for (;*timestamp;index++, timestamp++)
1188                                 if (index < (int)sizeof(line) - 2)
1189                                         line[index] = *timestamp;
1190                         // add the mask
1191                         mask |= additionalmask;
1192                 }
1193                 // append the character
1194                 line[index++] = *msg;
1195                 // if this is a newline character, we have a complete line to print
1196                 if (*msg == '\n' || index >= (int)sizeof(line) / 2)
1197                 {
1198                         // terminate the line
1199                         line[index] = 0;
1200                         // send to log file
1201                         Log_ConPrint(line);
1202                         // send to scrollable buffer
1203                         if (con_initialized && cls.state != ca_dedicated)
1204                         {
1205                                 Con_PrintToHistory(line, mask);
1206                         }
1207                         // send to terminal or dedicated server window
1208                         if (!sys_nostdout)
1209                         if (developer.integer || !(mask & CON_MASK_DEVELOPER))
1210                         {
1211                                 if(sys_specialcharactertranslation.integer)
1212                                 {
1213                                         char *p;
1214                                         const char *q;
1215                                         p = line;
1216                                         while(*p)
1217                                         {
1218                                                 int ch = u8_getchar(p, &q);
1219                                                 if(ch >= 0xE000 && ch <= 0xE0FF && ((unsigned char) qfont_table[ch - 0xE000]) >= 0x20)
1220                                                 {
1221                                                         *p = qfont_table[ch - 0xE000];
1222                                                         if(q > p+1)
1223                                                                 memmove(p+1, q, strlen(q)+1);
1224                                                         p = p + 1;
1225                                                 }
1226                                                 else
1227                                                         p = p + (q - p);
1228                                         }
1229                                 }
1230
1231                                 if(sys_colortranslation.integer == 1) // ANSI
1232                                 {
1233                                         static char printline[MAX_INPUTLINE * 4 + 3];
1234                                                 // 2 can become 7 bytes, rounding that up to 8, and 3 bytes are added at the end
1235                                                 // a newline can transform into four bytes, but then prevents the three extra bytes from appearing
1236                                         int lastcolor = 0;
1237                                         const char *in;
1238                                         char *out;
1239                                         int color;
1240                                         for(in = line, out = printline; *in; ++in)
1241                                         {
1242                                                 switch(*in)
1243                                                 {
1244                                                         case STRING_COLOR_TAG:
1245                                                                 if( in[1] == STRING_COLOR_RGB_TAG_CHAR && isxdigit(in[2]) && isxdigit(in[3]) && isxdigit(in[4]) )
1246                                                                 {
1247                                                                         char r = tolower(in[2]);
1248                                                                         char g = tolower(in[3]);
1249                                                                         char b = tolower(in[4]);
1250                                                                         // it's a hex digit already, so the else part needs no check --blub
1251                                                                         if(isdigit(r)) r -= '0';
1252                                                                         else r -= 87;
1253                                                                         if(isdigit(g)) g -= '0';
1254                                                                         else g -= 87;
1255                                                                         if(isdigit(b)) b -= '0';
1256                                                                         else b -= 87;
1257                                                                         
1258                                                                         color = Sys_Con_NearestColor(r * 17, g * 17, b * 17);
1259                                                                         in += 3; // 3 only, the switch down there does the fourth
1260                                                                 }
1261                                                                 else
1262                                                                         color = in[1];
1263                                                                 
1264                                                                 switch(color)
1265                                                                 {
1266                                                                         case STRING_COLOR_TAG:
1267                                                                                 ++in;
1268                                                                                 *out++ = STRING_COLOR_TAG;
1269                                                                                 break;
1270                                                                         case '0':
1271                                                                         case '7':
1272                                                                                 // normal color
1273                                                                                 ++in;
1274                                                                                 if(lastcolor == 0) break; else lastcolor = 0;
1275                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = 'm';
1276                                                                                 break;
1277                                                                         case '1':
1278                                                                                 // light red
1279                                                                                 ++in;
1280                                                                                 if(lastcolor == 1) break; else lastcolor = 1;
1281                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = '1'; *out++ = ';'; *out++ = '3'; *out++ = '1'; *out++ = 'm';
1282                                                                                 break;
1283                                                                         case '2':
1284                                                                                 // light green
1285                                                                                 ++in;
1286                                                                                 if(lastcolor == 2) break; else lastcolor = 2;
1287                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = '1'; *out++ = ';'; *out++ = '3'; *out++ = '2'; *out++ = 'm';
1288                                                                                 break;
1289                                                                         case '3':
1290                                                                                 // yellow
1291                                                                                 ++in;
1292                                                                                 if(lastcolor == 3) break; else lastcolor = 3;
1293                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = '1'; *out++ = ';'; *out++ = '3'; *out++ = '3'; *out++ = 'm';
1294                                                                                 break;
1295                                                                         case '4':
1296                                                                                 // light blue
1297                                                                                 ++in;
1298                                                                                 if(lastcolor == 4) break; else lastcolor = 4;
1299                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = '1'; *out++ = ';'; *out++ = '3'; *out++ = '4'; *out++ = 'm';
1300                                                                                 break;
1301                                                                         case '5':
1302                                                                                 // light cyan
1303                                                                                 ++in;
1304                                                                                 if(lastcolor == 5) break; else lastcolor = 5;
1305                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = '1'; *out++ = ';'; *out++ = '3'; *out++ = '6'; *out++ = 'm';
1306                                                                                 break;
1307                                                                         case '6':
1308                                                                                 // light magenta
1309                                                                                 ++in;
1310                                                                                 if(lastcolor == 6) break; else lastcolor = 6;
1311                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = '1'; *out++ = ';'; *out++ = '3'; *out++ = '5'; *out++ = 'm';
1312                                                                                 break;
1313                                                                         // 7 handled above
1314                                                                         case '8':
1315                                                                         case '9':
1316                                                                                 // bold normal color
1317                                                                                 ++in;
1318                                                                                 if(lastcolor == 8) break; else lastcolor = 8;
1319                                                                                 *out++ = 0x1B; *out++ = '['; *out++ = '0'; *out++ = ';'; *out++ = '1'; *out++ = 'm';
1320                                                                                 break;
1321                                                                         default:
1322                                                                                 *out++ = STRING_COLOR_TAG;
1323                                                                                 break;
1324                                                                 }
1325                                                                 break;
1326                                                         case '\n':
1327                                                                 if(lastcolor != 0)
1328                                                                 {
1329                                                                         *out++ = 0x1B; *out++ = '['; *out++ = 'm';
1330                                                                         lastcolor = 0;
1331                                                                 }
1332                                                                 *out++ = *in;
1333                                                                 break;
1334                                                         default:
1335                                                                 *out++ = *in;
1336                                                                 break;
1337                                                 }
1338                                         }
1339                                         if(lastcolor != 0)
1340                                         {
1341                                                 *out++ = 0x1B;
1342                                                 *out++ = '[';
1343                                                 *out++ = 'm';
1344                                         }
1345                                         *out++ = 0;
1346                                         Sys_PrintToTerminal(printline);
1347                                 }
1348                                 else if(sys_colortranslation.integer == 2) // Quake
1349                                 {
1350                                         Sys_PrintToTerminal(line);
1351                                 }
1352                                 else // strip
1353                                 {
1354                                         static char printline[MAX_INPUTLINE]; // it can only get shorter here
1355                                         const char *in;
1356                                         char *out;
1357                                         for(in = line, out = printline; *in; ++in)
1358                                         {
1359                                                 switch(*in)
1360                                                 {
1361                                                         case STRING_COLOR_TAG:
1362                                                                 switch(in[1])
1363                                                                 {
1364                                                                         case STRING_COLOR_RGB_TAG_CHAR:
1365                                                                                 if ( isxdigit(in[2]) && isxdigit(in[3]) && isxdigit(in[4]) )
1366                                                                                 {
1367                                                                                         in+=4;
1368                                                                                         break;
1369                                                                                 }
1370                                                                                 *out++ = STRING_COLOR_TAG;
1371                                                                                 *out++ = STRING_COLOR_RGB_TAG_CHAR;
1372                                                                                 ++in;
1373                                                                                 break;
1374                                                                         case STRING_COLOR_TAG:
1375                                                                                 ++in;
1376                                                                                 *out++ = STRING_COLOR_TAG;
1377                                                                                 break;
1378                                                                         case '0':
1379                                                                         case '1':
1380                                                                         case '2':
1381                                                                         case '3':
1382                                                                         case '4':
1383                                                                         case '5':
1384                                                                         case '6':
1385                                                                         case '7':
1386                                                                         case '8':
1387                                                                         case '9':
1388                                                                                 ++in;
1389                                                                                 break;
1390                                                                         default:
1391                                                                                 *out++ = STRING_COLOR_TAG;
1392                                                                                 break;
1393                                                                 }
1394                                                                 break;
1395                                                         default:
1396                                                                 *out++ = *in;
1397                                                                 break;
1398                                                 }
1399                                         }
1400                                         *out++ = 0;
1401                                         Sys_PrintToTerminal(printline);
1402                                 }
1403                         }
1404                         // empty the line buffer
1405                         index = 0;
1406                         mask = 0;
1407                 }
1408         }
1409
1410         if (con_mutex)
1411                 Thread_UnlockMutex(con_mutex);
1412 }
1413
1414 /*
1415 ================
1416 Con_MaskPrintf
1417 ================
1418 */
1419 void Con_MaskPrintf(int mask, const char *fmt, ...)
1420 {
1421         va_list argptr;
1422         char msg[MAX_INPUTLINE];
1423
1424         va_start(argptr,fmt);
1425         dpvsnprintf(msg,sizeof(msg),fmt,argptr);
1426         va_end(argptr);
1427
1428         Con_MaskPrint(mask, msg);
1429 }
1430
1431 /*
1432 ================
1433 Con_Print
1434 ================
1435 */
1436 void Con_Print(const char *msg)
1437 {
1438         Con_MaskPrint(CON_MASK_PRINT, msg);
1439 }
1440
1441 /*
1442 ================
1443 Con_Printf
1444 ================
1445 */
1446 void Con_Printf(const char *fmt, ...)
1447 {
1448         va_list argptr;
1449         char msg[MAX_INPUTLINE];
1450
1451         va_start(argptr,fmt);
1452         dpvsnprintf(msg,sizeof(msg),fmt,argptr);
1453         va_end(argptr);
1454
1455         Con_MaskPrint(CON_MASK_PRINT, msg);
1456 }
1457
1458 /*
1459 ================
1460 Con_DPrint
1461 ================
1462 */
1463 void Con_DPrint(const char *msg)
1464 {
1465         if(developer.integer < 0) // at 0, we still add to the buffer but hide
1466                 return;
1467
1468         Con_MaskPrint(CON_MASK_DEVELOPER, msg);
1469 }
1470
1471 /*
1472 ================
1473 Con_DPrintf
1474 ================
1475 */
1476 void Con_DPrintf(const char *fmt, ...)
1477 {
1478         va_list argptr;
1479         char msg[MAX_INPUTLINE];
1480
1481         if(developer.integer < 0) // at 0, we still add to the buffer but hide
1482                 return;
1483
1484         va_start(argptr,fmt);
1485         dpvsnprintf(msg,sizeof(msg),fmt,argptr);
1486         va_end(argptr);
1487
1488         Con_MaskPrint(CON_MASK_DEVELOPER, msg);
1489 }
1490
1491
1492 /*
1493 ==============================================================================
1494
1495 DRAWING
1496
1497 ==============================================================================
1498 */
1499
1500 /*
1501 ================
1502 Con_DrawInput
1503
1504 The input line scrolls horizontally if typing goes beyond the right edge
1505
1506 Modified by EvilTypeGuy eviltypeguy@qeradiant.com
1507 ================
1508 */
1509 static void Con_DrawInput (void)
1510 {
1511         int             y;
1512         int             i;
1513         char text[sizeof(key_line)+5+1]; // space for ^^xRGB too
1514         float x, xo;
1515         size_t len_out;
1516         int col_out;
1517
1518         if (!key_consoleactive)
1519                 return;         // don't draw anything
1520
1521         strlcpy(text, key_line, sizeof(text));
1522
1523         // Advanced Console Editing by Radix radix@planetquake.com
1524         // Added/Modified by EvilTypeGuy eviltypeguy@qeradiant.com
1525
1526         y = (int)strlen(text);
1527
1528         // make the color code visible when the cursor is inside it
1529         if(text[key_linepos] != 0)
1530         {
1531                 for(i=1; i < 5 && key_linepos - i > 0; ++i)
1532                         if(text[key_linepos-i] == STRING_COLOR_TAG)
1533                         {
1534                                 int caret_pos, ofs = 0;
1535                                 caret_pos = key_linepos - i;
1536                                 if(i == 1 && text[caret_pos+1] == STRING_COLOR_TAG)
1537                                         ofs = 1;
1538                                 else if(i == 1 && isdigit(text[caret_pos+1]))
1539                                         ofs = 2;
1540                                 else if(text[caret_pos+1] == STRING_COLOR_RGB_TAG_CHAR && isxdigit(text[caret_pos+2]) && isxdigit(text[caret_pos+3]) && isxdigit(text[caret_pos+4]))
1541                                         ofs = 5;
1542                                 if(ofs && (size_t)(y + ofs + 1) < sizeof(text))
1543                                 {
1544                                         int carets = 1;
1545                                         while(caret_pos - carets >= 1 && text[caret_pos - carets] == STRING_COLOR_TAG)
1546                                                 ++carets;
1547                                         if(carets & 1)
1548                                         {
1549                                                 // str^2ing (displayed as string) --> str^2^^2ing (displayed as str^2ing)
1550                                                 // str^^ing (displayed as str^ing) --> str^^^^ing (displayed as str^^ing)
1551                                                 memmove(&text[caret_pos + ofs + 1], &text[caret_pos], y - caret_pos);
1552                                                 text[caret_pos + ofs] = STRING_COLOR_TAG;
1553                                                 y += ofs + 1;
1554                                                 text[y] = 0;
1555                                         }
1556                                 }
1557                                 break;
1558                         }
1559         }
1560
1561         len_out = key_linepos;
1562         col_out = -1;
1563         xo = DrawQ_TextWidth_UntilWidth_TrackColors(text, &len_out, con_textsize.value, con_textsize.value, &col_out, false, FONT_CONSOLE, 1000000000);
1564         x = vid_conwidth.value * 0.95 - xo; // scroll
1565         if(x >= 0)
1566                 x = 0;
1567
1568         // draw it
1569         DrawQ_String(x, con_vislines - con_textsize.value*2, text, y + 3, con_textsize.value, con_textsize.value, 1.0, 1.0, 1.0, 1.0, 0, NULL, false, FONT_CONSOLE );
1570
1571         // draw a cursor on top of this
1572         if ((int)(realtime*con_cursorspeed) & 1)                // cursor is visible
1573         {
1574                 if (!utf8_enable.integer)
1575                 {
1576                         text[0] = 11 + 130 * key_insert;        // either solid or triangle facing right
1577                         text[1] = 0;
1578                 }
1579                 else
1580                 {
1581                         size_t len;
1582                         const char *curbuf;
1583                         char charbuf16[16];
1584                         curbuf = u8_encodech(0xE000 + 11 + 130 * key_insert, &len, charbuf16);
1585                         memcpy(text, curbuf, len);
1586                         text[len] = 0;
1587                 }
1588                 DrawQ_String(x + xo, con_vislines - con_textsize.value*2, text, 0, con_textsize.value, con_textsize.value, 1.0, 1.0, 1.0, 1.0, 0, &col_out, false, FONT_CONSOLE);
1589         }
1590 }
1591
1592 typedef struct
1593 {
1594         dp_font_t *font;
1595         float alignment; // 0 = left, 0.5 = center, 1 = right
1596         float fontsize;
1597         float x;
1598         float y;
1599         float width;
1600         float ymin, ymax;
1601         const char *continuationString;
1602
1603         // PRIVATE:
1604         int colorindex; // init to -1
1605 }
1606 con_text_info_t;
1607
1608 static float Con_WordWidthFunc(void *passthrough, const char *w, size_t *length, float maxWidth)
1609 {
1610         con_text_info_t *ti = (con_text_info_t *) passthrough;
1611         if(w == NULL)
1612         {
1613                 ti->colorindex = -1;
1614                 return ti->fontsize * ti->font->maxwidth;
1615         }
1616         if(maxWidth >= 0)
1617                 return DrawQ_TextWidth_UntilWidth(w, length, ti->fontsize, ti->fontsize, false, ti->font, -maxWidth); // -maxWidth: we want at least one char
1618         else if(maxWidth == -1)
1619                 return DrawQ_TextWidth(w, *length, ti->fontsize, ti->fontsize, false, ti->font);
1620         else
1621         {
1622                 Sys_PrintfToTerminal("Con_WordWidthFunc: can't get here (maxWidth should never be %f)\n", maxWidth);
1623                 // Note: this is NOT a Con_Printf, as it could print recursively
1624                 return 0;
1625         }
1626 }
1627
1628 static int Con_CountLineFunc(void *passthrough, const char *line, size_t length, float width, qboolean isContinuation)
1629 {
1630         (void) passthrough;
1631         (void) line;
1632         (void) length;
1633         (void) width;
1634         (void) isContinuation;
1635         return 1;
1636 }
1637
1638 static int Con_DisplayLineFunc(void *passthrough, const char *line, size_t length, float width, qboolean isContinuation)
1639 {
1640         con_text_info_t *ti = (con_text_info_t *) passthrough;
1641
1642         if(ti->y < ti->ymin - 0.001)
1643                 (void) 0;
1644         else if(ti->y > ti->ymax - ti->fontsize + 0.001)
1645                 (void) 0;
1646         else
1647         {
1648                 int x = (int) (ti->x + (ti->width - width) * ti->alignment);
1649                 if(isContinuation && *ti->continuationString)
1650                         x = (int) DrawQ_String(x, ti->y, ti->continuationString, strlen(ti->continuationString), ti->fontsize, ti->fontsize, 1.0, 1.0, 1.0, 1.0, 0, NULL, false, ti->font);
1651                 if(length > 0)
1652                         DrawQ_String(x, ti->y, line, length, ti->fontsize, ti->fontsize, 1.0, 1.0, 1.0, 1.0, 0, &(ti->colorindex), false, ti->font);
1653         }
1654
1655         ti->y += ti->fontsize;
1656         return 1;
1657 }
1658
1659 static int Con_DrawNotifyRect(int mask_must, int mask_mustnot, float maxage, float x, float y, float width, float height, float fontsize, float alignment_x, float alignment_y, const char *continuationString)
1660 {
1661         int i;
1662         int lines = 0;
1663         int maxlines = (int) floor(height / fontsize + 0.01f);
1664         int startidx;
1665         int nskip = 0;
1666         int continuationWidth = 0;
1667         size_t l;
1668         double t = cl.time; // saved so it won't change
1669         con_text_info_t ti;
1670
1671         ti.font = (mask_must & CON_MASK_CHAT) ? FONT_CHAT : FONT_NOTIFY;
1672         ti.fontsize = fontsize;
1673         ti.alignment = alignment_x;
1674         ti.width = width;
1675         ti.ymin = y;
1676         ti.ymax = y + height;
1677         ti.continuationString = continuationString;
1678
1679         l = 0;
1680         Con_WordWidthFunc(&ti, NULL, &l, -1);
1681         l = strlen(continuationString);
1682         continuationWidth = (int) Con_WordWidthFunc(&ti, continuationString, &l, -1);
1683
1684         // first find the first line to draw by backwards iterating and word wrapping to find their length...
1685         startidx = CON_LINES_COUNT;
1686         for(i = CON_LINES_COUNT - 1; i >= 0; --i)
1687         {
1688                 con_lineinfo_t *l = &CON_LINES(i);
1689                 int mylines;
1690
1691                 if((l->mask & mask_must) != mask_must)
1692                         continue;
1693                 if(l->mask & mask_mustnot)
1694                         continue;
1695                 if(maxage && (l->addtime < t - maxage))
1696                         continue;
1697
1698                 // WE FOUND ONE!
1699                 // Calculate its actual height...
1700                 mylines = COM_Wordwrap(l->start, l->len, continuationWidth, width, Con_WordWidthFunc, &ti, Con_CountLineFunc, &ti);
1701                 if(lines + mylines >= maxlines)
1702                 {
1703                         nskip = lines + mylines - maxlines;
1704                         lines = maxlines;
1705                         startidx = i;
1706                         break;
1707                 }
1708                 lines += mylines;
1709                 startidx = i;
1710         }
1711
1712         // then center according to the calculated amount of lines...
1713         ti.x = x;
1714         ti.y = y + alignment_y * (height - lines * fontsize) - nskip * fontsize;
1715
1716         // then actually draw
1717         for(i = startidx; i < CON_LINES_COUNT; ++i)
1718         {
1719                 con_lineinfo_t *l = &CON_LINES(i);
1720
1721                 if((l->mask & mask_must) != mask_must)
1722                         continue;
1723                 if(l->mask & mask_mustnot)
1724                         continue;
1725                 if(maxage && (l->addtime < t - maxage))
1726                         continue;
1727
1728                 COM_Wordwrap(l->start, l->len, continuationWidth, width, Con_WordWidthFunc, &ti, Con_DisplayLineFunc, &ti);
1729         }
1730
1731         return lines;
1732 }
1733
1734 /*
1735 ================
1736 Con_DrawNotify
1737
1738 Draws the last few lines of output transparently over the game top
1739 ================
1740 */
1741 void Con_DrawNotify (void)
1742 {
1743         float   x, v, xr;
1744         float chatstart, notifystart, inputsize, height;
1745         float align;
1746         char    temptext[MAX_INPUTLINE];
1747         int numChatlines;
1748         int chatpos;
1749
1750         if (con_mutex) Thread_LockMutex(con_mutex);
1751         ConBuffer_FixTimes(&con);
1752
1753         numChatlines = con_chat.integer;
1754
1755         chatpos = con_chatpos.integer;
1756
1757         if (con_notify.integer < 0)
1758                 Cvar_SetValueQuick(&con_notify, 0);
1759         if (gamemode == GAME_TRANSFUSION)
1760                 v = 8; // vertical offset
1761         else
1762                 v = 0;
1763
1764         // GAME_NEXUIZ: center, otherwise left justify
1765         align = con_notifyalign.value;
1766         if(!*con_notifyalign.string) // empty string, evaluated to 0 above
1767         {
1768                 if(IS_OLDNEXUIZ_DERIVED(gamemode))
1769                         align = 0.5;
1770         }
1771
1772         if(numChatlines || !con_chatrect.integer)
1773         {
1774                 if(chatpos == 0)
1775                 {
1776                         // first chat, input line, then notify
1777                         chatstart = v;
1778                         notifystart = v + (numChatlines + 1) * con_chatsize.value;
1779                 }
1780                 else if(chatpos > 0)
1781                 {
1782                         // first notify, then (chatpos-1) empty lines, then chat, then input
1783                         notifystart = v;
1784                         chatstart = v + (con_notify.value + (chatpos - 1)) * con_notifysize.value;
1785                 }
1786                 else // if(chatpos < 0)
1787                 {
1788                         // first notify, then much space, then chat, then input, then -chatpos-1 empty lines
1789                         notifystart = v;
1790                         chatstart = vid_conheight.value - (-chatpos-1 + numChatlines + 1) * con_chatsize.value;
1791                 }
1792         }
1793         else
1794         {
1795                 // just notify and input
1796                 notifystart = v;
1797                 chatstart = 0; // shut off gcc warning
1798         }
1799
1800         v = notifystart + con_notifysize.value * Con_DrawNotifyRect(0, CON_MASK_INPUT | CON_MASK_HIDENOTIFY | (numChatlines ? CON_MASK_CHAT : 0) | CON_MASK_DEVELOPER, con_notifytime.value, 0, notifystart, vid_conwidth.value, con_notify.value * con_notifysize.value, con_notifysize.value, align, 0.0, "");
1801
1802         if(con_chatrect.integer)
1803         {
1804                 x = con_chatrect_x.value * vid_conwidth.value;
1805                 v = con_chatrect_y.value * vid_conheight.value;
1806         }
1807         else
1808         {
1809                 x = 0;
1810                 if(numChatlines) // only do this if chat area is enabled, or this would move the input line wrong
1811                         v = chatstart;
1812         }
1813         height = numChatlines * con_chatsize.value;
1814
1815         if(numChatlines)
1816         {
1817                 Con_DrawNotifyRect(CON_MASK_CHAT, CON_MASK_INPUT, con_chattime.value, x, v, vid_conwidth.value * con_chatwidth.value, height, con_chatsize.value, 0.0, 1.0, "^3 ... ");
1818                 v += height;
1819         }
1820         if (key_dest == key_message)
1821         {
1822                 //static char *cursor[2] = { "\xee\x80\x8a", "\xee\x80\x8b" }; // { off, on }
1823                 int colorindex = -1;
1824                 const char *cursor;
1825                 char charbuf16[16];
1826                 cursor = u8_encodech(0xE00A + ((int)(realtime * con_cursorspeed)&1), NULL, charbuf16);
1827
1828                 // LordHavoc: speedup, and other improvements
1829                 if (chat_mode < 0)
1830                         dpsnprintf(temptext, sizeof(temptext), "]%s%s", chat_buffer, cursor);
1831                 else if(chat_mode)
1832                         dpsnprintf(temptext, sizeof(temptext), "say_team:%s%s", chat_buffer, cursor);
1833                 else
1834                         dpsnprintf(temptext, sizeof(temptext), "say:%s%s", chat_buffer, cursor);
1835
1836                 // FIXME word wrap
1837                 inputsize = (numChatlines ? con_chatsize : con_notifysize).value;
1838                 xr = vid_conwidth.value - DrawQ_TextWidth(temptext, 0, inputsize, inputsize, false, FONT_CHAT);
1839                 x = min(xr, x);
1840                 DrawQ_String(x, v, temptext, 0, inputsize, inputsize, 1.0, 1.0, 1.0, 1.0, 0, &colorindex, false, FONT_CHAT);
1841         }
1842         if (con_mutex) Thread_UnlockMutex(con_mutex);
1843 }
1844
1845 /*
1846 ================
1847 Con_LineHeight
1848
1849 Returns the height of a given console line; calculates it if necessary.
1850 ================
1851 */
1852 static int Con_LineHeight(int lineno)
1853 {
1854         con_lineinfo_t *li = &CON_LINES(lineno);
1855         if(li->height == -1)
1856         {
1857                 float width = vid_conwidth.value;
1858                 con_text_info_t ti;
1859                 con_lineinfo_t *li = &CON_LINES(lineno);
1860                 ti.fontsize = con_textsize.value;
1861                 ti.font = FONT_CONSOLE;
1862                 li->height = COM_Wordwrap(li->start, li->len, 0, width, Con_WordWidthFunc, &ti, Con_CountLineFunc, NULL);
1863         }
1864         return li->height;
1865 }
1866
1867 /*
1868 ================
1869 Con_DrawConsoleLine
1870
1871 Draws a line of the console; returns its height in lines.
1872 If alpha is 0, the line is not drawn, but still wrapped and its height
1873 returned.
1874 ================
1875 */
1876 static int Con_DrawConsoleLine(int mask_must, int mask_mustnot, float y, int lineno, float ymin, float ymax)
1877 {
1878         float width = vid_conwidth.value;
1879         con_text_info_t ti;
1880         con_lineinfo_t *li = &CON_LINES(lineno);
1881
1882         if((li->mask & mask_must) != mask_must)
1883                 return 0;
1884         if((li->mask & mask_mustnot) != 0)
1885                 return 0;
1886
1887         ti.continuationString = "";
1888         ti.alignment = 0;
1889         ti.fontsize = con_textsize.value;
1890         ti.font = FONT_CONSOLE;
1891         ti.x = 0;
1892         ti.y = y - (Con_LineHeight(lineno) - 1) * ti.fontsize;
1893         ti.ymin = ymin;
1894         ti.ymax = ymax;
1895         ti.width = width;
1896
1897         return COM_Wordwrap(li->start, li->len, 0, width, Con_WordWidthFunc, &ti, Con_DisplayLineFunc, &ti);
1898 }
1899
1900 /*
1901 ================
1902 Con_LastVisibleLine
1903
1904 Calculates the last visible line index and how much to show of it based on
1905 con_backscroll.
1906 ================
1907 */
1908 static void Con_LastVisibleLine(int mask_must, int mask_mustnot, int *last, int *limitlast)
1909 {
1910         int lines_seen = 0;
1911         int i;
1912
1913         if(con_backscroll < 0)
1914                 con_backscroll = 0;
1915
1916         *last = 0;
1917
1918         // now count until we saw con_backscroll actual lines
1919         for(i = CON_LINES_COUNT - 1; i >= 0; --i)
1920         if((CON_LINES(i).mask & mask_must) == mask_must)
1921         if((CON_LINES(i).mask & mask_mustnot) == 0)
1922         {
1923                 int h = Con_LineHeight(i);
1924
1925                 // line is the last visible line?
1926                 *last = i;
1927                 if(lines_seen + h > con_backscroll && lines_seen <= con_backscroll)
1928                 {
1929                         *limitlast = lines_seen + h - con_backscroll;
1930                         return;
1931                 }
1932
1933                 lines_seen += h;
1934         }
1935
1936         // if we get here, no line was on screen - scroll so that one line is
1937         // visible then.
1938         con_backscroll = lines_seen - 1;
1939         *limitlast = 1;
1940 }
1941
1942 /*
1943 ================
1944 Con_DrawConsole
1945
1946 Draws the console with the solid background
1947 The typing input line at the bottom should only be drawn if typing is allowed
1948 ================
1949 */
1950 void Con_DrawConsole (int lines)
1951 {
1952         float alpha, alpha0;
1953         double sx, sy;
1954         int mask_must = 0;
1955         int mask_mustnot = (developer.integer>0) ? 0 : CON_MASK_DEVELOPER;
1956         cachepic_t *conbackpic;
1957
1958         if (lines <= 0)
1959                 return;
1960
1961         if (con_mutex) Thread_LockMutex(con_mutex);
1962
1963         if (con_backscroll < 0)
1964                 con_backscroll = 0;
1965
1966         con_vislines = lines;
1967
1968         r_draw2d_force = true;
1969
1970 // draw the background
1971         alpha0 = cls.signon == SIGNONS ? scr_conalpha.value : 1.0f; // always full alpha when not in game
1972         if((alpha = alpha0 * scr_conalphafactor.value) > 0)
1973         {
1974                 sx = scr_conscroll_x.value;
1975                 sy = scr_conscroll_y.value;
1976                 conbackpic = scr_conbrightness.value >= 0.01f ? Draw_CachePic_Flags("gfx/conback", (sx != 0 || sy != 0) ? CACHEPICFLAG_NOCLAMP : 0) : NULL;
1977                 sx *= realtime; sy *= realtime;
1978                 sx -= floor(sx); sy -= floor(sy);
1979                 if (conbackpic && conbackpic->tex != r_texture_notexture)
1980                         DrawQ_SuperPic(0, lines - vid_conheight.integer, conbackpic, vid_conwidth.integer, vid_conheight.integer,
1981                                         0 + sx, 0 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
1982                                         1 + sx, 0 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
1983                                         0 + sx, 1 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
1984                                         1 + sx, 1 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
1985                                         0);
1986                 else
1987                         DrawQ_Fill(0, lines - vid_conheight.integer, vid_conwidth.integer, vid_conheight.integer, 0.0f, 0.0f, 0.0f, alpha, 0);
1988         }
1989         if((alpha = alpha0 * scr_conalpha2factor.value) > 0)
1990         {
1991                 sx = scr_conscroll2_x.value;
1992                 sy = scr_conscroll2_y.value;
1993                 conbackpic = Draw_CachePic_Flags("gfx/conback2", (sx != 0 || sy != 0) ? CACHEPICFLAG_NOCLAMP : 0);
1994                 sx *= realtime; sy *= realtime;
1995                 sx -= floor(sx); sy -= floor(sy);
1996                 if(conbackpic && conbackpic->tex != r_texture_notexture)
1997                         DrawQ_SuperPic(0, lines - vid_conheight.integer, conbackpic, vid_conwidth.integer, vid_conheight.integer,
1998                                         0 + sx, 0 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
1999                                         1 + sx, 0 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
2000                                         0 + sx, 1 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
2001                                         1 + sx, 1 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
2002                                         0);
2003         }
2004         if((alpha = alpha0 * scr_conalpha3factor.value) > 0)
2005         {
2006                 sx = scr_conscroll3_x.value;
2007                 sy = scr_conscroll3_y.value;
2008                 conbackpic = Draw_CachePic_Flags("gfx/conback3", (sx != 0 || sy != 0) ? CACHEPICFLAG_NOCLAMP : 0);
2009                 sx *= realtime; sy *= realtime;
2010                 sx -= floor(sx); sy -= floor(sy);
2011                 if(conbackpic && conbackpic->tex != r_texture_notexture)
2012                         DrawQ_SuperPic(0, lines - vid_conheight.integer, conbackpic, vid_conwidth.integer, vid_conheight.integer,
2013                                         0 + sx, 0 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
2014                                         1 + sx, 0 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
2015                                         0 + sx, 1 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
2016                                         1 + sx, 1 + sy, scr_conbrightness.value, scr_conbrightness.value, scr_conbrightness.value, alpha,
2017                                         0);
2018         }
2019         DrawQ_String(vid_conwidth.integer - DrawQ_TextWidth(engineversion, 0, con_textsize.value, con_textsize.value, false, FONT_CONSOLE), lines - con_textsize.value, engineversion, 0, con_textsize.value, con_textsize.value, 1, 0, 0, 1, 0, NULL, true, FONT_CONSOLE);
2020
2021 // draw the text
2022 #if 0
2023         {
2024                 int i;
2025                 int count = CON_LINES_COUNT;
2026                 float ymax = con_vislines - 2 * con_textsize.value;
2027                 float y = ymax + con_textsize.value * con_backscroll;
2028                 for (i = 0;i < count && y >= 0;i++)
2029                         y -= Con_DrawConsoleLine(mask_must, mask_mustnot, y - con_textsize.value, CON_LINES_COUNT - 1 - i, 0, ymax) * con_textsize.value;
2030                 // fix any excessive scrollback for the next frame
2031                 if (i >= count && y >= 0)
2032                 {
2033                         con_backscroll -= (int)(y / con_textsize.value);
2034                         if (con_backscroll < 0)
2035                                 con_backscroll = 0;
2036                 }
2037         }
2038 #else
2039         if(CON_LINES_COUNT > 0)
2040         {
2041                 int i, last, limitlast;
2042                 float y;
2043                 float ymax = con_vislines - 2 * con_textsize.value;
2044                 Con_LastVisibleLine(mask_must, mask_mustnot, &last, &limitlast);
2045                 //Con_LastVisibleLine(mask_must, mask_mustnot, &last, &limitlast);
2046                 y = ymax - con_textsize.value;
2047
2048                 if(limitlast)
2049                         y += (CON_LINES(last).height - limitlast) * con_textsize.value;
2050                 i = last;
2051
2052                 for(;;)
2053                 {
2054                         y -= Con_DrawConsoleLine(mask_must, mask_mustnot, y, i, 0, ymax) * con_textsize.value;
2055                         if(i == 0)
2056                                 break; // top of console buffer
2057                         if(y < 0)
2058                                 break; // top of console window
2059                         limitlast = 0;
2060                         --i;
2061                 }
2062         }
2063 #endif
2064
2065 // draw the input prompt, user text, and cursor if desired
2066         Con_DrawInput ();
2067
2068         r_draw2d_force = false;
2069         if (con_mutex) Thread_UnlockMutex(con_mutex);
2070 }
2071
2072 /*
2073 GetMapList
2074
2075 Made by [515]
2076 Prints not only map filename, but also
2077 its format (q1/q2/q3/hl) and even its message
2078 */
2079 //[515]: here is an ugly hack.. two gotos... oh my... *but it works*
2080 //LordHavoc: rewrote bsp type detection, rewrote message extraction to do proper worldspawn parsing
2081 //LordHavoc: added .ent file loading, and redesigned error handling to still try the .ent file even if the map format is not recognized, this also eliminated one goto
2082 //LordHavoc: FIXME: man this GetMapList is STILL ugly code even after my cleanups...
2083 qboolean GetMapList (const char *s, char *completedname, int completednamebufferlength)
2084 {
2085         fssearch_t      *t;
2086         char            message[1024];
2087         int                     i, k, max, p, o, min;
2088         unsigned char *len;
2089         qfile_t         *f;
2090         unsigned char buf[1024];
2091
2092         dpsnprintf(message, sizeof(message), "maps/%s*.bsp", s);
2093         t = FS_Search(message, 1, true);
2094         if(!t)
2095                 return false;
2096         if (t->numfilenames > 1)
2097                 Con_Printf("^1 %i maps found :\n", t->numfilenames);
2098         len = (unsigned char *)Z_Malloc(t->numfilenames);
2099         min = 666;
2100         for(max=i=0;i<t->numfilenames;i++)
2101         {
2102                 k = (int)strlen(t->filenames[i]);
2103                 k -= 9;
2104                 if(max < k)
2105                         max = k;
2106                 else
2107                 if(min > k)
2108                         min = k;
2109                 len[i] = k;
2110         }
2111         o = (int)strlen(s);
2112         for(i=0;i<t->numfilenames;i++)
2113         {
2114                 int lumpofs = 0, lumplen = 0;
2115                 char *entities = NULL;
2116                 const char *data = NULL;
2117                 char keyname[64];
2118                 char entfilename[MAX_QPATH];
2119                 char desc[64];
2120                 desc[0] = 0;
2121                 strlcpy(message, "^1ERROR: open failed^7", sizeof(message));
2122                 p = 0;
2123                 f = FS_OpenVirtualFile(t->filenames[i], true);
2124                 if(f)
2125                 {
2126                         strlcpy(message, "^1ERROR: not a known map format^7", sizeof(message));
2127                         memset(buf, 0, 1024);
2128                         FS_Read(f, buf, 1024);
2129                         if (!memcmp(buf, "IBSP", 4))
2130                         {
2131                                 p = LittleLong(((int *)buf)[1]);
2132                                 if (p == Q3BSPVERSION)
2133                                 {
2134                                         q3dheader_t *header = (q3dheader_t *)buf;
2135                                         lumpofs = LittleLong(header->lumps[Q3LUMP_ENTITIES].fileofs);
2136                                         lumplen = LittleLong(header->lumps[Q3LUMP_ENTITIES].filelen);
2137                                         dpsnprintf(desc, sizeof(desc), "Q3BSP%i", p);
2138                                 }
2139                                 else if (p == Q2BSPVERSION)
2140                                 {
2141                                         q2dheader_t *header = (q2dheader_t *)buf;
2142                                         lumpofs = LittleLong(header->lumps[Q2LUMP_ENTITIES].fileofs);
2143                                         lumplen = LittleLong(header->lumps[Q2LUMP_ENTITIES].filelen);
2144                                         dpsnprintf(desc, sizeof(desc), "Q2BSP%i", p);
2145                                 }
2146                                 else
2147                                         dpsnprintf(desc, sizeof(desc), "IBSP%i", p);
2148                         }
2149                         else if (BuffLittleLong(buf) == BSPVERSION)
2150                         {
2151                                 lumpofs = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES);
2152                                 lumplen = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES + 4);
2153                                 dpsnprintf(desc, sizeof(desc), "BSP29");
2154                         }
2155                         else if (BuffLittleLong(buf) == 30)
2156                         {
2157                                 lumpofs = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES);
2158                                 lumplen = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES + 4);
2159                                 dpsnprintf(desc, sizeof(desc), "BSPHL");
2160                         }
2161                         else if (!memcmp(buf, "BSP2", 4))
2162                         {
2163                                 lumpofs = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES);
2164                                 lumplen = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES + 4);
2165                                 dpsnprintf(desc, sizeof(desc), "BSP2");
2166                         }
2167                         else if (!memcmp(buf, "2PSB", 4))
2168                         {
2169                                 lumpofs = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES);
2170                                 lumplen = BuffLittleLong(buf + 4 + 8 * LUMP_ENTITIES + 4);
2171                                 dpsnprintf(desc, sizeof(desc), "BSP2RMQe");
2172                         }
2173                         else
2174                         {
2175                                 dpsnprintf(desc, sizeof(desc), "unknown%i", BuffLittleLong(buf));
2176                         }
2177                         strlcpy(entfilename, t->filenames[i], sizeof(entfilename));
2178                         memcpy(entfilename + strlen(entfilename) - 4, ".ent", 5);
2179                         entities = (char *)FS_LoadFile(entfilename, tempmempool, true, NULL);
2180                         if (!entities && lumplen >= 10)
2181                         {
2182                                 FS_Seek(f, lumpofs, SEEK_SET);
2183                                 entities = (char *)Z_Malloc(lumplen + 1);
2184                                 FS_Read(f, entities, lumplen);
2185                         }
2186                         if (entities)
2187                         {
2188                                 // if there are entities to parse, a missing message key just
2189                                 // means there is no title, so clear the message string now
2190                                 message[0] = 0;
2191                                 data = entities;
2192                                 for (;;)
2193                                 {
2194                                         int l;
2195                                         if (!COM_ParseToken_Simple(&data, false, false, true))
2196                                                 break;
2197                                         if (com_token[0] == '{')
2198                                                 continue;
2199                                         if (com_token[0] == '}')
2200                                                 break;
2201                                         // skip leading whitespace
2202                                         for (k = 0;com_token[k] && ISWHITESPACE(com_token[k]);k++);
2203                                         for (l = 0;l < (int)sizeof(keyname) - 1 && com_token[k+l] && !ISWHITESPACE(com_token[k+l]);l++)
2204                                                 keyname[l] = com_token[k+l];
2205                                         keyname[l] = 0;
2206                                         if (!COM_ParseToken_Simple(&data, false, false, true))
2207                                                 break;
2208                                         if (developer_extra.integer)
2209                                                 Con_DPrintf("key: %s %s\n", keyname, com_token);
2210                                         if (!strcmp(keyname, "message"))
2211                                         {
2212                                                 // get the message contents
2213                                                 strlcpy(message, com_token, sizeof(message));
2214                                                 break;
2215                                         }
2216                                 }
2217                         }
2218                 }
2219                 if (entities)
2220                         Z_Free(entities);
2221                 if(f)
2222                         FS_Close(f);
2223                 *(t->filenames[i]+len[i]+5) = 0;
2224                 Con_Printf("%16s (%-8s) %s\n", t->filenames[i]+5, desc, message);
2225         }
2226         Con_Print("\n");
2227         for(p=o;p<min;p++)
2228         {
2229                 k = *(t->filenames[0]+5+p);
2230                 if(k == 0)
2231                         goto endcomplete;
2232                 for(i=1;i<t->numfilenames;i++)
2233                         if(*(t->filenames[i]+5+p) != k)
2234                                 goto endcomplete;
2235         }
2236 endcomplete:
2237         if(p > o && completedname && completednamebufferlength > 0)
2238         {
2239                 memset(completedname, 0, completednamebufferlength);
2240                 memcpy(completedname, (t->filenames[0]+5), min(p, completednamebufferlength - 1));
2241         }
2242         Z_Free(len);
2243         FS_FreeSearch(t);
2244         return p > o;
2245 }
2246
2247 /*
2248         Con_DisplayList
2249
2250         New function for tab-completion system
2251         Added by EvilTypeGuy
2252         MEGA Thanks to Taniwha
2253
2254 */
2255 void Con_DisplayList(const char **list)
2256 {
2257         int i = 0, pos = 0, len = 0, maxlen = 0, width = (con_linewidth - 4);
2258         const char **walk = list;
2259
2260         while (*walk) {
2261                 len = (int)strlen(*walk);
2262                 if (len > maxlen)
2263                         maxlen = len;
2264                 walk++;
2265         }
2266         maxlen += 1;
2267
2268         while (*list) {
2269                 len = (int)strlen(*list);
2270                 if (pos + maxlen >= width) {
2271                         Con_Print("\n");
2272                         pos = 0;
2273                 }
2274
2275                 Con_Print(*list);
2276                 for (i = 0; i < (maxlen - len); i++)
2277                         Con_Print(" ");
2278
2279                 pos += maxlen;
2280                 list++;
2281         }
2282
2283         if (pos)
2284                 Con_Print("\n\n");
2285 }
2286
2287
2288 // Now it becomes TRICKY :D --blub
2289 static char Nicks_list[MAX_SCOREBOARD][MAX_SCOREBOARDNAME];     // contains the nicks with colors and all that
2290 static char Nicks_sanlist[MAX_SCOREBOARD][MAX_SCOREBOARDNAME];  // sanitized list for completion when there are other possible matches.
2291 // means: when somebody uses a cvar's name as his name, we won't ever get his colors in there...
2292 static int Nicks_offset[MAX_SCOREBOARD]; // when nicks use a space, we need this to move the completion list string starts to avoid invalid memcpys
2293 static int Nicks_matchpos;
2294
2295 // co against <<:BLASTER:>> is true!?
2296 static int Nicks_strncasecmp_nospaces(char *a, char *b, unsigned int a_len)
2297 {
2298         while(a_len)
2299         {
2300                 if(tolower(*a) == tolower(*b))
2301                 {
2302                         if(*a == 0)
2303                                 return 0;
2304                         --a_len;
2305                         ++a;
2306                         ++b;
2307                         continue;
2308                 }
2309                 if(!*a)
2310                         return -1;
2311                 if(!*b)
2312                         return 1;
2313                 if(*a == ' ')
2314                         return (*a < *b) ? -1 : 1;
2315                 if(*b == ' ')
2316                         ++b;
2317                 else
2318                         return (*a < *b) ? -1 : 1;
2319         }
2320         return 0;
2321 }
2322 static int Nicks_strncasecmp(char *a, char *b, unsigned int a_len)
2323 {
2324         char space_char;
2325         if(!(con_nickcompletion_flags.integer & NICKS_ALPHANUMERICS_ONLY))
2326         {
2327                 if(con_nickcompletion_flags.integer & NICKS_NO_SPACES)
2328                         return Nicks_strncasecmp_nospaces(a, b, a_len);
2329                 return strncasecmp(a, b, a_len);
2330         }
2331
2332         space_char = (con_nickcompletion_flags.integer & NICKS_NO_SPACES) ? 'a' : ' ';
2333
2334         // ignore non alphanumerics of B
2335         // if A contains a non-alphanumeric, B must contain it as well though!
2336         while(a_len)
2337         {
2338                 qboolean alnum_a, alnum_b;
2339
2340                 if(tolower(*a) == tolower(*b))
2341                 {
2342                         if(*a == 0) // end of both strings, they're equal
2343                                 return 0;
2344                         --a_len;
2345                         ++a;
2346                         ++b;
2347                         continue;
2348                 }
2349                 // not equal, end of one string?
2350                 if(!*a)
2351                         return -1;
2352                 if(!*b)
2353                         return 1;
2354                 // ignore non alphanumerics
2355                 alnum_a = ( (*a >= 'a' && *a <= 'z') || (*a >= 'A' && *a <= 'Z') || (*a >= '0' && *a <= '9') || *a == space_char);
2356                 alnum_b = ( (*b >= 'a' && *b <= 'z') || (*b >= 'A' && *b <= 'Z') || (*b >= '0' && *b <= '9') || *b == space_char);
2357                 if(!alnum_a) // b must contain this
2358                         return (*a < *b) ? -1 : 1;
2359                 if(!alnum_b)
2360                         ++b;
2361                 // otherwise, both are alnum, they're just not equal, return the appropriate number
2362                 else
2363                         return (*a < *b) ? -1 : 1;
2364         }
2365         return 0;
2366 }
2367
2368
2369 /* Nicks_CompleteCountPossible
2370
2371    Count the number of possible nicks to complete
2372  */
2373 static int Nicks_CompleteCountPossible(char *line, int pos, char *s, qboolean isCon)
2374 {
2375         char name[128];
2376         int i, p;
2377         int match;
2378         int spos;
2379         int count = 0;
2380
2381         if(!con_nickcompletion.integer)
2382                 return 0;
2383
2384         // changed that to 1
2385         if(!line[0])// || !line[1]) // we want at least... 2 written characters
2386                 return 0;
2387
2388         for(i = 0; i < cl.maxclients; ++i)
2389         {
2390                 p = i;
2391                 if(!cl.scores[p].name[0])
2392                         continue;
2393
2394                 SanitizeString(cl.scores[p].name, name);
2395                 //Con_Printf(" ^2Sanitized: ^7%s -> %s", cl.scores[p].name, name);
2396
2397                 if(!name[0])
2398                         continue;
2399
2400                 match = -1;
2401                 spos = pos - 1; // no need for a minimum of characters :)
2402
2403                 while(spos >= 0)
2404                 {
2405                         if(spos > 0 && line[spos-1] != ' ' && line[spos-1] != ';' && line[spos-1] != '\"' && line[spos-1] != '\'')
2406                         {
2407                                 if(!(isCon && line[spos-1] == ']' && spos == 1) && // console start
2408                                    !(spos > 1 && line[spos-1] >= '0' && line[spos-1] <= '9' && line[spos-2] == STRING_COLOR_TAG)) // color start
2409                                 {
2410                                         --spos;
2411                                         continue;
2412                                 }
2413                         }
2414                         if(isCon && spos == 0)
2415                                 break;
2416                         if(Nicks_strncasecmp(line+spos, name, pos-spos) == 0)
2417                                 match = spos;
2418                         --spos;
2419                 }
2420                 if(match < 0)
2421                         continue;
2422                 //Con_Printf("Possible match: %s|%s\n", cl.scores[p].name, name);
2423                 strlcpy(Nicks_list[count], cl.scores[p].name, sizeof(Nicks_list[count]));
2424
2425                 // the sanitized list
2426                 strlcpy(Nicks_sanlist[count], name, sizeof(Nicks_sanlist[count]));
2427                 if(!count)
2428                 {
2429                         Nicks_matchpos = match;
2430                 }
2431
2432                 Nicks_offset[count] = s - (&line[match]);
2433                 //Con_Printf("offset for %s: %i\n", name, Nicks_offset[count]);
2434
2435                 ++count;
2436         }
2437         return count;
2438 }
2439
2440 static void Cmd_CompleteNicksPrint(int count)
2441 {
2442         int i;
2443         for(i = 0; i < count; ++i)
2444                 Con_Printf("%s\n", Nicks_list[i]);
2445 }
2446
2447 static void Nicks_CutMatchesNormal(int count)
2448 {
2449         // cut match 0 down to the longest possible completion
2450         int i;
2451         unsigned int c, l;
2452         c = (unsigned int)strlen(Nicks_sanlist[0]) - 1;
2453         for(i = 1; i < count; ++i)
2454         {
2455                 l = (unsigned int)strlen(Nicks_sanlist[i]) - 1;
2456                 if(l < c)
2457                         c = l;
2458
2459                 for(l = 0; l <= c; ++l)
2460                         if(tolower(Nicks_sanlist[0][l]) != tolower(Nicks_sanlist[i][l]))
2461                         {
2462                                 c = l-1;
2463                                 break;
2464                         }
2465         }
2466         Nicks_sanlist[0][c+1] = 0;
2467         //Con_Printf("List0: %s\n", Nicks_sanlist[0]);
2468 }
2469
2470 static unsigned int Nicks_strcleanlen(const char *s)
2471 {
2472         unsigned int l = 0;
2473         while(*s)
2474         {
2475                 if( (*s >= 'a' && *s <= 'z') ||
2476                     (*s >= 'A' && *s <= 'Z') ||
2477                     (*s >= '0' && *s <= '9') ||
2478                     *s == ' ')
2479                         ++l;
2480                 ++s;
2481         }
2482         return l;
2483 }
2484
2485 static void Nicks_CutMatchesAlphaNumeric(int count)
2486 {
2487         // cut match 0 down to the longest possible completion
2488         int i;
2489         unsigned int c, l;
2490         char tempstr[sizeof(Nicks_sanlist[0])];
2491         char *a, *b;
2492         char space_char = (con_nickcompletion_flags.integer & NICKS_NO_SPACES) ? 'a' : ' '; // yes this is correct, we want NO spaces when no spaces
2493
2494         c = (unsigned int)strlen(Nicks_sanlist[0]);
2495         for(i = 0, l = 0; i < (int)c; ++i)
2496         {
2497                 if( (Nicks_sanlist[0][i] >= 'a' && Nicks_sanlist[0][i] <= 'z') ||
2498                     (Nicks_sanlist[0][i] >= 'A' && Nicks_sanlist[0][i] <= 'Z') ||
2499                     (Nicks_sanlist[0][i] >= '0' && Nicks_sanlist[0][i] <= '9') || Nicks_sanlist[0][i] == space_char) // this is what's COPIED
2500                 {
2501                         tempstr[l++] = Nicks_sanlist[0][i];
2502                 }
2503         }
2504         tempstr[l] = 0;
2505
2506         for(i = 1; i < count; ++i)
2507         {
2508                 a = tempstr;
2509                 b = Nicks_sanlist[i];
2510                 while(1)
2511                 {
2512                         if(!*a)
2513                                 break;
2514                         if(!*b)
2515                         {
2516                                 *a = 0;
2517                                 break;
2518                         }
2519                         if(tolower(*a) == tolower(*b))
2520                         {
2521                                 ++a;
2522                                 ++b;
2523                                 continue;
2524                         }
2525                         if( (*b >= 'a' && *b <= 'z') || (*b >= 'A' && *b <= 'Z') || (*b >= '0' && *b <= '9') || *b == space_char)
2526                         {
2527                                 // b is alnum, so cut
2528                                 *a = 0;
2529                                 break;
2530                         }
2531                         ++b;
2532                 }
2533         }
2534         // Just so you know, if cutmatchesnormal doesn't kill the first entry, then even the non-alnums fit
2535         Nicks_CutMatchesNormal(count);
2536         //if(!Nicks_sanlist[0][0])
2537         if(Nicks_strcleanlen(Nicks_sanlist[0]) < strlen(tempstr))
2538         {
2539                 // if the clean sanitized one is longer than the current one, use it, it has crap chars which definitely are in there
2540                 strlcpy(Nicks_sanlist[0], tempstr, sizeof(Nicks_sanlist[0]));
2541         }
2542 }
2543
2544 static void Nicks_CutMatchesNoSpaces(int count)
2545 {
2546         // cut match 0 down to the longest possible completion
2547         int i;
2548         unsigned int c, l;
2549         char tempstr[sizeof(Nicks_sanlist[0])];
2550         char *a, *b;
2551
2552         c = (unsigned int)strlen(Nicks_sanlist[0]);
2553         for(i = 0, l = 0; i < (int)c; ++i)
2554         {
2555                 if(Nicks_sanlist[0][i] != ' ') // here it's what's NOT copied
2556                 {
2557                         tempstr[l++] = Nicks_sanlist[0][i];
2558                 }
2559         }
2560         tempstr[l] = 0;
2561
2562         for(i = 1; i < count; ++i)
2563         {
2564                 a = tempstr;
2565                 b = Nicks_sanlist[i];
2566                 while(1)
2567                 {
2568                         if(!*a)
2569                                 break;
2570                         if(!*b)
2571                         {
2572                                 *a = 0;
2573                                 break;
2574                         }
2575                         if(tolower(*a) == tolower(*b))
2576                         {
2577                                 ++a;
2578                                 ++b;
2579                                 continue;
2580                         }
2581                         if(*b != ' ')
2582                         {
2583                                 *a = 0;
2584                                 break;
2585                         }
2586                         ++b;
2587                 }
2588         }
2589         // Just so you know, if cutmatchesnormal doesn't kill the first entry, then even the non-alnums fit
2590         Nicks_CutMatchesNormal(count);
2591         //if(!Nicks_sanlist[0][0])
2592         //Con_Printf("TS: %s\n", tempstr);
2593         if(Nicks_strcleanlen(Nicks_sanlist[0]) < strlen(tempstr))
2594         {
2595                 // if the clean sanitized one is longer than the current one, use it, it has crap chars which definitely are in there
2596                 strlcpy(Nicks_sanlist[0], tempstr, sizeof(Nicks_sanlist[0]));
2597         }
2598 }
2599
2600 static void Nicks_CutMatches(int count)
2601 {
2602         if(con_nickcompletion_flags.integer & NICKS_ALPHANUMERICS_ONLY)
2603                 Nicks_CutMatchesAlphaNumeric(count);
2604         else if(con_nickcompletion_flags.integer & NICKS_NO_SPACES)
2605                 Nicks_CutMatchesNoSpaces(count);
2606         else
2607                 Nicks_CutMatchesNormal(count);
2608 }
2609
2610 static const char **Nicks_CompleteBuildList(int count)
2611 {
2612         const char **buf;
2613         int bpos = 0;
2614         // the list is freed by Con_CompleteCommandLine, so create a char**
2615         buf = (const char **)Mem_Alloc(tempmempool, count * sizeof(const char *) + sizeof (const char *));
2616
2617         for(; bpos < count; ++bpos)
2618                 buf[bpos] = Nicks_sanlist[bpos] + Nicks_offset[bpos];
2619
2620         Nicks_CutMatches(count);
2621
2622         buf[bpos] = NULL;
2623         return buf;
2624 }
2625
2626 /*
2627         Nicks_AddLastColor
2628         Restores the previous used color, after the autocompleted name.
2629 */
2630 static int Nicks_AddLastColor(char *buffer, int pos)
2631 {
2632         qboolean quote_added = false;
2633         int match;
2634         int color = STRING_COLOR_DEFAULT + '0';
2635         char r = 0, g = 0, b = 0;
2636
2637         if(con_nickcompletion_flags.integer & NICKS_ADD_QUOTE && buffer[Nicks_matchpos-1] == '\"')
2638         {
2639                 // we'll have to add a quote :)
2640                 buffer[pos++] = '\"';
2641                 quote_added = true;
2642         }
2643
2644         if((!quote_added && con_nickcompletion_flags.integer & NICKS_ADD_COLOR) || con_nickcompletion_flags.integer & NICKS_FORCE_COLOR)
2645         {
2646                 // add color when no quote was added, or when flags &4?
2647                 // find last color
2648                 for(match = Nicks_matchpos-1; match >= 0; --match)
2649                 {
2650                         if(buffer[match] == STRING_COLOR_TAG)
2651                         {
2652                                 if( isdigit(buffer[match+1]) )
2653                                 {
2654                                         color = buffer[match+1];
2655                                         break;
2656                                 }
2657                                 else if(buffer[match+1] == STRING_COLOR_RGB_TAG_CHAR)
2658                                 {
2659                                         if ( isxdigit(buffer[match+2]) && isxdigit(buffer[match+3]) && isxdigit(buffer[match+4]) )
2660                                         {
2661                                                 r = buffer[match+2];
2662                                                 g = buffer[match+3];
2663                                                 b = buffer[match+4];
2664                                                 color = -1;
2665                                                 break;
2666                                         }
2667                                 }
2668                         }
2669                 }
2670                 if(!quote_added)
2671                 {
2672                         if( pos >= 2 && buffer[pos-2] == STRING_COLOR_TAG && isdigit(buffer[pos-1]) ) // when thes use &4
2673                                 pos -= 2;
2674                         else if( pos >= 5 && buffer[pos-5] == STRING_COLOR_TAG && buffer[pos-4] == STRING_COLOR_RGB_TAG_CHAR
2675                                          && isxdigit(buffer[pos-3]) && isxdigit(buffer[pos-2]) && isxdigit(buffer[pos-1]) )
2676                                 pos -= 5;
2677                 }
2678                 buffer[pos++] = STRING_COLOR_TAG;
2679                 if (color == -1)
2680                 {
2681                         buffer[pos++] = STRING_COLOR_RGB_TAG_CHAR;
2682                         buffer[pos++] = r;
2683                         buffer[pos++] = g;
2684                         buffer[pos++] = b;
2685                 }
2686                 else
2687                         buffer[pos++] = color;
2688         }
2689         return pos;
2690 }
2691
2692 int Nicks_CompleteChatLine(char *buffer, size_t size, unsigned int pos)
2693 {
2694         int n;
2695         /*if(!con_nickcompletion.integer)
2696           return; is tested in Nicks_CompletionCountPossible */
2697         n = Nicks_CompleteCountPossible(buffer, pos, &buffer[pos], false);
2698         if(n == 1)
2699         {
2700                 size_t len;
2701                 char *msg;
2702
2703                 msg = Nicks_list[0];
2704                 len = min(size - Nicks_matchpos - 3, strlen(msg));
2705                 memcpy(&buffer[Nicks_matchpos], msg, len);
2706                 if( len < (size - 7) ) // space for color (^[0-9] or ^xrgb) and space and \0
2707                         len = (int)Nicks_AddLastColor(buffer, Nicks_matchpos+(int)len);
2708                 buffer[len++] = ' ';
2709                 buffer[len] = 0;
2710                 return (int)len;
2711         } else if(n > 1)
2712         {
2713                 int len;
2714                 char *msg;
2715                 Con_Printf("\n%i possible nicks:\n", n);
2716                 Cmd_CompleteNicksPrint(n);
2717
2718                 Nicks_CutMatches(n);
2719
2720                 msg = Nicks_sanlist[0];
2721                 len = (int)min(size - Nicks_matchpos, strlen(msg));
2722                 memcpy(&buffer[Nicks_matchpos], msg, len);
2723                 buffer[Nicks_matchpos + len] = 0;
2724                 //pos += len;
2725                 return Nicks_matchpos + len;
2726         }
2727         return pos;
2728 }
2729
2730
2731 /*
2732         Con_CompleteCommandLine
2733
2734         New function for tab-completion system
2735         Added by EvilTypeGuy
2736         Thanks to Fett erich@heintz.com
2737         Thanks to taniwha
2738         Enhanced to tab-complete map names by [515]
2739
2740 */
2741 void Con_CompleteCommandLine (void)
2742 {
2743         const char *cmd = "";
2744         char *s;
2745         const char **list[4] = {0, 0, 0, 0};
2746         char s2[512];
2747         char command[512];
2748         int c, v, a, i, cmd_len, pos, k;
2749         int n; // nicks --blub
2750         const char *space, *patterns;
2751         char vabuf[1024];
2752
2753         //find what we want to complete
2754         pos = key_linepos;
2755         while(--pos)
2756         {
2757                 k = key_line[pos];
2758                 if(k == '\"' || k == ';' || k == ' ' || k == '\'')
2759                         break;
2760         }
2761         pos++;
2762
2763         s = key_line + pos;
2764         strlcpy(s2, key_line + key_linepos, sizeof(s2));        //save chars after cursor
2765         key_line[key_linepos] = 0;                                      //hide them
2766
2767         space = strchr(key_line + 1, ' ');
2768         if(space && pos == (space - key_line) + 1)
2769         {
2770                 strlcpy(command, key_line + 1, min(sizeof(command), (unsigned int)(space - key_line)));
2771
2772                 patterns = Cvar_VariableString(va(vabuf, sizeof(vabuf), "con_completion_%s", command)); // TODO maybe use a better place for this?
2773                 if(patterns && !*patterns)
2774                         patterns = NULL; // get rid of the empty string
2775
2776                 if(!strcmp(command, "map") || !strcmp(command, "changelevel") || (patterns && !strcmp(patterns, "map")))
2777                 {
2778                         //maps search
2779                         char t[MAX_QPATH];
2780                         if (GetMapList(s, t, sizeof(t)))
2781                         {
2782                                 // first move the cursor
2783                                 key_linepos += (int)strlen(t) - (int)strlen(s);
2784
2785                                 // and now do the actual work
2786                                 *s = 0;
2787                                 strlcat(key_line, t, MAX_INPUTLINE);
2788                                 strlcat(key_line, s2, MAX_INPUTLINE); //add back chars after cursor
2789
2790                                 // and fix the cursor
2791                                 if(key_linepos > (int) strlen(key_line))
2792                                         key_linepos = (int) strlen(key_line);
2793                         }
2794                         return;
2795                 }
2796                 else
2797                 {
2798                         if(patterns)
2799                         {
2800                                 char t[MAX_QPATH];
2801                                 stringlist_t resultbuf, dirbuf;
2802
2803                                 // Usage:
2804                                 //   // store completion patterns (space separated) for command foo in con_completion_foo
2805                                 //   set con_completion_foo "foodata/*.foodefault *.foo"
2806                                 //   foo <TAB>
2807                                 //
2808                                 // Note: patterns with slash are always treated as absolute
2809                                 // patterns; patterns without slash search in the innermost
2810                                 // directory the user specified. There is no way to "complete into"
2811                                 // a directory as of now, as directories seem to be unknown to the
2812                                 // FS subsystem.
2813                                 //
2814                                 // Examples:
2815                                 //   set con_completion_playermodel "models/player/*.zym models/player/*.md3 models/player/*.psk models/player/*.dpm"
2816                                 //   set con_completion_playdemo "*.dem"
2817                                 //   set con_completion_play "*.wav *.ogg"
2818                                 //
2819                                 // TODO somehow add support for directories; these shall complete
2820                                 // to their name + an appended slash.
2821
2822                                 stringlistinit(&resultbuf);
2823                                 stringlistinit(&dirbuf);
2824                                 while(COM_ParseToken_Simple(&patterns, false, false, true))
2825                                 {
2826                                         fssearch_t *search;
2827                                         if(strchr(com_token, '/'))
2828                                         {
2829                                                 search = FS_Search(com_token, true, true);
2830                                         }
2831                                         else
2832                                         {
2833                                                 const char *slash = strrchr(s, '/');
2834                                                 if(slash)
2835                                                 {
2836                                                         strlcpy(t, s, min(sizeof(t), (unsigned int)(slash - s + 2))); // + 2, because I want to include the slash
2837                                                         strlcat(t, com_token, sizeof(t));
2838                                                         search = FS_Search(t, true, true);
2839                                                 }
2840                                                 else
2841                                                         search = FS_Search(com_token, true, true);
2842                                         }
2843                                         if(search)
2844                                         {
2845                                                 for(i = 0; i < search->numfilenames; ++i)
2846                                                         if(!strncmp(search->filenames[i], s, strlen(s)))
2847                                                                 if(FS_FileType(search->filenames[i]) == FS_FILETYPE_FILE)
2848                                                                         stringlistappend(&resultbuf, search->filenames[i]);
2849                                                 FS_FreeSearch(search);
2850                                         }
2851                                 }
2852
2853                                 // In any case, add directory names
2854                                 {
2855                                         fssearch_t *search;
2856                                         const char *slash = strrchr(s, '/');
2857                                         if(slash)
2858                                         {
2859                                                 strlcpy(t, s, min(sizeof(t), (unsigned int)(slash - s + 2))); // + 2, because I want to include the slash
2860                                                 strlcat(t, "*", sizeof(t));
2861                                                 search = FS_Search(t, true, true);
2862                                         }
2863                                         else
2864                                                 search = FS_Search("*", true, true);
2865                                         if(search)
2866                                         {
2867                                                 for(i = 0; i < search->numfilenames; ++i)
2868                                                         if(!strncmp(search->filenames[i], s, strlen(s)))
2869                                                                 if(FS_FileType(search->filenames[i]) == FS_FILETYPE_DIRECTORY)
2870                                                                         stringlistappend(&dirbuf, search->filenames[i]);
2871                                                 FS_FreeSearch(search);
2872                                         }
2873                                 }
2874
2875                                 if(resultbuf.numstrings > 0 || dirbuf.numstrings > 0)
2876                                 {
2877                                         const char *p, *q;
2878                                         unsigned int matchchars;
2879                                         if(resultbuf.numstrings == 0 && dirbuf.numstrings == 1)
2880                                         {
2881                                                 dpsnprintf(t, sizeof(t), "%s/", dirbuf.strings[0]);
2882                                         }
2883                                         else
2884                                         if(resultbuf.numstrings == 1 && dirbuf.numstrings == 0)
2885                                         {
2886                                                 dpsnprintf(t, sizeof(t), "%s ", resultbuf.strings[0]);
2887                                         }
2888                                         else
2889                                         {
2890                                                 stringlistsort(&resultbuf, true); // dirbuf is already sorted
2891                                                 Con_Printf("\n%i possible filenames\n", resultbuf.numstrings + dirbuf.numstrings);
2892                                                 for(i = 0; i < dirbuf.numstrings; ++i)
2893                                                 {
2894                                                         Con_Printf("^4%s^7/\n", dirbuf.strings[i]);
2895                                                 }
2896                                                 for(i = 0; i < resultbuf.numstrings; ++i)
2897                                                 {
2898                                                         Con_Printf("%s\n", resultbuf.strings[i]);
2899                                                 }
2900                                                 matchchars = sizeof(t) - 1;
2901                                                 if(resultbuf.numstrings > 0)
2902                                                 {
2903                                                         p = resultbuf.strings[0];
2904                                                         q = resultbuf.strings[resultbuf.numstrings - 1];
2905                                                         for(; *p && *p == *q; ++p, ++q);
2906                                                         matchchars = (unsigned int)(p - resultbuf.strings[0]);
2907                                                 }
2908                                                 if(dirbuf.numstrings > 0)
2909                                                 {
2910                                                         p = dirbuf.strings[0];
2911                                                         q = dirbuf.strings[dirbuf.numstrings - 1];
2912                                                         for(; *p && *p == *q; ++p, ++q);
2913                                                         matchchars = min(matchchars, (unsigned int)(p - dirbuf.strings[0]));
2914                                                 }
2915                                                 // now p points to the first non-equal character, or to the end
2916                                                 // of resultbuf.strings[0]. We want to append the characters
2917                                                 // from resultbuf.strings[0] to (not including) p as these are
2918                                                 // the unique prefix
2919                                                 strlcpy(t, (resultbuf.numstrings > 0 ? resultbuf : dirbuf).strings[0], min(matchchars + 1, sizeof(t)));
2920                                         }
2921
2922                                         // first move the cursor
2923                                         key_linepos += (int)strlen(t) - (int)strlen(s);
2924
2925                                         // and now do the actual work
2926                                         *s = 0;
2927                                         strlcat(key_line, t, MAX_INPUTLINE);
2928                                         strlcat(key_line, s2, MAX_INPUTLINE); //add back chars after cursor
2929
2930                                         // and fix the cursor
2931                                         if(key_linepos > (int) strlen(key_line))
2932                                                 key_linepos = (int) strlen(key_line);
2933                                 }
2934                                 stringlistfreecontents(&resultbuf);
2935                                 stringlistfreecontents(&dirbuf);
2936
2937                                 return; // bail out, when we complete for a command that wants a file name
2938                         }
2939                 }
2940         }
2941
2942         // Count number of possible matches and print them
2943         c = Cmd_CompleteCountPossible(s);
2944         if (c)
2945         {
2946                 Con_Printf("\n%i possible command%s\n", c, (c > 1) ? "s: " : ":");
2947                 Cmd_CompleteCommandPrint(s);
2948         }
2949         v = Cvar_CompleteCountPossible(s);
2950         if (v)
2951         {
2952                 Con_Printf("\n%i possible variable%s\n", v, (v > 1) ? "s: " : ":");
2953                 Cvar_CompleteCvarPrint(s);
2954         }
2955         a = Cmd_CompleteAliasCountPossible(s);
2956         if (a)
2957         {
2958                 Con_Printf("\n%i possible alias%s\n", a, (a > 1) ? "es: " : ":");
2959                 Cmd_CompleteAliasPrint(s);
2960         }
2961         n = Nicks_CompleteCountPossible(key_line, key_linepos, s, true);
2962         if (n)
2963         {
2964                 Con_Printf("\n%i possible nick%s\n", n, (n > 1) ? "s: " : ":");
2965                 Cmd_CompleteNicksPrint(n);
2966         }
2967
2968         if (!(c + v + a + n))   // No possible matches
2969         {
2970                 if(s2[0])
2971                         strlcpy(&key_line[key_linepos], s2, sizeof(key_line) - key_linepos);
2972                 return;
2973         }
2974
2975         if (c)
2976                 cmd = *(list[0] = Cmd_CompleteBuildList(s));
2977         if (v)
2978                 cmd = *(list[1] = Cvar_CompleteBuildList(s));
2979         if (a)
2980                 cmd = *(list[2] = Cmd_CompleteAliasBuildList(s));
2981         if (n)
2982                 cmd = *(list[3] = Nicks_CompleteBuildList(n));
2983
2984         for (cmd_len = (int)strlen(s);;cmd_len++)
2985         {
2986                 const char **l;
2987                 for (i = 0; i < 3; i++)
2988                         if (list[i])
2989                                 for (l = list[i];*l;l++)
2990                                         if ((*l)[cmd_len] != cmd[cmd_len])
2991                                                 goto done;
2992                 // all possible matches share this character, so we continue...
2993                 if (!cmd[cmd_len])
2994                 {
2995                         // if all matches ended at the same position, stop
2996                         // (this means there is only one match)
2997                         break;
2998                 }
2999         }
3000 done:
3001
3002         // prevent a buffer overrun by limiting cmd_len according to remaining space
3003         cmd_len = min(cmd_len, (int)sizeof(key_line) - 1 - pos);
3004         if (cmd)
3005         {
3006                 key_linepos = pos;
3007                 memcpy(&key_line[key_linepos], cmd, cmd_len);
3008                 key_linepos += cmd_len;
3009                 // if there is only one match, add a space after it
3010                 if (c + v + a + n == 1 && key_linepos < (int)sizeof(key_line) - 1)
3011                 {
3012                         if(n)
3013                         { // was a nick, might have an offset, and needs colors ;) --blub
3014                                 key_linepos = pos - Nicks_offset[0];
3015                                 cmd_len = (int)strlen(Nicks_list[0]);
3016                                 cmd_len = min(cmd_len, (int)sizeof(key_line) - 3 - pos);
3017
3018                                 memcpy(&key_line[key_linepos] , Nicks_list[0], cmd_len);
3019                                 key_linepos += cmd_len;
3020                                 if(key_linepos < (int)(sizeof(key_line)-4)) // space for ^, X and space and \0
3021                                         key_linepos = Nicks_AddLastColor(key_line, key_linepos);
3022                         }
3023                         key_line[key_linepos++] = ' ';
3024                 }
3025         }
3026
3027         // use strlcat to avoid a buffer overrun
3028         key_line[key_linepos] = 0;
3029         strlcat(key_line, s2, sizeof(key_line));
3030
3031         // free the command, cvar, and alias lists
3032         for (i = 0; i < 4; i++)
3033                 if (list[i])
3034                         Mem_Free((void *)list[i]);
3035 }
3036