dirdisp.c

来自「开放源码的编译器open watcom 1.6.0版的源代码」· C语言 代码 · 共 516 行

/****************************************************************************
*
*                            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 <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include "posix.h"
#include "vi.h"
#include "keys.h"
#include "win.h"
#ifdef __WIN__
    #include "winvi.h"
    #include "utils.h"
    #include "color.h"
    #include "font.h"
#endif

static window_id dirWin = NO_WINDOW;
static int oldFilec,lastFilec;
static int oldPage = -1;
static int maxJ,perPage,maxPage,cPage;
static bool hasWrapped,isDone;
static int mouseFilec = -1;
static char strFmt[] = " %c%S";

static bool hasMouseHandler;

/*
 * FileCompleteMouseHandler - handle mouse events for file completion
 */
bool FileCompleteMouseHandler( window_id id, int win_x, int win_y )
{
    if( id != dirWin ) {
        return( FALSE );
    }
    if( LastMouseEvent != MOUSE_PRESS && LastMouseEvent != MOUSE_DCLICK ) {
        return( FALSE );
    }
    if( LastMouseEvent == MOUSE_DCLICK ) {
        isDone = TRUE;
    }
    if( !InsideWindow( id, win_x, win_y ) ) {
        return( FALSE );
    }

    mouseFilec = cPage + (win_x-1)/NAMEWIDTH + (win_y-1)*maxJ;

    return( TRUE );

} /* FileCompleteMouseHandler */


/*
 * appendExtra - add extra to end
 */
static int appendExtra( char *data, int start, int max, direct_ent *fi,
                        int len  )
{
    int i,rc;

    for( i=start;i<start+len;i++ ) {
        if( i>=max ) {
            break;
        }
        data[i] = fi->name[i-start];
    }
    if( fi->attr & _A_SUBDIR ) {
        rc = ERR_NO_ERR;
    } else {
        rc = FILE_COMPLETE;
    }
    data[i] = 0;
    return( rc );

} /* appendExtra */

/*
 * doFileComplete - complete file name
 */
static int doFileComplete( char *data, int start, int max, bool getnew,
                                int key )
{
    int         i,j,k=0,newstart=-1;
    char        buff[MAX_STR*2];

    i = start;
    while( !isspace( data[i] )  && i >= 0 ) {
        if( (data[i] == ':' || data[i] == '/' || data[i] == '\\') && newstart < 0 ) {
            newstart = i+1;
        }
        i--;
    }
    if( newstart < 0 ) {
        newstart = i+1;
    }
    if( getnew ) {

        for( j=i+1;j<=start;j++ ) {
            buff[k++] = data[j];
        }
        lastFilec = -1;
        buff[k++] = '*';
        buff[k] = 0;
        i = GetSortDir( buff, FALSE );
        if( i ) {
            return( i );
        }
        /*
         * remove any crap from the list
         */
        for( i=0;i< DirFileCount;i++ ) {
            if( !IsTextFile( DirFiles[i]->name ) ||
                (DirFiles[i]->name[0] == '.' )) {
                MemFree( DirFiles[i] );
                for( j=i+1;j<DirFileCount;j++ ) {
                    DirFiles[j-1] = DirFiles[j];
                }
                i--;
                DirFileCount--;
            }
        }

    }

    if( DirFileCount == 0 ) {
        return( ERR_FILE_NOT_FOUND );
    }
    if( DirFileCount == 1 ) {
        if( dirWin != NO_WINDOW ) {
            ClearWindow( dirWin );
        }
        return( appendExtra( data, newstart,max, DirFiles[0],
                        strlen(DirFiles[0]->name) ) );
    }

    /*
     * okay, so we have multiple matches; add in the next match
     */
    oldFilec = lastFilec;
    switch( key ) {
    case VI_KEY( TAB ):
    case VI_KEY( RIGHT ):
        lastFilec++;
        break;
    case VI_KEY( SHIFT_TAB ):
    case VI_KEY( LEFT ):
        lastFilec--;
        break;
    case VI_KEY( DOWN ):
        lastFilec += maxJ;
        break;
    case VI_KEY( UP ):
        lastFilec -= maxJ;
        break;
    case VI_KEY( FAKEMOUSE ):
    case VI_KEY( MOUSEEVENT ):
        lastFilec = mouseFilec;
        break;
    }
    while( lastFilec >= DirFileCount ) {
        lastFilec -= DirFileCount;
        hasWrapped = TRUE;
    }
    while( lastFilec < 0 ) {
        lastFilec += DirFileCount;
        hasWrapped = TRUE;
    }

    appendExtra( data, newstart, max, DirFiles[lastFilec],
                        strlen(DirFiles[lastFilec]->name) );

    return( ERR_NO_ERR );

} /* doFileComplete */

