WebSVN – HelenOS-historic – Blame – /kernel/trunk/arch/ia64/src/fpu_context.c

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

Subversion Repositories HelenOS-historic

(root)/kernel/trunk/arch/ia64/src/fpu_context.c – Rev 1780