resdiag.c

开放源码的编译器open watcom 1.6.0版的源代码

/****************************************************************************
*
*                            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 <stddef.h>
#include <string.h>
#include <limits.h>
#include "layer0.h"
#include "filefmt.h"
#include "wresrtns.h"
#include "write.h"
#include "read.h"
#include "resdiag.h"
#include "reserr.h"
#if defined( __UNIX__ ) && !defined( __WATCOMC__ )
    #include "clibext.h"
#endif

static int ResWriteDialogHeaderCommon32( DialogBoxHeader32 *head,
                                         WResFileID handle, char add_quotes );
static int ResWriteDialogControlCommon32( ControlClass *class_id,
                        ResNameOrOrdinal *text, uint_16 extra_bytes,
                        WResFileID handle );

extern int ResWriteDialogBoxHeader( DialogBoxHeader * head, WResFileID handle )
/*****************************************************************************/
{
    int         error;
    int         numwrote;
    int         fixedbytes;
    uint_16     tmp16;

    /* write out the fixed size portion of the structure */
    /* the fixed portion is everything up to, but not including, MenuName */
    fixedbytes = offsetof( DialogBoxHeader, MenuName );
    numwrote = WRESWRITE( handle, head, fixedbytes );
    error = (numwrote != fixedbytes);
    if( error ) {
        WRES_ERROR( WRS_WRITE_FAILED );
    }

    if (!error) {
        error = ResWriteNameOrOrdinal( head->MenuName, FALSE, handle );
    }
    if (!error) {
        error = ResWriteNameOrOrdinal( head->ClassName, FALSE, handle );
    }
    if (!error) {
        error = ResWriteString( head->Caption, FALSE, handle );
    }

    /* if the font was set output the font name and point size */
    if (!error && (head->Style & DS_SETFONT)) {
        tmp16 = head->PointSize;
        error = ResWriteUint16( &tmp16, handle );
        if (!error) {
            error = ResWriteString( head->FontName, FALSE, handle );
        }
    }

    return( error );
}

extern int ResWriteDialogBoxHeader32( DialogBoxHeader32 * head,
                                            WResFileID handle )
/**************************************************************/
{
    int         error;
    int         numwrote;
    int         fixedbytes;
    uint_16     tmp16;

    /* write out the fixed size portion of the structure */
    /* the fixed portion is everything up to, but not including, MenuName */
    fixedbytes = offsetof( DialogBoxHeader32, MenuName );
    numwrote = WRESWRITE( handle, head, fixedbytes );
    error = (numwrote != fixedbytes);
    if( error ) {
        WRES_ERROR( WRS_WRITE_FAILED );
    }
    if( !error ) {
        error = ResWriteDialogHeaderCommon32( head, handle, FALSE );
    }

    /* if the font was set output the font name and point size */
    if (!error && (head->Style & DS_SETFONT)) {
        tmp16 = head->PointSize;
        error = ResWriteUint16( &tmp16, handle );
        if (!error) {
            error = ResWriteString( head->FontName, TRUE, handle );
        }
    }

    return( error );
}


extern int ResWriteDialogExHeader32( DialogBoxHeader32 *head,
                             DialogExHeader32 *exhead, WResFileID handle )
