Rev 81 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 81 | Rev 83 | ||
---|---|---|---|
1 | 1 | ||
2 | 2 | ||
- | 3 | // sudo ./pts -a 0x1000000 -v 1 -w 2 turn LED ON |
|
- | 4 | // sudo ./pts -a 0x1000000 -v 1 -w 1 turn LED OFF |
|
- | 5 | // sudo ./ptsvmusb -a 0x02501000 -v 2 -i a.bit -b 2 |
|
- | 6 | #include <stdlib.h> |
|
- | 7 | #include <stdio.h> |
|
- | 8 | #include <stdint.h> |
|
- | 9 | #include <ctype.h> |
|
- | 10 | ||
- | 11 | #include <string.h> |
|
- | 12 | ||
- | 13 | #include "vme.h" |
|
3 | 14 | ||
4 | #include <cvirte.h> |
15 | #include <cvirte.h> |
5 | 16 | ||
6 | #include "PtsModule.h" |
17 | #include "PtsModule.h" |
7 | #include <userint.h> |
18 | #include <userint.h> |
8 | #include "PtsModule_CVI.h" |
19 | #include "PtsModule_CVI.h" |
9 | #include <utility.h> |
20 | #include <utility.h> |
10 | #include <formatio.h> |
21 | #include <formatio.h> |
11 | static int p1; |
22 | static int p1; |
12 | 23 | ||
13 | // sudo ./pts -a 0x1000000 -v 1 -w 2 turn LED ON |
- | |
14 | // sudo ./pts -a 0x1000000 -v 1 -w 1 turn LED OFF |
- | |
15 | // sudo ./ptsvmusb -a 0x02501000 -v 2 -i a.bit -b 2 |
- | |
16 | #include <stdlib.h> |
- | |
17 | #include <stdio.h> |
- | |
18 | - | ||
19 | #include <ctype.h> |
- | |
20 | - | ||
21 | #include <string.h> |
- | |
22 | 24 | ||
23 | #include "vme.h" |
- | |
24 | 25 | ||
25 | 26 | ||
26 | 27 | ||
27 | 28 | ||
28 | 29 | ||
29 | 30 | ||
30 | int verbose; |
31 | int verbose; |
31 | uint32_t ptaddr=0; |
32 | uint32_t ptaddr=0; |
32 | char str[255]; |
33 | char str[255]; |
33 | 34 | ||
34 | int Pts_write(uint32_t addr, uint32_t data ){ |
35 | int Pts_write(uint32_t addr, uint32_t data ){ |
35 | int i; |
36 | int i; |
36 | VME_A32D32_W(ptaddr+addr,data); |
37 | VME_A32D32_W(ptaddr+addr,data); |
37 | return 0; |
38 | return 0; |
38 | } |
39 | } |
39 | 40 | ||
40 | int Pts_Mwrite(uint32_t addr, uint32_t data ){ |
41 | int Pts_Mwrite(uint32_t addr, uint32_t data ){ |
41 | int i; |
42 | int i; |
42 | VME_MW(VME_A32, VME_D32, ptaddr+addr,data); |
43 | VME_MW(VME_A32, VME_D32, ptaddr+addr,data); |
43 | return 0; |
44 | return 0; |
44 | } |
45 | } |
45 | 46 | ||
46 | int Pts_read(uint32_t addr, uint32_t *data ){ |
47 | int Pts_read(uint32_t addr, uint32_t *data ){ |
47 | VME_A32D32_R(ptaddr+addr,data); |
48 | VME_A32D32_R(ptaddr+addr,data); |
48 | return 0; |
49 | return 0; |
49 | } |
50 | } |
50 | 51 | ||
51 | 52 | ||
52 | int Pts_erase( int verbose ) { |
53 | int Pts_erase( int verbose ) { |
53 | uint32_t dum; |
54 | uint32_t dum; |
54 | 55 | ||
55 | Pts_write( ADR_CSR1, 0 ); |
56 | Pts_write( ADR_CSR1, 0 ); |
56 | Delay(0.1); |
57 | Delay(0.1); |
57 | Pts_read( ADR_CSR1, &dum); |
58 | Pts_read( ADR_CSR1, &dum); |
58 | if( verbose ) { |
59 | if( verbose ) { |
59 | sprintf(str, "CSR1(0x%02x) = 0x%04x\n", ADR_CSR1,dum & 0xffff ); |
60 | sprintf(str, "CSR1(0x%02x) = 0x%04x\n", ADR_CSR1,dum & 0xffff ); |
60 | SetCtrlVal (p1, P1_RESPONSE, str); |
61 | SetCtrlVal (p1, P1_RESPONSE, str); |
61 | } |
62 | } |
62 | Pts_write( ADR_CSR1, CSR1_PROGRAM_ ); |
63 | Pts_write( ADR_CSR1, CSR1_PROGRAM_ ); |
63 | Delay(0.1); |
64 | Delay(0.1); |
64 | Pts_read( ADR_CSR1, &dum); |
65 | Pts_read( ADR_CSR1, &dum); |
65 | if( verbose ) { |
66 | if( verbose ) { |
66 | sprintf( str, "CSR1(0x%02x) = 0x%04x\n", ADR_CSR1, dum & 0xffff ); |
67 | sprintf( str, "CSR1(0x%02x) = 0x%04x\n", ADR_CSR1, dum & 0xffff ); |
67 | SetCtrlVal (p1, P1_RESPONSE, str); |
68 | SetCtrlVal (p1, P1_RESPONSE, str); |
68 | } |
69 | } |
69 | return 1; |
70 | return 1; |
70 | } |
71 | } |
71 | 72 | ||
72 | int Pts_configure_bit( const char *filename, int mode, int verbose ) { |
73 | int Pts_configure_bit( const char *filename, int mode, int verbose ) { |
73 | int c,j; |
74 | int c,j; |
74 | int dummyword; |
75 | int dummyword; |
75 | FILE *fp; |
76 | FILE *fp; |
76 | const long byte_per_dot = BYTE_PER_DOT; |
77 | const long byte_per_dot = BYTE_PER_DOT; |
77 | unsigned long nchar = 0; |
78 | unsigned long nchar = 0; |
78 | 79 | ||
79 | if( ( fp = fopen( filename, "rb" ) ) == NULL ) { |
80 | if( ( fp = fopen( filename, "rb" ) ) == NULL ) { |
80 | if( verbose ) { |
81 | if( verbose ) { |
81 | sprintf( str, "cannot open \"%s\"\n", filename ); |
82 | sprintf( str, "cannot open \"%s\"\n", filename ); |
82 | SetCtrlVal (p1, P1_RESPONSE, str); |
83 | SetCtrlVal (p1, P1_RESPONSE, str); |
83 | } |
84 | } |
84 | return -1; |
85 | return -1; |
85 | } |
86 | } |
86 | if(verbose) sprintf( str, "file \"%s\" opened.\n", filename ); |
87 | if(verbose) sprintf( str, "file \"%s\" opened.\n", filename ); |
87 | 88 | ||
88 | /* ------------------------------------------------------------ *\ |
89 | /* ------------------------------------------------------------ *\ |
89 | The data for the configuration start from 0xffff_ffff_aa99_aa66 |
90 | The data for the configuration start from 0xffff_ffff_aa99_aa66 |
90 | ( cf. xapp138; we don't know the definition of the BIT file ) |
91 | ( cf. xapp138; we don't know the definition of the BIT file ) |
91 | \* ------------------------------------------------------------ */ |
92 | \* ------------------------------------------------------------ */ |
92 | dummyword = 0; |
93 | dummyword = 0; |
93 | do{ |
94 | do{ |
94 | if( (c = getc( fp )) == EOF ) { |
95 | if( (c = getc( fp )) == EOF ) { |
95 | if(verbose) { |
96 | if(verbose) { |
96 | sprintf(str, "EOF detected. Exit.\n"); |
97 | sprintf(str, "EOF detected. Exit.\n"); |
97 | 98 | ||
98 | SetCtrlVal (p1, P1_RESPONSE, str); |
99 | SetCtrlVal (p1, P1_RESPONSE, str); |
99 | } |
100 | } |
100 | return -1; |
101 | return -1; |
101 | } |
102 | } |
102 | (c == 0xff) ? dummyword++ : (dummyword=0); |
103 | (c == 0xff) ? dummyword++ : (dummyword=0); |
103 | } while( dummyword < 4 ); |
104 | } while( dummyword < 4 ); |
104 | 105 | ||
105 | if( mode == SLAVESERIAL_MODE ) { |
106 | if( mode == SLAVESERIAL_MODE ) { |
106 | if(verbose) SetCtrlVal(p1,P1_RESPONSE,"slave serial mode"); |
107 | if(verbose) SetCtrlVal(p1,P1_RESPONSE,"slave serial mode"); |
107 | Pts_write( ADR_MODE, mode ); |
108 | Pts_write( ADR_MODE, mode ); |
108 | Pts_erase( verbose ); |
109 | Pts_erase( verbose ); |
109 | for( j=0; j<32; j++ ) Pts_write( ADR_CFG, 0x1 ); |
110 | for( j=0; j<32; j++ ) Pts_write( ADR_CFG, 0x1 ); |
110 | while( (c=getc(fp))!=EOF ){ |
111 | while( (c=getc(fp))!=EOF ){ |
111 | for( j=0; j<8; j++ ) Pts_write( ADR_CFG, (c>>(7-j))&0x1 ); |
112 | for( j=0; j<8; j++ ) Pts_write( ADR_CFG, (c>>(7-j))&0x1 ); |
112 | nchar++; |
113 | nchar++; |
113 | if( verbose && nchar%byte_per_dot==0 ) { |
114 | if( verbose && nchar%byte_per_dot==0 ) { |
114 | sprintf( str,"#"); |
115 | sprintf( str,"#"); |
115 | SetCtrlVal(p1,P1_RESPONSE,str); |
116 | SetCtrlVal(p1,P1_RESPONSE,str); |
116 | } |
117 | } |
117 | } |
118 | } |
118 | } else if( mode == SELECTMAP_MODE ) { |
119 | } else if( mode == SELECTMAP_MODE ) { |
119 | if( verbose ) SetCtrlVal(p1,P1_RESPONSE,"select map mode\n"); |
120 | if( verbose ) SetCtrlVal(p1,P1_RESPONSE,"select map mode\n"); |
120 | Pts_write( ADR_MODE, SELECTMAP_MODE ); |
121 | Pts_write( ADR_MODE, SELECTMAP_MODE ); |
121 | Pts_erase( verbose ); |
122 | Pts_erase( verbose ); |
122 | VME_MWRST(); |
123 | VME_MWRST(); |
123 | for( j=0; j<4; j++ ) Pts_Mwrite( ADR_CFG, 0xff ); |
124 | for( j=0; j<4; j++ ) Pts_Mwrite( ADR_CFG, 0xff ); |
124 | VME_MWEXEC(); |
125 | VME_MWEXEC(); |
125 | 126 | ||
126 | VME_MWRST(); |
127 | VME_MWRST(); |
127 | while( (c=getc(fp))!=EOF ){ |
128 | while( (c=getc(fp))!=EOF ){ |
128 | int cc = 0; |
129 | int cc = 0; |
129 | for(j=0; j<8; j++) cc |= ((c&(1<<j))>>j)<<(7-j); |
130 | for(j=0; j<8; j++) cc |= ((c&(1<<j))>>j)<<(7-j); |
130 | Pts_Mwrite( ADR_CFG, cc ); |
131 | Pts_Mwrite( ADR_CFG, cc ); |
131 | nchar++; |
132 | nchar++; |
132 | if( verbose && nchar%byte_per_dot==0 ){ |
133 | if( verbose && nchar%byte_per_dot==0 ){ |
133 | VME_MWEXEC(); |
134 | VME_MWEXEC(); |
134 | VME_MWRST(); |
135 | VME_MWRST(); |
135 | sprintf( str,"#"); |
136 | sprintf( str,"#"); |
136 | SetCtrlVal(p1,P1_RESPONSE,str); |
137 | SetCtrlVal(p1,P1_RESPONSE,str); |
137 | } |
138 | } |
138 | } |
139 | } |
139 | VME_MWEXEC(); |
140 | VME_MWEXEC(); |
140 | } else { |
141 | } else { |
141 | if(verbose) { |
142 | if(verbose) { |
142 | sprintf(str, "\nIllegal mode\n"); |
143 | sprintf(str, "\nIllegal mode\n"); |
143 | SetCtrlVal(p1,P1_RESPONSE,str); |
144 | SetCtrlVal(p1,P1_RESPONSE,str); |
144 | } |
145 | } |
145 | return -1; |
146 | return -1; |
146 | } |
147 | } |
147 | if(verbose) { |
148 | if(verbose) { |
148 | sprintf(str,"\ntotal %ld bits\n", nchar); |
149 | sprintf(str,"\ntotal %ld bits\n", nchar); |
149 | 150 | ||
150 | SetCtrlVal(p1,P1_RESPONSE,str); |
151 | SetCtrlVal(p1,P1_RESPONSE,str); |
151 | } |
152 | } |
152 | fclose(fp); |
153 | fclose(fp); |
153 | return Pts_check_configure( verbose ); |
154 | return Pts_check_configure( verbose ); |
154 | } |
155 | } |
155 | 156 | ||
156 | int Pts_check_configure( int verbose ) { |
157 | int Pts_check_configure( int verbose ) { |
157 | uint32_t csr1_value; |
158 | uint32_t csr1_value; |
158 | Pts_read(ADR_CSR1,&csr1_value); |
159 | Pts_read(ADR_CSR1,&csr1_value); |
159 | if(verbose) { |
160 | if(verbose) { |
160 | sprintf( str,"CSR1(0x%02x)=0x%04x\n",ADR_CSR1,csr1_value&0xffff); |
161 | sprintf( str,"CSR1(0x%02x)=0x%04x\n",ADR_CSR1,csr1_value&0xffff); |
161 | 162 | ||
162 | SetCtrlVal(p1,P1_RESPONSE,str); |
163 | SetCtrlVal(p1,P1_RESPONSE,str); |
163 | } |
164 | } |
164 | if(csr1_value&CSR1_DONE) { |
165 | if(csr1_value&CSR1_DONE) { |
165 | if(verbose) SetCtrlVal(p1,P1_RESPONSE, "configure complete.\n"); |
166 | if(verbose) SetCtrlVal(p1,P1_RESPONSE, "configure complete.\n"); |
166 | return 1; |
167 | return 1; |
167 | } else { |
168 | } else { |
168 | if(verbose) SetCtrlVal(p1,P1_RESPONSE,"configure not complete."); |
169 | if(verbose) SetCtrlVal(p1,P1_RESPONSE,"configure not complete."); |
169 | return -1; |
170 | return -1; |
170 | } |
171 | } |
171 | } |
172 | } |
172 | 173 | ||
173 | int Pts_reset( int verbose ) { |
174 | int Pts_reset( int verbose ) { |
174 | Pts_write(ADR_CSR0,1); |
175 | Pts_write(ADR_CSR0,1); |
175 | if( verbose ) { |
176 | if( verbose ) { |
176 | sprintf( str, "CSR0(0x%02x) = 0x01\n", ADR_CSR0 ); |
177 | sprintf( str, "CSR0(0x%02x) = 0x01\n", ADR_CSR0 ); |
177 | SetCtrlVal(p1,P1_RESPONSE,str); |
178 | SetCtrlVal(p1,P1_RESPONSE,str); |
178 | } |
179 | } |
179 | return 1; |
180 | return 1; |
180 | } |
181 | } |
181 | 182 | ||
182 | int Pts_write_csr( int verbose, uint32_t value ) { |
183 | int Pts_write_csr( int verbose, uint32_t value ) { |
183 | Pts_write(ADR_CSR0,value); |
184 | Pts_write(ADR_CSR0,value); |
184 | if( verbose ) { |
185 | if( verbose ) { |
185 | sprintf( str,"Pts_write_csr 0x%08x\n", value ); |
186 | sprintf( str,"Pts_write_csr 0x%08x\n", value ); |
186 | SetCtrlVal(p1,P1_RESPONSE,str); |
187 | SetCtrlVal(p1,P1_RESPONSE,str); |
187 | } |
188 | } |
188 | return 1; |
189 | return 1; |
189 | } |
190 | } |
190 | 191 | ||
191 | 192 | ||
192 | void help(char *argv){ |
193 | void help(char *argv){ |
193 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -c .... Pts_check_configure\n", argv); |
194 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -c .... Pts_check_configure\n", argv); |
194 | SetCtrlVal(p1,P1_RESPONSE,str); |
195 | SetCtrlVal(p1,P1_RESPONSE,str); |
195 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -i filename -b mode (2) ... Pts_configure_bit\n", argv); |
196 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -i filename -b mode (2) ... Pts_configure_bit\n", argv); |
196 | SetCtrlVal(p1,P1_RESPONSE,str); |
197 | SetCtrlVal(p1,P1_RESPONSE,str); |
197 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -e .... Pts_erase\n", argv); |
198 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -e .... Pts_erase\n", argv); |
198 | SetCtrlVal(p1,P1_RESPONSE,str); |
199 | SetCtrlVal(p1,P1_RESPONSE,str); |
199 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -x .... Pts_reset\n", argv); |
200 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -x .... Pts_reset\n", argv); |
200 | SetCtrlVal(p1,P1_RESPONSE,str); |
201 | SetCtrlVal(p1,P1_RESPONSE,str); |
201 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -c .... Pts_check_configure\n", argv); |
202 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -c .... Pts_check_configure\n", argv); |
202 | SetCtrlVal(p1,P1_RESPONSE,str); |
203 | SetCtrlVal(p1,P1_RESPONSE,str); |
203 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -r .... vme read\n", argv); |
204 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -r .... vme read\n", argv); |
204 | SetCtrlVal(p1,P1_RESPONSE,str); |
205 | SetCtrlVal(p1,P1_RESPONSE,str); |
205 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -w value .... vme write\n", argv); |
206 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -w value .... vme write\n", argv); |
206 | SetCtrlVal(p1,P1_RESPONSE,str); |
207 | SetCtrlVal(p1,P1_RESPONSE,str); |
207 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -s value .... Pts_write_csr\n", argv); |
208 | sprintf(str,"Usage: %s -a ptsaddr -v verbose -s value .... Pts_write_csr\n", argv); |
208 | SetCtrlVal(p1,P1_RESPONSE,str); |
209 | SetCtrlVal(p1,P1_RESPONSE,str); |
209 | sprintf(str,"Example: %s --address 0x1000000 --verbose 1 --erase\n", argv); |
210 | sprintf(str,"Example: %s --address 0x1000000 --verbose 1 --erase\n", argv); |
210 | SetCtrlVal(p1,P1_RESPONSE,str); |
211 | SetCtrlVal(p1,P1_RESPONSE,str); |
211 | sprintf(str,"Example: %s --address 0x1000000 --verbose 1 --input pts_scaler.bit --load-bit 2\n", argv); |
212 | sprintf(str,"Example: %s --address 0x1000000 --verbose 1 --input pts_scaler.bit --load-bit 2\n", argv); |
212 | SetCtrlVal(p1,P1_RESPONSE,str); |
213 | SetCtrlVal(p1,P1_RESPONSE,str); |
213 | sprintf(str,"Example: %s --address 0x1000004 --write-csr 0x7600\n", argv);SetCtrlVal(p1,P1_RESPONSE,str); |
214 | sprintf(str,"Example: %s --address 0x1000004 --write-csr 0x7600\n", argv);SetCtrlVal(p1,P1_RESPONSE,str); |
214 | } |
215 | } |
215 | 216 | ||
216 | 217 | ||
217 | 218 | ||
218 | int __stdcall WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, |
219 | int __stdcall WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, |
219 | LPSTR lpszCmdLine, int nCmdShow) |
220 | LPSTR lpszCmdLine, int nCmdShow) |
220 | { |
221 | { |
221 | char saddr[255]; |
222 | char saddr[255]; |
222 | if (InitCVIRTE (hInstance, 0, 0) == 0) |
223 | if (InitCVIRTE (hInstance, 0, 0) == 0) |
223 | return -1; /* out of memory */ |
224 | return -1; /* out of memory */ |
224 | if ((p1 = LoadPanel (0, "PtsModule_CVI.uir", P1)) < 0) |
225 | if ((p1 = LoadPanel (0, "PtsModule_CVI.uir", P1)) < 0) |
225 | return -1; |
226 | return -1; |
226 | DisplayPanel (p1); |
227 | DisplayPanel (p1); |
227 | 228 | ||
228 | GetCtrlVal(p1,P1_VERBOSE,&verbose); |
229 | GetCtrlVal(p1,P1_VERBOSE,&verbose); |
229 | GetCtrlVal(p1,P1_ADDRESS,saddr); |
230 | GetCtrlVal(p1,P1_ADDRESS,saddr); |
230 | ptaddr = strtoul (saddr,NULL,0); |
231 | ptaddr = strtoul (saddr,NULL,0); |
231 | RunUserInterface (); |
232 | RunUserInterface (); |
232 | DiscardPanel (p1); |
233 | DiscardPanel (p1); |
233 | VME_STOP(); |
234 | VME_STOP(); |
234 | return 0; |
235 | return 0; |
235 | } |
236 | } |
236 | 237 | ||
237 | int CVICALLBACK Reset (int panel, int control, int event, |
238 | int CVICALLBACK Reset (int panel, int control, int event, |
238 | void *callbackData, int eventData1, int eventData2) |
239 | void *callbackData, int eventData1, int eventData2) |
239 | { |
240 | { |
240 | switch (event) |
241 | switch (event) |
241 | { |
242 | { |
242 | case EVENT_COMMIT: |
243 | case EVENT_COMMIT: |
243 | Pts_reset(verbose); |
244 | Pts_reset(verbose); |
244 | break; |
245 | break; |
245 | } |
246 | } |
246 | return 0; |
247 | return 0; |
247 | } |
248 | } |
248 | 249 | ||
249 | int CVICALLBACK Erase (int panel, int control, int event, |
250 | int CVICALLBACK Erase (int panel, int control, int event, |
250 | void *callbackData, int eventData1, int eventData2) |
251 | void *callbackData, int eventData1, int eventData2) |
251 | { |
252 | { |
252 | switch (event) |
253 | switch (event) |
253 | { |
254 | { |
254 | case EVENT_COMMIT: |
255 | case EVENT_COMMIT: |
255 | Pts_erase(verbose); |
256 | Pts_erase(verbose); |
256 | break; |
257 | break; |
257 | } |
258 | } |
258 | return 0; |
259 | return 0; |
259 | } |
260 | } |
260 | 261 | ||
261 | int CVICALLBACK Download (int panel, int control, int event, |
262 | int CVICALLBACK Download (int panel, int control, int event, |
262 | void *callbackData, int eventData1, int eventData2) |
263 | void *callbackData, int eventData1, int eventData2) |
263 | { |
264 | { |
264 | char filename[254]; |
265 | char filename[254]; |
265 | int mode=0; |
266 | int mode=0; |
266 | switch (event) |
267 | switch (event) |
267 | { |
268 | { |
268 | case EVENT_COMMIT: |
269 | case EVENT_COMMIT: |
269 | GetCtrlVal(p1,P1_FIRMWARE,filename); |
270 | GetCtrlVal(p1,P1_FIRMWARE,filename); |
270 | GetCtrlVal(p1,P1_MODE,&mode); |
271 | GetCtrlVal(p1,P1_MODE,&mode); |
271 | if(VME_CONNECTED() >=0 ) { |
272 | if(VME_CONNECTED() >=0 ) { |
272 | Pts_configure_bit( filename, mode, verbose ); |
273 | Pts_configure_bit( filename, mode, verbose ); |
273 | } else { |
274 | } else { |
274 | MessagePopup ("Warning", "Connect VME!!"); |
275 | MessagePopup ("Warning", "Connect VME!!"); |
275 | } |
276 | } |
276 | break; |
277 | break; |
277 | } |
278 | } |
278 | return 0; |
279 | return 0; |
279 | } |
280 | } |
280 | 281 | ||
281 | int CVICALLBACK Check (int panel, int control, int event, |
282 | int CVICALLBACK Check (int panel, int control, int event, |
282 | void *callbackData, int eventData1, int eventData2) |
283 | void *callbackData, int eventData1, int eventData2) |
283 | { |
284 | { |
284 | switch (event) |
285 | switch (event) |
285 | { |
286 | { |
286 | case EVENT_COMMIT: |
287 | case EVENT_COMMIT: |
287 | Pts_check_configure( verbose ); |
288 | Pts_check_configure( verbose ); |
288 | break; |
289 | break; |
289 | } |
290 | } |
290 | return 0; |
291 | return 0; |
291 | } |
292 | } |
292 | 293 | ||
293 | int CVICALLBACK Read (int panel, int control, int event, |
294 | int CVICALLBACK Read (int panel, int control, int event, |
294 | void *callbackData, int eventData1, int eventData2) |
295 | void *callbackData, int eventData1, int eventData2) |
295 | { |
296 | { |
296 | uint32_t value=0; |
297 | uint32_t value=0; |
297 | char str[0xFF]; |
298 | char str[0xFF]; |
298 | char saddr[256]; |
299 | char saddr[256]; |
299 | int offset; |
300 | int offset; |
300 | switch (event) |
301 | switch (event) |
301 | { |
302 | { |
302 | case EVENT_COMMIT: |
303 | case EVENT_COMMIT: |
303 | GetCtrlVal(p1,P1_OFFSET,saddr); |
304 | GetCtrlVal(p1,P1_OFFSET,saddr); |
304 | offset = strtoul (saddr,NULL,0); |
305 | offset = strtoul (saddr,NULL,0); |
305 | Pts_read( offset , &value ); |
306 | Pts_read( offset , &value ); |
306 | if( verbose ) { |
307 | if( verbose ) { |
307 | sprintf(str, "VME Read addr 0x%0x+0x%0x response 0x%0x\n", ptaddr, offset, value ); |
308 | sprintf(str, "VME Read addr 0x%0x+0x%0x response 0x%0x\n", ptaddr, offset, value ); |
308 | SetCtrlVal (p1, P1_RESPONSE, str); |
309 | SetCtrlVal (p1, P1_RESPONSE, str); |
309 | } |
310 | } |
310 | break; |
311 | break; |
311 | } |
312 | } |
312 | return 0; |
313 | return 0; |
313 | } |
314 | } |
314 | 315 | ||
315 | int CVICALLBACK Write (int panel, int control, int event, |
316 | int CVICALLBACK Write (int panel, int control, int event, |
316 | void *callbackData, int eventData1, int eventData2) |
317 | void *callbackData, int eventData1, int eventData2) |
317 | { |
318 | { |
318 | int value; |
319 | int value; |
319 | int offset; |
320 | int offset; |
320 | char svalue[256]; |
321 | char svalue[256]; |
321 | char saddr[256]; |
322 | char saddr[256]; |
322 | switch (event) |
323 | switch (event) |
323 | { |
324 | { |
324 | case EVENT_COMMIT: |
325 | case EVENT_COMMIT: |
325 | GetCtrlVal(p1,P1_DATA,svalue); |
326 | GetCtrlVal(p1,P1_DATA,svalue); |
326 | GetCtrlVal(p1,P1_OFFSET,saddr); |
327 | GetCtrlVal(p1,P1_OFFSET,saddr); |
327 | value = strtoul (svalue,NULL,0); |
328 | value = strtoul (svalue,NULL,0); |
328 | offset = strtoul (saddr,NULL,0); |
329 | offset = strtoul (saddr,NULL,0); |
329 | Pts_write( offset , value ); |
330 | Pts_write( offset , value ); |
330 | if( verbose ) { |
331 | if( verbose ) { |
331 | sprintf(str, "VME Write addr 0x%0x+0x%0x data 0x%0x\n", ptaddr, offset, value ); |
332 | sprintf(str, "VME Write addr 0x%0x+0x%0x data 0x%0x\n", ptaddr, offset, value ); |
332 | SetCtrlVal (p1, P1_RESPONSE, str); |
333 | SetCtrlVal (p1, P1_RESPONSE, str); |
333 | } |
334 | } |
334 | break; |
335 | break; |
335 | } |
336 | } |
336 | return 0; |
337 | return 0; |
337 | } |
338 | } |
338 | 339 | ||
339 | int CVICALLBACK WriteCSR (int panel, int control, int event, |
340 | int CVICALLBACK WriteCSR (int panel, int control, int event, |
340 | void *callbackData, int eventData1, int eventData2) |
341 | void *callbackData, int eventData1, int eventData2) |
341 | { |
342 | { |
342 | int value; |
343 | int value; |
343 | char svalue[256]; |
344 | char svalue[256]; |
344 | switch (event) |
345 | switch (event) |
345 | { |
346 | { |
346 | case EVENT_COMMIT: |
347 | case EVENT_COMMIT: |
347 | GetCtrlVal(p1,P1_DATA,svalue); |
348 | GetCtrlVal(p1,P1_DATA,svalue); |
348 | value = strtoul (svalue,NULL,0); |
349 | value = strtoul (svalue,NULL,0); |
349 | Pts_write_csr( verbose, value ); |
350 | Pts_write_csr( verbose, value ); |
350 | break; |
351 | break; |
351 | } |
352 | } |
352 | return 0; |
353 | return 0; |
353 | } |
354 | } |
354 | 355 | ||
355 | int CVICALLBACK Verbose (int panel, int control, int event, |
356 | int CVICALLBACK Verbose (int panel, int control, int event, |
356 | void *callbackData, int eventData1, int eventData2) |
357 | void *callbackData, int eventData1, int eventData2) |
357 | { |
358 | { |
358 | int * data; |
359 | int * data; |
359 | switch (event) |
360 | switch (event) |
360 | { |
361 | { |
361 | case EVENT_COMMIT: |
362 | case EVENT_COMMIT: |
362 | GetCtrlVal(panel,control,&verbose); |
363 | GetCtrlVal(panel,control,&verbose); |
363 | 364 | ||
364 | break; |
365 | break; |
365 | } |
366 | } |
366 | return 0; |
367 | return 0; |
367 | } |
368 | } |
368 | 369 | ||
369 | int CVICALLBACK Help (int panel, int control, int event, |
370 | int CVICALLBACK Help (int panel, int control, int event, |
370 | void *callbackData, int eventData1, int eventData2) |
371 | void *callbackData, int eventData1, int eventData2) |
371 | { |
372 | { |
372 | switch (event) |
373 | switch (event) |
373 | { |
374 | { |
374 | case EVENT_COMMIT: |
375 | case EVENT_COMMIT: |
375 | help("PtsModule"); |
376 | help("PtsModule"); |
376 | break; |
377 | break; |
377 | } |
378 | } |
378 | return 0; |
379 | return 0; |
379 | } |
380 | } |
380 | 381 | ||
381 | int CVICALLBACK Address (int panel, int control, int event, |
382 | int CVICALLBACK Address (int panel, int control, int event, |
382 | void *callbackData, int eventData1, int eventData2) |
383 | void *callbackData, int eventData1, int eventData2) |
383 | { |
384 | { |
384 | char saddr[100]; |
385 | char saddr[100]; |
385 | switch (event) |
386 | switch (event) |
386 | { |
387 | { |
387 | case EVENT_COMMIT: |
388 | case EVENT_COMMIT: |
388 | GetCtrlVal(p1,P1_ADDRESS,saddr); |
389 | GetCtrlVal(p1,P1_ADDRESS,saddr); |
389 | ptaddr = strtoul (saddr,NULL,0); |
390 | ptaddr = strtoul (saddr,NULL,0); |
390 | break; |
391 | break; |
391 | } |
392 | } |
392 | return 0; |
393 | return 0; |
393 | } |
394 | } |
394 | 395 | ||
395 | int CVICALLBACK Exit (int panel, int control, int event, |
396 | int CVICALLBACK Exit (int panel, int control, int event, |
396 | void *callbackData, int eventData1, int eventData2) |
397 | void *callbackData, int eventData1, int eventData2) |
397 | { |
398 | { |
398 | switch (event) |
399 | switch (event) |
399 | { |
400 | { |
400 | case EVENT_COMMIT: |
401 | case EVENT_COMMIT: |
401 | QuitUserInterface(0); |
402 | QuitUserInterface(0); |
402 | break; |
403 | break; |
403 | } |
404 | } |
404 | return 0; |
405 | return 0; |
405 | } |
406 | } |
406 | 407 | ||
407 | int CVICALLBACK FSelect (int panel, int control, int event, |
408 | int CVICALLBACK FSelect (int panel, int control, int event, |
408 | void *callbackData, int eventData1, int eventData2) |
409 | void *callbackData, int eventData1, int eventData2) |
409 | { |
410 | { |
410 | int status; |
411 | int status; |
411 | char pathName[MAX_PATHNAME_LEN]; |
412 | char pathName[MAX_PATHNAME_LEN]; |
412 | switch (event) |
413 | switch (event) |
413 | { |
414 | { |
414 | case EVENT_COMMIT: |
415 | case EVENT_COMMIT: |
415 | status = FileSelectPopup ("", "*.bit", "*.bit", "Select Firmware file", |
416 | status = FileSelectPopup ("", "*.bit", "*.bit", "Select Firmware file", |
416 | VAL_SELECT_BUTTON, 0, 0, 1, 0, pathName); |
417 | VAL_SELECT_BUTTON, 0, 0, 1, 0, pathName); |
417 | if (status>0) SetCtrlVal(p1,P1_FIRMWARE,pathName); |
418 | if (status>0) SetCtrlVal(p1,P1_FIRMWARE,pathName); |
418 | break; |
419 | break; |
419 | } |
420 | } |
420 | return 0; |
421 | return 0; |
421 | } |
422 | } |
422 | 423 | ||
423 | int CVICALLBACK LedCB (int panel, int control, int event, |
424 | int CVICALLBACK LedCB (int panel, int control, int event, |
424 | void *callbackData, int eventData1, int eventData2) |
425 | void *callbackData, int eventData1, int eventData2) |
425 | { |
426 | { |
426 | switch (event) |
427 | switch (event) |
427 | { |
428 | { |
428 | int value=0; |
429 | int value=0; |
429 | case EVENT_COMMIT: |
430 | case EVENT_COMMIT: |
430 | GetCtrlVal(p1,P1_LED,&value); |
431 | GetCtrlVal(p1,P1_LED,&value); |
431 | 432 | ||
432 | Pts_write( 0 , value+1 ); |
433 | Pts_write( 0 , value+1 ); |
433 | 434 | ||
434 | break; |
435 | break; |
435 | } |
436 | } |
436 | return 0; |
437 | return 0; |
437 | } |
438 | } |
438 | 439 | ||
439 | int CVICALLBACK Execute (int panel, int control, int event, |
440 | int CVICALLBACK Execute (int panel, int control, int event, |
440 | void *callbackData, int eventData1, int eventData2) |
441 | void *callbackData, int eventData1, int eventData2) |
441 | { |
442 | { |
442 | switch (event) |
443 | switch (event) |
443 | { |
444 | { |
444 | case EVENT_COMMIT:{ |
445 | case EVENT_COMMIT:{ |
445 | int n,i,nb; |
446 | int n,i,nb; |
446 | char buf[400]; |
447 | char buf[400]; |
447 | unsigned int data, addr; |
448 | unsigned int data, addr; |
448 | char sdata[255], saddr[255], rw[255]; |
449 | char sdata[255], saddr[255], rw[255]; |
449 | GetNumTextBoxLines(panel, P1_COMMANDS,&n); |
450 | GetNumTextBoxLines(panel, P1_COMMANDS,&n); |
450 | for (i=0;i<n;i++){ |
451 | for (i=0;i<n;i++){ |
451 | GetTextBoxLine(panel, P1_COMMANDS, i, buf); |
452 | GetTextBoxLine(panel, P1_COMMANDS, i, buf); |
452 | nb = sscanf(buf,"%s%s%s",rw, saddr,sdata); |
453 | nb = sscanf(buf,"%s%s%s",rw, saddr,sdata); |
453 | addr = strtoul (saddr,NULL,0); |
454 | addr = strtoul (saddr,NULL,0); |
454 | data = strtoul (sdata,NULL,0); |
455 | data = strtoul (sdata,NULL,0); |
455 | if (strstr(rw,"W")!=NULL){ |
456 | if (strstr(rw,"W")!=NULL){ |
456 | Pts_write( addr , data ); |
457 | Pts_write( addr , data ); |
457 | if( verbose ) { |
458 | if( verbose ) { |
458 | sprintf(str, "VME Write addr 0x%0x+0x%0x data 0x%0x\n", ptaddr, addr, data ); |
459 | sprintf(str, "VME Write addr 0x%0x+0x%0x data 0x%0x\n", ptaddr, addr, data ); |
459 | SetCtrlVal (p1, P1_RESPONSE, str); |
460 | SetCtrlVal (p1, P1_RESPONSE, str); |
460 | } |
461 | } |
461 | } else { |
462 | } else { |
462 | Pts_read( addr , &data ); |
463 | Pts_read( addr , &data ); |
463 | if( verbose ) { |
464 | if( verbose ) { |
464 | sprintf(str, "VME Read addr 0x%0x+0x%0x response 0x%0x\n", ptaddr, addr, data); |
465 | sprintf(str, "VME Read addr 0x%0x+0x%0x response 0x%0x\n", ptaddr, addr, data); |
465 | SetCtrlVal (p1, P1_RESPONSE, str); |
466 | SetCtrlVal (p1, P1_RESPONSE, str); |
466 | } |
467 | } |
467 | } |
468 | } |
468 | } |
469 | } |
469 | break; |
470 | break; |
470 | } |
471 | } |
471 | } |
472 | } |
472 | return 0; |
473 | return 0; |
473 | } |
474 | } |
474 | 475 | ||
475 | int CVICALLBACK Connect (int panel, int control, int event, |
476 | int CVICALLBACK Connect (int panel, int control, int event, |
476 | void *callbackData, int eventData1, int eventData2) |
477 | void *callbackData, int eventData1, int eventData2) |
477 | { |
478 | { |
478 | int interface = 0; |
479 | int interface = 0; |
479 | switch (event) |
480 | switch (event) |
480 | { |
481 | { |
481 | 482 | ||
482 | case EVENT_COMMIT: |
483 | case EVENT_COMMIT: |
483 | GetCtrlVal (p1, P1_VMEINTERFACE, &interface); |
484 | GetCtrlVal (p1, P1_VMEINTERFACE, &interface); |
484 | VME_START(interface); |
485 | VME_START(interface); |
485 | break; |
486 | break; |
486 | } |
487 | } |
487 | return 0; |
488 | return 0; |
488 | } |
489 | } |
489 | 490 | ||
490 | int CVICALLBACK Disconnect (int panel, int control, int event, |
491 | int CVICALLBACK Disconnect (int panel, int control, int event, |
491 | void *callbackData, int eventData1, int eventData2) |
492 | void *callbackData, int eventData1, int eventData2) |
492 | { |
493 | { |
493 | switch (event) |
494 | switch (event) |
494 | { |
495 | { |
495 | case EVENT_COMMIT: |
496 | case EVENT_COMMIT: |
496 | VME_STOP(); |
497 | VME_STOP(); |
497 | break; |
498 | break; |
498 | } |
499 | } |
499 | return 0; |
500 | return 0; |
500 | } |
501 | } |
501 | 502 |