Subversion Repositories NaviCtrl

Rev

Rev 480 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
242 killagreg 1
/*#######################################################################################*/
2
/* !!! THIS IS NOT FREE SOFTWARE !!!                                                     */
3
/*#######################################################################################*/
4
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
5
// + www.MikroKopter.com
6
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 7
// + Software Nutzungsbedingungen (english version: see below)
8
// + der Fa. HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland - nachfolgend Lizenzgeber genannt -
9
// + Der Lizenzgeber räumt dem Kunden ein nicht-ausschließliches, zeitlich und räumlich* unbeschränktes Recht ein, die im den
10
// + Mikrocontroller verwendete Firmware für die Hardware Flight-Ctrl, Navi-Ctrl, BL-Ctrl, MK3Mag & PC-Programm MikroKopter-Tool 
11
// + - nachfolgend Software genannt - nur für private Zwecke zu nutzen.
12
// + Der Einsatz dieser Software ist nur auf oder mit Produkten des Lizenzgebers zulässig.
242 killagreg 13
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 14
// + Die vom Lizenzgeber gelieferte Software ist urheberrechtlich geschützt. Alle Rechte an der Software sowie an sonstigen im
15
// + Rahmen der Vertragsanbahnung und Vertragsdurchführung überlassenen Unterlagen stehen im Verhältnis der Vertragspartner ausschließlich dem Lizenzgeber zu.
16
// + Die in der Software enthaltenen Copyright-Vermerke, Markenzeichen, andere Rechtsvorbehalte, Seriennummern sowie
17
// + sonstige der Programmidentifikation dienenden Merkmale dürfen vom Kunden nicht verändert oder unkenntlich gemacht werden.
18
// + Der Kunde trifft angemessene Vorkehrungen für den sicheren Einsatz der Software. Er wird die Software gründlich auf deren
19
// + Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt.
20
// + Die Haftung des Lizenzgebers wird - soweit gesetzlich zulässig - begrenzt in Höhe des typischen und vorhersehbaren
21
// + Schadens. Die gesetzliche Haftung bei Personenschäden und nach dem Produkthaftungsgesetz bleibt unberührt. Dem Lizenzgeber steht jedoch der Einwand 
22
// + des Mitverschuldens offen.
23
// + Der Kunde trifft angemessene Vorkehrungen für den Fall, dass die Software ganz oder teilweise nicht ordnungsgemäß arbeitet.
24
// + Er wird die Software gründlich auf deren Verwendbarkeit zu dem von ihm beabsichtigten Zweck testen, bevor er diese operativ einsetzt.
25
// + Der Kunde wird er seine Daten vor Einsatz der Software nach dem Stand der Technik sichern.
26
// + Der Kunde ist darüber unterrichtet, dass der Lizenzgeber seine Daten im zur Vertragsdurchführung erforderlichen Umfang
27
// + und auf Grundlage der Datenschutzvorschriften erhebt, speichert, verarbeitet und, sofern notwendig, an Dritte übermittelt.
28
// + *) Die räumliche Nutzung bezieht sich nur auf den Einsatzort, nicht auf die Reichweite der programmierten Software.
29
// + #### ENDE DER NUTZUNGSBEDINGUNGEN ####'
30
// +  Hinweis: Informationen über erweiterte Nutzungsrechte (wie z.B. Nutzung für nicht-private Zwecke) sind auf Anfrage per Email an info(@)hisystems.de verfügbar.
242 killagreg 31
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 32
// + Software LICENSING TERMS
242 killagreg 33
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
360 holgerb 34
// + of HiSystems GmbH, Flachsmeerstrasse 2, 26802 Moormerland, Germany - the Licensor -
35
// + The Licensor grants the customer a non-exclusive license to use the microcontroller firmware of the Flight-Ctrl, Navi-Ctrl, BL-Ctrl, and MK3Mag hardware 
36
// + (the Software) exclusively for private purposes. The License is unrestricted with respect to time and territory*.
37
// + The Software may only be used with the Licensor's products.
38
// + The Software provided by the Licensor is protected by copyright. With respect to the relationship between the parties to this
39
// + agreement, all rights pertaining to the Software and other documents provided during the preparation and execution of this
40
// + agreement shall be the property of the Licensor.
41
// + The information contained in the Software copyright notices, trademarks, other legal reservations, serial numbers and other
42
// + features that can be used to identify the program may not be altered or defaced by the customer.
43
// + The customer shall be responsible for taking reasonable precautions
44
// + for the safe use of the Software. The customer shall test the Software thoroughly regarding its suitability for the
45
// + intended purpose before implementing it for actual operation. The Licensor's liability shall be limited to the extent of typical and
46
// + foreseeable damage to the extent permitted by law, notwithstanding statutory liability for bodily injury and product
47
// + liability. However, the Licensor shall be entitled to the defense of contributory negligence.
48
// + The customer will take adequate precautions in the case, that the software is not working properly. The customer will test
49
// + the software for his purpose before any operational usage. The customer will backup his data before using the software.
50
// + The customer understands that the Licensor collects, stores and processes, and, where required, forwards, customer data
51
// + to third parties to the extent necessary for executing the agreement, subject to applicable data protection and privacy regulations.
52
// + *) The territory aspect only refers to the place where the Software is used, not its programmed range.
53
// + #### END OF LICENSING TERMS ####
54
// + Note: For information on license extensions (e.g. commercial use), please contact us at info(@)hisystems.de.
242 killagreg 55
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
254 killagreg 56
#include <math.h>
292 killagreg 57
#include <stdio.h>
242 killagreg 58
#include <string.h>
59
#include "91x_lib.h"
253 killagreg 60
#include "ncmag.h"
470 killagreg 61
#include "i2c1.h"
465 ingob 62
#include "i2c0.h"
63
 
242 killagreg 64
#include "timer1.h"
65
#include "led.h"
66
#include "uart1.h"
254 killagreg 67
#include "eeprom.h"
256 killagreg 68
#include "mymath.h"
292 killagreg 69
#include "main.h"
454 holgerb 70
#include "spi_slave.h"
242 killagreg 71
 
253 killagreg 72
u8 NCMAG_Present = 0;
254 killagreg 73
u8 NCMAG_IsCalibrated = 0;
242 killagreg 74
 
472 holgerb 75
u8 I2C_CompassPort = 1;
473 holgerb 76
u8 ExtCompassOrientation = 0;
472 holgerb 77
 
465 ingob 78
u8 *I2C_BufferPnt;
79
u8 *I2C_ErrorPnt;
80
I2C_TransmissionFunc_t                          I2C_TransmissionFunc;
81
I2C_LockBufferFunc_t                            I2C_LockBufferFunc;
82
I2C_WaitForEndOfTransmissionFunc_t      I2C_WaitForEndOfTransmissionFunc;
83
 
84
 
394 killagreg 85
// supported magnetic sensor types
86
#define TYPE_NONE                       0
87
#define TYPE_HMC5843            1
88
#define TYPE_LSM303DLH          2
89
#define TYPE_LSM303DLM          3
242 killagreg 90
 
394 killagreg 91
u8 NCMAG_SensorType = TYPE_NONE;
92
 
254 killagreg 93
Calibration_t Calibration;              // calibration data in RAM 
339 holgerb 94
volatile s16vec_t AccRawVector;
95
volatile s16vec_t MagRawVector;
254 killagreg 96
 
253 killagreg 97
// i2c MAG interface
98
#define MAG_SLAVE_ADDRESS       0x3C    // i2C slave address mag. sensor registers
242 killagreg 99
 
253 killagreg 100
// register mapping
101
#define REG_MAG_CRA                     0x00
102
#define REG_MAG_CRB                     0x01
103
#define REG_MAG_MODE            0x02
104
#define REG_MAG_DATAX_MSB       0x03
105
#define REG_MAG_DATAX_LSB       0x04
106
#define REG_MAG_DATAY_MSB       0x05
107
#define REG_MAG_DATAY_LSB       0x06
108
#define REG_MAG_DATAZ_MSB       0x07
109
#define REG_MAG_DATAZ_LSB       0x08
110
#define REG_MAG_STATUS          0x09
329 holgerb 111
 
