clipboard.h File Reference

#include <Windows.h>
#include <Windowsx.h>
#include "wcommon.h"
#include "stack-c.h"

Include dependency graph for clipboard.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions
BOOL	IsWindowInterface (void)
void	Callback_EMPTYCLIPBOARD (void)
void	Callback_MCOPY (void)
void	Callback_PASTE (void)
void	CreateThreadPaste (char *Text)
BOOL	IsReadyForAnewLign (void)
void	SetReadyOrNotForAnewLign (BOOL Ready)
DWORD WINAPI	SendInputText (LPVOID lpParam)
void	PasteFunction (LPTW lptw, BOOL special)
BOOL	IsEmptyClipboard (LPTW lptw)
void	TextCopyClip (LPTW lptw)
void	CleanClipboard (LPTW lptw)
char *	GetTextFromClipboard (LPTW lptw)
void	PutTextInClipboard (LPTW lptw, char *Text)
HANDLE	GetHandleThreadPaste (void)
BOOL	GetThreadPasteRunning (void)
void	SetThreadPasteRunning (BOOL Running)

---

Function Documentation

void Callback_EMPTYCLIPBOARD

(

void

)

Definition at line 620 of file wmenu.c.

Referenced by InterfaceWindowsClipboard(), and SendMacro().

{
        LPTW lptw=GetTextWinScilab();
        CleanClipboard(lptw);

}

Here is the caller graph for this function:

void Callback_MCOPY

(

void

)

Definition at line 315 of file wmenu.c.

Referenced by InterfaceWindowsClipboard(), and SendMacro().

{
        LPTW lptw=GetTextWinScilab();
        
        if ( HasAZoneTextSelected(lptw) == TRUE )TextCopyClip (lptw);
        else 
        {
                if (lptw->lpmw->CodeLanguage == 0)
                {
                        MessageBox(lptw->hWndParent,MSG_SCIMSG40,MSG_SCIMSG42,MB_ICONINFORMATION);
                }
                else
                {
                        MessageBox(lptw->hWndParent,MSG_SCIMSG41,MSG_SCIMSG42,MB_ICONINFORMATION);
                }
        }
}

Here is the caller graph for this function:

void Callback_PASTE

(

void

)

Definition at line 333 of file wmenu.c.

Referenced by InterfaceWindowsClipboard(), and SendMacro().

{
        LPTW lptw=GetTextWinScilab();
        
        if ( !IsEmptyClipboard(lptw) ) PasteFunction(lptw,FALSE);
        else 
        {
                if (lptw->lpmw->CodeLanguage == 0)
                {
                        MessageBox(lptw->hWndParent,MSG_SCIMSG43,MSG_SCIMSG42,MB_ICONINFORMATION);
                }
                else
                {
                        MessageBox(lptw->hWndParent,MSG_SCIMSG44,MSG_SCIMSG42,MB_ICONINFORMATION);
                }
        }
}

Here is the caller graph for this function:

void CleanClipboard

(

LPTW

lptw

)

Definition at line 276 of file clipboard.c.

{
        if (ThreadPasteRunning)
        {
                SuspendThread(hThreadPaste);
                TerminateThread(hThreadPaste,1);
        ThreadPasteRunning=FALSE;
        CloseHandle( hThreadPaste );
        }

        OpenClipboard(lptw->hWndParent);
        EmptyClipboard();
        CloseClipboard();
}

void CreateThreadPaste

(

char *

Text

)

Definition at line 28 of file clipboard.c.

{
        DWORD IdThreadPaste;
        PasteForThread=(char*)MALLOC( (strlen(Text)+1)*sizeof(char));
        strcpy(PasteForThread,Text);
        PasteForThread[strlen(PasteForThread)]='\0';
        /* PasteForThread défini en global car passage via CreateThread plante sous Win98 */
        hThreadPaste=CreateThread(NULL,0,(LPTHREAD_START_ROUTINE)SendInputText,NULL,0,(LPDWORD)&IdThreadPaste);
        
}

HANDLE GetHandleThreadPaste

(

void

)

Definition at line 291 of file clipboard.c.

