src/AmigaOS/clip_amiga.cpp

/*
 *  clip_amiga.cpp - Clipboard handling, AmigaOS implementation
 *
 *  Basilisk II (C) 1997-1999 Christian Bauer
 *
 *  This program 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 program 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 program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include <exec/types.h>
#include <libraries/iffparse.h>
#include <devices/clipboard.h>
#include <proto/exec.h>
#include <proto/iffparse.h>

#include "sysdeps.h"
#include "clip.h"

#define DEBUG 0
#include "debug.h"


// Global variables
static struct IFFHandle *iffw = NULL;
static struct ClipboardHandle *ch = NULL;
static bool clipboard_open = false;


// Conversion tables
static const uint8 mac2iso[0x80] = {
        0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1,
        0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8,
        0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3,
        0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc,
        0x2b, 0xb0, 0xa2, 0xa3, 0xa7, 0xb7, 0xb6, 0xdf,
        0xae, 0xa9, 0x20, 0xb4, 0xa8, 0x23, 0xc6, 0xd8,
        0x20, 0xb1, 0x3c, 0x3e, 0xa5, 0xb5, 0xf0, 0x53,
        0x50, 0x70, 0x2f, 0xaa, 0xba, 0x4f, 0xe6, 0xf8,
        0xbf, 0xa1, 0xac, 0x2f, 0x66, 0x7e, 0x44, 0xab,
        0xbb, 0x2e, 0x20, 0xc0, 0xc3, 0xd5, 0x4f, 0x6f,
        0x2d, 0x2d, 0x22, 0x22, 0x60, 0x27, 0xf7, 0x20,
        0xff, 0x59, 0x2f, 0xa4, 0x3c, 0x3e, 0x66, 0x66,
        0x23, 0xb7, 0x2c, 0x22, 0x25, 0xc2, 0xca, 0xc1,
        0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4,
        0x20, 0xd2, 0xda, 0xdb, 0xd9, 0x69, 0x5e, 0x7e,
        0xaf, 0x20, 0xb7, 0xb0, 0xb8, 0x22, 0xb8, 0x20
};


/*
 *  Initialization
 */

void ClipInit(void)
{
        // Create clipboard IFF handle
        iffw = AllocIFF();
        if (iffw) {
                ch = OpenClipboard(PRIMARY_CLIP);
                if (ch) {
                        iffw->iff_Stream = (ULONG)ch;
                        InitIFFasClip(iffw);
                        clipboard_open = true;
                }
        }
}


/*
 *  Deinitialization
 */

void ClipExit(void)
{
        if (ch)
                CloseClipboard(ch);
        if (iffw)
                FreeIFF(iffw);
}


/*
 *  Mac application wrote to clipboard
 */