253 killagreg 112
#define REG_MAG_IDA                     0x0A
113
#define REG_MAG_IDB                     0x0B
114
#define REG_MAG_IDC                     0x0C
394 killagreg 115
#define REG_MAG_IDF                     0x0F  // WHO_AM_I _M = 0x03c when LSM303DLM is connected
242 killagreg 116
 
253 killagreg 117
// bit mask for configuration mode
118
#define CRA_MODE_MASK           0x03
119
#define CRA_MODE_NORMAL         0x00    //default
120
#define CRA_MODE_POSBIAS        0x01
121
#define CRA_MODE_NEGBIAS        0x02
122
#define CRA_MODE_SELFTEST       0x03
242 killagreg 123
 
253 killagreg 124
// bit mask for measurement mode
125
#define MODE_MASK                       0xFF
126
#define MODE_CONTINUOUS         0x00
127
#define MODE_SINGLE                     0x01    // default
128
#define MODE_IDLE                       0x02
129
#define MODE_SLEEP                      0x03
130
 
242 killagreg 131
// bit mask for rate
253 killagreg 132
#define CRA_RATE_MASK           0x1C
133
 
134
// bit mask for gain
135
#define CRB_GAIN_MASK           0xE0
136
 
137
// ids
138
#define MAG_IDA         0x48
139
#define MAG_IDB         0x34
140
#define MAG_IDC         0x33
394 killagreg 141
#define MAG_IDF_LSM303DLM       0x3C
253 killagreg 142
 
143
// the special HMC5843 interface
144
// bit mask for rate
242 killagreg 145
#define HMC5843_CRA_RATE_0_5HZ          0x00
146
#define HMC5843_CRA_RATE_1HZ            0x04
147
#define HMC5843_CRA_RATE_2HZ            0x08
148
#define HMC5843_CRA_RATE_5HZ            0x0C
149
#define HMC5843_CRA_RATE_10HZ           0x10    //default
150
#define HMC5843_CRA_RATE_20HZ           0x14
151
#define HMC5843_CRA_RATE_50HZ           0x18
152
// bit mask for gain
153
#define HMC5843_CRB_GAIN_07GA           0x00
154
#define HMC5843_CRB_GAIN_10GA           0x20    //default
339 holgerb 155
#define HMC5843_CRB_GAIN_15GA           0x40    // <--- we use this     
242 killagreg 156
#define HMC5843_CRB_GAIN_20GA           0x60
157
#define HMC5843_CRB_GAIN_32GA           0x80
158
#define HMC5843_CRB_GAIN_38GA           0xA0
159
#define HMC5843_CRB_GAIN_45GA           0xC0
160
#define HMC5843_CRB_GAIN_65GA           0xE0
253 killagreg 161
// self test value
339 holgerb 162
#define HMC5843_TEST_XSCALE             555
163
#define HMC5843_TEST_YSCALE             555
164
#define HMC5843_TEST_ZSCALE             555
394 killagreg 165
// calibration range
342 holgerb 166
#define HMC5843_CALIBRATION_RANGE   600
242 killagreg 167
 
253 killagreg 168
// the special LSM302DLH interface
169
// bit mask for rate
170
#define LSM303DLH_CRA_RATE_0_75HZ       0x00
171
#define LSM303DLH_CRA_RATE_1_5HZ        0x04
172
#define LSM303DLH_CRA_RATE_3_0HZ        0x08
173
#define LSM303DLH_CRA_RATE_7_5HZ        0x0C
174
#define LSM303DLH_CRA_RATE_15HZ         0x10    //default
175
#define LSM303DLH_CRA_RATE_30HZ         0x14
176
#define LSM303DLH_CRA_RATE_75HZ         0x18
338 holgerb 177
 
253 killagreg 178
// bit mask for gain
179
#define LSM303DLH_CRB_GAIN_XXGA         0x00
180
#define LSM303DLH_CRB_GAIN_13GA         0x20    //default
339 holgerb 181
#define LSM303DLH_CRB_GAIN_19GA         0x40    // <--- we use this
253 killagreg 182
#define LSM303DLH_CRB_GAIN_25GA         0x60
183
#define LSM303DLH_CRB_GAIN_40GA         0x80
184
#define LSM303DLH_CRB_GAIN_47GA         0xA0
185
#define LSM303DLH_CRB_GAIN_56GA         0xC0
186
#define LSM303DLH_CRB_GAIN_81GA         0xE0
394 killagreg 187
 
188
typedef struct
189
{
190
        u8 A;
191
        u8 B;
192
        u8 C;
193
} __attribute__((packed)) Identification_t;
194
volatile Identification_t NCMAG_Identification;
195
 
196
typedef struct
197
{
198
        u8 Sub;
199
} __attribute__((packed)) Identification2_t;
200
volatile Identification2_t NCMAG_Identification2;
201
 
202
typedef struct
203
{
204
        u8 cra;
205
        u8 crb;
206
        u8 mode;
207
} __attribute__((packed)) MagConfig_t;
208
 
209
volatile MagConfig_t MagConfig;
210
 
211
 
465 ingob 212
 
213
 
214
 
253 killagreg 215
// self test value
338 holgerb 216
#define LSM303DLH_TEST_XSCALE   495
217
#define LSM303DLH_TEST_YSCALE   495
218
#define LSM303DLH_TEST_ZSCALE   470
339 holgerb 219
// clibration range
342 holgerb 220
#define LSM303_CALIBRATION_RANGE   550
253 killagreg 221
 
222
// the i2c ACC interface
223
#define ACC_SLAVE_ADDRESS               0x30    // i2c slave for acc. sensor registers
394 killagreg 224
 
225
// multiple byte read/write mask
226
#define REG_ACC_MASK_AUTOINCREMENT 0x80
227
 
253 killagreg 228
// register mapping
229
#define REG_ACC_CTRL1                   0x20
230
#define REG_ACC_CTRL2                   0x21
231
#define REG_ACC_CTRL3                   0x22
232
#define REG_ACC_CTRL4                   0x23
233
#define REG_ACC_CTRL5                   0x24
234
#define REG_ACC_HP_FILTER_RESET 0x25
235
#define REG_ACC_REFERENCE               0x26
236
#define REG_ACC_STATUS                  0x27
237
#define REG_ACC_X_LSB                   0x28
238
#define REG_ACC_X_MSB                   0x29
239
#define REG_ACC_Y_LSB                   0x2A
240
#define REG_ACC_Y_MSB                   0x2B
241
#define REG_ACC_Z_LSB                   0x2C
242
#define REG_ACC_Z_MSB                   0x2D
243
 
394 killagreg 244
#define ACC_CRTL1_PM_DOWN               0x00
245
#define ACC_CRTL1_PM_NORMAL             0x20
246
#define ACC_CRTL1_PM_LOW_0_5HZ  0x40
247
#define ACC_CRTL1_PM_LOW_1HZ    0x60
248
#define ACC_CRTL1_PM_LOW_2HZ    0x80
249
#define ACC_CRTL1_PM_LOW_5HZ    0xA0
250
#define ACC_CRTL1_PM_LOW_10HZ   0xC0
251
// Output data rate in normal power mode
252
#define ACC_CRTL1_DR_50HZ               0x00
253
#define ACC_CRTL1_DR_100HZ              0x08
254
#define ACC_CRTL1_DR_400HZ              0x10
255
#define ACC_CRTL1_DR_1000HZ             0x18
256
// axis anable flags                    
257
#define ACC_CRTL1_XEN                   0x01
258
#define ACC_CRTL1_YEN                   0x02
259
#define ACC_CRTL1_ZEN                   0x04
253 killagreg 260
 
397 holgerb 261
#define ACC_CRTL2_FILTER8       0x10
262
#define ACC_CRTL2_FILTER16      0x11
263
#define ACC_CRTL2_FILTER32      0x12
264
#define ACC_CRTL2_FILTER64      0x13
395 holgerb 265
 