{
        return hThreadPaste;
}

char* GetTextFromClipboard

(

LPTW

lptw

)

Definition at line 847 of file clipboard.c.

References hdc, tagTW::hfont, tagTW::hWndText, MALLOC, NULL, TEXTMETRIC, TryToGetDC(), type, and UINT.

Referenced by InterfaceWindowsClipboard().

{
        char *Text=NULL;

        HDC hdc;
        HGLOBAL hGMem;
        TEXTMETRIC tm;
        UINT type;
        LPSTR lpMem; /* Pointeur sur la chaine du clipboard */
        
        
        /* find out what type to get from clipboard */
        hdc = (HDC)TryToGetDC (lptw->hWndText);
        SelectObject(hdc, lptw->hfont);
        GetTextMetrics(hdc,(TEXTMETRIC FAR *)&tm);
        if (tm.tmCharSet == OEM_CHARSET) type = CF_OEMTEXT;
        else type = CF_TEXT;
        ReleaseDC (lptw->hWndText, hdc);
        
        /* now get it from clipboard */
        OpenClipboard (lptw->hWndText);
        hGMem = GetClipboardData (type);
        
        if (hGMem)
                {
                        lpMem  = GlobalLock( hGMem );
                        Text= (char*) MALLOC (sizeof(char)*(strlen(lpMem)+1));
                        strcpy(Text,lpMem);
                        GlobalUnlock (hGMem);
                }
        CloseClipboard ();

        return Text;
}

Here is the call graph for this function:

Here is the caller graph for this function:

BOOL GetThreadPasteRunning

(

void

)

Definition at line 296 of file clipboard.c.

{
        return ThreadPasteRunning;
}

BOOL IsEmptyClipboard

(

LPTW

lptw

)

Definition at line 167 of file clipboard.c.

{
        BOOL Retour=TRUE;
        HDC hdc;
        HGLOBAL hGMem;
        TEXTMETRIC tm;
        UINT type;
        LPSTR lpMem=NULL; /* Pointeur sur la chaine du clipboard */
        

        /* find out what type to get from clipboard */
        hdc = (HDC)TryToGetDC (lptw->hWndText);
        SelectObject(hdc, lptw->hfont);
        GetTextMetrics(hdc,(TEXTMETRIC FAR *)&tm);
        if (tm.tmCharSet == OEM_CHARSET) type = CF_OEMTEXT;
        else type = CF_TEXT;
        ReleaseDC (lptw->hWndText, hdc);
        
        /* now get it from clipboard */
        OpenClipboard (lptw->hWndText);
        hGMem = GetClipboardData (type);
        
        if (hGMem)
                {
                        lpMem  = GlobalLock( hGMem );
                        if (lpMem==NULL) Retour=TRUE;
                        else Retour=FALSE;
                        GlobalUnlock (hGMem);
                }
        CloseClipboard ();
        
        return Retour;
}

BOOL IsReadyForAnewLign

(

void

)

Definition at line 39 of file clipboard.c.

{
        return ReadyForAnewLign;
}

BOOL IsWindowInterface

(

void

)

Definition at line 127 of file WinConsole.c.

{
        return WindowMode;
}

void PasteFunction	(	LPTW	lptw,
		BOOL	special
	)

Definition at line 132 of file clipboard.c.

{
        HDC hdc;
        HGLOBAL hGMem;
        TEXTMETRIC tm;
        UINT type;
        LPSTR lpMem; /* Pointeur sur la chaine du clipboard */
        
        SpecialPaste=special;   
        /* find out what type to get from clipboard */
        hdc = (HDC)TryToGetDC (lptw->hWndText);
        SelectObject(hdc, lptw->hfont);
        GetTextMetrics(hdc,(TEXTMETRIC FAR *)&tm);
        if (tm.tmCharSet == OEM_CHARSET) type = CF_OEMTEXT;
        else type = CF_TEXT;
        ReleaseDC (lptw->hWndText, hdc);
        
        /* now get it from clipboard */
        OpenClipboard (lptw->hWndText);
        hGMem = GetClipboardData (type);
        
        if (hGMem)
                {
                        lpMem  = GlobalLock( hGMem );
                        if (!ThreadPasteRunning) SendMessage(lptw->hWndText, WM_SETTEXT, 0,(LPARAM) lpMem);
                        GlobalUnlock (hGMem);
                }
        CloseClipboard ();
}

