/*
* Common Public License Version 0.5
*
* THE ACCOMPANYING PROGRAM IS PROVIDED UNDER THE TERMS OF
* THIS COMMON PUBLIC LICENSE ("AGREEMENT"). ANY USE,
* REPRODUCTION OR DISTRIBUTION OF THE PROGRAM CONSTITUTES
* RECIPIENT'S ACCEPTANCE OF THIS AGREEMENT.
*
* 1. DEFINITIONS
*
* "Contribution" means:
* a) in the case of the initial Contributor, the
* initial code and documentation distributed under
* this Agreement, and
*
* b) in the case of each subsequent Contributor:
* i) changes to the Program, and
* ii) additions to the Program;
*
* where such changes and/or additions to the Program
* originate from and are distributed by that
* particular Contributor. A Contribution 'originates'
* from a Contributor if it was added to the Program
* by such Contributor itself or anyone acting on such
* Contributor's behalf. Contributions do not include
* additions to the Program which: (i) are separate
* modules of software distributed in conjunction with
* the Program under their own license agreement, and
* (ii) are not derivative works of the Program.
*
*
* "Contributor" means any person or entity that distributes
* the Program.
*
* "Licensed Patents " mean patent claims licensable by a
* Contributor which are necessarily infringed by the use or
* sale of its Contribution alone or when combined with the
* Program.
*
* "Program" means the Contributions distributed in
* accordance with this Agreement.
*
* "Recipient" means anyone who receives the Program under
* this Agreement, including all Contributors.
*
* 2. GRANT OF RIGHTS
*
* a) Subject to the terms of this Agreement, each
* Contributor hereby grants Recipient a
* no - exclusive, worldwide, royalt - free copyright
* license to reproduce, prepare derivative works of,
* publicly display, publicly perform, distribute and
* sublicense the Contribution of such Contributor, if
* any, and such derivative works, in source code and
* object code form.
*
* b) Subject to the terms of this Agreement, each
* Contributor hereby grants Recipient a
* no - exclusive, worldwide, royalt - free patent
* license under Licensed Patents to make, use, sell,
* offer to sell, import and otherwise transfer the
* Contribution of such Contributor, if any, in source
* code and object code form. This patent license
* shall apply to the combination of the Contribution
* and the Program if, at the time the Contribution is
* added by the Contributor, such addition of the
* Contribution causes such combination to be covered
* by the Licensed Patents. The patent license shall
* not apply to any other combinations which include
* the Contribution. No hardware per se is licensed
* hereunder.
*
* c) Recipient understands that although each
* Contributor grants the licenses to its
* Contributions set forth herein, no assurances are
* provided by any Contributor that the Program does
* not infringe the patent or other intellectual
* property rights of any other entity. Each
* Contributor disclaims any liability to Recipient
* for claims brought by any other entity based on
* infringement of intellectual property rights or
* otherwise. As a condition to exercising the rights
* and licenses granted hereunder, each Recipient
* hereby assumes sole responsibility to secure any
* other intellectual property rights needed, if any.
*
* For example, if a third party patent license is
* required to allow Recipient to distribute the
* Program, it is Recipient's responsibility to
* acquire that license before distributing the
* Program.
*
* d) Each Contributor represents that to its
* knowledge it has sufficient copyright rights in its
* Contribution, if any, to grant the copyright
* license set forth in this Agreement.
*
* 3. REQUIREMENTS
*
* A Contributor may choose to distribute the Program in
* object code form under its own license agreement, provided
* that:
* a) it complies with the terms and conditions of
* this Agreement; and
*
* b) its license agreement:
* i) effectively disclaims on behalf of all
* Contributors all warranties and conditions, express
* and implied, including warranties or conditions of
* title and no - infringement, and implied warranties
* or conditions of merchantability and fitness for a
* particular purpose;
*
* ii) effectively excludes on behalf of all
* Contributors all liability for damages, including
* direct, indirect, special, incidental and
* consequential damages, such as lost profits;
*
* iii) states that any provisions which differ from
* this Agreement are offered by that Contributor
* alone and not by any other party; and
*
* iv) states that source code for the Program is
* available from such Contributor, and informs
* licensees how to obtain it in a reasonable manner
* on or through a medium customarily used for
* software exchange.
*
* When the Program is made available in source code form:
* a) it must be made available under this Agreement;
* and
* b) a copy of this Agreement must be included with
* each copy of the Program.
*
* Contributors may not remove or alter any copyright notices
* contained within the Program.
*
* Each Contributor must identify itself as the originator of
* its Contribution, if any, in a manner that reasonably
* allows subsequent Recipients to identify the originator of
* the Contribution.
*
*
* 4. COMMERCIAL DISTRIBUTION
*
* Commercial distributors of software may accept certain
* responsibilities with respect to end users, business
* partners and the like. While this license is intended to
* facilitate the commercial use of the Program, the
* Contributor who includes the Program in a commercial
* product offering should do so in a manner which does not
* create potential liability for other Contributors.
* Therefore, if a Contributor includes the Program in a
* commercial product offering, such Contributor ("Commercial
* Contributor") hereby agrees to defend and indemnify every
* other Contributor ("Indemnified Contributor") against any
* losses, damages and costs (collectively "Losses") arising
* from claims, lawsuits and other legal actions brought by a
* third party against the Indemnified Contributor to the
* extent caused by the acts or omissions of such Commercial
* Contributor in connection with its distribution of the
* Program in a commercial product offering. The obligations
* in this section do not apply to any claims or Losses
* relating to any actual or alleged intellectual property
* infringement. In order to qualify, an Indemnified
* Contributor must: a) promptly notify the Commercial
* Contributor in writing of such claim, and b) allow the
* Commercial Contributor to control, and cooperate with the
* Commercial Contributor in, the defense and any related
* settlement negotiations. The Indemnified Contributor may
* participate in any such claim at its own expense.
*
*
* For example, a Contributor might include the Program in a
* commercial product offering, Product X. That Contributor
* is then a Commercial Contributor. If that Commercial
* Contributor then makes performance claims, or offers
* warranties related to Product X, those performance claims
* and warranties are such Commercial Contributor's
* responsibility alone. Under this section, the Commercial
* Contributor would have to defend claims against the other
* Contributors related to those performance claims and
* warranties, and if a court requires any other Contributor
* to pay any damages as a result, the Commercial Contributor
* must pay those damages.
*
*
* 5. NO WARRANTY
*
* EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, THE
* PROGRAM IS PROVIDED ON AN "AS IS" BASIS, WITHOUT
* WARRANTIES OR CONDITIONS OF ANY KIND, EITHER EXPRESS OR
* IMPLIED INCLUDING, WITHOUT LIMITATION, ANY WARRANTIES OR
* CONDITIONS OF TITLE, NO - INFRINGEMENT, MERCHANTABILITY OR
* FITNESS FOR A PARTICULAR PURPOSE. Each Recipient is solely
* responsible for determining the appropriateness of using
* and distributing the Program and assumes all risks
* associated with its exercise of rights under this
* Agreement, including but not limited to the risks and
* costs of program errors, compliance with applicable laws,
* damage to or loss of data, programs or equipment, and
* unavailability or interruption of operations.
*
* 6. DISCLAIMER OF LIABILITY
* EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, NEITHER
* RECIPIENT NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
* OR CONSEQUENTIAL DAMAGES (INCLUDING WITHOUT LIMITATION
* LOST PROFITS), 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 OR DISTRIBUTION OF THE PROGRAM OR THE EXERCISE
* OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGES.
*
* 7. GENERAL
*
* If any provision of this Agreement is invalid or
* unenforceable under applicable law, it shall not affect
* the validity or enforceability of the remainder of the
* terms of this Agreement, and without further action by the
* parties hereto, such provision shall be reformed to the
* minimum extent necessary to make such provision valid and
* enforceable.
*
*
* If Recipient institutes patent litigation against a
* Contributor with respect to a patent applicable to
* software (including a cros - claim or counterclaim in a
* lawsuit), then any patent licenses granted by that
* Contributor to such Recipient under this Agreement shall
* terminate as of the date such litigation is filed. In
* addition, If Recipient institutes patent litigation
* against any entity (including a cros - claim or
* counterclaim in a lawsuit) alleging that the Program
* itself (excluding combinations of the Program with other
* software or hardware) infringes such Recipient's
* patent(s), then such Recipient's rights granted under
* Section 2(b) shall terminate as of the date such
* litigation is filed.
*
* All Recipient's rights under this Agreement shall
* terminate if it fails to comply with any of the material
* terms or conditions of this Agreement and does not cure
* such failure in a reasonable period of time after becoming
* aware of such noncompliance. If all Recipient's rights
* under this Agreement terminate, Recipient agrees to cease
* use and distribution of the Program as soon as reasonably
* practicable. However, Recipient's obligations under this
* Agreement and any licenses granted by Recipient relating
* to the Program shall continue and survive.
*
* Everyone is permitted to copy and distribute copies of
* this Agreement, but in order to avoid inconsistency the
* Agreement is copyrighted and may only be modified in the
* following manner. The Agreement Steward reserves the right
* to publish new versions (including revisions) of this
* Agreement from time to time. No one other than the
* Agreement Steward has the right to modify this Agreement.
*
* IBM is the initial Agreement Steward. IBM may assign the
* responsibility to serve as the Agreement Steward to a
* suitable separate entity. Each new version of the
* Agreement will be given a distinguishing version number.
* The Program (including Contributions) may always be
* distributed subject to the version of the Agreement under
* which it was received. In addition, after a new version of
* the Agreement is published, Contributor may elect to
* distribute the Program (including its Contributions) under
* the new version. Except as expressly stated in Sections
* 2(a) and 2(b) above, Recipient receives no rights or
* licenses to the intellectual property of any Contributor
* under this Agreement, whether expressly, by implication,
* estoppel or otherwise. All rights in the Program not
* expressly granted under this Agreement are reserved.
*
*
* This Agreement is governed by the laws of the State of New
* York and the intellectual property laws of the United
* States of America. No party to this Agreement will bring a
* legal action under this Agreement more than one year after
* the cause of action arose. Each party waives its rights to
* a jury trial in any resulting litigation.
*
*
*
* (C) COPYRIGHT International Business Machines Corp. 2001, 2002
*/
/*
* Copyright 2009 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#include "tpmtok_int.h"
pthread_rwlock_t obj_list_rw_mutex = PTHREAD_RWLOCK_INITIALIZER;
static CK_RV
object_mgr_search_shm_for_obj(TOK_OBJ_ENTRY *,
CK_ULONG, CK_ULONG, OBJECT *, CK_ULONG *);
static CK_RV object_mgr_update_from_shm(TSS_HCONTEXT);
static CK_RV object_mgr_check_shm(TSS_HCONTEXT, OBJECT *);
static CK_RV
check_object_access(SESSION *sess, OBJECT *o)
{
CK_BBOOL sess_obj, priv_obj;
CK_RV rc = CKR_OK;
/*
* check whether session has permissions to create the object, etc
*
* Object R/O R/W R/O R/W R/W
* Type Public Public User User SO
* -------------------------------------------------------------
* Public session R/W R/W R/W R/W R/W
* Private session R/W R/W
* Public token R/O R/W R/O R/W R/W
* Private token R/O R/W
*/
sess_obj = object_is_session_object(o);
priv_obj = object_is_private(o);
if (sess->session_info.state == CKS_RO_PUBLIC_SESSION) {
if (priv_obj) {
rc = CKR_USER_NOT_LOGGED_IN;
goto done;
}
if (!sess_obj) {
rc = CKR_SESSION_READ_ONLY;
goto done;
}
}
if (sess->session_info.state == CKS_RO_USER_FUNCTIONS) {
if (! sess_obj) {
rc = CKR_SESSION_READ_ONLY;
goto done;
}
}
if (sess->session_info.state == CKS_RW_PUBLIC_SESSION) {
if (priv_obj) {
rc = CKR_USER_NOT_LOGGED_IN;
goto done;
}
}
if (sess->session_info.state == CKS_RW_SO_FUNCTIONS) {
if (priv_obj) {
rc = CKR_USER_NOT_LOGGED_IN;
goto done;
}
}
done:
return (rc);
}
CK_RV
object_mgr_add(SESSION * sess,
CK_ATTRIBUTE * pTemplate,
CK_ULONG ulCount,
CK_OBJECT_HANDLE * handle)
{
OBJECT * o = NULL;
CK_BBOOL priv_obj, sess_obj;
CK_RV rc;
if (! sess || ! pTemplate || ! handle) {
return (CKR_FUNCTION_FAILED);
}
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
rc = object_create(pTemplate, ulCount, &o);
if (rc != CKR_OK) {
goto done;
}
rc = check_object_access(sess, o);
if (rc != CKR_OK)
goto done;
/*
* okay, object is created and the session permissions look okay.
* add the object to the appropriate list and assign an object handle
*/
sess_obj = object_is_session_object(o);
priv_obj = object_is_private(o);
if (sess_obj) {
o->session = sess;
(void) memset(o->name, 0x00, sizeof (CK_BYTE) * 8);
sess_obj_list = dlist_add_as_first(sess_obj_list, o);
} else {
CK_BYTE current[8];
CK_BYTE next[8];
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
goto done;
} else {
if (priv_obj) {
if (global_shm->num_priv_tok_obj >=
MAX_TOK_OBJS) {
rc = CKR_HOST_MEMORY;
(void) XProcUnLock(xproclock);
goto done;
}
} else {
if (global_shm->num_publ_tok_obj >=
MAX_TOK_OBJS) {
rc = CKR_HOST_MEMORY;
(void) XProcUnLock(xproclock);
goto done;
}
}
(void) memcpy(current,
&nv_token_data->next_token_object_name, 8);
o->session = NULL;
(void) memcpy(&o->name, current, 8);
(void) compute_next_token_obj_name(current, next);
(void) memcpy(&nv_token_data->next_token_object_name,
next, 8);
rc = save_token_object(sess->hContext, o);
if (rc != CKR_OK) {
(void) XProcUnLock(xproclock);
goto done;
}
(void) object_mgr_add_to_shm(o);
(void) XProcUnLock(xproclock);
(void) save_token_data(nv_token_data);
}
if (priv_obj)
priv_token_obj_list =
dlist_add_as_last(priv_token_obj_list, o);
else
publ_token_obj_list =
dlist_add_as_last(publ_token_obj_list, o);
}
rc = object_mgr_add_to_map(sess, o, handle);
if (rc != CKR_OK) {
DL_NODE *node = NULL;
if (sess_obj) {
node = dlist_find(sess_obj_list, o);
if (node)
sess_obj_list =
dlist_remove_node(sess_obj_list, node);
} else {
(void) delete_token_object(o);
if (priv_obj) {
node = dlist_find(priv_token_obj_list, o);
if (node)
priv_token_obj_list =
dlist_remove_node(
priv_token_obj_list, node);
} else {
node = dlist_find(publ_token_obj_list, o);
if (node)
publ_token_obj_list =
dlist_remove_node(
publ_token_obj_list, node);
}
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
goto done;
}
(void) object_mgr_del_from_shm(o);
(void) XProcUnLock(xproclock);
}
}
done:
(void) pthread_mutex_unlock(&obj_list_mutex);
if ((rc != CKR_OK) && (o != NULL))
(void) object_free(o);
return (rc);
}
CK_RV
object_mgr_add_to_map(SESSION * sess,
OBJECT * obj,
CK_OBJECT_HANDLE * handle) {
OBJECT_MAP *map_node = NULL;
if (! sess || ! obj || ! handle) {
return (CKR_FUNCTION_FAILED);
}
map_node = (OBJECT_MAP *)malloc(sizeof (OBJECT_MAP));
if (! map_node) {
return (CKR_HOST_MEMORY);
}
map_node->handle = next_object_handle++;
map_node->session = sess;
map_node->ptr = obj;
if (obj->session != NULL)
map_node->is_session_obj = TRUE;
else
map_node->is_session_obj = FALSE;
// add the new map entry to the list
if (pthread_rwlock_wrlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
object_map = dlist_add_as_first(object_map, map_node);
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
*handle = map_node->handle;
return (CKR_OK);
}
// object_mgr_copy()
//
// algorithm:
// 1) find the old object
// 2) get the template from the old object
// 3) merge in the new object's template
// 4) perform class - specific sanity checks
//
CK_RV
object_mgr_copy(SESSION * sess,
CK_ATTRIBUTE * pTemplate,
CK_ULONG ulCount,
CK_OBJECT_HANDLE old_handle,
CK_OBJECT_HANDLE * new_handle)
{
OBJECT *old_obj = NULL;
OBJECT *new_obj = NULL;
CK_BBOOL priv_obj;
CK_BBOOL sess_obj;
CK_RV rc;
if (! sess || ! pTemplate || ! new_handle) {
return (CKR_FUNCTION_FAILED);
}
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
rc = object_mgr_find_in_map1(sess->hContext, old_handle, &old_obj);
if (rc != CKR_OK) {
goto done;
}
rc = object_copy(pTemplate, ulCount, old_obj, &new_obj);
if (rc != CKR_OK) {
goto done;
}
rc = check_object_access(sess, new_obj);
if (rc != CKR_OK)
goto done;
sess_obj = object_is_session_object(new_obj);
priv_obj = object_is_private(new_obj);
if (sess_obj) {
new_obj->session = sess;
(void) memset(&new_obj->name, 0x00, sizeof (CK_BYTE) * 8);
sess_obj_list = dlist_add_as_first(sess_obj_list, new_obj);
} else {
CK_BYTE current[8];
CK_BYTE next[8];
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
goto done;
} else {
if (priv_obj) {
if (global_shm->num_priv_tok_obj >=
MAX_TOK_OBJS) {
(void) XProcUnLock(xproclock);
rc = CKR_HOST_MEMORY;
goto done;
}
} else {
if (global_shm->num_publ_tok_obj >=
MAX_TOK_OBJS) {
(void) XProcUnLock(xproclock);
rc = CKR_HOST_MEMORY;
goto done;
}
}
(void) memcpy(current,
&nv_token_data->next_token_object_name, 8);
new_obj->session = NULL;
(void) memcpy(&new_obj->name, current, 8);
(void) compute_next_token_obj_name(current, next);
(void) memcpy(&nv_token_data->next_token_object_name,
next, 8);
rc = save_token_object(sess->hContext, new_obj);
if (rc != CKR_OK) {
(void) XProcUnLock(xproclock);
goto done;
}
(void) object_mgr_add_to_shm(new_obj);
(void) XProcUnLock(xproclock);
(void) save_token_data(nv_token_data);
}
if (priv_obj)
priv_token_obj_list = dlist_add_as_last(
priv_token_obj_list, new_obj);
else
publ_token_obj_list = dlist_add_as_last(
publ_token_obj_list, new_obj);
}
rc = object_mgr_add_to_map(sess, new_obj, new_handle);
if (rc != CKR_OK) {
DL_NODE *node = NULL;
if (sess_obj) {
node = dlist_find(sess_obj_list, new_obj);
if (node)
sess_obj_list = dlist_remove_node(
sess_obj_list, node);
} else {
(void) delete_token_object(new_obj);
if (priv_obj) {
node = dlist_find(priv_token_obj_list, new_obj);
if (node)
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, node);
} else {
node = dlist_find(publ_token_obj_list, new_obj);
if (node)
publ_token_obj_list = dlist_remove_node(
publ_token_obj_list, node);
}
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
goto done;
}
(void) object_mgr_del_from_shm(new_obj);
(void) XProcUnLock(xproclock);
}
}
done:
(void) pthread_mutex_unlock(&obj_list_mutex);
if ((rc != CKR_OK) && (new_obj != NULL))
(void) object_free(new_obj);
return (rc);
}
//
// determines whether the session is allowed to create an object. creates
// the object but doesn't add the object to any object lists or to the
// process' object map.
//
CK_RV
object_mgr_create_skel(SESSION * sess,
CK_ATTRIBUTE * pTemplate,
CK_ULONG ulCount,
CK_ULONG mode,
CK_ULONG obj_type,
CK_ULONG sub_class,
OBJECT ** obj)
{
OBJECT *o = NULL;
CK_RV rc;
CK_BBOOL priv_obj;
CK_BBOOL sess_obj;
if (! sess || ! obj) {
return (CKR_FUNCTION_FAILED);
}
if (! pTemplate && (ulCount != 0)) {
return (CKR_FUNCTION_FAILED);
}
rc = object_create_skel(pTemplate, ulCount,
mode, obj_type, sub_class, &o);
if (rc != CKR_OK) {
return (rc);
}
sess_obj = object_is_session_object(o);
priv_obj = object_is_private(o);
if (sess->session_info.state == CKS_RO_PUBLIC_SESSION) {
if (priv_obj) {
(void) object_free(o);
return (CKR_USER_NOT_LOGGED_IN);
}
if (! sess_obj) {
(void) object_free(o);
return (CKR_SESSION_READ_ONLY);
}
}
if (sess->session_info.state == CKS_RO_USER_FUNCTIONS) {
if (! sess_obj) {
(void) object_free(o);
return (CKR_SESSION_READ_ONLY);
}
}
if (sess->session_info.state == CKS_RW_PUBLIC_SESSION) {
if (priv_obj) {
(void) object_free(o);
return (CKR_USER_NOT_LOGGED_IN);
}
}
if (sess->session_info.state == CKS_RW_SO_FUNCTIONS) {
if (priv_obj) {
(void) object_free(o);
return (CKR_USER_NOT_LOGGED_IN);
}
}
*obj = o;
return (CKR_OK);
}
CK_RV
object_mgr_create_final(SESSION * sess,
OBJECT * obj,
CK_OBJECT_HANDLE * handle)
{
CK_BBOOL sess_obj;
CK_BBOOL priv_obj;
CK_RV rc;
if (!sess || !obj || !handle)
return (CKR_FUNCTION_FAILED);
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
sess_obj = object_is_session_object(obj);
priv_obj = object_is_private(obj);
if (sess_obj) {
obj->session = sess;
(void) memset(obj->name, 0x0, sizeof (CK_BYTE) * 8);
sess_obj_list = dlist_add_as_first(sess_obj_list, obj);
} else {
CK_BYTE current[8];
CK_BYTE next[8];
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
goto done;
} else {
if (priv_obj) {
if (global_shm->num_priv_tok_obj >=
MAX_TOK_OBJS) {
(void) XProcUnLock(xproclock);
rc = CKR_HOST_MEMORY;
goto done;
}
} else {
if (global_shm->num_publ_tok_obj >=
MAX_TOK_OBJS) {
(void) XProcUnLock(xproclock);
rc = CKR_HOST_MEMORY;
goto done;
}
}
(void) memcpy(current,
&nv_token_data->next_token_object_name, 8);
obj->session = NULL;
(void) memcpy(&obj->name, current, 8);
(void) compute_next_token_obj_name(current, next);
(void) memcpy(&nv_token_data->next_token_object_name,
next, 8);
rc = save_token_object(sess->hContext, obj);
if (rc != CKR_OK) {
(void) XProcUnLock(xproclock);
goto done;
}
(void) object_mgr_add_to_shm(obj);
(void) XProcUnLock(xproclock);
(void) save_token_data(nv_token_data);
}
if (priv_obj)
priv_token_obj_list = dlist_add_as_last(
priv_token_obj_list, obj);
else
publ_token_obj_list = dlist_add_as_last(
publ_token_obj_list, obj);
}
rc = object_mgr_add_to_map(sess, obj, handle);
if (rc != CKR_OK) {
DL_NODE *node = NULL;
if (sess_obj) {
node = dlist_find(sess_obj_list, obj);
if (node)
sess_obj_list = dlist_remove_node(
sess_obj_list, node);
} else {
(void) delete_token_object(obj);
if (priv_obj) {
node = dlist_find(priv_token_obj_list, obj);
if (node)
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, node);
} else {
node = dlist_find(publ_token_obj_list, obj);
if (node)
publ_token_obj_list = dlist_remove_node(
publ_token_obj_list, node);
}
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
goto done;
}
(void) object_mgr_del_from_shm(obj);
(void) XProcUnLock(xproclock);
}
}
done:
(void) pthread_mutex_unlock(&obj_list_mutex);
return (rc);
}
CK_RV
object_mgr_destroy_object(SESSION * sess,
CK_OBJECT_HANDLE handle)
{
OBJECT * obj = NULL;
CK_BBOOL sess_obj;
CK_BBOOL priv_obj;
CK_RV rc;
if (! sess)
return (CKR_FUNCTION_FAILED);
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
rc = object_mgr_find_in_map1(sess->hContext, handle, &obj);
if (rc != CKR_OK) {
goto done;
}
rc = check_object_access(sess, obj);
if (rc != CKR_OK)
goto done;
sess_obj = object_is_session_object(obj);
priv_obj = object_is_private(obj);
if (sess_obj) {
DL_NODE *node;
node = dlist_find(sess_obj_list, obj);
if (node) {
(void) object_mgr_remove_from_map(handle);
(void) object_free(obj);
sess_obj_list = dlist_remove_node(
sess_obj_list, node);
rc = CKR_OK;
goto done;
}
} else {
DL_NODE *node = NULL;
(void) delete_token_object(obj);
if (priv_obj)
node = dlist_find(priv_token_obj_list, obj);
else
node = dlist_find(publ_token_obj_list, obj);
if (node) {
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
goto done;
}
(void) object_mgr_del_from_shm(obj);
(void) XProcUnLock(xproclock);
(void) object_mgr_remove_from_map(handle);
(void) object_free(obj);
if (priv_obj)
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, node);
else
publ_token_obj_list = dlist_remove_node(
publ_token_obj_list, node);
rc = CKR_OK;
goto done;
}
}
rc = CKR_FUNCTION_FAILED;
done:
(void) pthread_mutex_unlock(&obj_list_mutex);
return (rc);
}
CK_RV
object_mgr_destroy_token_objects(TSS_HCONTEXT hContext)
{
CK_BBOOL locked2 = FALSE;
CK_RV rc;
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
while (publ_token_obj_list) {
OBJECT *obj = (OBJECT *)publ_token_obj_list->data;
CK_OBJECT_HANDLE handle;
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_remove_from_map(handle);
}
(void) delete_token_object(obj);
(void) object_free(obj);
publ_token_obj_list = dlist_remove_node(
publ_token_obj_list, publ_token_obj_list);
}
while (priv_token_obj_list) {
OBJECT *obj = (OBJECT *)priv_token_obj_list->data;
CK_OBJECT_HANDLE handle;
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_remove_from_map(handle);
}
(void) delete_token_object(obj);
(void) object_free(obj);
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, priv_token_obj_list);
}
// now we want to purge the token object list in shared memory
//
rc = XProcLock(xproclock);
if (rc == CKR_OK) {
locked2 = TRUE;
global_shm->num_priv_tok_obj = 0;
global_shm->num_publ_tok_obj = 0;
(void) memset(&global_shm->publ_tok_objs, 0x0,
MAX_TOK_OBJS * sizeof (TOK_OBJ_ENTRY));
(void) memset(&global_shm->priv_tok_objs, 0x0,
MAX_TOK_OBJS * sizeof (TOK_OBJ_ENTRY));
}
done:
(void) pthread_mutex_unlock(&obj_list_mutex);
if (locked2 == TRUE) (void) XProcUnLock(xproclock);
return (rc);
}
//
// Locates the specified object in the map
// without going and checking for cache update
//
CK_RV
object_mgr_find_in_map_nocache(CK_OBJECT_HANDLE handle,
OBJECT ** ptr) {
DL_NODE * node = NULL;
OBJECT * obj = NULL;
if (! ptr) {
return (CKR_FUNCTION_FAILED);
}
if (pthread_rwlock_rdlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
node = object_map;
while (node) {
OBJECT_MAP *map = (OBJECT_MAP *)node->data;
if (map->handle == handle) {
obj = map->ptr;
break;
}
node = node->next;
}
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
if (obj == NULL || node == NULL) {
return (CKR_OBJECT_HANDLE_INVALID);
}
if (object_is_session_object(obj) == TRUE) {
*ptr = obj;
return (CKR_OK);
}
*ptr = obj;
return (CKR_OK);
}
CK_RV
object_mgr_find_in_map1(
TSS_HCONTEXT hContext,
CK_OBJECT_HANDLE handle,
OBJECT ** ptr)
{
DL_NODE * node = NULL;
OBJECT * obj = NULL;
if (! ptr) {
return (CKR_FUNCTION_FAILED);
}
if (pthread_rwlock_rdlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
node = object_map;
while (node) {
OBJECT_MAP *map = (OBJECT_MAP *)node->data;
if (map->handle == handle) {
obj = map->ptr;
break;
}
node = node->next;
}
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
if (obj == NULL || node == NULL) {
return (CKR_OBJECT_HANDLE_INVALID);
}
if (object_is_session_object(obj) == TRUE) {
*ptr = obj;
return (CKR_OK);
}
(void) object_mgr_check_shm(hContext, obj);
*ptr = obj;
return (CKR_OK);
}
CK_RV
object_mgr_find_in_map2(
TSS_HCONTEXT hContext,
OBJECT * obj,
CK_OBJECT_HANDLE * handle)
{
DL_NODE * node = NULL;
CK_OBJECT_HANDLE h = (CK_OBJECT_HANDLE)NULL;
if (! obj || ! handle) {
return (CKR_FUNCTION_FAILED);
}
if (pthread_rwlock_rdlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
node = object_map;
while (node) {
OBJECT_MAP *map = (OBJECT_MAP *)node->data;
if (map->ptr == obj) {
h = map->handle;
break;
}
node = node->next;
}
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
if (node == NULL) {
return (CKR_OBJECT_HANDLE_INVALID);
}
if (object_is_session_object(obj) == TRUE) {
*handle = h;
return (CKR_OK);
}
(void) object_mgr_check_shm(hContext, obj);
*handle = h;
return (CKR_OK);
}
CK_RV
object_mgr_find_init(SESSION * sess,
CK_ATTRIBUTE * pTemplate,
CK_ULONG ulCount)
{
if (! sess) {
return (CKR_FUNCTION_FAILED);
}
if (sess->find_active != FALSE) {
return (CKR_OPERATION_ACTIVE);
}
// initialize the found object list. if it doesn't exist, allocate
// a list big enough for 10 handles. we'll reallocate if we need more
//
if (sess->find_list != NULL) {
(void) memset(sess->find_list, 0x0,
sess->find_len * sizeof (CK_OBJECT_HANDLE));
} else {
sess->find_list = (CK_OBJECT_HANDLE *)malloc(
10 * sizeof (CK_OBJECT_HANDLE));
if (! sess->find_list) {
return (CKR_HOST_MEMORY);
} else {
(void) memset(sess->find_list, 0x0,
10 * sizeof (CK_OBJECT_HANDLE));
sess->find_len = 10;
}
}
sess->find_count = 0;
sess->find_idx = 0;
// --- need to grab the object lock here
if (pthread_mutex_lock(&obj_list_mutex))
return (CKR_FUNCTION_FAILED);
(void) object_mgr_update_from_shm(sess->hContext);
// which objects can be return (ed:
//
// Public Session: public session objects, public token objects
// User Session: all session objects, all token objects
// SO session: public session objects, public token objects
//
switch (sess->session_info.state) {
case CKS_RO_PUBLIC_SESSION:
case CKS_RW_PUBLIC_SESSION:
case CKS_RW_SO_FUNCTIONS:
(void) object_mgr_find_build_list(sess, pTemplate,
ulCount, publ_token_obj_list, TRUE);
(void) object_mgr_find_build_list(sess, pTemplate,
ulCount, sess_obj_list, TRUE);
break;
case CKS_RO_USER_FUNCTIONS:
case CKS_RW_USER_FUNCTIONS:
(void) object_mgr_find_build_list(sess, pTemplate,
ulCount, priv_token_obj_list, FALSE);
(void) object_mgr_find_build_list(sess, pTemplate,
ulCount, publ_token_obj_list, FALSE);
(void) object_mgr_find_build_list(sess, pTemplate,
ulCount, sess_obj_list, FALSE);
break;
}
(void) pthread_mutex_unlock(&obj_list_mutex);
sess->find_active = TRUE;
return (CKR_OK);
}
CK_RV
object_mgr_find_build_list(SESSION * sess,
CK_ATTRIBUTE * pTemplate,
CK_ULONG ulCount,
DL_NODE * obj_list,
CK_BBOOL public_only)
{
OBJECT * obj = NULL;
DL_NODE * node = NULL;
CK_OBJECT_HANDLE handle;
CK_BBOOL is_priv;
CK_BBOOL match;
CK_BBOOL hw_feature = FALSE;
CK_BBOOL hidden_object = FALSE;
CK_RV rc;
CK_ATTRIBUTE * attr;
unsigned int i;
if (! sess) {
return (CKR_FUNCTION_FAILED);
}
if (! obj_list)
return (CKR_OK);
// PKCS#11 v2.11 (pg. 79): "When searching using C_FindObjectsInit
// and C_FindObjects, hardware feature objects are not returned
// unless the CKA_CLASS attribute in the template has the value
// CKO_HW_FEATURE." So, we check for CKO_HW_FEATURE and if its set,
// we'll find these objects below. - KEY
for (i = 0; i < ulCount; i++) {
if (pTemplate[i].type == CKA_CLASS) {
if (*(CK_ULONG *)pTemplate[i].pValue ==
CKO_HW_FEATURE) {
hw_feature = TRUE;
break;
}
}
if (pTemplate[i].type == CKA_HIDDEN) {
if (*(CK_BBOOL *)pTemplate[i].pValue == TRUE) {
hidden_object = TRUE;
break;
}
}
}
node = obj_list;
while (node) {
match = FALSE;
obj = (OBJECT *)node->data;
is_priv = object_is_private(obj);
if ((is_priv == FALSE) || (public_only == FALSE)) {
if (pTemplate == NULL || ulCount == 0)
match = TRUE;
else
match = template_compare(pTemplate,
ulCount, obj->template);
}
if (match) {
rc = object_mgr_find_in_map2(sess->hContext, obj,
&handle);
if (rc != CKR_OK) {
rc = object_mgr_add_to_map(sess, obj, &handle);
if (rc != CKR_OK) {
return (CKR_FUNCTION_FAILED);
}
}
if (rc == CKR_OK) {
if ((hw_feature == FALSE) &&
(template_attribute_find(obj->template,
CKA_CLASS, &attr) == TRUE)) {
if (*(CK_OBJECT_CLASS *)attr->pValue ==
CKO_HW_FEATURE)
goto next_loop;
}
if ((hidden_object == FALSE) &&
(template_attribute_find(obj->template,
CKA_HIDDEN, &attr) == TRUE)) {
if (*(CK_BBOOL *)attr->pValue == TRUE)
goto next_loop;
}
sess->find_list[ sess->find_count ] = handle;
sess->find_count++;
if (sess->find_count >= sess->find_len) {
sess->find_len += 15;
sess->find_list =
(CK_OBJECT_HANDLE *)realloc(
sess->find_list, sess->find_len *
sizeof (CK_OBJECT_HANDLE));
if (! sess->find_list) {
return (CKR_HOST_MEMORY);
}
}
}
}
next_loop:
node = node->next;
}
return (CKR_OK);
}
CK_RV
object_mgr_find_final(SESSION *sess)
{
if (! sess) {
return (CKR_FUNCTION_FAILED);
}
if (sess->find_active == FALSE) {
return (CKR_OPERATION_NOT_INITIALIZED);
}
free(sess->find_list);
sess->find_list = NULL;
sess->find_count = 0;
sess->find_idx = 0;
sess->find_active = FALSE;
return (CKR_OK);
}
CK_RV
object_mgr_get_attribute_values(SESSION * sess,
CK_OBJECT_HANDLE handle,
CK_ATTRIBUTE * pTemplate,
CK_ULONG ulCount)
{
OBJECT * obj;
CK_BBOOL priv_obj;
CK_RV rc;
if (! pTemplate) {
return (CKR_FUNCTION_FAILED);
}
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
rc = object_mgr_find_in_map1(sess->hContext, handle, &obj);
if (rc != CKR_OK) {
goto done;
}
priv_obj = object_is_private(obj);
if (priv_obj == TRUE) {
if (sess->session_info.state == CKS_RO_PUBLIC_SESSION ||
sess->session_info.state == CKS_RW_PUBLIC_SESSION) {
rc = CKR_USER_NOT_LOGGED_IN;
goto done;
}
}
rc = object_get_attribute_values(obj, pTemplate, ulCount);
done:
(void) pthread_mutex_unlock(&obj_list_mutex);
return (rc);
}
CK_RV
object_mgr_get_object_size(
TSS_HCONTEXT hContext,
CK_OBJECT_HANDLE handle,
CK_ULONG * size)
{
OBJECT * obj;
CK_RV rc;
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
rc = object_mgr_find_in_map1(hContext, handle, &obj);
if (rc != CKR_OK) {
rc = CKR_OBJECT_HANDLE_INVALID;
goto done;
}
*size = object_get_size(obj);
done:
(void) pthread_mutex_unlock(&obj_list_mutex);
return (rc);
}
// object_mgr_invalidate_handle1()
//
// Returns: TRUE if successfully removes the node
// FALSE if cannot remove the node (not found, etc)
//
CK_BBOOL
object_mgr_invalidate_handle1(CK_OBJECT_HANDLE handle)
{
DL_NODE *node = NULL;
if (pthread_rwlock_wrlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
node = object_map;
while (node) {
OBJECT_MAP *map = (OBJECT_MAP *)node->data;
if (map->handle == handle) {
object_map = dlist_remove_node(object_map, node);
free(map);
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
return (TRUE);
}
node = node->next;
}
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
return (FALSE);
}
// object_mgr_invalidate_handle2()
//
// Returns: TRUE if successfully removes the node
// FALSE if cannot remove the node (not found, etc)
//
CK_BBOOL
object_mgr_invalidate_handle2(OBJECT *obj)
{
DL_NODE *node = NULL;
if (! obj)
return (FALSE);
if (pthread_rwlock_wrlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
node = object_map;
while (node) {
OBJECT_MAP *map = (OBJECT_MAP *)node->data;
if (map->ptr == obj) {
object_map = dlist_remove_node(object_map, node);
free(map);
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
return (TRUE);
}
node = node->next;
}
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
return (FALSE);
}
// object_mgr_purge_session_objects()
//
// Args: SESSION *
// SESS_OBJ_TYPE: can be ALL, PRIVATE or PUBLIC
//
// Remove all session objects owned by the specified session satisfying
// the 'type' requirements
//
CK_BBOOL
object_mgr_purge_session_objects(SESSION * sess,
SESS_OBJ_TYPE type)
{
DL_NODE *node = NULL;
DL_NODE *next = NULL;
OBJECT *obj = NULL;
CK_BBOOL del;
CK_RV rc;
if (!sess)
return (FALSE);
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (FALSE);
node = sess_obj_list;
while (node) {
obj = (OBJECT *)node->data;
del = FALSE;
if (obj->session == sess) {
if (type == PRIVATE) {
if (object_is_private(obj))
del = TRUE;
} else if (type == PUBLIC) {
if (object_is_public(obj))
del = TRUE;
} else if (type == ALL)
del = TRUE;
}
if (del == TRUE) {
CK_OBJECT_HANDLE handle;
CK_RV rc;
rc = object_mgr_find_in_map2(sess->hContext, obj,
&handle);
if (rc == CKR_OK) {
(void) object_mgr_invalidate_handle1(handle);
(void) object_free(obj);
}
next = node->next;
sess_obj_list = dlist_remove_node(sess_obj_list, node);
node = next;
}
else
node = node->next;
}
(void) pthread_mutex_unlock(&obj_list_mutex);
return (TRUE);
}
//
// This routine cleans up the list of token objects. in general, we don't
// need to do this but when tracing memory leaks, it's best that we free
// everything that we've allocated.
//
CK_BBOOL
object_mgr_purge_token_objects(TSS_HCONTEXT hContext)
{
DL_NODE *node = NULL;
DL_NODE *next = NULL;
OBJECT *obj = NULL;
CK_RV rc;
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (FALSE);
node = publ_token_obj_list;
while (publ_token_obj_list) {
CK_OBJECT_HANDLE handle;
CK_RV rc;
obj = (OBJECT *)node->data;
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_invalidate_handle1(handle);
}
(void) object_free(obj);
next = node->next;
publ_token_obj_list = dlist_remove_node(
publ_token_obj_list, node);
node = next;
}
node = priv_token_obj_list;
while (priv_token_obj_list) {
CK_OBJECT_HANDLE handle;
CK_RV rc;
obj = (OBJECT *)node->data;
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK)
(void) object_mgr_invalidate_handle1(handle);
(void) object_free(obj);
next = node->next;
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, node);
node = next;
}
(void) pthread_mutex_unlock(&obj_list_mutex);
return (TRUE);
}
CK_BBOOL
object_mgr_purge_private_token_objects(TSS_HCONTEXT hContext) {
OBJECT * obj = NULL;
DL_NODE * node = NULL;
DL_NODE * next = NULL;
CK_RV rc;
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (FALSE);
node = priv_token_obj_list;
while (priv_token_obj_list) {
CK_OBJECT_HANDLE handle;
CK_RV rc;
obj = (OBJECT *)node->data;
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_invalidate_handle1(handle);
}
(void) object_free(obj);
next = node->next;
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, node);
node = next;
}
(void) pthread_mutex_unlock(&obj_list_mutex);
return (TRUE);
}
CK_RV
object_mgr_remove_from_map(CK_OBJECT_HANDLE handle)
{
DL_NODE *node = NULL;
if (pthread_rwlock_wrlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
node = object_map;
while (node) {
OBJECT_MAP *map = (OBJECT_MAP *)node->data;
if (map->handle == handle) {
object_map = dlist_remove_node(object_map, node);
free(map);
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
return (CKR_OK);
}
node = node->next;
}
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
return (CKR_FUNCTION_FAILED);
}
CK_RV
object_mgr_restore_obj(CK_BYTE *data, OBJECT *oldObj)
{
OBJECT * obj = NULL;
CK_BBOOL priv;
CK_RV rc;
if (! data) {
return (CKR_FUNCTION_FAILED);
}
if (oldObj != NULL) {
obj = oldObj;
rc = object_restore(data, &obj, TRUE);
} else {
rc = object_restore(data, &obj, FALSE);
if (rc == CKR_OK) {
priv = object_is_private(obj);
if (priv)
priv_token_obj_list = dlist_add_as_last(
priv_token_obj_list, obj);
else
publ_token_obj_list = dlist_add_as_last(
publ_token_obj_list, obj);
(void) XProcLock(xproclock);
if (priv) {
if (global_shm->priv_loaded == FALSE) {
if (global_shm->num_priv_tok_obj <
MAX_TOK_OBJS)
(void) object_mgr_add_to_shm(
obj);
else
rc = CKR_HOST_MEMORY;
}
} else {
if (global_shm->publ_loaded == FALSE) {
if (global_shm->num_publ_tok_obj <
MAX_TOK_OBJS)
(void) object_mgr_add_to_shm(
obj);
else
rc = CKR_HOST_MEMORY;
}
}
(void) XProcUnLock(xproclock);
}
}
// make the callers have to have the mutes
// to many grab it now.
return (rc);
}
CK_RV
object_mgr_set_attribute_values(SESSION * sess,
CK_OBJECT_HANDLE handle,
CK_ATTRIBUTE * pTemplate,
CK_ULONG ulCount)
{
OBJECT * obj;
CK_BBOOL sess_obj, priv_obj;
CK_BBOOL modifiable;
CK_RV rc;
if (! pTemplate) {
return (CKR_FUNCTION_FAILED);
}
rc = pthread_mutex_lock(&obj_list_mutex);
if (rc != CKR_OK)
return (CKR_FUNCTION_FAILED);
rc = object_mgr_find_in_map1(sess->hContext, handle, &obj);
if (rc != CKR_OK) {
(void) pthread_mutex_unlock(&obj_list_mutex);
return (CKR_OBJECT_HANDLE_INVALID);
}
(void) pthread_mutex_unlock(&obj_list_mutex);
modifiable = object_is_modifiable(obj);
sess_obj = object_is_session_object(obj);
priv_obj = object_is_private(obj);
if (! modifiable) {
return (CKR_ATTRIBUTE_READ_ONLY);
}
rc = check_object_access(sess, obj);
if (rc != CKR_OK)
return (rc);
rc = object_set_attribute_values(obj, pTemplate, ulCount);
if (rc != CKR_OK) {
return (rc);
}
if (! sess_obj) {
TOK_OBJ_ENTRY *entry = NULL;
CK_ULONG index;
obj->count_lo++;
if (obj->count_lo == 0)
obj->count_hi++;
rc = save_token_object(sess->hContext, obj);
if (rc != CKR_OK)
return (rc);
rc = XProcLock(xproclock);
if (rc != CKR_OK) {
return (rc);
}
if (priv_obj) {
rc = object_mgr_search_shm_for_obj(
global_shm->priv_tok_objs,
0, global_shm->num_priv_tok_obj - 1,
obj, &index);
if (rc != CKR_OK) {
(void) XProcUnLock(xproclock);
return (rc);
}
entry = &global_shm->priv_tok_objs[index];
} else {
rc = object_mgr_search_shm_for_obj(
global_shm->publ_tok_objs,
0, global_shm->num_publ_tok_obj - 1,
obj, &index);
if (rc != CKR_OK) {
(void) XProcUnLock(xproclock);
return (rc);
}
entry = &global_shm->publ_tok_objs[index];
}
entry->count_lo = obj->count_lo;
entry->count_hi = obj->count_hi;
(void) XProcUnLock(xproclock);
}
return (rc);
}
CK_RV
object_mgr_add_to_shm(OBJECT *obj)
{
TOK_OBJ_ENTRY * entry = NULL;
CK_BBOOL priv;
priv = object_is_private(obj);
if (priv)
entry = &global_shm->priv_tok_objs[
global_shm->num_priv_tok_obj];
else
entry = &global_shm->publ_tok_objs[
global_shm->num_publ_tok_obj];
entry->deleted = FALSE;
entry->count_lo = 0;
entry->count_hi = 0;
(void) memcpy(entry->name, obj->name, 8);
if (priv) {
global_shm->num_priv_tok_obj++;
} else {
global_shm->num_publ_tok_obj++;
}
return (CKR_OK);
}
CK_RV
object_mgr_del_from_shm(OBJECT *obj)
{
CK_ULONG index, count;
CK_BBOOL priv;
CK_RV rc;
priv = object_is_private(obj);
if (priv) {
rc = object_mgr_search_shm_for_obj(global_shm->priv_tok_objs,
0, global_shm->num_priv_tok_obj - 1, obj, &index);
if (rc != CKR_OK) {
return (CKR_FUNCTION_FAILED);
}
global_shm->num_priv_tok_obj--;
if (index > global_shm->num_priv_tok_obj) {
count = index - global_shm->num_priv_tok_obj;
} else {
count = global_shm->num_priv_tok_obj - index;
}
if (count > 0) {
(void) memcpy((char *)&global_shm->priv_tok_objs[index],
(char *)&global_shm->priv_tok_objs[index + 1],
sizeof (TOK_OBJ_ENTRY) * count);
(void) memset((char *)&global_shm->priv_tok_objs[
global_shm->num_priv_tok_obj + 1], 0,
sizeof (TOK_OBJ_ENTRY));
} else {
(void) memset((char *)&global_shm->priv_tok_objs[
global_shm->num_priv_tok_obj], 0,
sizeof (TOK_OBJ_ENTRY));
}
} else {
rc = object_mgr_search_shm_for_obj(global_shm->publ_tok_objs,
0, global_shm->num_publ_tok_obj - 1, obj, &index);
if (rc != CKR_OK) {
return (CKR_FUNCTION_FAILED);
}
global_shm->num_publ_tok_obj--;
if (index > global_shm->num_publ_tok_obj) {
count = index - global_shm->num_publ_tok_obj;
} else {
count = global_shm->num_publ_tok_obj - index;
}
if (count > 0) {
(void) memcpy((char *)&global_shm->publ_tok_objs[index],
(char *)&global_shm->publ_tok_objs[index + 1],
sizeof (TOK_OBJ_ENTRY) * count);
(void) memset((char *)&global_shm->publ_tok_objs[
global_shm->num_publ_tok_obj + 1], 0,
sizeof (TOK_OBJ_ENTRY));
} else {
(void) memset((char *)&global_shm->publ_tok_objs[
global_shm->num_publ_tok_obj], 0,
sizeof (TOK_OBJ_ENTRY));
}
}
return (CKR_OK);
}
static CK_RV
object_mgr_check_shm(TSS_HCONTEXT hContext, OBJECT *obj)
{
TOK_OBJ_ENTRY * entry = NULL;
CK_BBOOL priv;
CK_ULONG index;
CK_RV rc;
priv = object_is_private(obj);
if (priv) {
rc = object_mgr_search_shm_for_obj(
global_shm->priv_tok_objs,
0, global_shm->num_priv_tok_obj - 1, obj, &index);
if (rc != CKR_OK) {
return (CKR_FUNCTION_FAILED);
}
entry = &global_shm->priv_tok_objs[index];
} else {
rc = object_mgr_search_shm_for_obj(
global_shm->publ_tok_objs,
0, global_shm->num_publ_tok_obj - 1, obj, &index);
if (rc != CKR_OK) {
return (CKR_FUNCTION_FAILED);
}
entry = &global_shm->publ_tok_objs[index];
}
if ((obj->count_hi == entry->count_hi) &&
(obj->count_lo == entry->count_lo))
return (CKR_OK);
rc = reload_token_object(hContext, obj);
return (rc);
}
/*ARGSUSED*/
static CK_RV
object_mgr_search_shm_for_obj(
TOK_OBJ_ENTRY *obj_list,
CK_ULONG lo,
CK_ULONG hi,
OBJECT *obj,
CK_ULONG *index)
{
CK_ULONG idx;
if (obj->index == 0) {
for (idx = lo; idx <= hi; idx++) {
if (memcmp(obj->name, obj_list[idx].name, 8) == 0) {
*index = idx;
obj->index = idx;
return (CKR_OK);
}
}
} else {
if (memcmp(obj->name, obj_list[obj->index].name, 8) == 0) {
*index = obj->index;
return (CKR_OK);
} else {
for (idx = lo; idx <= hi; idx++) {
if (memcmp(obj->name,
obj_list[idx].name, 8) == 0) {
*index = idx;
obj->index = idx;
return (CKR_OK);
}
}
}
}
return (CKR_FUNCTION_FAILED);
}
static CK_RV
object_mgr_update_publ_tok_obj_from_shm(TSS_HCONTEXT hContext)
{
DL_NODE * node = NULL;
DL_NODE * next = NULL;
TOK_OBJ_ENTRY * te = NULL;
OBJECT * obj = NULL;
CK_OBJECT_HANDLE handle;
CK_ULONG index;
int val;
CK_RV rc;
node = publ_token_obj_list;
index = 0;
while ((node != NULL) && (index < global_shm->num_publ_tok_obj)) {
te = &global_shm->publ_tok_objs[index];
obj = (OBJECT *)node->data;
val = memcmp(obj->name, te->name, 8);
// 3 cases:
// 1) object in local list but not in the global list,
// need to remove from local list
// 2) object in both lists, need to compare counters
// and update as needed
// 3) object in global list but not in the local list,
// need to add the object here.
//
if (val < 0) {
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_remove_from_map(handle);
}
(void) object_free(obj);
next = node->next;
publ_token_obj_list = dlist_remove_node(
publ_token_obj_list, node);
} else if (val == 0) {
if ((te->count_hi != obj->count_hi) ||
(te->count_lo != obj->count_lo)) {
(void) reload_token_object(hContext, obj);
obj->count_hi = te->count_hi;
obj->count_lo = te->count_lo;
}
next = node->next;
index++;
} else {
DL_NODE *new_node = NULL;
OBJECT *new_obj = NULL;
new_obj = (OBJECT *)malloc(sizeof (OBJECT));
(void) memset(new_obj, 0x0, sizeof (OBJECT));
(void) memcpy(new_obj->name, te->name, 8);
(void) reload_token_object(hContext, new_obj);
new_node = (DL_NODE *)malloc(sizeof (DL_NODE));
new_node->data = new_obj;
new_node->next = node->next;
node->next = new_node;
new_node->prev = node;
next = new_node->next;
index++;
}
node = next;
}
if ((node == NULL) && (index < global_shm->num_publ_tok_obj)) {
OBJECT *new_obj = NULL;
unsigned int i;
for (i = index; i < global_shm->num_publ_tok_obj; i++) {
new_obj = (OBJECT *)malloc(sizeof (OBJECT));
(void) memset(new_obj, 0x0, sizeof (OBJECT));
te = &global_shm->publ_tok_objs[index];
(void) memcpy(new_obj->name, te->name, 8);
(void) reload_token_object(hContext, new_obj);
publ_token_obj_list = dlist_add_as_last(
publ_token_obj_list, new_obj);
}
} else if ((node != NULL) && (index >= global_shm->num_publ_tok_obj)) {
while (node) {
obj = (OBJECT *)node->data;
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_remove_from_map(handle);
}
(void) object_free(obj);
next = node->next;
publ_token_obj_list = dlist_remove_node(
publ_token_obj_list, node);
node = next;
}
}
return (CKR_OK);
}
static CK_RV
object_mgr_update_priv_tok_obj_from_shm(TSS_HCONTEXT hContext)
{
DL_NODE * node = NULL;
DL_NODE * next = NULL;
TOK_OBJ_ENTRY * te = NULL;
OBJECT * obj = NULL;
CK_OBJECT_HANDLE handle;
CK_ULONG index;
int val;
CK_RV rc;
node = priv_token_obj_list;
index = 0;
if (! (global_login_state == CKS_RW_USER_FUNCTIONS ||
global_login_state == CKS_RO_USER_FUNCTIONS)) {
return (CKR_OK);
}
while ((node != NULL) && (index < global_shm->num_priv_tok_obj)) {
te = &global_shm->priv_tok_objs[index];
obj = (OBJECT *)node->data;
val = memcmp(obj->name, te->name, 8);
if (val < 0) {
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_remove_from_map(handle);
}
(void) object_free(obj);
next = node->next;
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, node);
} else if (val == 0) {
if ((te->count_hi != obj->count_hi) ||
(te->count_lo != obj->count_lo)) {
(void) reload_token_object(hContext, obj);
obj->count_hi = te->count_hi;
obj->count_lo = te->count_lo;
}
next = node->next;
index++;
} else {
DL_NODE *new_node = NULL;
OBJECT *new_obj = NULL;
new_obj = (OBJECT *)malloc(sizeof (OBJECT));
(void) memset(new_obj, 0x0, sizeof (OBJECT));
(void) memcpy(new_obj->name, te->name, 8);
(void) reload_token_object(hContext, new_obj);
new_node = (DL_NODE *)malloc(sizeof (DL_NODE));
new_node->data = new_obj;
new_node->next = node->next;
node->next = new_node;
new_node->prev = node;
next = new_node->next;
index++;
}
node = next;
}
if ((node == NULL) && (index < global_shm->num_priv_tok_obj)) {
OBJECT *new_obj = NULL;
unsigned int i;
for (i = index; i < global_shm->num_priv_tok_obj; i++) {
new_obj = (OBJECT *)malloc(sizeof (OBJECT));
(void) memset(new_obj, 0x0, sizeof (OBJECT));
te = &global_shm->priv_tok_objs[index];
(void) memcpy(new_obj->name, te->name, 8);
(void) reload_token_object(hContext, new_obj);
priv_token_obj_list = dlist_add_as_last(
priv_token_obj_list, new_obj);
}
} else if ((node != NULL) && (index >= global_shm->num_priv_tok_obj)) {
while (node) {
obj = (OBJECT *)node->data;
rc = object_mgr_find_in_map2(hContext, obj, &handle);
if (rc == CKR_OK) {
(void) object_mgr_remove_from_map(handle);
}
(void) object_free(obj);
next = node->next;
priv_token_obj_list = dlist_remove_node(
priv_token_obj_list, node);
node = next;
}
}
return (CKR_OK);
}
static CK_RV
object_mgr_update_from_shm(TSS_HCONTEXT hContext)
{
(void) object_mgr_update_publ_tok_obj_from_shm(hContext);
(void) object_mgr_update_priv_tok_obj_from_shm(hContext);
return (CKR_OK);
}
/*ARGSUSED*/
CK_BBOOL
object_mgr_purge_map(
SESSION *sess,
SESS_OBJ_TYPE type)
{
DL_NODE *node = NULL;
DL_NODE *next = NULL;
if (pthread_rwlock_wrlock(&obj_list_rw_mutex)) {
return (CKR_FUNCTION_FAILED);
}
node = object_map;
while (node) {
OBJECT_MAP *map = (OBJECT_MAP *)node->data;
OBJECT *obj = (OBJECT *)map->ptr;
next = node->next;
if (type == PRIVATE) {
if (object_is_private(obj)) {
object_map = dlist_remove_node(
object_map, node);
free(map);
}
}
if (type == PUBLIC) {
if (object_is_public(obj)) {
object_map = dlist_remove_node(
object_map, node);
free(map);
}
}
node = next;
}
(void) pthread_rwlock_unlock(&obj_list_rw_mutex);
return (TRUE);
}