1 files changed, 0 insertions, 351 deletions

diff --git a/usr.sbin/acpidump/aml/aml_store.c b/usr.sbin/acpidump/aml/aml_store.c
deleted file mode 100644
index 54c9e0b2b1e..00000000000
--- a/usr.sbin/acpidump/aml/aml_store.c
+++ /dev/null
@@ -1,351 +0,0 @@
-/*	$OpenBSD: aml_store.c,v 1.3 2007/11/25 15:35:09 jmc Exp $	*/
-/*-
- * Copyright (c) 1999 Takanori Watanabe
- * Copyright (c) 1999, 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org>
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- *    notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- *    notice, this list of conditions and the following disclaimer in the
- *    documentation and/or other materials provided with the distribution.
- *
- * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- *
- *	$Id: aml_store.c,v 1.3 2007/11/25 15:35:09 jmc Exp $
- *	$FreeBSD: src/usr.sbin/acpi/amldb/aml/aml_store.c,v 1.3 2000/11/09 06:24:45 iwasaki Exp $
- */
-
-#include <sys/types.h>
-
-#include <aml/aml_amlmem.h>
-#include <aml/aml_common.h>
-#include <aml/aml_env.h>
-#include <aml/aml_evalobj.h>
-#include <aml/aml_name.h>
-#include <aml/aml_obj.h>
-#include <aml/aml_region.h>
-#include <aml/aml_status.h>
-#include <aml/aml_store.h>
-
-#ifndef _KERNEL
-#include <assert.h>
-#include <stdio.h>
-#include <string.h>
-
-#include "debug.h"
-#else /* _KERNEL */
-#include <sys/systm.h>
-#endif /* !_KERNEL */
-
-static void
-aml_store_to_fieldname(struct aml_environ *env, union aml_object *obj,
-    struct aml_name *name)
-{
-	char	*buffer;
-	struct	aml_name *wname, *oname, *iname;
-	struct	aml_field *field;
-	struct	aml_opregion *or;
-	union	aml_object tobj, iobj, *tmpobj;
-
-	field = &name->property->field;
-	oname = env->curname;
-	iname = NULL;
-	env->curname = name->parent;
-	if (field->f.ftype == f_t_field) {
-		wname = aml_search_name(env, field->f.fld.regname);
-		if (wname == NULL ||
-		    wname->property == NULL ||
-		    wname->property->type != aml_t_opregion) {
-			AML_DEBUGPRINT("Inappropreate Type\n");
-			env->stat = aml_stat_panic;
-			env->curname = oname;
-			return;
-		}
-		or = &wname->property->opregion;
-		switch (obj->type) {
-		case aml_t_num:
-			aml_region_write(env, or->space, field->flags,
-			    obj->num.number, or->offset,
-			    field->bitoffset, field->bitlen);
-			AML_DEBUGPRINT("[write(%d, 0x%x, 0x%x)]",
-			    or->space, obj->num.number,
-			    or->offset + field->bitoffset / 8);
-			break;
-		case aml_t_buffer:
-		case aml_t_bufferfield:
-			if (obj->type == aml_t_buffer) {
-				buffer = obj->buffer.data;
-			} else {
-				buffer = obj->bfld.origin;
-				buffer += obj->bfld.bitoffset / 8;
-			}
-			aml_region_write_from_buffer(env, or->space,
-			    field->flags, buffer, or->offset, field->bitoffset,
-			    field->bitlen);
-			break;
-		case aml_t_regfield:
-			if (or->space != obj->regfield.space) {
-				AML_DEBUGPRINT("aml_store_to_fieldname: "
-					       "Different type of space\n");
-				break;
-			}
-			aml_region_bcopy(env, obj->regfield.space,
-			    obj->regfield.flags, obj->regfield.offset,
-			    obj->regfield.bitoffset, obj->regfield.bitlen,
-			    field->flags, or->offset, field->bitoffset,
-			    field->bitlen);
-			break;
-		default:
-			AML_DEBUGPRINT("aml_store_to_fieldname: "
-				       "Inappropreate Type of src object\n");
-			break;
-		}
-	} else if (field->f.ftype == f_t_index) {
-		iname = aml_search_name(env, field->f.ifld.indexname);
-		wname = aml_search_name(env, field->f.ifld.dataname);
-		iobj.type = aml_t_num;
-		iobj.num.number = field->bitoffset / 8;	/* AccessType Boundary */
-
-		/* read whole values of IndexField */
-		aml_store_to_name(env, &iobj, iname);
-		tmpobj = aml_eval_name(env, wname);
-
-		/* make the values to be written */
-		tobj.num = obj->num;
- 		tobj.num.number = aml_adjust_updatevalue(field->flags,
- 		    field->bitoffset & 7, field->bitlen,
- 		    tmpobj->num.number, obj->num.number);
-
-		/* write the values to IndexField */
-		aml_store_to_name(env, &iobj, iname);
-		aml_store_to_name(env, &tobj, wname);
-	}
-	env->curname = oname;
-}
-
-static void
-aml_store_to_buffer(struct aml_environ *env, union aml_object *obj,
-    union aml_object *buf, int offset)
-{
-	int	size;
-	int	bitlen;
-
-	switch (obj->type) {
-	case aml_t_num:
-		if (offset > buf->buffer.size) {
-			aml_realloc_object(buf, offset);
-		}
-		buf->buffer.data[offset] = obj->num.number & 0xff;
-		AML_DEBUGPRINT("[Store number 0x%x to buffer]",
-		    obj->num.number & 0xff);
-		break;
-	case aml_t_string:
-		size = strlen(obj->str.string);
-		if (buf->buffer.size - offset < size) {
-			aml_realloc_object(buf, offset + size + 1);
-		}
-		strlcpy(&buf->buffer.data[offset], obj->str.string,
-		    offset + size + 1);
-		AML_DEBUGPRINT("[Store string to buffer]");
-		break;
-	case aml_t_buffer:
-		bzero(buf->buffer.data, buf->buffer.size);
-		if (obj->buffer.size > buf->buffer.size) {
-			size = buf->buffer.size;
-		} else {
-			size = obj->buffer.size;
-		}
-		bcopy(obj->buffer.data, buf->buffer.data, size);
-		break;
-	case aml_t_regfield:
-		bitlen = (buf->buffer.size - offset) * 8;
-		if (bitlen > obj->regfield.bitlen) {
-			bitlen = obj->regfield.bitlen;
-		}
-		aml_region_read_into_buffer(env, obj->regfield.space,
-		    obj->regfield.flags, obj->regfield.offset,
-		    obj->regfield.bitoffset, bitlen,
-		    buf->buffer.data + offset);
-		break;
-	default:
-		goto not_yet;
-	}
-	return;
-not_yet:
-	AML_DEBUGPRINT("[XXX not supported yet]");
-}
-
-
-void
-aml_store_to_object(struct aml_environ *env, union aml_object *src,
-    union aml_object * dest)
-{
-	char	*buffer, *srcbuf;
-	int	offset, bitlen;
-
-	switch (dest->type) {
-	case aml_t_num:
-		if (src->type == aml_t_num) {
-			dest->num = src->num;
-			AML_DEBUGPRINT("[Store number 0x%x]", src->num.number);
-		} else {
-			env->stat = aml_stat_panic;
-		}
-		break;
-	case aml_t_string:
-	case aml_t_package:
-		break;
-	case aml_t_buffer:
-		aml_store_to_buffer(env, src, dest, 0);
-		break;
-	case aml_t_bufferfield:
-		buffer = dest->bfld.origin;
-		offset = dest->bfld.bitoffset;
-		bitlen = dest->bfld.bitlen;
-
-		switch (src->type) {
-		case aml_t_num:
-			if (aml_bufferfield_write(src->num.number, buffer, offset, bitlen)) {
-				AML_DEBUGPRINT("aml_bufferfield_write() failed\n");
-			}
-			break;
-		case aml_t_buffer:
-		case aml_t_bufferfield:
-			if (src->type == aml_t_buffer) {
-				srcbuf = src->buffer.data;
-			} else {
-				srcbuf = src->bfld.origin;
-				srcbuf += src->bfld.bitoffset / 8;
-			}
-			bcopy(srcbuf, buffer, bitlen / 8);
-			break;
-		case aml_t_regfield:
-			aml_region_read_into_buffer(env, src->regfield.space,
-			    src->regfield.flags, src->regfield.offset,
-			    src->regfield.bitoffset, src->regfield.bitlen,
-			    buffer);
-			break;
-		default:
-			AML_DEBUGPRINT("not implemented yet");
-			break;
-		}
-		break;
-	case aml_t_debug:
-		aml_showobject(src);
-		break;
-	default:
-		AML_DEBUGPRINT("[Unimplemented %d]", dest->type);
-		break;
-	}
-}
-
-static void
-aml_store_to_objref(struct aml_environ *env, union aml_object *obj,
-    union aml_object *r)
-{
-	int	offset;
-	union	aml_object *ref;
-
-	if (r->objref.ref == NULL) {
-		r->objref.ref = aml_alloc_object(obj->type, NULL);	/* XXX */
-		r->objref.nameref->property = r->objref.ref;
-	}
-	ref = r->objref.ref;
-
-	switch (ref->type) {
-	case aml_t_buffer:
-		offset = r->objref.offset;
-		aml_store_to_buffer(env, obj, ref, r->objref.offset);
-		break;
-	case aml_t_package:
-		offset = r->objref.offset;
-		if (r->objref.ref->package.elements < offset) {
-			aml_realloc_object(ref, offset);
-		}
-		if (ref->package.objects[offset] == NULL) {
-			ref->package.objects[offset] = aml_copy_object(env, obj);
-		} else {
-			aml_store_to_object(env, obj, ref->package.objects[offset]);
-		}
-		break;
-	default:
-		aml_store_to_object(env, obj, ref);
-		break;
-	}
-}
-
-/*
- * Store to Named object
- */
-void
-aml_store_to_name(struct aml_environ *env, union aml_object *obj,
-    struct aml_name *name)
-{
-	struct	aml_name *wname;
-
-	if (env->stat == aml_stat_panic) {
-		return;
-	}
-	if (name == NULL || obj == NULL) {
-		AML_DEBUGPRINT("[Try to store non-existent name ]");
-		return;
-	}
-	if (name->property == NULL) {
-		name->property = aml_copy_object(env, obj);
-		AML_DEBUGPRINT("[Copy number 0x%x]", obj->num.number);
-		return;
-	}
-	if (name->property->type == aml_t_namestr) {
-		wname = aml_search_name(env, name->property->nstr.dp);
-		name = wname;
-	}
-	if (name == NULL) {
-		env->stat = aml_stat_panic;
-		return;
-	}
-	if (name->property == NULL || name->property->type == aml_t_null) {
-		name->property = aml_copy_object(env, obj);
-		AML_DEBUGPRINT("[Copy number 0x%x]", obj->num.number);
-		return;
-	}
-	/* Writes to constant object are not allowed */
-	if (name->property != NULL && name->property->type == aml_t_num &&
-	    name->property->num.constant == 1) {
-		return;
-	}
-	/* try to dereference */
-	if (obj->type == aml_t_objref && obj->objref.deref == 0) {
-		AML_DEBUGPRINT("Source object isn't dereferenced yet, "
-			       "try to dereference anyway\n");
-		obj->objref.deref = 1;
-		obj = aml_eval_objref(env, obj);
-	}
-	switch (name->property->type) {
-	case aml_t_field:
-		aml_store_to_fieldname(env, obj, name);
-		break;
-	case aml_t_objref:
-		aml_store_to_objref(env, obj, name->property);
-		break;
-	case aml_t_num:
-		if (name == &env->tempname)
-			break;
-	default:
-		aml_store_to_object(env, obj, name->property);
-		break;
-	}
-}