Refactor to use new protocol module and sipo.
[bertos.git] / bertos / cpu / cortex-m3 / drv / random_lm3s.c
1 /**
2  * \file
3  * <!--
4  * This file is part of BeRTOS.
5  *
6  * Bertos is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19  *
20  * As a special exception, you may use this file as part of a free software
21  * library without restriction.  Specifically, if other files instantiate
22  * templates or use macros or inline functions from this file, or you compile
23  * this file and link it with other files to produce an executable, this
24  * file does not by itself cause the resulting executable to be covered by
25  * the GNU General Public License.  This exception does not however
26  * invalidate any other reasons why the executable file might be covered by
27  * the GNU General Public License.
28  *
29  * Copyright 2010 Develer S.r.l. (http://www.develer.com/)
30  *
31  * -->
32  *
33  * \brief LM3 backend implementation entropy pulling.
34  * \author Giovanni Bajo <rasky@develer.com>
35  */
36
37 #include "random_p.h"
38
39 #include <cpu/power.h>
40
41 #include <io/cm3.h>
42
43 #include <drv/clock_cm3.h>
44
45 /*
46  * Return the cpu core temperature in raw format
47  */
48 INLINE uint16_t hw_readRawTemp(void)
49 {
50     /* Trig the temperature sampling */
51     HWREG(ADC0_BASE + ADC_O_PSSI) |= ADC_PSSI_SS3;
52
53         while (!(HWREG(ADC0_BASE + ADC_O_SSFSTAT3) & ADC_SSFSTAT3_FULL))
54                 cpu_relax();
55
56     return (uint16_t)HWREG(ADC0_BASE + ADC_O_SSFIFO3);
57 }
58
59 INLINE void hw_initIntTemp(void)
60 {
61     SYSCTL_RCGC0_R |= SYSCTL_RCGC0_ADC0;
62
63         lm3s_busyWait(10);
64
65     /* Disable all sequence */
66     HWREG(ADC0_BASE + ADC_O_ACTSS) = 0;
67     /* Set trigger event to programmed (for all sequence) */
68     HWREG(ADC0_BASE + ADC_O_EMUX) = 0;
69     /* Enalbe read of temperature sensor */
70     HWREG(ADC0_BASE + ADC_O_SSCTL3) |= ADC_SSCTL3_TS0;
71     /* Enable sequence S03 (single sample on select channel) */
72     HWREG(ADC0_BASE + ADC_O_ACTSS) |= ADC_ACTSS_ASEN3;
73 }
74
75
76 void random_pull_entropy(uint8_t *entropy, size_t len)
77 {
78         // We use the internal temperature sensor of LM3S as a source of entropy.
79         // The last bit of the acquisition is very variable and with a decent distribution
80         // to consider it "entropic". It does not really matter because it will
81         // go through a randomness extractor anyway.
82         hw_initIntTemp();
83
84         for (size_t j=0; j<len; j++)
85         {
86                 uint8_t accum = 0;
87                 for (int b=0; b<8; ++b)
88                         if (hw_readRawTemp() & 1)
89                                 accum |= 1<<b;
90
91                 *entropy++ = accum;
92         }
93 }