Subversion Repositories HelenOS-historic

Rev

Rev 1702 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
52 vana 1
/*
92 jermar 2
 * Copyright (C) 2005 Jakub Vana
3
 * All rights reserved.
4
 *
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
7
 * are met:
8
 *
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
13
 *   documentation and/or other materials provided with the distribution.
14
 * - The name of the author may not be used to endorse or promote products
15
 *   derived from this software without specific prior written permission.
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
1702 cejka 27
 */
28
 
29
 /** @addtogroup ia64  
30
 * @{
31
 */
32
/** @file
92 jermar 33
 *
34
 */
52 vana 35
 
36
#include <fpu_context.h>
1023 vana 37
#include <arch/register.h>
993 jermar 38
#include <print.h>
52 vana 39
 
1053 vana 40
 
979 vana 41
void fpu_context_save(fpu_context_t *fctx){
1053 vana 42
 
979 vana 43
        asm volatile(
44
 
45
            "stf.spill [%0]=f32,0x80\n"
46
            "stf.spill [%1]=f33,0x80\n"
47
            "stf.spill [%2]=f34,0x80\n"
48
            "stf.spill [%3]=f35,0x80\n"
49
            "stf.spill [%4]=f36,0x80\n"
50
            "stf.spill [%5]=f37,0x80\n"
51
            "stf.spill [%6]=f38,0x80\n"
52
            "stf.spill [%7]=f39,0x80\n;;"
53
 
54
            "stf.spill [%0]=f40,0x80\n"
55
            "stf.spill [%1]=f41,0x80\n"
56
            "stf.spill [%2]=f42,0x80\n"
57
            "stf.spill [%3]=f43,0x80\n"
58
            "stf.spill [%4]=f44,0x80\n"
59
            "stf.spill [%5]=f45,0x80\n"
60
            "stf.spill [%6]=f46,0x80\n"
61
            "stf.spill [%7]=f47,0x80\n;;"
62
 
63
            "stf.spill [%0]=f48,0x80\n"
64
            "stf.spill [%1]=f49,0x80\n"
65
            "stf.spill [%2]=f50,0x80\n"
66
            "stf.spill [%3]=f51,0x80\n"
67
            "stf.spill [%4]=f52,0x80\n"
68
            "stf.spill [%5]=f53,0x80\n"
69
            "stf.spill [%6]=f54,0x80\n"
70
            "stf.spill [%7]=f55,0x80\n;;"
71
 
72
            "stf.spill [%0]=f56,0x80\n"
73
            "stf.spill [%1]=f57,0x80\n"
74
            "stf.spill [%2]=f58,0x80\n"
75
            "stf.spill [%3]=f59,0x80\n"
76
            "stf.spill [%4]=f60,0x80\n"
77
            "stf.spill [%5]=f61,0x80\n"
78
            "stf.spill [%6]=f62,0x80\n"
79
            "stf.spill [%7]=f63,0x80\n;;"
80
 
81
            "stf.spill [%0]=f64,0x80\n"
82
            "stf.spill [%1]=f65,0x80\n"
83
            "stf.spill [%2]=f66,0x80\n"
84
            "stf.spill [%3]=f67,0x80\n"
85
            "stf.spill [%4]=f68,0x80\n"
86
            "stf.spill [%5]=f69,0x80\n"
87
            "stf.spill [%6]=f70,0x80\n"
88
            "stf.spill [%7]=f71,0x80\n;;"
89
 
90
            "stf.spill [%0]=f72,0x80\n"
91
            "stf.spill [%1]=f73,0x80\n"
92
            "stf.spill [%2]=f74,0x80\n"
93
            "stf.spill [%3]=f75,0x80\n"
94
            "stf.spill [%4]=f76,0x80\n"
95
            "stf.spill [%5]=f77,0x80\n"
96
            "stf.spill [%6]=f78,0x80\n"
97
            "stf.spill [%7]=f79,0x80\n;;"
98
 
99
            "stf.spill [%0]=f80,0x80\n"
100
            "stf.spill [%1]=f81,0x80\n"
101
            "stf.spill [%2]=f82,0x80\n"
102
            "stf.spill [%3]=f83,0x80\n"
103
            "stf.spill [%4]=f84,0x80\n"
104
            "stf.spill [%5]=f85,0x80\n"
105
            "stf.spill [%6]=f86,0x80\n"
106
            "stf.spill [%7]=f87,0x80\n;;"
107
 
108
            "stf.spill [%0]=f88,0x80\n"
109
            "stf.spill [%1]=f89,0x80\n"
110
            "stf.spill [%2]=f90,0x80\n"
111
            "stf.spill [%3]=f91,0x80\n"
112
            "stf.spill [%4]=f92,0x80\n"
113
            "stf.spill [%5]=f93,0x80\n"
114
            "stf.spill [%6]=f94,0x80\n"
115
            "stf.spill [%7]=f95,0x80\n;;"
116
 
117
 
118
            "stf.spill [%0]=f96,0x80\n"
119
            "stf.spill [%1]=f97,0x80\n"
120
            "stf.spill [%2]=f98,0x80\n"
121
            "stf.spill [%3]=f99,0x80\n"
122
            "stf.spill [%4]=f100,0x80\n"
123
            "stf.spill [%5]=f101,0x80\n"
124
            "stf.spill [%6]=f102,0x80\n"
125
            "stf.spill [%7]=f103,0x80\n;;"
126
 
127
            "stf.spill [%0]=f104,0x80\n"
128
            "stf.spill [%1]=f105,0x80\n"
129
            "stf.spill [%2]=f106,0x80\n"
130
            "stf.spill [%3]=f107,0x80\n"
131
            "stf.spill [%4]=f108,0x80\n"
132
            "stf.spill [%5]=f109,0x80\n"
133
            "stf.spill [%6]=f110,0x80\n"
134
            "stf.spill [%7]=f111,0x80\n;;"
135
 
136
            "stf.spill [%0]=f112,0x80\n"
137
            "stf.spill [%1]=f113,0x80\n"
138
            "stf.spill [%2]=f114,0x80\n"
139
            "stf.spill [%3]=f115,0x80\n"
140
            "stf.spill [%4]=f116,0x80\n"
141
            "stf.spill [%5]=f117,0x80\n"
142
            "stf.spill [%6]=f118,0x80\n"
143
            "stf.spill [%7]=f119,0x80\n;;"
144
 
145
            "stf.spill [%0]=f120,0x80\n"
146
            "stf.spill [%1]=f121,0x80\n"
147
            "stf.spill [%2]=f122,0x80\n"
148
            "stf.spill [%3]=f123,0x80\n"
149
            "stf.spill [%4]=f124,0x80\n"
150
            "stf.spill [%5]=f125,0x80\n"
151
            "stf.spill [%6]=f126,0x80\n"
152
            "stf.spill [%7]=f127,0x80\n;;"
153
 
154
 
155
            :
156
            :"r" (&((fctx->fr)[0])),"r" (&((fctx->fr)[1])),"r" (&((fctx->fr)[2])),"r" (&((fctx->fr)[3])),
157
             "r" (&((fctx->fr)[4])),"r" (&((fctx->fr)[5])),"r" (&((fctx->fr)[6])),"r" (&((fctx->fr)[7]))
158
        );
159
 
52 vana 160
}
161
 
