1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "table/strings.h"

     4

#include "window.h"

     5

#include "gui.h"

     6

#include "gfx.h"

     7

#include "player.h"

     8

#include "variables.h"

     9

#include "hal.h"

    10

#include <stdarg.h>

    11

#include <string.h>

    12

#include "console.h"

    13

#include "network.h"

    14

    15

#ifdef WIN32

    16

#include <windows.h>

    17

#endif

    18

    19

#define ICON_BUFFER 79

    20

#define ICON_CMDBUF_SIZE 20

    21

#define ICON_CMDLN_SIZE 255

    22

#define ICON_LINE_HEIGHT 12

    23

#define ICON_RIGHT_BORDERWIDTH 10

    24

#define ICON_BOTTOM_BORDERWIDTH 12

    25

    26

// ** main console ** //

    27

static bool _iconsole_inited;

    28

static char* _iconsole_buffer[ICON_BUFFER + 1];

    29

static uint16 _iconsole_cbuffer[ICON_BUFFER + 1];

    30

static char _iconsole_cmdline[ICON_CMDLN_SIZE];

    31

static byte _iconsole_cmdpos;

    32

static Window* _iconsole_win = NULL;

    33

static byte _iconsole_scroll;

    34

    35

// ** console cursor ** //

    36

static bool _icursor_state;

    37

static byte _icursor_rate;

    38

static byte _icursor_counter;

    39

    40

// ** stdlib ** //

    41

byte _stdlib_developer = 1;

    42

bool _stdlib_con_developer = false;

    43

FILE* _iconsole_output_file;

    44

    45

// ** main console cmd buffer

    46

static char* _iconsole_cmdbuffer[ICON_CMDBUF_SIZE];

    47

static byte _iconsole_cmdbufferpos;

    48

    49

// ** console window ** //

    50

static void IConsoleWndProc(Window* w, WindowEvent* e);

    51

static const Widget _iconsole_window_widgets[] = {

    52

	{WIDGETS_END}

    53

};

    54

static const WindowDesc _iconsole_window_desc = {

    55

	0, 0, 2, 2,

    56

	WC_CONSOLE, 0,

    57

	WDF_STD_TOOLTIPS | WDF_DEF_WIDGET | WDF_UNCLICK_BUTTONS,

    58

	_iconsole_window_widgets,

    59

	IConsoleWndProc,

    60

};

    61

    62

/* *************** */

    63

/*  end of header  */

    64

/* *************** */

    65

    66

static void IConsoleAppendClipboard(void)

    67

{

    68

#ifdef WIN32

    69

	if (IsClipboardFormatAvailable(CF_TEXT)) {

    70

		const char* data;

    71

		HGLOBAL cbuf;

    72

    73

		OpenClipboard(NULL);

    74

		cbuf = GetClipboardData(CF_TEXT);

    75

		data = GlobalLock(cbuf);

    76

    77

		/* IS_INT_INSIDE = filter for ascii-function codes like BELL and so on [we need an special filter here later] */

    78

		for (; (IS_INT_INSIDE(*data, ' ', 256)) && (_iconsole_cmdpos < lengthof(_iconsole_cmdline) - 1); ++data)

    79

			_iconsole_cmdline[_iconsole_cmdpos++] = *data;

    80

    81

		GlobalUnlock(cbuf);

    82

		CloseClipboard();

    83

	}

    84

#endif

    85

}

    86

    87

static void IConsoleClearCommand(void)

    88

{

    89

	memset(_iconsole_cmdline, 0, sizeof(_iconsole_cmdline));

    90

	_iconsole_cmdpos = 0;

    91

	SetWindowDirty(_iconsole_win);

    92

}

    93

    94

static void IConsoleWndProc(Window* w, WindowEvent* e)

    95

