+/*
+=============
+PRVM_ED_EdictGet_f
+
+Console command to load a field of a specified edict
+=============
+*/
+void PRVM_ED_EdictGet_f(void)
+{
+ prvm_edict_t *ed;
+ ddef_t *key;
+ const char *s;
+ prvm_eval_t *v;
+
+ if(Cmd_Argc() != 4 && Cmd_Argc() != 5)
+ {
+ Con_Print("prvm_edictget <program name> <edict number> <field> [<cvar>]\n");
+ return;
+ }
+
+ PRVM_Begin;
+ if(!PRVM_SetProgFromString(Cmd_Argv(1)))
+ {
+ Con_Printf("Wrong program name %s !\n", Cmd_Argv(1));
+ return;
+ }
+
+ ed = PRVM_EDICT_NUM(atoi(Cmd_Argv(2)));
+
+ if((key = PRVM_ED_FindField(Cmd_Argv(3))) == 0)
+ {
+ Con_Printf("Key %s not found !\n", Cmd_Argv(3));
+ goto fail;
+ }
+
+ v = (prvm_eval_t *)((char *)ed->fields.vp + key->ofs*4);
+ s = PRVM_UglyValueString(key->type, v);
+ if(Cmd_Argc() == 5)
+ {
+ cvar_t *cvar = Cvar_FindVar(Cmd_Argv(4));
+ if (cvar && cvar->flags & CVAR_READONLY)
+ {
+ Con_Printf("prvm_edictget: %s is read-only\n", cvar->name);
+ goto fail;
+ }
+ Cvar_Get(Cmd_Argv(4), s, 0, NULL);
+ }
+ else
+ Con_Printf("%s\n", s);
+
+fail:
+ PRVM_End;
+}
+
+void PRVM_ED_GlobalGet_f(void)
+{
+ ddef_t *key;
+ const char *s;
+ prvm_eval_t *v;
+
+ if(Cmd_Argc() != 3 && Cmd_Argc() != 4)
+ {
+ Con_Print("prvm_globalget <program name> <global> [<cvar>]\n");
+ return;
+ }
+
+ PRVM_Begin;
+ if(!PRVM_SetProgFromString(Cmd_Argv(1)))
+ {
+ Con_Printf("Wrong program name %s !\n", Cmd_Argv(1));
+ return;
+ }
+
+ key = PRVM_ED_FindGlobal(Cmd_Argv(2));
+ if(!key)
+ {
+ Con_Printf( "No global '%s' in %s!\n", Cmd_Argv(2), Cmd_Argv(1) );
+ goto fail;
+ }
+
+ v = (prvm_eval_t *) &prog->globals.generic[key->ofs];
+ s = PRVM_UglyValueString(key->type, v);
+ if(Cmd_Argc() == 4)
+ {
+ cvar_t *cvar = Cvar_FindVar(Cmd_Argv(3));
+ if (cvar && cvar->flags & CVAR_READONLY)
+ {
+ Con_Printf("prvm_globalget: %s is read-only\n", cvar->name);
+ goto fail;
+ }
+ Cvar_Get(Cmd_Argv(3), s, 0, NULL);
+ }
+ else
+ Con_Printf("%s\n", s);
+
+fail:
+ PRVM_End;
+}
+