src/AmigaOS/clip_amiga.cpp

/*
 *  clip_amiga.cpp - Clipboard handling, AmigaOS implementation
 *
 *  Basilisk II (C) 1997-2002 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 "sysdeps.h"

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

#include "clip.h"
#include "prefs.h"

#define DEBUG 0
#include "debug.h"


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


// 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)
{
        no_clip_conversion = PrefsFindBool("noclipconversion");

        // 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 if (!no_clip_conversion)
                                        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.6
Committed:	2002-01-15T14:58:34Z (22 years, 10 months ago) by cebix
Branch:	MAIN
CVS Tags:	snapshot-15012002
Changes since 1.5:	+1 -1 lines
Log Message:	- documentation updates - 2001 -> 2002 - version 0.9 -> 1.0
#	User	Rev	Content
1	cebix	1.1	/*
2			* clip_amiga.cpp - Clipboard handling, AmigaOS implementation
3			*
4	cebix	1.6	* Basilisk II (C) 1997-2002 Christian Bauer
5	cebix	1.1	*
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	cebix	1.4	#include "sysdeps.h"
22
23	cebix	1.1	#include <exec/types.h>
24			#include <libraries/iffparse.h>
25			#include <devices/clipboard.h>
26			#include <proto/exec.h>
27			#include <proto/iffparse.h>
28
29			#include "clip.h"
30	cebix	1.4	#include "prefs.h"
31	cebix	1.1
32			#define DEBUG 0
33			#include "debug.h"
34
35
36			// Global variables
37			static struct IFFHandle *iffw = NULL;
38			static struct ClipboardHandle *ch = NULL;
39			static bool clipboard_open = false;
40	cebix	1.4	static bool no_clip_conversion;
41	cebix	1.1
42
43			// Conversion tables
44			static const uint8 mac2iso[0x80] = {
45			0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1,
46			0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8,
47			0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3,
48			0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc,
49			0x2b, 0xb0, 0xa2, 0xa3, 0xa7, 0xb7, 0xb6, 0xdf,
50			0xae, 0xa9, 0x20, 0xb4, 0xa8, 0x23, 0xc6, 0xd8,
51			0x20, 0xb1, 0x3c, 0x3e, 0xa5, 0xb5, 0xf0, 0x53,
52			0x50, 0x70, 0x2f, 0xaa, 0xba, 0x4f, 0xe6, 0xf8,
53			0xbf, 0xa1, 0xac, 0x2f, 0x66, 0x7e, 0x44, 0xab,
54			0xbb, 0x2e, 0x20, 0xc0, 0xc3, 0xd5, 0x4f, 0x6f,
55			0x2d, 0x2d, 0x22, 0x22, 0x60, 0x27, 0xf7, 0x20,
56			0xff, 0x59, 0x2f, 0xa4, 0x3c, 0x3e, 0x66, 0x66,
57			0x23, 0xb7, 0x2c, 0x22, 0x25, 0xc2, 0xca, 0xc1,
58			0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4,
59			0x20, 0xd2, 0xda, 0xdb, 0xd9, 0x69, 0x5e, 0x7e,
60			0xaf, 0x20, 0xb7, 0xb0, 0xb8, 0x22, 0xb8, 0x20
61			};
62
63
64			/*
65			* Initialization
66			*/
67
68			void ClipInit(void)
69			{
70	cebix	1.4	no_clip_conversion = PrefsFindBool("noclipconversion");
71
72	cebix	1.1	// Create clipboard IFF handle
73			iffw = AllocIFF();
74			if (iffw) {
75			ch = OpenClipboard(PRIMARY_CLIP);
76			if (ch) {
77			iffw->iff_Stream = (ULONG)ch;
78			InitIFFasClip(iffw);
79			clipboard_open = true;
80			}
81			}
82			}
83
84
85			/*
86			* Deinitialization
87			*/
88
89			void ClipExit(void)
90			{
91			if (ch)
92			CloseClipboard(ch);
93			if (iffw)
94			FreeIFF(iffw);
95			}
96
97
98			/*
99			* Mac application wrote to clipboard
100			*/
101
102			void PutScrap(uint32 type, void *scrap, int32 length)
103			{
104			D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length));
105			if (length <= 0 \|\| !clipboard_open)
106			return;
107
108			switch (type) {
109			case 'TEXT': {
110			D(bug(" clipping TEXT\n"));
111
112			// Open IFF stream
113			if (OpenIFF(iffw, IFFF_WRITE))
114			break;
115
116			// Convert text from Mac charset to ISO-Latin1
117			uint8 *buf = new uint8[length];
118			uint8 p = (uint8 )scrap;
119			uint8 *q = buf;
120			for (int i=0; i<length; i++) {
121			uint8 c = *p++;
122			if (c < 0x80) {
123			if (c == 13) // CR -> LF
124	cebix	1.2	c = 10;
125	cebix	1.4	} else if (!no_clip_conversion)
126	cebix	1.1	c = mac2iso[c & 0x7f];
127			*q++ = c;
128			}
129
130			// Write text
131			if (!PushChunk(iffw, 'FTXT', 'FORM', IFFSIZE_UNKNOWN)) {
132			if (!PushChunk(iffw, 0, 'CHRS', IFFSIZE_UNKNOWN)) {
133			WriteChunkBytes(iffw, scrap, length);
134			PopChunk(iffw);
135			}
136			PopChunk(iffw);
137			}
138
139			// Close IFF stream
140			CloseIFF(iffw);
141			delete[] buf;
142			break;
143			}
144			}
145			}