394 killagreg 266
#define ACC_CTRL4_BDU                   0x80 // Block data update, (0: continuos update; 1: output registers not updated between MSB and LSB reading)
267
#define ACC_CTRL4_BLE                   0x40 // Big/little endian, (0: data LSB @ lower address; 1: data MSB @ lower address)
268
#define ACC_CTRL4_FS_2G                 0x00
269
#define ACC_CTRL4_FS_4G                 0x10
270
#define ACC_CTRL4_FS_8G                 0x30
271
#define ACC_CTRL4_STSIGN_PLUS   0x00
272
#define ACC_CTRL4_STSIGN_MINUS  0x08
273
#define ACC_CTRL4_ST_ENABLE             0x02
253 killagreg 274
 
394 killagreg 275
#define ACC_CTRL5_STW_ON                0x03
276
#define ACC_CTRL5_STW_OFF               0x00
242 killagreg 277
 
253 killagreg 278
typedef struct
279
{
280
        u8 ctrl_1;
281
        u8 ctrl_2;
282
        u8 ctrl_3;
283
        u8 ctrl_4;
284
        u8 ctrl_5;
285
} __attribute__((packed)) AccConfig_t;
286
 
287
volatile AccConfig_t AccConfig;
288
 
472 holgerb 289
u8 NCMag_CalibrationWrite(u8 intern) // two calibrtion sets for extern and intern sensor
254 killagreg 290
{
472 holgerb 291
        u16 address;
394 killagreg 292
        u8 i, crc = MAG_CALIBRATION_COMPATIBLE;
254 killagreg 293
        EEPROM_Result_t eres;
294
        u8 *pBuff = (u8*)&Calibration;
473 holgerb 295
        Calibration.Version = CALIBRATION_VERSION;
254 killagreg 296
 
472 holgerb 297
        if(intern == I2C_INTERN_1) address = EEPROM_ADR_MAG_CALIBRATION_INTERN;
473 holgerb 298
        else
299
        {
300
         address = EEPROM_ADR_MAG_CALIBRATION_EXTERN;
301
         Calibration.Version = CALIBRATION_VERSION + ExtCompassOrientation * 16;
302
        }
256 killagreg 303
        for(i = 0; i<(sizeof(Calibration)-1); i++)
254 killagreg 304
        {
305
                crc += pBuff[i];        
306
        }
307
        Calibration.crc = ~crc;
472 holgerb 308
        eres = EEPROM_WriteBlock(address, pBuff, sizeof(Calibration));
254 killagreg 309
        if(EEPROM_SUCCESS == eres) i = 1;
310
        else i = 0;
311
        return(i);     
312
}
313
 
472 holgerb 314
u8 NCMag_CalibrationRead(u8 intern)     // two calibrtion sets for extern and intern sensor
254 killagreg 315
{
394 killagreg 316
        u8 i, crc = MAG_CALIBRATION_COMPATIBLE;
254 killagreg 317
        u8 *pBuff = (u8*)&Calibration;
472 holgerb 318
        u16 address;
254 killagreg 319
 
472 holgerb 320
        if(intern == I2C_INTERN_1) address = EEPROM_ADR_MAG_CALIBRATION_INTERN;
321
        else address = EEPROM_ADR_MAG_CALIBRATION_EXTERN;
322
 
323
        if(EEPROM_SUCCESS == EEPROM_ReadBlock(address, pBuff, sizeof(Calibration)))
254 killagreg 324
        {
256 killagreg 325
                for(i = 0; i<(sizeof(Calibration)-1); i++)
254 killagreg 326
                {
327
                        crc += pBuff[i];        
328
                }
329
                crc = ~crc;
330
                if(Calibration.crc != crc) return(0); // crc mismatch
473 holgerb 331
                if((Calibration.Version & 0x0f) == CALIBRATION_VERSION) return(1);
254 killagreg 332
        }
333
        return(0);
334
}
335
 
336
 
337
void NCMAG_Calibrate(void)
338
{
330 holgerb 339
        u8 msg[64];
454 holgerb 340
        static u8 speak = 0;
475 holgerb 341
        static s16 Xmin = 0, Xmax = 0, Ymin = 0, Ymax = 0, Zmin = 0, Zmax = 0, Zmin2 = 0, Zmax2 = 0;
256 killagreg 342
        static s16 X = 0, Y = 0, Z = 0;
254 killagreg 343
        static u8 OldCalState = 0;     
394 killagreg 344
        s16 MinCalibration = 450;
254 killagreg 345
 
256 killagreg 346
        X = (4*X + MagRawVector.X + 3)/5;
347
        Y = (4*Y + MagRawVector.Y + 3)/5;
348
        Z = (4*Z + MagRawVector.Z + 3)/5;
349
 
254 killagreg 350
        switch(Compass_CalState)
351
        {
352
                case 1:
353
                        // 1st step of calibration
354
                        // initialize ranges
355
                        // used to change the orientation of the NC in the horizontal plane
356
                        Xmin =  10000;
357
                        Xmax = -10000;
358
                        Ymin =  10000;
359
                        Ymax = -10000;
360
                        Zmin =  10000;
361
                        Zmax = -10000;
454 holgerb 362
                        speak = 1;
475 holgerb 363
                        if(Compass_CalState != OldCalState) // avoid continously writing of eeprom!
364
                        {
365
                         UART1_PutString("\r\nStarting compass calibration");
366
                         if(I2C_CompassPort == I2C_EXTERN_0)
367
                         {
368
                          if(!ExtCompassOrientation) ExtCompassOrientation = GetExtCompassOrientation();
369
                          UART1_PutString(" - External sensor ");
370
                          sprintf(msg, "with orientation: %d ",ExtCompassOrientation);
371
                          UART1_PutString(msg);
372
                         }
480 holgerb 373
                         else UART1_PutString(" - Internal sensor ");
475 holgerb 374
                        }
254 killagreg 375
                        break;
376
                case 2: // 2nd step of calibration
377
                        // find Min and Max of the X- and Y-Sensors during rotation in the horizontal plane
275 killagreg 378
                        if(X < Xmin)            { Xmin = X; BeepTime = 20;}
379
                        else if(X > Xmax)       { Xmax = X; BeepTime = 20;}
380
                        if(Y < Ymin)            { Ymin = Y; BeepTime = 60;}
381
                        else if(Y > Ymax)       { Ymax = Y; BeepTime = 60;}
475 holgerb 382
                        if(Z < Zmin)        { Zmin = Z; } // silent
383
                        else if(Z > Zmax)   { Zmax = Z; }
384
 
454 holgerb 385
                        if(speak) SpeakHoTT = SPEAK_CALIBRATE; speak = 0;
254 killagreg 386
                        break;
387
 
388
                case 3: // 3rd step of calibration
389
                        // used to change the orientation of the MK3MAG vertical to the horizontal plane
454 holgerb 390
                        speak = 1;
254 killagreg 391
                        break;
392
 
393
                case 4:
394
                        // find Min and Max of the Z-Sensor
475 holgerb 395
                        if(Z < Zmin2)     { Zmin2 = Z; BeepTime = 80;}
396
                        else if(Z > Zmax2) { Zmax2 = Z; BeepTime = 80;}
397
 
398
                        if(X < Xmin)            { Xmin = X; BeepTime = 20;}
399
                        else if(X > Xmax)       { Xmax = X; BeepTime = 20;}
400
                        if(Y < Ymin)            { Ymin = Y; BeepTime = 60;}
401
                        else if(Y > Ymax)       { Ymax = Y; BeepTime = 60;}
402
 
454 holgerb 403
                        if(speak) SpeakHoTT = SPEAK_CALIBRATE; speak = 0;
254 killagreg 404
                        break;
405
 
406
                case 5:
407
                        // Save values
408
                        if(Compass_CalState != OldCalState) // avoid continously writing of eeprom!
409
                        {
394 killagreg 410
                                switch(NCMAG_SensorType)
411
                                {
412
                                        case TYPE_HMC5843:
475 holgerb 413
                                                UART1_PutString("\r\nFinished: HMC5843 calibration\n\r");
394 killagreg 414
                                                MinCalibration = HMC5843_CALIBRATION_RANGE;
415
                                                break;
416
 
417
                                        case TYPE_LSM303DLH:
418
                                        case TYPE_LSM303DLM:
475 holgerb 419
                                                UART1_PutString("\r\nFinished: LSM303 calibration\n\r");
394 killagreg 420
                                                MinCalibration = LSM303_CALIBRATION_RANGE;
421
                                        break;
422
                                }
342 holgerb 423
                                if(EarthMagneticStrengthTheoretic)
424
                                 {
394 killagreg 425
                                  MinCalibration = (MinCalibration * EarthMagneticStrengthTheoretic) / 50;
342 holgerb 426
                                  sprintf(msg, "Earth field on your location should be: %iuT\r\n",EarthMagneticStrengthTheoretic);
427
                                  UART1_PutString(msg);
428
                                 }
429
                            else UART1_PutString("without GPS\n\r");
339 holgerb 430
 
475 holgerb 431
                                if(Zmin2 < Zmin)          { Zmin = Zmin2; }
432
                                else if(Zmax2 > Zmax) { Zmax = Zmax2; }
433
 
254 killagreg 434
                                Calibration.MagX.Range = Xmax - Xmin;
435
                                Calibration.MagX.Offset = (Xmin + Xmax) / 2;
436
                                Calibration.MagY.Range = Ymax - Ymin;
437
                                Calibration.MagY.Offset = (Ymin + Ymax) / 2;
438
                                Calibration.MagZ.Range = Zmax - Zmin;
439
                                Calibration.MagZ.Offset = (Zmin + Zmax) / 2;
394 killagreg 440
                                if((Calibration.MagX.Range > MinCalibration) && (Calibration.MagY.Range > MinCalibration) && (Calibration.MagZ.Range > MinCalibration))
254 killagreg 441
                                {
472 holgerb 442
                                        NCMAG_IsCalibrated = NCMag_CalibrationWrite(I2C_CompassPort);
270 killagreg 443
                                        BeepTime = 2500;
342 holgerb 444
                                        UART1_PutString("\r\n-> Calibration okay <-\n\r");
454 holgerb 445
SpeakHoTT = SPEAK_MIKROKOPTER;
254 killagreg 446
                                }
447
                                else
448
                                {
454 holgerb 449
SpeakHoTT = SPEAK_ERR_CALIBARTION;
339 holgerb 450
                                        UART1_PutString("\r\nCalibration FAILED - Values too low: ");
394 killagreg 451
                                    if(Calibration.MagX.Range < MinCalibration) UART1_PutString("X! ");
452
                                    if(Calibration.MagY.Range < MinCalibration) UART1_PutString("Y! ");
453
                                    if(Calibration.MagZ.Range < MinCalibration) UART1_PutString("Z! ");
330 holgerb 454
                                        UART1_PutString("\r\n");
339 holgerb 455
 
254 killagreg 456
                                        // restore old calibration data from eeprom
472 holgerb 457
                                        NCMAG_IsCalibrated = NCMag_CalibrationRead(I2C_CompassPort);
254 killagreg 458
                                }
330 holgerb 459
                                        sprintf(msg, "X: (%i - %i = %i)\r\n",Xmax,Xmin,Xmax - Xmin);
460
                                        UART1_PutString(msg);
461
                                        sprintf(msg, "Y: (%i - %i = %i)\r\n",Ymax,Ymin,Ymax - Ymin);
462
                                        UART1_PutString(msg);
463
                                        sprintf(msg, "Z: (%i - %i = %i)\r\n",Zmax,Zmin,Zmax - Zmin);
464
                                        UART1_PutString(msg);
394 killagreg 465
                                        sprintf(msg, "(Minimum ampilitude is: %i)\r\n",MinCalibration);
342 holgerb 466
                                        UART1_PutString(msg);
254 killagreg 467
                        }
468
                        break;
469
 
470
                default:
471
                        break; 
472
        }
473
        OldCalState = Compass_CalState;
474
}
475
 
