2 * Copyright (C) 2013 Altera Corporation <www.altera.com>
4 * SPDX-License-Identifier: GPL-2.0+
10 #include <asm/arch/freeze_controller.h>
11 #include <asm/arch/scan_manager.h>
14 * Maximum polling loop to wait for IO scan chain engine becomes idle
15 * to prevent infinite loop. It is important that this is NOT changed
16 * to delay using timer functions, since at the time this function is
17 * called, timer might not yet be inited.
19 #define SCANMGR_MAX_DELAY 100
22 * Maximum length of TDI_TDO packet payload is 128 bits,
23 * represented by (length - 1) in TDI_TDO header.
25 #define TDI_TDO_MAX_PAYLOAD 127
27 #define SCANMGR_STAT_ACTIVE (1 << 31)
28 #define SCANMGR_STAT_WFIFOCNT_MASK 0x70000000
30 DECLARE_GLOBAL_DATA_PTR
;
32 static const struct socfpga_scan_manager
*scan_manager_base
=
33 (void *)(SOCFPGA_SCANMGR_ADDRESS
);
34 static const struct socfpga_freeze_controller
*freeze_controller_base
=
35 (void *)(SOCFPGA_SYSMGR_ADDRESS
+ SYSMGR_FRZCTRL_ADDRESS
);
38 * scan_chain_engine_is_idle() - Check if the JTAG scan chain is idle
39 * @max_iter: Maximum number of iterations to wait for idle
41 * Function to check IO scan chain engine status and wait if the engine is
42 * is active. Poll the IO scan chain engine till maximum iteration reached.
44 static u32
scan_chain_engine_is_idle(u32 max_iter
)
46 const u32 mask
= SCANMGR_STAT_ACTIVE
| SCANMGR_STAT_WFIFOCNT_MASK
;
49 /* Poll the engine until the scan engine is inactive. */
51 status
= readl(&scan_manager_base
->stat
);
59 #define JTAG_BP_INSN (1 << 0)
60 #define JTAG_BP_TMS (1 << 1)
61 #define JTAG_BP_PAYLOAD (1 << 2)
62 #define JTAG_BP_2BYTE (1 << 3)
63 #define JTAG_BP_4BYTE (1 << 4)
66 * scan_mgr_jtag_io() - Access the JTAG chain
67 * @flags: Control flags, used to configure the action on the JTAG
68 * @iarg: Instruction argument
69 * @parg: Payload argument or data
71 * Perform I/O on the JTAG chain
73 static void scan_mgr_jtag_io(const u32 flags
, const u8 iarg
, const u32 parg
)
77 if (flags
& JTAG_BP_INSN
) { /* JTAG instruction */
79 * The SCC JTAG register is LSB first, so make
80 * space for the instruction at the LSB.
83 if (flags
& JTAG_BP_TMS
) {
84 data
|= (0 << 7); /* TMS instruction. */
85 data
|= iarg
& 0x3f; /* TMS arg is 6 bits. */
86 if (flags
& JTAG_BP_PAYLOAD
)
89 data
|= (1 << 7); /* TDI/TDO instruction. */
90 data
|= iarg
& 0xf; /* TDI/TDO arg is 4 bits. */
91 if (flags
& JTAG_BP_PAYLOAD
)
96 if (flags
& JTAG_BP_4BYTE
)
97 writel(data
, &scan_manager_base
->fifo_quad_byte
);
98 else if (flags
& JTAG_BP_2BYTE
)
99 writel(data
& 0xffff, &scan_manager_base
->fifo_double_byte
);
101 writel(data
& 0xff, &scan_manager_base
->fifo_single_byte
);
105 * scan_mgr_io_scan_chain_prg() - Program HPS IO Scan Chain
106 * @io_scan_chain_id: IO scan chain ID
108 static int scan_mgr_io_scan_chain_prg(const unsigned int io_scan_chain_id
)
111 u32 io_scan_chain_len_in_bits
;
112 const unsigned long *iocsr_scan_chain
;
113 int i
, ret
, index
= 0;
115 ret
= iocsr_get_config_table(io_scan_chain_id
, &iocsr_scan_chain
,
116 &io_scan_chain_len_in_bits
);
121 * De-assert reinit if the IO scan chain is intended for HIO. In
122 * this, its the chain 3.
124 if (io_scan_chain_id
== 3)
125 clrbits_le32(&freeze_controller_base
->hioctrl
,
126 SYSMGR_FRZCTRL_HIOCTRL_DLLRST_MASK
);
129 * Check if the scan chain engine is inactive and the
130 * WFIFO is empty before enabling the IO scan chain
132 ret
= scan_chain_engine_is_idle(SCANMGR_MAX_DELAY
);
137 * Enable IO Scan chain based on scan chain id
138 * Note: only one chain can be enabled at a time
140 setbits_le32(&scan_manager_base
->en
, 1 << io_scan_chain_id
);
142 /* Program IO scan chain in 128-bit iteration */
143 for (i
= 0; i
< io_scan_chain_len_in_bits
/ 128; i
++) {
144 /* Write TDI_TDO packet header for 128-bit IO scan chain */
145 scan_mgr_jtag_io(JTAG_BP_INSN
| JTAG_BP_2BYTE
, 0x0,
146 TDI_TDO_MAX_PAYLOAD
);
148 /* write 4 successive 32-bit IO scan chain data into WFIFO */
149 scan_mgr_jtag_io(JTAG_BP_4BYTE
, 0x0, iocsr_scan_chain
[index
++]);
150 scan_mgr_jtag_io(JTAG_BP_4BYTE
, 0x0, iocsr_scan_chain
[index
++]);
151 scan_mgr_jtag_io(JTAG_BP_4BYTE
, 0x0, iocsr_scan_chain
[index
++]);
152 scan_mgr_jtag_io(JTAG_BP_4BYTE
, 0x0, iocsr_scan_chain
[index
++]);
155 * Check if the scan chain engine has completed the
156 * IO scan chain data shifting
158 ret
= scan_chain_engine_is_idle(SCANMGR_MAX_DELAY
);
163 residual
= io_scan_chain_len_in_bits
% 128;
165 /* Final TDI_TDO packet (if chain length is not aligned to 128 bits) */
168 * Program the last part of IO scan chain write TDI_TDO
169 * packet header (2 bytes) to scan manager.
171 scan_mgr_jtag_io(JTAG_BP_INSN
| JTAG_BP_2BYTE
, 0x0,
174 for (i
= 0; i
< residual
/ 32; i
++) {
176 * write remaining scan chain data into scan
177 * manager WFIFO with 4 bytes write
179 scan_mgr_jtag_io(JTAG_BP_4BYTE
, 0x0,
180 iocsr_scan_chain
[index
++]);
183 residual
= io_scan_chain_len_in_bits
% 32;
186 * write the last 4B scan chain data
187 * into scan manager WFIFO
189 scan_mgr_jtag_io(JTAG_BP_4BYTE
, 0x0,
190 iocsr_scan_chain
[index
]);
193 * write the remaining 1 - 3 bytes scan chain
194 * data into scan manager WFIFO byte by byte
195 * to prevent JTAG engine shifting unused data
196 * from the FIFO and mistaken the data as a
197 * valid command (even though unused bits are
198 * set to 0, but just to prevent hardware
201 for (i
= 0; i
< residual
; i
+= 8) {
202 scan_mgr_jtag_io(0, 0x0,
203 iocsr_scan_chain
[index
] >> i
);
208 * Check if the scan chain engine has completed the
209 * IO scan chain data shifting
211 ret
= scan_chain_engine_is_idle(SCANMGR_MAX_DELAY
);
216 /* Disable IO Scan chain when configuration done*/
217 clrbits_le32(&scan_manager_base
->en
, 1 << io_scan_chain_id
);
221 /* Disable IO Scan chain when error detected */
222 clrbits_le32(&scan_manager_base
->en
, 1 << io_scan_chain_id
);
226 int scan_mgr_configure_iocsr(void)
230 /* configure the IOCSR through scan chain */
231 status
|= scan_mgr_io_scan_chain_prg(0);
232 status
|= scan_mgr_io_scan_chain_prg(1);
233 status
|= scan_mgr_io_scan_chain_prg(2);
234 status
|= scan_mgr_io_scan_chain_prg(3);