#ifdef __WIN__
static int calcColumns( HWND hwnd )
{
    RECT        rect;
    int         columns;
    window      *w;

    if( BAD_ID( hwnd ) ) return( 0 );
    w = WINDOW_FROM_ID( hwnd );
    GetClientRect( hwnd, &rect );
    columns = rect.right - rect.left;
    columns = columns / ( NAMEWIDTH * FontAverageWidth( WIN_FONT( w ) ) );
    return( columns );
}

void FileCompleteMouseClick( HWND hwnd, int x, int y, BOOL dclick )
{
    int         file, column_width, column_height, c;
    int         left_margin, columns;
    RECT        rect;
    window      *w;

    if( BAD_ID( hwnd ) ) return;
    w = WINDOW_FROM_ID( hwnd );
    /* figure out which file_name the user clicked on */
    columns = calcColumns( hwnd );
    GetClientRect( hwnd, &rect );
    column_width = NAMEWIDTH * FontAverageWidth( WIN_FONT( w ) );
    column_height = FontHeight( WIN_FONT( w ) );
    left_margin = ( rect.right - rect.left - column_width * columns ) >> 1;
    if( x < left_margin || x + left_margin > rect.right ) {
        return;
    }
    c = ( x - left_margin ) / column_width;
    file = ( y / column_height ) * columns + c;
    file += cPage * perPage;
    if( dclick ) {
        isDone = TRUE;
    }
    mouseFilec = file;
    KeyAdd( VI_KEY( FAKEMOUSE ) );
}

static void parseFileName( int i, char *buffer )
{
    char        ch;

    if( i >= DirFileCount ) {
        MySprintf( buffer, strFmt, ' ', SingleBlank );
    } else {
        if( DirFiles[i]->attr & _A_SUBDIR ) {
            ch = FILE_SEP;
        } else {
            ch = ' ';
        }
        MySprintf( buffer, strFmt, ch, DirFiles[i]->name );
    }
    buffer[ NAMEWIDTH ] = 0;
}

#define ROW( i )    ( (i) / maxJ )
#define COL( i )    ( (i) % maxJ )

static void getBounds( int *start, int *end )
{
    int         first, last;

    if( oldFilec < lastFilec ) {
        first = oldFilec;
        last = lastFilec;
    } else {
        first = lastFilec;
        last = oldFilec;
    }
    *start = ROW( first ) * maxJ;
    *end = ROW( last ) * maxJ + maxJ - 1;
}

void displayFiles( void )
{
    int         i, start, end;
    int         column, right_edge, left_edge;
    int         outer_bound;
    int         font_height, column_width;
    window      *w;
    RECT        rect;
    type_style  *style;
    char        buffer[ FILENAME_MAX ];

    if( BAD_ID( dirWin ) ) return;
    w = WINDOW_FROM_ID( dirWin );

    if( hasWrapped ) {
        ClearWindow( dirWin );
        hasWrapped = FALSE;
    }

    font_height = FontHeight( WIN_FONT( w ) );
    GetClientRect( dirWin, &rect );
    column_width = NAMEWIDTH * FontAverageWidth( WIN_FONT( w ) );
    outer_bound = rect.right;
    left_edge = rect.right - rect.left;
    left_edge -= maxJ * column_width;
    left_edge >>= 1;
    right_edge = rect.right - left_edge - 1;

    cPage = lastFilec / perPage;
    if( cPage != oldPage ) {
        start = cPage * perPage;
        end = start + perPage + maxJ;
    } else {
        getBounds( &start, &end );
    }

    // assert( start <= lastFilec && lastFilec <= end );
    rect.top = ( ROW( start ) - cPage * perPage / maxJ ) * font_height;
    rect.bottom = rect.top + font_height;
    rect.left = 0;
    rect.right = left_edge;
    BlankRectIndirect( dirWin, WIN_BACKCOLOR( w ), &rect );
    column = 0;
    for( i = start; i <= end; i++ ) {
        parseFileName( i, &buffer[0] );
        style = ( i == lastFilec ) ? &w->info->hilight : &w->info->text;
        rect.left = column * column_width + left_edge;
        rect.right = rect.left + column_width;
        BlankRectIndirect( dirWin, style->background, &rect );
        WriteString( dirWin, rect.left, rect.top, style, &buffer[0] );
        column = (column + 1) % maxJ;
        if( column == 0 ) {
            /* blat out the rest of the row and continue on */
            rect.left = right_edge;
            rect.right = outer_bound;
            BlankRectIndirect( dirWin, WIN_BACKCOLOR( w ), &rect );
            rect.top = rect.bottom;
            rect.bottom = rect.top + font_height;
            rect.left = 0;
            rect.right = left_edge;
            BlankRectIndirect( dirWin, WIN_BACKCOLOR( w ), &rect );
        }
    }
    oldPage = cPage;
}

