Subversion Repositories svnkaklik

Rev

Rev 308 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log

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