/* Copyright 2017 Jason Williams * Copyright 2018 Jack Humbert * Copyright 2018 Yiancar * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation, either version 2 of the License, or * (at your option) any later version. * * This program 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 General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ #include "is31fl3733.h" #include "i2c_master.h" #include "wait.h" // This is a 7-bit address, that gets left-shifted and bit 0 // set to 0 for write, 1 for read (as per I2C protocol) // The address will vary depending on your wiring: // 00 <-> GND // 01 <-> SCL // 10 <-> SDA // 11 <-> VCC // ADDR1 represents A1:A0 of the 7-bit address. // ADDR2 represents A3:A2 of the 7-bit address. // The result is: 0b101(ADDR2)(ADDR1) #define ISSI_ADDR_DEFAULT 0x50 #define ISSI_COMMANDREGISTER 0xFD #define ISSI_COMMANDREGISTER_WRITELOCK 0xFE #define ISSI_INTERRUPTMASKREGISTER 0xF0 #define ISSI_INTERRUPTSTATUSREGISTER 0xF1 #define ISSI_PAGE_LEDCONTROL 0x00 // PG0 #define ISSI_PAGE_PWM 0x01 // PG1 #define ISSI_PAGE_AUTOBREATH 0x02 // PG2 #define ISSI_PAGE_FUNCTION 0x03 // PG3 #define ISSI_REG_CONFIGURATION 0x00 // PG3 #define ISSI_REG_GLOBALCURRENT 0x01 // PG3 #define ISSI_REG_RESET 0x11 // PG3 #define ISSI_REG_SWPULLUP 0x0F // PG3 #define ISSI_REG_CSPULLUP 0x10 // PG3 #ifndef ISSI_TIMEOUT # define ISSI_TIMEOUT 100 #endif #ifndef ISSI_PERSISTENCE # define ISSI_PERSISTENCE 0 #endif // Transfer buffer for TWITransmitData() uint8_t g_twi_transfer_buffer[20]; // These buffers match the IS31FL3733 PWM registers. // The control buffers match the PG0 LED On/Off registers. // Storing them like this is optimal for I2C transfers to the registers. // We could optimize this and take out the unused registers from these // buffers and the transfers in IS31FL3733_write_pwm_buffer() but it's // probably not worth the extra complexity. uint8_t g_pwm_buffer[DRIVER_COUNT][192]; bool g_pwm_buffer_update_required[DRIVER_COUNT] = {false}; uint8_t g_led_control_registers[DRIVER_COUNT][24] = {{0}, {0}}; bool g_led_control_registers_update_required[DRIVER_COUNT] = {false}; bool IS31FL3733_write_register(uint8_t addr, uint8_t reg, uint8_t data) { // If the transaction fails function returns false. g_twi_transfer_buffer[0] = reg; g_twi_transfer_buffer[1] = data; #if ISSI_PERSISTENCE > 0 for (uint8_t i = 0; i < ISSI_PERSISTENCE; i++) { if (i2c_transmit(addr << 1, g_twi_transfer_buffer, 2, ISSI_TIMEOUT) != 0) { return false; } } #else if (i2c_transmit(addr << 1, g_twi_transfer_buffer, 2, ISSI_TIMEOUT) != 0) { return false; } #endif return true; } bool IS31FL3733_write_pwm_buffer(uint8_t addr, uint8_t *pwm_buffer) { // Assumes PG1 is already selected. // If any of the transactions fails function returns false. // Transmit PWM registers in 12 transfers of 16 bytes. // g_twi_transfer_buffer[] is 20 bytes // Iterate over the pwm_buffer contents at 16 byte intervals. for (int i = 0; i < 192; i += 16) { g_twi_transfer_buffer[0] = i; // Copy the data from i to i+15. // Device will auto-increment register for data after the first byte // Thus this sets registers 0x00-0x0F, 0x10-0x1F, etc. in one transfer. for (int j = 0; j < 16; j++) { g_twi_transfer_buffer[1 + j] = pwm_buffer[i + j]; } #if ISSI_PERSISTENCE > 0 for (uint8_t i = 0; i < ISSI_PERSISTENCE; i++) { if (i2c_transmit(addr << 1, g_twi_transfer_buffer, 17, ISSI_TIMEOUT) != 0) { return false; } } #else if (i2c_transmit(addr << 1, g_twi_transfer_buffer, 17,
library ieee;
use ieee.std_logic_1164.all;
use work.rec01_pkg.all;

entity rec01 is
  port (inp : myrec;
        rst : std_logic;
        clk : std_logic;
        o : out std_logic);
end rec01;

architecture behav of rec01 is
  signal s : myrec;
begin
  process (clk) is
  begin
    if rising_edge (clk) then
      if rst = '1' then
        s <= (a => "0000", b => '0');
      else
        if inp.b = '1' then
          s <= (a => inp.a, b => '1');
        else
          s <= inp;
        end if;
      end if;
    end if;
  end process;
  
  o <= '1' when s.a (1) = s.b else '0';
end behav;