OpenCores
URL https://opencores.org/ocsvn/8051/8051/trunk

Subversion Repositories 8051

[/] [8051/] [trunk/] [rtl/] [verilog/] [oc8051_divide.v] - Rev 2

Go to most recent revision | Compare with Previous | Blame | View Log

//////////////////////////////////////////////////////////////////////
//// 								  ////
//// divide for 8051 Core 				  	  ////
//// 								  ////
//// This file is part of the 8051 cores project 		  ////
//// http://www.opencores.org/cores/8051/ 			  ////
//// 								  ////
//// Description 						  ////
//// Implementation of division used in alu.v	 		  ////
//// 								  ////
//// To Do: 							  ////
////  Nothing							  ////
//// 								  ////
//// Author(s): 						  ////
//// - Simon Teran, simont@opencores.org 			  ////
//// 								  ////
//////////////////////////////////////////////////////////////////////
//// 								  ////
//// Copyright (C) 2001 Authors and OPENCORES.ORG 		  ////
//// 								  ////
//// This source file may be used and distributed without 	  ////
//// restriction provided that this copyright statement is not 	  ////
//// removed from the file and that any derivative work contains  ////
//// the original copyright notice and the associated disclaimer. ////
//// 								  ////
//// This source file is free software; you can redistribute it   ////
//// and/or modify it under the terms of the GNU Lesser General   ////
//// Public License as published by the Free Software Foundation; ////
//// either version 2.1 of the License, or (at your option) any   ////
//// later version. 						  ////
//// 								  ////
//// This source 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 Lesser General Public License for more  ////
//// details. 							  ////
//// 								  ////
//// You should have received a copy of the GNU Lesser General 	  ////
//// Public License along with this source; if not, download it   ////
//// from http://www.opencores.org/lgpl.shtml 			  ////
//// 								  ////
//////////////////////////////////////////////////////////////////////
//
// ver: 1
//
 
// synopsys translate_off
`include "oc8051_timescale.v"
// synopsys translate_on
 
module oc8051_divide (src1, src2, des1, des2, desOv);
//
// this module is part of alu
// src1         (in)  first operand
// src2         (in)  second operand
// des1         (out) first result
// des2         (out) second result
// desOv        (out) Overflow output
//
 
input [7:0] src1, src2;
output desOv;
output [7:0] des1, des2;
reg desOv; reg [7:0] des1, des2;
reg [8:0] div1,div2;
 
always @(src1 or src2)
begin
      if (src2==8'b0000_0000) begin
        des1=8'bxxxx_xxxx;
        des2=8'bxxxx_xxxx;
        desOv=1'b1;
      end
      else if (src1==src2) begin
        des1=8'b0000_0001;
        des2=8'b0000_0000;
        desOv=1'b0;
      end
      else if (src1<src2) begin
        des1=8'b0000_0000;
        des2=src1;
        desOv=1'b0;
      end
      else begin
        des1=src1;
        des2=8'b0000_0000;
 
        div2={1'b0,src2};
 
// begin loop
//loop 0
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
 
//loop 1
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
//loop 2
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
//loop 3
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
//loop 4
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
//loop 5
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
//loop 6
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
//loop 7
        des2={des2[6:0],des1[7]};
        des1={des1[6:0], 1'b0};
        div1={1'b1, des2};
        div1= div1 - div2;
 
        if (div1[8]==1'b1) begin
          des1[0]= 1'b1;
          des2=div1[7:0];
        end
 
 
// end loop
          desOv=1'b0;
      end
end
 
endmodule
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.