mirror of
https://mirrors.bfsu.edu.cn/git/linux.git
synced 2024-12-06 02:24:14 +08:00
0dc47877a3
__FUNCTION__ is gcc-specific, use __func__ Signed-off-by: Harvey Harrison <harvey.harrison@gmail.com> Signed-off-by: David S. Miller <davem@davemloft.net>
567 lines
13 KiB
C
567 lines
13 KiB
C
/*********************************************************************
|
|
*
|
|
* Filename: irias_object.c
|
|
* Version: 0.3
|
|
* Description: IAS object database and functions
|
|
* Status: Experimental.
|
|
* Author: Dag Brattli <dagb@cs.uit.no>
|
|
* Created at: Thu Oct 1 22:50:04 1998
|
|
* Modified at: Wed Dec 15 11:23:16 1999
|
|
* Modified by: Dag Brattli <dagb@cs.uit.no>
|
|
*
|
|
* Copyright (c) 1998-1999 Dag Brattli, All Rights Reserved.
|
|
*
|
|
* 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.
|
|
*
|
|
* Neither Dag Brattli nor University of Tromsø admit liability nor
|
|
* provide warranty for any of this software. This material is
|
|
* provided "AS-IS" and at no charge.
|
|
*
|
|
********************************************************************/
|
|
|
|
#include <linux/string.h>
|
|
#include <linux/socket.h>
|
|
#include <linux/module.h>
|
|
|
|
#include <net/irda/irda.h>
|
|
#include <net/irda/irias_object.h>
|
|
|
|
hashbin_t *irias_objects;
|
|
|
|
/*
|
|
* Used when a missing value needs to be returned
|
|
*/
|
|
struct ias_value irias_missing = { IAS_MISSING, 0, 0, 0, {0}};
|
|
|
|
|
|
/*
|
|
* Function ias_new_object (name, id)
|
|
*
|
|
* Create a new IAS object
|
|
*
|
|
*/
|
|
struct ias_object *irias_new_object( char *name, int id)
|
|
{
|
|
struct ias_object *obj;
|
|
|
|
IRDA_DEBUG( 4, "%s()\n", __func__);
|
|
|
|
obj = kzalloc(sizeof(struct ias_object), GFP_ATOMIC);
|
|
if (obj == NULL) {
|
|
IRDA_WARNING("%s(), Unable to allocate object!\n",
|
|
__func__);
|
|
return NULL;
|
|
}
|
|
|
|
obj->magic = IAS_OBJECT_MAGIC;
|
|
obj->name = kstrndup(name, IAS_MAX_CLASSNAME, GFP_ATOMIC);
|
|
if (!obj->name) {
|
|
IRDA_WARNING("%s(), Unable to allocate name!\n",
|
|
__func__);
|
|
kfree(obj);
|
|
return NULL;
|
|
}
|
|
obj->id = id;
|
|
|
|
/* Locking notes : the attrib spinlock has lower precendence
|
|
* than the objects spinlock. Never grap the objects spinlock
|
|
* while holding any attrib spinlock (risk of deadlock). Jean II */
|
|
obj->attribs = hashbin_new(HB_LOCK);
|
|
|
|
if (obj->attribs == NULL) {
|
|
IRDA_WARNING("%s(), Unable to allocate attribs!\n",
|
|
__func__);
|
|
kfree(obj->name);
|
|
kfree(obj);
|
|
return NULL;
|
|
}
|
|
|
|
return obj;
|
|
}
|
|
EXPORT_SYMBOL(irias_new_object);
|
|
|
|
/*
|
|
* Function irias_delete_attrib (attrib)
|
|
*
|
|
* Delete given attribute and deallocate all its memory
|
|
*
|
|
*/
|
|
static void __irias_delete_attrib(struct ias_attrib *attrib)
|
|
{
|
|
IRDA_ASSERT(attrib != NULL, return;);
|
|
IRDA_ASSERT(attrib->magic == IAS_ATTRIB_MAGIC, return;);
|
|
|
|
kfree(attrib->name);
|
|
|
|
irias_delete_value(attrib->value);
|
|
attrib->magic = ~IAS_ATTRIB_MAGIC;
|
|
|
|
kfree(attrib);
|
|
}
|
|
|
|
void __irias_delete_object(struct ias_object *obj)
|
|
{
|
|
IRDA_ASSERT(obj != NULL, return;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return;);
|
|
|
|
kfree(obj->name);
|
|
|
|
hashbin_delete(obj->attribs, (FREE_FUNC) __irias_delete_attrib);
|
|
|
|
obj->magic = ~IAS_OBJECT_MAGIC;
|
|
|
|
kfree(obj);
|
|
}
|
|
|
|
/*
|
|
* Function irias_delete_object (obj)
|
|
*
|
|
* Remove object from hashbin and deallocate all attributes associated with
|
|
* with this object and the object itself
|
|
*
|
|
*/
|
|
int irias_delete_object(struct ias_object *obj)
|
|
{
|
|
struct ias_object *node;
|
|
|
|
IRDA_ASSERT(obj != NULL, return -1;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return -1;);
|
|
|
|
/* Remove from list */
|
|
node = hashbin_remove_this(irias_objects, (irda_queue_t *) obj);
|
|
if (!node)
|
|
IRDA_DEBUG( 0, "%s(), object already removed!\n",
|
|
__func__);
|
|
|
|
/* Destroy */
|
|
__irias_delete_object(obj);
|
|
|
|
return 0;
|
|
}
|
|
EXPORT_SYMBOL(irias_delete_object);
|
|
|
|
/*
|
|
* Function irias_delete_attrib (obj)
|
|
*
|
|
* Remove attribute from hashbin and, if it was the last attribute of
|
|
* the object, remove the object as well.
|
|
*
|
|
*/
|
|
int irias_delete_attrib(struct ias_object *obj, struct ias_attrib *attrib,
|
|
int cleanobject)
|
|
{
|
|
struct ias_attrib *node;
|
|
|
|
IRDA_ASSERT(obj != NULL, return -1;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return -1;);
|
|
IRDA_ASSERT(attrib != NULL, return -1;);
|
|
|
|
/* Remove attribute from object */
|
|
node = hashbin_remove_this(obj->attribs, (irda_queue_t *) attrib);
|
|
if (!node)
|
|
return 0; /* Already removed or non-existent */
|
|
|
|
/* Deallocate attribute */
|
|
__irias_delete_attrib(node);
|
|
|
|
/* Check if object has still some attributes, destroy it if none.
|
|
* At first glance, this look dangerous, as the kernel reference
|
|
* various IAS objects. However, we only use this function on
|
|
* user attributes, not kernel attributes, so there is no risk
|
|
* of deleting a kernel object this way. Jean II */
|
|
node = (struct ias_attrib *) hashbin_get_first(obj->attribs);
|
|
if (cleanobject && !node)
|
|
irias_delete_object(obj);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* Function irias_insert_object (obj)
|
|
*
|
|
* Insert an object into the LM-IAS database
|
|
*
|
|
*/
|
|
void irias_insert_object(struct ias_object *obj)
|
|
{
|
|
IRDA_ASSERT(obj != NULL, return;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return;);
|
|
|
|
hashbin_insert(irias_objects, (irda_queue_t *) obj, 0, obj->name);
|
|
}
|
|
EXPORT_SYMBOL(irias_insert_object);
|
|
|
|
/*
|
|
* Function irias_find_object (name)
|
|
*
|
|
* Find object with given name
|
|
*
|
|
*/
|
|
struct ias_object *irias_find_object(char *name)
|
|
{
|
|
IRDA_ASSERT(name != NULL, return NULL;);
|
|
|
|
/* Unsafe (locking), object might change */
|
|
return hashbin_lock_find(irias_objects, 0, name);
|
|
}
|
|
EXPORT_SYMBOL(irias_find_object);
|
|
|
|
/*
|
|
* Function irias_find_attrib (obj, name)
|
|
*
|
|
* Find named attribute in object
|
|
*
|
|
*/
|
|
struct ias_attrib *irias_find_attrib(struct ias_object *obj, char *name)
|
|
{
|
|
struct ias_attrib *attrib;
|
|
|
|
IRDA_ASSERT(obj != NULL, return NULL;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return NULL;);
|
|
IRDA_ASSERT(name != NULL, return NULL;);
|
|
|
|
attrib = hashbin_lock_find(obj->attribs, 0, name);
|
|
if (attrib == NULL)
|
|
return NULL;
|
|
|
|
/* Unsafe (locking), attrib might change */
|
|
return attrib;
|
|
}
|
|
|
|
/*
|
|
* Function irias_add_attribute (obj, attrib)
|
|
*
|
|
* Add attribute to object
|
|
*
|
|
*/
|
|
static void irias_add_attrib(struct ias_object *obj, struct ias_attrib *attrib,
|
|
int owner)
|
|
{
|
|
IRDA_ASSERT(obj != NULL, return;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return;);
|
|
|
|
IRDA_ASSERT(attrib != NULL, return;);
|
|
IRDA_ASSERT(attrib->magic == IAS_ATTRIB_MAGIC, return;);
|
|
|
|
/* Set if attrib is owned by kernel or user space */
|
|
attrib->value->owner = owner;
|
|
|
|
hashbin_insert(obj->attribs, (irda_queue_t *) attrib, 0, attrib->name);
|
|
}
|
|
|
|
/*
|
|
* Function irias_object_change_attribute (obj_name, attrib_name, new_value)
|
|
*
|
|
* Change the value of an objects attribute.
|
|
*
|
|
*/
|
|
int irias_object_change_attribute(char *obj_name, char *attrib_name,
|
|
struct ias_value *new_value)
|
|
{
|
|
struct ias_object *obj;
|
|
struct ias_attrib *attrib;
|
|
unsigned long flags;
|
|
|
|
/* Find object */
|
|
obj = hashbin_lock_find(irias_objects, 0, obj_name);
|
|
if (obj == NULL) {
|
|
IRDA_WARNING("%s: Unable to find object: %s\n", __func__,
|
|
obj_name);
|
|
return -1;
|
|
}
|
|
|
|
/* Slightly unsafe (obj might get removed under us) */
|
|
spin_lock_irqsave(&obj->attribs->hb_spinlock, flags);
|
|
|
|
/* Find attribute */
|
|
attrib = hashbin_find(obj->attribs, 0, attrib_name);
|
|
if (attrib == NULL) {
|
|
IRDA_WARNING("%s: Unable to find attribute: %s\n",
|
|
__func__, attrib_name);
|
|
spin_unlock_irqrestore(&obj->attribs->hb_spinlock, flags);
|
|
return -1;
|
|
}
|
|
|
|
if ( attrib->value->type != new_value->type) {
|
|
IRDA_DEBUG( 0, "%s(), changing value type not allowed!\n",
|
|
__func__);
|
|
spin_unlock_irqrestore(&obj->attribs->hb_spinlock, flags);
|
|
return -1;
|
|
}
|
|
|
|
/* Delete old value */
|
|
irias_delete_value(attrib->value);
|
|
|
|
/* Insert new value */
|
|
attrib->value = new_value;
|
|
|
|
/* Success */
|
|
spin_unlock_irqrestore(&obj->attribs->hb_spinlock, flags);
|
|
return 0;
|
|
}
|
|
EXPORT_SYMBOL(irias_object_change_attribute);
|
|
|
|
/*
|
|
* Function irias_object_add_integer_attrib (obj, name, value)
|
|
*
|
|
* Add an integer attribute to an LM-IAS object
|
|
*
|
|
*/
|
|
void irias_add_integer_attrib(struct ias_object *obj, char *name, int value,
|
|
int owner)
|
|
{
|
|
struct ias_attrib *attrib;
|
|
|
|
IRDA_ASSERT(obj != NULL, return;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return;);
|
|
IRDA_ASSERT(name != NULL, return;);
|
|
|
|
attrib = kzalloc(sizeof(struct ias_attrib), GFP_ATOMIC);
|
|
if (attrib == NULL) {
|
|
IRDA_WARNING("%s: Unable to allocate attribute!\n",
|
|
__func__);
|
|
return;
|
|
}
|
|
|
|
attrib->magic = IAS_ATTRIB_MAGIC;
|
|
attrib->name = kstrndup(name, IAS_MAX_ATTRIBNAME, GFP_ATOMIC);
|
|
|
|
/* Insert value */
|
|
attrib->value = irias_new_integer_value(value);
|
|
if (!attrib->name || !attrib->value) {
|
|
IRDA_WARNING("%s: Unable to allocate attribute!\n",
|
|
__func__);
|
|
if (attrib->value)
|
|
irias_delete_value(attrib->value);
|
|
kfree(attrib->name);
|
|
kfree(attrib);
|
|
return;
|
|
}
|
|
|
|
irias_add_attrib(obj, attrib, owner);
|
|
}
|
|
EXPORT_SYMBOL(irias_add_integer_attrib);
|
|
|
|
/*
|
|
* Function irias_add_octseq_attrib (obj, name, octet_seq, len)
|
|
*
|
|
* Add a octet sequence attribute to an LM-IAS object
|
|
*
|
|
*/
|
|
|
|
void irias_add_octseq_attrib(struct ias_object *obj, char *name, __u8 *octets,
|
|
int len, int owner)
|
|
{
|
|
struct ias_attrib *attrib;
|
|
|
|
IRDA_ASSERT(obj != NULL, return;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return;);
|
|
|
|
IRDA_ASSERT(name != NULL, return;);
|
|
IRDA_ASSERT(octets != NULL, return;);
|
|
|
|
attrib = kzalloc(sizeof(struct ias_attrib), GFP_ATOMIC);
|
|
if (attrib == NULL) {
|
|
IRDA_WARNING("%s: Unable to allocate attribute!\n",
|
|
__func__);
|
|
return;
|
|
}
|
|
|
|
attrib->magic = IAS_ATTRIB_MAGIC;
|
|
attrib->name = kstrndup(name, IAS_MAX_ATTRIBNAME, GFP_ATOMIC);
|
|
|
|
attrib->value = irias_new_octseq_value( octets, len);
|
|
if (!attrib->name || !attrib->value) {
|
|
IRDA_WARNING("%s: Unable to allocate attribute!\n",
|
|
__func__);
|
|
if (attrib->value)
|
|
irias_delete_value(attrib->value);
|
|
kfree(attrib->name);
|
|
kfree(attrib);
|
|
return;
|
|
}
|
|
|
|
irias_add_attrib(obj, attrib, owner);
|
|
}
|
|
EXPORT_SYMBOL(irias_add_octseq_attrib);
|
|
|
|
/*
|
|
* Function irias_object_add_string_attrib (obj, string)
|
|
*
|
|
* Add a string attribute to an LM-IAS object
|
|
*
|
|
*/
|
|
void irias_add_string_attrib(struct ias_object *obj, char *name, char *value,
|
|
int owner)
|
|
{
|
|
struct ias_attrib *attrib;
|
|
|
|
IRDA_ASSERT(obj != NULL, return;);
|
|
IRDA_ASSERT(obj->magic == IAS_OBJECT_MAGIC, return;);
|
|
|
|
IRDA_ASSERT(name != NULL, return;);
|
|
IRDA_ASSERT(value != NULL, return;);
|
|
|
|
attrib = kzalloc(sizeof( struct ias_attrib), GFP_ATOMIC);
|
|
if (attrib == NULL) {
|
|
IRDA_WARNING("%s: Unable to allocate attribute!\n",
|
|
__func__);
|
|
return;
|
|
}
|
|
|
|
attrib->magic = IAS_ATTRIB_MAGIC;
|
|
attrib->name = kstrndup(name, IAS_MAX_ATTRIBNAME, GFP_ATOMIC);
|
|
|
|
attrib->value = irias_new_string_value(value);
|
|
if (!attrib->name || !attrib->value) {
|
|
IRDA_WARNING("%s: Unable to allocate attribute!\n",
|
|
__func__);
|
|
if (attrib->value)
|
|
irias_delete_value(attrib->value);
|
|
kfree(attrib->name);
|
|
kfree(attrib);
|
|
return;
|
|
}
|
|
|
|
irias_add_attrib(obj, attrib, owner);
|
|
}
|
|
EXPORT_SYMBOL(irias_add_string_attrib);
|
|
|
|
/*
|
|
* Function irias_new_integer_value (integer)
|
|
*
|
|
* Create new IAS integer value
|
|
*
|
|
*/
|
|
struct ias_value *irias_new_integer_value(int integer)
|
|
{
|
|
struct ias_value *value;
|
|
|
|
value = kzalloc(sizeof(struct ias_value), GFP_ATOMIC);
|
|
if (value == NULL) {
|
|
IRDA_WARNING("%s: Unable to kmalloc!\n", __func__);
|
|
return NULL;
|
|
}
|
|
|
|
value->type = IAS_INTEGER;
|
|
value->len = 4;
|
|
value->t.integer = integer;
|
|
|
|
return value;
|
|
}
|
|
EXPORT_SYMBOL(irias_new_integer_value);
|
|
|
|
/*
|
|
* Function irias_new_string_value (string)
|
|
*
|
|
* Create new IAS string value
|
|
*
|
|
* Per IrLMP 1.1, 4.3.3.2, strings are up to 256 chars - Jean II
|
|
*/
|
|
struct ias_value *irias_new_string_value(char *string)
|
|
{
|
|
struct ias_value *value;
|
|
|
|
value = kzalloc(sizeof(struct ias_value), GFP_ATOMIC);
|
|
if (value == NULL) {
|
|
IRDA_WARNING("%s: Unable to kmalloc!\n", __func__);
|
|
return NULL;
|
|
}
|
|
|
|
value->type = IAS_STRING;
|
|
value->charset = CS_ASCII;
|
|
value->t.string = kstrndup(string, IAS_MAX_STRING, GFP_ATOMIC);
|
|
if (!value->t.string) {
|
|
IRDA_WARNING("%s: Unable to kmalloc!\n", __func__);
|
|
kfree(value);
|
|
return NULL;
|
|
}
|
|
|
|
value->len = strlen(value->t.string);
|
|
|
|
return value;
|
|
}
|
|
|
|
/*
|
|
* Function irias_new_octseq_value (octets, len)
|
|
*
|
|
* Create new IAS octet-sequence value
|
|
*
|
|
* Per IrLMP 1.1, 4.3.3.2, octet-sequence are up to 1024 bytes - Jean II
|
|
*/
|
|
struct ias_value *irias_new_octseq_value(__u8 *octseq , int len)
|
|
{
|
|
struct ias_value *value;
|
|
|
|
value = kzalloc(sizeof(struct ias_value), GFP_ATOMIC);
|
|
if (value == NULL) {
|
|
IRDA_WARNING("%s: Unable to kmalloc!\n", __func__);
|
|
return NULL;
|
|
}
|
|
|
|
value->type = IAS_OCT_SEQ;
|
|
/* Check length */
|
|
if(len > IAS_MAX_OCTET_STRING)
|
|
len = IAS_MAX_OCTET_STRING;
|
|
value->len = len;
|
|
|
|
value->t.oct_seq = kmemdup(octseq, len, GFP_ATOMIC);
|
|
if (value->t.oct_seq == NULL){
|
|
IRDA_WARNING("%s: Unable to kmalloc!\n", __func__);
|
|
kfree(value);
|
|
return NULL;
|
|
}
|
|
return value;
|
|
}
|
|
|
|
struct ias_value *irias_new_missing_value(void)
|
|
{
|
|
struct ias_value *value;
|
|
|
|
value = kzalloc(sizeof(struct ias_value), GFP_ATOMIC);
|
|
if (value == NULL) {
|
|
IRDA_WARNING("%s: Unable to kmalloc!\n", __func__);
|
|
return NULL;
|
|
}
|
|
|
|
value->type = IAS_MISSING;
|
|
|
|
return value;
|
|
}
|
|
|
|
/*
|
|
* Function irias_delete_value (value)
|
|
*
|
|
* Delete IAS value
|
|
*
|
|
*/
|
|
void irias_delete_value(struct ias_value *value)
|
|
{
|
|
IRDA_DEBUG(4, "%s()\n", __func__);
|
|
|
|
IRDA_ASSERT(value != NULL, return;);
|
|
|
|
switch (value->type) {
|
|
case IAS_INTEGER: /* Fallthrough */
|
|
case IAS_MISSING:
|
|
/* No need to deallocate */
|
|
break;
|
|
case IAS_STRING:
|
|
/* Deallocate string */
|
|
kfree(value->t.string);
|
|
break;
|
|
case IAS_OCT_SEQ:
|
|
/* Deallocate byte stream */
|
|
kfree(value->t.oct_seq);
|
|
break;
|
|
default:
|
|
IRDA_DEBUG(0, "%s(), Unknown value type!\n", __func__);
|
|
break;
|
|
}
|
|
kfree(value);
|
|
}
|
|
EXPORT_SYMBOL(irias_delete_value);
|