[deliverable/linux.git] / arch / sparc / kernel / syscalls.S

	/* SunOS's execv() call only specifies the argv argument, the
	 * environment settings are the same as the calling processes.
	 */
sys64_execve:
	set	sys_execve, %g1
	jmpl	%g1, %g0
	 flushw

#ifdef CONFIG_COMPAT
sunos_execv:
	mov	%g0, %o2
sys32_execve:
	set	compat_sys_execve, %g1
	jmpl	%g1, %g0
	 flushw
#endif

	.align	32
sys_sparc_pipe:
	ba,pt	%xcc, sys_sparc_pipe_real
	 add	%sp, PTREGS_OFF, %o0
sys_nis_syscall:
	ba,pt	%xcc, c_sys_nis_syscall
	 add	%sp, PTREGS_OFF, %o0
sys_memory_ordering:
	ba,pt	%xcc, sparc_memory_ordering
	 add	%sp, PTREGS_OFF, %o1
#ifdef CONFIG_COMPAT
sys32_sigstack:
	ba,pt	%xcc, do_sys32_sigstack
	 mov	%i6, %o2
#endif
	.align	32
#ifdef CONFIG_COMPAT
sys32_sigreturn:
	add	%sp, PTREGS_OFF, %o0
	call	do_sigreturn32
	 add	%o7, 1f-.-4, %o7
	nop
#endif
sys_rt_sigreturn:
	add	%sp, PTREGS_OFF, %o0
	call	do_rt_sigreturn
	 add	%o7, 1f-.-4, %o7
	nop
#ifdef CONFIG_COMPAT
sys32_rt_sigreturn:
	add	%sp, PTREGS_OFF, %o0
	call	do_rt_sigreturn32
	 add	%o7, 1f-.-4, %o7
	nop
#endif
	.align	32
1:	ldx	[%g6 + TI_FLAGS], %l5
	andcc	%l5, (_TIF_SYSCALL_TRACE|_TIF_SECCOMP|_TIF_SYSCALL_AUDIT|_TIF_SYSCALL_TRACEPOINT|_TIF_NOHZ), %g0
	be,pt	%icc, rtrap
	 nop
	call	syscall_trace_leave
	 add	%sp, PTREGS_OFF, %o0
	ba,pt	%xcc, rtrap
	 nop

	/* This is how fork() was meant to be done, 8 instruction entry.
	 *
	 * I questioned the following code briefly, let me clear things
	 * up so you must not reason on it like I did.
	 *
	 * Know the fork_kpsr etc. we use in the sparc32 port?  We don't
	 * need it here because the only piece of window state we copy to
	 * the child is the CWP register.  Even if the parent sleeps,
	 * we are safe because we stuck it into pt_regs of the parent
	 * so it will not change.
	 *
	 * XXX This raises the question, whether we can do the same on
	 * XXX sparc32 to get rid of fork_kpsr _and_ fork_kwim.  The
	 * XXX answer is yes.  We stick fork_kpsr in UREG_G0 and
	 * XXX fork_kwim in UREG_G1 (global registers are considered
	 * XXX volatile across a system call in the sparc ABI I think
	 * XXX if it isn't we can use regs->y instead, anyone who depends
	 * XXX upon the Y register being preserved across a fork deserves
	 * XXX to lose).
	 *
	 * In fact we should take advantage of that fact for other things
	 * during system calls...
	 */
	.align	32
sys_vfork: /* Under Linux, vfork and fork are just special cases of clone. */
	sethi	%hi(0x4000 | 0x0100 | SIGCHLD), %o0
	or	%o0, %lo(0x4000 | 0x0100 | SIGCHLD), %o0
	ba,pt	%xcc, sys_clone
sys_fork:
	 clr	%o1
	mov	SIGCHLD, %o0
sys_clone:
	flushw
	movrz	%o1, %fp, %o1
	mov	0, %o3
	ba,pt	%xcc, sparc_do_fork
	 add	%sp, PTREGS_OFF, %o2

	.globl	ret_from_fork
