experimental pin-cir

This commit is contained in:
NIIBE Yutaka
2010-12-24 15:28:23 +09:00
parent 466052dcd1
commit c67a30aba1
5 changed files with 396 additions and 4 deletions

View File

@@ -1,3 +1,7 @@
2010-12-24 NIIBE Yutaka <gniibe@fsij.org>
* src/pin-cir.c: New file.
2010-12-20 NIIBE Yutaka <gniibe@fsij.org>
* src/openpgp.c (GPGthread): Added PINPAD_SUPPORT.

View File

@@ -20,6 +20,36 @@ hwinit1 (void)
while (palReadPad (IOPORT2, GPIOB_BUTTON) != 0)
; /* Wait for JTAG debugger connection */
palWritePort(IOPORT2, 0xffff); /* All set */
/* EXTI0 <= PB0 */
AFIO->EXTICR[0] = AFIO_EXTICR1_EXTI0_PB;
EXTI->IMR = 0;
#if 0
EXTI->RTSR = EXTI_RTSR_TR0;
#else
EXTI->FTSR = EXTI_FTSR_TR0;
#endif
NVICEnableVector(EXTI0_IRQn,
CORTEX_PRIORITY_MASK(CORTEX_MINIMUM_PRIORITY));
/* TIM3 */
RCC->APB1ENR |= RCC_APB1ENR_TIM3EN;
RCC->APB1RSTR = RCC_APB1RSTR_TIM3RST;
RCC->APB1RSTR = 0;
NVICEnableVector(TIM3_IRQn,
CORTEX_PRIORITY_MASK(CORTEX_MINIMUM_PRIORITY));
TIM3->CR1 = TIM_CR1_URS | TIM_CR1_ARPE; /* Don't enable TIM3 for now */
TIM3->CR2 = TIM_CR2_TI1S;
TIM3->SMCR = TIM_SMCR_TS_0 | TIM_SMCR_TS_2 | TIM_SMCR_SMS_2;
TIM3->DIER = 0; /* Disable interrupt for now */
TIM3->CCMR1 = TIM_CCMR1_CC1S_0 | TIM_CCMR1_IC1F_0 | TIM_CCMR1_IC1F_3
| TIM_CCMR1_CC2S_1 | TIM_CCMR1_IC2F_0 | TIM_CCMR1_IC2F_3;
TIM3->CCMR2 = 0;
TIM3->CCER = TIM_CCER_CC1E | TIM_CCER_CC2E | TIM_CCER_CC2P;
TIM3->PSC = 72 - 1; /* 1 MHz */
TIM3->ARR = 18000; /* 18 ms */
/* Generate UEV to upload PSC and ARR */
TIM3->EGR = TIM_EGR_UG;
#endif
/*
* Disable JTAG and SWD, done after hwinit1_common as HAL resets AFIO
@@ -46,3 +76,43 @@ set_led (int value)
else
palSetPad (IOPORT1, GPIOA_LED1);
}
#if defined(PINPAD_SUPPORT)
void
cir_ext_disable (void)
{
EXTI->PR = EXTI_PR_PR0;
EXTI->IMR &= ~EXTI_IMR_MR0;
}
void
cir_ext_enable (void)
{
EXTI->IMR |= EXTI_IMR_MR0;
}
extern void cir_ext_interrupt (void);
extern void cir_timer_interrupt (void);
CH_IRQ_HANDLER (EXTI0_IRQHandler)
{
CH_IRQ_PROLOGUE ();
chSysLockFromIsr ();
cir_ext_interrupt ();
chSysUnlockFromIsr ();
CH_IRQ_EPILOGUE ();
}
CH_IRQ_HANDLER (TIM3_IRQHandler)
{
CH_IRQ_PROLOGUE();
chSysLockFromIsr();
cir_timer_interrupt ();
chSysUnlockFromIsr();
CH_IRQ_EPILOGUE();
}
#endif

View File

@@ -99,6 +99,7 @@
/* Port B setup. */
#if defined(PINPAD_SUPPORT)
#define GPIOB_CIR 0
#define GPIOB_BUTTON 2
#define GPIOB_ROT_A 3
#define GPIOB_ROT_B 4
@@ -143,4 +144,9 @@
#define VAL_GPIODCRH 0x88888888 /* PD15...PD8 */
#define VAL_GPIODODR 0xFFFFFFFF
#if defined(PINPAD_SUPPORT)
extern void cir_ext_disable (void);
extern void cir_ext_enable (void);
#endif
#endif /* _BOARD_H_ */

