picview.c

MINI GUI1.6X源码

/*
** $Id: picview.c,v 1.9 2004/01/07 09:11:48 tangxf Exp $
**
** picview.c: A simple picture viewer.
**
** Copyright (C) 2001 ~ 2002 Jiang Jun and others.
** Copyright (C) 2003 Feynman Software.
*/

/*
**  This source 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 software 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 library; if not, write to the Free
**  Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
**  MA 02111-1307, USA
*/

#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#include <time.h>
#include <string.h>
#include <ctype.h>
#include <sys/time.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>

#include <minigui/common.h>
#include <minigui/minigui.h>
#include <minigui/gdi.h>
#include <minigui/window.h>
#include <minigui/control.h>
#include <minigui/mywindows.h>
#include <minigui/filedlg.h>
#include <minigui/mgext.h>

static int MAINWINDOW_LX;
static int MAINWINDOW_TY;
static int MAINWINDOW_RX;
static int MAINWINDOW_BY;

#define TB_BEGIN_X             2
#define TB_BEGIN_Y             2
#define TB_HEIGHT              16
#define TB_WIDTH               22

#define IDC_TB_SELF 		   100
#define IDC_TB_OPEN            110
#define IDC_TB_SAVE 		   120
#define IDC_TB_PREVIOUS		   130
#define IDC_TB_NEXT  		   140
#define IDC_TB_SMALL		   150
#define IDC_TB_BIG  		   160
#define IDC_TB_FULL  		   170

typedef struct tagFILEITEM{
	char                 name[NAME_MAX];
	struct tagFILEITEM*  previous; 
	struct tagFILEITEM*  next; 
}FILEITEM;

static BOOL IsSupport (unsigned char *filename)
{
	unsigned char *extend,*temp;
	extend = rindex(filename,'.');
	if (extend ==NULL)
		return FALSE;
	extend++;
	temp = extend;
	while (*temp) {
		*temp = tolower(*temp);
		temp++;
	}

	if(
#ifdef _JPG_FILE_SUPPORT
        !strncmp(extend,"jpg",3) ||
#endif
#ifdef _GIF_FILE_SUPPORT
        !strncmp(extend,"gif",3) ||
#endif
#ifdef _PCX_FILE_SUPPORT
        !strncmp(extend,"pcx",3) ||
#endif
#ifdef _LBM_FILE_SUPPORT
        !strncmp(extend,"lbm",3) ||
#endif
#ifdef _TGA_FILE_SUPPORT
        !strncmp(extend,"tga",3) ||
#endif
#ifdef _PNG_FILE_SUPPORT
        !strncmp(extend,"png",3) ||
#endif
        !strncmp(extend,"bmp",3) )
		return TRUE;

	return FALSE;
}

static FILEITEM * findmatchfile(FILEDLGDATA *one, FILEITEM **cur )
{
    struct  dirent    *pDir;
    DIR               *dir;
    struct  stat      ftype;
    char              fullpath [PATH_MAX + NAME_MAX + 1];
    FILEITEM          *head = NULL;
    FILEITEM          *temp = NULL;

    dir            = opendir (one->filepath);
    while ( (pDir = readdir ( dir )) != NULL ) {
        strncpy (fullpath, one->filepath, PATH_MAX);
	if ( fullpath[ strlen(fullpath) - 1 ] != '/' )
	    strcat (fullpath, "/");
        strcat (fullpath, pDir->d_name);
        if (lstat (fullpath, &ftype) < 0 ){
	    Ping();
	    continue;
        }
        if ( S_ISREG(ftype.st_mode) && IsSupport(pDir->d_name) ) {
	    if( temp == NULL ) {
		temp = (FILEITEM *) malloc(sizeof(FILEITEM));
		temp->previous = NULL;
		temp->next = NULL;
		strcpy ( temp->name, fullpath);
		head = temp;
	    }
	    else {
		temp->next = (FILEITEM *) malloc(sizeof(FILEITEM));
		temp->next->previous = temp;
		temp->next->next     = NULL;
		temp = temp->next;
		strcpy ( temp->name, fullpath);
	    }
	    //indicate current file pointer
	    if ( !strcmp( pDir->d_name, one->filename ) )
		*cur = temp;
        }
    }
    closedir(dir);
    return head;
}