242 killagreg 476
// ---------- call back handlers -----------------------------------------
477
 
478
// rx data handler for id info request
253 killagreg 479
void NCMAG_UpdateIdentification(u8* pRxBuffer, u8 RxBufferSize)
254 killagreg 480
{       // if number of bytes are matching
253 killagreg 481
        if(RxBufferSize == sizeof(NCMAG_Identification) )
242 killagreg 482
        {
253 killagreg 483
                memcpy((u8 *)&NCMAG_Identification, pRxBuffer, sizeof(NCMAG_Identification));
484
        }
242 killagreg 485
}
329 holgerb 486
 
487
void NCMAG_UpdateIdentification_Sub(u8* pRxBuffer, u8 RxBufferSize)
488
{       // if number of bytes are matching
489
        if(RxBufferSize == sizeof(NCMAG_Identification2))
490
        {
491
                memcpy((u8 *)&NCMAG_Identification2, pRxBuffer, sizeof(NCMAG_Identification2));
492
        }
493
}
494
 
254 killagreg 495
// rx data handler for magnetic sensor raw data
253 killagreg 496
void NCMAG_UpdateMagVector(u8* pRxBuffer, u8 RxBufferSize)
254 killagreg 497
{       // if number of bytes are matching
498
        if(RxBufferSize == sizeof(MagRawVector) )
243 killagreg 499
        {       // byte order from big to little endian
473 holgerb 500
                s16 raw, X = 0, Y = 0, Z = 0;
256 killagreg 501
                raw = pRxBuffer[0]<<8;
502
                raw+= pRxBuffer[1];
473 holgerb 503
                if(raw >= NCMAG_MIN_RAWVALUE && raw <= NCMAG_MAX_RAWVALUE) X = raw;
256 killagreg 504
                raw = pRxBuffer[2]<<8;
505
                raw+= pRxBuffer[3];
330 holgerb 506
            if(raw >= NCMAG_MIN_RAWVALUE && raw <= NCMAG_MAX_RAWVALUE)
507
                {
473 holgerb 508
                        if(NCMAG_SensorType == TYPE_LSM303DLM)  Z = raw; // here Z and Y are exchanged
509
                        else                                                                    Y = raw;
330 holgerb 510
                }
256 killagreg 511
                raw = pRxBuffer[4]<<8;
512
                raw+= pRxBuffer[5];
330 holgerb 513
                if(raw >= NCMAG_MIN_RAWVALUE && raw <= NCMAG_MAX_RAWVALUE)
514
                {
473 holgerb 515
                        if(NCMAG_SensorType == TYPE_LSM303DLM)  Y = raw; // here Z and Y are exchanged
516
                        else                                                                    Z = raw;
330 holgerb 517
                }
473 holgerb 518
          switch(ExtCompassOrientation)
519
                {
520
                 case 0:
521
                 case 1:
522
                 default:
523
                                MagRawVector.X = X;
524
                                MagRawVector.Y = Y;
525
                                MagRawVector.Z = Z;
526
                                break;
527
                 case 2:
528
                                MagRawVector.X = -X;
529
                                MagRawVector.Y = Y;
530
                                MagRawVector.Z = -Z;
531
                                break;
532
                 case 3:
533
                                MagRawVector.X = -Z;
534
                                MagRawVector.Y = Y;
535
                                MagRawVector.Z = X;
536
                                break;
537
                 case 4:
538
                                MagRawVector.X = Z;
539
                                MagRawVector.Y = Y;
540
                                MagRawVector.Z = -X;
541
                                break;
542
                 case 5:
543
                                MagRawVector.X = X;
544
                                MagRawVector.Y = -Z;
545
                                MagRawVector.Z = Y;
546
                                break;
547
                 case 6:
548
                                MagRawVector.X = -X;
549
                                MagRawVector.Y = -Z;
550
                                MagRawVector.Z = -Y;
551
                                break;
552
                }
242 killagreg 553
        }
254 killagreg 554
        if(Compass_CalState || !NCMAG_IsCalibrated)
284 killagreg 555
        {       // mark out data invalid
289 killagreg 556
                MagVector.X = MagRawVector.X;
557
                MagVector.Y = MagRawVector.Y;
558
                MagVector.Z = MagRawVector.Z;
254 killagreg 559
                Compass_Heading = -1;
560
        }
561
        else
562
        {
563
                // update MagVector from MagRaw Vector by Scaling
564
                MagVector.X = (s16)((1024L*(s32)(MagRawVector.X - Calibration.MagX.Offset))/Calibration.MagX.Range);
565
                MagVector.Y = (s16)((1024L*(s32)(MagRawVector.Y - Calibration.MagY.Offset))/Calibration.MagY.Range);
566
                MagVector.Z = (s16)((1024L*(s32)(MagRawVector.Z - Calibration.MagZ.Offset))/Calibration.MagZ.Range);
292 killagreg 567
                Compass_CalcHeading();
254 killagreg 568
        }
242 killagreg 569
}
254 killagreg 570
// rx data handler  for acceleration raw data
253 killagreg 571
void NCMAG_UpdateAccVector(u8* pRxBuffer, u8 RxBufferSize)
572
{       // if number of byte are matching
254 killagreg 573
        if(RxBufferSize == sizeof(AccRawVector) )
253 killagreg 574
        {
254 killagreg 575
                memcpy((u8*)&AccRawVector, pRxBuffer,sizeof(AccRawVector));
253 killagreg 576
        }
473 holgerb 577
}
397 holgerb 578
 