void PutTextInClipboard	(	LPTW	lptw,
		char *	Text
	)

Definition at line 882 of file clipboard.c.

References hdc, tagTW::hfont, tagTW::hWndParent, tagTW::hWndText, NULL, size, TEXTMETRIC, TryToGetDC(), type, and UINT.

Referenced by InterfaceWindowsClipboard().

{
        int size;
        HGLOBAL hGMem;
        LPSTR cbuf;
        
        TEXTMETRIC tm;
        UINT type;
        HDC hdc;

        size=strlen(Text)+1;

        hGMem = GlobalAlloc(GMEM_MOVEABLE, (DWORD)size);
        cbuf = (LPSTR)GlobalLock(hGMem);
        if (cbuf == (LPSTR)NULL) return;
        strcpy(cbuf,Text);

        /* find out what type to put into clipboard */
        hdc = (HDC)TryToGetDC(lptw->hWndText);
        SelectObject(hdc, lptw->hfont);
        GetTextMetrics(hdc,(TEXTMETRIC FAR *)&tm);
        if (tm.tmCharSet == OEM_CHARSET)
                type = CF_OEMTEXT;
        else
                type = CF_TEXT;
        ReleaseDC(lptw->hWndText, hdc);

        /* give buffer to clipboard */
        OpenClipboard(lptw->hWndParent);
        EmptyClipboard();
        SetClipboardData(type, hGMem);
        CloseClipboard();
}

Here is the call graph for this function:

Here is the caller graph for this function:

DWORD WINAPI SendInputText

(

LPVOID

lpParam

)

Definition at line 49 of file clipboard.c.

{
        #define TEMPOTOUCHE  1
        int lg=0;
        int i=0;
        
        char *TextToSend=NULL;
        
        LPTW lptw=GetTextWinScilab();
        
        ThreadPasteRunning=TRUE;
        
        lg=strlen((char*)PasteForThread)+1;
        TextToSend=(char*)MALLOC(lg*sizeof(char));
        strcpy(TextToSend,(char*)PasteForThread);
        TextToSend[strlen(TextToSend)]='\0';

        FREE(PasteForThread);
        PasteForThread=NULL;

        //if (SpecialPaste==TRUE)CleanPromptFromText(TextToSend); /* Desactiver pour le moment */
                
        while ( C2F (ismenu) () == 1 ) {Sleep(TEMPOTOUCHE);}
        /* Il n'y a plus rien dans la queue des commandes */
        while ( lptw->bGetCh == FALSE ) {Sleep(TEMPOTOUCHE);}
        /* Nous sommes au prompt */
        
        
        lg=strlen(TextToSend);
        i=0;
        while(i<lg)
        {
                long count;
                
                
                count = lptw->KeyBufIn - lptw->KeyBufOut;
                        
                if (count < 0) count = count+lptw->KeyBufSize;
                if (count < (long) (lptw->KeyBufSize-1)) 
                        {
                                if (TextToSend[i] == '\t') *lptw->KeyBufIn++ = ' ';
                                else *lptw->KeyBufIn++ = TextToSend[i];
                                if (lptw->KeyBufIn - lptw->KeyBuf >= (signed)lptw->KeyBufSize)
                                lptw->KeyBufIn = lptw->KeyBuf;  /* wrap around */
                        }
        
                if (TextToSend[i]==10) 
                        {
                                /* LF not preceded by a CR */
                                /* fool it: turn LF into CR */
                                /* Bug 1960 corrected - Francois VOGEL June 2006 */
                                *lptw->KeyBufIn = 13;
                                SetReadyOrNotForAnewLign(FALSE);
                                while ( IsReadyForAnewLign() == FALSE ) {Sleep(TEMPOTOUCHE);}
                                while ( C2F (ismenu) () == 1 ) {Sleep(TEMPOTOUCHE);}
                                while ( lptw->bGetCh == FALSE ) {Sleep(TEMPOTOUCHE);}
                        }
                if (TextToSend[i]==13) 
                        {
                                SetReadyOrNotForAnewLign(FALSE);
                                while ( IsReadyForAnewLign() == FALSE ) {Sleep(TEMPOTOUCHE);}
                                while ( C2F (ismenu) () == 1 ) {Sleep(TEMPOTOUCHE);}
                                while ( lptw->bGetCh == FALSE ) {Sleep(TEMPOTOUCHE);}
                                if (i<lg-1)
                                {
                                        /* skip LF that follows CR*/
                                        if (TextToSend[i+1]==10) i++;
                                }
                        }
                i++;    
                
        }

        
        FREE(TextToSend);
        TextToSend=NULL;
        ThreadPasteRunning=FALSE;
        CloseHandle( hThreadPaste );
        
        return 0;       
}