ret_from_fork:
	/* Clear current_thread_info()->new_child. */
	stb	%g0, [%g6 + TI_NEW_CHILD]
	call	schedule_tail
	 mov	%g7, %o0
	ldx	[%sp + PTREGS_OFF + PT_V9_I0], %o0
	brnz,pt	%o0, ret_sys_call
	 ldx	[%g6 + TI_FLAGS], %l0
	ldx	[%sp + PTREGS_OFF + PT_V9_G1], %l1
	call	%l1
	 ldx	[%sp + PTREGS_OFF + PT_V9_G2], %o0
	ba,pt	%xcc, ret_sys_call
	 mov	0, %o0

	.globl	sparc_exit_group
	.type	sparc_exit_group,#function
sparc_exit_group:
	sethi	%hi(sys_exit_group), %g7
	ba,pt	%xcc, 1f
	 or	%g7, %lo(sys_exit_group), %g7
	.size	sparc_exit_group,.-sparc_exit_group

	.globl	sparc_exit
	.type	sparc_exit,#function
sparc_exit:
	sethi	%hi(sys_exit), %g7
	or	%g7, %lo(sys_exit), %g7
1:	rdpr	%pstate, %g2
	wrpr	%g2, PSTATE_IE, %pstate
	rdpr	%otherwin, %g1
	rdpr	%cansave, %g3
	add	%g3, %g1, %g3
	wrpr	%g3, 0x0, %cansave
	wrpr	%g0, 0x0, %otherwin
	wrpr	%g2, 0x0, %pstate
	jmpl	%g7, %g0
	 stb	%g0, [%g6 + TI_WSAVED]
	.size	sparc_exit,.-sparc_exit

linux_sparc_ni_syscall:
	sethi	%hi(sys_ni_syscall), %l7
	ba,pt	%xcc, 4f
	 or	%l7, %lo(sys_ni_syscall), %l7

linux_syscall_trace32:
	call	syscall_trace_enter
	 add	%sp, PTREGS_OFF, %o0
	brnz,pn	%o0, 3f
	 mov	-ENOSYS, %o0
	srl	%i0, 0, %o0
	srl	%i4, 0, %o4
	srl	%i1, 0, %o1
	srl	%i2, 0, %o2
	ba,pt	%xcc, 5f
	 srl	%i3, 0, %o3

linux_syscall_trace:
	call	syscall_trace_enter
	 add	%sp, PTREGS_OFF, %o0
	brnz,pn	%o0, 3f
	 mov	-ENOSYS, %o0
	mov	%i0, %o0
	mov	%i1, %o1
	mov	%i2, %o2
	mov	%i3, %o3
	b,pt	%xcc, 2f
	 mov	%i4, %o4


	/* Linux 32-bit system calls enter here... */
	.align	32
	.globl	linux_sparc_syscall32
linux_sparc_syscall32:
	/* Direct access to user regs, much faster. */
	cmp	%g1, NR_syscalls			! IEU1	Group
	bgeu,pn	%xcc, linux_sparc_ni_syscall		! CTI
	 srl	%i0, 0, %o0				! IEU0
	sll	%g1, 2, %l4				! IEU0	Group
	srl	%i4, 0, %o4				! IEU1
	lduw	[%l7 + %l4], %l7			! Load
	srl	%i1, 0, %o1				! IEU0	Group
	ldx	[%g6 + TI_FLAGS], %l0		! Load

	srl	%i3, 0, %o3				! IEU0
	srl	%i2, 0, %o2				! IEU0	Group
	andcc	%l0, (_TIF_SYSCALL_TRACE|_TIF_SECCOMP|_TIF_SYSCALL_AUDIT|_TIF_SYSCALL_TRACEPOINT|_TIF_NOHZ), %g0
	bne,pn	%icc, linux_syscall_trace32		! CTI
	 mov	%i0, %l5				! IEU1
5:	call	%l7					! CTI	Group brk forced
	 srl	%i5, 0, %o5				! IEU1
	ba,pt	%xcc, 3f
	 sra	%o0, 0, %o0

	/* Linux native system calls enter here... */
	.align	32
	.globl	linux_sparc_syscall
linux_sparc_syscall:
	/* Direct access to user regs, much faster. */
	cmp	%g1, NR_syscalls			! IEU1	Group
	bgeu,pn	%xcc, linux_sparc_ni_syscall		! CTI
	 mov	%i0, %o0				! IEU0
	sll	%g1, 2, %l4				! IEU0	Group
	mov	%i1, %o1				! IEU1
	lduw	[%l7 + %l4], %l7			! Load
