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

Subversion Repositories sockit_owm

[/] [sockit_owm/] [trunk/] [sockit_owm_hw.tcl] - Diff between revs 3 and 5

Only display areas with differences | Details | Blame | View Log

Rev 3 Rev 5
###############################################################################
###############################################################################
#                                                                             #
#                                                                             #
#  Minimalistic 1-wire (onewire) master with Avalon MM bus interface          #
#  Minimalistic 1-wire (onewire) master with Avalon MM bus interface          #
#                                                                             #
#                                                                             #
#  Copyright (C) 2010  Iztok Jeras                                            #
#  Copyright (C) 2010  Iztok Jeras                                            #
#                                                                             #
#                                                                             #
###############################################################################
###############################################################################
#                                                                             #
#                                                                             #
#  This script is free hardware: you can redistribute it and/or modify        #
#  This script is free hardware: you can redistribute it and/or modify        #
#  it under the terms of the GNU Lesser General Public License                #
#  it under the terms of the GNU Lesser General Public License                #
#  as published by the Free Software Foundation, either                       #
#  as published by the Free Software Foundation, either                       #
#  version 3 of the License, or (at your option) any later version.           #
#  version 3 of the License, or (at your option) any later version.           #
#                                                                             #
#                                                                             #
#  This RTL is distributed in the hope that it will be useful,                #
#  This RTL is distributed in the hope that it will be useful,                #
#  but WITHOUT ANY WARRANTY; without even the implied warranty of             #
#  but WITHOUT ANY WARRANTY; without even the implied warranty of             #
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the              #
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the              #
#  GNU General Public License for more details.                               #
#  GNU General Public License for more details.                               #
#                                                                             #
#                                                                             #
#  You should have received a copy of the GNU General Public License          #
#  You should have received a copy of the GNU General Public License          #
#  along with this program.  If not, see <http:#www.gnu.org/licenses/>.       #
#  along with this program.  If not, see <http:#www.gnu.org/licenses/>.       #
#                                                                             #
#                                                                             #
###############################################################################
###############################################################################
 
 
# request TCL package from Altera tools version 10.0
# request TCL package from Altera tools version 10.0
package require -exact sopc 10.0
package require -exact sopc 10.0
 
 
# module sockit_owm
# module sockit_owm
set_module_property NAME         sockit_owm
set_module_property NAME         sockit_owm
set_module_property VERSION      1.3
set_module_property VERSION      1.3
set_module_property GROUP        "Interface Protocols/Serial"
set_module_property GROUP        "Interface Protocols/Serial"
set_module_property DISPLAY_NAME "1-wire (onewire) master"
set_module_property DISPLAY_NAME "1-wire (onewire) master"
set_module_property DESCRIPTION  "1-wire (onewire) master"
set_module_property DESCRIPTION  "1-wire (onewire) master"
set_module_property AUTHOR       "Iztok Jeras"
set_module_property AUTHOR       "Iztok Jeras"
 
 
set_module_property TOP_LEVEL_HDL_FILE           sockit_owm.v
set_module_property TOP_LEVEL_HDL_FILE           hdl/sockit_owm.v
set_module_property TOP_LEVEL_HDL_MODULE         sockit_owm
set_module_property TOP_LEVEL_HDL_MODULE         sockit_owm
set_module_property INSTANTIATE_IN_SYSTEM_MODULE true
set_module_property INSTANTIATE_IN_SYSTEM_MODULE true
set_module_property EDITABLE                     true
set_module_property EDITABLE                     true
 
 
# callbacks
# callbacks
set_module_property  VALIDATION_CALLBACK  validation_callback
set_module_property  VALIDATION_CALLBACK  validation_callback
set_module_property ELABORATION_CALLBACK elaboration_callback
set_module_property ELABORATION_CALLBACK elaboration_callback
 
 
# documentation links and files
# documentation links and files
add_documentation_link WEBLINK https://github.com/jeras/sockit_owm
add_documentation_link WEBLINK https://github.com/jeras/sockit_owm
add_documentation_link WEBLINK http://opencores.org/project,sockit_owm
add_documentation_link WEBLINK http://opencores.org/project,sockit_owm
add_documentation_link DATASHEET doc/sockit_owm.pdf
add_documentation_link DATASHEET doc/sockit_owm.pdf
 
 
# RTL files
# RTL files
add_file hdl/sockit_owm.v {SYNTHESIS SIMULATION}
add_file hdl/sockit_owm.v {SYNTHESIS SIMULATION}
 
 
# parameters
# parameters
add_parameter OVD_E BOOLEAN
add_parameter OVD_E BOOLEAN
set_parameter_property OVD_E DESCRIPTION "Implementation of overdrive enable, disabling it can spare a small amount of logic."
set_parameter_property OVD_E DESCRIPTION "Implementation of overdrive enable, disabling it can spare a small amount of logic."
set_parameter_property OVD_E DEFAULT_VALUE 1
set_parameter_property OVD_E DEFAULT_VALUE 1
set_parameter_property OVD_E UNITS None
set_parameter_property OVD_E UNITS None
set_parameter_property OVD_E AFFECTS_GENERATION false
set_parameter_property OVD_E AFFECTS_GENERATION false
set_parameter_property OVD_E HDL_PARAMETER true
set_parameter_property OVD_E HDL_PARAMETER true
 
 
add_parameter CDR_E BOOLEAN
add_parameter CDR_E BOOLEAN
set_parameter_property CDR_E DESCRIPTION "Implementation of clock divider ratio registers, disabling it can spare a small amount of logic."
set_parameter_property CDR_E DESCRIPTION "Implementation of clock divider ratio registers, disabling it can spare a small amount of logic."
set_parameter_property CDR_E DEFAULT_VALUE 0
set_parameter_property CDR_E DEFAULT_VALUE 0
set_parameter_property CDR_E UNITS None
set_parameter_property CDR_E UNITS None
set_parameter_property CDR_E AFFECTS_GENERATION false
set_parameter_property CDR_E AFFECTS_GENERATION false
set_parameter_property CDR_E HDL_PARAMETER true
set_parameter_property CDR_E HDL_PARAMETER true
 
 
add_parameter BDW INTEGER
add_parameter BDW INTEGER
set_parameter_property BDW DESCRIPTION "CPU interface data bus width"
set_parameter_property BDW DESCRIPTION "CPU interface data bus width"
set_parameter_property BDW VISIBLE false
set_parameter_property BDW VISIBLE false
set_parameter_property BDW DEFAULT_VALUE 32
set_parameter_property BDW DEFAULT_VALUE 32
set_parameter_property BDW ALLOWED_RANGES {8 32}
set_parameter_property BDW ALLOWED_RANGES {8 32}
set_parameter_property BDW UNITS bits
set_parameter_property BDW UNITS bits
set_parameter_property BDW ENABLED false
set_parameter_property BDW ENABLED false
set_parameter_property BDW AFFECTS_GENERATION false
set_parameter_property BDW AFFECTS_GENERATION false
set_parameter_property BDW HDL_PARAMETER true
set_parameter_property BDW HDL_PARAMETER true
 
 
add_parameter BAW INTEGER
add_parameter BAW INTEGER
set_parameter_property BAW DESCRIPTION "CPU interface address bus width"
set_parameter_property BAW DESCRIPTION "CPU interface address bus width"
set_parameter_property BAW VISIBLE false
set_parameter_property BAW VISIBLE false
set_parameter_property BAW DEFAULT_VALUE 1
set_parameter_property BAW DEFAULT_VALUE 1
set_parameter_property BAW ALLOWED_RANGES {1 2}
set_parameter_property BAW ALLOWED_RANGES {1 2}
set_parameter_property BAW UNITS bits
set_parameter_property BAW UNITS bits
set_parameter_property BAW ENABLED false
set_parameter_property BAW ENABLED false
set_parameter_property BAW AFFECTS_GENERATION false
set_parameter_property BAW AFFECTS_GENERATION false
set_parameter_property BAW HDL_PARAMETER true
set_parameter_property BAW HDL_PARAMETER true
 
 
add_parameter OWN INTEGER
add_parameter OWN INTEGER
set_parameter_property OWN DESCRIPTION "Nummber of 1-wire channels"
set_parameter_property OWN DESCRIPTION "Nummber of 1-wire channels"
#set_parameter_property OWN DISPLAY_NAME OWN
#set_parameter_property OWN DISPLAY_NAME OWN
set_parameter_property OWN DEFAULT_VALUE 1
set_parameter_property OWN DEFAULT_VALUE 1
set_parameter_property OWN ALLOWED_RANGES {1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16}
set_parameter_property OWN ALLOWED_RANGES {1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16}
set_parameter_property OWN AFFECTS_GENERATION false
set_parameter_property OWN AFFECTS_GENERATION false
set_parameter_property OWN AFFECTS_ELABORATION true
set_parameter_property OWN AFFECTS_ELABORATION true
set_parameter_property OWN HDL_PARAMETER true
set_parameter_property OWN HDL_PARAMETER true
 
 
add_parameter BTP_N STRING
add_parameter BTP_N STRING
set_parameter_property BTP_N DESCRIPTION "Base time period for normal mode"
set_parameter_property BTP_N DESCRIPTION "Base time period for normal mode"
#set_parameter_property BTP_N DISPLAY_NAME BTP_N
#set_parameter_property BTP_N DISPLAY_NAME BTP_N
set_parameter_property BTP_N DISPLAY_HINT "radio"
set_parameter_property BTP_N DISPLAY_HINT "radio"
set_parameter_property BTP_N DEFAULT_VALUE "5.0"
set_parameter_property BTP_N DEFAULT_VALUE "5.0"
set_parameter_property BTP_N ALLOWED_RANGES {"5.0:5.0us (preferred)" "7.5:7.5us" "6.0:6.0us - 7.5us"}
set_parameter_property BTP_N ALLOWED_RANGES {"5.0:5.0us (preferred)" "7.5:7.5us" "6.0:6.0us - 7.5us"}
set_parameter_property BTP_N AFFECTS_GENERATION false
set_parameter_property BTP_N AFFECTS_GENERATION false
set_parameter_property BTP_N HDL_PARAMETER true
set_parameter_property BTP_N HDL_PARAMETER true
 
 
add_parameter BTP_O STRING
add_parameter BTP_O STRING
set_parameter_property BTP_O DESCRIPTION "Base time period for overdrive mode"
set_parameter_property BTP_O DESCRIPTION "Base time period for overdrive mode"
#set_parameter_property BTP_O DISPLAY_NAME BTP_N
#set_parameter_property BTP_O DISPLAY_NAME BTP_N
set_parameter_property BTP_O DISPLAY_HINT "radio"
set_parameter_property BTP_O DISPLAY_HINT "radio"
set_parameter_property BTP_O DEFAULT_VALUE "1.0"
set_parameter_property BTP_O DEFAULT_VALUE "1.0"
set_parameter_property BTP_O ALLOWED_RANGES {"1.0:1.0us (preferred)" "0.5:0.5us - 0.66us"}
set_parameter_property BTP_O ALLOWED_RANGES {"1.0:1.0us (preferred)" "0.5:0.5us - 0.66us"}
set_parameter_property BTP_O AFFECTS_GENERATION false
set_parameter_property BTP_O AFFECTS_GENERATION false
set_parameter_property BTP_O HDL_PARAMETER true
set_parameter_property BTP_O HDL_PARAMETER true
 
 
add_parameter F_CLK INTEGER
add_parameter F_CLK INTEGER
set_parameter_property F_CLK SYSTEM_INFO {CLOCK_RATE clock_reset}
set_parameter_property F_CLK SYSTEM_INFO {CLOCK_RATE clock_reset}
set_parameter_property F_CLK DISPLAY_NAME F_CLK
set_parameter_property F_CLK DISPLAY_NAME F_CLK
set_parameter_property F_CLK DESCRIPTION "System clock frequency"
set_parameter_property F_CLK DESCRIPTION "System clock frequency"
set_parameter_property F_CLK UNITS megahertz
set_parameter_property F_CLK UNITS megahertz
 
 
add_parameter CDR_N NATURAL
add_parameter CDR_N NATURAL
set_parameter_property CDR_N DERIVED true
set_parameter_property CDR_N DERIVED true
set_parameter_property CDR_N DESCRIPTION "Clock divider ratio for normal mode"
set_parameter_property CDR_N DESCRIPTION "Clock divider ratio for normal mode"
set_parameter_property CDR_N DISPLAY_NAME CDR_N
set_parameter_property CDR_N DISPLAY_NAME CDR_N
set_parameter_property CDR_N DEFAULT_VALUE 5
set_parameter_property CDR_N DEFAULT_VALUE 5
set_parameter_property CDR_N AFFECTS_GENERATION false
set_parameter_property CDR_N AFFECTS_GENERATION false
set_parameter_property CDR_N HDL_PARAMETER true
set_parameter_property CDR_N HDL_PARAMETER true
 
 
add_parameter CDR_O NATURAL
add_parameter CDR_O NATURAL
set_parameter_property CDR_O DERIVED true
set_parameter_property CDR_O DERIVED true
set_parameter_property CDR_O DESCRIPTION "Clock divider ratio for overdrive mode"
set_parameter_property CDR_O DESCRIPTION "Clock divider ratio for overdrive mode"
set_parameter_property CDR_O DISPLAY_NAME CDR_O
set_parameter_property CDR_O DISPLAY_NAME CDR_O
set_parameter_property CDR_O DEFAULT_VALUE 1
set_parameter_property CDR_O DEFAULT_VALUE 1
set_parameter_property CDR_O AFFECTS_GENERATION false
set_parameter_property CDR_O AFFECTS_GENERATION false
set_parameter_property CDR_O HDL_PARAMETER true
set_parameter_property CDR_O HDL_PARAMETER true
 
 
add_display_item "Base time period options" BTP_N parameter
add_display_item "Base time period options" BTP_N parameter
add_display_item "Base time period options" BTP_O parameter
add_display_item "Base time period options" BTP_O parameter
add_display_item "Clock dividers"           F_CLK parameter
add_display_item "Clock dividers"           F_CLK parameter
add_display_item "Clock dividers"           CDR_N parameter
add_display_item "Clock dividers"           CDR_N parameter
add_display_item "Clock dividers"           CDR_O parameter
add_display_item "Clock dividers"           CDR_O parameter
 
 
# connection point clock_reset
# connection point clock_reset
add_interface clock_reset clock end
add_interface clock_reset clock end
 
 
set_interface_property clock_reset ENABLED true
set_interface_property clock_reset ENABLED true
 
 
add_interface_port clock_reset clk clk   Input 1
add_interface_port clock_reset clk clk   Input 1
add_interface_port clock_reset rst reset Input 1
add_interface_port clock_reset rst reset Input 1
 
 
# connection point s1
# connection point s1
add_interface s1 avalon end
add_interface s1 avalon end
set_interface_property s1 addressAlignment DYNAMIC
set_interface_property s1 addressAlignment DYNAMIC
set_interface_property s1 associatedClock clock_reset
set_interface_property s1 associatedClock clock_reset
set_interface_property s1 burstOnBurstBoundariesOnly false
set_interface_property s1 burstOnBurstBoundariesOnly false
set_interface_property s1 explicitAddressSpan 0
set_interface_property s1 explicitAddressSpan 0
set_interface_property s1 holdTime 0
set_interface_property s1 holdTime 0
set_interface_property s1 isMemoryDevice false
set_interface_property s1 isMemoryDevice false
set_interface_property s1 isNonVolatileStorage false
set_interface_property s1 isNonVolatileStorage false
set_interface_property s1 linewrapBursts false
set_interface_property s1 linewrapBursts false
set_interface_property s1 maximumPendingReadTransactions 0
set_interface_property s1 maximumPendingReadTransactions 0
set_interface_property s1 printableDevice false
set_interface_property s1 printableDevice false
set_interface_property s1 readLatency 0
set_interface_property s1 readLatency 0
set_interface_property s1 readWaitStates 0
set_interface_property s1 readWaitStates 0
set_interface_property s1 readWaitTime 0
set_interface_property s1 readWaitTime 0
set_interface_property s1 setupTime 0
set_interface_property s1 setupTime 0
set_interface_property s1 timingUnits Cycles
set_interface_property s1 timingUnits Cycles
set_interface_property s1 writeWaitTime 0
set_interface_property s1 writeWaitTime 0
 
 
set_interface_property s1 ASSOCIATED_CLOCK clock_reset
set_interface_property s1 ASSOCIATED_CLOCK clock_reset
set_interface_property s1 ENABLED true
set_interface_property s1 ENABLED true
 
 
add_interface_port s1 bus_ren read      Input  1
add_interface_port s1 bus_ren read      Input  1
add_interface_port s1 bus_wen write     Input  1
add_interface_port s1 bus_wen write     Input  1
add_interface_port s1 bus_adr address   Input  BAW
add_interface_port s1 bus_adr address   Input  BAW
add_interface_port s1 bus_wdt writedata Input  BDW
add_interface_port s1 bus_wdt writedata Input  BDW
add_interface_port s1 bus_rdt readdata  Output BDW
add_interface_port s1 bus_rdt readdata  Output BDW
 
 
# connection point irq
# connection point irq
add_interface irq interrupt end
add_interface irq interrupt end
set_interface_property irq associatedClock clock_reset
set_interface_property irq associatedClock clock_reset
set_interface_property irq associatedAddressablePoint s1
set_interface_property irq associatedAddressablePoint s1
 
 
set_interface_property irq ASSOCIATED_CLOCK clock_reset
set_interface_property irq ASSOCIATED_CLOCK clock_reset
set_interface_property irq ENABLED true
set_interface_property irq ENABLED true
 
 
add_interface_port irq bus_irq irq Output 1
add_interface_port irq bus_irq irq Output 1
 
 
# connection point conduit
# connection point conduit
add_interface ext conduit end
add_interface ext conduit end
 
 
set_interface_property ext ENABLED true
set_interface_property ext ENABLED true
 
 
add_interface_port ext owr_p export Output OWN
add_interface_port ext owr_p export Output OWN
add_interface_port ext owr_e export Output OWN
add_interface_port ext owr_e export Output OWN
add_interface_port ext owr_i export Input  OWN
add_interface_port ext owr_i export Input  OWN
 
 
proc validation_callback {} {
proc validation_callback {} {
  # check if overdrive is enabled
  # check if overdrive is enabled
  set ovd_e [get_parameter_value OVD_E]
  set ovd_e [get_parameter_value OVD_E]
  # get clock frequency in Hz
  # get clock frequency in Hz
  set f     [get_parameter_value F_CLK]
  set f     [get_parameter_value F_CLK]
  # get base time periods
  # get base time periods
  set btp_n [get_parameter_value BTP_N]
  set btp_n [get_parameter_value BTP_N]
  set btp_o [get_parameter_value BTP_O]
  set btp_o [get_parameter_value BTP_O]
  # enable/disable editing of overdrive divider
  # enable/disable editing of overdrive divider
  set_parameter_property BTP_O ENABLED [expr {$ovd_e ? "true" : "false"}]
  set_parameter_property BTP_O ENABLED [expr {$ovd_e ? "true" : "false"}]
  # compute normal mode divider
  # compute normal mode divider
  if {$btp_n=="5.0"} {
  if {$btp_n=="5.0"} {
    set d_n [expr {$f/200000}]
    set d_n [expr {$f/200000}]
    set t_n [expr {1000000.0/($f/$d_n)}]
    set t_n [expr {1000000.0/($f/$d_n)}]
    set e_n [expr {$t_n/5.0-1}]
    set e_n [expr {$t_n/5.0-1}]
  } elseif {$btp_n=="7.5"} {
  } elseif {$btp_n=="7.5"} {
    set d_n [expr {$f/133333}]
    set d_n [expr {$f/133333}]
    set t_n [expr {1000000.0/($f/$d_n)}]
    set t_n [expr {1000000.0/($f/$d_n)}]
    set e_n [expr {$t_n/7.5-1}]
    set e_n [expr {$t_n/7.5-1}]
  } elseif {$btp_n=="6.0"} {
  } elseif {$btp_n=="6.0"} {
    set d_n [expr {$f/133333}]
    set d_n [expr {$f/133333}]
    set t_n [expr {$d_n*1000000.0/$f}]
    set t_n [expr {$d_n*1000000.0/$f}]
    if {$t_n>7.5} {
    if {$t_n>7.5} {
      set e_n [expr {$t_n/7.5-1}]
      set e_n [expr {$t_n/7.5-1}]
    } elseif {6.0>$t_n} {
    } elseif {6.0>$t_n} {
      set e_n [expr {$t_n/6.0-1}]
      set e_n [expr {$t_n/6.0-1}]
    } else {
    } else {
      set e_n 0.0
      set e_n 0.0
    }
    }
  }
  }
  # compute overdrive mode divider
  # compute overdrive mode divider
  if {$btp_o=="1.0"} {
  if {$btp_o=="1.0"} {
    set d_o [expr {$f/1000000}]
    set d_o [expr {$f/1000000}]
    set t_o [expr {1000000.0/($f/$d_o)}]
    set t_o [expr {1000000.0/($f/$d_o)}]
    set e_o [expr {$t_o/1.0-1}]
    set e_o [expr {$t_o/1.0-1}]
  } elseif {$btp_o=="0.5"} {
  } elseif {$btp_o=="0.5"} {
    set d_o [expr {$f/1500000}]
    set d_o [expr {$f/1500000}]
    set t_o [expr {$d_o*1000000.0/$f}]
    set t_o [expr {$d_o*1000000.0/$f}]
    if {$t_o>(2.0/3)} {
    if {$t_o>(2.0/3)} {
      set e_o [expr {$t_o/(2.0/3)-1}]
      set e_o [expr {$t_o/(2.0/3)-1}]
    } elseif {0.5>$t_o} {
    } elseif {0.5>$t_o} {
      set e_o [expr {$t_o/0.5-1}]
      set e_o [expr {$t_o/0.5-1}]
    } else {
    } else {
      set e_o 0.0
      set e_o 0.0
    }
    }
  }
  }
  # set divider values
  # set divider values
               set_parameter_value CDR_N [expr {$d_n-1}]
               set_parameter_value CDR_N [expr {$d_n-1}]
  if {$ovd_e} {set_parameter_value CDR_O [expr {$d_o-1}]}
  if {$ovd_e} {set_parameter_value CDR_O [expr {$d_o-1}]}
  # report BTP values and relative errors
  # report BTP values and relative errors
  send_message info "BTP_N (normal    mode 'base time period') is [format %.2f $t_n], relative error is [format %.1f [expr {$e_n*100}]]%."
  send_message info "BTP_N (normal    mode 'base time period') is [format %.2f $t_n], relative error is [format %.1f [expr {$e_n*100}]]%."
  send_message info "BTP_O (overdrive mode 'base time period') is [format %.2f $t_o], relative error is [format %.1f [expr {$e_o*100}]]%."
  send_message info "BTP_O (overdrive mode 'base time period') is [format %.2f $t_o], relative error is [format %.1f [expr {$e_o*100}]]%."
  # repport validatio errors if relative error are outside accepted bounds (2%)
  # repport validatio errors if relative error are outside accepted bounds (2%)
  if {abs($e_n)>0.02} {send_message error "BTP_N is outside accepted bounds (relative error > 2%). Use a different 'base time period' or system frequency."}
  if {abs($e_n)>0.02} {send_message error "BTP_N is outside accepted bounds (relative error > 2%). Use a different 'base time period' or system frequency."}
  if {abs($e_o)>0.02} {send_message error "BTP_O is outside accepted bounds (relative error > 2%). Use a different 'base time period' or system frequency."}
  if {abs($e_o)>0.02} {send_message error "BTP_O is outside accepted bounds (relative error > 2%). Use a different 'base time period' or system frequency."}
}
}
 
 
proc elaboration_callback {} {
proc elaboration_callback {} {
  # add software defines
  # add software defines
  set_module_assignment embeddedsw.CMacro.OWN          [get_parameter_value OWN  ]
  set_module_assignment embeddedsw.CMacro.OWN          [get_parameter_value OWN  ]
  set_module_assignment embeddedsw.CMacro.CDR_E [expr {[get_parameter_value CDR_E]?1:0}]
  set_module_assignment embeddedsw.CMacro.CDR_E [expr {[get_parameter_value CDR_E]?1:0}]
  set_module_assignment embeddedsw.CMacro.OVD_E [expr {[get_parameter_value OVD_E]?1:0}]
  set_module_assignment embeddedsw.CMacro.OVD_E [expr {[get_parameter_value OVD_E]?1:0}]
  set_module_assignment embeddedsw.CMacro.BTP_N      \"[get_parameter_value BTP_N]\"
  set_module_assignment embeddedsw.CMacro.BTP_N      \"[get_parameter_value BTP_N]\"
  set_module_assignment embeddedsw.CMacro.BTP_O      \"[get_parameter_value BTP_O]\"
  set_module_assignment embeddedsw.CMacro.BTP_O      \"[get_parameter_value BTP_O]\"
  set_module_assignment embeddedsw.CMacro.CDR_N        [get_parameter_value CDR_N]
  set_module_assignment embeddedsw.CMacro.CDR_N        [get_parameter_value CDR_N]
  set_module_assignment embeddedsw.CMacro.CDR_O        [get_parameter_value CDR_O]
  set_module_assignment embeddedsw.CMacro.CDR_O        [get_parameter_value CDR_O]
  # get clock frequency in Hz
  # get clock frequency in Hz
  set f     [get_parameter_value F_CLK]
  set f     [get_parameter_value F_CLK]
  # get base time period
  # get base time period
  set btp_n [get_parameter_value BTP_N]
  set btp_n [get_parameter_value BTP_N]
  # get clock divider ratio
  # get clock divider ratio
  set cdr_n [get_parameter_value CDR_N]
  set cdr_n [get_parameter_value CDR_N]
  # compute delay time in seconds [s]
  # compute delay time in seconds [s]
  if {$btp_n=="5.0"} {
  if {$btp_n=="5.0"} {
    set t_dly [expr {200.*($cdr_n+1)/$f}]
    set t_dly [expr {200.*($cdr_n+1)/$f}]
  } elseif {$btp_n=="7.5"} {
  } elseif {$btp_n=="7.5"} {
    set t_dly [expr {128.*($cdr_n+1)/$f}]
    set t_dly [expr {128.*($cdr_n+1)/$f}]
  } elseif {$btp_n=="6.0"} {
  } elseif {$btp_n=="6.0"} {
    set t_dly [expr {160.*($cdr_n+1)/$f}]
    set t_dly [expr {160.*($cdr_n+1)/$f}]
  }
  }
  # give the software a u16.16 representation of delay frequency in kilo hertz [kHz]
  # give the software a u16.16 representation of delay frequency in kilo hertz [kHz]
  set_module_assignment embeddedsw.CMacro.F_DLY [format %.0f [expr {pow(2,16) / (1000*$t_dly)}]]
  set_module_assignment embeddedsw.CMacro.F_DLY [format %.0f [expr {pow(2,16) / (1000*$t_dly)}]]
}
}
 
 

powered by: WebSVN 2.1.0

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