source: main/trunk/greenstone2/build-src/packages/isis-gdl/Unimarc.h@ 26670

/**********************************************************************
 *
 * Unimarc.h
 * Copyright (C) 2003  UNESCO
 *
 * A component of the Greenstone digital library software
 * from the New Zealand Digital Library Project at the
 * University of Waikato, New Zealand.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *********************************************************************/


#ifndef MARC_RECORD
#define MARC_RECORD

#define SUBFDELIM '\037'   // %
#define FIELDTERM '\036'   // $
#define RECTERM   '\035'   // # sharp

#define MARC_LEADER_LEN 24
#define MARC_DIRENT_LEN 12

#define MARC_FMT_BRIEF 0
#define MARC_FMT_FULL 1

//---------------------
// UNIMARC Record Label
//---------------------
struct  MarcLeader
{
    char    lreclen_[5];    /* logical record length */
    char    status_;        /* record status_ */
    char    type_;          /* type_ of record */
    char    bibLevel_;      /* bibliographic level */
    char    ctrlType_;      /* type_ of control */
    char    undPos_;        /* undefined character position */
    char    indCount_;      /* indicator count */
    char    scd_;           /* subfield code count */
    char    base_[5];       /* base_ address of data */
    char    encLevel_;      /* encoding level */
    char    dcf_;           /* descriptive cataloging form */
    char    lrr_;           /* linked record requirement */
    char    llof_;          /* length of the length-of-field portion */
    char    lscp_;          /* length of starting-character-position portion */
    char    lidp_;          /* length of implementation-defined portion */
    char    uep_;           /* undefined entry map character position */

    MarcLeader()
    {
        lreclen_[0]=' ';
        lreclen_[1]=' ';
        lreclen_[2]=' ';
        lreclen_[3]=' ';
        lreclen_[4]=' ';
        status_   = '0';     // New record
        type_     = '0';     // Language materials, printed
        bibLevel_ = '0';         // Monographic
        ctrlType_ = '0';     // Hierarchical relationship undefined
        undPos_   = '0';     // Undefined, contains a blank
        indCount_ = '0';     // Invariably 2 in UNIMARC
        scd_      = '0';     // Invariably 2 in UNIMARC
        base_[0]  = ' ';     // Base_ address of data
        base_[1]  = ' ';
        base_[2]  = ' ';
        base_[3]  = ' ';
        base_[4]  = ' ';
        encLevel_ = '0';     // (Blank) full level
        dcf_      = '0';     // (Blank) record is in full ISBD form
        lrr_      = '0';     // Undefined, contains a blank
        llof_     = '4';     // Length of the length-of-field portion
        lscp_     = '5';     // Length of starting-character-position portion 
        lidp_     = '0';     // Length of implementation-defined portion
        uep_      = '0';     // Undefined, contains a blank
    }

   friend std::ostream& operator<<(std::ostream& s, const MarcLeader& leader);
   friend std::istream& operator>>(std::istream& s, MarcLeader& leader);
};

//----------------
// Directory entry
//----------------
struct DirectoryEntry
{
    char    tag_[3];        /* tag */
    char    len_[4];        /* field length */
    char    scp_[5];        /* starting character position */
   friend std::ostream& operator<<(std::ostream& s, const DirectoryEntry& de);
   friend std::istream& operator>>(std::istream& s, DirectoryEntry& leader);
};
inline std::istream& operator>>(std::istream& s, DirectoryEntry& de)
{
    s.read(de.tag_, 3);
    s.read(de.len_, 4);
    s.read(de.scp_, 5);
    return s;
}
inline std::ostream& operator<<(std::ostream& s, const DirectoryEntry& de)
{
    s.write(de.tag_, 3);
    s.write(de.len_, 4);
    s.write(de.scp_, 5);
    return s;
}



//------------------
// Subfield item 
//------------------
struct MarcField
{
    int         len_;
    char*       data_;
};

//-------------------
// Directory entry
//-------------------
struct MarcDirectoryEntry
{
    char*                  tag_;
    std::vector<MarcField> field_;
};


//---------------------------
// UNIMARC record structure 
//---------------------------

class MarcRecord
{
protected:
    MarcLeader      leader_;
    char*           data_;
    int             length_;
    int             dirCount_;
    int             encapsulated_;
    std::vector<MarcDirectoryEntry>   directory_;
    
    int ParseMarcRecord();
    int AddSubFields(MarcDirectoryEntry& d, char* b);
public:
    MarcRecord(char* data, int length, int copyData);
    ~MarcRecord();
    void PrintDetailed(FILE* fp);
    void Get(char* buf,int maxlen,int format);
    int  GetSubField(char* tag, char subtag, char* buf, int maxlen);
    int  GetField(char* tag, char* buf, int maxlen);
    int  GetSubFields(char* tag, char subtag, char* buf, int maxlen);

    int  HasField(char* tag);
    int  HasSubField(char* tag, char subtag);

    void Format(char* buf, int maxlen, int format);
    int  RecordLength();
    int  PrettyFormat(char* format, char* buf, int maxlen);

    void Dump ();
};
#endif