4:	mov	%i2, %o2				! IEU0	Group
	ldx	[%g6 + TI_FLAGS], %l0		! Load

	mov	%i3, %o3				! IEU1
	mov	%i4, %o4				! IEU0	Group
	andcc	%l0, (_TIF_SYSCALL_TRACE|_TIF_SECCOMP|_TIF_SYSCALL_AUDIT|_TIF_SYSCALL_TRACEPOINT|_TIF_NOHZ), %g0
	bne,pn	%icc, linux_syscall_trace		! CTI	Group
	 mov	%i0, %l5				! IEU0
2:	call	%l7					! CTI	Group brk forced
	 mov	%i5, %o5				! IEU0
	nop

3:	stx	%o0, [%sp + PTREGS_OFF + PT_V9_I0]
ret_sys_call:
	ldx	[%sp + PTREGS_OFF + PT_V9_TSTATE], %g3
	mov	%ulo(TSTATE_XCARRY | TSTATE_ICARRY), %g2
	sllx	%g2, 32, %g2

	cmp	%o0, -ERESTART_RESTARTBLOCK
	bgeu,pn	%xcc, 1f
	 andcc	%l0, (_TIF_SYSCALL_TRACE|_TIF_SECCOMP|_TIF_SYSCALL_AUDIT|_TIF_SYSCALL_TRACEPOINT|_TIF_NOHZ), %g0
	ldx	[%sp + PTREGS_OFF + PT_V9_TNPC], %l1 ! pc = npc

2:
	/* System call success, clear Carry condition code. */
	andn	%g3, %g2, %g3
3:
	stx	%g3, [%sp + PTREGS_OFF + PT_V9_TSTATE]	
	bne,pn	%icc, linux_syscall_trace2
	 add	%l1, 0x4, %l2			! npc = npc+4
	stx	%l1, [%sp + PTREGS_OFF + PT_V9_TPC]
	ba,pt	%xcc, rtrap
	 stx	%l2, [%sp + PTREGS_OFF + PT_V9_TNPC]

1:
	/* Check if force_successful_syscall_return()
	 * was invoked.
	 */
	ldub	[%g6 + TI_SYS_NOERROR], %l2
	brnz,pn %l2, 2b
	 ldx	[%sp + PTREGS_OFF + PT_V9_TNPC], %l1 ! pc = npc
	/* System call failure, set Carry condition code.
	 * Also, get abs(errno) to return to the process.
	 */
	sub	%g0, %o0, %o0
	stx	%o0, [%sp + PTREGS_OFF + PT_V9_I0]
	ba,pt	%xcc, 3b
	 or	%g3, %g2, %g3

linux_syscall_trace2:
	call	syscall_trace_leave
	 add	%sp, PTREGS_OFF, %o0
	stx	%l1, [%sp + PTREGS_OFF + PT_V9_TPC]
	ba,pt	%xcc, rtrap
	 stx	%l2, [%sp + PTREGS_OFF + PT_V9_TNPC]
Commit	Line	Data
6eda3a75 DM	1	/* SunOS's execv() call only specifies the argv argument, the
	2	* environment settings are the same as the calling processes.
	3	*/
eb48ffcf AV	4	sys64_execve:
	5	set sys_execve, %g1
	6	jmpl %g1, %g0
	7	flushw
6eda3a75 DM	8
	9	#ifdef CONFIG_COMPAT
	10	sunos_execv:
eb48ffcf	11	mov %g0, %o2
6eda3a75	12	sys32_execve:
eb48ffcf	13	set compat_sys_execve, %g1
6eda3a75	14	jmpl %g1, %g0
eb48ffcf AV	15	flushw
eb48ffcf AV	16	#endif
6eda3a75 DM	17
6eda3a75 DM	18	.align 32
1134723e	19	sys_sparc_pipe:
e4265019	20	ba,pt %xcc, sys_sparc_pipe_real
6eda3a75 DM	21	add %sp, PTREGS_OFF, %o0
	22	sys_nis_syscall:
	23	ba,pt %xcc, c_sys_nis_syscall
	24	add %sp, PTREGS_OFF, %o0
	25	sys_memory_ordering:
	26	ba,pt %xcc, sparc_memory_ordering
	27	add %sp, PTREGS_OFF, %o1
