mconfig.cpp

来自「开放源码的编译器open watcom 1.6.0版的源代码」· C++ 代码 · 共 578 行 · 第 1/2 页

/****************************************************************************
*
*                            Open Watcom Project
*
*    Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
*
*  ========================================================================
*
*    This file contains Original Code and/or Modifications of Original
*    Code as defined in and that are subject to the Sybase Open Watcom
*    Public License version 1.0 (the 'License'). You may not use this file
*    except in compliance with the License. BY USING THIS FILE YOU AGREE TO
*    ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is
*    provided with the Original Code and Modifications, and is also
*    available at www.sybase.com/developer/opensource.
*
*    The Original Code and all software distributed under the License are
*    distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
*    EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM
*    ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF
*    MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR
*    NON-INFRINGEMENT. Please see the License for the specific language
*    governing rights and limitations under the License.
*
*  ========================================================================
*
* Description:  WHEN YOU FIGURE OUT WHAT THIS FILE DOES, PLEASE
*               DESCRIBE IT HERE!
*
****************************************************************************/


#include "mconfig.hpp"
#include "mtool.hpp"
#include "mrule.hpp"
#include "mtarget.hpp"
#include "mtoolitm.hpp"
#include "maction.hpp"
#include "msymbol.hpp"
#include "wtokfile.hpp"
#include "wobjfile.hpp"
#include "mtypo.hpp"

#include <mbctype.h>

extern "C" {
    #include <malloc.h>
    #if defined( __WINDOWS__ ) || defined( __NT__ )
        #include <windows.h>    //temporary ?
    #endif
//    int __nonIBM();
};

#define MALLOC(s) (char*)malloc(s)
#define REALLOC(p,s) (char*)realloc(p,s)
#define FREE(p) if( p != NULL ) free(p)

#define CUR_CFG_VERSION         4

#define DOS_BATSERV "BATCHBOX.PIF"
#define OS2_BATSERV "BATSERV.EXE"
#define NT_BATSERV "BATSERV.EXE"

Define( MConfig )

MConfig* MConfig::_configPtr;

MConfig::MConfig( WFileName& filename, bool debug )
    : _filename( filename )
    , _fileFilters( NULL )
    , _fileFilterSize( 0 )
    , _ok( FALSE )
    , _dirty( FALSE )
    , _debug( debug )
    , _version( 0 )
    , _kludge( 0 )
#ifdef __WINDOWS__
    , _hostType( HOST_WINDOWS )
    , _batserv( DOS_BATSERV )
#endif
#ifdef __OS2__
    , _hostType( HOST_PM )
    , _batserv( OS2_BATSERV )
#endif
#ifdef __NT__
#ifdef __AXP
    , _hostType( HOST_AXP_NT )
    , _batserv( NT_BATSERV )
#else
    , _hostType( HOST_NT )
    , _batserv( NT_BATSERV )
#endif
#endif
{
    _configPtr = this;
#ifdef __WINDOWS__
    if( __IsDBCS ) {
// Looks like we lost __nonIBM() somewhere... remove for now. MN
//        if( __nonIBM() ) {
//            /* japanese windows on a nec 98 pc */
//            _hostType = HOST_NEC_WIN;
//        } else {
            /* japanese windows on an IBM */
            _hostType = HOST_J_WIN;
//        }
    } else {
        /* assume no DBCS win-os/2 */
        union {
            DWORD dVersion;
            struct {
                char winMajor;
                char winMinor;
                char dosMinor;
                char dosMajor;
            } v;
        } v;
        v.dVersion = GetVersion();
        if( v.v.dosMajor >= 20 ) {
            _hostType = HOST_WINOS2;
            _batserv = OS2_BATSERV;
        }
    }
#elif defined( __NT__ )
    /* -------------------------------------------------------- */
    DWORD ver;
    bool is_chicago = FALSE;

    ver = GetVersion();
    if( !( ver < 0x80000000 ) && !( LOBYTE( LOWORD( ver ) ) < 4 ) ) {
        _hostType = HOST_WIN95;
    }
    /* -------------------------------------------------------- */
#endif
    if( _filename.size() == 0 ) {
        _filename = "ide.cfg";
    }
    // set editor to default values
    #if defined( __WINDOWS__ ) || defined( __NT__ )
        if( __IsDBCS ) {
            _editor = DBCS_DEFAULT_EDITOR_NAME;
            _editorIsDLL = DBCS_DEFAULT_EDITOR_IS_DLL;
            _editorParms = DBCS_DEFAULT_EDITOR_PARMS;
        } else {
            _editor = DEFAULT_EDITOR_NAME;
            _editorIsDLL = DEFAULT_EDITOR_IS_DLL;
            _editorParms = DEFAULT_EDITOR_PARMS;
        }
    #elif defined( __OS2__ )
        _editor = OS2_DEFAULT_EDITOR_NAME;
        _editorIsDLL = OS2_DEFAULT_EDITOR_IS_DLL;
        _editorParms = OS2_DEFAULT_EDITOR_PARMS;
    #endif
    readConfig();
}