162
 
57 vana 163
void fpu_context_restore(fpu_context_t *fctx)
52 vana 164
{
1053 vana 165
 
979 vana 166
        asm volatile(
167
            "ldf.fill f32=[%0],0x80\n"
168
            "ldf.fill f33=[%1],0x80\n"
169
            "ldf.fill f34=[%2],0x80\n"
170
            "ldf.fill f35=[%3],0x80\n"
171
            "ldf.fill f36=[%4],0x80\n"
172
            "ldf.fill f37=[%5],0x80\n"
173
            "ldf.fill f38=[%6],0x80\n"
174
            "ldf.fill f39=[%7],0x80\n;;"
175
 
176
            "ldf.fill f40=[%0],0x80\n"
177
            "ldf.fill f41=[%1],0x80\n"
178
            "ldf.fill f42=[%2],0x80\n"
179
            "ldf.fill f43=[%3],0x80\n"
180
            "ldf.fill f44=[%4],0x80\n"
181
            "ldf.fill f45=[%5],0x80\n"
182
            "ldf.fill f46=[%6],0x80\n"
183
            "ldf.fill f47=[%7],0x80\n;;"
184
 
185
            "ldf.fill f48=[%0],0x80\n"
186
            "ldf.fill f49=[%1],0x80\n"
187
            "ldf.fill f50=[%2],0x80\n"
188
            "ldf.fill f51=[%3],0x80\n"
189
            "ldf.fill f52=[%4],0x80\n"
190
            "ldf.fill f53=[%5],0x80\n"
191
            "ldf.fill f54=[%6],0x80\n"
192
            "ldf.fill f55=[%7],0x80\n;;"
193
 
194
            "ldf.fill f56=[%0],0x80\n"
195
            "ldf.fill f57=[%1],0x80\n"
196
            "ldf.fill f58=[%2],0x80\n"
197
            "ldf.fill f59=[%3],0x80\n"
198
            "ldf.fill f60=[%4],0x80\n"
199
            "ldf.fill f61=[%5],0x80\n"
200
            "ldf.fill f62=[%6],0x80\n"
201
            "ldf.fill f63=[%7],0x80\n;;"
202
 
203
            "ldf.fill f64=[%0],0x80\n"
204
            "ldf.fill f65=[%1],0x80\n"
205
            "ldf.fill f66=[%2],0x80\n"
206
            "ldf.fill f67=[%3],0x80\n"
207
            "ldf.fill f68=[%4],0x80\n"
208
            "ldf.fill f69=[%5],0x80\n"
209
            "ldf.fill f70=[%6],0x80\n"
210
            "ldf.fill f71=[%7],0x80\n;;"
211
 
212
            "ldf.fill f72=[%0],0x80\n"
213
            "ldf.fill f73=[%1],0x80\n"
214
            "ldf.fill f74=[%2],0x80\n"
215
            "ldf.fill f75=[%3],0x80\n"
216
            "ldf.fill f76=[%4],0x80\n"
217
            "ldf.fill f77=[%5],0x80\n"
218
            "ldf.fill f78=[%6],0x80\n"
219
            "ldf.fill f79=[%7],0x80\n;;"
220
 
221
            "ldf.fill f80=[%0],0x80\n"
222
            "ldf.fill f81=[%1],0x80\n"
223
            "ldf.fill f82=[%2],0x80\n"
224
            "ldf.fill f83=[%3],0x80\n"
225
            "ldf.fill f84=[%4],0x80\n"
226
            "ldf.fill f85=[%5],0x80\n"
227
            "ldf.fill f86=[%6],0x80\n"
228
            "ldf.fill f87=[%7],0x80\n;;"
229
 
230
            "ldf.fill f88=[%0],0x80\n"
231
            "ldf.fill f89=[%1],0x80\n"
232
            "ldf.fill f90=[%2],0x80\n"
233
            "ldf.fill f91=[%3],0x80\n"
234
            "ldf.fill f92=[%4],0x80\n"
235
            "ldf.fill f93=[%5],0x80\n"
236
            "ldf.fill f94=[%6],0x80\n"
237
            "ldf.fill f95=[%7],0x80\n;;"
238
 
239
 
240
            "ldf.fill f96=[%0],0x80\n"
241
            "ldf.fill f97=[%1],0x80\n"
242
            "ldf.fill f98=[%2],0x80\n"
243
            "ldf.fill f99=[%3],0x80\n"
244
            "ldf.fill f100=[%4],0x80\n"
245
            "ldf.fill f101=[%5],0x80\n"
246
            "ldf.fill f102=[%6],0x80\n"
247
            "ldf.fill f103=[%7],0x80\n;;"
248
 
249
            "ldf.fill f104=[%0],0x80\n"
250
            "ldf.fill f105=[%1],0x80\n"
251
            "ldf.fill f106=[%2],0x80\n"
252
            "ldf.fill f107=[%3],0x80\n"
253
            "ldf.fill f108=[%4],0x80\n"
254
            "ldf.fill f109=[%5],0x80\n"
255
            "ldf.fill f110=[%6],0x80\n"
256
            "ldf.fill f111=[%7],0x80\n;;"
257
 
258
            "ldf.fill f112=[%0],0x80\n"
259
            "ldf.fill f113=[%1],0x80\n"
260
            "ldf.fill f114=[%2],0x80\n"
261
            "ldf.fill f115=[%3],0x80\n"
262
            "ldf.fill f116=[%4],0x80\n"
263
            "ldf.fill f117=[%5],0x80\n"
264
            "ldf.fill f118=[%6],0x80\n"
265
            "ldf.fill f119=[%7],0x80\n;;"
266
 
267
            "ldf.fill f120=[%0],0x80\n"
268
            "ldf.fill f121=[%1],0x80\n"
269
            "ldf.fill f122=[%2],0x80\n"
270
            "ldf.fill f123=[%3],0x80\n"
271
            "ldf.fill f124=[%4],0x80\n"
272
            "ldf.fill f125=[%5],0x80\n"
273
            "ldf.fill f126=[%6],0x80\n"
274
            "ldf.fill f127=[%7],0x80\n;;"
275
 
276
 
277
            :
278
            :"r" (&((fctx->fr)[0])),"r" (&((fctx->fr)[1])),"r" (&((fctx->fr)[2])),"r" (&((fctx->fr)[3])),
279
             "r" (&((fctx->fr)[4])),"r" (&((fctx->fr)[5])),"r" (&((fctx->fr)[6])),"r" (&((fctx->fr)[7]))
280
        );
52 vana 281
}
282
 