static void ReleaseList(FILEITEM *head)
{
	FILEITEM *temp;
	while(head)
	{
		temp = head->next;
		free (head);
		head = temp;
	}
}

static int ShowPicture(HWND hWnd,unsigned char *path,BOOL allscreen,float newrate)
{
	BITMAP Bitmap1;
	HDC hdc,truehdc;
	int x,y;
	if( LoadBitmap(HDC_SCREEN, &Bitmap1, path) < 0 )
	{
		fprintf(stderr,"Load Bitmap %s Error\n",path);
		return -1;
	}
	hdc = GetClientDC(hWnd);
	if(!allscreen)
	{
		x = (MAINWINDOW_RX - MAINWINDOW_LX)/2 - Bitmap1.bmWidth*newrate/2;
		if (Bitmap1.bmHeight*newrate <= (MAINWINDOW_BY - MAINWINDOW_TY - TB_HEIGHT-4 ))
			y = (MAINWINDOW_BY - MAINWINDOW_TY - TB_HEIGHT - 4 )/2 - Bitmap1.bmHeight*newrate/2 + TB_HEIGHT+2;
		else
			y = TB_HEIGHT + 4; 
		truehdc = hdc;
	}
	else
	{
		int max_x,max_y;
		max_x = GetGDCapability(HDC_SCREEN,GDCAP_MAXX);
		max_y = GetGDCapability(HDC_SCREEN,GDCAP_MAXY);
		x = (max_x - Bitmap1.bmWidth*newrate)/2;
		y = (max_y - Bitmap1.bmHeight*newrate)/2;
		truehdc = HDC_SCREEN;
	}
	FillBoxWithBitmap(truehdc, x, y, Bitmap1.bmWidth*newrate, Bitmap1.bmHeight*newrate, &Bitmap1);
	UnloadBitmap(&Bitmap1);
	ReleaseDC(hdc);
    return 0;
}

static struct toolbar_items
{
    int id;
    char* name;
} toolbar_items [] =
{
        {IDC_TB_OPEN, "open"},
#if 0
        {IDC_TB_SAVE, "save"},
#endif
        {IDC_TB_PREVIOUS, "previous"},
        {IDC_TB_NEXT, "next"},
        {IDC_TB_SMALL, "small"},
        {IDC_TB_BIG, "big"},
#if 0
        {IDC_TB_FULL, "full"},
#endif
};

static void InitToolBar (HWND toolbar)
{
    int i;
	char chtmp[MAX_PATH+1];
    TOOLBARITEMINFO pData;

    strcpy (chtmp, "res/");

    for (i = 0; i < TABLESIZE (toolbar_items); i++) {
        pData.id = toolbar_items [i].id;
        pData.insPos = i + 1;
        sprintf (pData.NBmpPath, "%s%s%s", chtmp, toolbar_items [i].name, "1.bmp");
#if 0
        pData.HBmpPath [0] = '\0';
        pData.DBmpPath [0] = '\0';
#else
        sprintf (pData.HBmpPath, "%s%s%s", chtmp, toolbar_items [i].name, "2.bmp");
        sprintf (pData.DBmpPath, "%s%s%s", chtmp, toolbar_items [i].name, "3.bmp");
#endif
        SendMessage (toolbar, TBM_ADDITEM, 0, (LPARAM)&pData);
    }
}

