| 1 | frodo | 64 | Major parsing routines are built according to this template: | 
| 2 |  |  |  | 
| 3 |  |  | int psiconv_parse_TYPE (const psiconv_buffer buf, int lev, | 
| 4 |  |  | psiconv_u32 off, int *length, | 
| 5 |  |  | psiconv_TYPE *result) | 
| 6 |  |  | { | 
| 7 |  |  | int res = 0; | 
| 8 |  |  | int len = 0; | 
| 9 |  |  | int leng; | 
| 10 |  |  |  | 
| 11 |  |  | psiconv_progress(lev+1,off,"Going to parse TYPE"); | 
| 12 |  |  | if (!(*result = malloc(sizeof(**result)))) | 
| 13 |  |  | goto ERROR1; | 
| 14 |  |  |  | 
| 15 |  |  | /* Example of calling some other parse function */ | 
| 16 |  |  | if ((res = psiconv_parse_TYPE2(buf,lev+2,off+len,&leng, | 
| 17 |  |  | &(*result)->FIELD2))) | 
| 18 |  |  | goto ERROR2; | 
| 19 |  |  | psiconv_debug(lev+2,off+len,"Some helpful message"); | 
| 20 |  |  | len += leng; | 
| 21 |  |  |  | 
| 22 |  |  | /* Example of reading some bytes directly */ | 
| 23 |  |  | (*result)->FIELD1 = psiconv_read_u8(buf,lev+2,off+len,&res); | 
| 24 |  |  | if (!res) | 
| 25 |  |  | goto ERROR3; | 
| 26 |  |  | psiconv_debug(lev+2,off+len,"Some helpful message"); | 
| 27 |  |  | len ++; | 
| 28 |  |  |  | 
| 29 |  |  | psiconv_debug(lev+2,off+len,"Some helpful message"); | 
| 30 |  |  | if (length) | 
| 31 |  |  | *length = len; | 
| 32 |  |  | psiconv_progress(lev+1,off+len-1,"End of TYPE (total length: %08x)", | 
| 33 |  |  | len); | 
| 34 |  |  | return 0; | 
| 35 |  |  |  | 
| 36 |  |  | ERROR3: | 
| 37 |  |  | free ((*result)->FIELD2) | 
| 38 |  |  | ERROR2: | 
| 39 |  |  | free (*result); | 
| 40 |  |  | ERROR1: | 
| 41 |  |  | psiconv_warn(lev+1,off,"Reading of TYPE failed"); | 
| 42 |  |  | if (length) | 
| 43 |  |  | *length = 0; | 
| 44 |  |  | if (!res) | 
| 45 |  |  | return -PSICONV_E_NOMEM; | 
| 46 |  |  | else | 
| 47 |  |  | return res; | 
| 48 |  |  | } | 
| 49 |  |  |  | 
| 50 |  |  | If something unexpected happens half-way, but you can recover from it | 
| 51 |  |  | (for example, an unexpected value in some well-defined field), call | 
| 52 |  |  | psiconv_warn, but do not return with an error. The rule is that if | 
| 53 |  |  | the result code of a procedure is not 0, you may assume that things | 
| 54 |  |  | are hopeless, that nothing was allocated, and that every field contains | 
| 55 |  |  | nonsense. |