6eda3a75 DM	28	#ifdef CONFIG_COMPAT
	29	sys32_sigstack:
	30	ba,pt %xcc, do_sys32_sigstack
	31	mov %i6, %o2
6eda3a75 DM	32	#endif
	33	.align 32
	34	#ifdef CONFIG_COMPAT
	35	sys32_sigreturn:
	36	add %sp, PTREGS_OFF, %o0
	37	call do_sigreturn32
	38	add %o7, 1f-.-4, %o7
	39	nop
	40	#endif
	41	sys_rt_sigreturn:
	42	add %sp, PTREGS_OFF, %o0
	43	call do_rt_sigreturn
	44	add %o7, 1f-.-4, %o7
	45	nop
	46	#ifdef CONFIG_COMPAT
	47	sys32_rt_sigreturn:
	48	add %sp, PTREGS_OFF, %o0
	49	call do_rt_sigreturn32
	50	add %o7, 1f-.-4, %o7
	51	nop
	52	#endif
	53	.align 32
	54	1: ldx [%g6 + TI_FLAGS], %l5
812cb83a	55	andcc %l5, (_TIF_SYSCALL_TRACE\|_TIF_SECCOMP\|_TIF_SYSCALL_AUDIT\|_TIF_SYSCALL_TRACEPOINT\|_TIF_NOHZ), %g0
6eda3a75 DM	56	be,pt %icc, rtrap
6eda3a75 DM	57	nop
fe06ccaa DM	58	call syscall_trace_leave
fe06ccaa DM	59	add %sp, PTREGS_OFF, %o0
6eda3a75 DM	60	ba,pt %xcc, rtrap
	61	nop
	62
	63	/* This is how fork() was meant to be done, 8 instruction entry.
	64	*
	65	* I questioned the following code briefly, let me clear things
	66	* up so you must not reason on it like I did.
	67	*
	68	* Know the fork_kpsr etc. we use in the sparc32 port? We don't
	69	* need it here because the only piece of window state we copy to
	70	* the child is the CWP register. Even if the parent sleeps,
	71	* we are safe because we stuck it into pt_regs of the parent
	72	* so it will not change.
	73	*
	74	* XXX This raises the question, whether we can do the same on
	75	* XXX sparc32 to get rid of fork_kpsr _and_ fork_kwim. The
	76	* XXX answer is yes. We stick fork_kpsr in UREG_G0 and
	77	* XXX fork_kwim in UREG_G1 (global registers are considered
	78	* XXX volatile across a system call in the sparc ABI I think
	79	* XXX if it isn't we can use regs->y instead, anyone who depends
	80	* XXX upon the Y register being preserved across a fork deserves
	81	* XXX to lose).
	82	*
	83	* In fact we should take advantage of that fact for other things
	84	* during system calls...
	85	*/
	86	.align 32
	87	sys_vfork: /* Under Linux, vfork and fork are just special cases of clone. */
	88	sethi %hi(0x4000 \| 0x0100 \| SIGCHLD), %o0
	89	or %o0, %lo(0x4000 \| 0x0100 \| SIGCHLD), %o0
	90	ba,pt %xcc, sys_clone
	91	sys_fork:
	92	clr %o1
	93	mov SIGCHLD, %o0
	94	sys_clone:
	95	flushw
	96	movrz %o1, %fp, %o1
	97	mov 0, %o3
	98	ba,pt %xcc, sparc_do_fork
	99	add %sp, PTREGS_OFF, %o2
	100
37d6fa34 KT	101	.globl ret_from_fork
37d6fa34 KT	102	ret_from_fork:
c7d5a005	103	/* Clear current_thread_info()->new_child. */
6eda3a75	104	stb %g0, [%g6 + TI_NEW_CHILD]
6eda3a75 DM	105	call schedule_tail
6eda3a75 DM	106	mov %g7, %o0
1918c7f5	107	ldx [%sp + PTREGS_OFF + PT_V9_I0], %o0
2f12af35	108	brnz,pt %o0, ret_sys_call
1918c7f5	109	ldx [%g6 + TI_FLAGS], %l0
2f12af35 AV	110	ldx [%sp + PTREGS_OFF + PT_V9_G1], %l1
2f12af35 AV	111	call %l1
1918c7f5	112	ldx [%sp + PTREGS_OFF + PT_V9_G2], %o0
c7d5a005	113	ba,pt %xcc, ret_sys_call
2f12af35	114	mov 0, %o0
6eda3a75	115
de7531e8 DM	116	.globl sparc_exit_group
	117	.type sparc_exit_group,#function
	118	sparc_exit_group:
	119	sethi %hi(sys_exit_group), %g7
	120	ba,pt %xcc, 1f
	121	or %g7, %lo(sys_exit_group), %g7
	122	.size sparc_exit_group,.-sparc_exit_group
	123
