7 // TODO check which strings really should be engine strings
9 //============================================================================
12 const char *vm_m_extensions =
18 "DP_GFX_FONTS_FREETYPE "
20 "DP_FONT_VARIABLEWIDTH "
22 "DP_MENU_EXTRESPONSEPACKET "
23 "DP_QC_ASINACOSATANATAN2TAN "
28 "DP_QC_CVAR_DESCRIPTION "
29 "DP_QC_FINDCHAIN_TOFIELD "
34 "DP_QC_STRINGBUFFERS "
35 "DP_QC_STRINGBUFFERS_CVARLIST "
36 "DP_QC_STRINGCOLORFUNCTIONS "
37 "DP_QC_STRING_CASE_FUNCTIONS "
39 "DP_QC_TOKENIZEBYSEPARATOR "
40 "DP_QC_TOKENIZE_CONSOLE "
41 "DP_QC_UNLIMITEDTEMPSTRINGS "
52 setmousetarget(float target)
55 void VM_M_setmousetarget(void)
57 VM_SAFEPARMCOUNT(1, VM_M_setmousetarget);
59 switch((int)PRVM_G_FLOAT(OFS_PARM0))
62 in_client_mouse = false;
65 in_client_mouse = true;
68 PRVM_ERROR("VM_M_setmousetarget: wrong destination %f !",PRVM_G_FLOAT(OFS_PARM0));
79 void VM_M_getmousetarget(void)
81 VM_SAFEPARMCOUNT(0,VM_M_getmousetarget);
84 PRVM_G_FLOAT(OFS_RETURN) = 2;
86 PRVM_G_FLOAT(OFS_RETURN) = 1;
95 setkeydest(float dest)
98 void VM_M_setkeydest(void)
100 VM_SAFEPARMCOUNT(1,VM_M_setkeydest);
102 switch((int)PRVM_G_FLOAT(OFS_PARM0))
114 key_dest = key_menu_grabbed;
118 // key_dest = key_message
121 PRVM_ERROR("VM_M_setkeydest: wrong destination %f !", PRVM_G_FLOAT(OFS_PARM0));
132 void VM_M_getkeydest(void)
134 VM_SAFEPARMCOUNT(0,VM_M_getkeydest);
136 // key_game = 0, key_message = 1, key_menu = 2, key_menu_grabbed = 3, unknown = -1
140 PRVM_G_FLOAT(OFS_RETURN) = 0;
143 PRVM_G_FLOAT(OFS_RETURN) = 2;
145 case key_menu_grabbed:
146 PRVM_G_FLOAT(OFS_RETURN) = 3;
150 // PRVM_G_FLOAT(OFS_RETURN) = 1;
153 PRVM_G_FLOAT(OFS_RETURN) = -1;
162 vector getresolution(float number)
165 void VM_M_getresolution(void)
168 VM_SAFEPARMCOUNTRANGE(1, 2, VM_getresolution);
170 nr = (int)PRVM_G_FLOAT(OFS_PARM0);
172 fs = ((prog->argc <= 1) || ((int)PRVM_G_FLOAT(OFS_PARM1)));
174 if(nr < 0 || nr >= (fs ? video_resolutions_count : video_resolutions_hardcoded_count))
176 PRVM_G_VECTOR(OFS_RETURN)[0] = 0;
177 PRVM_G_VECTOR(OFS_RETURN)[1] = 0;
178 PRVM_G_VECTOR(OFS_RETURN)[2] = 0;
182 video_resolution_t *r = &((fs ? video_resolutions : video_resolutions_hardcoded)[nr]);
183 PRVM_G_VECTOR(OFS_RETURN)[0] = r->width;
184 PRVM_G_VECTOR(OFS_RETURN)[1] = r->height;
185 PRVM_G_VECTOR(OFS_RETURN)[2] = r->pixelheight;
189 void VM_M_getgamedirinfo(void)
192 VM_SAFEPARMCOUNT(2, VM_getgamedirinfo);
194 nr = (int)PRVM_G_FLOAT(OFS_PARM0);
195 item = (int)PRVM_G_FLOAT(OFS_PARM1);
197 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
199 if(nr >= 0 && nr < fs_all_gamedirs_count)
202 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( fs_all_gamedirs[nr].name );
204 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( fs_all_gamedirs[nr].description );
210 VM_M_getserverliststat
212 float getserverliststat(float type)
217 0 serverlist_viewcount
218 1 serverlist_totalcount
226 void VM_M_getserverliststat( void )
229 VM_SAFEPARMCOUNT ( 1, VM_M_getserverliststat );
231 PRVM_G_FLOAT( OFS_RETURN ) = 0;
233 type = (int)PRVM_G_FLOAT( OFS_PARM0 );
237 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_viewcount;
240 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_cachecount;
243 PRVM_G_FLOAT ( OFS_RETURN ) = masterquerycount;
246 PRVM_G_FLOAT ( OFS_RETURN ) = masterreplycount;
249 PRVM_G_FLOAT ( OFS_RETURN ) = serverquerycount;
252 PRVM_G_FLOAT ( OFS_RETURN ) = serverreplycount;
255 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_sortbyfield;
258 PRVM_G_FLOAT ( OFS_RETURN ) = serverlist_sortflags;
261 VM_Warning( "VM_M_getserverliststat: bad type %i!\n", type );
266 ========================
267 VM_M_resetserverlistmasks
269 resetserverlistmasks()
270 ========================
272 void VM_M_resetserverlistmasks( void )
274 VM_SAFEPARMCOUNT(0, VM_M_resetserverlistmasks);
275 ServerList_ResetMasks();
280 ========================
281 VM_M_setserverlistmaskstring
283 setserverlistmaskstring(float mask, float fld, string str, float op)
286 ========================
288 void VM_M_setserverlistmaskstring( void )
292 serverlist_mask_t *mask;
295 VM_SAFEPARMCOUNT( 4, VM_M_setserverlistmaskstring );
296 str = PRVM_G_STRING( OFS_PARM2 );
298 masknr = (int)PRVM_G_FLOAT( OFS_PARM0 );
299 if( masknr >= 0 && masknr <= SERVERLIST_ANDMASKCOUNT )
300 mask = &serverlist_andmasks[masknr];
301 else if( masknr >= 512 && masknr - 512 <= SERVERLIST_ORMASKCOUNT )
302 mask = &serverlist_ormasks[masknr - 512 ];
305 VM_Warning( "VM_M_setserverlistmaskstring: invalid mask number %i\n", masknr );
309 field = (int) PRVM_G_FLOAT( OFS_PARM1 );
313 strlcpy( mask->info.cname, str, sizeof(mask->info.cname) );
316 strlcpy( mask->info.name, str, sizeof(mask->info.name) );
319 strlcpy( mask->info.qcstatus, str, sizeof(mask->info.qcstatus) );
322 strlcpy( mask->info.players, str, sizeof(mask->info.players) );
325 strlcpy( mask->info.map, str, sizeof(mask->info.map) );
328 strlcpy( mask->info.mod, str, sizeof(mask->info.mod) );
331 strlcpy( mask->info.game, str, sizeof(mask->info.game) );
334 VM_Warning( "VM_M_setserverlistmaskstring: Bad field number %i passed!\n", field );
339 mask->tests[field] = (serverlist_maskop_t)((int)PRVM_G_FLOAT( OFS_PARM3 ));
343 ========================
344 VM_M_setserverlistmasknumber
346 setserverlistmasknumber(float mask, float fld, float num, float op)
350 ========================
352 void VM_M_setserverlistmasknumber( void )
355 serverlist_mask_t *mask;
358 VM_SAFEPARMCOUNT( 4, VM_M_setserverlistmasknumber );
360 masknr = (int)PRVM_G_FLOAT( OFS_PARM0 );
361 if( masknr >= 0 && masknr <= SERVERLIST_ANDMASKCOUNT )
362 mask = &serverlist_andmasks[masknr];
363 else if( masknr >= 512 && masknr - 512 <= SERVERLIST_ORMASKCOUNT )
364 mask = &serverlist_ormasks[masknr - 512 ];
367 VM_Warning( "VM_M_setserverlistmasknumber: invalid mask number %i\n", masknr );
371 number = (int)PRVM_G_FLOAT( OFS_PARM2 );
372 field = (int) PRVM_G_FLOAT( OFS_PARM1 );
375 case SLIF_MAXPLAYERS:
376 mask->info.maxplayers = number;
378 case SLIF_NUMPLAYERS:
379 mask->info.numplayers = number;
382 mask->info.numbots = number;
385 mask->info.numhumans = number;
388 mask->info.ping = number;
391 mask->info.protocol = number;
394 mask->info.freeslots = number;
396 case SLIF_ISFAVORITE:
397 mask->info.isfavorite = number != 0;
400 VM_Warning( "VM_M_setserverlistmasknumber: Bad field number %i passed!\n", field );
405 mask->tests[field] = (serverlist_maskop_t)((int)PRVM_G_FLOAT( OFS_PARM3 ));
410 ========================
411 VM_M_resortserverlist
414 ========================
416 void VM_M_resortserverlist( void )
418 VM_SAFEPARMCOUNT(0, VM_M_resortserverlist);
419 ServerList_RebuildViewList();
424 VM_M_getserverliststring
426 string getserverliststring(float field, float hostnr)
429 void VM_M_getserverliststring(void)
431 serverlist_entry_t *cache;
434 VM_SAFEPARMCOUNT(2, VM_M_getserverliststring);
436 PRVM_G_INT(OFS_RETURN) = OFS_NULL;
438 hostnr = (int)PRVM_G_FLOAT(OFS_PARM1);
440 if(hostnr < 0 || hostnr >= serverlist_viewcount)
442 Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
445 cache = ServerList_GetViewEntry(hostnr);
446 switch( (int) PRVM_G_FLOAT(OFS_PARM0) ) {
448 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( cache->info.cname );
451 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( cache->info.name );
454 PRVM_G_INT (OFS_RETURN ) = PRVM_SetTempString (cache->info.qcstatus );
457 PRVM_G_INT (OFS_RETURN ) = PRVM_SetTempString (cache->info.players );
460 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( cache->info.game );
463 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( cache->info.mod );
466 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( cache->info.map );
468 // TODO remove this again
470 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( cache->line1 );
473 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( cache->line2 );
476 Con_Print("VM_M_getserverliststring: bad field number passed!\n");
482 VM_M_getserverlistnumber
484 float getserverlistnumber(float field, float hostnr)
487 void VM_M_getserverlistnumber(void)
489 serverlist_entry_t *cache;
492 VM_SAFEPARMCOUNT(2, VM_M_getserverliststring);
494 PRVM_G_INT(OFS_RETURN) = OFS_NULL;
496 hostnr = (int)PRVM_G_FLOAT(OFS_PARM1);
498 if(hostnr < 0 || hostnr >= serverlist_viewcount)
500 Con_Print("VM_M_getserverliststring: bad hostnr passed!\n");
503 cache = ServerList_GetViewEntry(hostnr);
504 switch( (int) PRVM_G_FLOAT(OFS_PARM0) ) {
505 case SLIF_MAXPLAYERS:
506 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.maxplayers;
508 case SLIF_NUMPLAYERS:
509 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numplayers;
512 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numbots;
515 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.numhumans;
518 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.freeslots;
521 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.ping;
524 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.protocol;
526 case SLIF_ISFAVORITE:
527 PRVM_G_FLOAT( OFS_RETURN ) = cache->info.isfavorite;
530 Con_Print("VM_M_getserverlistnumber: bad field number passed!\n");
535 ========================
536 VM_M_setserverlistsort
538 setserverlistsort(float field, float flags)
539 ========================
541 void VM_M_setserverlistsort( void )
543 VM_SAFEPARMCOUNT( 2, VM_M_setserverlistsort );
545 serverlist_sortbyfield = (serverlist_infofield_t)((int)PRVM_G_FLOAT( OFS_PARM0 ));
546 serverlist_sortflags = (int) PRVM_G_FLOAT( OFS_PARM1 );
550 ========================
551 VM_M_refreshserverlist
554 ========================
556 void VM_M_refreshserverlist( void )
558 VM_SAFEPARMCOUNT( 0, VM_M_refreshserverlist );
559 ServerList_QueryList(false, true, false, false);
563 ========================
564 VM_M_getserverlistindexforkey
566 float getserverlistindexforkey(string key)
567 ========================
569 void VM_M_getserverlistindexforkey( void )
572 VM_SAFEPARMCOUNT( 1, VM_M_getserverlistindexforkey );
574 key = PRVM_G_STRING( OFS_PARM0 );
575 VM_CheckEmptyString( key );
577 if( !strcmp( key, "cname" ) )
578 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_CNAME;
579 else if( !strcmp( key, "ping" ) )
580 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PING;
581 else if( !strcmp( key, "game" ) )
582 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_GAME;
583 else if( !strcmp( key, "mod" ) )
584 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MOD;
585 else if( !strcmp( key, "map" ) )
586 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MAP;
587 else if( !strcmp( key, "name" ) )
588 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NAME;
589 else if( !strcmp( key, "qcstatus" ) )
590 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_QCSTATUS;
591 else if( !strcmp( key, "players" ) )
592 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PLAYERS;
593 else if( !strcmp( key, "maxplayers" ) )
594 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_MAXPLAYERS;
595 else if( !strcmp( key, "numplayers" ) )
596 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMPLAYERS;
597 else if( !strcmp( key, "numbots" ) )
598 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMBOTS;
599 else if( !strcmp( key, "numhumans" ) )
600 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_NUMHUMANS;
601 else if( !strcmp( key, "freeslots" ) )
602 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_FREESLOTS;
603 else if( !strcmp( key, "protocol" ) )
604 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_PROTOCOL;
605 else if( !strcmp( key, "isfavorite" ) )
606 PRVM_G_FLOAT( OFS_RETURN ) = SLIF_ISFAVORITE;
608 PRVM_G_FLOAT( OFS_RETURN ) = -1;
612 ========================
613 VM_M_addwantedserverlistkey
615 addwantedserverlistkey(string key)
616 ========================
618 void VM_M_addwantedserverlistkey( void )
620 VM_SAFEPARMCOUNT( 1, VM_M_addwantedserverlistkey );
624 ===============================================================================
627 used only for client and menu
628 server uses VM_SV_...
630 Write*(* data, float type, float to)
632 ===============================================================================
635 #define MSG_BROADCAST 0 // unreliable to all
636 #define MSG_ONE 1 // reliable to one (msg_entity)
637 #define MSG_ALL 2 // reliable to all
638 #define MSG_INIT 3 // write to the init string
640 sizebuf_t *VM_M_WriteDest (void)
646 PRVM_ERROR("VM_M_WriteDest: game is not server (%s)", PRVM_NAME);
648 dest = (int)PRVM_G_FLOAT(OFS_PARM1);
655 destclient = (int) PRVM_G_FLOAT(OFS_PARM2);
656 if (destclient < 0 || destclient >= svs.maxclients || !svs.clients[destclient].active || !svs.clients[destclient].netconnection)
657 PRVM_ERROR("VM_clientcommand: %s: invalid client !", PRVM_NAME);
659 return &svs.clients[destclient].netconnection->message;
662 return &sv.reliable_datagram;
668 PRVM_ERROR ("WriteDest: bad destination");
675 void VM_M_WriteByte (void)
677 VM_SAFEPARMCOUNT(1, VM_M_WriteByte);
678 MSG_WriteByte (VM_M_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
681 void VM_M_WriteChar (void)
683 VM_SAFEPARMCOUNT(1, VM_M_WriteChar);
684 MSG_WriteChar (VM_M_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
687 void VM_M_WriteShort (void)
689 VM_SAFEPARMCOUNT(1, VM_M_WriteShort);
690 MSG_WriteShort (VM_M_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
693 void VM_M_WriteLong (void)
695 VM_SAFEPARMCOUNT(1, VM_M_WriteLong);
696 MSG_WriteLong (VM_M_WriteDest(), (int)PRVM_G_FLOAT(OFS_PARM0));
699 void VM_M_WriteAngle (void)
701 VM_SAFEPARMCOUNT(1, VM_M_WriteAngle);
702 MSG_WriteAngle (VM_M_WriteDest(), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
705 void VM_M_WriteCoord (void)
707 VM_SAFEPARMCOUNT(1, VM_M_WriteCoord);
708 MSG_WriteCoord (VM_M_WriteDest(), PRVM_G_FLOAT(OFS_PARM0), sv.protocol);
711 void VM_M_WriteString (void)
713 VM_SAFEPARMCOUNT(1, VM_M_WriteString);
714 MSG_WriteString (VM_M_WriteDest(), PRVM_G_STRING(OFS_PARM0));
717 void VM_M_WriteEntity (void)
719 VM_SAFEPARMCOUNT(1, VM_M_WriteEntity);
720 MSG_WriteShort (VM_M_WriteDest(), PRVM_G_EDICTNUM(OFS_PARM0));
727 copies data from one entity to another
729 copyentity(entity src, entity dst)
732 static void VM_M_copyentity (void)
734 prvm_edict_t *in, *out;
735 VM_SAFEPARMCOUNT(2,VM_M_copyentity);
736 in = PRVM_G_EDICT(OFS_PARM0);
737 out = PRVM_G_EDICT(OFS_PARM1);
738 memcpy(out->fields.vp, in->fields.vp, prog->progs->entityfields * 4);
741 //#66 vector() getmousepos (EXT_CSQC)
742 static void VM_M_getmousepos(void)
744 VM_SAFEPARMCOUNT(0,VM_M_getmousepos);
746 if (key_consoleactive || (key_dest != key_menu && key_dest != key_menu_grabbed))
747 VectorSet(PRVM_G_VECTOR(OFS_RETURN), 0, 0, 0);
748 else if (in_client_mouse)
749 VectorSet(PRVM_G_VECTOR(OFS_RETURN), in_windowmouse_x * vid_conwidth.integer / vid.width, in_windowmouse_y * vid_conheight.integer / vid.height, 0);
751 VectorSet(PRVM_G_VECTOR(OFS_RETURN), in_mouse_x * vid_conwidth.integer / vid.width, in_mouse_y * vid_conheight.integer / vid.height, 0);
754 void VM_M_crypto_getkeyfp(void)
758 char keyfp[FP64_SIZE + 1];
760 VM_SAFEPARMCOUNT(1,VM_M_crypto_getkeyfp);
762 s = PRVM_G_STRING( OFS_PARM0 );
763 VM_CheckEmptyString( s );
765 if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, keyfp, sizeof(keyfp), NULL, 0, NULL))
766 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( keyfp );
768 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
770 void VM_M_crypto_getidfp(void)
774 char idfp[FP64_SIZE + 1];
776 VM_SAFEPARMCOUNT(1,VM_M_crypto_getidfp);
778 s = PRVM_G_STRING( OFS_PARM0 );
779 VM_CheckEmptyString( s );
781 if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, NULL, 0, idfp, sizeof(idfp), NULL))
782 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString( idfp );
784 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
786 void VM_M_crypto_getencryptlevel(void)
792 VM_SAFEPARMCOUNT(1,VM_M_crypto_getencryptlevel);
794 s = PRVM_G_STRING( OFS_PARM0 );
795 VM_CheckEmptyString( s );
797 if(LHNETADDRESS_FromString(&addr, s, 26000) && Crypto_RetrieveHostKey(&addr, NULL, NULL, 0, NULL, 0, &aeslevel))
798 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(aeslevel ? va("%d AES128", aeslevel) : "0");
800 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
802 void VM_M_crypto_getmykeyfp(void)
805 char keyfp[FP64_SIZE + 1];
807 VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
809 i = PRVM_G_FLOAT( OFS_PARM0 );
810 switch(Crypto_RetrieveLocalKey(i, keyfp, sizeof(keyfp), NULL, 0))
813 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString("");
816 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
820 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(keyfp);
824 void VM_M_crypto_getmyidfp(void)
827 char idfp[FP64_SIZE + 1];
829 VM_SAFEPARMCOUNT(1,VM_M_crypto_getmykey);
831 i = PRVM_G_FLOAT( OFS_PARM0 );
832 switch(Crypto_RetrieveLocalKey(i, NULL, 0, idfp, sizeof(idfp)))
835 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString("");
838 PRVM_G_INT( OFS_RETURN ) = OFS_NULL;
842 PRVM_G_INT( OFS_RETURN ) = PRVM_SetTempString(idfp);
847 prvm_builtin_t vm_m_builtins[] = {
848 NULL, // #0 NULL function (not callable)
849 VM_checkextension, // #1
855 VM_centerprint, // #7
859 VM_vectoangles, // #11
875 VM_findchainfloat, // #27
876 VM_precache_file, // #28
877 VM_precache_sound, // #29
890 VM_registercvar, // #42
895 VM_M_copyentity, // #47
909 VM_clientcount, // #61
910 VM_clientstate, // #62
912 VM_changelevel, // #64
913 VM_localsound, // #65
914 VM_M_getmousepos, // #66
916 VM_loadfromdata, // #68
917 VM_loadfromfile, // #69
919 VM_cvar_string, // #71
922 VM_search_begin, // #74
923 VM_search_end, // #75
924 VM_search_getsize, // #76
925 VM_search_getfilename, // #77
929 VM_itof, // #81 isString
930 VM_altstr_count, // #82
931 VM_altstr_prepare, // #83
932 VM_altstr_get, // #84
933 VM_altstr_set, // #85
934 VM_altstr_ins, // #86
936 VM_findchainflags, // #88
937 VM_cvar_defstring, // #89
938 // deactivate support for model rendering in the menu until someone has time to do it right [3/2/2008 Andreas]
940 VM_CL_setmodel, // #90 void(entity e, string m) setmodel (QUAKE)
941 VM_CL_precache_model, // #91 void(string s) precache_model (QUAKE)
942 VM_CL_setorigin, // #92 void(entity e, vector o) setorigin (QUAKE)
1076 VM_strstrofs, // #221 float(string str, string sub[, float startpos]) strstrofs (FTE_STRINGS)
1077 VM_str2chr, // #222 float(string str, float ofs) str2chr (FTE_STRINGS)
1078 VM_chr2str, // #223 string(float c, ...) chr2str (FTE_STRINGS)
1079 VM_strconv, // #224 string(float ccase, float calpha, float cnum, string s, ...) strconv (FTE_STRINGS)
1080 VM_strpad, // #225 string(float chars, string s, ...) strpad (FTE_STRINGS)
1081 VM_infoadd, // #226 string(string info, string key, string value, ...) infoadd (FTE_STRINGS)
1082 VM_infoget, // #227 string(string info, string key) infoget (FTE_STRINGS)
1083 VM_strncmp, // #228 float(string s1, string s2, float len) strncmp (FTE_STRINGS)
1084 VM_strncasecmp, // #229 float(string s1, string s2) strcasecmp (FTE_STRINGS)
1085 VM_strncasecmp, // #230 float(string s1, string s2, float len) strncasecmp (FTE_STRINGS)
1155 // deactivate support for model rendering in the menu until someone has time to do it right [3/2/2008 Andreas]
1157 // CSQC range #300-#399
1158 VM_CL_R_ClearScene, // #300 void() clearscene (DP_QC_RENDER_SCENE)
1159 VM_CL_R_AddEntities, // #301 void(float mask) addentities (DP_QC_RENDER_SCENE)
1160 VM_CL_R_AddEntity, // #302 void(entity ent) addentity (DP_QC_RENDER_SCENE)
1161 VM_CL_R_SetView, // #303 float(float property, ...) setproperty (DP_QC_RENDER_SCENE)
1162 VM_CL_R_RenderScene, // #304 void() renderscene (DP_QC_RENDER_SCENE)
1163 VM_CL_R_AddDynamicLight, // #305 void(vector org, float radius, vector lightcolours) adddynamiclight (DP_QC_RENDER_SCENE)
1164 VM_CL_R_PolygonBegin, // #306 void(string texturename, float flag[, float is2d, float lines]) R_BeginPolygon (DP_QC_RENDER_SCENE)
1165 VM_CL_R_PolygonVertex, // #307 void(vector org, vector texcoords, vector rgb, float alpha) R_PolygonVertex (DP_QC_RENDER_SCENE)
1166 VM_CL_R_PolygonEnd, // #308 void() R_EndPolygon
1167 NULL/*VM_CL_R_LoadWorldModel*/, // #309 void(string modelname) R_LoadWorldModel
1168 // TODO: rearrange and merge all builtin lists and share as many extensions as possible between all VM instances [1/27/2008 Andreas]
1169 VM_CL_setattachment, // #310 void(entity e, entity tagentity, string tagname) setattachment (DP_GFX_QUAKE3MODELTAGS) (DP_QC_RENDER_SCENE)
1170 VM_CL_gettagindex, // #311 float(entity ent, string tagname) gettagindex (DP_QC_GETTAGINFO) (DP_QC_RENDER_SCENE)
1171 VM_CL_gettaginfo, // #312 vector(entity ent, float tagindex) gettaginfo (DP_QC_GETTAGINFO) (DP_QC_RENDER_SCENE)
1173 // CSQC range #300-#399
1215 VM_keynumtostring, // #340 string keynumtostring(float keynum)
1216 VM_stringtokeynum, // #341 float stringtokeynum(string key)
1217 VM_getkeybind, // #342 string(float keynum[, float bindmap]) getkeybind (EXT_CSQC)
1224 VM_CL_isdemo, // #349
1230 VM_CL_videoplaying, // #355
1231 VM_findfont, // #356 float(string fontname) loadfont (DP_GFX_FONTS)
1232 VM_loadfont, // #357 float(string fontname, string fontmaps, string sizes, float slot) loadfont (DP_GFX_FONTS)
1276 VM_M_WriteByte, // #401
1277 VM_M_WriteChar, // #402
1278 VM_M_WriteShort, // #403
1279 VM_M_WriteLong, // #404
1280 VM_M_WriteAngle, // #405
1281 VM_M_WriteCoord, // #406
1282 VM_M_WriteString, // #407
1283 VM_M_WriteEntity, // #408
1315 VM_buf_create, // #440 float() buf_create (DP_QC_STRINGBUFFERS)
1316 VM_buf_del, // #441 void(float bufhandle) buf_del (DP_QC_STRINGBUFFERS)
1317 VM_buf_getsize, // #442 float(float bufhandle) buf_getsize (DP_QC_STRINGBUFFERS)
1318 VM_buf_copy, // #443 void(float bufhandle_from, float bufhandle_to) buf_copy (DP_QC_STRINGBUFFERS)
1319 VM_buf_sort, // #444 void(float bufhandle, float sortpower, float backward) buf_sort (DP_QC_STRINGBUFFERS)
1320 VM_buf_implode, // #445 string(float bufhandle, string glue) buf_implode (DP_QC_STRINGBUFFERS)
1321 VM_bufstr_get, // #446 string(float bufhandle, float string_index) bufstr_get (DP_QC_STRINGBUFFERS)
1322 VM_bufstr_set, // #447 void(float bufhandle, float string_index, string str) bufstr_set (DP_QC_STRINGBUFFERS)
1323 VM_bufstr_add, // #448 float(float bufhandle, string str, float order) bufstr_add (DP_QC_STRINGBUFFERS)
1324 VM_bufstr_free, // #449 void(float bufhandle, float string_index) bufstr_free (DP_QC_STRINGBUFFERS)
1326 VM_iscachedpic, // #451 draw functions...
1327 VM_precache_pic, // #452
1329 VM_drawcharacter, // #454
1330 VM_drawstring, // #455
1332 VM_drawfill, // #457
1333 VM_drawsetcliparea, // #458
1334 VM_drawresetcliparea, // #459
1335 VM_getimagesize, // #460
1336 VM_cin_open, // #461
1337 VM_cin_close, // #462
1338 VM_cin_setstate, // #463
1339 VM_cin_getstate, // #464
1340 VM_cin_restart, // #465
1341 VM_drawline, // #466
1342 VM_drawcolorcodedstring, // #467
1343 VM_stringwidth, // #468
1344 VM_drawsubpic, // #469
1345 VM_drawrotpic, // #470
1346 VM_asin, // #471 float(float s) VM_asin (DP_QC_ASINACOSATANATAN2TAN)
1347 VM_acos, // #472 float(float c) VM_acos (DP_QC_ASINACOSATANATAN2TAN)
1348 VM_atan, // #473 float(float t) VM_atan (DP_QC_ASINACOSATANATAN2TAN)
1349 VM_atan2, // #474 float(float c, float s) VM_atan2 (DP_QC_ASINACOSATANATAN2TAN)
1350 VM_tan, // #475 float(float a) VM_tan (DP_QC_ASINACOSATANATAN2TAN)
1351 VM_strlennocol, // #476 float(string s) : DRESK - String Length (not counting color codes) (DP_QC_STRINGCOLORFUNCTIONS)
1352 VM_strdecolorize, // #477 string(string s) : DRESK - Decolorized String (DP_QC_STRINGCOLORFUNCTIONS)
1353 VM_strftime, // #478 string(float uselocaltime, string format, ...) (DP_QC_STRFTIME)
1354 VM_tokenizebyseparator, // #479 float(string s) tokenizebyseparator (DP_QC_TOKENIZEBYSEPARATOR)
1355 VM_strtolower, // #480 string(string s) VM_strtolower : DRESK - Return string as lowercase
1356 VM_strtoupper, // #481 string(string s) VM_strtoupper : DRESK - Return string as uppercase
1359 VM_strreplace, // #484 string(string search, string replace, string subject) strreplace (DP_QC_STRREPLACE)
1360 VM_strireplace, // #485 string(string search, string replace, string subject) strireplace (DP_QC_STRREPLACE)
1362 VM_gecko_create, // #487 float gecko_create( string name )
1363 VM_gecko_destroy, // #488 void gecko_destroy( string name )
1364 VM_gecko_navigate, // #489 void gecko_navigate( string name, string URI )
1365 VM_gecko_keyevent, // #490 float gecko_keyevent( string name, float key, float eventtype )
1366 VM_gecko_movemouse, // #491 void gecko_mousemove( string name, float x, float y )
1367 VM_gecko_resize, // #492 void gecko_resize( string name, float w, float h )
1368 VM_gecko_get_texture_extent, // #493 vector gecko_get_texture_extent( string name )
1369 VM_crc16, // #494 float(float caseinsensitive, string s, ...) crc16 = #494 (DP_QC_CRC16)
1370 VM_cvar_type, // #495 float(string name) cvar_type = #495; (DP_QC_CVAR_TYPE)
1378 VM_whichpack, // #503 string(string) whichpack = #503;
1385 VM_uri_escape, // #510 string(string in) uri_escape = #510;
1386 VM_uri_unescape, // #511 string(string in) uri_unescape = #511;
1387 VM_etof, // #512 float(entity ent) num_for_edict = #512 (DP_QC_NUM_FOR_EDICT)
1388 VM_uri_get, // #513 float(string uril, float id) uri_get = #513; (DP_QC_URI_GET)
1389 VM_tokenize_console, // #514 float(string str) tokenize_console = #514; (DP_QC_TOKENIZE_CONSOLE)
1390 VM_argv_start_index, // #515 float(float idx) argv_start_index = #515; (DP_QC_TOKENIZE_CONSOLE)
1391 VM_argv_end_index, // #516 float(float idx) argv_end_index = #516; (DP_QC_TOKENIZE_CONSOLE)
1392 VM_buf_cvarlist, // #517 void(float buf, string prefix, string antiprefix) buf_cvarlist = #517; (DP_QC_STRINGBUFFERS_CVARLIST)
1393 VM_cvar_description, // #518 float(string name) cvar_description = #518; (DP_QC_CVAR_DESCRIPTION)
1408 VM_getsoundtime, // #533 float(entity e, float channel) getsoundtime = #533; (DP_SND_GETSOUNDTIME)
1409 VM_soundlength, // #534 float(string sample) soundlength = #534; (DP_SND_GETSOUNDTIME)
1476 VM_M_setkeydest, // #601 void setkeydest(float dest)
1477 VM_M_getkeydest, // #602 float getkeydest(void)
1478 VM_M_setmousetarget, // #603 void setmousetarget(float trg)
1479 VM_M_getmousetarget, // #604 float getmousetarget(void)
1480 VM_callfunction, // #605 void callfunction(...)
1481 VM_writetofile, // #606 void writetofile(float fhandle, entity ent)
1482 VM_isfunction, // #607 float isfunction(string function_name)
1483 VM_M_getresolution, // #608 vector getresolution(float number, [float forfullscreen])
1484 VM_keynumtostring, // #609 string keynumtostring(float keynum)
1485 VM_findkeysforcommand, // #610 string findkeysforcommand(string command[, float bindmap])
1486 VM_M_getserverliststat, // #611 float gethostcachevalue(float type)
1487 VM_M_getserverliststring, // #612 string gethostcachestring(float type, float hostnr)
1488 VM_parseentitydata, // #613 void parseentitydata(entity ent, string data)
1489 VM_stringtokeynum, // #614 float stringtokeynum(string key)
1490 VM_M_resetserverlistmasks, // #615 void resethostcachemasks(void)
1491 VM_M_setserverlistmaskstring, // #616 void sethostcachemaskstring(float mask, float fld, string str, float op)
1492 VM_M_setserverlistmasknumber, // #617 void sethostcachemasknumber(float mask, float fld, float num, float op)
1493 VM_M_resortserverlist, // #618 void resorthostcache(void)
1494 VM_M_setserverlistsort, // #619 void sethostcachesort(float fld, float descending)
1495 VM_M_refreshserverlist, // #620 void refreshhostcache(void)
1496 VM_M_getserverlistnumber, // #621 float gethostcachenumber(float fld, float hostnr)
1497 VM_M_getserverlistindexforkey,// #622 float gethostcacheindexforkey(string key)
1498 VM_M_addwantedserverlistkey, // #623 void addwantedhostcachekey(string key)
1499 VM_CL_getextresponse, // #624 string getextresponse(void)
1500 VM_netaddress_resolve, // #625 string netaddress_resolve(string, float)
1501 VM_M_getgamedirinfo, // #626 string getgamedirinfo(float n, float prop)
1502 VM_sprintf, // #627 string sprintf(string format, ...)
1505 VM_setkeybind, // #630 float(float key, string bind[, float bindmap]) setkeybind
1506 VM_getbindmaps, // #631 vector(void) getbindmap
1507 VM_setbindmaps, // #632 float(vector bm) setbindmap
1508 VM_M_crypto_getkeyfp, // #633 string(string addr) crypto_getkeyfp
1509 VM_M_crypto_getidfp, // #634 string(string addr) crypto_getidfp
1510 VM_M_crypto_getencryptlevel, // #635 string(string addr) crypto_getencryptlevel
1511 VM_M_crypto_getmykeyfp, // #636 string(float addr) crypto_getmykeyfp
1512 VM_M_crypto_getmyidfp, // #637 string(float addr) crypto_getmyidfp
1516 const int vm_m_numbuiltins = sizeof(vm_m_builtins) / sizeof(prvm_builtin_t);
1518 void VM_M_Cmd_Init(void)
1520 r_refdef_scene_t *scene;
1523 VM_Polygons_Reset();
1525 scene = R_GetScenePointer( RST_MENU );
1527 memset (scene, 0, sizeof (*scene));
1529 scene->maxtempentities = 128;
1530 scene->tempentities = (entity_render_t*) Mem_Alloc(prog->progs_mempool, sizeof(entity_render_t) * scene->maxtempentities);
1532 scene->maxentities = MAX_EDICTS + 256 + 512;
1533 scene->entities = (entity_render_t **)Mem_Alloc(prog->progs_mempool, sizeof(entity_render_t *) * scene->maxentities);
1535 scene->ambient = 32.0f;
1538 void VM_M_Cmd_Reset(void)
1540 // note: the menu's render entities are automatically freed when the prog's pool is freed
1544 VM_Polygons_Reset();