开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > VHDL/FPGA/Verilog > 查看源码
pr.v
资源名称：_8259A.zip　[点击查看]
上传用户：tzxuweilin
上传日期：2022-08-10
资源大小：747k
文件大小：10k
源码类别：

VHDL/FPGA/Verilog

开发平台：

VHDL

pr.v：源码内容
  1. module pr(sm, mask, request, isr, sp, eoi, isr_set, isr_clr, intr, code);
  2. input sm;
  3. input[7:0] mask;
  4. input[7:0] request;
  5. input[7:0] isr;
  6. input[2:0] sp;
  7. input[7:0] eoi;
  8. output[7:0] isr_set;
  9. output[7:0] isr_clr;
  10. output intr;
  11. output[2:0] code;
  12. wire[7:0] nmr;
  13. wire[7:0] isr_clr;
  14. wire[7:0] isr_set;
  15. reg[2:0] position, hp_nmr, hp_isr;
  17. assign nmr = (~mask) & request;
  18. assign isr_clr = eoi;
  19. assign isr_set[0] = (sm && /*hp_nmr != 3'd8 && */position == 3'd0) || (~sm && hp_nmr < hp_isr && position == 3'd0) ? 1'b1 : 1'b0;
  20. assign isr_set[1] = (sm && /*hp_nmr != 3'd8 && */position == 3'd1) || (~sm && hp_nmr < hp_isr && position == 3'd1) ? 1'b1 : 1'b0;
  21. assign isr_set[2] = (sm && /*hp_nmr != 3'd8 && */position == 3'd2) || (~sm && hp_nmr < hp_isr && position == 3'd2) ? 1'b1 : 1'b0;
  22. assign isr_set[3] = (sm && /*hp_nmr != 3'd8 && */position == 3'd3) || (~sm && hp_nmr < hp_isr && position == 3'd3) ? 1'b1 : 1'b0;
  23. assign isr_set[4] = (sm && /*hp_nmr != 3'd8 && */position == 3'd4) || (~sm && hp_nmr < hp_isr && position == 3'd4) ? 1'b1 : 1'b0;
  24. assign isr_set[5] = (sm && /*hp_nmr != 3'd8 && */position == 3'd5) || (~sm && hp_nmr < hp_isr && position == 3'd5) ? 1'b1 : 1'b0;
  25. assign isr_set[6] = (sm && /*hp_nmr != 3'd8 && */position == 3'd6) || (~sm && hp_nmr < hp_isr && position == 3'd6) ? 1'b1 : 1'b0;
  26. assign isr_set[7] = (sm && /*hp_nmr != 3'd8 && */position == 3'd7) || (~sm && hp_nmr < hp_isr && position == 3'd7) ? 1'b1 : 1'b0;
  27. // FOR /L %i IN (0, 1, 7) do (ECHO "assign isr_set[%i] = (sm && /*hp_nmr != 3'd8 && */position == 3'd%i) || (~sm && hp_nmr < hp_isr && position == 3'd%i) ? 1'b1 : 1'b0;" >> a.txt)
  28. assign code = (isr == 8'd0) ? 3'b000 : position;
  29. assign intr = ((/*hp_nmr != 3'd8 && */sm) || (/*hp_nmr != 3'd8 && */~sm && hp_nmr < hp_isr)) ? 1'b1 : 1'b0;
  31. always @(sp)
  32. begin
  33. if (nmr != 8'd0)
  34. begin
  35. case (sp)
  36. 3'd7:
  37. begin
  38. if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd0; end
  39. else if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd1; end
  40. else if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd2; end
  41. else if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd3; end
  42. else if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd4; end
  43. else if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd5; end
  44. else if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd6; end
  45. else if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd7; end
  46. end
  47. 3'd6:
  48. begin
  49. if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd0; end
  50. else if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd1; end
  51. else if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd2; end
  52. else if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd3; end
  53. else if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd4; end
  54. else if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd5; end
  55. else if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd6; end
  56. else if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd7; end
  57. end
  58. 3'd5:
  59. begin
  60. if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd0; end
  61. else if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd1; end
  62. else if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd2; end
  63. else if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd3; end
  64. else if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd4; end
  65. else if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd5; end
  66. else if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd6; end
  67. else if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd7; end
  68. end
  69. 3'd4:
  70. begin
  71. if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd0; end
  72. else if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd1; end
  73. else if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd2; end
  74. else if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd3; end
  75. else if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd4; end
  76. else if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd5; end
  77. else if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd6; end
  78. else if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd7; end
  79. end
  80. 3'd3:
  81. begin
  82. if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd0; end
  83. else if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd1; end
  84. else if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd2; end
  85. else if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd3; end
  86. else if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd4; end
  87. else if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd5; end
  88. else if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd6; end
  89. else if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd7; end
  90. end
  91. 3'd2:
  92. begin
  93. if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd0; end
  94. else if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd1; end
  95. else if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd2; end
  96. else if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd3; end
  97. else if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd4; end
  98. else if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd5; end
  99. else if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd6; end
  100. else if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd7; end
  101. end
  102. 3'd1:
  103. begin
  104. if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd0; end
  105. else if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd1; end
  106. else if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd2; end
  107. else if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd3; end
  108. else if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd4; end
  109. else if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd5; end
  110. else if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd6; end
  111. else if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd7; end
  112. end
  113. 3'd0:
  114. begin
  115. if (nmr[7] == 1'b1) begin position <= 3'd7; hp_nmr <= 3'd0; end
  116. else if (nmr[0] == 1'b1) begin position <= 3'd0; hp_nmr <= 3'd1; end
  117. else if (nmr[1] == 1'b1) begin position <= 3'd1; hp_nmr <= 3'd2; end
  118. else if (nmr[2] == 1'b1) begin position <= 3'd2; hp_nmr <= 3'd3; end
  119. else if (nmr[3] == 1'b1) begin position <= 3'd3; hp_nmr <= 3'd4; end
  120. else if (nmr[4] == 1'b1) begin position <= 3'd4; hp_nmr <= 3'd5; end
  121. else if (nmr[5] == 1'b1) begin position <= 3'd5; hp_nmr <= 3'd6; end
  122. else if (nmr[6] == 1'b1) begin position <= 3'd6; hp_nmr <= 3'd7; end
  123. end
  124. //// FOR /L %i in (0, 1, 7) do (ECHO "else if (nmr[%i] == 1) begin position <= %i; hp_nmr <= %i; end" >>a.txt)
  125. endcase
  126. end
  128. if (isr != 0)
  129. begin
  130. case (sp)
  131. 3'd7:
  132. begin
  133. if (isr[0] == 1'b1) hp_isr <= 3'd0;
  134. else if (isr[1] == 1'b1) hp_isr <= 3'd1;
  135. else if (isr[2] == 1'b1) hp_isr <= 3'd2;
  136. else if (isr[3] == 1'b1) hp_isr <= 3'd3;
  137. else if (isr[4] == 1'b1) hp_isr <= 3'd4;
  138. else if (isr[5] == 1'b1) hp_isr <= 3'd5;
  139. else if (isr[6] == 1'b1) hp_isr <= 3'd6;
  140. else if (isr[7] == 1'b1) hp_isr <= 3'd7;
  141. end
  142. 3'd6:
  143. begin
  144. if (isr[1] == 1'b1) hp_isr <= 3'd0;
  145. else if (isr[2] == 1'b1) hp_isr <= 3'd1;
  146. else if (isr[3] == 1'b1) hp_isr <= 3'd2;
  147. else if (isr[4] == 1'b1) hp_isr <= 3'd3;
  148. else if (isr[5] == 1'b1) hp_isr <= 3'd4;
  149. else if (isr[6] == 1'b1) hp_isr <= 3'd5;
  150. else if (isr[7] == 1'b1) hp_isr <= 3'd6;
  151. else if (isr[0] == 1'b1) hp_isr <= 3'd7;
  152. end
  153. 3'd5:
  154. begin
  155. if (isr[2] == 1'b1) hp_isr <= 3'd0;
  156. else if (isr[3] == 1'b1) hp_isr <= 3'd1;
  157. else if (isr[4] == 1'b1) hp_isr <= 3'd2;
  158. else if (isr[5] == 1'b1) hp_isr <= 3'd3;
  159. else if (isr[6] == 1'b1) hp_isr <= 3'd4;
  160. else if (isr[7] == 1'b1) hp_isr <= 3'd5;
  161. else if (isr[0] == 1'b1) hp_isr <= 3'd6;
  162. else if (isr[1] == 1'b1) hp_isr <= 3'd7;
  163. end
  164. 3'd4:
  165. begin
  166. if (isr[3] == 1'b1) hp_isr <= 3'd0;
  167. else if (isr[4] == 1'b1) hp_isr <= 3'd1;
  168. else if (isr[5] == 1'b1) hp_isr <= 3'd2;
  169. else if (isr[6] == 1'b1) hp_isr <= 3'd3;
  170. else if (isr[7] == 1'b1) hp_isr <= 3'd4;
  171. else if (isr[0] == 1'b1) hp_isr <= 3'd5;
  172. else if (isr[1] == 1'b1) hp_isr <= 3'd6;
  173. else if (isr[2] == 1'b1) hp_isr <= 3'd7;
  174. end
  175. 3'd3:
  176. begin
  177. if (isr[4] == 1'b1) hp_isr <= 3'd0;
  178. else if (isr[5] == 1'b1) hp_isr <= 3'd1;
  179. else if (isr[6] == 1'b1) hp_isr <= 3'd2;
  180. else if (isr[7] == 1'b1) hp_isr <= 3'd3;
  181. else if (isr[0] == 1'b1) hp_isr <= 3'd4;
  182. else if (isr[1] == 1'b1) hp_isr <= 3'd5;
  183. else if (isr[2] == 1'b1) hp_isr <= 3'd6;
  184. else if (isr[3] == 1'b1) hp_isr <= 3'd7;
  185. end
  186. 3'd2:
  187. begin
  188. if (isr[5] == 1'b1) hp_isr <= 3'd0;
  189. else if (isr[6] == 1'b1) hp_isr <= 3'd1;
  190. else if (isr[7] == 1'b1) hp_isr <= 3'd2;
  191. else if (isr[0] == 1'b1) hp_isr <= 3'd3;
  192. else if (isr[1] == 1'b1) hp_isr <= 3'd4;
  193. else if (isr[2] == 1'b1) hp_isr <= 3'd5;
  194. else if (isr[3] == 1'b1) hp_isr <= 3'd6;
  195. else if (isr[4] == 1'b1) hp_isr <= 3'd7;
  196. end
  197. 3'd1:
  198. begin
  199. if (isr[6] == 1'b1) hp_isr <= 3'd0;
  200. else if (isr[7] == 1'b1) hp_isr <= 3'd1;
  201. else if (isr[0] == 1'b1) hp_isr <= 3'd2;
  202. else if (isr[1] == 1'b1) hp_isr <= 3'd3;
  203. else if (isr[2] == 1'b1) hp_isr <= 3'd4;
  204. else if (isr[3] == 1'b1) hp_isr <= 3'd5;
  205. else if (isr[4] == 1'b1) hp_isr <= 3'd6;
  206. else if (isr[5] == 1'b1) hp_isr <= 3'd7;
  207. end
  208. 3'd0:
  209. begin
  210. if (isr[7] == 1'b1) hp_isr <= 3'd0;
  211. else if (isr[0] == 1'b1) hp_isr <= 3'd1;
  212. else if (isr[1] == 1'b1) hp_isr <= 3'd2;
  213. else if (isr[2] == 1'b1) hp_isr <= 3'd3;
  214. else if (isr[3] == 1'b1) hp_isr <= 3'd4;
  215. else if (isr[4] == 1'b1) hp_isr <= 3'd5;
  216. else if (isr[5] == 1'b1) hp_isr <= 3'd6;
  217. else if (isr[6] == 1'b1) hp_isr <= 3'd7;
  218. end
  219. endcase
  220. // FOR /L %i in (0, 1, 7) do (ECHO "else if (isr[%i] == 1) hp_isr <= %i;" >>a.txt)
  221. end
  222. end
  223. endmodule