cgen_vhdl: add SDB descriptor while generating package (v0.7.0)

You only need to add sdb_vendor in your *.wb to generate the file {... hdl_entity = "wb_clk_counters"; sdb_vendor = 0x7501; sdb_version = 1; ... } Then you can generate with the new example/Makefile by calling: make pts or wbgen2 --vo=wb_clk_counters.vhdl --vpo=wb_clk_counters_pkg.vhdl --hstyle=record wb_clk_counters.wb IMPORTANT: This new option requires lua-md5 library sudo apt-get install lua-md5

cgen_vhdl: add SDB descriptor while generating package (v0.7.0)
You only need to add sdb_vendor in your *.wb to generate the file {... hdl_entity = "wb_clk_counters"; sdb_vendor = 0x7501; sdb_version = 1; ... } Then you can generate with the new example/Makefile by calling: make pts or wbgen2 --vo=wb_clk_counters.vhdl --vpo=wb_clk_counters_pkg.vhdl --hstyle=record wb_clk_counters.wb IMPORTANT: This new option requires lua-md5 library sudo apt-get install lua-md5
dc95bb1f · Benoit Rat · bc438b51 · dc95bb1f · dc95bb1f · dc95bb1f
Commit dc95bb1f authored Nov 27, 2014 by Benoit Rat
Hide whitespace changes
Inline Side-by-side

Showing with 54 additions and 2 deletions

cgen_vhdl.lua cgen_vhdl.lua +49 -0

Makefile examples/Makefile +4 -1

wbgen_main.lua wbgen_main.lua +1 -1

No files found.
--- a/cgen_vhdl.lua
+++ b/cgen_vhdl.lua
@@ -8,6 +8,7 @@
 -- The VHDL code generator.
 --

+
 -- conversion table between VHDL data types and wbgen2 internal data types
 fieldtype_2_vhdl={};
 fieldtype_2_vhdl[BIT]="std_logic";
@@ -71,6 +72,7 @@ function cgen_vhdl_package()
   indent_right();
   emit("");

+   cgen_vhdl_sdb_pkg()

   emit("");
   emit("-- Input registers (user design -> WB slave)");
@@ -192,6 +194,53 @@ function cgen_vhdl_port_struct(direction)

 end

+--function to generate the SDB descriptor for the VHDL package
+md5 = require "md5" --sudo apt-get install lua-md5
+function cgen_vhdl_sdb_pkg()
+
+    ---In order to print sdb descriptor you must have sdb_vendor ID
+    if(periph.sdb_vendor ~= nil) then
+
+    emit("");
+    emit("-- Device descriptor for" .. periph.name);
+    emit("constant c_" ..string.upper(periph.hdl_entity).."_SDB   :   t_sdb_device  :=");
+    emit("(");
+    indent_right();
+    emit("abi_class     => x\"0000\",");
+    emit("abi_ver_major => x\"01\",");
+    emit("abi_ver_minor => x\"01\",");
+    emit("wbd_endian    => c_sdb_endian_big,");
+    emit("wbd_width     => x\"7\",");
+    emit("sdb_component =>");
+    emit("(");
+    indent_right();
+    emit("addr_first  => x\"0000000000000000\",");
+    --Bad hack to obtain maximum size
+    if ((periph.regcount+periph.fifocount+periph.irqcount)*4 <256 and periph.ramcount ==0) then
+    	emit("addr_last   => x\"00000000000000ff\",");
+    else
+    	emit("addr_last   => x\"000000000000ffff\",");
+    end
+    emit("product     =>");
+    emit("(");
+    emit("vendor_id => x\""..string.format("%016X",periph.sdb_vendor).."\",");
+    emit("device_id => x\""..string.sub(md5.sumhexa(periph.hdl_entity),0,8).."\",         -- echo -n \""..periph.hdl_entity.."\" | md5sum - | cut -c1-8");
+    if(periph.sdb_version == nil) then 
+        periph.sdb_version=0
+    end
+    emit("version   => x\""..string.format("%08X",periph.sdb_version).."\",");
+    emit("date      => x\""..os.date("%Y%m%d").."\",");
+    emit("name      => \""..string.format("%-19s",string.upper(string.gsub(periph.hdl_entity,"_","-"))).."\"");
+    emit(")");
+    indent_left();
+    emit(")");
+    indent_left();
+    emit(");");
+    emit("");
+    end 
+end
+
+
 -- function generates a VHDL file header (some comments and library/package include definitions).
 function cgen_vhdl_header(file_name)
    emit("---------------------------------------------------------------------------------------");

--- a/examples/Makefile
+++ b/examples/Makefile
@@ -27,6 +27,7 @@ html: $(WBINPUT:.wb=.html)
 db: $(WBINPUT:.wb=.db)
 header: $(WBINPUT:.wb=.h)
 tex: $(WBINPUT:.wb=.tex)
+pkg: $(WBINPUT:.wb=_pkg.vhd)

 ## Outputs generation
 %.vhd: %.wb
@@ -43,7 +44,9 @@ tex: $(WBINPUT:.wb=.tex)

 %.tex: %.wb
 	wbgen2 --docformat=latex --docu=$@ $<
-
+	
+%_pkg.vhd: %.wb
+	wbgen2 --vo=$*.vhdl --vpo=$@ --hstyle=record $<

 ## Cleaning
 clean:

--- a/wbgen_main.lua
+++ b/wbgen_main.lua
@@ -18,7 +18,7 @@
 -- MA 02111-1307, USA.
 --

-wbgen2_version="0.6.1-alpha"
+wbgen2_version="0.7.0-alpha"

 options = {};
 options.reset_type = "asynchronous";