473 holgerb 579
u8 GetExtCompassOrientation(void)
580
{
581
        if(I2C_CompassPort != I2C_EXTERN_0) return(0);
582
 
475 holgerb 583
        if((abs(FromFlightCtrl.AngleNick) > 300) || (abs(FromFlightCtrl.AngleRoll) > 300))
584
         {
585
//        UART1_PutString("\r\nTilted"); 
586
          return(0);
587
         }
473 holgerb 588
        if(AccRawVector.Z >  3300) return(1); // Flach - Bestückung oben - Pfeil nach vorn
589
        else
590
        if(AccRawVector.Z < -3300) return(2); // Flach - Bestückung unten - Pfeil nach vorn
591
        else
592
        if(AccRawVector.X >  3300) return(3); // Flach - Bestückung Links - Pfeil nach vorn
593
        else
594
        if(AccRawVector.X < -3300) return(4); // Flach - Bestückung rechts - Pfeil nach vorn
595
        else
596
        if(AccRawVector.Y >  3300) return(5); // Stehend - Pfeil nach oben - 'front' nach vorn
597
        else
598
        if(AccRawVector.Y < -3300) return(6); // Stehend - Pfeil nach unten  - 'front' nach vorn
599
        return(0);
253 killagreg 600
}
473 holgerb 601
 
254 killagreg 602
// rx data handler for reading magnetic sensor configuration
253 killagreg 603
void NCMAG_UpdateMagConfig(u8* pRxBuffer, u8 RxBufferSize)
604
{       // if number of byte are matching
605
        if(RxBufferSize == sizeof(MagConfig) )
606
        {
607
                memcpy((u8*)(&MagConfig), pRxBuffer, sizeof(MagConfig));
608
        }
609
}
254 killagreg 610
// rx data handler for reading acceleration sensor configuration
253 killagreg 611
void NCMAG_UpdateAccConfig(u8* pRxBuffer, u8 RxBufferSize)
612
{       // if number of byte are matching
613
        if(RxBufferSize == sizeof(AccConfig) )
614
        {
615
                memcpy((u8*)&AccConfig, pRxBuffer, sizeof(AccConfig));
616
        }
617
}
254 killagreg 618
//----------------------------------------------------------------------
253 killagreg 619
 
254 killagreg 620
 
621
// ---------------------------------------------------------------------
253 killagreg 622
u8 NCMAG_SetMagConfig(void)
623
{
624
        u8 retval = 0;
625
        // try to catch the i2c buffer within 100 ms timeout
465 ingob 626
        if(I2C_LockBufferFunc(100))
253 killagreg 627
        {
628
                u8 TxBytes = 0;
465 ingob 629
                I2C_BufferPnt[TxBytes++] = REG_MAG_CRA;        
630
                memcpy((u8*)(&I2C_BufferPnt[TxBytes]), (u8*)&MagConfig, sizeof(MagConfig));
253 killagreg 631
                TxBytes += sizeof(MagConfig);
465 ingob 632
                if(I2C_TransmissionFunc(MAG_SLAVE_ADDRESS, TxBytes, 0, 0))
253 killagreg 633
                {
465 ingob 634
                        if(I2C_WaitForEndOfTransmissionFunc(100))
253 killagreg 635
                        {
465 ingob 636
                                if(*I2C_ErrorPnt == I2C_ERROR_NONE) retval = 1;
253 killagreg 637
                        }
638
                }
639
        }
640
        return(retval);        
641
}
242 killagreg 642
 
253 killagreg 643
// ----------------------------------------------------------------------------------------
644
u8 NCMAG_GetMagConfig(void)
242 killagreg 645
{
253 killagreg 646
        u8 retval = 0;
252 killagreg 647
        // try to catch the i2c buffer within 100 ms timeout
465 ingob 648
        if(I2C_LockBufferFunc(100))
242 killagreg 649
        {
253 killagreg 650
                u8 TxBytes = 0;
465 ingob 651
                I2C_BufferPnt[TxBytes++] = REG_MAG_CRA;
652
                if(I2C_TransmissionFunc(MAG_SLAVE_ADDRESS, TxBytes, &NCMAG_UpdateMagConfig, sizeof(MagConfig)))
248 killagreg 653
                {
465 ingob 654
                        if(I2C_WaitForEndOfTransmissionFunc(100))
252 killagreg 655
                        {
465 ingob 656
                                if(*I2C_ErrorPnt == I2C_ERROR_NONE) retval = 1;
252 killagreg 657
                        }
248 killagreg 658
                }
242 killagreg 659
        }
253 killagreg 660
        return(retval);        
242 killagreg 661
}
662
 
663
// ----------------------------------------------------------------------------------------
253 killagreg 664
u8 NCMAG_SetAccConfig(void)
242 killagreg 665
{
252 killagreg 666
        u8 retval = 0;
253 killagreg 667
        // try to catch the i2c buffer within 100 ms timeout
473 holgerb 668
        if(I2C_LockBufferFunc(50))
242 killagreg 669
        {
253 killagreg 670
                u8 TxBytes = 0;
465 ingob 671
                I2C_BufferPnt[TxBytes++] = REG_ACC_CTRL1|REG_ACC_MASK_AUTOINCREMENT;    
672
                memcpy((u8*)(&I2C_BufferPnt[TxBytes]), (u8*)&AccConfig, sizeof(AccConfig));
253 killagreg 673
                TxBytes += sizeof(AccConfig);
465 ingob 674
                if(I2C_TransmissionFunc(ACC_SLAVE_ADDRESS, TxBytes, 0, 0))
253 killagreg 675
                {
473 holgerb 676
                        if(I2C_WaitForEndOfTransmissionFunc(50))
253 killagreg 677
                        {
465 ingob 678
                                if(*I2C_ErrorPnt == I2C_ERROR_NONE) retval = 1;
253 killagreg 679
                        }
680
                }
681
        }
682
        return(retval);        
683
}
684
 
685
// ----------------------------------------------------------------------------------------
686
u8 NCMAG_GetAccConfig(void)
687
{
688
        u8 retval = 0;
689
        // try to catch the i2c buffer within 100 ms timeout
465 ingob 690
        if(I2C_LockBufferFunc(100))
253 killagreg 691
        {
692
                u8 TxBytes = 0;
465 ingob 693
                I2C_BufferPnt[TxBytes++] = REG_ACC_CTRL1|REG_ACC_MASK_AUTOINCREMENT;
694
                if(I2C_TransmissionFunc(ACC_SLAVE_ADDRESS, TxBytes, &NCMAG_UpdateAccConfig, sizeof(AccConfig)))
253 killagreg 695
                {
465 ingob 696
                        if(I2C_WaitForEndOfTransmissionFunc(100))
253 killagreg 697
                        {
465 ingob 698
                                if(*I2C_ErrorPnt == I2C_ERROR_NONE) retval = 1;
253 killagreg 699
                        }
700
                }
701
        }
702
        return(retval);        
703
}
704
 
