134 lines
3.0 KiB
C
134 lines
3.0 KiB
C
/* Copyright (C) 2001 Juha Yrjölä <juha.yrjola@iki.fi>
|
|
* All rights reserved.
|
|
*
|
|
* PKCS#15 PIN code test
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#include "libopensc/internal.h"
|
|
#include "libopensc/opensc.h"
|
|
#include "libopensc/pkcs15.h"
|
|
#include "common/compat_getpass.h"
|
|
#include "sc-test.h"
|
|
|
|
static struct sc_pkcs15_card *p15card;
|
|
|
|
static int enum_pins(struct sc_pkcs15_object ***ret)
|
|
{
|
|
struct sc_pkcs15_object **objs;
|
|
int i, n;
|
|
|
|
n = sc_pkcs15_get_objects(p15card, SC_PKCS15_TYPE_AUTH_PIN, NULL, 0);
|
|
if (n < 0) {
|
|
fprintf(stderr, "Error enumerating PIN codes: %s\n",
|
|
sc_strerror(n));
|
|
return 1;
|
|
}
|
|
if (n == 0) {
|
|
fprintf(stderr, "No PIN codes found!\n");
|
|
return 0;
|
|
}
|
|
objs = calloc(n, sizeof(*objs));
|
|
if (!objs) {
|
|
fprintf(stderr, "Not enough memory!\n");
|
|
return 1;
|
|
}
|
|
if (0 > sc_pkcs15_get_objects(p15card, SC_PKCS15_TYPE_AUTH_PIN, objs, n)) {
|
|
fprintf(stderr, "Error enumerating PIN codes\n");
|
|
free(objs);
|
|
return 1;
|
|
}
|
|
for (i = 0; i < n; i++) {
|
|
sc_test_print_object(objs[i]);
|
|
}
|
|
*ret = objs;
|
|
return n;
|
|
}
|
|
|
|
static int ask_and_verify_pin(struct sc_pkcs15_object *pin_obj)
|
|
{
|
|
struct sc_pkcs15_auth_info *pin_info = (struct sc_pkcs15_auth_info *) pin_obj->data;
|
|
int i = 0;
|
|
char prompt[(sizeof pin_obj->label) + 30];
|
|
u8 *pass;
|
|
|
|
if (pin_info->attrs.pin.flags & SC_PKCS15_PIN_FLAG_UNBLOCKING_PIN) {
|
|
printf("Skipping unblocking pin [%.*s]\n", (int) sizeof pin_obj->label, pin_obj->label);
|
|
return 0;
|
|
}
|
|
|
|
snprintf(prompt, sizeof(prompt), "Please enter PIN code [%.*s]: ",
|
|
(int) sizeof pin_obj->label, pin_obj->label);
|
|
pass = (u8 *) getpass(prompt);
|
|
|
|
if (SC_SUCCESS != sc_lock(card))
|
|
return 1;
|
|
i = sc_pkcs15_verify_pin(p15card, pin_obj, pass, strlen((char *) pass));
|
|
if (SC_SUCCESS != sc_unlock(card))
|
|
return 1;
|
|
if (i) {
|
|
if (i == SC_ERROR_PIN_CODE_INCORRECT)
|
|
fprintf(stderr,
|
|
"Incorrect PIN code (%d tries left)\n",
|
|
pin_info->tries_left);
|
|
else
|
|
fprintf(stderr,
|
|
"PIN verifying failed: %s\n",
|
|
sc_strerror(i));
|
|
return 1;
|
|
} else
|
|
printf("PIN code correct.\n");
|
|
|
|
return 0;
|
|
}
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
struct sc_pkcs15_object **objs = NULL;
|
|
int i, count;
|
|
|
|
i = sc_test_init(&argc, argv);
|
|
if (i < 0)
|
|
return 1;
|
|
if (card->reader->capabilities & SC_READER_CAP_PIN_PAD)
|
|
printf("Slot is capable of doing pinpad operations!\n");
|
|
printf("Looking for a PKCS#15 compatible Smart Card... ");
|
|
fflush(stdout);
|
|
if (SC_SUCCESS != sc_lock(card))
|
|
return 1;
|
|
i = sc_pkcs15_bind(card, NULL, &p15card);
|
|
if (SC_SUCCESS != sc_unlock(card))
|
|
return 1;
|
|
if (i) {
|
|
fprintf(stderr, "failed: %s\n", sc_strerror(i));
|
|
sc_test_cleanup();
|
|
return 1;
|
|
}
|
|
printf("found.\n");
|
|
printf("Enumerating PIN codes...\n");
|
|
if (SC_SUCCESS != sc_lock(card))
|
|
return 1;
|
|
count = enum_pins(&objs);
|
|
if (SC_SUCCESS != sc_unlock(card))
|
|
return 1;
|
|
if (count < 0) {
|
|
sc_pkcs15_unbind(p15card);
|
|
sc_test_cleanup();
|
|
return 1;
|
|
}
|
|
for (i = 0; i < count; i++) {
|
|
ask_and_verify_pin(objs[i]);
|
|
}
|
|
sc_pkcs15_unbind(p15card);
|
|
sc_test_cleanup();
|
|
return 0;
|
|
}
|