set script_dir [file dirname [file normalize [info script]]]
set fpga_dir [file normalize [file join $script_dir ../..]]

proc getenv_default {name default} {
  if {[info exists ::env($name)] && $::env($name) ne ""} {
    return $::env($name)
  }
  return $default
}

set bit_file [file normalize [getenv_default BIT_FILE [file join $fpga_dir out bitstream genesys2_rocket.bit]]]
set device_pattern [getenv_default HW_DEVICE_PATTERN xc7k325t*]

open_hw_manager
connect_hw_server
open_hw_target
set dev [lindex [get_hw_devices $device_pattern] 0]
if {$dev eq ""} {
  error "No hardware device found matching $device_pattern"
}
current_hw_device $dev
refresh_hw_device $dev
set_property PROGRAM.FILE $bit_file $dev
program_hw_devices $dev
refresh_hw_device $dev
puts "Programmed FPGA with $bit_file"