int
hw_find_integer_array_property (struct hw *me,
const char *property,
unsigned index,
signed_cell *integer)
{
const struct hw_property *node;
int sizeof_integer = sizeof (*integer);
signed_cell *cell;
TRACE (trace_devices,
("hw_find_integer(me=0x%lx, property=%s)\n",
(long)me, property));
/* check things sane */
node = hw_find_property (me, property);
if (node == NULL)
hw_abort (me, "property \"%s\" not found", property);
if (node->type != integer_property
&& node->type != array_property)
hw_abort (me, "property \"%s\" of wrong type (integer or array)", property);
if ((node->sizeof_array % sizeof_integer) != 0)
hw_abort (me, "property \"%s\" contains an incomplete number of cells", property);
if (node->sizeof_array <= sizeof_integer * index)
return 0;
/* Find and convert the value */
cell = ((signed_cell*)node->array) + index;
*integer = BE2H_cell (*cell);
return node->sizeof_array / sizeof_integer;
}
static const unsigned_cell *
cells_to_unit_address (const unsigned_cell *cell,
hw_unit *unit,
int nr_cells)
{
int i;
memset(unit, 0, sizeof(*unit));
unit->nr_cells = nr_cells;
for (i = 0; i < unit->nr_cells; i++)
{
unit->cells[i] = BE2H_cell (*cell);
cell += 1;
}
return cell;
}
signed_cell
hw_find_integer_property (struct hw *me,
const char *property)
{
const struct hw_property *node;
signed_cell integer;
node = hw_find_property (me, property);
if (node == NULL)
hw_abort (me, "property \"%s\" not found", property);
if (node->type != integer_property)
hw_abort (me, "property \"%s\" of wrong type (integer)", property);
ASSERT (sizeof (integer) == node->sizeof_array);
memcpy (&integer, node->array, sizeof (integer));
return BE2H_cell (integer);
}
hw_instance *
hw_find_ihandle_property (struct hw *me,
const char *property)
{
const hw_property_data *node;
unsigned_cell ihandle;
hw_instance *instance;
node = hw_find_property (me, property);
if (node == NULL)
hw_abort (me, "property \"%s\" not found", property);
if (node->type != ihandle_property)
hw_abort(me, "property \"%s\" of wrong type (ihandle)", property);
if (node->array == NULL)
hw_abort(me, "runtime property \"%s\" not yet initialized", property);
ASSERT (sizeof(ihandle) == node->sizeof_array);
memcpy (&ihandle, node->array, sizeof(ihandle));
instance = external_to_hw_instance (me, BE2H_cell(ihandle));
ASSERT (instance != NULL);
return instance;
}
static void
print_properties (struct hw *me,
struct printer *p)
{
const struct hw_property *property;
for (property = hw_find_property (me, NULL);
property != NULL;
property = hw_next_property (property))
{
if (hw_parent (me) == NULL)
p->print (p->file, "/%s", property->name);
else
p->print (p->file, "%s/%s", hw_path (me), property->name);
if (property->original != NULL)
{
p->print (p->file, " !");
p->print (p->file, "%s/%s",
hw_path (property->original->owner),
property->original->name);
}
else
{
switch (property->type)
{
case array_property:
{
if ((property->sizeof_array % sizeof (signed_cell)) == 0)
{
unsigned_cell *w = (unsigned_cell*) property->array;
int cell_nr;
for (cell_nr = 0;
cell_nr < (property->sizeof_array / sizeof (unsigned_cell));
cell_nr++)
{
p->print (p->file, " 0x%lx", (unsigned long) BE2H_cell (w[cell_nr]));
}
}
else
{
unsigned8 *w = (unsigned8*)property->array;
p->print (p->file, " [");
while ((char*)w - (char*)property->array < property->sizeof_array)
{
p->print (p->file, " 0x%2x", BE2H_1 (*w));
w++;
}
}
break;
}
case boolean_property:
{
int b = hw_find_boolean_property(me, property->name);
p->print (p->file, " %s", b ? "true" : "false");
break;
}
#if NOT_YET
case ihandle_property:
{
if (property->array != NULL)
{
device_instance *instance = hw_find_ihandle_property (me, property->name);
p->print (p->file, " *%s", device_instance_path(instance));
}
else
{
/* not yet initialized, ask the device for the path */
ihandle_runtime_property_spec spec;
hw_find_ihandle_runtime_property (me, property->name, &spec);
p->print (p->file, " *%s", spec.full_path);
}
break;
}
#endif
case integer_property:
{
unsigned_word w = hw_find_integer_property (me, property->name);
p->print (p->file, " 0x%lx", (unsigned long)w);
break;
}
case range_array_property:
{
print_ranges_property (me, property, p);
break;
}
case reg_array_property:
{
print_reg_property (me, property, p);
break;
}
case string_property:
{
const char *s = hw_find_string_property (me, property->name);
print_string (me, s, p);
break;
}
case string_array_property:
{
print_string_array_property (me, property, p);
break;
}
}
}
p->print (p->file, "\n");
}
}
print_properties(device *me)
{
const device_property *property;
for (property = device_find_property(me, NULL);
property != NULL;
property = device_next_property(property)) {
printf_filtered("%s/%s", device_path(me), property->name);
if (property->original != NULL) {
printf_filtered(" !");
printf_filtered("%s/%s",
device_path(property->original->owner),
property->original->name);
}
else {
switch (property->type) {
case array_property:
if ((property->sizeof_array % sizeof(signed_cell)) == 0) {
unsigned_cell *w = (unsigned_cell*)property->array;
int cell_nr;
for (cell_nr = 0;
cell_nr < (property->sizeof_array / sizeof(unsigned_cell));
cell_nr++) {
printf_filtered(" 0x%lx", (unsigned long)BE2H_cell(w[cell_nr]));
}
}
else {
unsigned8 *w = (unsigned8*)property->array;
printf_filtered(" [");
while ((char*)w - (char*)property->array < property->sizeof_array) {
printf_filtered(" 0x%2x", BE2H_1(*w));
w++;
}
}
break;
case boolean_property:
{
int b = device_find_boolean_property(me, property->name);
printf_filtered(" %s", b ? "true" : "false");
}
break;
case ihandle_property:
{
if (property->array != NULL) {
device_instance *instance = device_find_ihandle_property(me, property->name);
printf_filtered(" *%s", device_instance_path(instance));
}
else {
/* not yet initialized, ask the device for the path */
ihandle_runtime_property_spec spec;
device_find_ihandle_runtime_property(me, property->name, &spec);
printf_filtered(" *%s", spec.full_path);
}
}
break;
case integer_property:
{
unsigned_word w = device_find_integer_property(me, property->name);
printf_filtered(" 0x%lx", (unsigned long)w);
}
break;
case range_array_property:
print_ranges_property(me, property);
break;
case reg_array_property:
print_reg_property(me, property);
break;
case string_property:
{
const char *s = device_find_string_property(me, property->name);
print_string(s);
}
break;
case string_array_property:
print_string_array_property(me, property);
break;
}
}
printf_filtered("\n");
}
}
