mgjs_htmlareaelement.cpp

monqueror一个很具有参考价值的源玛

#include "mgjs_main.h"
#include <../misc/htmlattrs.h>		
#include <html_headimpl.h>
static JSBool GetHTMLAreaElementProperty(JSContext *cx, JSObject *obj, jsval id, jsval *vp);
static JSBool SetHTMLAreaElementProperty(JSContext *cx, JSObject *obj, jsval id, jsval *vp);
		
enum HTMLAreaElement_slots {
  HTMLAREAELEMENT_ACCESSKEY ,
  HTMLAREAELEMENT_ALT ,
  HTMLAREAELEMENT_COORDS ,
  HTMLAREAELEMENT_HREF ,
  HTMLAREAELEMENT_NOHREF ,
  HTMLAREAELEMENT_SHAPE ,
  HTMLAREAELEMENT_TABINDEX ,
  HTMLAREAELEMENT_TARGET ,
};

static JSBool GetHTMLAreaElementProperty(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
{
	myJSAreaPrivate *mAreaPrivate=(myJSAreaPrivate *)JS_GetPrivate(cx,obj);
	HTMLAreaElementImpl *impl;
	DOMString dsReturn=(const char*)"";
	long int lReturn;
	bool bReturn;
	if(!mAreaPrivate){
		return JS_FALSE;
	}
	impl=(HTMLAreaElementImpl *)mAreaPrivate->CurNode;
	if(!impl)return JS_FALSE;
	if (JSVAL_IS_INT(id)) {
		switch (JSVAL_TO_INT(id)) {
			case HTMLAREAELEMENT_ACCESSKEY:
				dsReturn=((ElementImpl *)impl)->getAttribute(ATTR_ACCESSKEY);
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,dsReturn.string()));
				break;
			case HTMLAREAELEMENT_ALT:
				dsReturn=((ElementImpl *)impl)->getAttribute(ATTR_ALT);
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,dsReturn.string()));
				break;
			case HTMLAREAELEMENT_COORDS:
				dsReturn=((ElementImpl *)impl)->getAttribute(ATTR_COORDS);
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,dsReturn.string()));
				break;
			case HTMLAREAELEMENT_HREF:
				dsReturn=((ElementImpl *)impl)->getAttribute(ATTR_HREF);
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,dsReturn.string()));
				break;
			case HTMLAREAELEMENT_NOHREF:
				bReturn=((ElementImpl *)impl)->getAttribute(ATTR_NOHREF).toInt();
				*vp=INT_TO_JSVAL(bReturn);
#if DEBUG_BY_XHTANG
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,QString::number(bReturn)));
#endif
				break;
			case HTMLAREAELEMENT_SHAPE :
				dsReturn=((ElementImpl *)impl)->getAttribute(ATTR_SHAPE);
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,dsReturn.string()));
				break;
			case HTMLAREAELEMENT_TABINDEX:
				lReturn=((ElementImpl *)impl)->getAttribute(ATTR_TABINDEX).toInt();
				*vp=INT_TO_JSVAL(lReturn);
