-/* Copyright (C) 2013 Czech Technical University in Prague
+/* Copyright (C) 2013, 2015 Czech Technical University in Prague
*
* Authors:
* - Carlos Jenkins <carlos@jenkins.co.cr>
*
- * 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 <http://www.gnu.org/licenses/>.
+ * This document contains proprietary information belonging to Czech
+ * Technical University in Prague. Passing on and copying of this
+ * document, and communication of its contents is not permitted
+ * without prior written authorization.
*
* File : din.c
* Abstract:
#include "rpp/rpp.h"
+#include "rpp/mutex.h"
-#if rppCONFIG_INCLUDE_DIN == 1
-
-#if rppCONFIG_DRV == 1
+#ifndef FREERTOS_POSIX
#include "drv/din.h"
+#include "drv/spi_def.h"
#endif
+RPP_MUTEX_DEFINE(mutex_din);
+
static boolean_t initialized = FALSE;
int8_t rpp_din_init()
{
- if(initialized) {
- return FAILURE;
- }
- initialized = TRUE;
+ if (initialized)
+ return FAILURE;
+ if (!RPP_MUTEX_INIT(mutex_din))
+ return FAILURE;
+ initialized = TRUE;
+#ifndef FREERTOS_POSIX
+ dmmInit();
+ gioInit();
+ hetInit();
+ spi_tms570_init(spi_ifcs, ARRAY_SIZE(spi_ifcs));
+#endif
- return SUCCESS;
+ return SUCCESS;
}
-
int8_t rpp_din_ref(uint16_t ref_a, uint16_t ref_b)
{
- if((ref_a > 12000) || (ref_b > 12000)) {
- return -1;
- }
+ if ((ref_a > 4095) || (ref_b > 4095))
+ return -1;
- // FIXME Implement.
- return SUCCESS;
+#ifndef FREERTOS_POSIX
+ RPP_MUTEX_LOCK(mutex_din);
+ drv_din_ref(ref_a, ref_b);
+ RPP_MUTEX_UNLOCK(mutex_din);
+#endif
+ return SUCCESS;
}
static boolean_t config_changed = FALSE;
// All cached values are 16 bits in the form [SG7,...,SG0][SP7,...,SP0]
-static uint16_t pull_cache = 0x0;
-static uint16_t active_cache = 0x0;
+static uint16_t pull_cache = 0x0; /* 0 - pull-down, 1 - pull-up */
+static uint16_t active_cache = 0x0; /* 0 - tri-state, 1 - active */
static uint16_t can_wake_cache = 0x0;
-int8_t rpp_din_setup(uint8_t pin, boolean_t pull_type,
- boolean_t active, boolean_t can_wake)
+static boolean_t check_pin_busy(uint8_t pin)
{
- // Check range
- if((pin < 1) || (pin > 16)) {
- return -1;
- }
-
- // Check programmable feature
- if(pull_type && (pin > 8)) {
- return -2;
- }
-
- // Set bits
- uint8_t index = pin - 1;
- if(pull_type) {
- bit_set(pull_cache, index);
- } else {
- bit_clear(pull_cache, index);
- }
-
- if(active) {
- bit_set(active_cache, index);
- } else {
- bit_clear(active_cache, index);
- }
-
- if(can_wake) {
- bit_set(can_wake_cache, index);
- } else {
- bit_clear(can_wake_cache, index);
- }
-
- config_changed = TRUE;
- return SUCCESS;
+ if (rpp_irc_status(RPP_IRC_1) == 1 && (pin == 10 || pin == 11))
+ return TRUE;
+ if (rpp_irc_status(RPP_IRC_2) == 1 && (pin == 14 || pin == 15))
+ return TRUE;
+ return FALSE;
+}
+
+int8_t rpp_din_setup(uint8_t pin, boolean_t pull_up,
+ boolean_t active, boolean_t can_wake)
+{
+ // Check range
+ if (pin > 15)
+ return -1;
+
+ // Check programmable feature
+ if (!pull_up && (pin > 7))
+ return -2;
+
+ RPP_MUTEX_LOCK(mutex_din);
+ // Check blockade of specific pins
+ if (check_pin_busy(pin)) {
+ RPP_MUTEX_UNLOCK(mutex_din);
+ return -RPP_EBUSY;
+ }
+
+ // Set bits
+ if (pull_up)
+ bit_set(pull_cache, pin);
+ else
+ bit_clear(pull_cache, pin);
+
+ if (active)
+ bit_set(active_cache, pin);
+ else
+ bit_clear(active_cache, pin);
+
+ if (can_wake)
+ bit_set(can_wake_cache, pin);
+ else
+ bit_clear(can_wake_cache, pin);
+
+ config_changed = TRUE;
+ RPP_MUTEX_UNLOCK(mutex_din);
+ return SUCCESS;
}
static uint16_t in_cache = 0x0;
-int8_t rpp_din_get(uint8_t pin, boolean_t var_thr)
+int8_t rpp_din_get(uint8_t pin)
+{
+ // Check range
+ if (pin > 15)
+ return -1;
+
+ // Check blockade of specific pins
+ if (check_pin_busy(pin))
+ return -RPP_EBUSY;
+
+ return is_bit_set(in_cache, pin) ? RPP_CLOSED : RPP_OPEN;
+}
+
+int8_t rpp_din_get_tr(uint8_t pin)
{
- // Check range
- if((pin < 1) || (pin > 16)) {
- return -1;
- }
-
- // Check feature
- if(var_thr && (pin < 9)) {
- return -2;
- }
-
- // Use of variable threshold was requested
- if(var_thr) {
- #if rppCONFIG_DRV == 1
- if(drv_din_get_varthr(pin - 1) == 1) {
- return HIGH;
- }
- #endif
- return LOW;
- }
-
- if(is_bit_set(in_cache, pin - 1)) {
- return HIGH;
- }
- return LOW;
+ // Check range
+ if (pin < 8 || pin > 15)
+ return -1;
+
+ // Check blockade of specific pins
+ if (check_pin_busy(pin))
+ return -RPP_EBUSY;
+
+#ifndef FREERTOS_POSIX
+ if (drv_din_get_varthr(pin) == 1)
+ return HIGH;
+#endif
+ return LOW;
}
+
static uint16_t diag_cache = 0x0;
int8_t rpp_din_diag(uint8_t pin)
{
- // Check range
- if((pin < 1) || (pin > 16)) {
- return -1;
- }
-
- if(is_bit_set(diag_cache, pin - 1)) {
- return HIGH;
- }
- return LOW;
-}
+ // Check range
+ if (pin > 15)
+ return -1;
+ // Check blockade of specific pins
+ if (check_pin_busy(pin))
+ return -RPP_EBUSY;
-// Helper function to change bit order.
-static uint8_t lsb_msb(uint8_t a)
-{
- uint8_t i;
- uint8_t b = 0;
-
- for(i = 0 ; i < 8 ; i ++) {
- b <<= 1;
- b |= ((a & (1 << i)) >> i);
- }
- return b;
+ return is_bit_set(diag_cache, pin) ? HIGH : LOW;
}
-
+/*
+ * pouzivat din_mod s pouzivanim enumu
+ */
int8_t rpp_din_update()
{
- #if rppCONFIG_DRV == 1
- /// Setup pins
- if(config_changed) {
- uint16_t sp = 0x0;
- uint16_t sg = 0x0;
-
- // Set pull-type.
- // In DRV logic is inverted:
- // DRV: 1 - set pin as switch-to-battery. RPP: 0 - pull-down.
- // DRV: 0 - set pin as switch-to-ground. RPP: 1 - pull-up.
- // Also DRV is MSB and not LSB:
- // DRV: [SP0,...,SP7]. RPP: [SG7,...,SG0][SP7,...,SP0].
- din_set_pr(lsb_msb((uint8_t) ~(pull_cache & 0xFF)));
- din_spi_transfer();
-
- // Set state type, active or tri-stated.
- // In DRV logic is inverted:
- // DRV: 1 - tri-state. RPP: 0 - tri-state.
- // DRV: 0 - active. RPP: 1 - active.
- // Also DRV is MSB and not LSB:
- // DRV: SP - [SP0,...,SP7,X8,...,X15]. RPP: SG/SP - [SG7,...,SG0][SP7,...,SP0].
- // DRV: SG - [SG0,...,SG13,..., X15]. RPP: SG/SP - [SG7,...,SG0][SP7,...,SP0].
- sp = (((uint16_t) lsb_msb(~((uint8_t) (active_cache & 0xFF)))) << 8) | 0x00FF;
- sg = (((uint16_t) lsb_msb(~((uint8_t) (active_cache >> 8 )))) << 8) | 0x00FF;
- // Debug help (on sg):
- // 1) Extract the SG bits from active_cache by shifting 8 bits to the right.
- // 2) Convert that 0b00000000xyyyyyyz 16bits number to a 8 bits number 0bxyyyyyyz.
- // 3) Bit negate that 8 bit number to match inverted logic in DRV 0bijjjjjjk.
- // 4) Convert from LSB (as in RPP) to MSB (as in DRV) using lsb_msb.
- // 0bkjjjjjji
- // 5) Convert back this 8bit number to 16bits number and shift 8 bits to the left:
- // 0bkjjjjjji00000000
- // 6) SG8-SG13 should always be tri-stated ('1') as they are not connected on the board.
- // 0bkjjjjjji11111111
- din_set_stat(sp, sg);
- din_spi_transfer();
-
- // Set wake / interrupt.
- // IN DRV logic is not inverted.
- // DRV: 1 - can wake. RPP: 1 - can wake.
- // DRV: 0 - interrupt disabled. RPP: 0 - interrupt disabled.
- // But DRV is MSB and not LSB:
- // DRV: SP - [SP0,...,SP7,X8,...,X15]. RPP: SG/SP - [SG7,...,SG0][SP7,...,SP0].
- // DRV: SG - [SG0,...,SG13,..., X15]. RPP: SG/SP - [SG7,...,SG0][SP7,...,SP0].
- sp = (((uint16_t) lsb_msb((uint8_t) (can_wake_cache & 0xFF))) << 8) & 0xFF00;
- sg = (((uint16_t) lsb_msb((uint8_t) (can_wake_cache >> 8 ))) << 8) & 0xFF00;
- // Debug help (on sg):
- // 1) Extract the SG bits from active_cache by shifting 8 bits to the right.
- // 2) Convert that 0b00000000xyyyyyyz 16bits number to a 8 bits number 0bxyyyyyyz.
- // 3) Convert from LSB (as in RPP) to MSB (as in DRV) using lsb_msb.
- // 0bzyyyyyyx
- // 4) Convert back this 8bit number to 16bits number and shift 8 bits to the left:
- // 0bzyyyyyyx00000000
- // 5) SG8-SG13 should always be non-interrupt ('0') as they are not connected on the board.
- // 0bzyyyyyyx00000000
- din_set_int(sp, sg);
- din_spi_transfer();
-
- // Mark configuration as commited
- config_changed = FALSE;
- }
-
- // Update cached values
- din_switch_st();
- din_spi_transfer();
- in_cache = din_get_val_word();
-
- // FIXME: Implement. Dummy assign for now.
- diag_cache = in_cache;
-
- if(diag_cache != in_cache) {
- return FAILURE;
- }
- #else
- UNUSED(config_changed);
- UNUSED(lsb_msb);
- #endif
-
- return SUCCESS;
+ RPP_MUTEX_LOCK(mutex_din);
+#ifndef FREERTOS_POSIX
+ /// Setup pins
+ if (config_changed) {
+ uint16_t sp = 0x0;
+ uint16_t sg = 0x0;
+
+ // Reset chip
+ din_set_reg(DIN_RESET_CMD, 0, 0);
+ //rpp_sci_printf("din_reset()\r\n");
+
+ // Set pull-type.
+ // In DRV logic is inverted:
+ // DRV: 1 - set pin as switch-to-battery. RPP: 0 - pull-down.
+ // DRV: 0 - set pin as switch-to-ground. RPP: 1 - pull-up.
+ sp = (~pull_cache) & 0xFF;
+ din_set_reg(DIN_SETTINGS_CMD, 0xffff, sp);
+ //rpp_sci_printf("din_set_pr(%X)\r\n", sp);
+
+ // Set state type, active or tri-stated.
+ // In DRV logic is inverted:
+ // DRV: 1 - tri-state. RPP: 0 - tri-state.
+ // DRV: 0 - active. RPP: 1 - active.
+ sp = ((~active_cache) ) & 0xFF;
+ sg = ((~active_cache) >> 8) & 0xFF;
+ din_set_reg(DIN_TRI_STATE_CMD_YES, 0xffff, sp);
+ din_set_reg(DIN_TRI_STATE_CMD_NO, 0xffff, sg);
+ //rpp_sci_printf("din_set_stat(%X, %X)\r\n", sp, sg);
+
+ // Set wake / interrupt.
+ // IN DRV logic is not inverted.
+ // DRV: 1 - can wake. RPP: 1 - can wake.
+ // DRV: 0 - interrupt disabled. RPP: 0 - interrupt disabled.
+ sp = (can_wake_cache ) & 0xFF;
+ sg = (can_wake_cache >> 8) & 0xFF;
+
+ din_set_reg(DIN_WAKE_UP_CMD_ENB, 0xffff, sp);
+ din_set_reg(DIN_WAKE_UP_CMD_DIS, 0xffff, sg);
+ //rpp_sci_printf("din_set_int(%X, %X)\r\n", sp, sg);
+
+ // Mark configuration as commited
+ config_changed = FALSE;
+ }
+
+ // Update cached values
+ din_set_reg(DIN_SWITCH_STATUS_CMD, 0, 0);
+ in_cache = din_get_val_word();
+
+ // FIXME: Implement. Dummy assign for now.
+ diag_cache = in_cache;
+
+ if (diag_cache != in_cache) {
+ RPP_MUTEX_UNLOCK(mutex_din);
+ return FAILURE;
+ }
+
+ #else /* ifndef FREERTOS_POSIX */
+ UNUSED(config_changed);
+ #endif /* ifndef FREERTOS_POSIX */
+
+ RPP_MUTEX_UNLOCK(mutex_din);
+ return SUCCESS;
}
-
-
-#endif /* rppCONFIG_INCLUDE_DIN */
-