1 | #include "globals.h"
|
---|
2 | #include "reader-common.h"
|
---|
3 |
|
---|
4 | extern uchar cta_cmd[], cta_res[];
|
---|
5 | extern ushort cta_lr;
|
---|
6 |
|
---|
7 | #define CMD_LEN 5
|
---|
8 |
|
---|
9 | static unsigned int Conax_ToDate(char data0, char data1)
|
---|
10 | { /* decimal: yyyymmdd */
|
---|
11 | int y,m,d;
|
---|
12 | unsigned int l;
|
---|
13 |
|
---|
14 | y= 1990+ ((data1>>4) + ((data0>>5)&0x7)*10);
|
---|
15 | m= data1&0xf;
|
---|
16 | d= data0&0x1f;
|
---|
17 | l= (y*100+m)*100+d;
|
---|
18 | return l;
|
---|
19 | }
|
---|
20 |
|
---|
21 | static char *chid_date(uchar *ptr, char *buf, int l)
|
---|
22 | {
|
---|
23 | if (buf)
|
---|
24 | {
|
---|
25 | snprintf(buf, l, "%04d/%02d/%02d",
|
---|
26 | 1990+(ptr[1]>>4)+(((ptr[0]>>5)&7)*10), ptr[1]&0xf, ptr[0]&0x1f);
|
---|
27 | }
|
---|
28 | return(buf);
|
---|
29 | }
|
---|
30 |
|
---|
31 |
|
---|
32 | static int card_write(uchar *cmd, uchar *data, int wflag)
|
---|
33 | {
|
---|
34 | int l;
|
---|
35 | uchar buf[MAX_LEN];
|
---|
36 | memcpy(buf, cmd, CMD_LEN);
|
---|
37 | l=wflag ? cmd[4] : 0;
|
---|
38 | if (l && data) memcpy(buf+CMD_LEN, data, l);
|
---|
39 | l=reader_cmd2icc(buf, CMD_LEN+l);
|
---|
40 | return(l);
|
---|
41 | }
|
---|
42 |
|
---|
43 | #define write_cmd(cmd, data) \
|
---|
44 | { \
|
---|
45 | if (card_write(cmd, data, 1)) return(0); \
|
---|
46 | }
|
---|
47 |
|
---|
48 | #define read_cmd(cmd, data) \
|
---|
49 | { \
|
---|
50 | if (card_write(cmd, data, 0)) return(0); \
|
---|
51 | }
|
---|
52 |
|
---|
53 | static int read_record(uchar *cmd, uchar *data)
|
---|
54 | {
|
---|
55 | uchar insCA[] = {0xDD, 0xCA, 0x00, 0x00, 0x00};
|
---|
56 |
|
---|
57 | write_cmd(cmd, data); // select record
|
---|
58 | if (cta_res[0]!=0x98)
|
---|
59 | return(-1);
|
---|
60 | insCA[4]=cta_res[1]; // get len
|
---|
61 | read_cmd(insCA, NULL); // read record
|
---|
62 | if ((cta_res[cta_lr-2]!=0x90) || (cta_res[cta_lr-1]))
|
---|
63 | return(-1);
|
---|
64 | return(cta_lr-2);
|
---|
65 | }
|
---|
66 |
|
---|
67 | int conax_card_init(uchar *atr, int atrsize)
|
---|
68 | {
|
---|
69 | int i, j, n;
|
---|
70 | uchar atr_0b00[] = { '0', 'B', '0', '0' };
|
---|
71 | uchar ins26[] = {0xDD, 0x26, 0x00, 0x00, 0x03, 0x10, 0x01, 0x01};
|
---|
72 | // uchar ins82[] = {0xDD, 0x82, 0x00, 0x00, 0x14, 0x11, 0x12, 0x01, 0xB0, 0x0F, 0xFF, 0xFF, 0xDD, 0x00, 0x00, 0x09, 0x04, 0x0B, 0x00, 0xE0, 0x30, 0x1B, 0x64, 0x3D, 0xFE};
|
---|
73 | uchar ins82[]= {0xDD, 0x82, 0x00, 0x00, 0x10, 0x11, 0x0e, 0x01, 0xb0, 0x0f, 0xff, 0xff, 0xc5, 0x00, 0x00, 0x09, 0x04, 0x0b, 0x00, 0xe0, 0x30};
|
---|
74 | uchar cardver=0;
|
---|
75 |
|
---|
76 | if ((memcmp(atr+3, atr_0b00, sizeof(atr_0b00))) &&
|
---|
77 | (memcmp(atr+4, atr_0b00, sizeof(atr_0b00))))
|
---|
78 | return(0);
|
---|
79 |
|
---|
80 | reader[ridx].caid[0]=0xB00;
|
---|
81 |
|
---|
82 | if ((n=read_record(ins26, ins26+5))<0) return(0); // read caid, card-version
|
---|
83 | for (i=0; i<n; i+=cta_res[i+1]+2)
|
---|
84 | switch(cta_res[i])
|
---|
85 | {
|
---|
86 | case 0x20: cardver=cta_res[i+2]; break;
|
---|
87 | case 0x28: reader[ridx].caid[0]=(cta_res[i+2]<<8)|cta_res[i+3];
|
---|
88 | }
|
---|
89 |
|
---|
90 | if ((n=read_record(ins82, ins82+5))<0) return(0); // read serial
|
---|
91 | for (j=0, i=2; i<n; i+=cta_res[i+1]+2)
|
---|
92 | switch(cta_res[i])
|
---|
93 | {
|
---|
94 | case 0x23: if (!j) memcpy(reader[ridx].hexserial, &cta_res[i+3], 6);
|
---|
95 | j++;
|
---|
96 | }
|
---|
97 |
|
---|
98 | cs_ri_log("type: conax, caid: %04X, serial: %llu, card: v%d",
|
---|
99 | reader[ridx].caid[0], b2ll(6, reader[ridx].hexserial), cardver);
|
---|
100 | cs_log("ready for requests");
|
---|
101 | return(1);
|
---|
102 | }
|
---|
103 |
|
---|
104 | int conax_do_ecm(ECM_REQUEST *er)
|
---|
105 | {
|
---|
106 | int i, n, rc=0;
|
---|
107 | unsigned char insA2[] = { 0xDD,0xA2,0x00,0x00,0x00 };
|
---|
108 | unsigned char insCA[] = { 0xDD,0xCA,0x00,0x00,0x00 };
|
---|
109 | unsigned char buf[256];
|
---|
110 |
|
---|
111 | if ((n=CheckSctLen(er->ecm, 3))<0)
|
---|
112 | return(0);
|
---|
113 | buf[0]=0x14;
|
---|
114 | buf[1]=n+1;
|
---|
115 | buf[2]=0;
|
---|
116 | memcpy(buf+3, er->ecm, n);
|
---|
117 | insA2[4]=n+3;
|
---|
118 | write_cmd(insA2, buf);
|
---|
119 | while ((cta_res[cta_lr-2]==0x98) &&
|
---|
120 | ((insCA[4]=cta_res[cta_lr-1])>0) && (insCA[4]!=0xFF))
|
---|
121 | {
|
---|
122 | read_cmd(insCA, NULL);
|
---|
123 | if ((cta_res[cta_lr-2]==0x98) ||
|
---|
124 | ((cta_res[cta_lr-2]==0x90) && (!cta_res[cta_lr-1])))
|
---|
125 | {
|
---|
126 | for(i=0; i<cta_lr-2; i+=cta_res[i+1]+2)
|
---|
127 | if ((cta_res[i]==0x25) && // access: is cw
|
---|
128 | (cta_res[i+1]>=0xD) && // 0xD: 5 header + 8 cw
|
---|
129 | !((n=cta_res[i+4])&0xFE)) // cw idx must be 0 or 1
|
---|
130 | {
|
---|
131 | rc|=(1<<n);
|
---|
132 | memcpy(er->cw+(n<<3), cta_res+i+7, 8);
|
---|
133 | }
|
---|
134 | }
|
---|
135 | }
|
---|
136 | return(rc==3);
|
---|
137 | }
|
---|
138 |
|
---|
139 | int conax_do_emm(EMM_PACKET *ep)
|
---|
140 | {
|
---|
141 | int rc=0;
|
---|
142 | return(rc);
|
---|
143 | }
|
---|
144 |
|
---|
145 | int conax_card_info(void)
|
---|
146 | {
|
---|
147 | int type, i, j, k, n=0;
|
---|
148 | ushort provid;
|
---|
149 | char provname[32], pdate[32];
|
---|
150 | uchar insC6[] = {0xDD, 0xC6, 0x00, 0x00, 0x03, 0x1C, 0x01, 0x00};
|
---|
151 | uchar ins26[] = {0xDD, 0x26, 0x00, 0x00, 0x03, 0x1C, 0x01, 0x01};
|
---|
152 | uchar insCA[] = {0xDD, 0xCA, 0x00, 0x00, 0x00};
|
---|
153 | char *txt[] = { "provider", "ppvevent" };
|
---|
154 | uchar *cmd[] = { insC6, ins26 };
|
---|
155 |
|
---|
156 | for (type=0; type<2; type++)
|
---|
157 | {
|
---|
158 | n=0;
|
---|
159 | write_cmd(cmd[type], cmd[type]+5);
|
---|
160 | while (cta_res[cta_lr-2]==0x98)
|
---|
161 | {
|
---|
162 | insCA[4]=cta_res[1]; // get len
|
---|
163 | read_cmd(insCA, NULL); // read
|
---|
164 | if ((cta_res[cta_lr-2]==0x90) || (cta_res[cta_lr-2]==0x98))
|
---|
165 | {
|
---|
166 | for (j=0; j<cta_lr-2; j+=cta_res[j+1]+2)
|
---|
167 | {
|
---|
168 | provid=(cta_res[j+2+type]<<8) | cta_res[j+3+type];
|
---|
169 | for (k=0, i=j+4+type; (i<j+cta_res[j+1]) && (k<2); i+=cta_res[i+1]+2)
|
---|
170 | {
|
---|
171 | int l;
|
---|
172 | switch(cta_res[i])
|
---|
173 | {
|
---|
174 | case 0x01: l=(cta_res[i+1]<(sizeof(provname)-1)) ?
|
---|
175 | cta_res[i+1] : sizeof(provname)-1;
|
---|
176 | memcpy(provname, cta_res+i+2, l);
|
---|
177 | provname[l]='\0';
|
---|
178 | break;
|
---|
179 | case 0x30: chid_date(cta_res+i+2, pdate+(k++<<4), 15);
|
---|
180 | break;
|
---|
181 | }
|
---|
182 | }
|
---|
183 | cs_ri_log("%s: %d, id: %04X, date: %s - %s, name: %s",
|
---|
184 | txt[type], ++n, provid, pdate, pdate+16, trim(provname));
|
---|
185 | }
|
---|
186 | }
|
---|
187 | }
|
---|
188 | }
|
---|
189 | return(1);
|
---|
190 | }
|
---|