705
// ----------------------------------------------------------------------------------------
706
u8 NCMAG_GetIdentification(void)
707
{
708
        u8 retval = 0;
709
        // try to catch the i2c buffer within 100 ms timeout
465 ingob 710
        if(I2C_LockBufferFunc(100))
253 killagreg 711
        {
712
                u16 TxBytes = 0;
713
                NCMAG_Identification.A = 0xFF;
714
                NCMAG_Identification.B = 0xFF;
715
                NCMAG_Identification.C = 0xFF;
465 ingob 716
                I2C_BufferPnt[TxBytes++] = REG_MAG_IDA;
248 killagreg 717
                // initiate transmission
465 ingob 718
                if(I2C_TransmissionFunc(MAG_SLAVE_ADDRESS, TxBytes, &NCMAG_UpdateIdentification, sizeof(NCMAG_Identification)))
248 killagreg 719
                {
465 ingob 720
                        if(I2C_WaitForEndOfTransmissionFunc(100))
252 killagreg 721
                        {
465 ingob 722
                                if(*I2C_ErrorPnt == I2C_ERROR_NONE) retval = 1;
252 killagreg 723
                        }
248 killagreg 724
                }
242 killagreg 725
        }
253 killagreg 726
        return(retval);
242 killagreg 727
}
728
 
329 holgerb 729
u8 NCMAG_GetIdentification_Sub(void)
730
{
731
        u8 retval = 0;
732
        // try to catch the i2c buffer within 100 ms timeout
465 ingob 733
        if(I2C_LockBufferFunc(100))
329 holgerb 734
        {
735
                u16 TxBytes = 0;
736
                NCMAG_Identification2.Sub = 0xFF;
465 ingob 737
                I2C_BufferPnt[TxBytes++] = REG_MAG_IDF;
329 holgerb 738
                // initiate transmission
465 ingob 739
                if(I2C_TransmissionFunc(MAG_SLAVE_ADDRESS, TxBytes, &NCMAG_UpdateIdentification_Sub, sizeof(NCMAG_Identification2)))
329 holgerb 740
                {
465 ingob 741
                        if(I2C_WaitForEndOfTransmissionFunc(100))
329 holgerb 742
                        {
465 ingob 743
                                if(*I2C_ErrorPnt == I2C_ERROR_NONE) retval = 1;
329 holgerb 744
                        }
745
                }
746
        }
747
        return(retval);
748
}
749
 
750
 
253 killagreg 751
// ----------------------------------------------------------------------------------------
752
void NCMAG_GetMagVector(void)
753
{
754
        // try to catch the I2C buffer within 0 ms
480 holgerb 755
        if(I2C_LockBufferFunc(5))
253 killagreg 756
        {
757
                u16 TxBytes = 0;
758
                // set register pointer
465 ingob 759
                I2C_BufferPnt[TxBytes++] = REG_MAG_DATAX_MSB;
253 killagreg 760
                // initiate transmission
465 ingob 761
                I2C_TransmissionFunc(MAG_SLAVE_ADDRESS, TxBytes, &NCMAG_UpdateMagVector, sizeof(MagVector));
253 killagreg 762
        }
763
}
764
 
242 killagreg 765
//----------------------------------------------------------------
473 holgerb 766
void NCMAG_GetAccVector(u8 timeout)
243 killagreg 767
{
252 killagreg 768
        // try to catch the I2C buffer within 0 ms
473 holgerb 769
        if(I2C_LockBufferFunc(timeout))
243 killagreg 770
        {
248 killagreg 771
                u16 TxBytes = 0;
243 killagreg 772
                // set register pointer
465 ingob 773
                I2C_BufferPnt[TxBytes++] = REG_ACC_X_LSB|REG_ACC_MASK_AUTOINCREMENT;
243 killagreg 774
                // initiate transmission
465 ingob 775
                I2C_TransmissionFunc(ACC_SLAVE_ADDRESS, TxBytes, &NCMAG_UpdateAccVector, sizeof(AccRawVector));
473 holgerb 776
//DebugOut.Analog[16] = AccRawVector.X;
777
//DebugOut.Analog[17] = AccRawVector.Y;
778
//DebugOut.Analog[18] = AccRawVector.Z;
243 killagreg 779
        }
780
}
781
 
330 holgerb 782
//----------------------------------------------------------------
394 killagreg 783
u8 InitNC_MagnetSensor(void)
330 holgerb 784
{
785
        u8 crb_gain, cra_rate;
786
 
394 killagreg 787
        switch(NCMAG_SensorType)
330 holgerb 788
        {
394 killagreg 789
                case TYPE_HMC5843:
339 holgerb 790
                        crb_gain = HMC5843_CRB_GAIN_15GA;
330 holgerb 791
                        cra_rate = HMC5843_CRA_RATE_50HZ;
792
                        break;
793
 
394 killagreg 794
                case TYPE_LSM303DLH:
795
                case TYPE_LSM303DLM:
338 holgerb 796
                        crb_gain = LSM303DLH_CRB_GAIN_19GA;
330 holgerb 797
                        cra_rate = LSM303DLH_CRA_RATE_75HZ;
798
                        break;
799
 
800
                default:
394 killagreg 801
                return(0);
330 holgerb 802
        }
803
 
804
        MagConfig.cra = cra_rate|CRA_MODE_NORMAL;
805
        MagConfig.crb = crb_gain;
806
        MagConfig.mode = MODE_CONTINUOUS;
394 killagreg 807
        return(NCMAG_SetMagConfig());
330 holgerb 808
}
809
 
395 holgerb 810
 
394 killagreg 811
//----------------------------------------------------------------
812
u8 NCMAG_Init_ACCSensor(void)
813
{
395 holgerb 814
        AccConfig.ctrl_1 = ACC_CRTL1_PM_NORMAL|ACC_CRTL1_DR_50HZ|ACC_CRTL1_XEN|ACC_CRTL1_YEN|ACC_CRTL1_ZEN;
473 holgerb 815
        AccConfig.ctrl_2 = 0;
394 killagreg 816
        AccConfig.ctrl_3 = 0x00;
397 holgerb 817
        AccConfig.ctrl_4 = ACC_CTRL4_BDU | ACC_CTRL4_FS_8G;
394 killagreg 818
        AccConfig.ctrl_5 = ACC_CTRL5_STW_OFF;
819
        return(NCMAG_SetAccConfig());
820
}
253 killagreg 821
// --------------------------------------------------------
480 holgerb 822
void NCMAG_Update(u8 init)
243 killagreg 823
{
292 killagreg 824
        static u32 TimerUpdate = 0;
419 holgerb 825
        static s8 send_config = 0;
394 killagreg 826
        u32 delay = 20;
480 holgerb 827
        if(init) TimerUpdate = SetDelay(10);
828
 
470 killagreg 829
        // todo State Handling for both busses  !!
480 holgerb 830
        if((I2C1_State == I2C_STATE_OFF) || (I2C_CompassPort == 0 && I2C0_State == I2C_STATE_OFF)/* || !NCMAG_Present*/ )
254 killagreg 831
        {
832
                Compass_Heading = -1;
326 holgerb 833
                DebugOut.Analog[14]++; // count I2C error
480 holgerb 834
                TimerUpdate = SetDelay(10);
254 killagreg 835
                return;
836
        }
480 holgerb 837
        if(CheckDelay(TimerUpdate))// && I2C0_State == I2C_STATE_IDLE && I2C1_State == I2C_STATE_IDLE)
243 killagreg 838
        {
394 killagreg 839
                if(Compass_Heading != -1) send_config = 0; // no re-configuration if value is valid
840
        if(++send_config == 25)   // 500ms
841
                {
419 holgerb 842
                        send_config = -25;    // next try after 1 second
394 killagreg 843
                InitNC_MagnetSensor();
419 holgerb 844
                        TimerUpdate = SetDelay(20);    // back into the old time-slot
394 killagreg 845
                }
321 holgerb 846
                else
847
                {
473 holgerb 848
                        static u8 s = 0;
394 killagreg 849
                        // check for new calibration state
850
                        Compass_UpdateCalState();
851
                        if(Compass_CalState) NCMAG_Calibrate();
852
 
853
                        // in case of LSM303 type
854
                        switch(NCMAG_SensorType)
855
                        {
856
                                case TYPE_HMC5843:                             
857
                                        NCMAG_GetMagVector();
858
                                        delay = 20;
859
                                        break;
860
                                case TYPE_LSM303DLH:
861
                                case TYPE_LSM303DLM:
397 holgerb 862
                                        delay = 20;
480 holgerb 863
//delay = 2;
473 holgerb 864
                                        if(s-- || (I2C_CompassPort == I2C_INTERN_1)) NCMAG_GetMagVector();
865
                                        else
866
                                         {
867
                                          if(AccRawVector.X + AccRawVector.Y + AccRawVector.Z == 0) NCMAG_Init_ACCSensor();
480 holgerb 868
                                          NCMAG_GetAccVector(5);
474 holgerb 869
                                          delay = 10;
870
                                          s = 40;  // about 0,8 sec
473 holgerb 871
                                         };
474 holgerb 872
                                        if(!s) delay = 10; // ACC-Reading in the next step after 10ms
480 holgerb 873
//if(!s) delay = 2; // ACC-Reading in the next step after 10ms
394 killagreg 874
                                        break;                           
875
                        }
419 holgerb 876
                        if(send_config == 24) TimerUpdate = SetDelay(15);    // next event is the re-configuration
394 killagreg 877
                        else TimerUpdate = SetDelay(delay);    // every 20 ms are 50 Hz
321 holgerb 878
                }
243 killagreg 879
        }
880
}
881
 
