example_c_1.c

C example program for the Open-RJ core library. Demonstrates enumeration of all non-empty records and their fields via API functions.

/* /////////////////////////////////////////////////////////////////////////////
 * File:        example_c_1.c
 *
 * Purpose:     C example program for the Open-RJ core library. Demonstrates
 *              enumeration of all non-empty records and their fields via
 *              API functions.
 *
 * Created:     12th May 2006
 * Updated:     12th May 2006
 *
 * www:         http://www.openrj.org/
 *
 * License:     Copyright (c) 2006, Synesis Software Pty Ltd.
 *              All rights reserved.
 *
 *              (Licensed under the Synesis Software Open License)
 *
 *              This source code is placed into the public domain 2006
 *              by Synesis Software Pty Ltd. There are no restrictions
 *              whatsoever to your use of the software.
 *
 * ////////////////////////////////////////////////////////////////////////// */


/* Open-RJ Header Files */
#include <openrj/openrj.h>

/* Standard C Library Files */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

/* /////////////////////////////////////////////////////////////////////////////
 * Globals
 */

/* Sample database */
static const char   contents[] =

    "%% Sample Open-RJ database - Cats and Dogs\n"
    "%% Created:   28th September 2004\n"
    "%% Updated:   29th September 2004\n"
    "Name:      Barney\n"
    "Species:   Dog\n"
    "Breed:     Bijon \\\n"
    "           Frieze\n"
    "%%\n"
    "Name:      Elsa\n"
    "Species:   Dog\n"
    "Breed:     Mixed\n"
    "%%\n"
    "Name:      Fluffy Kitten\n"
    "Species:   Cat\n"
    "%%\n"
    "Name:      Moet\n"
    "Species:   Dog\n"
    "Breed:     Boxer\n"
    "%%\n"
    "Name:      Rebel\n"
    "Species:   Dog\n"
    "Breed:     German \\\n"
    "           Shepherd\n"
    "%%\n"
    "Name:      Sparky\n"
    "Species:   Cat\n"
    "%%\n";

/* ////////////////////////////////////////////////////////////////////////// */

int main()
{
    unsigned            flags   =   ORJ_FLAG_ELIDEBLANKRECORDS;
    ORJDatabase const   *db;
    ORJError            error;
    ORJRC               rc;

    /* 1. Create a database instance on memory, so use memory_database */
    rc = ORJ_CreateDatabaseFromMemory(contents, sizeof(contents), NULL, flags, &db, &error);

    if(0 != rc)
    {
        printf("Error at line %ld, column %ld: %s\n", (long)error.invalidLine, (long)error.invalidColumn, ORJ_GetErrorStringA(rc));

        return EXIT_FAILURE;
    }
    else
    {
        size_t  iRecord;

        printf( "Database has %ld lines in %ld fields in %ld records\n"
            ,   (long)ORJ_Database_GetNumLinesA(db)
            ,   (long)ORJ_Database_GetNumFieldsA(db)
            ,   (long)ORJ_Database_GetNumRecordsA(db));

        printf("Enumerating all fields in the database:\n");

        for(iRecord = 0; iRecord < ORJ_Database_GetNumRecordsA(db); ++iRecord)
        {
            size_t              iField;
            ORJRecordA const    *record;
            ORJStringA const    *comment;

            ORJ_Database_GetRecordA(db, iRecord, &record);

            if( ORJ_RC_SUCCESS == ORJ_Record_GetCommentA(record, &comment) &&
                0 != comment->len)
            {
                printf("record-#%ld; %.*s (%ld fields)\n", (long)iRecord, (int)comment->len, comment->ptr, (long)ORJ_Record_GetNumFieldsA(record));
            }
            else
            {
                printf("record-#%ld (%ld fields)\n", (long)iRecord, (long)ORJ_Record_GetNumFieldsA(record));
            }

            for(iField = 0; iField < ORJ_Record_GetNumFieldsA(record); ++iField)
            {
                ORJFieldA const     *field;
                ORJStringA const    *name;
                ORJStringA const    *value;

                ORJ_Record_GetFieldA(record, iField, &field);

                ORJ_Field_GetNameAndValueA(field, &name, &value);

                printf("  field-#%ld %.*s=%.*s\n", (long)iField, (int)field->name.len, field->name.ptr, (int)field->value.len, field->value.ptr);
            }
        }

        /* Finally, free the database */
        ORJ_FreeDatabase(db);
    }

    return EXIT_SUCCESS;
}

/* /////////////////////////////////////////////////////////////////////////////
 * end of file
 */

Open-RJ Library documentation © Synesis Software Pty Ltd, 2004-2005