void MConfig::writeConfig()
{
    _filename.setExt( ".cfc" );
    WObjectFile of( 9 );
    if( of.open( _filename, OStyleWrite ) ) {
        of.writeObject( this );
        of.close();
    }
}

bool MConfig::readConfig()
{
    _nilTool = new MTool( "NilTool", "NIL" );
    _tools.add( _nilTool );
    _nilRule = new MRule( "NIL", _nilTool );
    _rules.add( _nilRule );
    _ok = TRUE;
    if( readFile( _filename ) ) {
        zapTargetMasks();
        return TRUE;
    }
    return FALSE;
}

void MConfig::zapTargetMasks()
{
    static char hostChars[] = { 'w', 'o', 'n', 's', '9', 'j', '8', 'a' };
    int     i;

    for( i=0; i<_hostMask.size(); i++ ) {
        if( _hostMask[i] == '@' ) {
            _hostMask.setChar( i, hostChars[ _hostType ] );
        }
    }
    for( i=0; i<_targets.count(); i++ ) {
        MTarget* tar = (MTarget*)_targets[i];
        zapMask( tar->mask() );
    }
}

bool MConfig::readFile( const WFileName& filename, bool reqd )
{
    WTokenFile fil;
    if( !fil.open( filename, "PATH" ) ) {
        if( reqd ) {
            _ok = FALSE;
            _errMsg.printf( "Unable to open '%s'", (const char*)filename );
        }
    } else {
        _filename = fil.filename();
        WString tok;
        fil.token( tok );
        for(; !fil.eof(); ) {
            if( tok == "Tool" ) {
                _tools.add( new MTool( fil, tok ) );
            } else if( tok == "Rule" ) {
                _rules.add( new MRule( fil, tok ) );
            } else if( tok == "Project" ) {
                configProject( fil, tok );
            } else if( tok == "MsgLog" ) {
                configMsgLog( fil, tok );
            } else if( tok == "IncludeFile" ) {
                WFileName fn;
                fil.token( fn );
                if( !readFile( fn, FALSE ) ) break;
                fil.token( tok );
            } else if( tok == "HostMask" ) {
                fil.token( _hostMask );
                fil.token( tok );
            } else if( tok == "Version" ) {
                _version = (int)fil.token( tok );
                if( _version > CUR_CFG_VERSION ) {
                    _ok = FALSE;
                    _errMsg.printf( "Configuration file '%s' format is too new.  "
                                    "you must use a newer version of the IDE.",
                                    (const char*)filename );
                    break;
                }
                fil.token( tok );
            } else if( tok == "rem" ) {
                fil.flushLine( tok );
                fil.token( tok );
            } else if( tok == "Compat" ) {
                WString good;
                WString bad;
                fil.token( good );
                fil.token( bad );
                AddTypo( good, bad );
                fil.token( tok );
            } else {
                _ok = FALSE;
                _errMsg.printf( "Error in '%s', line %d, at '%s'", (const char*)filename, fil.lineCount(), (const char*)tok );
                break;
            }
        }
        fil.close();
    }
    buildTargetOSList();
    return _ok;
}

MConfig::~MConfig()
{
    _tools.deleteContents();
    _rules.deleteContents();
    _targets.deleteContents();
    _toolItems.deleteContents();
    _actions.deleteContents();
    _helpactions.deleteContents();
    _logScanPatterns.deleteContents();
    _logHelpFiles.deleteContents();
    _targetOSs.deleteContents();
    FREE( _fileFilters );
}

#ifndef NOPERSIST
MConfig* WEXPORT MConfig::createSelf( WObjectFile& )
{
    return NULL;        //should never be called!
}

void WEXPORT MConfig::readSelf( WObjectFile& p )
{
    WObject::readSelf( p );
    p.readObject( &_tools );
    p.readObject( &_rules );
    p.readObject( &_actions );
    p.readObject( &_editor );
    p.readObject( &_browse );
    p.readObject( &_browseMerge );
}

void WEXPORT MConfig::writeSelf( WObjectFile& p )
{