static int ViewWinProc(HWND hWnd, int message, WPARAM wParam, LPARAM lParam)
{
    static FILEITEM    *currentfile;
    static FILEITEM    *head        = NULL;
    static float       rate         = 1;
    static FILEDLGDATA filepathdata = {FALSE, ".", "", "."};
    static BOOL        IsFullScreen = FALSE;
    RECT               rect;

    GetClientRect (hWnd,&rect);
    rect.top +=TB_HEIGHT + 4;
    switch (message) {
    case MSG_CREATE:
    {
	HWND  hTBSelf;
	DWORD WdHt = MAKELONG (TB_HEIGHT, TB_WIDTH);
	
	hTBSelf = CreateWindow ("toolbar", " ",
				WS_CHILD | WS_VISIBLE , IDC_TB_SELF,
				TB_BEGIN_X, TB_BEGIN_Y, HIWORD(WdHt)*6,
				LOWORD(WdHt), hWnd, WdHt);
	
	InitToolBar (hTBSelf);
    }
    break;
    
    case MSG_COMMAND:
    {
	int id   = HIWORD(wParam);
	switch (id)
            {  case  IDC_TB_OPEN:
	       {
		   int choise=0;
		   choise = OpenFileDialog (hWnd, FALSE, &filepathdata);
		   if (choise == IDOK && IsSupport(filepathdata.filename) ) {
		       rate = 1;
		       if (head) {
			   ReleaseList(head);
		       }
		       head = findmatchfile(&filepathdata,&currentfile);
		       InvalidateRect(hWnd,&rect,TRUE);
		   }
	       }
		   break;
	    case  IDC_TB_PREVIOUS:
		if ( currentfile != NULL && currentfile->previous != NULL ) {
		    rate = 1;
		    currentfile = currentfile->previous;
		    InvalidateRect(hWnd,&rect,TRUE);
		}
		break;
	    case  IDC_TB_NEXT:
		if ( currentfile != NULL && currentfile->next!= NULL ) {
		    rate = 1;
		    currentfile = currentfile->next;
		    InvalidateRect(hWnd,&rect,TRUE);
		}					
		break;
		
	    case  IDC_TB_SMALL:
		if(rate > 0.125) {
		    rate = rate/2;
		    InvalidateRect(hWnd,&rect,TRUE);
		}
		break;
		
	    case  IDC_TB_BIG:
		if (rate < 8) {
		    rate = rate*2;
		    InvalidateRect(hWnd,&rect,TRUE);
		}
		break;

#if 0
	    case  IDC_TB_FULL:
	    {
		IsFullScreen = TRUE;
		MoveWindow (hWnd,0,-24-TB_HEIGHT,
			    GetGDCapability(HDC_SCREEN,GDCAP_MAXX),GetGDCapability(HDC_SCREEN,GDCAP_MAXY)+24+TB_HEIGHT,TRUE);
	    }
	    break;
#endif
            }
    }
    break;
    
    case MSG_PAINT:
	if ( currentfile != NULL ) {
	    char caption [300];
	    
	    // ShowPicture(hWnd,currentfile->name,IsFullScreen,rate);
	    ShowPicture(hWnd,currentfile->name,FALSE,rate);
	    sprintf (caption, "%s - %s", "看图", currentfile->name);
	    SetWindowCaption (hWnd, caption);
	}
	else 
	    SetWindowCaption(hWnd,"看图");
	break;
	
    case MSG_KEYDOWN:
    {
	switch ( LOWORD(wParam) ) {
	case SCANCODE_F1:
	    // OpenHelpWindow (HWND_DESKTOP, IDAPP_PIC, IDMSG_PIC);
	    return 0;
	    
	case SCANCODE_PAGEUP:
	    if ( currentfile != NULL && currentfile->previous != NULL )	{
		rate = 1;
		currentfile = currentfile->previous;
		if( IsFullScreen == TRUE )
		    SendMessage(HWND_DESKTOP,MSG_ERASEDESKTOP,0,0);	
		InvalidateRect(hWnd,&rect,TRUE);
	    }
	    return 0;			
	case SCANCODE_PAGEDOWN:
	    if ( currentfile != NULL && currentfile->next!= NULL ) {
		rate = 1;
		currentfile = currentfile->next;
		if( IsFullScreen == TRUE )
		    SendMessage(HWND_DESKTOP,MSG_ERASEDESKTOP,0,0);	
		InvalidateRect(hWnd,&rect,TRUE);
	    }					
	    return 0;			
	case SCANCODE_BACKSPACE:
	    if ( currentfile != NULL && currentfile->previous != NULL )	{
		rate = 1;
		currentfile = currentfile->previous;
		if( IsFullScreen == TRUE )
		    SendMessage(HWND_DESKTOP,MSG_ERASEDESKTOP,0,0);	
		InvalidateRect(hWnd,&rect,TRUE);
	    }
	    return 0;			
	case SCANCODE_ESCAPE:
	{
	    if (IsFullScreen == TRUE) {
		IsFullScreen = FALSE;
		MoveWindow(hWnd,MAINWINDOW_LX,MAINWINDOW_TY,MAINWINDOW_RX-MAINWINDOW_LX,MAINWINDOW_BY-MAINWINDOW_TY,FALSE);
		SendMessage(HWND_DESKTOP,MSG_ERASEDESKTOP,0,0);
		InvalidateRect(hWnd,NULL,FALSE); //repaint background
	    }
	}
	return 0;			
	default:
	    break;
	}
	break;
    }
    
    case MSG_LBUTTONDOWN:
    {
	if (IsFullScreen == TRUE) {
	    IsFullScreen = FALSE;
	    MoveWindow (hWnd,MAINWINDOW_LX,MAINWINDOW_TY,MAINWINDOW_RX-MAINWINDOW_LX,MAINWINDOW_BY-MAINWINDOW_TY,FALSE);
	    SendMessage(HWND_DESKTOP,MSG_ERASEDESKTOP,0,0);
	    InvalidateRect(hWnd,NULL,FALSE);
	}
    }
    break;			
    
    case MSG_CHAR:
    {	
	RECT        rect;
	GetClientRect(hWnd,&rect);
	rect.top +=TB_HEIGHT+4;
	if( LOBYTE(wParam) == ' ' ) {
	    if ( currentfile != NULL && currentfile->next!= NULL )		 
		{
		    rate = 1;
		    currentfile = currentfile->next;
		    if( IsFullScreen == TRUE )
			SendMessage(HWND_DESKTOP,MSG_ERASEDESKTOP,0,0);	
		    InvalidateRect(hWnd,&rect,TRUE);
		}					
	}
    }
    return 0;
    
    
    case MSG_MAXIMIZE:
	// OpenHelpWindow (HWND_DESKTOP, IDAPP_PIC, IDMSG_PIC);
	break;
	
    case MSG_CLOSE:
    {
	if (head)
	    ReleaseList(head);
	
	DestroyAllControls (hWnd);
	currentfile = NULL;
	head = NULL;
	DestroyMainWindow (hWnd);
	PostQuitMessage (hWnd);
    }
    return 0;
    }
    return DefaultMainWinProc(hWnd, message, wParam, lParam);
}