1053 vana 283
void fpu_enable(void)
1023 vana 284
{
1780 jermar 285
        uint64_t a = 0 ;
1023 vana 286
        asm volatile(
1053 vana 287
            "rsm %0;;"
1023 vana 288
            "srlz.i\n"
289
            "srlz.d;;\n"
290
            :
1053 vana 291
            :"i" (PSR_DFH_MASK)
1023 vana 292
        );
1053 vana 293
        asm volatile
294
        (
295
            "mov %0=ar.fpsr;;\n"
296
            "or %0=%0,%1;;\n"
297
            "mov ar.fpsr=%0;;\n"
298
            : "+r" (a)
299
            : "r" (0x38)
300
        );
979 vana 301
 
1023 vana 302
}
979 vana 303
 
1053 vana 304
void fpu_disable(void)
1023 vana 305
{
1053 vana 306
 
1780 jermar 307
        uint64_t a = 0 ;
1023 vana 308
        asm volatile(
1053 vana 309
            "ssm %0;;\n"
1023 vana 310
            "srlz.i\n"
311
            "srlz.d;;\n"
312
            :
1053 vana 313
            :"i" (PSR_DFH_MASK)
1023 vana 314
        );
1053 vana 315
        asm volatile
316
        (
317
            "mov %0=ar.fpsr;;\n"
318
            "or %0=%0,%1;;\n"
319
            "mov ar.fpsr=%0;;\n"
320
            : "+r" (a)
321
            : "r" (0x38)
322
        );
1023 vana 323
 
324
}
325
 
