Subversion Repositories svnkaklik

Rev

Details | Last modification | View Log

Rev Author Line No. Line
310 kaklik 1
// 1.6.2007
297 kaklik 2
//----------------------------------------------------------------------------------
300 kaklik 3
//	Prevodnik RS232 <--> RS485
299 kaklik 4
//	pri startbitu na RS232 zapne okamzite vysilac pokud nejsou detekovana data z RS485.
297 kaklik 5
//----------------------------------------------------------------------------------
308 kaklik 6
//Program je urcen k rizeni toku dat v prevodniku RS232 na RS485. S cilem eliminovat jakekoliv prvky nastavovene uzivatelem 
7
//bez nutnosti pouziti hardwaroveho rizeni toku. Program tedy dokaze detekovat prenosovou rychlost, paritni bit a stopbit.  
305 kaklik 8
//
308 kaklik 9
//
305 kaklik 10
//Algoritmus:
11
//  Princip je zalozen na mereni nejkratsiho casoveho useku v osmi vzorcich, delka vzorku 
12
//  se odviji od velikosti prave nejmensiho zmereneho vzorku.
308 kaklik 13
//  Vzorek se meri pomoci 8mi bitoveho casovace a interruptu od zmeny vstupu. casovac je osetren
306 kaklik 14
//  proti pretekani (pocet preteceni se uklada, do promenne s ktere se zpetne vypocita 16bitove cislo, 
15
//  casovac se tedy virtualne chova jako 16ti bitovy.)
308 kaklik 16
//  Mereni delky bitu 
307 kaklik 17
//  
18
//  Aktualni implementace teto metody se chova tak, ze pokud je vyslan bajt ktery po startbitu obsahuje N 
19
//  stejnych bitu, tak je tato sekvence detekovana jako jeden bit to zpusobi ze detekovana rychlost je N krat 
20
//  mensi, nez skutecna. Dusledkem je, ze pokud se jeste pred stopbitem neobjevi samostatny bit s jinou hodnotou, 
308 kaklik 21
//  nez predchozi sekvence. Tak bude vysílání povoleno po dubu osminásobku zmìøené délky "bitu" plus další dva bity jako stopbity.
22
//  
305 kaklik 23
//
307 kaklik 24
//Vlastnosti:
25
//  Tento program je shopen detekovat pararitní bit, ale neni shopen detekovat poèet stopbitù.
26
//  To znamená že když bude parita logická jedna, tak bude rozpoznána jako stop bit.
27
//  Tato vlastnost ale pøíliš nevadí, protože chování algoritmu lze upravit tak, že bude predpokládat dva nebo tøi stopbity.
28
//  V takovém pøípadì se packet pøenese korektnì i když parita bude jedna, i nula.
29
//   
306 kaklik 30
// Tento zpusob detekce neni imuni proti nahodnym chybovim spickam vzniklych v dusledku ruseni. 
305 kaklik 31
// Proto je nutene napajeni kvalitne stbilizovat, pouzivat blokovaci kondenzatory a 
32
// zabezpecit, aby nedochazelo ke zvedani zeme.
310 kaklik 33
////////////////////////////////////////////////////////////////////////////////////////
305 kaklik 34
//
310 kaklik 35
//Autor: Jakub Kakona (kaklik@mlab.cz)
36
//
37
////////////////////////////////////////////////////////////////////////////////////////
305 kaklik 38
//TODO:
39
//  Optimalizovat kod, (hlavne najit casove vyhodnejsi umisteni pro nastavovani defaultnich hodnot promennych)
40
//  Bylo bydobre zavest uspavani pred prijetim bajtu.
41
//  Vykouset program na ATtiny13
308 kaklik 42
//  Pri rychlostech mensich nez 9600kbps dochazi k pretekani promennych a algoritmus se nechova korektne.
306 kaklik 43
//  Neni vyzkousen break, byly testovany pouze ASCII znaky vysilane pres terminal z klavesnice.  
307 kaklik 44
//  Aktivovat WatchDog timer.
45
//  Neni vyzkouseno na vyssím taktu CPU jak 3,7MHz
305 kaklik 46
//////////////////////////////////////////////////////////////////////////////////////
47
//
297 kaklik 48
 
305 kaklik 49
 
297 kaklik 50
#include <avr/io.h>
51
#include <avr/interrupt.h>
52
#include <stdlib.h>
53
#include <ctype.h>
54
#include <avr/eeprom.h>
55
#include <avr/pgmspace.h>
56
 
306 kaklik 57
#define POVOLOVAK_LOW	PORTB &= ~(1<<PB3)   // nastaveni nuly na vystup, krery zapina povoleni vysilani RS485
58
#define POVOLOVAK_HIGH  PORTB |= (1<<PB3)    // nastaveni jednicky na tentyz vystup
59
#define DATA	(PIND & (1<<PD3))			// nastaveni vstupu, na kterem se budou detekovat data, musi byt stejny jako vstup pouziteho interruptu 
297 kaklik 60
 