int MiniGUIMain (int args, const char* arg[])
{
    MSG Msg;
    HWND hMainWnd;
    MAINWINCREATE CreateInfo;
    
#if defined(_LITE_VERSION) && !(_STAND_ALONE)
    int i;
    const char* layer = NULL;
    RECT max_rect = {0, 0, 0, 0};

    for (i = 1; i < args; i++) {
        if (strcmp (arg[i], "-layer") == 0) {
            layer = arg[i + 1];
            break;
        }
    }

    GetLayerInfo (layer, &max_rect, NULL, NULL, NULL);

    if (JoinLayer (layer, arg[0], 
                max_rect.left, max_rect.top, 
                max_rect.left + 1024, 
                max_rect.top + 768) == INV_LAYER_HANDLE) {
        printf ("JoinLayer: invalid layer handle.\n");
        return 1;
    }

#endif

    MAINWINDOW_LX = 0;
    MAINWINDOW_TY = 0;
    MAINWINDOW_RX = g_rcScr.right;
    MAINWINDOW_BY = g_rcScr.bottom;
	
	if (!InitMiniGUIExt ())
        return 2;
		
    CreateInfo.dwStyle = WS_VISIBLE | WS_BORDER | WS_CAPTION;
    CreateInfo.dwExStyle = WS_EX_NONE;
    CreateInfo.spCaption = "Picture Viewer";
    CreateInfo.hMenu = 0;
    CreateInfo.hCursor = GetSystemCursor(0);
    CreateInfo.hIcon = 0;
    CreateInfo.MainWindowProc = ViewWinProc;
    CreateInfo.lx = MAINWINDOW_LX;
    CreateInfo.ty = MAINWINDOW_TY;
    CreateInfo.rx = MAINWINDOW_RX;
    CreateInfo.by = MAINWINDOW_BY;
    CreateInfo.iBkColor = COLOR_lightwhite;
    CreateInfo.dwAddData = 0;
    CreateInfo.hHosting = HWND_DESKTOP;
	
    hMainWnd = CreateMainWindow (&CreateInfo);
	
    if (hMainWnd == HWND_INVALID)
        return 3;

    ShowWindow(hMainWnd, SW_SHOWNORMAL);

    while (GetMessage(&Msg, hMainWnd)) {
        TranslateMessage(&Msg);
        DispatchMessage(&Msg);
    }

    MainWindowThreadCleanup (hMainWnd);

	MiniGUIExtCleanUp ();
		
    return 0;
}

#ifndef _LITE_VERSION
#include <minigui/dti.c>
#endif