picview.c

MDE 图形引擎

/*
** $Id: picview.c,v 1.8 2003/08/15 08:45:46 weiym 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;
	FILEITEM          *temp;
	head           = NULL;
	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