acpitools/aml/aml_evalobj.c

66 static union aml_object	*aml_eval_fieldobject(struct aml_environ *env,
70 aml_eval_fieldobject(struct aml_environ *env, struct aml_name *name)
83 		env->stat = aml_stat_panic;
87 	oname = env->curname;
89 		env->tempobject.type = aml_t_regfield;
91 		env->tempobject.type = aml_t_num;
93 	env->curname = name;
95 		wname = aml_search_name(env, field->f.fld.regname);
99 			env->stat = aml_stat_panic;
100 			env->curname = oname;
104 		if (env->tempobject.type == aml_t_regfield) {
105 			env->tempobject.regfield.space = or->space;
106 			env->tempobject.regfield.flags = field->flags;
107 			env->tempobject.regfield.offset = or->offset;
108 			env->tempobject.regfield.bitoffset = field->bitoffset;
109 			env->tempobject.regfield.bitlen = field->bitlen;
111 			env->tempobject.type = aml_t_num;
112 			env->tempobject.num.number = aml_region_read(env,
117 			    env->tempobject.num.number);
120 		wname = aml_search_name(env, field->f.ifld.indexname);
123 		aml_store_to_name(env, &tobj, wname);
124 		wname = aml_search_name(env, field->f.ifld.dataname);
125 		num = aml_objtonum(env, aml_eval_name(env, wname));
126 		env->tempobject.type = aml_t_num;
127 		env->tempobject.num.number = (num >> (field->bitoffset & 7)) &
130 	env->curname = oname;
131 	return (&env->tempobject);
135 aml_eval_objref(struct aml_environ *env, union aml_object *obj)
155 				env->tempobject = num1;
156 				ret = &env->tempobject;
165 			env->tempobject = num1;
166 			ret = &env->tempobject;
173 		ret = aml_eval_name(env, obj->objref.nameref);
184 aml_eval_name(struct aml_environ *env, struct aml_name *aname)
198 	if (env->stat == aml_stat_panic) {
209 		env->stat = aml_stat_panic;
217 		aname = aml_search_name(env, aname->property->nstr.dp);
224 		ret = aml_eval_objref(env, aname->property);
234 		aml_free_objectcontent(&env->tempobject);
235 		ret = aml_eval_fieldobject(env, aname);
238 		aml_free_objectcontent(&env->tempobject);
240 		*copy = *env;
249 			    aml_copy_object(env,
250 				aml_eval_name(env,
251 				    aml_parse_termobj(env, 0)));
257 		if (env->stat == aml_stat_step) {
258 			AML_DEBUGGER(env, copy);
261 		obj = aml_eval_name(env, tmp);
264 			env->stat = aml_stat_panic;
280 			env->tempobject.type = aml_t_num;
281 			env->tempobject.num.number = 0;
286 		aml_free_objectcontent(&env->tempobject);
293 			env->tempobject.type = aml_t_num;
294 			env->tempobject.num.number = num;
295 			ret = &env->tempobject;
311  * Eval named object but env variable is not required and return
320 	struct	aml_environ *env;
327 	env = memman_alloc(aml_memman, memid_aml_environ);
328 	if (env == NULL) {
331 	bzero(env, sizeof(struct aml_environ));
337 	ret = aml_eval_name(env, name);
347 	memman_free(aml_memman, memid_aml_environ, env);
352 aml_objtonum(struct aml_environ *env, union aml_object *obj)
358 		env->stat = aml_stat_panic;
364 aml_execute_method(struct aml_environ *env)
372 	aml_print_curname(env->curname);
375 	name = aml_parse_objectlist(env, 0);
377 	aml_print_curname(env->curname);
389 	struct	aml_environ *env;
395 	env = memman_alloc(aml_memman, memid_aml_environ);
396 	if (env == NULL) {
399 	bzero(env, sizeof(struct aml_environ));
403 		env->curname = name;
404 		env->dp = name->property->meth.from;
405 		env->end = name->property->meth.to;
406 		AML_DEBUGGER(env, env);
413 		obj = aml_eval_name(env, tmp = aml_execute_method(env));
426 	memman_free(aml_memman, memid_aml_environ, env);