void SetReadyOrNotForAnewLign

(

BOOL

Ready

)

Definition at line 44 of file clipboard.c.

{
        ReadyForAnewLign=Ready;
}

void SetThreadPasteRunning

(

BOOL

Running

)

Definition at line 301 of file clipboard.c.

{
        ThreadPasteRunning=Running;
}

void TextCopyClip

(

LPTW

lptw

)

Definition at line 206 of file clipboard.c.

{
        int size, count;
        HGLOBAL hGMem;
        LPSTR cbuf, cp;
        POINT pt, end;
        TEXTMETRIC tm;
        UINT type;
        HDC hdc;

        if ((lptw->MarkBegin.x == lptw->MarkEnd.x) && 
            (lptw->MarkBegin.y == lptw->MarkEnd.y) ) {
                /* copy user text */
                return;
        }

        size = (lptw->MarkEnd.y - lptw->MarkBegin.y + 1) 
                * (lptw->ScreenSize.x + 2) + 1;
        hGMem = GlobalAlloc(GMEM_MOVEABLE, (DWORD)size);
        cbuf = cp = (LPSTR)GlobalLock(hGMem);
        if (cp == (LPSTR)NULL)
                return;
        
        pt.x = lptw->MarkBegin.x;
        pt.y = lptw->MarkBegin.y;
        end.x   = lptw->MarkEnd.x;
        end.y   = lptw->MarkEnd.y;

        while (pt.y < end.y) {
                /* copy to global buffer */
                count = lptw->ScreenSize.x - pt.x;
                _fmemcpy(cp, lptw->ScreenBuffer + lptw->ScreenSize.x*pt.y+pt.x, count);
                /* remove trailing spaces */
                for (count=count-1; count>=0; count--) {
                        if (cp[count]!=' ')
                                break;
                        cp[count] = '\0';
                }
                cp[++count] = '\r';
                cp[++count] = '\n';
                cp[++count] = '\0';
                cp += count;
                pt.y++;
                pt.x=0;
        }
        /* partial line */
        count = end.x - pt.x;
        if (end.y != lptw->ScreenSize.y) {
                _fmemcpy(cp, lptw->ScreenBuffer + lptw->ScreenSize.x*pt.y+pt.x, count);
                cp[count] = '\0';
        }
        size = _fstrlen(cbuf) + 1;
        GlobalUnlock(hGMem);
        hGMem = GlobalReAlloc(hGMem, (DWORD)size, GMEM_MOVEABLE);
        /* find out what type to put into clipboard */
        hdc = (HDC)TryToGetDC(lptw->hWndText);
        SelectObject(hdc, lptw->hfont);
        GetTextMetrics(hdc,(TEXTMETRIC FAR *)&tm);
        if (tm.tmCharSet == OEM_CHARSET)
                type = CF_OEMTEXT;
        else
                type = CF_TEXT;
        ReleaseDC(lptw->hWndText, hdc);
        /* give buffer to clipboard */
        OpenClipboard(lptw->hWndParent);
        EmptyClipboard();
        SetClipboardData(type, hGMem);
        CloseClipboard();
}

---