View File

@@ -738,12 +738,12 @@ GPGthread (void *arg)
{
Thread *icc_thread = (Thread *)arg;
#if defined(PINPAD_SUPPORT)
extern msg_t pindial_main (void *arg);
Thread *pindial_thread;
extern msg_t pin_main (void *arg);
Thread *pin_thread;
static WORKING_AREA(waPINthread, 128);
pindial_thread = chThdCreateStatic (waPINthread, sizeof(waPINthread),
NORMALPRIO, pindial_main, NULL);
pin_thread = chThdCreateStatic (waPINthread, sizeof(waPINthread),
NORMALPRIO, pin_main, NULL);
#endif
gpg_init ();

312
src/pin-cir.c Normal file
View File

@@ -0,0 +1,312 @@
/*
* pin-cir.c -- PIN input device support (Consumer Infra Red)
*
* Copyright (C) 2010 Free Software Initiative of Japan
* Author: NIIBE Yutaka <gniibe@fsij.org>
*
* This file is a part of Gnuk, a GnuPG USB Token implementation.
*
* Gnuk 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 3 of the License, or
* (at your option) any later version.
*
* Gnuk 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/>.
*
*/
#include "config.h"
#include "ch.h"
#include "hal.h"
#include "board.h"
#include "gnuk.h"
/*
* Controller of Sharp AQUOS: (START + 48-bit + STOP) x N
* Controller of Toshiba REGZA: (START + 32-bit + STOP) + (START + STOP) x N
*/
/*
* PB0 / TIM3_CH3
*
* 72MHz
*
* Prescaler = 72
*
* 1us
*
*
* TIM3_CR1
* CKD = 10 (sampling x4)
* ARPE = 0 (not buffered)
* CMS = 00 (up counter)
* DIR = 0 (up counter)
* OPM = 0 (up counter)
* URS = 1 (update request source: overflow only)
* UDIS = 0 (UEV (update event) enabled)
* CEN = 1 (counter enable)
*
* TIM3_CR2
* TI1S = 1 (TI1 is XOR of ch1, ch2, ch3)
* MMS = 000 (TRGO at Reset)
* CCDS = 0 (DMA on capture)
* RSVD = 000
*
* TIM3_SMCR
* ETP = 0
* ECE = 0
* ETPS = 00
* ETF = 0000
* MSM = 0
* TS = 101 (TI1FP1 selected)
* RSVD = 0
* SMS = 100 (Reset-mode)
*
* TIM3_DIER
*
* TIM3_SR
*
* TIM3_EGR
*
* TIM3_CCMR1
* CC1S = 01 (TI1 selected)
* CC2S = 10 (TI1 selected)
*
* TIM3_CCMR2
*
* TIM3_CCER
* CC2P = 1 (polarity = falling edge: TI1FP1)
* CC2E = 1
* CC1P = 0 (polarity = rising edge: TI1FP1)
* CC1E = 1
*
* TIM3_CNT
* TIM3_PSC = 71
* TIM3_ARR = 18000
*
* TIM3_CCR1 period
* TIM3_CCR2 duty
*
* TIM3_DCR
* TIM3_DMAR
*/
#define PINDISP_TIMEOUT_INTERVAL0 MS2ST(25)
#define PINDISP_TIMEOUT_INTERVAL1 MS2ST(300)
static void
pindisp (uint8_t c)
{
switch (c)
{
case 'G':
palWritePort (IOPORT2, 0xa1ff);
break;
case 'P':
palWritePort (IOPORT2, 0x98ff);
break;
case '.':
palWritePort (IOPORT2, 0x7fff);
break;
default:
palWritePort (IOPORT2, 0xffff);
}
}
#if defined(DEBUG_CIR)
static uint16_t intr_ext;
static uint16_t intr_trg;
static uint16_t intr_ovf;
#define MAX_PININPUT_BIT 256
static uint16_t pininput[MAX_PININPUT_BIT];
static uint16_t *pininput_p;
#endif
/*
* Currently, only NEC protocol is supported.
*/
static uint16_t cir_adr;
static uint16_t cir_cmd;
static uint8_t cir_seq;
#define CIR_BIT_PERIOD 1000
static void
cir_init (void)
{
cir_adr = 0;
cir_cmd = 0;
cir_seq = 0;
cir_ext_enable ();
}
static Thread *pin_thread;
msg_t
pin_main (void *arg)
{
uint8_t s = 0;
(void)arg;
pin_thread = chThdSelf ();
#if defined(DEBUG_CIR)
pininput_p = pininput;
#endif
chEvtClear (ALL_EVENTS);
cir_init ();
while (!chThdShouldTerminate ())
{
eventmask_t m;
m = chEvtWaitOneTimeout (ALL_EVENTS, PINDISP_TIMEOUT_INTERVAL1);
if (m)
{
#if defined(DEBUG_CIR)
uint16_t *p;
DEBUG_INFO ("****\r\n");
DEBUG_SHORT (intr_ext);
DEBUG_SHORT (intr_trg);
DEBUG_SHORT (intr_ovf);
DEBUG_INFO ("----\r\n");
for (p = pininput; p < pininput_p; p++)
DEBUG_SHORT (*p);
DEBUG_INFO ("====\r\n");
pininput_p = pininput;
#endif
DEBUG_INFO ("**** CIR commdand:");
DEBUG_SHORT (cir_cmd);
cir_init ();
}
switch (s++)
{
case 0:
pindisp ('G');
break;
case 1:
pindisp ('P');
break;
case 2:
pindisp ('G');
break;
case 3:
pindisp ('.');
break;
default:
pindisp (' ');
s = 0;
break;
}
chThdSleep (PINDISP_TIMEOUT_INTERVAL0);
}
return 0;
}
void
cir_ext_interrupt (void)
{
cir_ext_disable ();
#if defined(DEBUG_CIR)
intr_ext++;
if (pininput_p - pininput < MAX_PININPUT_BIT)
{
*pininput_p++ = 0x0000;
*pininput_p++ = (uint16_t)chTimeNow ();
}
#endif
TIM3->EGR = TIM_EGR_UG; /* Generate UEV to load PSC and ARR */
/* Enable Timer */
TIM3->SR &= ~(TIM_SR_UIF
| TIM_SR_CC1IF | TIM_SR_CC2IF
| TIM_SR_TIF
| TIM_SR_CC1OF | TIM_SR_CC2OF);
TIM3->DIER = TIM_DIER_UIE /*overflow*/ | TIM_DIER_TIE /*trigger*/;
TIM3->CR1 |= TIM_CR1_CEN;
}
void
cir_timer_interrupt (void)
{
if ((TIM3->SR & TIM_SR_TIF))
{
uint16_t period, on, off;
period = TIM3->CCR1;
on = TIM3->CCR2;
off = period - on;
if (cir_seq >= 2)
{
uint8_t bit = (on >= CIR_BIT_PERIOD) ? 1 : 0;
if (cir_seq < 2 + 16)
cir_adr |= (bit << (cir_seq - 2));
else
cir_cmd |= (bit << (cir_seq - 2 - 16));
}
cir_seq++;
#if defined(DEBUG_CIR)
if (pininput_p - pininput < MAX_PININPUT_BIT)
{
*pininput_p++ = on;
*pininput_p++ = off;
}
intr_trg++;
#endif
TIM3->EGR = TIM_EGR_UG; /* Generate UEV */
TIM3->SR &= ~TIM_SR_TIF;
}
else
/* overflow occurred */
{
TIM3->SR &= ~TIM_SR_UIF;
if (palReadPad (IOPORT2, GPIOB_CIR))
{
/* disable Timer */
TIM3->CR1 &= ~TIM_CR1_CEN;
TIM3->DIER = 0;
if (cir_seq == 2 + 16 + 16
&& (cir_cmd >> 8) == (cir_cmd & 0xff) ^ 0xff)
{
/* Notify thread */
chEvtSignal (pin_thread, (eventmask_t)1);
cir_cmd &= 0xff;
}
else
/* Ignore data received and enable CIR again */
cir_init ();
#if defined(DEBUG_CIR)
if (pininput_p - pininput < MAX_PININPUT_BIT)
{
*pininput_p++ = 0xffff;
*pininput_p++ = (uint16_t)chTimeNow ();
}
intr_ovf++;
#endif
}
}
}