330 holgerb 882
 
254 killagreg 883
// --------------------------------------------------------
253 killagreg 884
u8 NCMAG_SelfTest(void)
243 killagreg 885
{
266 holgerb 886
        u8 msg[64];
275 killagreg 887
        static u8 done = 0;
266 holgerb 888
 
287 holgerb 889
        if(done) return(1);        // just make it once
275 killagreg 890
 
271 holgerb 891
        #define LIMITS(value, min, max) {min = (80 * value)/100; max = (120 * value)/100;}
243 killagreg 892
        u32 time;
253 killagreg 893
        s32 XMin = 0, XMax = 0, YMin = 0, YMax = 0, ZMin = 0, ZMax = 0;
894
        s16 xscale, yscale, zscale, scale_min, scale_max;
895
        u8 crb_gain, cra_rate;
896
        u8 i = 0, retval = 1;
243 killagreg 897
 
394 killagreg 898
        switch(NCMAG_SensorType)
253 killagreg 899
        {
394 killagreg 900
                case TYPE_HMC5843:
339 holgerb 901
                        crb_gain = HMC5843_CRB_GAIN_15GA;
253 killagreg 902
                        cra_rate = HMC5843_CRA_RATE_50HZ;
903
                        xscale = HMC5843_TEST_XSCALE;
904
                        yscale = HMC5843_TEST_YSCALE;
905
                        zscale = HMC5843_TEST_ZSCALE;
906
                        break;
907
 
394 killagreg 908
                case TYPE_LSM303DLH:
338 holgerb 909
                        crb_gain = LSM303DLH_CRB_GAIN_19GA;
253 killagreg 910
                        cra_rate = LSM303DLH_CRA_RATE_75HZ;
911
                        xscale = LSM303DLH_TEST_XSCALE;
912
                        yscale = LSM303DLH_TEST_YSCALE;
913
                        zscale = LSM303DLH_TEST_ZSCALE;
914
                        break;
915
 
394 killagreg 916
                case TYPE_LSM303DLM:
917
                        // does not support self test feature 
918
                        done = retval;
919
                        return(retval);
920
                        break;
921
 
253 killagreg 922
                default:
394 killagreg 923
                        return(0);
253 killagreg 924
        }
925
 
926
        MagConfig.cra = cra_rate|CRA_MODE_POSBIAS;
927
        MagConfig.crb = crb_gain;
928
        MagConfig.mode = MODE_CONTINUOUS;
929
        // activate positive bias field
930
        NCMAG_SetMagConfig();
251 killagreg 931
        // wait for stable readings
932
        time = SetDelay(50);
933
        while(!CheckDelay(time));
243 killagreg 934
        // averaging
253 killagreg 935
        #define AVERAGE 20
936
        for(i = 0; i<AVERAGE; i++)
243 killagreg 937
        {
253 killagreg 938
                NCMAG_GetMagVector();
243 killagreg 939
                time = SetDelay(20);
940
        while(!CheckDelay(time));
254 killagreg 941
                XMax += MagRawVector.X;
942
                YMax += MagRawVector.Y;
943
                ZMax += MagRawVector.Z;
243 killagreg 944
        }
253 killagreg 945
        MagConfig.cra = cra_rate|CRA_MODE_NEGBIAS;
946
        // activate positive bias field
947
        NCMAG_SetMagConfig();
251 killagreg 948
    // wait for stable readings
949
        time = SetDelay(50);
950
        while(!CheckDelay(time));
243 killagreg 951
        // averaging
253 killagreg 952
        for(i = 0; i < AVERAGE; i++)
243 killagreg 953
        {
253 killagreg 954
                NCMAG_GetMagVector();
243 killagreg 955
                time = SetDelay(20);
956
        while(!CheckDelay(time));
254 killagreg 957
                XMin += MagRawVector.X;
958
                YMin += MagRawVector.Y;
959
                ZMin += MagRawVector.Z;
243 killagreg 960
        }
961
        // setup final configuration
253 killagreg 962
        MagConfig.cra = cra_rate|CRA_MODE_NORMAL;
963
        // activate positive bias field
964
        NCMAG_SetMagConfig();
266 holgerb 965
        // check scale for all axes
243 killagreg 966
        // prepare scale limits
253 killagreg 967
        LIMITS(xscale, scale_min, scale_max);
267 holgerb 968
        xscale = (XMax - XMin)/(2*AVERAGE);
266 holgerb 969
        if((xscale > scale_max) || (xscale < scale_min))
394 killagreg 970
    {
971
                retval = 0;
972
        sprintf(msg, "\r\n Value X: %d not %d-%d !", xscale, scale_min,scale_max);
973
                UART1_PutString(msg);
974
    }
267 holgerb 975
        LIMITS(yscale, scale_min, scale_max);
266 holgerb 976
        yscale = (YMax - YMin)/(2*AVERAGE);
977
        if((yscale > scale_max) || (yscale < scale_min))
394 killagreg 978
    {
979
                retval = 0;
980
        sprintf(msg, "\r\n Value Y: %d not %d-%d !", yscale, scale_min,scale_max);
981
                UART1_PutString(msg);
982
    }
267 holgerb 983
        LIMITS(zscale, scale_min, scale_max);
266 holgerb 984
        zscale = (ZMax - ZMin)/(2*AVERAGE);
985
        if((zscale > scale_max) || (zscale < scale_min))      
394 killagreg 986
        {
987
                retval = 0;
988
        sprintf(msg, "\r\n Value Z: %d not %d-%d !", zscale, scale_min,scale_max);
989
                UART1_PutString(msg);
990
    }
275 killagreg 991
        done = retval;
253 killagreg 992
        return(retval);
243 killagreg 993
}
994
 
995
 
996
//----------------------------------------------------------------
465 ingob 997
void NCMAG_SelectI2CBus(u8 busno)
998
{
999
  if (busno == 0)
1000
  {
1001
    I2C_WaitForEndOfTransmissionFunc = &I2C0_WaitForEndOfTransmission;
1002
        I2C_LockBufferFunc = &I2C0_LockBuffer;
1003
        I2C_TransmissionFunc = &I2C0_Transmission;
1004
        I2C_BufferPnt = I2C0_Buffer;
1005
        I2C_ErrorPnt = &I2C0_Error;
1006
  }
1007
   else
1008
  {
470 killagreg 1009
    I2C_WaitForEndOfTransmissionFunc = &I2C1_WaitForEndOfTransmission;
1010
        I2C_LockBufferFunc = &I2C1_LockBuffer;
1011
        I2C_TransmissionFunc = &I2C1_Transmission;
1012
        I2C_BufferPnt = I2C1_Buffer;
1013
        I2C_ErrorPnt = &I2C1_Error;
465 ingob 1014
  }
1015
}
1016
 
