Quiz / challenge of the week: How to parse/validate input field for S7 Addresses

How about this. Not finished yet, also does not reject all invalid entry, ie: it will interpret MW3.4 asM3.4. Just need to add some more if-then-elses to handle that. Still to encode the ANY pointer.

[code]
//#include "C:\Program Files\Siemens\ODK\include\S7CHN.H"
// Taken from S7CHN.H
#define BS7_P 0x80
#define BS7_E 0x81
#define BS7_A 0x82
#define BS7_M 0x83
#define BS7_DB 0x84
#define BS7_C 0x1C
#define BS7_T 0x1D

#define S7_DT_NULL0x0
#define S7_DT_BOOL0x1
#define S7_DT_BYTE0x2
#define S7_DT_CHAR0x3
#define S7_DT_WORD0x4
#define S7_DT_INT0x5
#define S7_DT_DWORD0x6
#defineS7_DT_DINT0x7
#define S7_DT_REAL0x8
#define S7_DT_DATE0x9
#define S7_DT_TOD0xA
#define S7_DT_TIME0xB
#define S7_DT_S5TIME0xC
#define S7_DT_DT0xE
#define S7_DT_STRING0x13

// Declarethe ANYPTRS as void *, or WinCCgets confused whenbuilding AP_PBIB.H
BOOL S7FormatAddress(char *Text, void *any)
{
char c;
int i, DataType=0, MemArea=0, DBNo=0, ByteAdr=0, BitAdr=0;
BOOL err = FALSE, bit = FALSE, db = FALSE;

// parse string
i = 0;
while (i<strlen(Text)) {
c = toupper(Text[i]);
switch (c) {
// Data Block
case 'D':if ((MemArea != 0) && ((MemArea != BS7_DB) || db)) {
DataType = S7_DT_DWORD;
} else {
MemArea = BS7_DB;
i++; // should check for "B" here
}
break;
// Memory Address
case 'M':MemArea = BS7_M;
break;
// Peripheral
case 'P':MemArea = BS7_P;
break;
// Input
case 'I':MemArea = BS7_E;
break;
// Output
case 'Q':MemArea = BS7_A;
break;
// Counter
case 'C':MemArea = BS7_C;
break;
// Timer
case 'T':MemArea = BS7_T;
break;

// BYTE
case 'B':if ((MemArea != BS7_DB) || db) DataType = S7_DT_BYTE;
break;
// BIT
case 'X':if (DataType == S7_DT_BYTE)
DataType = S7_DT_BOOL;
//else
//err = TRUE;
break;
// WORD
case 'W':DataType = S7_DT_WORD;
break;
// DWORD (handled above)

// Address values
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':if ((MemArea == BS7_DB) && (!db)) {
DBNo *= 10;
DBNo += c - '0';
} else {
if (bit) {
DataType = S7_DT_BOOL;
BitAdr *= 10;
BitAdr += c - '0';
} else {
ByteAdr *= 10;
ByteAdr += c - '0';
}
};
break;

case '.':if ((MemArea == BS7_DB) && (!db)) {
db = TRUE;
} else {
if (bit) err = TRUE; else bit = TRUE;
};
break;
}
i++;
}

// Format the ANY pointer
if (!err) {
// Debug message to test the parser above
printf("**********\r\nMem Area: %x\r\nData Type: %x\r\nData Block: %d\r\nByte Address: %d\r\nBit Address: %d\r\n", MemArea, DataType, DBNo, ByteAdr, BitAdr);
//
// *********************************
// still to do some magic here....
// *********************************
//
} else {
printf("S7FormatAddress: Format error!\r\n");
}

// Return: address valid
return (!err);
}
[/code]