/*************************************************************************/
{
    int       error;
    int       numwrote;
    uint_16   miscbytes[2] = { 0x0001, 0xFFFF };
    uint_16   tmp16;
    uint_32   tmp32;

    /* Write out the miscellaneous two WORDs 01 00 FF FF */

    error = ResWriteUint16( miscbytes, handle );
    if( !error ) {
        error = ResWriteUint16( miscbytes + 1, handle );
    }
    if( !error ) {
        error = ResWriteUint32( &(exhead->HelpId), handle );
    }
    if( !error ) {
        tmp32 = head->ExtendedStyle;
        error = ResWriteUint32( &tmp32, handle );
    }
    if( !error ) {
        tmp32 = head->Style;
        error = ResWriteUint32( &tmp32, handle );
    }
    if( !error ) {
        tmp16 = head->NumOfItems;
        error = ResWriteUint16( &tmp16, handle );
    }
    if( !error ) {
        numwrote = WRESWRITE( handle, &(head->Size), sizeof( DialogSizeInfo ) );
        error = ( numwrote != sizeof( DialogSizeInfo ) );
        if( error ) {
            WRES_ERROR( WRS_WRITE_FAILED );
        }
    }
    if( !error ) {
        error = ResWriteDialogHeaderCommon32( head, handle, TRUE );
    }
//    if( !error ) {                    //DRW - commented Sep 25/95
//      error = ResPadDWord( handle );
//    }

    /* If the font was set, write the font information */
    if( !error && (head->Style & DS_SETFONT) ) {
        tmp16 = head->PointSize;
        error = ResWriteUint16( &tmp16, handle );
        if( !error ) {
            error = ResWriteUint16( &(exhead->FontWeight), handle );
        }
        if( !error ) {
            error = ResWriteUint8( &(exhead->FontItalic), handle );
        }
        if( !error ) {
            error = ResWriteUint8( &(exhead->FontExtra), handle );
        }
        if( !error ) {
            error = ResWriteString( head->FontName, TRUE, handle );
        }
        if( !error ) {
            error = ResPadDWord( handle );
        }
    }

    return( error );
}

static int ResWriteDialogHeaderCommon32( DialogBoxHeader32 *head,
                                         WResFileID handle, char add_quotes )
/************************************************************************************/
{
    int     error;
    int     len;
    char   *newname;

    if( add_quotes ) {
        if( head->MenuName != NULL || head->MenuName->name != NULL ) {
            len = strlen( head->MenuName->name );
            newname = WRESALLOC( (len + 3)*sizeof( char ) );
            newname[0] = '"';
            strcpy( newname + 1, head->MenuName->name );
            newname[ len + 1 ] = '"';
            newname[ len + 2 ] = '\0';
            head->MenuName = ResStrToNameOrOrd( newname );
            WRESFREE( newname );
        }
    }

    error = ResWriteNameOrOrdinal( head->MenuName, TRUE, handle );
    if (!error) {
        error = ResWriteNameOrOrdinal( head->ClassName, TRUE, handle );
    }
    if (!error) {
        error = ResWriteString( head->Caption, TRUE, handle );
    }

    return( error );
}

extern void ResFreeDialogBoxHeaderPtrs( DialogBoxHeader * head )
/**************************************************************/
{
    if (head->MenuName != NULL) {
        WRESFREE( head->MenuName );
    }
    if (head->ClassName != NULL) {
        WRESFREE( head->ClassName );
    }
    if (head->Caption != NULL) {
        WRESFREE( head->Caption );
    }
    if (head->FontName != NULL) {
        WRESFREE( head->FontName );
    }
}

extern void ResFreeDialogBoxHeader32Ptrs( DialogBoxHeader32 * head )
/******************************************************************/
{
    if (head->MenuName != NULL) {
        WRESFREE( head->MenuName );
    }
    if (head->ClassName != NULL) {
        WRESFREE( head->ClassName );
    }
    if (head->Caption != NULL) {
        WRESFREE( head->Caption );
    }
    if (head->FontName != NULL) {
        WRESFREE( head->FontName );
    }
}

extern int ResReadDialogBoxHeader32( DialogBoxHeader32 *head, WResFileID handle )
/*******************************************************************************/
{
    int         error;
    int         numread;
    int         fixedbytes;
    uint_16     tmp16;

    /* read in the fixed size portion of the structure */
    /* the fixed portion is everything up to, but not including, MenuName */
    fixedbytes = offsetof( DialogBoxHeader32, MenuName );
    numread = WRESREAD( handle, head, fixedbytes );
    error = (numread != fixedbytes);
    if( error ) {
        WRES_ERROR( numread == -1 ? WRS_READ_FAILED:WRS_READ_INCOMPLETE );
    }

    if (!error) {
        head->MenuName = ResRead32NameOrOrdinal( handle );
        error = (head->MenuName == NULL);
    }
    if (!error) {
        head->ClassName = ResRead32NameOrOrdinal( handle );
        error = (head->ClassName == NULL);
    }
    if (!error) {
        head->Caption = ResRead32String( handle, NULL );
        error = (head->Caption == NULL);
    }

    /* if the font was set input the font name and point size */
    if (!error && (head->Style & DS_SETFONT)) {
        error = ResReadUint16( &tmp16, handle );
        head->PointSize = tmp16;
        if (!error) {
            head->FontName = ResRead32String( handle, NULL );
            error = (head->FontName == NULL);
        }
    } else {
        head->FontName = NULL;
    }

    return( error );
}