1017
//----------------------------------------------------------------
253 killagreg 1018
u8 NCMAG_Init(void)
242 killagreg 1019
{
1020
        u8 msg[64];
252 killagreg 1021
        u8 retval = 0;
480 holgerb 1022
        u8 repeat = 0;
242 killagreg 1023
 
472 holgerb 1024
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1025
// Search external sensor
1026
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1027
        I2C_CompassPort = I2C_EXTERN_0;
1028
        NCMAG_SelectI2CBus(I2C_CompassPort);
465 ingob 1029
 
472 holgerb 1030
        // get id bytes
1031
        retval = 0;
480 holgerb 1032
    for(repeat = 0; repeat < 5; repeat++)
472 holgerb 1033
        {
473 holgerb 1034
//              retval = NCMAG_GetIdentification();
1035
                retval = NCMAG_GetAccConfig();            // only the sensor with ACC is supported
472 holgerb 1036
                if(retval) break; // break loop on success
480 holgerb 1037
                UART1_PutString("_");
1038
        }
1039
//retval = 1;
472 holgerb 1040
        if(!retval)
1041
        {
1042
         UART1_PutString(" internal sensor");
1043
         I2C_CompassPort = I2C_INTERN_1;
1044
         NCMAG_SelectI2CBus(I2C_CompassPort);
1045
        }
1046
        else
1047
        {
1048
         UART1_PutString(" external sensor ");
473 holgerb 1049
         NCMAG_Init_ACCSensor();
1050
 
1051
         for(repeat = 0; repeat < 100; repeat++)
1052
          {
1053
           NCMAG_GetAccVector(10); // only the sensor with ACC is supported
1054
       ExtCompassOrientation = GetExtCompassOrientation();       
475 holgerb 1055
           if(ExtCompassOrientation && (ExtCompassOrientation == Calibration.Version / 16)) break;
1056
           //UART1_Putchar('-');
473 holgerb 1057
          }
1058
//DebugOut.Analog[19] = repeat;
1059
 
1060
     if(!ExtCompassOrientation) UART1_PutString(" (Orientation unknown!)");
1061
         else
1062
         {
1063
          NCMag_CalibrationRead(I2C_CompassPort);
1064
          sprintf(msg, "with orientation: %d ",ExtCompassOrientation );
1065
          UART1_PutString(msg);
1066
          if(ExtCompassOrientation != Calibration.Version / 16)
1067
           {
475 holgerb 1068
            sprintf(msg, "\n\r! Warning: calibrated orientation was %d !",Calibration.Version / 16);
473 holgerb 1069
            UART1_PutString(msg);
1070
           }
480 holgerb 1071
          else UART1_PutString("ok ");
473 holgerb 1072
         }
1073
 
472 holgerb 1074
        }
1075
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1076
 
253 killagreg 1077
        NCMAG_Present = 0;
394 killagreg 1078
        NCMAG_SensorType = TYPE_HMC5843;        // assuming having an HMC5843
1079
        // polling for LSM302DLH/DLM option by ACC address ack
480 holgerb 1080
    for(repeat = 0; repeat < 3; repeat++)
253 killagreg 1081
        {
1082
                retval = NCMAG_GetAccConfig();
1083
                if(retval) break; // break loop on success
480 holgerb 1084
        }
394 killagreg 1085
        if(retval)
242 killagreg 1086
        {
394 killagreg 1087
                // initialize ACC sensor
1088
                NCMAG_Init_ACCSensor();
1089
 
1090
                NCMAG_SensorType = TYPE_LSM303DLH;     
1091
                // polling of sub identification
480 holgerb 1092
            for(repeat = 0; repeat < 12; repeat++)
394 killagreg 1093
                {
1094
                        retval = NCMAG_GetIdentification_Sub();
1095
                        if(retval) break; // break loop on success
480 holgerb 1096
                }
394 killagreg 1097
                if(retval)
1098
                {
1099
                        if(NCMAG_Identification2.Sub == MAG_IDF_LSM303DLM)      NCMAG_SensorType = TYPE_LSM303DLM;
1100
                }      
1101
        }
1102
        // get id bytes
480 holgerb 1103
    for(repeat = 0; repeat < 3; repeat++)
329 holgerb 1104
        {
253 killagreg 1105
                retval = NCMAG_GetIdentification();
252 killagreg 1106
                if(retval) break; // break loop on success
480 holgerb 1107
        }
329 holgerb 1108
 
253 killagreg 1109
        // if we got an answer to id request
252 killagreg 1110
        if(retval)
242 killagreg 1111
        {
329 holgerb 1112
                u8 n1[] = "\n\r HMC5843";
1113
                u8 n2[] = "\n\r LSM303DLH";
1114
                u8 n3[] = "\n\r LSM303DLM";
394 killagreg 1115
                u8* pn = n1;
329 holgerb 1116
 
394 killagreg 1117
                switch(NCMAG_SensorType)
329 holgerb 1118
                {
394 killagreg 1119
                        case TYPE_HMC5843:
1120
                                pn = n1;
1121
                                break;
1122
                        case TYPE_LSM303DLH:
1123
                                pn = n2;
1124
                                break;
1125
                        case TYPE_LSM303DLM:
1126
                                pn = n3;
1127
                                break;
329 holgerb 1128
                }
1129
 
1130
                sprintf(msg, " %s ID 0x%02x/%02x/%02x-%02x", pn, NCMAG_Identification.A, NCMAG_Identification.B, NCMAG_Identification.C,NCMAG_Identification2.Sub);
242 killagreg 1131
                UART1_PutString(msg);
253 killagreg 1132
                if (    (NCMAG_Identification.A == MAG_IDA)
1133
                     && (NCMAG_Identification.B == MAG_IDB)
1134
                         && (NCMAG_Identification.C == MAG_IDC))
242 killagreg 1135
                {
268 killagreg 1136
                        NCMAG_Present = 1;
329 holgerb 1137
 
1138
                        if(EEPROM_Init())
394 killagreg 1139
                        {
472 holgerb 1140
                                NCMAG_IsCalibrated = NCMag_CalibrationRead(I2C_CompassPort);
394 killagreg 1141
                                if(!NCMAG_IsCalibrated) UART1_PutString("\r\n Not calibrated!");
1142
                        }
329 holgerb 1143
                        else UART1_PutString("\r\n EEPROM data not available!!!!!!!!!!!!!!!");
394 killagreg 1144
                        // perform self test
1145
                        if(!NCMAG_SelfTest())
1146
                        {
329 holgerb 1147
                                UART1_PutString("\r\n Selftest failed!!!!!!!!!!!!!!!!!!!!\r\n");
1148
                                LED_RED_ON;
472 holgerb 1149
//                              NCMAG_IsCalibrated = 0;
394 killagreg 1150
                        }
1151
                        else UART1_PutString("\r\n Selftest ok");
1152
 
1153
                        // initialize magnetic sensor configuration
1154
                        InitNC_MagnetSensor();
242 killagreg 1155
                }
1156
                else
1157
                {
254 killagreg 1158
                        UART1_PutString("\n\r Not compatible!");
256 killagreg 1159
                        UART_VersionInfo.HardwareError[0] |= NC_ERROR0_COMPASS_INCOMPATIBLE;
242 killagreg 1160
                        LED_RED_ON;
1161
                }
1162
        }
253 killagreg 1163
        else // nothing found
1164
        {
394 killagreg 1165
                NCMAG_SensorType = TYPE_NONE;
253 killagreg 1166
                UART1_PutString("not found!");  
1167
        }
1168
        return(NCMAG_Present);
242 killagreg 1169
}
1170