6eda3a75 DM	124	.globl sparc_exit
	125	.type sparc_exit,#function
	126	sparc_exit:
de7531e8 DM	127	sethi %hi(sys_exit), %g7
	128	or %g7, %lo(sys_exit), %g7
	129	1: rdpr %pstate, %g2
6eda3a75 DM	130	wrpr %g2, PSTATE_IE, %pstate
	131	rdpr %otherwin, %g1
	132	rdpr %cansave, %g3
	133	add %g3, %g1, %g3
	134	wrpr %g3, 0x0, %cansave
	135	wrpr %g0, 0x0, %otherwin
	136	wrpr %g2, 0x0, %pstate
de7531e8	137	jmpl %g7, %g0
6eda3a75 DM	138	stb %g0, [%g6 + TI_WSAVED]
	139	.size sparc_exit,.-sparc_exit
	140
	141	linux_sparc_ni_syscall:
	142	sethi %hi(sys_ni_syscall), %l7
	143	ba,pt %xcc, 4f
	144	or %l7, %lo(sys_ni_syscall), %l7
	145
	146	linux_syscall_trace32:
fe06ccaa DM	147	call syscall_trace_enter
fe06ccaa DM	148	add %sp, PTREGS_OFF, %o0
73ccefab RM	149	brnz,pn %o0, 3f
73ccefab RM	150	mov -ENOSYS, %o0
6eda3a75 DM	151	srl %i0, 0, %o0
	152	srl %i4, 0, %o4
	153	srl %i1, 0, %o1
	154	srl %i2, 0, %o2
ab2abda6	155	ba,pt %xcc, 5f
6eda3a75 DM	156	srl %i3, 0, %o3
	157
	158	linux_syscall_trace:
fe06ccaa DM	159	call syscall_trace_enter
fe06ccaa DM	160	add %sp, PTREGS_OFF, %o0
73ccefab RM	161	brnz,pn %o0, 3f
73ccefab RM	162	mov -ENOSYS, %o0
6eda3a75 DM	163	mov %i0, %o0
	164	mov %i1, %o1
	165	mov %i2, %o2
	166	mov %i3, %o3
	167	b,pt %xcc, 2f
	168	mov %i4, %o4
	169
	170
	171	/* Linux 32-bit system calls enter here... */
	172	.align 32
	173	.globl linux_sparc_syscall32
	174	linux_sparc_syscall32:
	175	/* Direct access to user regs, much faster. */
c658ad1b	176	cmp %g1, NR_syscalls ! IEU1 Group
6eda3a75 DM	177	bgeu,pn %xcc, linux_sparc_ni_syscall ! CTI
	178	srl %i0, 0, %o0 ! IEU0
	179	sll %g1, 2, %l4 ! IEU0 Group
	180	srl %i4, 0, %o4 ! IEU1
	181	lduw [%l7 + %l4], %l7 ! Load
	182	srl %i1, 0, %o1 ! IEU0 Group
	183	ldx [%g6 + TI_FLAGS], %l0 ! Load
	184
ab2abda6	185	srl %i3, 0, %o3 ! IEU0
6eda3a75	186	srl %i2, 0, %o2 ! IEU0 Group
812cb83a	187	andcc %l0, (_TIF_SYSCALL_TRACE\|_TIF_SECCOMP\|_TIF_SYSCALL_AUDIT\|_TIF_SYSCALL_TRACEPOINT\|_TIF_NOHZ), %g0
6eda3a75 DM	188	bne,pn %icc, linux_syscall_trace32 ! CTI
6eda3a75 DM	189	mov %i0, %l5 ! IEU1
ab2abda6 KT	190	5: call %l7 ! CTI Group brk forced
ab2abda6 KT	191	srl %i5, 0, %o5 ! IEU1
1535bd8a DK	192	ba,pt %xcc, 3f
1535bd8a DK	193	sra %o0, 0, %o0
6eda3a75 DM	194
	195	/* Linux native system calls enter here... */
	196	.align 32
	197	.globl linux_sparc_syscall
	198	linux_sparc_syscall:
	199	/* Direct access to user regs, much faster. */