extern int ResReadDialogBoxHeader( DialogBoxHeader * head, WResFileID handle )
/****************************************************************************/
{
    int     error;
    int     numread;
    int     fixedbytes;
    uint_16 tmp16;

    /* read in the fixed size portion of the structure */
    /* the fixed portion is everything up to, but not including, MenuName */
    fixedbytes = offsetof( DialogBoxHeader, MenuName );
    numread = WRESREAD( handle, head, fixedbytes );
    error = (numread != fixedbytes);
    if( error ) {
        WRES_ERROR( numread == -1 ? WRS_READ_FAILED:WRS_READ_INCOMPLETE );
    }

    if (!error) {
        head->MenuName = ResReadNameOrOrdinal( handle );
        error = (head->MenuName == NULL);
    }
    if (!error) {
        head->ClassName = ResReadNameOrOrdinal( handle );
        error = (head->ClassName == NULL);
    }
    if (!error) {
        head->Caption = ResReadString( handle, NULL );
        error = (head->Caption == NULL);
    }

    /* if the font was set input the font name and point size */
    if (!error && (head->Style & DS_SETFONT)) {
        error = ResReadUint16( &tmp16, handle );
        head->PointSize = tmp16;
        if (!error) {
            head->FontName = ResReadString( handle, NULL );
            error = (head->FontName == NULL);
        }
    } else {
        head->FontName = NULL;
    }

    return( error );
}

extern int ResIsDialogEx( WResFileID handle )
/*******************************************************************************/
{
    int     numread;
    uint_16   signa[2];

    /* read in the signature part of the header and check it */
    numread = WRESREAD( handle, signa, sizeof(signa) );
    if( numread != sizeof(signa) ) {
        WRES_ERROR( numread == -1 ? WRS_READ_FAILED:WRS_READ_INCOMPLETE );
    }
    else {
        if (signa[0] == 0x0001 && signa[1] == 0xFFFF)
            return(TRUE);
    }
    return( FALSE );
}

extern int ResReadDialogExHeader32( DialogBoxHeader32 *head,
                             DialogExHeader32 *exhead, WResFileID handle )
/*************************************************************************/
{
    int       error;
    int       numread;
    uint_16   miscbytes[2] = { 0x0000, 0x0000 };
    uint_16   tmp16;
    uint_32   tmp32;

    /* Read in the miscellaneous two WORDs 01 00 FF FF */
    error = ResReadUint16( miscbytes, handle );
    if( !error ) {
        error = ResReadUint16( miscbytes + 1, handle );
    }
    if( !error ) {
        error = !(miscbytes[0] == 0x0001 && miscbytes[1] == 0xffff);
    }

    if( !error ) {
        error = ResReadUint32( &(exhead->HelpId), handle );
    }
    if( !error ) {
        error = ResReadUint32( &tmp32, handle );
        head->ExtendedStyle = tmp32;
    }
    if( !error ) {
        error = ResReadUint32( &tmp32, handle );
        head->Style = tmp32;
    }
    if( !error ) {
        error = ResReadUint16( &tmp16, handle );
        head->NumOfItems = tmp16;
    }
    if( !error ) {
        numread = WRESREAD( handle, &(head->Size), sizeof( DialogSizeInfo ) );
        error = ( numread != sizeof( DialogSizeInfo ) );
        if( error ) {
            WRES_ERROR( WRS_READ_FAILED );
        }
    }
    if (!error) {
        head->MenuName = ResRead32NameOrOrdinal( handle );
        error = (head->MenuName == NULL);
    }
    if (!error) {
        head->ClassName = ResRead32NameOrOrdinal( handle );
        error = (head->ClassName == NULL);
    }
    if (!error) {
        head->Caption = ResRead32String( handle, NULL );
        error = (head->Caption == NULL);
    }

    /* not needed ???