[OpenSPARC-T2-DV] / verif / diag / assembly / arch / prm / tso / tso_directed / tso_n1_false_sharing1.s

/*
* ========== Copyright Header Begin ==========================================
* 
* OpenSPARC T2 Processor File: tso_n1_false_sharing1.s
* Copyright (C) 1995-2007 Sun Microsystems, Inc. All Rights Reserved
* 4150 Network Circle, Santa Clara, California 95054, U.S.A.
*
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; version 2 of the License.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*
* For the avoidance of doubt, and except that if any non-GPL license 
* choice is available it will apply instead, Sun elects to use only 
* the General Public License version 2 (GPLv2) at this time for any 
* software where a choice of GPL license versions is made 
* available with the language indicating that GPLv2 or any later version 
* may be used, or where a choice of which version of the GPL is applied is 
* otherwise unspecified. 
*
* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara, 
* CA 95054 USA or visit www.sun.com if you need additional information or 
* have any questions. 
*
* 
* ========== Copyright Header End ============================================
*/
#define data_base_reg	  		%o1
#define to_reg	  			%o2
#define my_id_reg	  		%o3
#define test_reg	  		%o4
#define global_cnt_reg	  		%o5

#define TIMEOUT 	  		0x1000
#define ITERATIONS 	  		0x2

#include "hboot.s"

.global main

main:

        set     ITERATIONS,	global_cnt_reg 	
	mov	%g0, my_id_reg

th_fork(th_main,%l0)

th_main_0:
        add     my_id_reg, 0x00, my_id_reg	! this is my ID address
	ba	go
	nop

th_main_1:
        add     my_id_reg, 0x04, my_id_reg
	ba	go
	nop


th_main_2:
        add     my_id_reg, 0x08, my_id_reg
	ba	go
	nop

th_main_3:
        add     my_id_reg, 0x0c, my_id_reg
	ba	go
	nop

th_main_4:
        add     my_id_reg, 0x10, my_id_reg
	ba	go
	nop

th_main_5:
        add     my_id_reg, 0x14, my_id_reg
	ba	go
	nop

th_main_6:
        add     my_id_reg, 0x18, my_id_reg
	ba	go
	nop

th_main_7:
        add     my_id_reg, 0x1c, my_id_reg
	ba	go
	nop

go:
	setx    protected_area,	%l0, data_base_reg	! the data area

	set 	100, %l0
	add	my_id_reg, data_base_reg, data_base_reg
	add	my_id_reg, data_base_reg, %i1
loop1:
	st 	%i1, [data_base_reg]  			! store my ID in there
	add	data_base_reg, 0x20, data_base_reg 	! increment the address
	add	%i1, 1, %i1
	deccc	%l0
	bne 	loop1					! repeat
	nop

	set 	100, %l0
loop2:
	sub	data_base_reg, 0x20, data_base_reg 
	sub	%i1, 1, %i1
	ld 	[data_base_reg], %l1			! read the data area
	subcc 	%l1, %i1, %l1				! should be same as i1
	bne	bad_end
	nop
	deccc	%l0					! repeat
	bne 	loop2
	nop

check_done:						! check if done
	deccc	global_cnt_reg
        be	good_end
	nop
	ba	go
	nop

good_end:
        ta      T_GOOD_TRAP
bad_end:
        ta      T_BAD_TRAP

!==========================

	.data
.global protected_area
protected_area:
	.word	0xbeef
	.skip 0x1000
	.word	0xbeef
	
.end
Commit	Line	Data
86530b38 AT	1	/*
	2	* ========== Copyright Header Begin ==========================================
	3	*
	4	* OpenSPARC T2 Processor File: tso_n1_false_sharing1.s
	5	* Copyright (C) 1995-2007 Sun Microsystems, Inc. All Rights Reserved
	6	* 4150 Network Circle, Santa Clara, California 95054, U.S.A.
	7	*
	8	* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
	9	*
	10	* This program is free software; you can redistribute it and/or modify
	11	* it under the terms of the GNU General Public License as published by
	12	* the Free Software Foundation; version 2 of the License.
	13	*
	14	* This program is distributed in the hope that it will be useful,
	15	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	16	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	17	* GNU General Public License for more details.
	18	*
	19	* You should have received a copy of the GNU General Public License
	20	* along with this program; if not, write to the Free Software
	21	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	22	*
	23	* For the avoidance of doubt, and except that if any non-GPL license
	24	* choice is available it will apply instead, Sun elects to use only
	25	* the General Public License version 2 (GPLv2) at this time for any
	26	* software where a choice of GPL license versions is made
	27	* available with the language indicating that GPLv2 or any later version
	28	* may be used, or where a choice of which version of the GPL is applied is
	29	* otherwise unspecified.
	30	*
	31	* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
	32	* CA 95054 USA or visit www.sun.com if you need additional information or
	33	* have any questions.
	34	*
	35	*
	36	* ========== Copyright Header End ============================================
	37	*/
	38	#define data_base_reg %o1
	39	#define to_reg %o2
	40	#define my_id_reg %o3
	41	#define test_reg %o4
	42	#define global_cnt_reg %o5
	43
	44	#define TIMEOUT 0x1000
	45	#define ITERATIONS 0x2
	46
	47	#include "hboot.s"
	48
	49	.global main
	50
	51	main:
	52
	53	set ITERATIONS, global_cnt_reg
	54	mov %g0, my_id_reg
	55
	56	th_fork(th_main,%l0)
	57
	58	th_main_0:
	59	add my_id_reg, 0x00, my_id_reg ! this is my ID address
	60	ba go
	61	nop
	62
	63	th_main_1:
	64	add my_id_reg, 0x04, my_id_reg
65	ba go
66	nop
67
68
69	th_main_2:
70	add my_id_reg, 0x08, my_id_reg
71	ba go
72	nop
73
74	th_main_3:
75	add my_id_reg, 0x0c, my_id_reg
76	ba go
77	nop
78
79	th_main_4:
80	add my_id_reg, 0x10, my_id_reg
81	ba go
82	nop
83
84	th_main_5:
85	add my_id_reg, 0x14, my_id_reg
86	ba go
87	nop
88
89	th_main_6:
90	add my_id_reg, 0x18, my_id_reg
91	ba go
92	nop
93
94	th_main_7:
95	add my_id_reg, 0x1c, my_id_reg
96	ba go
97	nop
98
99	go:
100	setx protected_area, %l0, data_base_reg ! the data area
101
102	set 100, %l0
103	add my_id_reg, data_base_reg, data_base_reg
104	add my_id_reg, data_base_reg, %i1
105	loop1:
106	st %i1, [data_base_reg] ! store my ID in there
107	add data_base_reg, 0x20, data_base_reg ! increment the address
108	add %i1, 1, %i1
109	deccc %l0
110	bne loop1 ! repeat
111	nop
112
113	set 100, %l0
114	loop2:
115	sub data_base_reg, 0x20, data_base_reg
116	sub %i1, 1, %i1
117	ld [data_base_reg], %l1 ! read the data area
118	subcc %l1, %i1, %l1 ! should be same as i1
119	bne bad_end
120	nop
121	deccc %l0 ! repeat
122	bne loop2
123	nop
124
125	check_done: ! check if done
126	deccc global_cnt_reg
127	be good_end
128	nop
129	ba go
130	nop
131
132	good_end:
133	ta T_GOOD_TRAP
134	bad_end:
135	ta T_BAD_TRAP
136
137	!==========================
138
139	.data
140	.global protected_area
141	protected_area:
142	.word 0xbeef
143	.skip 0x1000
144	.word 0xbeef
145
146	.end