326
void fpu_init(void)
327
{
1780 jermar 328
        uint64_t a = 0 ;
1023 vana 329
        asm volatile
330
        (
331
            "mov %0=ar.fpsr;;\n"
332
            "or %0=%0,%1;;\n"
333
            "mov ar.fpsr=%0;;\n"
334
            : "+r" (a)
335
            : "r" (0x38)
336
        );
1053 vana 337
 
1023 vana 338
        asm volatile(
339
            "mov f2=f0\n"
340
            "mov f3=f0\n"
341
            "mov f4=f0\n"
342
            "mov f5=f0\n"
343
            "mov f6=f0\n"
344
            "mov f7=f0\n"
345
            "mov f8=f0\n"
346
            "mov f9=f0\n"
347
 
348
            "mov f10=f0\n"
349
            "mov f11=f0\n"
350
            "mov f12=f0\n"
351
            "mov f13=f0\n"
352
            "mov f14=f0\n"
353
            "mov f15=f0\n"
354
            "mov f16=f0\n"
355
            "mov f17=f0\n"
356
            "mov f18=f0\n"
357
            "mov f19=f0\n"
358
 
359
            "mov f20=f0\n"
360
            "mov f21=f0\n"
361
            "mov f22=f0\n"
362
            "mov f23=f0\n"
363
            "mov f24=f0\n"
364
            "mov f25=f0\n"
365
            "mov f26=f0\n"
366
            "mov f27=f0\n"
367
            "mov f28=f0\n"
368
            "mov f29=f0\n"
369
 
370
            "mov f30=f0\n"
371
            "mov f31=f0\n"
372
            "mov f32=f0\n"
373
            "mov f33=f0\n"
374
            "mov f34=f0\n"
375
            "mov f35=f0\n"
376
            "mov f36=f0\n"
377
            "mov f37=f0\n"
378
            "mov f38=f0\n"
379
            "mov f39=f0\n"
380
 
381
            "mov f40=f0\n"
382
            "mov f41=f0\n"
383
            "mov f42=f0\n"
384
            "mov f43=f0\n"
385
            "mov f44=f0\n"
386
            "mov f45=f0\n"
387
            "mov f46=f0\n"
388
            "mov f47=f0\n"
389
            "mov f48=f0\n"
390
            "mov f49=f0\n"
391
 
392
            "mov f50=f0\n"
393
            "mov f51=f0\n"
394
            "mov f52=f0\n"
395
            "mov f53=f0\n"
396
            "mov f54=f0\n"
397
            "mov f55=f0\n"
398
            "mov f56=f0\n"
399
            "mov f57=f0\n"
400
            "mov f58=f0\n"
401
            "mov f59=f0\n"
402
 
403
            "mov f60=f0\n"
404
            "mov f61=f0\n"
405
            "mov f62=f0\n"
406
            "mov f63=f0\n"
407
            "mov f64=f0\n"
408
            "mov f65=f0\n"
409
            "mov f66=f0\n"
410
            "mov f67=f0\n"
411
            "mov f68=f0\n"
412
            "mov f69=f0\n"
413
 
414
            "mov f70=f0\n"
415
            "mov f71=f0\n"
416
            "mov f72=f0\n"
417
            "mov f73=f0\n"
418
            "mov f74=f0\n"
419
            "mov f75=f0\n"
420
            "mov f76=f0\n"
421
            "mov f77=f0\n"
422
            "mov f78=f0\n"
423
            "mov f79=f0\n"
424
 
425
            "mov f80=f0\n"
426
            "mov f81=f0\n"
427
            "mov f82=f0\n"
428
            "mov f83=f0\n"
429
            "mov f84=f0\n"
430
            "mov f85=f0\n"
431
            "mov f86=f0\n"
432
            "mov f87=f0\n"
433
            "mov f88=f0\n"
434
            "mov f89=f0\n"
435
 
436
            "mov f90=f0\n"
437
            "mov f91=f0\n"
438
            "mov f92=f0\n"
439
            "mov f93=f0\n"
440
            "mov f94=f0\n"
441
            "mov f95=f0\n"
442
            "mov f96=f0\n"
443
            "mov f97=f0\n"
444
            "mov f98=f0\n"
445
            "mov f99=f0\n"
446
 
447
            "mov f100=f0\n"
448
            "mov f101=f0\n"
449
            "mov f102=f0\n"
450
            "mov f103=f0\n"
451
            "mov f104=f0\n"
452
            "mov f105=f0\n"
453
            "mov f106=f0\n"
454
            "mov f107=f0\n"
455
            "mov f108=f0\n"
456
            "mov f109=f0\n"
457
 
458
            "mov f110=f0\n"
459
            "mov f111=f0\n"
460
            "mov f112=f0\n"
461
            "mov f113=f0\n"
462
            "mov f114=f0\n"
463
            "mov f115=f0\n"
464
            "mov f116=f0\n"
465
            "mov f117=f0\n"
466
            "mov f118=f0\n"
467
            "mov f119=f0\n"
468
 
469
            "mov f120=f0\n"
470
            "mov f121=f0\n"
471
            "mov f122=f0\n"
472
            "mov f123=f0\n"
473
            "mov f124=f0\n"
474
            "mov f125=f0\n"
475
            "mov f126=f0\n"
476
            "mov f127=f0\n"
477
 
478
        );
479
 
480
}
481
 
1702 cejka 482
 
483
 /** @}
484
 */
485