FreeCalypso > hg > fc-sim-tools
view simtool/bfsearch.c @ 99:97ba63d9361a
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 | ddd767f6e15b |
children |
line wrap: on
line source
/* * This module implements a brute force search of file ID space at a given * file system directory level. */ #include <sys/types.h> #include <ctype.h> #include <stdio.h> #include <stdlib.h> #include "simresp.h" #include "file_id.h" static parse_skip_ids(argv, array, total) char **argv; unsigned *array, total; { unsigned n; for (n = 0; n < total; n++) { if (!isxdigit(argv[n][0]) || !isxdigit(argv[n][1]) || !isxdigit(argv[n][2]) || !isxdigit(argv[n][3]) || argv[n][4]) { fprintf(stderr, "error: argument is not 4-digit hex\n"); return(-1); } array[n] = strtoul(argv[n], 0, 16); } return(0); } static void report_ef_struct(outf) FILE *outf; { unsigned total_size, record_len; fputs("EF, ", outf); total_size = (sim_resp_data[2] << 8) | sim_resp_data[3]; switch (sim_resp_data[13]) { case 0x00: fprintf(outf, "transparent, length %u\n", total_size); return; case 0x01: fputs("linear fixed, ", outf); break; case 0x03: fputs("cyclic, ", outf); break; default: fprintf(outf, "struct 0x%02X\n", sim_resp_data[13]); return; } if (sim_resp_data_len < 15) { fprintf(outf, "response struct cut off\n"); return; } record_len = sim_resp_data[14]; fprintf(outf, "record length %u", record_len); if (record_len && total_size % record_len == 0) fprintf(outf, ", %u records", total_size / record_len); putc('\n', outf); } cmd_bfsearch(argc, argv, outf) char **argv; FILE *outf; { unsigned skip_ids[8], num_skip_ids; unsigned bfs, n; int rc; num_skip_ids = argc - 1; rc = parse_skip_ids(argv + 1, skip_ids, num_skip_ids); if (rc < 0) return(rc); rc = elem_select_op(skip_ids[0]); if (rc < 0) return(rc); if (!rc) { fprintf(stderr, "error: starting file ID 0x%04X not found\n", skip_ids[0]); return(-1); } for (bfs = 0; bfs <= 0xFFFF; bfs++) { for (n = 0; n < num_skip_ids; n++) { if (bfs == skip_ids[n]) break; } if (n < num_skip_ids) continue; rc = elem_select_op(bfs); if (rc < 0) return(rc); if (!rc) continue; rc = get_response_op(); if (rc < 0) return(rc); fprintf(outf, "%04X: ", bfs); if (sim_resp_data_len < 14) fprintf(outf, "too-short response struct\n"); else { switch (sim_resp_data[6]) { case 0x01: fprintf(outf, "MF\n"); break; case 0x02: fprintf(outf, "DF\n"); break; case 0x04: report_ef_struct(outf); break; default: fprintf(outf, "unknown file type %02X\n", sim_resp_data[6]); } } rc = elem_select_op(skip_ids[0]); if (rc < 0) return(rc); if (!rc) { fprintf(stderr, "reselecting starting file ID 0x%04X not-found error\n", skip_ids[0]); return(-1); } } return(0); } static bfsearch_dir(path, pathlen, siblings, nsiblings, outf) unsigned *path, pathlen, *siblings, nsiblings; FILE *outf; { unsigned bfs, n; unsigned df_children[255], ndfc; unsigned childpath[8]; int rc; for (n = 0; n < pathlen; n++) { rc = elem_select_op(path[n]); if (rc < 0) return(rc); if (!rc) { fprintf(stderr, "error selecting 0x%04X: file not found\n", path[n]); return(-1); } } ndfc = 0; for (bfs = 0; bfs <= 0xFFFF; bfs++) { for (n = 0; n < pathlen; n++) { if (bfs == path[n]) break; } if (n < pathlen) continue; for (n = 0; n < nsiblings; n++) { if (bfs == siblings[n]) break; } if (n < nsiblings) continue; rc = elem_select_op(bfs); if (rc < 0) return(rc); if (!rc) continue; rc = get_response_op(); if (rc < 0) return(rc); for (n = 0; n < pathlen; n++) fprintf(outf, "%04X/", path[n]); fprintf(outf, "%04X: ", bfs); if (sim_resp_data_len < 14) fprintf(outf, "too-short response struct\n"); else { switch (sim_resp_data[6]) { case 0x01: fprintf(outf, "MF\n"); break; case 0x02: fprintf(outf, "DF\n"); if (ndfc < 255) df_children[ndfc++] = bfs; break; case 0x04: report_ef_struct(outf); break; default: fprintf(outf, "unknown file type %02X\n", sim_resp_data[6]); } } rc = elem_select_op(path[pathlen-1]); if (rc < 0) return(rc); if (!rc) { fprintf(stderr, "reselecting starting file ID 0x%04X not-found error\n", path[pathlen-1]); return(-1); } } if (pathlen >= 8) return(0); for (n = 0; n < pathlen; n++) childpath[n] = path[n]; for (n = 0; n < ndfc; n++) { childpath[pathlen] = df_children[n]; rc = bfsearch_dir(childpath, pathlen + 1, df_children, ndfc, outf); if (rc < 0) return(rc); } return(0); } cmd_bfsearch_full(argc, argv, outf) char **argv; FILE *outf; { unsigned initpath; initpath = FILEID_MF; return bfsearch_dir(&initpath, 1, &initpath, 1, outf); }