mvm_cmds.c

   1 #include "quakedef.h"
   2
   3 #include "prvm_cmds.h"
   4 #include "clvm_cmds.h"
   5 #include "menu.h"
   6 #include "csprogs.h"
   7
   8 // TODO check which strings really should be engine strings
   9
  10 //============================================================================
  11 // Menu
  12
  13 const char *vm_m_extensions =
  14 "BX_WAL_SUPPORT "
  15 "DP_CINEMATIC_DPV "
  16 "DP_CSQC_BINDMAPS "
  17 "DP_CRYPTO "
  18 "DP_GFX_FONTS "
  19 "DP_GFX_FONTS_FREETYPE "
  20 "DP_UTF8 "
  21 "DP_FONT_VARIABLEWIDTH "
  22 "DP_MENU_EXTRESPONSEPACKET "
  23 "DP_QC_ASINACOSATANATAN2TAN "
  24 "DP_QC_AUTOCVARS "
  25 "DP_QC_CMD "
  26 "DP_QC_CRC16 "
  27 "DP_QC_CVAR_TYPE "
  28 "DP_QC_CVAR_DESCRIPTION "
  29 "DP_QC_DIGEST "
  30 "DP_QC_DIGEST_SHA256 "
  31 "DP_QC_FINDCHAIN_TOFIELD "
  32 "DP_QC_I18N "
  33 "DP_QC_LOG "
  34 "DP_QC_RENDER_SCENE "
  35 "DP_QC_SPRINTF "
  36 "DP_QC_STRFTIME "
  37 "DP_QC_STRINGBUFFERS "
  38 "DP_QC_STRINGBUFFERS_CVARLIST "
  39 "DP_QC_STRINGBUFFERS_EXT_WIP "
  40 "DP_QC_STRINGCOLORFUNCTIONS "
  41 "DP_QC_STRING_CASE_FUNCTIONS "
  42 "DP_QC_STRREPLACE "
  43 "DP_QC_TOKENIZEBYSEPARATOR "
  44 "DP_QC_TOKENIZE_CONSOLE "
  45 "DP_QC_UNLIMITEDTEMPSTRINGS "
  46 "DP_QC_URI_ESCAPE "
  47 "DP_QC_URI_GET "
  48 "DP_QC_URI_POST "
  49 "DP_QC_WHICHPACK "
  50 "FTE_STRINGS "
  51 ;
  52
  53 /*
  54 =========
  55 VM_M_setmousetarget
  56
  57 setmousetarget(float target)
  58 =========
  59 */
  60 static void VM_M_setmousetarget(prvm_prog_t *prog)
  61 {
  62         VM_SAFEPARMCOUNT(1, VM_M_setmousetarget);
  63
  64         switch((int)PRVM_G_FLOAT(OFS_PARM0))
  65         {
  66         case 1:
  67                 in_client_mouse = false;
  68                 break;
  69         case 2:
  70                 in_client_mouse = true;
  71                 break;
  72         default:
  73                 prog->error_cmd("VM_M_setmousetarget: wrong destination %f !",PRVM_G_FLOAT(OFS_PARM0));
  74         }
  75 }
  76
  77 /*
  78 =========
  79 VM_M_getmousetarget
  80
  81 float   getmousetarget
  82 =========
  83 */
  84 static void VM_M_getmousetarget(prvm_prog_t *prog)
  85 {
  86         VM_SAFEPARMCOUNT(0,VM_M_getmousetarget);
  87
  88         if(in_client_mouse)
  89                 PRVM_G_FLOAT(OFS_RETURN) = 2;
  90         else
  91                 PRVM_G_FLOAT(OFS_RETURN) = 1;
  92 }
  93
  94
  95
  96 /*
  97 =========
  98 VM_M_setkeydest
  99
 100 setkeydest(float dest)
 101 =========
 102 */
 103 static void VM_M_setkeydest(prvm_prog_t *prog)
 104 {
 105         VM_SAFEPARMCOUNT(1,VM_M_setkeydest);
 106
 107         switch((int)PRVM_G_FLOAT(OFS_PARM0))
 108         {
 109         case 0:
 110                 // key_game
 111                 key_dest = key_game;
 112                 break;
 113         case 2:
 114                 // key_menu
 115                 key_dest = key_menu;
 116                 break;
 117         case 3:
 118                 // key_menu_grabbed
 119                 key_dest = key_menu_grabbed;
 120                 break;
 121         case 1:
 122                 // key_message
 123                 // key_dest = key_message
 124                 // break;
 125         default:
 126                 prog->error_cmd("VM_M_setkeydest: wrong destination %f !", PRVM_G_FLOAT(OFS_PARM0));
 127         }
 128 }
 129
 130 /*
 131 =========
 132 VM_M_getkeydest
 133
 134 float   getkeydest
 135 =========
 136 */
 137 static void VM_M_getkeydest(prvm_prog_t *prog)
 138 {
 139         VM_SAFEPARMCOUNT(0,VM_M_getkeydest);
 140
 141         // key_game = 0, key_message = 1, key_menu = 2, key_menu_grabbed = 3, unknown = -1
 142         switch(key_dest)
 143         {
 144         case key_game:
 145                 PRVM_G_FLOAT(OFS_RETURN) = 0;
 146                 break;
 147         case key_menu:
 148                 PRVM_G_FLOAT(OFS_RETURN) = 2;
 149                 break;
 150         case key_menu_grabbed:
 151                 PRVM_G_FLOAT(OFS_RETURN) = 3;
 152                 break;
 153         case key_message:
 154                 // not supported
 155                 // PRVM_G_FLOAT(OFS_RETURN) = 1;
 156                 // break;
 157         default:
 158                 PRVM_G_FLOAT(OFS_RETURN) = -1;
 159         }
 160 }
 161
 162
 163 /*
 164 =========
 165 VM_M_getresolution
 166
 167 vector  getresolution(float number)
 168 =========
 169 */
 170 static void VM_M_getresolution(prvm_prog_t *prog)
 171 {
 172         int nr, fs;
 173         VM_SAFEPARMCOUNTRANGE(1, 2, VM_getresolution);
 174
 175         nr = (int)PRVM_G_FLOAT(OFS_PARM0);
 176
 177         fs = ((prog->argc <= 1) || ((int)PRVM_G_FLOAT(OFS_PARM1)));
 178
 179         if(nr < -1 || nr >= (fs ? video_resolutions_count : video_resolutions_hardcoded_count))
 180         {
 181                 PRVM_G_VECTOR(OFS_RETURN)[0] = 0;
 182                 PRVM_G_VECTOR(OFS_RETURN)[1] = 0;
 183                 PRVM_G_VECTOR(OFS_RETURN)[2] = 0;
 184         }
 185         else if(nr == -1)
 186         {
 187                 vid_mode_t *m = VID_GetDesktopMode();
 188                 if (m)
 189                 {
 190                         PRVM_G_VECTOR(OFS_RETURN)[0] = m->width;
 191                         PRVM_G_VECTOR(OFS_RETURN)[1] = m->height;
 192                         PRVM_G_VECTOR(OFS_RETURN)[2] = m->pixelheight_num / (prvm_vec_t) m->pixelheight_denom;
 193                 }
 194                 else
 195                 {
 196                         PRVM_G_VECTOR(OFS_RETURN)[0] = 0;
 197                         PRVM_G_VECTOR(OFS_RETURN)[1] = 0;
 198                         PRVM_G_VECTOR(OFS_RETURN)[2] = 0;
 199                 }
 200         }
 201         else
 202         {
 203                 video_resolution_t *r = &((fs ? video_resolutions : video_resolutions_hardcoded)[nr]);
 204                 PRVM_G_VECTOR(OFS_RETURN)[0] = r->width;
 205                 PRVM_G_VECTOR(OFS_RETURN)[1] = r->height;
 206                 PRVM_G_VECTOR(OFS_RETURN)[2] = r->pixelheight;
 207         }
 208 }
 209
 210 static void VM_M_getgamedirinfo(prvm_prog_t *prog)
 211 {
 212         int nr, item;
 213         VM_SAFEPARMCOUNT(2, VM_getgamedirinfo);
 214
 215         nr = (int)PRVM_G_FLOAT(OFS_PARM0);
 216         item = (int)PRVM_G_FLOAT(OFS_PARM1);
 217
 218         PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
 219
 220         if(nr >= 0 && nr < fs_all_gamedirs_count)
 221         {
 222                 if(item == 0)
 223                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, fs_all_gamedirs[nr].name );
 224                 else if(item == 1)
 225                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, fs_all_gamedirs[nr].description );
 226         }
 227 }
 228
 229 /*
 230 =========
 231 VM_M_getserverliststat
 232
 233 float   getserverliststat(float type)
 234 =========
 235 */
 236 /*
 237         type:
 238 0       serverlist_viewcount
 239 1   serverlist_totalcount
 240 2       masterquerycount
 241 3       masterreplycount
 242 4       serverquerycount
 243 5       serverreplycount
 244 6       sortfield
 245 7       sortflags
 246 */
 247 static void VM_M_getserverliststat(prvm_prog_t *prog)
 248 {
 249         int type;
 250         VM_SAFEPARMCOUNT ( 1, VM_M_getserverliststat );
 251
 252         PRVM_G_FLOAT( OFS_RETURN ) = 0;
 253
 254         type = (int)PRVM_G_FLOAT( OFS_PARM0 );
 255         switch(type)
 256         {
 257         case 0:
 258                 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_viewcount;
 259                 return;
 260         case 1:
 261                 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_cachecount;
 262                 return;
 263         case 2:
 264                 PRVM_G_FLOAT ( OFS_RETURN ) = masterquerycount;
 265                 return;
 266         case 3:
 267                 PRVM_G_FLOAT ( OFS_RETURN ) = masterreplycount;
 268                 return;
 269         case 4:
 270                 PRVM_G_FLOAT ( OFS_RETURN ) = serverquerycount;
 271                 return;
 272         case 5:
 273                 PRVM_G_FLOAT ( OFS_RETURN ) = serverreplycount;
 274                 return;
 275         case 6:
 276                 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_sortbyfield;
 277                 return;
 278         case 7:
 279                 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_sortflags;
 280                 return;
 281         default:
 282                 VM_Warning(prog, "VM_M_getserverliststat: bad type %i!\n", type );
 283         }
 284 }
 285
 286 /*
 287 ========================
 288 VM_M_resetserverlistmasks
 289
 290 resetserverlistmasks()
 291 ========================
 292 */
 293 static void VM_M_resetserverlistmasks(prvm_prog_t *prog)
 294 {
 295         VM_SAFEPARMCOUNT(0, VM_M_resetserverlistmasks);
 296         ServerList_ResetMasks();
 297 }
 298
 299
 300 /*
 301 ========================
 302 VM_M_setserverlistmaskstring
 303
 304 setserverlistmaskstring(float mask, float fld, string str, float op)
 305 0-511           and
 306 512 - 1024      or
 307 ========================
 308 */
 309 static void VM_M_setserverlistmaskstring(prvm_prog_t *prog)
 310 {
 311         const char *str;
 312         int masknr;
 313         serverlist_mask_t *mask;
 314         int field;
 315
 316         VM_SAFEPARMCOUNT( 4, VM_M_setserverlistmaskstring );
 317         str = PRVM_G_STRING( OFS_PARM2 );
 318
 319         masknr = (int)PRVM_G_FLOAT( OFS_PARM0 );
 320         if( masknr >= 0 && masknr <= SERVERLIST_ANDMASKCOUNT )
 321                 mask = &serverlist_andmasks[masknr];
 322         else if( masknr >= 512 && masknr - 512 <= SERVERLIST_ORMASKCOUNT )
 323                 mask = &serverlist_ormasks[masknr - 512 ];
 324         else
 325         {
 326                 VM_Warning(prog, "VM_M_setserverlistmaskstring: invalid mask number %i\n", masknr );
 327                 return;
 328         }
 329
 330         field = (int) PRVM_G_FLOAT( OFS_PARM1 );
 331
 332         switch( field ) {
 333                 case SLIF_CNAME:
 334                         strlcpy( mask->info.cname, str, sizeof(mask->info.cname) );
 335                         break;
 336                 case SLIF_NAME:
 337                         strlcpy( mask->info.name, str, sizeof(mask->info.name)  );
 338                         break;
 339                 case SLIF_QCSTATUS:
 340                         strlcpy( mask->info.qcstatus, str, sizeof(mask->info.qcstatus)  );
 341                         break;
 342                 case SLIF_PLAYERS:
 343                         strlcpy( mask->info.players, str, sizeof(mask->info.players)  );
 344                         break;
 345                 case SLIF_MAP:
 346                         strlcpy( mask->info.map, str, sizeof(mask->info.map)  );
 347                         break;
 348                 case SLIF_MOD:
 349                         strlcpy( mask->info.mod, str, sizeof(mask->info.mod)  );
 350                         break;
 351                 case SLIF_GAME:
 352                         strlcpy( mask->info.game, str, sizeof(mask->info.game)  );
 353                         break;
 354                 default:
 355                         VM_Warning(prog, "VM_M_setserverlistmaskstring: Bad field number %i passed!\n", field );
 356                         return;
 357         }
 358
 359         mask->active = true;
 360         mask->tests[field] = (serverlist_maskop_t)((int)PRVM_G_FLOAT( OFS_PARM3 ));
 361 }
 362
 363 /*
 364 ========================
 365 VM_M_setserverlistmasknumber
 366
 367 setserverlistmasknumber(float mask, float fld, float num, float op)
 368
 369 0-511           and
 370 512 - 1024      or
 371 ========================
 372 */
 373 static void VM_M_setserverlistmasknumber(prvm_prog_t *prog)
 374 {
 375         int number;
 376         serverlist_mask_t *mask;
 377         int     masknr;
 378         int field;
 379         VM_SAFEPARMCOUNT( 4, VM_M_setserverlistmasknumber );
 380
 381         masknr = (int)PRVM_G_FLOAT( OFS_PARM0 );
 382         if( masknr >= 0 && masknr <= SERVERLIST_ANDMASKCOUNT )
 383                 mask = &serverlist_andmasks[masknr];
 384         else if( masknr >= 512 && masknr - 512 <= SERVERLIST_ORMASKCOUNT )
 385                 mask = &serverlist_ormasks[masknr - 512 ];
 386         else
 387         {
 388                 VM_Warning(prog, "VM_M_setserverlistmasknumber: invalid mask number %i\n", masknr );
 389                 return;
 390         }
 391
 392         number = (int)PRVM_G_FLOAT( OFS_PARM2 );
 393         field = (int) PRVM_G_FLOAT( OFS_PARM1 );
 394
 395         switch( field ) {
 396                 case SLIF_MAXPLAYERS:
 397                         mask->info.maxplayers = number;
 398                         break;
 399                 case SLIF_NUMPLAYERS:
 400                         mask->info.numplayers = number;
 401                         break;
 402                 case SLIF_NUMBOTS:
 403                         mask->info.numbots = number;
 404                         break;
 405                 case SLIF_NUMHUMANS:
 406                         mask->info.numhumans = number;
 407                         break;
 408                 case SLIF_PING:
 409                         mask->info.ping = number;
 410                         break;
 411                 case SLIF_PROTOCOL:
 412                         mask->info.protocol = number;
 413                         break;
 414                 case SLIF_FREESLOTS:
 415                         mask->info.freeslots = number;
 416                         break;
 417                 case SLIF_ISFAVORITE:
 418                         mask->info.isfavorite = number != 0;
 419                         break;
 420                 default:
 421                         VM_Warning(prog, "VM_M_setserverlistmasknumber: Bad field number %i passed!\n", field );
 422                         return;
 423         }
 424
 425         mask->active = true;
 426         mask->tests[field] = (serverlist_maskop_t)((int)PRVM_G_FLOAT( OFS_PARM3 ));
 427 }
 428
 429
 430 /*
 431 ========================
 432 VM_M_resortserverlist
 433
 434 resortserverlist
 435 ========================
 436 */
 437 static void VM_M_resortserverlist(prvm_prog_t *prog)
 438 {
 439         VM_SAFEPARMCOUNT(0, VM_M_resortserverlist);
 440         ServerList_RebuildViewList();
 441 }
 442
 443 /*
 444 =========
 445 VM_M_getserverliststring
 446
 447 string  getserverliststring(float field, float hostnr)
 448 =========
 449 */
 450 static void VM_M_getserverliststring(prvm_prog_t *prog)
 451 {
 452         serverlist_entry_t *cache;
 453         int hostnr;
 454
 455         VM_SAFEPARMCOUNT(2, VM_M_getserverliststring);
 456
 457         PRVM_G_INT(OFS_RETURN) = OFS_NULL;
 458
 459         hostnr = (int)PRVM_G_FLOAT(OFS_PARM1);
 460
 461         if(hostnr < 0 || hostnr >= serverlist_viewcount)
 462         {
 463                 Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
 464                 return;
 465         }
 466         cache = ServerList_GetViewEntry(hostnr);
 467         switch( (int) PRVM_G_FLOAT(OFS_PARM0) ) {
 468                 case SLIF_CNAME:
 469                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.cname );
 470                         break;
 471                 case SLIF_NAME:
 472                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.name );
 473                         break;
 474                 case SLIF_QCSTATUS:
 475                         PRVM_G_INT (OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.qcstatus );
 476                         break;
 477                 case SLIF_PLAYERS:
 478                         PRVM_G_INT (OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.players );
 479                         break;
 480                 case SLIF_GAME:
 481                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.game );
 482                         break;
 483                 case SLIF_MOD:
 484                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.mod );
 485                         break;
 486                 case SLIF_MAP:
 487                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->info.map );
 488                         break;
 489                 // TODO remove this again
 490                 case 1024:
 491                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->line1 );
 492                         break;
 493                 case 1025:
 494                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, cache->line2 );
 495                         break;
 496                 default:
 497                         Con_Print("VM_M_getserverliststring: bad field number passed!\n");
 498         }
 499 }
 500
 501 /*
 502 =========
 503 VM_M_getserverlistnumber
 504
 505 float   getserverlistnumber(float field, float hostnr)
 506 =========
 507 */
 508 static void VM_M_getserverlistnumber(prvm_prog_t *prog)
 509 {
 510         serverlist_entry_t *cache;
 511         int hostnr;
 512
 513         VM_SAFEPARMCOUNT(2, VM_M_getserverliststring);
 514
 515         PRVM_G_INT(OFS_RETURN) = OFS_NULL;
 516
 517         hostnr = (int)PRVM_G_FLOAT(OFS_PARM1);
 518
 519         if(hostnr < 0 || hostnr >= serverlist_viewcount)
 520         {
 521                 Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
 522                 return;
 523         }
 524         cache = ServerList_GetViewEntry(hostnr);
 525         switch( (int) PRVM_G_FLOAT(OFS_PARM0) ) {
 526                 case SLIF_MAXPLAYERS:
 527                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.maxplayers;
 528                         break;
 529                 case SLIF_NUMPLAYERS:
 530                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numplayers;
 531                         break;
 532                 case SLIF_NUMBOTS:
 533                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numbots;
 534                         break;
 535                 case SLIF_NUMHUMANS:
 536                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numhumans;
 537                         break;
 538                 case SLIF_FREESLOTS:
 539                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.freeslots;
 540                         break;
 541                 case SLIF_PING:
 542                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.ping;
 543                         break;
 544                 case SLIF_PROTOCOL:
 545                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.protocol;
 546                         break;
 547                 case SLIF_ISFAVORITE:
 548                         PRVM_G_FLOAT( OFS_RETURN ) = cache->info.isfavorite;
 549                         break;
 550                 default:
 551                         Con_Print("VM_M_getserverlistnumber: bad field number passed!\n");
 552         }
 553 }
 554
 555 /*
 556 ========================
 557 VM_M_setserverlistsort
 558
 559 setserverlistsort(float field, float flags)
 560 ========================
 561 */
 562 static void VM_M_setserverlistsort(prvm_prog_t *prog)
 563 {
 564         VM_SAFEPARMCOUNT( 2, VM_M_setserverlistsort );
 565
 566         serverlist_sortbyfield = (serverlist_infofield_t)((int)PRVM_G_FLOAT( OFS_PARM0 ));
 567         serverlist_sortflags = (int) PRVM_G_FLOAT( OFS_PARM1 );
 568 }
 569
 570 /*
 571 ========================
 572 VM_M_refreshserverlist
 573
 574 refreshserverlist()
 575 ========================
 576 */
 577 static void VM_M_refreshserverlist(prvm_prog_t *prog)
 578 {
 579         VM_SAFEPARMCOUNT( 0, VM_M_refreshserverlist );
 580         ServerList_QueryList(false, true, false, false);
 581 }
 582
 583 /*
 584 ========================
 585 VM_M_getserverlistindexforkey
 586
 587 float getserverlistindexforkey(string key)
 588 ========================
 589 */
 590 static void VM_M_getserverlistindexforkey(prvm_prog_t *prog)
 591 {
 592         const char *key;
 593         VM_SAFEPARMCOUNT( 1, VM_M_getserverlistindexforkey );
 594
 595         key = PRVM_G_STRING( OFS_PARM0 );
 596         VM_CheckEmptyString( prog, key );
 597
 598         if( !strcmp( key, "cname" ) )
 599                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_CNAME;
 600         else if( !strcmp( key, "ping" ) )
 601                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PING;
 602         else if( !strcmp( key, "game" ) )
 603                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_GAME;
 604         else if( !strcmp( key, "mod" ) )
 605                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MOD;
 606         else if( !strcmp( key, "map" ) )
 607                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MAP;
 608         else if( !strcmp( key, "name" ) )
 609                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NAME;
 610         else if( !strcmp( key, "qcstatus" ) )
 611                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_QCSTATUS;
 612         else if( !strcmp( key, "players" ) )
 613                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PLAYERS;
 614         else if( !strcmp( key, "maxplayers" ) )
 615                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MAXPLAYERS;
 616         else if( !strcmp( key, "numplayers" ) )
 617                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMPLAYERS;
 618         else if( !strcmp( key, "numbots" ) )
 619                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMBOTS;
 620         else if( !strcmp( key, "numhumans" ) )
 621                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMHUMANS;
 622         else if( !strcmp( key, "freeslots" ) )
 623                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_FREESLOTS;
 624         else if( !strcmp( key, "protocol" ) )
 625                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PROTOCOL;
 626         else if( !strcmp( key, "isfavorite" ) )
 627                 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_ISFAVORITE;
 628         else
 629                 PRVM_G_FLOAT( OFS_RETURN ) = -1;
 630 }
 631
 632 /*
 633 ========================
 634 VM_M_addwantedserverlistkey
 635
 636 addwantedserverlistkey(string key)
 637 ========================
 638 */
 639 static void VM_M_addwantedserverlistkey(prvm_prog_t *prog)
 640 {
 641         VM_SAFEPARMCOUNT( 1, VM_M_addwantedserverlistkey );
 642 }
 643
 644 /*
 645 ===============================================================================
 646 MESSAGE WRITING
 647
 648 used only for client and menu
 649 server uses VM_SV_...
 650
 651 Write*(* data, float type, float to)
 652
 653 ===============================================================================
 654 */
 655
 656 #define MSG_BROADCAST   0               // unreliable to all
 657 #define MSG_ONE                 1               // reliable to one (msg_entity)
 658 #define MSG_ALL                 2               // reliable to all
 659 #define MSG_INIT                3               // write to the init string
 660
 661 static sizebuf_t *VM_M_WriteDest (prvm_prog_t *prog)
 662 {
 663         int             dest;
 664         int             destclient;
 665
 666         if(!sv.active)
 667                 prog->error_cmd("VM_M_WriteDest: game is not server (%s)", prog->name);
 668
 669         dest = (int)PRVM_G_FLOAT(OFS_PARM1);
 670         switch (dest)
 671         {
 672         case MSG_BROADCAST:
 673                 return &sv.datagram;
 674
 675         case MSG_ONE:
 676                 destclient = (int) PRVM_G_FLOAT(OFS_PARM2);
 677                 if (destclient < 0 || destclient >= svs.maxclients || !svs.clients[destclient].active || !svs.clients[destclient].netconnection)
 678                         prog->error_cmd("VM_clientcommand: %s: invalid client !", prog->name);
 679
 680                 return &svs.clients[destclient].netconnection->message;
 681
 682         case MSG_ALL:
 683                 return &sv.reliable_datagram;
 684
 685         case MSG_INIT:
 686                 return &sv.signon;
 687
 688         default:
 689                 prog->error_cmd("WriteDest: bad destination");
 690                 break;
 691         }
 692
 693         return NULL;
 694 }
 695
 696 static void VM_M_WriteByte (prvm_prog_t *prog)
 697 {
 698         VM_SAFEPARMCOUNT(1, VM_M_WriteByte);
 699         MSG_WriteByte (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
 700 }
 701
 702 static void VM_M_WriteChar (prvm_prog_t *prog)
 703 {
 704         VM_SAFEPARMCOUNT(1, VM_M_WriteChar);
 705         MSG_WriteChar (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
 706 }
 707
 708 static void VM_M_WriteShort (prvm_prog_t *prog)
 709 {
 710         VM_SAFEPARMCOUNT(1, VM_M_WriteShort);
 711         MSG_WriteShort (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
 712 }
 713
 714 static void VM_M_WriteLong (prvm_prog_t *prog)
 715 {
 716         VM_SAFEPARMCOUNT(1, VM_M_WriteLong);
 717         MSG_WriteLong (VM_M_WriteDest(prog), (int)PRVM_G_FLOAT(OFS_PARM0));
 718 }
 719
 720 static void VM_M_WriteAngle (prvm_prog_t *prog)
 721 {
 722         VM_SAFEPARMCOUNT(1, VM_M_WriteAngle);
 723         MSG_WriteAngle (VM_M_WriteDest(prog), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
 724 }
 725
 726 static void VM_M_WriteCoord (prvm_prog_t *prog)
 727 {
 728         VM_SAFEPARMCOUNT(1, VM_M_WriteCoord);
 729         MSG_WriteCoord (VM_M_WriteDest(prog), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
 730 }
 731
 732 static void VM_M_WriteString (prvm_prog_t *prog)
 733 {
 734         VM_SAFEPARMCOUNT(1, VM_M_WriteString);
 735         MSG_WriteString (VM_M_WriteDest(prog), PRVM_G_STRING(OFS_PARM0));
 736 }
 737
 738 static void VM_M_WriteEntity (prvm_prog_t *prog)
 739 {
 740         VM_SAFEPARMCOUNT(1, VM_M_WriteEntity);
 741         MSG_WriteShort (VM_M_WriteDest(prog), PRVM_G_EDICTNUM(OFS_PARM0));
 742 }
 743
 744 /*
 745 =================
 746 VM_M_copyentity
 747
 748 copies data from one entity to another
 749
 750 copyentity(entity src, entity dst)
 751 =================
 752 */
 753 static void VM_M_copyentity (prvm_prog_t *prog)
 754 {
 755         prvm_edict_t *in, *out;
 756         VM_SAFEPARMCOUNT(2,VM_M_copyentity);
 757         in = PRVM_G_EDICT(OFS_PARM0);
 758         out = PRVM_G_EDICT(OFS_PARM1);
 759         memcpy(out->fields.fp, in->fields.fp, prog->entityfields * sizeof(prvm_vec_t));
 760 }
 761
 762 //#66 vector() getmousepos (EXT_CSQC)
 763 static void VM_M_getmousepos(prvm_prog_t *prog)
 764 {
 765         VM_SAFEPARMCOUNT(0,VM_M_getmousepos);
 766
 767         if (key_consoleactive || (key_dest != key_menu && key_dest != key_menu_grabbed))
 768                 VectorSet(PRVM_G_VECTOR(OFS_RETURN), 0, 0, 0);
 769         else if (in_client_mouse)
 770                 VectorSet(PRVM_G_VECTOR(OFS_RETURN), in_windowmouse_x * vid_conwidth.integer / vid.width, in_windowmouse_y * vid_conheight.integer / vid.height, 0);
 771         else
 772                 VectorSet(PRVM_G_VECTOR(OFS_RETURN), in_mouse_x * vid_conwidth.integer / vid.width, in_mouse_y * vid_conheight.integer / vid.height, 0);
 773 }
 774
 775 static void VM_M_crypto_getkeyfp(prvm_prog_t *prog)
 776 {
 777         lhnetaddress_t addr;
 778         const char *s;
 779         char keyfp[FP64_SIZE + 1];
 780
 781         VM_SAFEPARMCOUNT(1,VM_M_crypto_getkeyfp);
 782
 783         s = PRVM_G_STRING( OFS_PARM0 );
 784         VM_CheckEmptyString( prog, s );
 785
 786         if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, keyfp, sizeof(keyfp), NULL, 0, NULL))
 787                 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, keyfp );
 788         else
 789                 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
 790 }
 791 static void VM_M_crypto_getidfp(prvm_prog_t *prog)
 792 {
 793         lhnetaddress_t addr;
 794         const char *s;
 795         char idfp[FP64_SIZE + 1];
 796
 797         VM_SAFEPARMCOUNT(1,VM_M_crypto_getidfp);
 798
 799         s = PRVM_G_STRING( OFS_PARM0 );
 800         VM_CheckEmptyString( prog, s );
 801
 802         if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, NULL, 0, idfp, sizeof(idfp), NULL))
 803                 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( prog, idfp );
 804         else
 805                 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
 806 }
 807 static void VM_M_crypto_getencryptlevel(prvm_prog_t *prog)
 808 {
 809         lhnetaddress_t addr;
 810         const char *s;
 811         int aeslevel;
 812         char vabuf[1024];
 813
 814         VM_SAFEPARMCOUNT(1,VM_M_crypto_getencryptlevel);
 815
 816         s = PRVM_G_STRING( OFS_PARM0 );
 817         VM_CheckEmptyString( prog, s );
 818
 819         if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, NULL, 0, NULL, 0, &aeslevel))
 820                 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, aeslevel ? va(vabuf, sizeof(vabuf), "%d AES128", aeslevel) : "0");
 821         else
 822                 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
 823 }
 824 static void VM_M_crypto_getmykeyfp(prvm_prog_t *prog)
 825 {
 826         int i;
 827         char keyfp[FP64_SIZE + 1];
 828
 829         VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
 830
 831         i = PRVM_G_FLOAT( OFS_PARM0 );
 832         switch(Crypto_RetrieveLocalKey(i, keyfp, sizeof(keyfp), NULL, 0, NULL))
 833         {
 834                 case -1:
 835                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, "");
 836                         break;
 837                 case 0:
 838                         PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
 839                         break;
 840                 default:
 841                 case 1:
 842                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, keyfp);
 843                         break;
 844         }
 845 }
 846 static void VM_M_crypto_getmyidfp(prvm_prog_t *prog)
 847 {
 848         int i;
 849         char idfp[FP64_SIZE + 1];
 850
 851         VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
 852
 853         i = PRVM_G_FLOAT( OFS_PARM0 );
 854         switch(Crypto_RetrieveLocalKey(i, NULL, 0, idfp, sizeof(idfp), NULL))
 855         {
 856                 case -1:
 857                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, "");
 858                         break;
 859                 case 0:
 860                         PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
 861                         break;
 862                 default:
 863                 case 1:
 864                         PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(prog, idfp);
 865                         break;
 866         }
 867 }
 868 static void VM_M_crypto_getmyidstatus(prvm_prog_t *prog)
 869 {
 870         int i;
 871         qboolean issigned;
 872
 873         VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
 874
 875         i = PRVM_G_FLOAT( OFS_PARM0 );
 876         switch(Crypto_RetrieveLocalKey(i, NULL, 0, NULL, 0, &issigned))
 877         {
 878                 case -1:
 879                         PRVM_G_FLOAT( OFS_RETURN ) = 0; // have no ID there
 880                         break;
 881                 case 0:
 882                         PRVM_G_FLOAT( OFS_RETURN ) = -1; // out of range
 883                         break;
 884                 default:
 885                 case 1:
 886                         PRVM_G_FLOAT( OFS_RETURN ) = issigned ? 2 : 1;
 887                         break;
 888         }
 889 }
 890
 891 prvm_builtin_t vm_m_builtins[] = {
 892 NULL,                                                                   //   #0 NULL function (not callable)
 893 VM_checkextension,                              //   #1
 894 VM_error,                                                       //   #2
 895 VM_objerror,                                            //   #3
 896 VM_print,                                                       //   #4
 897 VM_bprint,                                                      //   #5
 898 VM_sprint,                                                      //   #6
 899 VM_centerprint,                                 //   #7
 900 VM_normalize,                                           //   #8
 901 VM_vlen,                                                                //   #9
 902 VM_vectoyaw,                                            //  #10
 903 VM_vectoangles,                                 //  #11
 904 VM_random,                                                      //  #12
 905 VM_localcmd,                                            //  #13
 906 VM_cvar,                                                                //  #14
 907 VM_cvar_set,                                            //  #15
 908 VM_dprint,                                                      //  #16
 909 VM_ftos,                                                                //  #17
 910 VM_fabs,                                                                //  #18
 911 VM_vtos,                                                                //  #19
 912 VM_etos,                                                                //  #20
 913 VM_stof,                                                                //  #21
 914 VM_spawn,                                                       //  #22
 915 VM_remove,                                                      //  #23
 916 VM_find,                                                                //  #24
 917 VM_findfloat,                                           //  #25
 918 VM_findchain,                                           //  #26
 919 VM_findchainfloat,                              //  #27
 920 VM_precache_file,                                       //  #28
 921 VM_precache_sound,                              //  #29
 922 VM_coredump,                                            //  #30
 923 VM_traceon,                                                     //  #31
 924 VM_traceoff,                                            //  #32
 925 VM_eprint,                                                      //  #33
 926 VM_rint,                                                                //  #34
 927 VM_floor,                                                       //  #35
 928 VM_ceil,                                                                //  #36
 929 VM_nextent,                                                     //  #37
 930 VM_sin,                                                         //  #38
 931 VM_cos,                                                         //  #39
 932 VM_sqrt,                                                                //  #40
 933 VM_randomvec,                                           //  #41
 934 VM_registercvar,                                        //  #42
 935 VM_min,                                                         //  #43
 936 VM_max,                                                         //  #44
 937 VM_bound,                                                       //  #45
 938 VM_pow,                                                         //  #46
 939 VM_M_copyentity,                                        //  #47
 940 VM_fopen,                                                       //  #48
 941 VM_fclose,                                                      //  #49
 942 VM_fgets,                                                       //  #50
 943 VM_fputs,                                                       //  #51
 944 VM_strlen,                                                      //  #52
 945 VM_strcat,                                                      //  #53
 946 VM_substring,                                           //  #54
 947 VM_stov,                                                                //  #55
 948 VM_strzone,                                                     //  #56
 949 VM_strunzone,                                           //  #57
 950 VM_tokenize,                                            //  #58
 951 VM_argv,                                                                //  #59
 952 VM_isserver,                                            //  #60
 953 VM_clientcount,                                 //  #61
 954 VM_clientstate,                                 //  #62
 955 VM_clcommand,                                           //  #63
 956 VM_changelevel,                                 //  #64
 957 VM_localsound,                                          //  #65
 958 VM_M_getmousepos,                                       //  #66
 959 VM_gettime,                                                     //  #67
 960 VM_loadfromdata,                                        //  #68
 961 VM_loadfromfile,                                        //  #69
 962 VM_modulo,                                                      //  #70
 963 VM_cvar_string,                                 //  #71
 964 VM_crash,                                                       //  #72
 965 VM_stackdump,                                           //  #73
 966 VM_search_begin,                                        //  #74
 967 VM_search_end,                                          //  #75
 968 VM_search_getsize,                              //  #76
 969 VM_search_getfilename,                  //  #77
 970 VM_chr,                                                         //  #78
 971 VM_itof,                                                                //  #79
 972 VM_ftoe,                                                                //  #80
 973 VM_itof,                                                                //  #81 isString
 974 VM_altstr_count,                                        //  #82
 975 VM_altstr_prepare,                              //  #83
 976 VM_altstr_get,                                          //  #84
 977 VM_altstr_set,                                          //  #85
 978 VM_altstr_ins,                                          //  #86
 979 VM_findflags,                                           //  #87
 980 VM_findchainflags,                              //  #88
 981 VM_cvar_defstring,                              //  #89
 982 // deactivate support for model rendering in the menu until someone has time to do it right [3/2/2008 Andreas]
 983 #if 0
 984 VM_CL_setmodel,                                 // #90 void(entity e, string m) setmodel (QUAKE)
 985 VM_CL_precache_model,                   // #91 void(string s) precache_model (QUAKE)
 986 VM_CL_setorigin,                                // #92 void(entity e, vector o) setorigin (QUAKE)
 987 #else
 988 NULL,
 989 NULL,
 990 NULL,
 991 #endif
 992 NULL,                                                                   //  #93
 993 NULL,                                                                   //  #94
 994 NULL,                                                                   //  #95
 995 NULL,                                                                   //  #96
 996 NULL,                                                                   //  #97
 997 NULL,                                                                   //  #98
 998 NULL,                                                                   //  #99
 999 NULL,                                                                   // #100
1000 NULL,                                                                   // #101
1001 NULL,                                                                   // #102
1002 NULL,                                                                   // #103
1003 NULL,                                                                   // #104
1004 NULL,                                                                   // #105
1005 NULL,                                                                   // #106
1006 NULL,                                                                   // #107
1007 NULL,                                                                   // #108
1008 NULL,                                                                   // #109
1009 NULL,                                                                   // #110
1010 NULL,                                                                   // #111
1011 NULL,                                                                   // #112
1012 NULL,                                                                   // #113
1013 NULL,                                                                   // #114
1014 NULL,                                                                   // #115
1015 NULL,                                                                   // #116
1016 NULL,                                                                   // #117
1017 NULL,                                                                   // #118
1018 NULL,                                                                   // #119
1019 NULL,                                                                   // #120
1020 NULL,                                                                   // #121
1021 NULL,                                                                   // #122
1022 NULL,                                                                   // #123
1023 NULL,                                                                   // #124
1024 NULL,                                                                   // #125
1025 NULL,                                                                   // #126
1026 NULL,                                                                   // #127
1027 NULL,                                                                   // #128
1028 NULL,                                                                   // #129
1029 NULL,                                                                   // #130
1030 NULL,                                                                   // #131
1031 NULL,                                                                   // #132
1032 NULL,                                                                   // #133
1033 NULL,                                                                   // #134
1034 NULL,                                                                   // #135
1035 NULL,                                                                   // #136
1036 NULL,                                                                   // #137
1037 NULL,                                                                   // #138
1038 NULL,                                                                   // #139
1039 NULL,                                                                   // #140
1040 NULL,                                                                   // #141
1041 NULL,                                                                   // #142
1042 NULL,                                                                   // #143
1043 NULL,                                                                   // #144
1044 NULL,                                                                   // #145
1045 NULL,                                                                   // #146
1046 NULL,                                                                   // #147
1047 NULL,                                                                   // #148
1048 NULL,                                                                   // #149
1049 NULL,                                                                   // #150
1050 NULL,                                                                   // #151
1051 NULL,                                                                   // #152
1052 NULL,                                                                   // #153
1053 NULL,                                                                   // #154
1054 NULL,                                                                   // #155
1055 NULL,                                                                   // #156
1056 NULL,                                                                   // #157
1057 NULL,                                                                   // #158
1058 NULL,                                                                   // #159
1059 NULL,                                                                   // #160
1060 NULL,                                                                   // #161
1061 NULL,                                                                   // #162
1062 NULL,                                                                   // #163
1063 NULL,                                                                   // #164
1064 NULL,                                                                   // #165
1065 NULL,                                                                   // #166
1066 NULL,                                                                   // #167
1067 NULL,                                                                   // #168
1068 NULL,                                                                   // #169
1069 NULL,                                                                   // #170
1070 NULL,                                                                   // #171
1071 NULL,                                                                   // #172
1072 NULL,                                                                   // #173
1073 NULL,                                                                   // #174
1074 NULL,                                                                   // #175
1075 NULL,                                                                   // #176
1076 NULL,                                                                   // #177
1077 NULL,                                                                   // #178
1078 NULL,                                                                   // #179
1079 NULL,                                                                   // #180
1080 NULL,                                                                   // #181
1081 NULL,                                                                   // #182
1082 NULL,                                                                   // #183
1083 NULL,                                                                   // #184
1084 NULL,                                                                   // #185
1085 NULL,                                                                   // #186
1086 NULL,                                                                   // #187
1087 NULL,                                                                   // #188
1088 NULL,                                                                   // #189
1089 NULL,                                                                   // #190
1090 NULL,                                                                   // #191
1091 NULL,                                                                   // #192
1092 NULL,                                                                   // #193
1093 NULL,                                                                   // #194
1094 NULL,                                                                   // #195
1095 NULL,                                                                   // #196
1096 NULL,                                                                   // #197
1097 NULL,                                                                   // #198
1098 NULL,                                                                   // #199
1099 NULL,                                                                   // #200
1100 NULL,                                                                   // #201
1101 NULL,                                                                   // #202
1102 NULL,                                                                   // #203
1103 NULL,                                                                   // #204
1104 NULL,                                                                   // #205
1105 NULL,                                                                   // #206
1106 NULL,                                                                   // #207
1107 NULL,                                                                   // #208
1108 NULL,                                                                   // #209
1109 NULL,                                                                   // #210
1110 NULL,                                                                   // #211
1111 NULL,                                                                   // #212
1112 NULL,                                                                   // #213
1113 NULL,                                                                   // #214
1114 NULL,                                                                   // #215
1115 NULL,                                                                   // #216
1116 NULL,                                                                   // #217
1117 NULL,                                                                   // #218
1118 NULL,                                                                   // #219
1119 NULL,                                                                   // #220
1120 VM_strstrofs,                                           // #221 float(string str, string sub[, float startpos]) strstrofs (FTE_STRINGS)
1121 VM_str2chr,                                             // #222 float(string str, float ofs) str2chr (FTE_STRINGS)
1122 VM_chr2str,                                             // #223 string(float c, ...) chr2str (FTE_STRINGS)
1123 VM_strconv,                                             // #224 string(float ccase, float calpha, float cnum, string s, ...) strconv (FTE_STRINGS)
1124 VM_strpad,                                              // #225 string(float chars, string s, ...) strpad (FTE_STRINGS)
1125 VM_infoadd,                                             // #226 string(string info, string key, string value, ...) infoadd (FTE_STRINGS)
1126 VM_infoget,                                             // #227 string(string info, string key) infoget (FTE_STRINGS)
1127 VM_strncmp,                                                     // #228 float(string s1, string s2, float len) strncmp (FTE_STRINGS)
1128 VM_strncasecmp,                                 // #229 float(string s1, string s2) strcasecmp (FTE_STRINGS)
1129 VM_strncasecmp,                                 // #230 float(string s1, string s2, float len) strncasecmp (FTE_STRINGS)
1130 NULL,                                                                   // #231
1131 NULL,                                                                   // #232
1132 NULL,                                                                   // #233
1133 NULL,                                                                   // #234
1134 NULL,                                                                   // #235
1135 NULL,                                                                   // #236
1136 NULL,                                                                   // #237
1137 NULL,                                                                   // #238
1138 NULL,                                                                   // #239
1139 NULL,                                                                   // #240
1140 NULL,                                                                   // #241
1141 NULL,                                                                   // #242
1142 NULL,                                                                   // #243
1143 NULL,                                                                   // #244
1144 NULL,                                                                   // #245
1145 NULL,                                                                   // #246
1146 NULL,                                                                   // #247
1147 NULL,                                                                   // #248
1148 NULL,                                                                   // #249
1149 NULL,                                                                   // #250
1150 NULL,                                                                   // #251
1151 NULL,                                                                   // #252
1152 NULL,                                                                   // #253
1153 NULL,                                                                   // #254
1154 NULL,                                                                   // #255
1155 NULL,                                                                   // #256
1156 NULL,                                                                   // #257
1157 NULL,                                                                   // #258
1158 NULL,                                                                   // #259
1159 NULL,                                                                   // #260
1160 NULL,                                                                   // #261
1161 NULL,                                                                   // #262
1162 NULL,                                                                   // #263
1163 NULL,                                                                   // #264
1164 NULL,                                                                   // #265
1165 NULL,                                                                   // #266
1166 NULL,                                                                   // #267
1167 NULL,                                                                   // #268
1168 NULL,                                                                   // #269
1169 NULL,                                                                   // #270
1170 NULL,                                                                   // #271
1171 NULL,                                                                   // #272
1172 NULL,                                                                   // #273
1173 NULL,                                                                   // #274
1174 NULL,                                                                   // #275
1175 NULL,                                                                   // #276
1176 NULL,                                                                   // #277
1177 NULL,                                                                   // #278
1178 NULL,                                                                   // #279
1179 NULL,                                                                   // #280
1180 NULL,                                                                   // #281
1181 NULL,                                                                   // #282
1182 NULL,                                                                   // #283
1183 NULL,                                                                   // #284
1184 NULL,                                                                   // #285
1185 NULL,                                                                   // #286
1186 NULL,                                                                   // #287
1187 NULL,                                                                   // #288
1188 NULL,                                                                   // #289
1189 NULL,                                                                   // #290
1190 NULL,                                                                   // #291
1191 NULL,                                                                   // #292
1192 NULL,                                                                   // #293
1193 NULL,                                                                   // #294
1194 NULL,                                                                   // #295
1195 NULL,                                                                   // #296
1196 NULL,                                                                   // #297
1197 NULL,                                                                   // #298
1198 NULL,                                                                   // #299
1199 // deactivate support for model rendering in the menu until someone has time to do it right [3/2/2008 Andreas]
1200 #if 0
1201 // CSQC range #300-#399
1202 VM_CL_R_ClearScene,                             // #300 void() clearscene (DP_QC_RENDER_SCENE)
1203 VM_CL_R_AddEntities,                    // #301 void(float mask) addentities (DP_QC_RENDER_SCENE)
1204 VM_CL_R_AddEntity,                              // #302 void(entity ent) addentity (DP_QC_RENDER_SCENE)
1205 VM_CL_R_SetView,                                // #303 float(float property, ...) setproperty (DP_QC_RENDER_SCENE)
1206 VM_CL_R_RenderScene,                    // #304 void() renderscene (DP_QC_RENDER_SCENE)
1207 VM_CL_R_AddDynamicLight,                // #305 void(vector org, float radius, vector lightcolours) adddynamiclight (DP_QC_RENDER_SCENE)
1208 VM_CL_R_PolygonBegin,                   // #306 void(string texturename, float flag[, float is2d, float lines]) R_BeginPolygon (DP_QC_RENDER_SCENE)
1209 VM_CL_R_PolygonVertex,                  // #307 void(vector org, vector texcoords, vector rgb, float alpha) R_PolygonVertex (DP_QC_RENDER_SCENE)
1210 VM_CL_R_PolygonEnd,                             // #308 void() R_EndPolygon
1211 NULL/*VM_CL_R_LoadWorldModel*/,                         // #309 void(string modelname) R_LoadWorldModel
1212 // TODO: rearrange and merge all builtin lists and share as many extensions as possible between all VM instances [1/27/2008 Andreas]
1213 VM_CL_setattachment,                            // #310 void(entity e, entity tagentity, string tagname) setattachment (DP_GFX_QUAKE3MODELTAGS) (DP_QC_RENDER_SCENE)
1214 VM_CL_gettagindex,                              // #311 float(entity ent, string tagname) gettagindex (DP_QC_GETTAGINFO) (DP_QC_RENDER_SCENE)
1215 VM_CL_gettaginfo,                                       // #312 vector(entity ent, float tagindex) gettaginfo (DP_QC_GETTAGINFO) (DP_QC_RENDER_SCENE)
1216 #else
1217 // CSQC range #300-#399
1218 NULL,
1219 NULL,
1220 NULL,
1221 NULL,
1222 NULL,
1223 NULL,
1224 NULL,
1225 NULL,
1226 NULL,
1227 NULL,
1228 NULL,
1229 NULL,
1230 NULL,
1231 #endif
1232 NULL,                                                                   // #313
1233 NULL,                                                                   // #314
1234 NULL,                                                                   // #315
1235 NULL,                                                                   // #316
1236 NULL,                                                                   // #317
1237 NULL,                                                                   // #318
1238 NULL,                                                                   // #319
1239 NULL,                                                                   // #320
1240 NULL,                                                                   // #321
1241 NULL,                                                                   // #322
1242 NULL,                                                                   // #323
1243 NULL,                                                                   // #324
1244 NULL,                                                                   // #325
1245 NULL,                                                                   // #326
1246 NULL,                                                                   // #327
1247 NULL,                                                                   // #328
1248 NULL,                                                                   // #329
1249 NULL,                                                                   // #330
1250 NULL,                                                                   // #331
1251 NULL,                                                                   // #332
1252 NULL,                                                                   // #333
1253 NULL,                                                                   // #334
1254 NULL,                                                                   // #335
1255 NULL,                                                                   // #336
1256 NULL,                                                                   // #337
1257 NULL,                                                                   // #338
1258 NULL,                                                                   // #339
1259 VM_keynumtostring,                              // #340 string keynumtostring(float keynum)
1260 VM_stringtokeynum,                              // #341 float stringtokeynum(string key)
1261 VM_getkeybind,                                                  // #342 string(float keynum[, float bindmap]) getkeybind (EXT_CSQC)
1262 NULL,                                                                   // #343
1263 NULL,                                                                   // #344
1264 NULL,                                                                   // #345
1265 NULL,                                                                   // #346
1266 NULL,                                                                   // #347
1267 NULL,                                                                   // #348
1268 VM_CL_isdemo,                                                   // #349
1269 NULL,                                                                   // #350
1270 NULL,                                                                   // #351
1271 NULL,                                                                   // #352
1272 VM_wasfreed,                                                    // #353 float(entity ent) wasfreed
1273 NULL,                                                                   // #354
1274 VM_CL_videoplaying,                                             // #355
1275 VM_findfont,                                                    // #356 float(string fontname) loadfont (DP_GFX_FONTS)
1276 VM_loadfont,                                                    // #357 float(string fontname, string fontmaps, string sizes, float slot) loadfont (DP_GFX_FONTS)
1277 NULL,                                                                   // #358
1278 NULL,                                                                   // #359
1279 NULL,                                                                   // #360
1280 NULL,                                                                   // #361
1281 NULL,                                                                   // #362
1282 NULL,                                                                   // #363
1283 NULL,                                                                   // #364
1284 NULL,                                                                   // #365
1285 NULL,                                                                   // #366
1286 NULL,                                                                   // #367
1287 NULL,                                                                   // #368
1288 NULL,                                                                   // #369
1289 NULL,                                                                   // #370
1290 NULL,                                                                   // #371
1291 NULL,                                                                   // #372
1292 NULL,                                                                   // #373
1293 NULL,                                                                   // #374
1294 NULL,                                                                   // #375
1295 NULL,                                                                   // #376
1296 NULL,                                                                   // #377
1297 NULL,                                                                   // #378
1298 NULL,                                                                   // #379
1299 NULL,                                                                   // #380
1300 NULL,                                                                   // #381
1301 NULL,                                                                   // #382
1302 NULL,                                                                   // #383
1303 NULL,                                                                   // #384
1304 NULL,                                                                   // #385
1305 NULL,                                                                   // #386
1306 NULL,                                                                   // #387
1307 NULL,                                                                   // #388
1308 NULL,                                                                   // #389
1309 NULL,                                                                   // #390
1310 NULL,                                                                   // #391
1311 NULL,                                                                   // #392
1312 NULL,                                                                   // #393
1313 NULL,                                                                   // #394
1314 NULL,                                                                   // #395
1315 NULL,                                                                   // #396
1316 NULL,                                                                   // #397
1317 NULL,                                                                   // #398
1318 NULL,                                                                   // #399
1319 NULL,                                                                   // #400
1320 VM_M_WriteByte,                                 // #401
1321 VM_M_WriteChar,                                 // #402
1322 VM_M_WriteShort,                                        // #403
1323 VM_M_WriteLong,                                 // #404
1324 VM_M_WriteAngle,                                        // #405
1325 VM_M_WriteCoord,                                        // #406
1326 VM_M_WriteString,                                       // #407
1327 VM_M_WriteEntity,                                       // #408
1328 NULL,                                                                   // #409
1329 NULL,                                                                   // #410
1330 NULL,                                                                   // #411
1331 NULL,                                                                   // #412
1332 NULL,                                                                   // #413
1333 NULL,                                                                   // #414
1334 NULL,                                                                   // #415
1335 NULL,                                                                   // #416
1336 NULL,                                                                   // #417
1337 NULL,                                                                   // #418
1338 NULL,                                                                   // #419
1339 NULL,                                                                   // #420
1340 NULL,                                                                   // #421
1341 NULL,                                                                   // #422
1342 NULL,                                                                   // #423
1343 NULL,                                                                   // #424
1344 NULL,                                                                   // #425
1345 NULL,                                                                   // #426
1346 NULL,                                                                   // #427
1347 NULL,                                                                   // #428
1348 NULL,                                                                   // #429
1349 NULL,                                                                   // #430
1350 NULL,                                                                   // #431
1351 NULL,                                                                   // #432
1352 NULL,                                                                   // #433
1353 NULL,                                                                   // #434
1354 NULL,                                                                   // #435
1355 NULL,                                                                   // #436
1356 NULL,                                                                   // #437
1357 NULL,                                                                   // #438
1358 NULL,                                                                   // #439
1359 VM_buf_create,                                  // #440 float() buf_create (DP_QC_STRINGBUFFERS)
1360 VM_buf_del,                                             // #441 void(float bufhandle) buf_del (DP_QC_STRINGBUFFERS)
1361 VM_buf_getsize,                                 // #442 float(float bufhandle) buf_getsize (DP_QC_STRINGBUFFERS)
1362 VM_buf_copy,                                    // #443 void(float bufhandle_from, float bufhandle_to) buf_copy (DP_QC_STRINGBUFFERS)
1363 VM_buf_sort,                                    // #444 void(float bufhandle, float sortpower, float backward) buf_sort (DP_QC_STRINGBUFFERS)
1364 VM_buf_implode,                                 // #445 string(float bufhandle, string glue) buf_implode (DP_QC_STRINGBUFFERS)
1365 VM_bufstr_get,                                  // #446 string(float bufhandle, float string_index) bufstr_get (DP_QC_STRINGBUFFERS)
1366 VM_bufstr_set,                                  // #447 void(float bufhandle, float string_index, string str) bufstr_set (DP_QC_STRINGBUFFERS)
1367 VM_bufstr_add,                                  // #448 float(float bufhandle, string str, float order) bufstr_add (DP_QC_STRINGBUFFERS)
1368 VM_bufstr_free,                                 // #449 void(float bufhandle, float string_index) bufstr_free (DP_QC_STRINGBUFFERS)
1369 NULL,                                                                   // #450
1370 VM_iscachedpic,                                 // #451 draw functions...
1371 VM_precache_pic,                                        // #452
1372 VM_freepic,                                                     // #453
1373 VM_drawcharacter,                                       // #454
1374 VM_drawstring,                                          // #455
1375 VM_drawpic,                                                     // #456
1376 VM_drawfill,                                            // #457
1377 VM_drawsetcliparea,                             // #458
1378 VM_drawresetcliparea,                   // #459
1379 VM_getimagesize,                                        // #460
1380 VM_cin_open,                                            // #461
1381 VM_cin_close,                                           // #462
1382 VM_cin_setstate,                                        // #463
1383 VM_cin_getstate,                                        // #464
1384 VM_cin_restart,                                         // #465
1385 VM_drawline,                                            // #466
1386 VM_drawcolorcodedstring,                // #467
1387 VM_stringwidth,                                 // #468
1388 VM_drawsubpic,                                          // #469
1389 VM_drawrotpic,                                          // #470
1390 VM_asin,                                                                // #471 float(float s) VM_asin (DP_QC_ASINACOSATANATAN2TAN)
1391 VM_acos,                                                                // #472 float(float c) VM_acos (DP_QC_ASINACOSATANATAN2TAN)
1392 VM_atan,                                                                // #473 float(float t) VM_atan (DP_QC_ASINACOSATANATAN2TAN)
1393 VM_atan2,                                                       // #474 float(float c, float s) VM_atan2 (DP_QC_ASINACOSATANATAN2TAN)
1394 VM_tan,                                                         // #475 float(float a) VM_tan (DP_QC_ASINACOSATANATAN2TAN)
1395 VM_strlennocol,                                 // #476 float(string s) : DRESK - String Length (not counting color codes) (DP_QC_STRINGCOLORFUNCTIONS)
1396 VM_strdecolorize,                                       // #477 string(string s) : DRESK - Decolorized String (DP_QC_STRINGCOLORFUNCTIONS)
1397 VM_strftime,                                            // #478 string(float uselocaltime, string format, ...) (DP_QC_STRFTIME)
1398 VM_tokenizebyseparator,                 // #479 float(string s) tokenizebyseparator (DP_QC_TOKENIZEBYSEPARATOR)
1399 VM_strtolower,                                          // #480 string(string s) VM_strtolower : DRESK - Return string as lowercase
1400 VM_strtoupper,                                          // #481 string(string s) VM_strtoupper : DRESK - Return string as uppercase
1401 NULL,                                                                   // #482
1402 NULL,                                                                   // #483
1403 VM_strreplace,                                          // #484 string(string search, string replace, string subject) strreplace (DP_QC_STRREPLACE)
1404 VM_strireplace,                                 // #485 string(string search, string replace, string subject) strireplace (DP_QC_STRREPLACE)
1405 NULL,                                                                   // #486
1406 VM_gecko_create,                                        // #487 float gecko_create( string name )
1407 VM_gecko_destroy,                                       // #488 void gecko_destroy( string name )
1408 VM_gecko_navigate,                              // #489 void gecko_navigate( string name, string URI )
1409 VM_gecko_keyevent,                              // #490 float gecko_keyevent( string name, float key, float eventtype )
1410 VM_gecko_movemouse,                             // #491 void gecko_mousemove( string name, float x, float y )
1411 VM_gecko_resize,                                        // #492 void gecko_resize( string name, float w, float h )
1412 VM_gecko_get_texture_extent,    // #493 vector gecko_get_texture_extent( string name )
1413 VM_crc16,                                               // #494 float(float caseinsensitive, string s, ...) crc16 = #494 (DP_QC_CRC16)
1414 VM_cvar_type,                                   // #495 float(string name) cvar_type = #495; (DP_QC_CVAR_TYPE)
1415 VM_numentityfields,                             // #496 float() numentityfields = #496; (QP_QC_ENTITYDATA)
1416 VM_entityfieldname,                             // #497 string(float fieldnum) entityfieldname = #497; (DP_QC_ENTITYDATA)
1417 VM_entityfieldtype,                             // #498 float(float fieldnum) entityfieldtype = #498; (DP_QC_ENTITYDATA)
1418 VM_getentityfieldstring,                // #499 string(float fieldnum, entity ent) getentityfieldstring = #499; (DP_QC_ENTITYDATA)
1419 VM_putentityfieldstring,                // #500 float(float fieldnum, entity ent, string s) putentityfieldstring = #500; (DP_QC_ENTITYDATA)
1420 NULL,                                                                   // #501
1421 NULL,                                                                   // #502
1422 VM_whichpack,                                   // #503 string(string) whichpack = #503;
1423 NULL,                                                                   // #504
1424 NULL,                                                                   // #505
1425 NULL,                                                                   // #506
1426 NULL,                                                                   // #507
1427 NULL,                                                                   // #508
1428 NULL,                                                                   // #509
1429 VM_uri_escape,                                  // #510 string(string in) uri_escape = #510;
1430 VM_uri_unescape,                                // #511 string(string in) uri_unescape = #511;
1431 VM_etof,                                        // #512 float(entity ent) num_for_edict = #512 (DP_QC_NUM_FOR_EDICT)
1432 VM_uri_get,                                             // #513 float(string uri, float id, [string post_contenttype, string post_delim, [float buf]]) uri_get = #513; (DP_QC_URI_GET, DP_QC_URI_POST)
1433 VM_tokenize_console,                                    // #514 float(string str) tokenize_console = #514; (DP_QC_TOKENIZE_CONSOLE)
1434 VM_argv_start_index,                                    // #515 float(float idx) argv_start_index = #515; (DP_QC_TOKENIZE_CONSOLE)
1435 VM_argv_end_index,                                              // #516 float(float idx) argv_end_index = #516; (DP_QC_TOKENIZE_CONSOLE)
1436 VM_buf_cvarlist,                                                // #517 void(float buf, string prefix, string antiprefix) buf_cvarlist = #517; (DP_QC_STRINGBUFFERS_CVARLIST)
1437 VM_cvar_description,                                    // #518 float(string name) cvar_description = #518; (DP_QC_CVAR_DESCRIPTION)
1438 NULL,                                                                   // #519
1439 NULL,                                                                   // #520
1440 NULL,                                                                   // #521
1441 NULL,                                                                   // #522
1442 NULL,                                                                   // #523
1443 NULL,                                                                   // #524
1444 NULL,                                                                   // #525
1445 NULL,                                                                   // #526
1446 NULL,                                                                   // #527
1447 NULL,                                                                   // #528
1448 NULL,                                                                   // #529
1449 NULL,                                                                   // #530
1450 NULL,                                                                   // #531
1451 VM_log,                                                                 // #532
1452 VM_getsoundtime,                                                // #533 float(entity e, float channel) getsoundtime = #533; (DP_SND_GETSOUNDTIME)
1453 VM_soundlength,                                                 // #534 float(string sample) soundlength = #534; (DP_SND_GETSOUNDTIME)
1454 VM_buf_loadfile,                        // #535 float(string filename, float bufhandle) buf_loadfile (DP_QC_STRINGBUFFERS_EXT_WIP)
1455 VM_buf_writefile,                       // #536 float(float filehandle, float bufhandle, float startpos, float numstrings) buf_writefile (DP_QC_STRINGBUFFERS_EXT_WIP)
1456 VM_bufstr_find,                         // #537 float(float bufhandle, string match, float matchrule, float startpos) bufstr_find (DP_QC_STRINGBUFFERS_EXT_WIP)
1457 VM_matchpattern,                        // #538 float(string s, string pattern, float matchrule) matchpattern (DP_QC_STRINGBUFFERS_EXT_WIP)
1458 NULL,                                                                   // #539
1459 NULL,                                                                   // #540
1460 NULL,                                                                   // #541
1461 NULL,                                                                   // #542
1462 NULL,                                                                   // #543
1463 NULL,                                                                   // #544
1464 NULL,                                                                   // #545
1465 NULL,                                                                   // #546
1466 NULL,                                                                   // #547
1467 NULL,                                                                   // #548
1468 NULL,                                                                   // #549
1469 NULL,                                                                   // #550
1470 NULL,                                                                   // #551
1471 NULL,                                                                   // #552
1472 NULL,                                                                   // #553
1473 NULL,                                                                   // #554
1474 NULL,                                                                   // #555
1475 NULL,                                                                   // #556
1476 NULL,                                                                   // #557
1477 NULL,                                                                   // #558
1478 NULL,                                                                   // #559
1479 NULL,                                                                   // #560
1480 NULL,                                                                   // #561
1481 NULL,                                                                   // #562
1482 NULL,                                                                   // #563
1483 NULL,                                                                   // #564
1484 NULL,                                                                   // #565
1485 NULL,                                                                   // #566
1486 NULL,                                                                   // #567
1487 NULL,                                                                   // #568
1488 NULL,                                                                   // #569
1489 NULL,                                                                   // #570
1490 NULL,                                                                   // #571
1491 NULL,                                                                   // #572
1492 NULL,                                                                   // #573
1493 NULL,                                                                   // #574
1494 NULL,                                                                   // #575
1495 NULL,                                                                   // #576
1496 NULL,                                                                   // #577
1497 NULL,                                                                   // #578
1498 NULL,                                                                   // #579
1499 NULL,                                                                   // #580
1500 NULL,                                                                   // #581
1501 NULL,                                                                   // #582
1502 NULL,                                                                   // #583
1503 NULL,                                                                   // #584
1504 NULL,                                                                   // #585
1505 NULL,                                                                   // #586
1506 NULL,                                                                   // #587
1507 NULL,                                                                   // #588
1508 NULL,                                                                   // #589
1509 NULL,                                                                   // #590
1510 NULL,                                                                   // #591
1511 NULL,                                                                   // #592
1512 NULL,                                                                   // #593
1513 NULL,                                                                   // #594
1514 NULL,                                                                   // #595
1515 NULL,                                                                   // #596
1516 NULL,                                                                   // #597
1517 NULL,                                                                   // #598
1518 NULL,                                                                   // #599
1519 NULL,                                                                   // #600
1520 VM_M_setkeydest,                                        // #601 void setkeydest(float dest)
1521 VM_M_getkeydest,                                        // #602 float getkeydest(void)
1522 VM_M_setmousetarget,                            // #603 void setmousetarget(float trg)
1523 VM_M_getmousetarget,                            // #604 float getmousetarget(void)
1524 VM_callfunction,                                // #605 void callfunction(...)
1525 VM_writetofile,                                 // #606 void writetofile(float fhandle, entity ent)
1526 VM_isfunction,                                  // #607 float isfunction(string function_name)
1527 VM_M_getresolution,                             // #608 vector getresolution(float number, [float forfullscreen])
1528 VM_keynumtostring,                              // #609 string keynumtostring(float keynum)
1529 VM_findkeysforcommand,          // #610 string findkeysforcommand(string command[, float bindmap])
1530 VM_M_getserverliststat,                 // #611 float gethostcachevalue(float type)
1531 VM_M_getserverliststring,               // #612 string gethostcachestring(float type, float hostnr)
1532 VM_parseentitydata,                             // #613 void parseentitydata(entity ent, string data)
1533 VM_stringtokeynum,                              // #614 float stringtokeynum(string key)
1534 VM_M_resetserverlistmasks,              // #615 void resethostcachemasks(void)
1535 VM_M_setserverlistmaskstring,   // #616 void sethostcachemaskstring(float mask, float fld, string str, float op)
1536 VM_M_setserverlistmasknumber,   // #617 void sethostcachemasknumber(float mask, float fld, float num, float op)
1537 VM_M_resortserverlist,                  // #618 void resorthostcache(void)
1538 VM_M_setserverlistsort,                 // #619 void sethostcachesort(float fld, float descending)
1539 VM_M_refreshserverlist,                 // #620 void refreshhostcache(void)
1540 VM_M_getserverlistnumber,               // #621 float gethostcachenumber(float fld, float hostnr)
1541 VM_M_getserverlistindexforkey,// #622 float gethostcacheindexforkey(string key)
1542 VM_M_addwantedserverlistkey,    // #623 void addwantedhostcachekey(string key)
1543 VM_CL_getextresponse,                   // #624 string getextresponse(void)
1544 VM_netaddress_resolve,          // #625 string netaddress_resolve(string, float)
1545 VM_M_getgamedirinfo,            // #626 string getgamedirinfo(float n, float prop)
1546 VM_sprintf,                     // #627 string sprintf(string format, ...)
1547 NULL, // #628
1548 NULL, // #629
1549 VM_setkeybind,                                          // #630 float(float key, string bind[, float bindmap]) setkeybind
1550 VM_getbindmaps,                                         // #631 vector(void) getbindmap
1551 VM_setbindmaps,                                         // #632 float(vector bm) setbindmap
1552 VM_M_crypto_getkeyfp,                                   // #633 string(string addr) crypto_getkeyfp
1553 VM_M_crypto_getidfp,                                    // #634 string(string addr) crypto_getidfp
1554 VM_M_crypto_getencryptlevel,                            // #635 string(string addr) crypto_getencryptlevel
1555 VM_M_crypto_getmykeyfp,                                 // #636 string(float addr) crypto_getmykeyfp
1556 VM_M_crypto_getmyidfp,                                  // #637 string(float addr) crypto_getmyidfp
1557 NULL,                                                   // #638
1558 VM_digest_hex,                                          // #639
1559 NULL,                                                   // #640
1560 VM_M_crypto_getmyidstatus,                              // #641 float(float i) crypto_getmyidstatus
1561 NULL
1562 };
1563
1564 const int vm_m_numbuiltins = sizeof(vm_m_builtins) / sizeof(prvm_builtin_t);
1565
1566 void MVM_init_cmd(prvm_prog_t *prog)
1567 {
1568         r_refdef_scene_t *scene;
1569
1570         VM_Cmd_Init(prog);
1571         VM_Polygons_Reset(prog);
1572
1573         scene = R_GetScenePointer( RST_MENU );
1574
1575         memset (scene, 0, sizeof (*scene));
1576
1577         scene->maxtempentities = 128;
1578         scene->tempentities = (entity_render_t*) Mem_Alloc(prog->progs_mempool, sizeof(entity_render_t) * scene->maxtempentities);
1579
1580         scene->maxentities = MAX_EDICTS + 256 + 512;
1581         scene->entities = (entity_render_t **)Mem_Alloc(prog->progs_mempool, sizeof(entity_render_t *) * scene->maxentities);
1582
1583         scene->ambient = 32.0f;
1584 }
1585
1586 void MVM_reset_cmd(prvm_prog_t *prog)
1587 {
1588         // note: the menu's render entities are automatically freed when the prog's pool is freed
1589
1590         //VM_Cmd_Init();
1591         VM_Cmd_Reset(prog);
1592         VM_Polygons_Reset(prog);
1593 }