{

    96

	// only do window events with the console

    97

	w = FindWindowById(WC_CONSOLE, 0);

    98

    99

	switch(e->event) {

   100

		case WE_PAINT:

   101

		{

   102

			int i = _iconsole_scroll;

   103

			int max = (w->height / ICON_LINE_HEIGHT) - 1;

   104

			int delta = 0;

   105

			GfxFillRect(w->left, w->top, w->width, w->height - 1, 0);

   106

			while ((i > _iconsole_scroll - max) && (_iconsole_buffer[i] != NULL)) {

   107

				DoDrawString(_iconsole_buffer[i], 5,

   108

					w->height - (_iconsole_scroll + 2 - i) * ICON_LINE_HEIGHT, _iconsole_cbuffer[i]);

   109

				i--;

   110

			}

   111

			delta = w->width - 10 - GetStringWidth(_iconsole_cmdline) - ICON_RIGHT_BORDERWIDTH;

   112

			if (delta > 0) {

   113

				DoDrawString("]", 5, w->height - ICON_LINE_HEIGHT, _iconsole_color_commands);

   114

				delta = 0;

   115

			}

   116

   117

			DoDrawString(_iconsole_cmdline, 10 + delta, w->height - ICON_LINE_HEIGHT, _iconsole_color_commands);

   118

			break;

   119

		}

   120

		case WE_TICK:

   121

			_icursor_counter++;

   122

			if (_icursor_counter > _icursor_rate) {

   123

				int posx;

   124

				int posy;

   125

				int delta;

   126

   127

				_icursor_state = !_icursor_state;

   128

   129

				_cur_dpi = &_screen;

   130

				delta = w->width - 10 - GetStringWidth(_iconsole_cmdline) - ICON_RIGHT_BORDERWIDTH;

   131

				if (delta > 0)

   132

					delta = 0;

   133

				posx = 10 + GetStringWidth(_iconsole_cmdline) + delta;

   134

				posy = w->height - 3;

   135

				GfxFillRect(posx, posy, posx + 5, posy + 1, _icursor_state ? 14 : 0);

   136

				_video_driver->make_dirty(posx, posy, 5, 1);

   137

				_icursor_counter = 0;

   138

			}

   139

			break;

   140

		case WE_DESTROY:

   141

			_iconsole_win = NULL;

   142

			_iconsole_mode = ICONSOLE_CLOSED;

   143

			break;

   144

		case WE_KEYPRESS:

   145

		{

   146

			e->keypress.cont = false;

   147

			switch (e->keypress.keycode) {

   148

				case WKC_CTRL | 'V':

   149

					IConsoleAppendClipboard();

   150

					SetWindowDirty(w);

   151

					break;

   152

				case WKC_UP:

   153

					IConsoleCmdBufferNavigate(+1);

   154

					SetWindowDirty(w);

   155

					break;

   156

				case WKC_DOWN:

   157

					IConsoleCmdBufferNavigate(-1);

   158

					SetWindowDirty(w);

   159

					break;

   160

				case WKC_SHIFT | WKC_PAGEUP:

   161

					if (_iconsole_scroll - (w->height / ICON_LINE_HEIGHT) - 1 < 0)

   162

						_iconsole_scroll = 0;

   163

					else

   164

						_iconsole_scroll -= (w->height / ICON_LINE_HEIGHT) - 1;

   165

					SetWindowDirty(w);

   166

					break;

   167

				case WKC_SHIFT | WKC_PAGEDOWN:

   168

					if (_iconsole_scroll + (w->height / ICON_LINE_HEIGHT) - 1 > ICON_BUFFER)

   169

						_iconsole_scroll = ICON_BUFFER;

   170

					else

   171

						_iconsole_scroll += (w->height / ICON_LINE_HEIGHT) - 1;

   172

					SetWindowDirty(w);

   173

					break;

   174

				case WKC_SHIFT | WKC_UP:

   175

					if (_iconsole_scroll <= 0)

   176

						_iconsole_scroll = 0;

   177

					else

   178

						--_iconsole_scroll;

   179

					SetWindowDirty(w);

   180

					break;

   181

				case WKC_SHIFT | WKC_DOWN:

   182

					if (_iconsole_scroll >= ICON_BUFFER)

   183

						_iconsole_scroll = ICON_BUFFER;

   184

					else

   185

						++_iconsole_scroll;

   186

					SetWindowDirty(w);

   187

					break;

   188

				case WKC_BACKQUOTE:

   189

					IConsoleSwitch();

   190

					break;

   191

				case WKC_RETURN:

   192

					IConsolePrintF(_iconsole_color_commands, "] %s", _iconsole_cmdline);

   193

					_iconsole_cmdbufferpos = 19;

   194

					IConsoleCmdBufferAdd(_iconsole_cmdline);

   195

					IConsoleCmdExec(_iconsole_cmdline);

   196

					IConsoleClearCommand();

   197

					break;

   198

				case WKC_CTRL | WKC_RETURN:

   199

					if (_iconsole_mode == ICONSOLE_FULL) {

   200

						_iconsole_mode = ICONSOLE_OPENED;

   201

					} else {

   202

						_iconsole_mode = ICONSOLE_FULL;

   203

					}

   204

					IConsoleResize();

   205

					MarkWholeScreenDirty();

   206

					break;

   207

				case WKC_BACKSPACE:

   208

					if (_iconsole_cmdpos != 0) _iconsole_cmdpos--;

   209

					_iconsole_cmdline[_iconsole_cmdpos] = 0;

   210

					SetWindowDirty(w);

   211

					_iconsole_cmdbufferpos = 19;

   212

					break;

   213

				default:

   214

					/* IS_INT_INSIDE = filter for ascii-function codes like BELL and so on [we need an special filter here later] */

   215

					if (IS_INT_INSIDE(e->keypress.ascii, ' ', 256)) {

   216

						_iconsole_scroll = ICON_BUFFER;

   217

						_iconsole_cmdline[_iconsole_cmdpos] = e->keypress.ascii;

   218

						if (_iconsole_cmdpos != lengthof(_iconsole_cmdline))

   219

							_iconsole_cmdpos++;

   220

						SetWindowDirty(w);

   221

						_iconsole_cmdbufferpos = ICON_CMDBUF_SIZE - 1;

   222

					}

   223

					else

   224

						e->keypress.cont = true;

   225

			}

   226

			break;

   227

		}

   228

	}

   229

}

   230

   231