void PutScrap(uint32 type, void *scrap, int32 length)
{
        D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length));
        if (length <= 0 || !clipboard_open)
                return;

        switch (type) {
                case 'TEXT': {
                        D(bug(" clipping TEXT\n"));

                        // Open IFF stream
                        if (OpenIFF(iffw, IFFF_WRITE))
                                break;

                        // Convert text from Mac charset to ISO-Latin1
                        uint8 *buf = new uint8[length];
                        uint8 *p = (uint8 *)scrap;
                        uint8 *q = buf;
                        for (int i=0; i<length; i++) {
                                uint8 c = *p++;
                                if (c < 0x80) {
                                        if (c == 13)    // CR -> LF
                                                c = 10;
                                } else
                                        c = mac2iso[c & 0x7f];
                                *q++ = c;
                        }

                        // Write text
                        if (!PushChunk(iffw, 'FTXT', 'FORM', IFFSIZE_UNKNOWN)) {
                                if (!PushChunk(iffw, 0, 'CHRS', IFFSIZE_UNKNOWN)) {
                                        WriteChunkBytes(iffw, scrap, length);
                                        PopChunk(iffw);
                                }
                                PopChunk(iffw);
                        }

                        // Close IFF stream
                        CloseIFF(iffw);
                        delete[] buf;
                        break;
                }
        }
}
Revision:	1.2
Committed:	1999-10-12T20:00:48Z (25 years, 1 month ago) by cebix
Branch:	MAIN
CVS Tags:	snapshot-21101999, snapshot-22121999, release-0_8-1, snapshot-02111999
Changes since 1.1:	+1 -1 lines
Log Message:	- disk insertions are now checked for by the 60Hz interrupt routine - localizable strings are split into a common and a platform-specific set - fixed bug in CR->LF translation in AmigaOS/clip_amiga.cpp
#	User	Rev	Content
1	cebix	1.1	/*
2			* clip_amiga.cpp - Clipboard handling, AmigaOS implementation
3			*
4			* Basilisk II (C) 1997-1999 Christian Bauer
5			*
6			* This program is free software; you can redistribute it and/or modify
7			* it under the terms of the GNU General Public License as published by
8			* the Free Software Foundation; either version 2 of the License, or
9			* (at your option) any later version.
10			*
11			* This program is distributed in the hope that it will be useful,
12			* but WITHOUT ANY WARRANTY; without even the implied warranty of
13			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14			* GNU General Public License for more details.
15			*
16			* You should have received a copy of the GNU General Public License
17			* along with this program; if not, write to the Free Software
18			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19			*/
20
21			#include <exec/types.h>
22			#include <libraries/iffparse.h>
23			#include <devices/clipboard.h>
24			#include <proto/exec.h>
25			#include <proto/iffparse.h>
26
27			#include "sysdeps.h"
28			#include "clip.h"
29
30			#define DEBUG 0
31			#include "debug.h"
32
33
34			// Global variables
35			static struct IFFHandle *iffw = NULL;
36			static struct ClipboardHandle *ch = NULL;
37			static bool clipboard_open = false;
38
39
40			// Conversion tables
41			static const uint8 mac2iso[0x80] = {
42			0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1,
43			0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8,
44			0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3,
45			0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc,
46			0x2b, 0xb0, 0xa2, 0xa3, 0xa7, 0xb7, 0xb6, 0xdf,
47			0xae, 0xa9, 0x20, 0xb4, 0xa8, 0x23, 0xc6, 0xd8,
48			0x20, 0xb1, 0x3c, 0x3e, 0xa5, 0xb5, 0xf0, 0x53,
49			0x50, 0x70, 0x2f, 0xaa, 0xba, 0x4f, 0xe6, 0xf8,
50			0xbf, 0xa1, 0xac, 0x2f, 0x66, 0x7e, 0x44, 0xab,
51			0xbb, 0x2e, 0x20, 0xc0, 0xc3, 0xd5, 0x4f, 0x6f,
52			0x2d, 0x2d, 0x22, 0x22, 0x60, 0x27, 0xf7, 0x20,
53			0xff, 0x59, 0x2f, 0xa4, 0x3c, 0x3e, 0x66, 0x66,
54			0x23, 0xb7, 0x2c, 0x22, 0x25, 0xc2, 0xca, 0xc1,
55			0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4,
56			0x20, 0xd2, 0xda, 0xdb, 0xd9, 0x69, 0x5e, 0x7e,
57			0xaf, 0x20, 0xb7, 0xb0, 0xb8, 0x22, 0xb8, 0x20
58			};
59
60
61			/*
62			* Initialization
63			*/
64
65			void ClipInit(void)
66			{
67			// Create clipboard IFF handle
68			iffw = AllocIFF();
69			if (iffw) {
70			ch = OpenClipboard(PRIMARY_CLIP);
71			if (ch) {
72			iffw->iff_Stream = (ULONG)ch;
73			InitIFFasClip(iffw);
74			clipboard_open = true;
75			}
76			}
77			}
78
79
80			/*
81			* Deinitialization
82			*/
83
84			void ClipExit(void)
85			{
86			if (ch)
87			CloseClipboard(ch);
88			if (iffw)
89			FreeIFF(iffw);
90			}
91
92
93			/*
94			* Mac application wrote to clipboard
95			*/
96
97			void PutScrap(uint32 type, void *scrap, int32 length)
98			{
99			D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length));
100			if (length <= 0 \|\| !clipboard_open)
101			return;
102
103			switch (type) {
104			case 'TEXT': {
105			D(bug(" clipping TEXT\n"));
106
107			// Open IFF stream
108			if (OpenIFF(iffw, IFFF_WRITE))
109			break;
110
111			// Convert text from Mac charset to ISO-Latin1
112			uint8 *buf = new uint8[length];
113			uint8 p = (uint8 )scrap;
114			uint8 *q = buf;
115			for (int i=0; i<length; i++) {
116			uint8 c = *p++;
117			if (c < 0x80) {
118			if (c == 13) // CR -> LF
119	cebix	1.2	c = 10;
120	cebix	1.1	} else
121			c = mac2iso[c & 0x7f];
122			*q++ = c;
123			}
124
125			// Write text
126			if (!PushChunk(iffw, 'FTXT', 'FORM', IFFSIZE_UNKNOWN)) {
127			if (!PushChunk(iffw, 0, 'CHRS', IFFSIZE_UNKNOWN)) {
128			WriteChunkBytes(iffw, scrap, length);
129			PopChunk(iffw);
130			}
131			PopChunk(iffw);
132			}
133
134			// Close IFF stream
135			CloseIFF(iffw);
136			delete[] buf;
137			break;
138			}
139			}
140			}