1 /* destroyobj [-s $slot] [-i $id | -l $label] [-p $pin] */
11 #include <security/cryptoki.h>
12 #include <security/pkcs11.h>
14 #include <opencryptoki/pkcs11.h>
18 main(int argc, char *argv[])
22 CK_SESSION_HANDLE hSession;
23 CK_UTF8CHAR *pin = NULL;
25 CK_OBJECT_HANDLE akey[50];
30 CK_ULONG ulObjectCount;
31 CK_ATTRIBUTE search_template[] = {
32 {CKA_ID, &attr_id, sizeof(attr_id)}
37 while ((c = getopt(argc, argv, ":s:i:l:p:")) != -1) {
50 pin = (CK_UTF8CHAR *)optarg;
53 fprintf(stderr, "Option -%c requires an operand\n", optopt);
58 fprintf(stderr, "Unrecognised option: -%c\n", optopt);
62 if (errflg || ((!id) && (!label))) {
64 "usage: destroykey [-s slot] [-i id | -l label] [-p pin]\n");
68 printf("id %i\n", id);
69 attr_id[0] = (id >> 8) & 0xff;
70 attr_id[1] = id & 0xff;
72 printf("label %s\n", label);
73 search_template[0].type = CKA_LABEL;
74 search_template[0].pValue = label;
75 search_template[0].ulValueLen = strlen(label);
78 /* Initialize the CRYPTOKI library */
79 rv = C_Initialize(NULL_PTR);
81 fprintf(stderr, "C_Initialize: Error = 0x%.8X\n", rv);
85 /* Open a session on the slot found */
86 rv = C_OpenSession(slot, CKF_RW_SESSION+CKF_SERIAL_SESSION,
87 NULL_PTR, NULL_PTR, &hSession);
89 fprintf(stderr, "C_OpenSession: Error = 0x%.8X\n", rv);
94 /* Login to the Token (Keystore) */
97 pin = (CK_UTF8CHAR *)getpassphrase("Enter Pin: ");
99 pin = (CK_UTF8CHAR *)getpass("Enter Pin: ");
101 rv = C_Login(hSession, CKU_USER, pin, strlen((char *)pin));
102 memset(pin, 0, strlen((char *)pin));
104 fprintf(stderr, "C_Login: Error = 0x%.8X\n", rv);
109 rv = C_FindObjectsInit(hSession, search_template,
110 ((id != 0) || (label != NULL)) ? 1 : 0);
112 fprintf(stderr, "C_FindObjectsInit: Error = 0x%.8X\n", rv);
117 rv = C_FindObjects(hSession, akey, 50, &ulObjectCount);
119 fprintf(stderr, "C_FindObjects: Error = 0x%.8X\n", rv);
124 for (i = 0; i < ulObjectCount; i++) {
125 CK_OBJECT_CLASS oclass = 0;
126 CK_BYTE labelbuf[64 + 1];
128 CK_ATTRIBUTE attr_template[] = {
129 {CKA_CLASS, &oclass, sizeof(oclass)},
130 {CKA_LABEL, labelbuf, sizeof(labelbuf) - 1},
131 {CKA_ID, idbuf, sizeof(idbuf)}
135 memset(labelbuf, 0, sizeof(labelbuf));
136 memset(idbuf, 0, sizeof(idbuf));
138 rv = C_GetAttributeValue(hSession, akey[i], attr_template, 3);
140 fprintf(stderr, "C_GetAttributeValue[%d]: rv = 0x%.8X\n", i, rv);
144 len = attr_template[2].ulValueLen;
145 printf("object[%d]: class %d label '%s' id[%u] ",
146 i, oclass, labelbuf, attr_template[2].ulValueLen);
149 for (j = 0; j < len; j++)
150 printf("%02x", idbuf[j]);
151 if (attr_template[2].ulValueLen > len)
157 /* give a chance to kill this */
158 printf("sleeping 5 seconds...\n");
161 for (i = 0; i < ulObjectCount; i++) {
162 rv = C_DestroyObject(hSession, akey[i]);
164 fprintf(stderr, "C_DestroyObject[%d]: rv = 0x%.8X\n", i, rv);
170 rv = C_FindObjectsFinal(hSession);
172 fprintf(stderr, "C_FindObjectsFinal: Error = 0x%.8X\n", rv);
177 (void) C_CloseSession(hSession);
180 (void) C_Finalize(NULL_PTR);