#else

/*
 * displayFiles - display files according to specified type
 *                (comment free code - my favourite kind!)
 */
static void displayFiles( void )
{
    char        tmp[FILENAME_MAX],tmp2[FILENAME_MAX],dirc;
    int         j,i,k,hilite=-1,z;
    int         st,end,l=1;

    tmp[0] = 0;
    j = 0;

    st = 0;
    end = perPage;
    cPage = lastFilec/perPage;
    if( cPage > 0) {
        cPage *= perPage;
        st += cPage;
        end += cPage;
    }
    if( hasWrapped ) {
        ClearWindow( dirWin );
        hasWrapped = FALSE;
    }

    for( i=st;i<end;i++ ) {

        if( i == lastFilec ) {
            hilite = j;
        }
        if( i >= DirFileCount ) {
            MySprintf( tmp2, strFmt, ' ', SingleBlank );
        } else {
            if( DirFiles[i]->attr & _A_SUBDIR ) {
                dirc = FILE_SEP;
            } else {
                dirc = ' ';
            }
            MySprintf( tmp2,strFmt,dirc,DirFiles[i]->name );
            tmp2[ NAMEWIDTH ] = 0;
        }
        strcat( tmp,tmp2 );
        j++;

        if( j == maxJ || i == (end-1) ) {
            DisplayLineInWindow( dirWin, l++, tmp );
            if( hilite >= 0 ) {
                j = hilite*NAMEWIDTH;
                if( DirFiles[lastFilec]->attr & _A_SUBDIR ) {
                    dirc = FILE_SEP;
                } else {
                    dirc = ' ';
                }
                MySprintf( tmp2, strFmt, dirc, DirFiles[lastFilec]->name );
                z = j + strlen( tmp2 );
                for( k=j; k<z; k++ ) {
                    SetCharInWindowWithColor( dirWin, l-1,
                        k+1, tmp2[k-j], &filecw_info.hilight );
                }
               hilite = -1;
            }
            j = 0;
            tmp[0] = 0;
        }

    }
    if( mouseFilec >= 0 ) {
        mouseFilec = -1;
    }

} /* displayFiles */
#endif

/*
 * StartFileComplete - handle file completion
 */
int StartFileComplete( char *data, int start, int max, int what )
{
    int rc;
    int maxl;

    isDone = FALSE;
    rc = doFileComplete( data, start, max, TRUE, what );
    if( rc > 0 || rc == FILE_COMPLETE ) {
        return( rc );
    }

    if( dirWin == NO_WINDOW ) {
        // ensure uniform font before opening window
        if( filecw_info.text.font != filecw_info.hilight.font )
            filecw_info.hilight.font = filecw_info.text.font;

        rc = NewWindow2( &dirWin, &filecw_info );
        if( rc ) {
            return( rc );
        }
    }
    WindowTitle( dirWin,"File Completion List" );

    #ifdef __WIN__
        maxJ = calcColumns( dirWin );
    #else
        maxJ = (WindowAuxInfo( dirWin, WIND_INFO_TEXT_COLS))/NAMEWIDTH;
    #endif
    maxl = (WindowAuxInfo( dirWin, WIND_INFO_TEXT_LINES))-1;
    perPage = (maxl+1)*(maxJ);
    oldPage = -1;
    maxPage = (DirFileCount + perPage - 1)/(perPage);
    displayFiles();
    PushMouseEventHandler( FileCompleteMouseHandler );
    hasMouseHandler = TRUE;
    return( ERR_NO_ERR );

} /* StartFileComplete */

/*
 * ContinueFileComplete
 */
int ContinueFileComplete( char *data, int start, int max, int what )
{
    int rc;

    rc = doFileComplete( data, start, max, FALSE, what );
    if( rc > 0 || rc == FILE_COMPLETE ) {
        return( rc );
    }
    displayFiles();
    if( isDone ) {
        return( FILE_COMPLETE_ENTER );
    }
    return( ERR_NO_ERR );

} /* ContinueFileComplete */

/*
 * FinishFileComplete
 */
void FinishFileComplete( void )
{
    if( dirWin == NO_WINDOW ) {
        return;
    }
    CloseAWindow( dirWin );
    dirWin = NO_WINDOW;
    if( hasMouseHandler ) {
        PopMouseEventHandler();
        hasMouseHandler = FALSE;
    }

} /* FinishFileComplete */

/*
 * PauseFileComplete
 */
void PauseFileComplete( void )
{
    WindowTitle( dirWin, NULL );
    if( hasMouseHandler ) {
        PopMouseEventHandler();
        hasMouseHandler = FALSE;
    }

} /* PauseFileComplete */