VisualDatabase

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdint.h>
#pragma pack(push, 1)              /* keine Padding-Bytes: exaktes Dateilayout */
typedef struct {                   /* 32-Byte-Dateikopf                        */
    uint8_t  version;
    uint8_t  year, month, day;
    uint32_t num_records;
    uint16_t header_size;          /* Bytes bis zum 1. Datensatz               */
    uint16_t record_size;          /* Bytes pro Datensatz (inkl. Loeschflag)   */
    uint8_t  reserved[20];
} DBF_Header;
typedef struct {                   /* 32-Byte-Feld-Deskriptor                  */
    char     name[11];
    char     type;                 /* 'C','N','D','L','M'                      */
    uint32_t data_address;
    uint8_t  length;               /* Feldlaenge in Bytes                      */
    uint8_t  decimal_count;
    uint8_t  reserved[14];
} DBF_Field;
#pragma pack(pop)
int main(int argc, char **argv) {
    FILE *fp = fopen("ADDRESS.DBF", "rb");
    if (!fp) { perror("fopen"); return 1; }
    /* 1) Dateikopf lesen */
    DBF_Header hdr;
    fread(&hdr, sizeof(hdr), 1, fp);
    /* 2) Feld-Deskriptoren dynamisch lesen, bis Terminator 0x0D.
          Aus den Laengen ergeben sich die Feld-Offsets im Satz.        */
    DBF_Field fields[128];
    int  field_offset[128];
    int  nfields = 0;
    int  offset  = 1;                       /* Byte 0 = Loeschflag       */
    for (;;) {
        int c = fgetc(fp);
        if (c == 0x0D || c == EOF) break;    /* Ende der Deskriptoren     */
        ungetc(c, fp);
        fread(&fields[nfields], sizeof(DBF_Field), 1, fp);
        field_offset[nfields] = offset;      /* Position dieses Feldes    */
        offset += fields[nfields].length;
        nfields++;
    }
    /* 3) Direktzugriff auf einen Satz per Offset-Rechnung */
    long recno = (argc > 1) ? atol(argv[1]) : 1;
    long pos   = hdr.header_size + (recno - 1) * hdr.record_size;
    fseek(fp, pos, SEEK_SET);
    uint8_t *rec = malloc(hdr.record_size);
    fread(rec, hdr.record_size, 1, fp);
    if (rec[0] == 0x2A) { printf("Satz %ld ist geloescht\n", recno); }
    /* 4) Felder GENERISCH zerlegen - kein festes struct noetig!         */
    for (int i = 0; i < nfields; i++) {
        char buf[256];
        int  len = fields[i].length;
        memcpy(buf, rec + field_offset[i], len);
        buf[len] = '\0';
        for (int k = len - 1; k >= 0 && buf[k] == ' '; k--) buf[k] = '\0';
        printf("%-11s (%c,%2d) = '%s'\n",
               fields[i].name, fields[i].type, len, buf);
    }
    free(rec);
    fclose(fp);
    return 0;
}