#if DEBUG_BY_XHTANG
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,QString::number(lReturn)));
#endif
				break;
			case HTMLAREAELEMENT_TARGET :
				dsReturn=((ElementImpl *)impl)->getAttribute(ATTR_TARGET);
				*vp=STRING_TO_JSVAL (JS_NewStringCopyZ (cx,dsReturn.string()));
				break;
			}
	}
 	return JS_TRUE;
}
static JSBool SetHTMLAreaElementProperty(JSContext *cx, JSObject *obj, jsval id, jsval *vp)
{
	myJSAreaPrivate *mAreaPrivate=(myJSAreaPrivate *)JS_GetPrivate(cx,obj);
	HTMLAreaElementImpl *impl;
	DOMString dsValue;
	bool bValue;long int lValue;
	impl=(HTMLAreaElementImpl *)mAreaPrivate->CurNode;
	if(!impl)return JS_FALSE;
	JSString *jss;
    if (!(jss = JS_ValueToString (cx,*vp)))return JS_FALSE;
  	dsValue = (const char*)JS_GetStringBytes (jss);

	if (JSVAL_IS_INT(id)) {
		switch (JSVAL_TO_INT(id)) {
			case HTMLAREAELEMENT_ACCESSKEY:
				((ElementImpl *)impl)->setAttribute(ATTR_ACCESSKEY,dsValue);
				break;
			case HTMLAREAELEMENT_ALT:
				((ElementImpl *)impl)->setAttribute(ATTR_ALT,dsValue);
				break;
			case HTMLAREAELEMENT_COORDS:
				((ElementImpl *)impl)->setAttribute(ATTR_COORDS,dsValue);
				break;
			case HTMLAREAELEMENT_HREF:
				((ElementImpl *)impl)->setAttribute(ATTR_HREF,dsValue);
				break;
			case HTMLAREAELEMENT_NOHREF :
				bValue=(bool)JSVAL_TO_INT(*vp);
				((ElementImpl *)impl)->setAttribute(ATTR_NOHREF,QString::number(bValue));
				break;
			case HTMLAREAELEMENT_SHAPE :
				((ElementImpl *)impl)->setAttribute(ATTR_SHAPE,dsValue);
				break;
			case HTMLAREAELEMENT_TABINDEX:
				lValue=JSVAL_TO_INT(*vp);
				((ElementImpl *)impl)->setAttribute(ATTR_TABINDEX,QString::number(lValue));
				break;
			case HTMLAREAELEMENT_TARGET :
				((ElementImpl *)impl)->setAttribute(ATTR_TARGET,dsValue);
				break;
		}
	}
	return JS_TRUE;
}

static JSPropertySpec HTMLAreaElementProperties[] =
{
  {"accessKey",    HTMLAREAELEMENT_ACCESSKEY,    JSPROP_ENUMERATE},
  {"alt",    HTMLAREAELEMENT_ALT,    JSPROP_ENUMERATE},
  {"coords",    HTMLAREAELEMENT_COORDS,    JSPROP_ENUMERATE},
  {"href",    HTMLAREAELEMENT_HREF,    JSPROP_ENUMERATE},
  {"noHref",    HTMLAREAELEMENT_NOHREF,    JSPROP_ENUMERATE},
  {"shape",    HTMLAREAELEMENT_SHAPE,    JSPROP_ENUMERATE},
  {"tabIndex",    HTMLAREAELEMENT_TABINDEX,    JSPROP_ENUMERATE},
  {"target",    HTMLAREAELEMENT_TARGET,    JSPROP_ENUMERATE},
  {0}
};
JSClass HTMLAreaElementClass = {
  "HTMLAreaElement", 
  JSCLASS_HAS_PRIVATE ,
  JS_PropertyStub,
  JS_PropertyStub,
  GetHTMLAreaElementProperty,
  SetHTMLAreaElementProperty,
  JS_EnumerateStub, JS_ResolveStub, JS_ConvertStub, JS_FinalizeStub 
			
};


static JSFunctionSpec HTMLAreaElementMethods[] = 
{
  {0}
};

JSObject* InitHTMLAreaElementClass(JSContext *cx,JSObject *globalObj,JSObject *proto)
{
	JSObject *obj;
	obj = JS_DefineObject (cx,globalObj, "HtmlAreaElement", &HTMLAreaElementClass,proto,JSPROP_ENUMERATE);
    JS_DefineProperties (cx,obj,HTMLAreaElementProperties);
    JS_DefineFunctions (cx,obj,HTMLAreaElementMethods);
	return obj;
}

JSObject* NewScriptHTMLAreaElement(JSContext *cx,JSObject *proto,JSObject *parent,ElementImpl *eImpl)
{
	JSObject *obj;
	JSObject *global = JS_GetGlobalObject(cx);
	jsval vp;
	if ((JS_TRUE == JS_LookupProperty(cx, global, "HtmlAreaElement", &vp) && JSVAL_IS_OBJECT(vp)))
		obj=JS_NewObject(cx,&HTMLAreaElementClass,JSVAL_TO_OBJECT(vp),NULL);
	else
		obj=InitHTMLAreaElementClass(cx,JS_GetParent(cx,proto),proto);
	myJSAreaPrivate *mAreaPrivate=new myJSAreaPrivate;
	mAreaPrivate->CurNode=(ElementImpl*)eImpl;	
	JS_SetPrivate(cx,obj,(void*)mAreaPrivate);
	return obj;
}