DS2438_DHT22/DS2438_DHT22.c

   1 // Copyright (c) 2015, Tobias Mueller tm(at)tm3d.de
   2 // All rights reserved.
   3 //
   4 // Redistribution and use in source and binary forms, with or without
   5 // modification, are permitted provided that the following conditions are
   6 // met:
   7 //
   8 //  * Redistributions of source code must retain the above copyright
   9 //    notice, this list of conditions and the following disclaimer.
  10 //  * Redistributions in binary form must reproduce the above copyright
  11 //    notice, this list of conditions and the following disclaimer in the
  12 //    documentation and/or other materials provided with the
  13 //    distribution.
  14 //  * All advertising materials mentioning features or use of this
  15 //    software must display the following acknowledgement: This product
  16 //    includes software developed by tm3d.de and its contributors.
  17 //  * Neither the name of tm3d.de nor the names of its contributors may
  18 //    be used to endorse or promote products derived from this software
  19 //    without specific prior written permission.
  20 //
  21 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  22 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  23 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  24 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  25 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  26 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  27 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  28 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  29 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  30 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  31 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  32
  33
  34 #define F_CPU 8000000UL
  35 #define FP_CALC
  36 #include <avr/io.h>
  37 #include <avr/interrupt.h>
  38 #include <util/delay.h>
  39 #include <avr/wdt.h>
  40 #include <avr/sleep.h>
  41
  42 extern void OWINIT();
  43
  44
  45 uint8_t owid[8]={0x26, 0xA2, 0xD9, 0x84, 0x00, 0x00, 0x05, 0x16};/**/
  46
  47
  48 extern uint8_t mode;
  49 extern uint8_t gcontrol;
  50 extern uint8_t reset_indicator;
  51 extern uint8_t alarmflag;
  52
  53 volatile uint8_t wdcounter;
  54
  55
  56 typedef union {
  57 #if  defined(__AVR_ATtiny25__)
  58         volatile uint8_t bytes[16];
  59 #else
  60         volatile uint8_t bytes[64];
  61 #endif
  62         struct {
  63                 uint8_t status;  //1
  64                 int16_t temp;  //2
  65                 uint16_t voltage;  //4
  66                 uint16_t current;  //6
  67                 uint8_t threshold; //8
  68
  69                 uint8_t page1[8]; //9
  70 #if  defined(__AVR_ATtiny25__)
  71 #else
  72                 uint8_t page2[8]; //17
  73                 uint8_t page3[8]; //25
  74                 uint8_t page4[8];  //33
  75                 uint8_t page5[8];  //41
  76                 uint8_t page6[8];  //49
  77                 uint8_t page7[8];  //57
  78                 //uint8_t crc;  //65
  79 #endif
  80         };
  81 } pack_t;
  82 volatile pack_t pack;
  83
  84 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)
  85
  86 #define DDR_SENSOR   DDRB
  87 #define PORT_SENSOR  PORTB
  88 #define PIN_SENSOR   PINB
  89 #define SENSOR       PB4
  90 #endif
  91
  92 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)
  93 #define DDR_SENSOR   DDRA
  94 #define PORT_SENSOR  PORTA
  95 #define PIN_SENSOR   PINA
  96 #define SENSOR       PINA2
  97 #endif
  98
  99
 100
 101 #define SENSOR_sda_out          DDR_SENSOR |= (1 << SENSOR)
 102 #define SENSOR_sda_in                   DDR_SENSOR &= ~(1 << SENSOR);PORT_SENSOR |= (1 << SENSOR) // release sda => hi in consequence of pullup
 103 #define SENSOR_sda_low    PORT_SENSOR &= ~(1 << SENSOR)
 104 #define SENSOR_is_hi                    PIN_SENSOR & (1 << SENSOR)
 105 #define SENSOR_is_low           !(PIN_SENSOR & (1 << SENSOR))
 106
 107 volatile int16_t am2302_temp;
 108 volatile uint16_t am2302_hum;
 109
 110
 111 uint8_t am_wait(uint8_t _time,uint8_t _signal){
 112         TCNT1=0;
 113         while(TCNT1==0);
 114         if (_signal)
 115                 while((SENSOR_is_hi)&&(TCNT1<_time)) {}
 116         else
 117                 while((SENSOR_is_low)&&(TCNT1<_time)) {}
 118
 119                 if (TCNT1>=_time) {return 1;}
 120         return 0;
 121 }
 122
 123 volatile uint8_t am2302_mode=0;
 124 volatile uint8_t timeout=0;
 125
 126
 127
 128 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)
 129 ISR(WATCHDOG_vect) {
 130 #else
 131 ISR(WDT_vect) {
 132 #endif
 133         sleep_disable();          // Disable Sleep on Wakeup
 134         am2302_mode++;
 135         if (reset_indicator==1) reset_indicator++;
 136         else if (reset_indicator==2) mode=0;
 137 /*      if (timeout==2) {
 138                 DIS_TIMER;
 139                 EN_OWINT;
 140                 mode=OWM_SLEEP;
 141         }
 142         timeout++;*/
 143         sleep_enable();           // Enable Sleep Mode
 144
 145 }
 146
 147
 148
 149 uint8_t am2302_1() {
 150         int16_t lam2302_temp;
 151         uint16_t lam2302_hum;
 152         uint8_t rSREG;
 153         uint8_t sensor_data[5];
 154 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)
 155         TCCR1=(1<<CS12); //Clock/8 1µs
 156 #endif
 157
 158 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)
 159         TCCR1B=(1<<CS11); //Clock/8 1µs
 160 #endif
 161         SENSOR_sda_out;
 162         SENSOR_sda_low; // MCU start signal
 163         TCNT1=0;while(TCNT1==0);while(TCNT1<250) {}// start signal (pull sda down for min 0.8ms and maximum 20ms)
 164         TCNT1=0;while(TCNT1==0);while(TCNT1<250) {}// start signal (pull sda down for min 0.8ms and maximum 20ms)
 165         SENSOR_sda_in;
 166         if (am_wait(200,1)) return 2;
 167
 168         // AM2302 response signal min: 75us typ:80us max:85us
 169         if (am_wait(100,0)) return 3;
 170         if (am_wait(100,1)) return 4;
 171
 172         for(uint8_t i = 0; i < 5; i++)  {
 173                 uint8_t sensor_byte = 0;
 174                 for(uint8_t j = 1; j <= 8; j++) {// get 8 bits from sensor
 175                         if (am_wait(88,0)) return 5;
 176
 177                         TCNT1=0;while(TCNT1==0);;while(TCNT1<35)                ;
 178                         sensor_byte <<= 1; // add new lower byte
 179                         if (SENSOR_is_hi) {// if sda high after 30us => bit=1 else bit=0
 180                                 sensor_byte |= 1;
 181                                 if (am_wait(45,1)) return 6;// 30us - 75us = 45us
 182                         }
 183                 }
 184                 sensor_data[i] = sensor_byte;
 185         }
 186
 187         // checksum
 188         if ( ((sensor_data[0]+sensor_data[1]+sensor_data[2]+sensor_data[3]) & 0xff ) != sensor_data[4])
 189         {
 190                 // debug output
 191                 //printf("%b %b %b %b %b %b" CR, sensor_data[0], sensor_data[1], sensor_data[2], sensor_data[3], sensor_data[4], ((sensor_data[0]+sensor_data[1]+sensor_data[2]+sensor_data[3]) & 0xff ));
 192                 PORTB&=~(1<<PINB0);
 193                 return 7;
 194         }
 195 #ifdef FP_CALC
 196         double htemp;
 197         if (sensor_data[2]&0x80) { //min
 198                 sensor_data[2]&=~(0x80);
 199                 htemp=-((sensor_data[2]<<8) + sensor_data[3]);
 200         } else
 201                 htemp=((sensor_data[2]<<8) + sensor_data[3]);
 202         double hhum=(1.0546-0.000216*htemp)*((sensor_data[0]<<8) + sensor_data[1]);
 203
 204         lam2302_hum=0.318*hhum +76;
 205         lam2302_temp=htemp*25.6;
 206 #else
 207
 208         if (sensor_data[2]&0x80) { //minus
 209                 sensor_data[2]&=~(0x80);
 210                 lam2302_temp=-((sensor_data[2]<<8) + sensor_data[3]);
 211         } else
 212                 lam2302_temp=((sensor_data[2]<<8) + sensor_data[3]);
 213
 214         lam2302_hum=((sensor_data[0]<<8) + sensor_data[1]);
 215         volatile uint32_t h1=lam2302_temp*lam2302_hum*3/44803;
 216         lam2302_hum=lam2302_hum*16/49-h1+80;
 217         //lam2302_temp=lam2302_temp*128/5;
 218
 219         int16_t h2=lam2302_temp%5;
 220         lam2302_temp=lam2302_temp/5;
 221         lam2302_temp*=128;
 222         lam2302_temp+=h2*128/5;
 223 #endif
 224         rSREG=SREG;
 225         cli();
 226         am2302_hum=lam2302_hum;
 227         am2302_temp=lam2302_temp;
 228         SREG=rSREG;
 229         return 0;
 230 }
 231
 232
 233 uint8_t am2302_2() { //4mhz
 234         int16_t lam2302_temp;
 235         uint16_t lam2302_hum;
 236         uint8_t rSREG;
 237         uint8_t sensor_data[5];
 238         #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)
 239         TCCR1=(1<<CS11)|(1<<CS10); //Clock/8 1µs
 240         #endif
 241
 242         #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)
 243         TCCR1B=(1<<CS11); //Clock/8 1µs
 244         #endif
 245         SENSOR_sda_out;
 246         SENSOR_sda_low; // MCU start signal
 247         TCNT1=0;while(TCNT1==0);while(TCNT1<250) {}// start signal (pull sda down for min 0.8ms and maximum 20ms)
 248         TCNT1=0;while(TCNT1==0);while(TCNT1<250) {}// start signal (pull sda down for min 0.8ms and maximum 20ms)
 249         SENSOR_sda_in;
 250         if (am_wait(200,1)) return 2;
 251
 252         // AM2302 response signal min: 75us typ:80us max:85us
 253         if (am_wait(100,0)) return 3;
 254         if (am_wait(100,1)) return 4;
 255
 256         for(uint8_t i = 0; i < 5; i++)  {
 257                 uint8_t sensor_byte = 0;
 258                 for(uint8_t j = 1; j <= 8; j++) {// get 8 bits from sensor
 259                         if (am_wait(88,0)) return 5;
 260
 261                         TCNT1=0;while(TCNT1==0);;while(TCNT1<35)                ;
 262                         sensor_byte <<= 1; // add new lower byte
 263                         if (SENSOR_is_hi) {// if sda high after 30us => bit=1 else bit=0
 264                                 sensor_byte |= 1;
 265                                 if (am_wait(45,1)) return 6;// 30us - 75us = 45us
 266                         }
 267                 }
 268                 sensor_data[i] = sensor_byte;
 269         }
 270
 271         // checksum
 272         if ( ((sensor_data[0]+sensor_data[1]+sensor_data[2]+sensor_data[3]) & 0xff ) != sensor_data[4])
 273         {
 274                 // debug output
 275                 //printf("%b %b %b %b %b %b" CR, sensor_data[0], sensor_data[1], sensor_data[2], sensor_data[3], sensor_data[4], ((sensor_data[0]+sensor_data[1]+sensor_data[2]+sensor_data[3]) & 0xff ));
 276                 PORTB&=~(1<<PINB0);
 277                 return 7;
 278         }
 279 #ifdef FP_CALC
 280         lam2302_hum=0.318* ((sensor_data[0]<<8) + sensor_data[1])+76;
 281         if (sensor_data[2]&0x80) { //minus
 282                 sensor_data[2]&=~(0x80);
 283                 lam2302_temp=-((sensor_data[2]<<8) + sensor_data[3])*25.6;
 284         } else
 285                 lam2302_temp=((sensor_data[2]<<8) + sensor_data[3])*25.6;
 286 #else
 287
 288
 289         if (sensor_data[2]&0x80) { //minus
 290                 sensor_data[2]&=~(0x80);
 291                 lam2302_temp=-((sensor_data[2]<<8) + sensor_data[3]);
 292         } else
 293         lam2302_temp=((sensor_data[2]<<8) + sensor_data[3]);
 294
 295         lam2302_hum=((sensor_data[0]<<8) + sensor_data[1]);
 296         volatile uint32_t h1=lam2302_temp*lam2302_hum*3/44803;
 297         lam2302_hum=lam2302_hum*16/49-h1+80;
 298         //lam2302_temp=lam2302_temp*128/5;
 299
 300         int16_t h2=lam2302_temp%5;
 301         lam2302_temp=lam2302_temp/5;
 302         lam2302_temp*=128;
 303         lam2302_temp+=h2*128/5;
 304 #endif
 305
 306
 307         rSREG=SREG;
 308         cli();
 309         am2302_hum=lam2302_hum;
 310         am2302_temp=lam2302_temp;
 311         SREG=rSREG;
 312         return 0;
 313 }
 314
 315
 316 int main(void){
 317     PRR|=(1<<PRUSI)|(1<<PRADC);  //Switch off usi and adc for save Power
 318
 319         OWINIT();
 320
 321         ACSR|=(1<<ACD);  //Disable Comparator
 322         ADCSRB|=(1<<ACME); //Disable Analog multiplexer
 323         MCUCR &=~(1<<PUD); //All Pins Pullup...
 324         MCUCR |=(1<<BODS);
 325         MCUCR &=~(1<<PUD);
 326
 327 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)
 328
 329         PORTB|=(1<<PINB0)|(1<<PINB1)|(1<<PINB3)|(1<<PINB4)|(1<<PINB5);
 330         DDRB|=(1<<PINB1); //DBLINE
 331 #define SENSON PORTB|=(1<<PINB0);
 332 #define SENSOFF PORTB&=~(1<<PINB0);
 333         DDRB|=(1<<PINB0); //stromversorgung
 334
 335         // Set up Watch Dog Timer for Inactivity
 336         WDTCR |= ((1<<WDCE) | (1<<WDE));   // Enable the WD Change Bit
 337         WDTCR =   (1<<WDIE) |              // Enable WDT Interrupt
 338         (1<<WDP2) | (1<<WDP1);   // Set Timeout to ~2 seconds
 339 #endif
 340
 341 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)
 342
 343         //PORTB|=(1<<PINB0)|(1<<PINB1)|(1<<PINB3)|(1<<PINB4)|(1<<PINB5);
 344         //DDRA|=(1<<PINB1);
 345         DDRA|=(1<<PINA1); //stromversorgung
 346 #define SENSON PORTA|=(1<<PINA1);
 347 #define SENSOFF PORTA&=~(1<<PINA1);
 348
 349         // Set up Watch Dog Timer for Inactivity
 350         WDTCSR |= (1<<WDCE) ;   // Enable the WD Change Bit
 351         WDTCSR =   (1<<WDIE) |              // Enable WDT Interrupt
 352         (1<<WDP2) | (1<<WDP1);   // Set Timeout to ~2 seconds
 353 #endif
 354
 355
 356     uint8_t i;
 357         uint8_t err;
 358 #if  defined(__AVR_ATtiny25__)
 359     for(i=0;i<16;i++) pack.bytes[i]=0;
 360 #else
 361         uint8_t pn=1;
 362     for(i=0;i<64;i++) pack.bytes[i]=0;
 363 #endif
 364         //pack.bytes[0]=1;
 365         //pack.bytes[1]=2;
 366         SENSON
 367         _delay_ms(4000);
 368         err =am2302_1();
 369         sei();
 370     while(1)   {
 371                 alarmflag=1;
 372                 if (am2302_mode==2) {
 373                         err=am2302_1();
 374                         if (err!=0) {
 375 #if  defined(__AVR_ATtiny25__)
 376 #else
 377                                 pack.page3[pn]=err;
 378                                 pn=pn+1;if (pn>31) pn=1;
 379 #endif
 380                         }
 381                         SENSOFF
 382                         am2302_mode=3;
 383                 }
 384                 if (am2302_mode>=8) {
 385                         am2302_mode=0;
 386                         SENSON
 387                 }
 388 #if  defined(__AVR_ATtiny25__)||defined(__AVR_ATtiny45__)  || defined(__AVR_ATtiny85__)
 389                         if (((TIMSK & (1<<TOIE0))==0)&& (mode==0))
 390 #endif
 391 #if  defined(__AVR_ATtiny24__)||defined(__AVR_ATtiny44__)  || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny24A__)||defined(__AVR_ATtiny44A__)  || defined(__AVR_ATtiny84A__)
 392                         if (((TIMSK0 & (1<<TOIE0))==0)&& (mode==0))
 393 #endif
 394                           {
 395 //                      CLKPR=(1<<CLKPCE);
 396         //              CLKPR=(1<<CLKPS2); /*0.5Mhz*/
 397                         //PORTB&=~(1<<PINB1);
 398                         MCUCR|=(1<<SE)|(1<<SM1);
 399                         MCUCR&=~(1<<ISC01);
 400                 } else {
 401                         MCUCR|=(1<<SE);
 402                         MCUCR&=~(1<<SM1);
 403                 }
 404                 asm("SLEEP");
 405    }
 406
 407
 408 }