void IConsoleInit(void)

   232

{

   233

	uint i;

   234

	#if defined(WITH_REV)

   235

	extern char _openttd_revision[];

   236

	#endif

   237

	_iconsole_output_file = NULL;

   238

	_iconsole_color_default = 1;

   239

	_iconsole_color_error = 3;

   240

	_iconsole_color_warning = 13;

   241

	_iconsole_color_debug = 5;

   242

	_iconsole_color_commands = 2;

   243

	_iconsole_scroll = ICON_BUFFER;

   244

	_iconsole_cmdbufferpos = ICON_CMDBUF_SIZE - 1;

   245

	_iconsole_inited = true;

   246

	_iconsole_mode = ICONSOLE_CLOSED;

   247

	_iconsole_win = NULL;

   248

	_icursor_state = false;

   249

	_icursor_rate = 5;

   250

	_icursor_counter = 0;

   251

	for (i = 0; i < lengthof(_iconsole_cmdbuffer); i++)

   252

		_iconsole_cmdbuffer[i] = NULL;

   253

	for (i = 0; i <= ICON_BUFFER; i++) {

   254

		_iconsole_buffer[i] = NULL;

   255

		_iconsole_cbuffer[i] = 0;

   256

	}

   257

	IConsoleStdLibRegister();

   258

	#if defined(WITH_REV)

   259

	IConsolePrintF(13, "OpenTTD Game Console Revision 5 - %s", _openttd_revision);

   260

	#else

   261

	IConsolePrint(13, "OpenTTD Game Console Revision 5");

   262

	#endif

   263

	IConsolePrint(12, "---------------------------------");

   264

	IConsolePrint(12, "use \"help\" for more info");

   265

	IConsolePrint(12, "");

   266

	IConsoleClearCommand();

   267

	IConsoleCmdBufferAdd("");

   268

}

   269

   270

