V7_PRIVATE int cmp(const struct v7_val *a, const struct v7_val *b) {
int res;
double an, bn;
const struct v7_string *as, *bs;
struct v7_val ta = MKOBJ(0), tb = MKOBJ(0);
if (a == NULL || b == NULL) return 1;
if ((a->type == V7_TYPE_UNDEF || a->type == V7_TYPE_NULL) &&
(b->type == V7_TYPE_UNDEF || b->type == V7_TYPE_NULL)) return 0;
if (is_num(a) && is_num(b)) {
v7_init_num(&ta, a->v.num);
v7_init_num(&tb, b->v.num);
a = &ta; b = &tb;
}
if (is_string(a) && is_string(b)) {
v7_init_str(&ta, a->v.str.buf, a->v.str.len, 0);
v7_init_str(&tb, b->v.str.buf, b->v.str.len, 0);
a = &ta; b = &tb;
}
if (a->type != b->type) return 1;
an = a->v.num, bn = b->v.num;
as = &a->v.str, bs = &b->v.str;
switch (a->type) {
case V7_TYPE_NUM:
return (isinf(an) && isinf(bn)) ||
(isnan(an) && isnan(bn)) ? 0 : an - bn;
case V7_TYPE_BOOL:
return an != bn;
case V7_TYPE_STR:
res = memcmp(as->buf, bs->buf, as->len < bs->len ? as->len : bs->len);
return res != 0 ? res : (int) as->len - (int) bs->len;
return as->len != bs->len || memcmp(as->buf, bs->buf, as->len) != 0;
default:
return (int) (a - b);
}
}
void obj_mother_adv( int objid, Uint32 a, Uint32 b, OBJ_t *oa, OBJ_t *ob )
{
int i, j;
int slot0;
for(i=0;i<maxclients;i++) {
if( !(fr[b].cmds[i].flags & CMDF_NEW) )
continue;
for(j=0;j<maxobjs;j++)
if( fr[b].objs[j].type==OBJT_GHOST && ((GHOST_t *)fr[b].objs[j].data)->client==i )
SJC_Write( "%d: Client %i already has a ghost at obj#%d!", hotfr, i, j );
//FIXME context is hardcoded as 1 for GHOST and PLAYER:
MKOBJ( gh, GHOST, 1, OBJF_POS|OBJF_VEL|OBJF_HULL|OBJF_VIS|OBJF_BNDX|OBJF_BNDT|OBJF_BNDB );
int ghostslot = slot0;
MKOBJ( pl, PLAYER, 1, OBJF_POS|OBJF_VEL|OBJF_HULL|OBJF_PVEL|OBJF_VIS|OBJF_PLAT|OBJF_CLIP|OBJF_BNDX|OBJF_BNDB );
SJC_Write( "%d: New client %i created ghost is obj#%d player is obj#%d", hotfr, i, ghostslot, slot0 );
gh->pos = (V){0.0f,0.0f,0.0f};
gh->vel = (V){0.0f,0.0f,0.0f};
gh->hull[0] = (V){-NATIVEW/2,-NATIVEH/2, 0};
gh->hull[1] = (V){ NATIVEW/2, NATIVEH/2, 0};
gh->model = 0;
gh->client = i;
gh->avatar = slot0;
gh->clipboard_x = 0;
gh->clipboard_y = 0;
gh->clipboard_data = NULL;
pl->pos = (V){160,-50.0f,0.0f};
pl->vel = (V){0.0f,0.0f,0.0f};
pl->hull[0] = (V){-6.0f,-15.0f,0.0f};
pl->hull[1] = (V){ 6.0f, 15.0f,0.0f};
pl->pvel = (V){0.0f,0.0f,0.0f};
pl->model = i%5;
pl->ghost = ghostslot;
pl->goingl = 0;
pl->goingr = 0;
pl->goingu = 0;
pl->goingd = 0;
pl->jumping = 0;
pl->firing = 0;
pl->cooldown = 0;
pl->projectiles = 0;
pl->grounded = 0;
pl->facingr = 1;
pl->turning = 0;
pl->stabbing = 0;
pl->hovertime = 0;
} //end for i<maxclients
//create a slug every now and then
if(hotfr%77==0) {
MKOBJ( sl, SLUG, 1, OBJF_POS|OBJF_VEL|OBJF_HULL|OBJF_VIS|OBJF_PLAT|OBJF_CLIP|OBJF_BNDB );
sl->pos = (V){(hotfr%2)*368.0f+8.0f,0.0f,0.0f};
sl->vel = (V){(hotfr%2)?-0.5f:0.5f,0.0f,0.0f};
sl->hull[0] = (V){-8.0f,-4.0f,0.0f};
sl->hull[1] = (V){ 8.0f, 8.0f,0.0f};
sl->model = 0;
sl->dead = 0;
}
//create AMIGO!
if(hotfr==200) {
MKOBJ( am, AMIGO, 1, OBJF_POS|OBJF_VEL|OBJF_HULL|OBJF_VIS|OBJF_PLAT|OBJF_CLIP|OBJF_BNDB );
am->pos = (V){250,0,0};
am->vel = (V){0,0,0};
am->hull[0] = (V){-8,-18,0};
am->hull[1] = (V){ 8, 18,0};
am->model = 0;
am->state = AMIGO_HELLO;
am->statetime = 0;
}
}
#include "internal.h" V7_PRIVATE struct v7_val s_constructors[V7_NUM_CLASSES]; V7_PRIVATE struct v7_val s_prototypes[V7_NUM_CLASSES]; V7_PRIVATE struct v7_val s_global = MKOBJ(&s_prototypes[V7_CLASS_OBJECT]); V7_PRIVATE struct v7_val s_math = MKOBJ(&s_prototypes[V7_CLASS_OBJECT]); V7_PRIVATE struct v7_val s_json = MKOBJ(&s_prototypes[V7_CLASS_OBJECT]); V7_PRIVATE struct v7_val s_file = MKOBJ(&s_prototypes[V7_CLASS_OBJECT]);
