js_uifc.c

/* Synchronet "uifc" (user interface) object */

/****************************************************************************
 * @format.tab-size 4		(Plain Text/Source Code File Header)			*
 * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
 *																			*
 * Copyright Rob Swindell - http://www.synchro.net/copyright.html			*
 *																			*
 * This program is free software; you can redistribute it and/or			*
 * modify it under the terms of the GNU General Public License				*
 * as published by the Free Software Foundation; either version 2			*
 * of the License, or (at your option) any later version.					*
 * See the GNU General Public License for more details: gpl.txt or			*
 * http://www.fsf.org/copyleft/gpl.html										*
 *																			*
 * For Synchronet coding style and modification guidelines, see				*
 * http://www.synchro.net/source.html										*
 *																			*
 * Note: If this box doesn't appear square, then you need to fix your tabs.	*
 ****************************************************************************/
#ifndef JAVASCRIPT
#define JAVASCRIPT
#endif
#include "sbbs.h"
#include "uifc.h"
#include "ciolib.h"
#include "js_request.h"
struct list_ctx_private {
	int	cur;
	int bar;
	int left;
	int top;
	int width;
};

struct showbuf_ctx_private {
	int	cur;
	int bar;
	int left;
	int top;
	int width;
	int height;
};
struct getstrxy_ctx_private {
	int	lastkey;
};
enum {
	 PROP_CUR
	,PROP_BAR
	,PROP_LEFT
	,PROP_TOP
	,PROP_WIDTH
	,PROP_HEIGHT
	,PROP_LASTKEY
};
static JSBool js_list_ctx_get(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
{
	jsval idval;
    jsint		tiny;
	struct list_ctx_private*	p;
	if((p=(struct list_ctx_private*)JS_GetPrivate(cx,obj))==NULL)
		return(JS_FALSE);
    JS_IdToValue(cx, id, &idval);
    tiny = JSVAL_TO_INT(idval);
	switch(tiny) {
		case PROP_CUR:
			*vp=INT_TO_JSVAL(p->cur);
			break;
		case PROP_BAR:
			*vp=INT_TO_JSVAL(p->bar);
			break;
		case PROP_LEFT:
			*vp=INT_TO_JSVAL(p->left);
			break;
		case PROP_TOP:
			*vp=INT_TO_JSVAL(p->top);
			break;
		case PROP_WIDTH:
			*vp=INT_TO_JSVAL(p->width);
			break;
	}
	return JS_TRUE;
}
static JSBool js_list_ctx_set(JSContext *cx, JSObject *obj, jsid id, JSBool strict, jsval *vp)
{
	jsval idval;
    jsint		tiny;
	int32		i=0;
	struct list_ctx_private*	p;
	if((p=(struct list_ctx_private*)JS_GetPrivate(cx,obj))==NULL)
		return(JS_FALSE);
    JS_IdToValue(cx, id, &idval);
    tiny = JSVAL_TO_INT(idval);
	if(!JS_ValueToInt32(cx, *vp, &i))
		return JS_FALSE;
	switch(tiny) {
		case PROP_CUR:
			p->cur=i;
			break;
		case PROP_BAR:
			p->bar=i;
			break;
		case PROP_LEFT:
			p->left=i;
			break;
		case PROP_TOP:
			p->top=i;
			break;
		case PROP_WIDTH:
			p->width=i;
			break;
	}
	return JS_TRUE;
}
static JSBool js_showbuf_ctx_get(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
{
	jsval idval;
	jsint		tiny;
	struct showbuf_ctx_private*	p;
	if((p=(struct showbuf_ctx_private*)JS_GetPrivate(cx,obj))==NULL)
		return(JS_FALSE);
	JS_IdToValue(cx, id, &idval);
	tiny = JSVAL_TO_INT(idval);
	switch(tiny) {
		case PROP_CUR:
			*vp=INT_TO_JSVAL(p->cur);
			break;
		case PROP_BAR:
			*vp=INT_TO_JSVAL(p->bar);
			break;
		case PROP_LEFT:
			*vp=INT_TO_JSVAL(p->left);
			break;
		case PROP_TOP:
			*vp=INT_TO_JSVAL(p->top);
			break;
		case PROP_WIDTH:
			*vp=INT_TO_JSVAL(p->width);
			break;
		case PROP_HEIGHT:
			*vp=INT_TO_JSVAL(p->height);
			break;
	}
	return JS_TRUE;
}
static JSBool js_showbuf_ctx_set(JSContext *cx, JSObject *obj, jsid id, JSBool strict, jsval *vp)
{
	jsval idval;
	jsint		tiny;
	int32		i=0;
	struct showbuf_ctx_private*	p;
	if((p=(struct showbuf_ctx_private*)JS_GetPrivate(cx,obj))==NULL)
		return(JS_FALSE);
	JS_IdToValue(cx, id, &idval);
	tiny = JSVAL_TO_INT(idval);
	if(!JS_ValueToInt32(cx, *vp, &i))
		return JS_FALSE;
	switch(tiny) {
		case PROP_CUR:
			p->cur=i;
			break;
		case PROP_BAR:
			p->bar=i;
			break;
		case PROP_LEFT:
			p->left=i;
			break;
		case PROP_TOP:
			p->top=i;
			break;
		case PROP_WIDTH:
			p->width=i;
			break;
		case PROP_HEIGHT:
			p->height=i;
			break;
	}
	return JS_TRUE;
}
static JSBool js_getstrxy_ctx_get(JSContext *cx, JSObject *obj, jsid id, jsval *vp)
{
	jsval idval;
	jsint		tiny;
	struct getstrxy_ctx_private*	p;
	if((p=(struct getstrxy_ctx_private*)JS_GetPrivate(cx,obj))==NULL)
		return(JS_FALSE);
	JS_IdToValue(cx, id, &idval);
	tiny = JSVAL_TO_INT(idval);
	switch(tiny) {
		case PROP_LASTKEY:
			*vp=INT_TO_JSVAL(p->lastkey);
			break;
	}
	return JS_TRUE;
}
static JSBool js_getstrxy_ctx_set(JSContext *cx, JSObject *obj, jsid id, JSBool strict, jsval *vp)
{
	jsval idval;
	jsint		tiny;
	int32		i=0;