306 kaklik 61
volatile unsigned int preteceni;  // promenna na ukladani poctu preteceni casovace
62
volatile unsigned int bit;		// promena pro pocitani bitu v bajtu
308 kaklik 63
volatile unsigned long int bitdelay; // obsahuje aktualni zmereny cas delky bitu
64
volatile unsigned long int cas;		// urcuje nejkratsi nalezeny cas delky bitu
302 kaklik 65
 
303 kaklik 66
ISR(TIMER0_OVF_vect)   // interrupt od preteceni casovace
67
{
68
  preteceni++;			// kdyz pretece, poznamenej to.
69
}
70
 
306 kaklik 71
ISR(INT1_vect)   // interrupt od zmeny vstupu na datech
305 kaklik 72
{
308 kaklik 73
  if ((bitdelay=(TCNT0+preteceni*0x0100)) < cas) cas = bitdelay; // provnani jestli zrovna zmereny cas je kratsi nez nejmensi znamy cas   
305 kaklik 74
  TCNT0 = 0;					// zacni znova merit cas zacatku stopbitu
306 kaklik 75
  preteceni=0;				// vynuluj vsechny casove promenne
76
  bit++;		// posun pocitadlo bitu o jednicku 
305 kaklik 77
}
303 kaklik 78
 
297 kaklik 79
// ------------------------------------------------------------------
80
//	Main
81
// ------------------------------------------------------------------
82
int main(void)
83
{
306 kaklik 84
int stopbit;
307 kaklik 85
int ctvrtbit;
297 kaklik 86
 
307 kaklik 87
/*typedef struct {		// struktura pro celoèíselné dìlení 
88
int quot;
89
int rem;
90
} div_t;*/
297 kaklik 91
 
307 kaklik 92
 
305 kaklik 93
  DDRB |= (1<<DDB3);     // povoleni vystupu na povolovak 
94
 
95
  TIMSK |= (1 << TOIE0); // Enable timer overflow interrupt
96
 
97
  MCUCR |= (1 << ISC10); // nastaveni preruseni od zmeny vstupu pro interrupt INT0
98
  GIMSK |= (1 << INT1);  // povoleni interruptu INT0
99
 
100
  TCCR0B |= (1 << CS00);  // Set up timer 
101
 
303 kaklik 102
  sei();   // enable interrupts
297 kaklik 103
 
104
  while(1)
105
  {
300 kaklik 106
	if(!DATA)   // kdyz je 0 na datech 
297 kaklik 107
	{ 
300 kaklik 108
	  POVOLOVAK_HIGH;    // zapni vysilani
303 kaklik 109
 
305 kaklik 110
      TCNT0=0;
111
      preteceni=0;
308 kaklik 112
	  bit=0;			// vynuluj vsechny promenne pro mereni casu a pocitani bitu
306 kaklik 113
	  cas = 0xFFFF;    // nastav cas delky bitu na nejvetsi mozny
305 kaklik 114
 
306 kaklik 115
	  while (bit <= 8)  // odpocitej dobu 8mi bitu
299 kaklik 116
	  {
307 kaklik 117
	    if ((TCNT0+preteceni*0x0100) >= (cas + (ctvrtbit = cas >> 2))) // zkontroluj jestli necekame na dalsi bit dele nez je nekratsi znema delka bitu
118
// v kontrole je rezerva delky ctvrt bitu
299 kaklik 119
		{
306 kaklik 120
		  bit++;						// pokud jsme cekali dele, tak bit uz ubehl, to znamena, ze muzeme pocitadlo bitu posunout o jednicku
307 kaklik 121
//		  div(ctvrtbit,0x0100);			// funkce pro implementaci celociselneho deleni zustava ale nepouzita kvuli nutnosti zavest datove struktury, bude ji nutno pouzit pro vetsi rychlosti   
122
          TCNT0 = ctvrtbit % 0x0100; //reminder; 					// zacni znova merit cas do dalsiho mozneho bitu 
123
          preteceni = ctvrtbit/0x0100; //quota;
305 kaklik 124
		} 
298 kaklik 125
	  }
300 kaklik 126
 
307 kaklik 127
	  while (!DATA);				// cekani na stop bit (detekce pripadneho paritniho bitu)
306 kaklik 128
 
129
	  for (stopbit=2;stopbit >= 0;stopbit--)    // odpocitej dva stopbity
303 kaklik 130
	  {
131
	    while ((TCNT0+preteceni*0x0100) <= cas) 
132
		{
133
		  if(!DATA) break;
134
        }
307 kaklik 135
	  }
297 kaklik 136
    }
300 kaklik 137
    else  POVOLOVAK_LOW;  	// kdyz je 1 prepni na prijem 
297 kaklik 138
  }
298 kaklik 139
  return(0);
297 kaklik 140
}