FreeCalypso > hg > fc-sim-tools

annotate pcsc/context.c @ 99:97ba63d9361a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
scripts/fcsim1-sst: turn off STK & OTA services In the initial unprogrammed state of the cards from Grcard, SST has services 25 through 29 set to allocated and activated. However, these cards appear to not actually support OTA, ENVELOPE commands do nothing (just return SW 9000), and they were never observed issuing any proactive SIM commands, even after a feature-generous TERMINAL PROFILE. Therefore, let's list these STK & OTA services as allocated, but not activated in our FCSIM1 SST.
author Mychaela Falconia <falcon@freecalypso.org>
date Wed, 05 May 2021 04:26:07 +0000
parents f4479a0d4cea
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
1 #include <stdio.h>
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
2 #include <stdlib.h>
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
3 #include <pcsclite.h>
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
4 #include <winscard.h>
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
5
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
6 SCARDCONTEXT hContext;
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
7 char *reader_list;
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
8
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
9 setup_pcsc_context()
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
10 {
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
11 LONG rv;
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
12
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
13 rv = SCardEstablishContext(SCARD_SCOPE_SYSTEM, NULL, NULL, &hContext);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
14 if (rv != SCARD_S_SUCCESS) {
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
15 fprintf(stderr, "SCardEstablishContext: %s\n",
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
16 pcsc_stringify_error(rv));
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
17 exit(1);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
18 }
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
19 return(0);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
20 }
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
21
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
22 get_reader_list()
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
23 {
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
24 LONG rv;
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
25 DWORD dwReaders;
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
26
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
27 rv = SCardListReaders(hContext, NULL, NULL, &dwReaders);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
28 if (rv != SCARD_S_SUCCESS) {
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
29 fprintf(stderr, "SCardListReaders 1st call: %s\n",
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
30 pcsc_stringify_error(rv));
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
31 SCardReleaseContext(hContext);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
32 exit(1);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
33 }
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
34 if (dwReaders < 1) {
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
35 fprintf(stderr,
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
36 "error: dwReaders returned by SCardListReaders() is less than 1\n");
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
37 SCardReleaseContext(hContext);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
38 exit(1);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
39 }
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
40 reader_list = malloc(dwReaders);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
41 if (!reader_list) {
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
42 perror("malloc for readers list");
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
43 SCardReleaseContext(hContext);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
44 exit(1);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
45 }
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
46 reader_list[0] = '\0';
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
47 rv = SCardListReaders(hContext, NULL, reader_list, &dwReaders);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
48 if (rv != SCARD_S_SUCCESS) {
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
49 fprintf(stderr, "SCardListReaders 2nd call: %s\n",
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
50 pcsc_stringify_error(rv));
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
51 SCardReleaseContext(hContext);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
52 exit(1);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
53 }
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
54 return(0);
f4479a0d4cea fc-pcsc-list ported over
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
55 }