void IConsoleClear(void)

   271

{

   272

	uint i;

   273

	for (i = 0; i <= ICON_BUFFER; i++)

   274

		free(_iconsole_buffer[i]);

   275

}

   276

   277

void IConsoleFree(void)

   278

{

   279

	_iconsole_inited = false;

   280

	IConsoleClear();

   281

	if (_iconsole_output_file != NULL) fclose(_iconsole_output_file);

   282

}

   283

   284

void IConsoleResize(void)

   285

{

   286

	switch (_iconsole_mode) {

   287

		case ICONSOLE_OPENED:

   288

			_iconsole_win->height = _screen.height / 3;

   289

			_iconsole_win->width = _screen.width;

   290

			break;

   291

		case ICONSOLE_FULL:

   292

			_iconsole_win->height = _screen.height - ICON_BOTTOM_BORDERWIDTH;

   293

			_iconsole_win->width = _screen.width;

   294

			break;

   295

		default:

   296

			break;

   297

	}

   298

}

   299

   300

void IConsoleSwitch(void)

   301

{

   302

	switch (_iconsole_mode) {

   303

		case ICONSOLE_CLOSED:

   304

			_iconsole_win = AllocateWindowDesc(&_iconsole_window_desc);

   305

			_iconsole_win->height = _screen.height / 3;

   306

			_iconsole_win->width = _screen.width;

   307

			_iconsole_mode = ICONSOLE_OPENED;

   308

			break;

   309

		case ICONSOLE_OPENED:

   310

			DeleteWindowById(WC_CONSOLE, 0);

   311

			_iconsole_win = NULL;

   312

			_iconsole_mode = ICONSOLE_CLOSED;

   313

			break;

   314

		case ICONSOLE_FULL:

   315

			DeleteWindowById(WC_CONSOLE, 0);

   316

			_iconsole_win = NULL;

   317

			_iconsole_mode = ICONSOLE_CLOSED;

   318

			break;

   319

	}

   320

}

   321

   322

void IConsoleClose(void)

   323

{

   324

	if (_iconsole_mode == ICONSOLE_OPENED) IConsoleSwitch();

   325

}

   326

   327

void IConsoleOpen(void)

   328

{

   329

	if (_iconsole_mode == ICONSOLE_CLOSED) IConsoleSwitch();

   330

}

   331

   332

void IConsoleCmdBufferAdd(const char* cmd)

   333

{

   334

	int i;

   335

	if (_iconsole_cmdbufferpos != 19) return;

   336

	free(_iconsole_cmdbuffer[18]);

   337

	for (i = 18; i > 0; i--) _iconsole_cmdbuffer[i] = _iconsole_cmdbuffer[i - 1];

   338

	_iconsole_cmdbuffer[0] = strdup(cmd);

   339

}

   340

   341

void IConsoleCmdBufferNavigate(signed char direction)

   342

{

   343

	int i;

   344

	i = _iconsole_cmdbufferpos + direction;

   345

	if (i < 0) i = 19;

   346

	if (i > 19) i = 0;

   347

	if (direction > 0)

   348

		while (_iconsole_cmdbuffer[i] == NULL) {

   349

			++i;

   350

			if (i > 19) i = 0;

   351

		}

   352

	if (direction < 0)

   353

		while (_iconsole_cmdbuffer[i] == NULL) {

   354

			--i;

   355

			if (i < 0) i = 19;

   356

		}

   357

	_iconsole_cmdbufferpos = i;

   358

	IConsoleClearCommand();

   359

	memcpy(_iconsole_cmdline, _iconsole_cmdbuffer[i],

   360

		strlen(_iconsole_cmdbuffer[i]));

   361

	_iconsole_cmdpos = strlen(_iconsole_cmdbuffer[i]);

   362

}

   363

   364

void IConsolePrint(uint16 color_code, const char* string)

   365

