1 /*
2 * Copyright (c) 2003, 2014, Oracle and/or its affiliates. All rights reserved.
3 */
4
5 /* Copyright (c) 2002 Graz University of Technology. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions are met:
9 *
10 * 1. Redistributions of source code must retain the above copyright notice,
11 * this list of conditions and the following disclaimer.
12 *
13 * 2. Redistributions in binary form must reproduce the above copyright notice,
14 * this list of conditions and the following disclaimer in the documentation
15 * and/or other materials provided with the distribution.
16 *
17 * 3. The end-user documentation included with the redistribution, if any, must
18 * include the following acknowledgment:
19 *
20 * "This product includes software developed by IAIK of Graz University of
21 * Technology."
22 *
23 * Alternately, this acknowledgment may appear in the software itself, if
24 * and wherever such third-party acknowledgments normally appear.
25 *
26 * 4. The names "Graz University of Technology" and "IAIK of Graz University of
27 * Technology" must not be used to endorse or promote products derived from
28 * this software without prior written permission.
29 *
30 * 5. Products derived from this software may not be called
31 * "IAIK PKCS Wrapper", nor may "IAIK" appear in their name, without prior
32 * written permission of Graz University of Technology.
33 *
34 * THIS SOFTWARE IS PROVIDED "AS IS" AND ANY EXPRESSED OR IMPLIED
35 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
36 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
37 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE LICENSOR BE
38 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
39 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
40 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
41 * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
42 * ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
43 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
44 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
45 * POSSIBILITY OF SUCH DAMAGE.
46 */
47
48 /*
49 * pkcs11wrapper.c
50 * 18.05.2001
51 *
52 * This module contains the native functions of the Java to PKCS#11 interface
53 * which are platform dependent. This includes loading a dynamic link libary,
54 * retrieving the function list and unloading the dynamic link library.
55 *
56 * @author Karl Scheibelhofer <Karl.Scheibelhofer@iaik.at>
57 */
58
59 #include "pkcs11wrapper.h"
60
61 #include <stdio.h>
62 #include <stdlib.h>
63 #include <string.h>
64 #include <assert.h>
65
66 #include <dlfcn.h>
67
68 #include <jni.h>
69
70 #include "sun_security_pkcs11_wrapper_PKCS11.h"
71
72 /*
73 * Class: sun_security_pkcs11_wrapper_PKCS11
74 * Method: connect
75 * Signature: (Ljava/lang/String;)V
76 */
77 JNIEXPORT void JNICALL Java_sun_security_pkcs11_wrapper_PKCS11_connect
78 (JNIEnv *env, jobject obj, jstring jPkcs11ModulePath, jstring jGetFunctionList)
79 {
80 void *hModule;
81 char *error;
82 CK_C_GetFunctionList C_GetFunctionList=NULL;
83 CK_RV rv;
84 ModuleData *moduleData;
85 jobject globalPKCS11ImplementationReference;
86 char *systemErrorMessage;
87 char *exceptionMessage;
88 const char *getFunctionListStr;
89
90 const char *libraryNameStr = (*env)->GetStringUTFChars(env, jPkcs11ModulePath, 0);
91 if (libraryNameStr == NULL) {
92 return;
93 }
94 TRACE1("DEBUG: connect to PKCS#11 module: %s ... ", libraryNameStr);
95
96
97 /*
98 * Load the PKCS #11 DLL
99 */
100 dlerror(); /* clear any old error message not fetched */
101 #ifdef DEBUG
102 hModule = dlopen(libraryNameStr, RTLD_NOW);
103 #else
104 hModule = dlopen(libraryNameStr, RTLD_LAZY);
105 #endif /* DEBUG */
106
107 if (hModule == NULL) {
108 systemErrorMessage = dlerror();
109 exceptionMessage = (char *) malloc(sizeof(char) * (strlen(systemErrorMessage) + strlen(libraryNameStr) + 1));
110 if (exceptionMessage == NULL) {
111 throwOutOfMemoryError(env, 0);
112 return;
113 }
114 strcpy(exceptionMessage, systemErrorMessage);
115 strcat(exceptionMessage, libraryNameStr);
116 throwIOException(env, exceptionMessage);
117 (*env)->ReleaseStringUTFChars(env, jPkcs11ModulePath, libraryNameStr);
118 free(exceptionMessage);
119 return;
120 }
121
122 /*
123 * Get function pointer to C_GetFunctionList
124 */
125 dlerror(); /* clear any old error message not fetched */
126 // with the old JAR file jGetFunctionList is null, temporarily check for that
127 if (jGetFunctionList != NULL) {
128 getFunctionListStr = (*env)->GetStringUTFChars(env, jGetFunctionList, 0);
129 if (getFunctionListStr == NULL) {
130 return;
131 }
132 C_GetFunctionList = (CK_C_GetFunctionList) dlsym(hModule, getFunctionListStr);
133 (*env)->ReleaseStringUTFChars(env, jGetFunctionList, getFunctionListStr);
134 }
135 if (C_GetFunctionList == NULL) {
136 throwIOException(env, "ERROR: C_GetFunctionList == NULL");
137 return;
138 } else if ( (systemErrorMessage = dlerror()) != NULL ){
139 throwIOException(env, systemErrorMessage);
140 return;
141 }
142
143 /*
144 * Get function pointers to all PKCS #11 functions
145 */
146 moduleData = (ModuleData *) malloc(sizeof(ModuleData));
147 if (moduleData == NULL) {
148 dlclose(hModule);
149 throwOutOfMemoryError(env, 0);
150 return;
151 }
152 moduleData->hModule = hModule;
153 moduleData->applicationMutexHandler = NULL;
154 rv = (C_GetFunctionList)(&(moduleData->ckFunctionListPtr));
155 globalPKCS11ImplementationReference = (*env)->NewGlobalRef(env, obj);
156 putModuleEntry(env, globalPKCS11ImplementationReference, moduleData);
157
158 (*env)->ReleaseStringUTFChars(env, jPkcs11ModulePath, libraryNameStr);
159 TRACE0("FINISHED\n");
160
161 if(ckAssertReturnValueOK(env, rv) != CK_ASSERT_OK) { return; }
162 }
163
164 /*
165 * Class: sun_security_pkcs11_wrapper_PKCS11
166 * Method: disconnect
167 * Signature: ()V
168 */
169 JNIEXPORT void JNICALL Java_sun_security_pkcs11_wrapper_PKCS11_disconnect
170 (JNIEnv *env, jobject obj)
171 {
172 ModuleData *moduleData;
173 TRACE0("DEBUG: disconnecting module...");
174 moduleData = removeModuleEntry(env, obj);
175
176 if (moduleData != NULL) {
177 dlclose(moduleData->hModule);
178 }
179
180 free(moduleData);
181 TRACE0("FINISHED\n");
182
183 }