c658ad1b	200	cmp %g1, NR_syscalls ! IEU1 Group
6eda3a75 DM	201	bgeu,pn %xcc, linux_sparc_ni_syscall ! CTI
	202	mov %i0, %o0 ! IEU0
	203	sll %g1, 2, %l4 ! IEU0 Group
	204	mov %i1, %o1 ! IEU1
	205	lduw [%l7 + %l4], %l7 ! Load
	206	4: mov %i2, %o2 ! IEU0 Group
	207	ldx [%g6 + TI_FLAGS], %l0 ! Load
	208
	209	mov %i3, %o3 ! IEU1
	210	mov %i4, %o4 ! IEU0 Group
812cb83a	211	andcc %l0, (_TIF_SYSCALL_TRACE\|_TIF_SECCOMP\|_TIF_SYSCALL_AUDIT\|_TIF_SYSCALL_TRACEPOINT\|_TIF_NOHZ), %g0
6eda3a75 DM	212	bne,pn %icc, linux_syscall_trace ! CTI Group
	213	mov %i0, %l5 ! IEU0
	214	2: call %l7 ! CTI Group brk forced
	215	mov %i5, %o5 ! IEU0
	216	nop
	217
	218	3: stx %o0, [%sp + PTREGS_OFF + PT_V9_I0]
	219	ret_sys_call:
	220	ldx [%sp + PTREGS_OFF + PT_V9_TSTATE], %g3
6eda3a75 DM	221	mov %ulo(TSTATE_XCARRY \| TSTATE_ICARRY), %g2
	222	sllx %g2, 32, %g2
	223
6eda3a75 DM	224	cmp %o0, -ERESTART_RESTARTBLOCK
6eda3a75 DM	225	bgeu,pn %xcc, 1f
812cb83a	226	andcc %l0, (_TIF_SYSCALL_TRACE\|_TIF_SECCOMP\|_TIF_SYSCALL_AUDIT\|_TIF_SYSCALL_TRACEPOINT\|_TIF_NOHZ), %g0
55c2770e AV	227	ldx [%sp + PTREGS_OFF + PT_V9_TNPC], %l1 ! pc = npc
	228
	229	2:
6eda3a75 DM	230	/* System call success, clear Carry condition code. */
6eda3a75 DM	231	andn %g3, %g2, %g3
55c2770e	232	3:
6eda3a75 DM	233	stx %g3, [%sp + PTREGS_OFF + PT_V9_TSTATE]
	234	bne,pn %icc, linux_syscall_trace2
	235	add %l1, 0x4, %l2 ! npc = npc+4
	236	stx %l1, [%sp + PTREGS_OFF + PT_V9_TPC]
	237	ba,pt %xcc, rtrap
	238	stx %l2, [%sp + PTREGS_OFF + PT_V9_TNPC]
	239
	240	1:
55c2770e AV	241	/* Check if force_successful_syscall_return()
	242	* was invoked.
	243	*/
	244	ldub [%g6 + TI_SYS_NOERROR], %l2
	245	brnz,pn %l2, 2b
	246	ldx [%sp + PTREGS_OFF + PT_V9_TNPC], %l1 ! pc = npc
6eda3a75 DM	247	/* System call failure, set Carry condition code.
	248	* Also, get abs(errno) to return to the process.
	249	*/
6eda3a75	250	sub %g0, %o0, %o0
6eda3a75	251	stx %o0, [%sp + PTREGS_OFF + PT_V9_I0]
55c2770e AV	252	ba,pt %xcc, 3b
55c2770e AV	253	or %g3, %g2, %g3
6eda3a75	254
6eda3a75	255	linux_syscall_trace2:
fe06ccaa DM	256	call syscall_trace_leave
fe06ccaa DM	257	add %sp, PTREGS_OFF, %o0
6eda3a75 DM	258	stx %l1, [%sp + PTREGS_OFF + PT_V9_TPC]
	259	ba,pt %xcc, rtrap
	260	stx %l2, [%sp + PTREGS_OFF + PT_V9_TNPC]