{

   366

	char* _ex;

   367

	char* _new;

   368

	uint16 _exc;

   369

	uint16 _newc;

   370

	char* i;

   371

	int j;

   372

   373

	if (_network_dedicated) {

   374

		printf("%s\n", string);

   375

		return;

   376

	}

   377

   378

	if (!_iconsole_inited) return;

   379

   380

	_newc = color_code;

   381

	_new = strdup(string);

   382

   383

	for (i = _new; *i != '\0'; ++i)

   384

		if (*i < ' ') *i = ' '; /* filter for ascii-function codes like BELL and so on [we need an special filter here later] */

   385

   386

	for (j = ICON_BUFFER; j >= 0; --j) {

   387

		_ex = _iconsole_buffer[j];

   388

		_exc = _iconsole_cbuffer[j];

   389

		_iconsole_buffer[j] = _new;

   390

		_iconsole_cbuffer[j] = _newc;

   391

		_new = _ex;

   392

		_newc = _exc;

   393

	}

   394

	free(_ex);

   395

   396

	if (_iconsole_win != NULL) SetWindowDirty(_iconsole_win);

   397

}

   398

   399

   400

void CDECL IConsolePrintF(uint16 color_code, const char* s, ...)

   401

{

   402

	va_list va;

   403

	char buf[1024];

   404

	int len;

   405

   406

	va_start(va, s);

   407

	len = vsnprintf(buf, sizeof(buf), s, va);

   408

	va_end(va);

   409

   410

	IConsolePrint(color_code, buf);

   411

   412

	if (_iconsole_output_file != NULL) {

   413

		// if there is an console output file ... also print it there

   414

		fwrite(buf, len, 1, _iconsole_output_file);

   415

		fwrite("\n", 1, 1, _iconsole_output_file);

   416

	}

   417

}

   418

   419

void IConsoleDebug(const char* string)

   420

{

   421

	if (_stdlib_developer > 1)

   422

		IConsolePrintF(_iconsole_color_debug, "dbg: %s", string);

   423

}

   424

   425

void IConsoleError(const char* string)

   426

{

   427

	if (_stdlib_developer > 0)

   428

		IConsolePrintF(_iconsole_color_error, "ERROR: %s", string);

   429

}

   430

   431

void IConsoleWarning(const char* string)

   432

{

   433

	if (_stdlib_developer > 0)

   434

		IConsolePrintF(_iconsole_color_warning, "WARNING: %s", string);

   435

}

   436

   437

void IConsoleCmdRegister(const char* name, _iconsole_cmd_addr addr)

   438

{

   439

	char* _new;

   440

	_iconsole_cmd* item;

   441

	_iconsole_cmd* item_new;

   442

	_iconsole_cmd* item_before;

   443

   444

	_new = strdup(name);

   445

   446

	item_new = malloc(sizeof(_iconsole_cmd));

   447

   448

	item_new->_next = NULL;

   449

	item_new->addr = addr;

   450

	item_new->name = _new;

   451

   452

	item_new->hook_access = NULL;

   453

	item_new->hook_after_exec = NULL;

   454

	item_new->hook_before_exec = NULL;

   455

   456

	item_before = NULL;

   457

	item = _iconsole_cmds;

   458

   459

	if (item == NULL) {

   460

		_iconsole_cmds = item_new;

   461

	} else {

   462

		while ((item->_next != NULL) && (strcmp(item->name,item_new->name)<=0)) {

   463

			item_before = item;

   464

			item = item->_next;

   465

			}

   466

// insertion sort

   467

		if (item_before==NULL) {

   468

			if (strcmp(item->name,item_new->name)<=0) {

   469

				// appending

   470

				item ->_next = item_new;

   471

			} else {

   472

				// inserting as startitem

   473

				_iconsole_cmds = item_new;

   474

				item_new ->_next = item;

   475

			}

   476

		} else {

   477

			if (strcmp(item->name,item_new->name)<=0) {

   478

				// appending

   479

				item ->_next = item_new;

   480

			} else {

   481

				// inserting

   482

				item_new ->_next = item_before->_next;

   483

				item_before ->_next = item_new;

   484