ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/AmigaOS/clip_amiga.cpp
Revision: 1.9
Committed: 2008-01-01T09:40:31Z (16 years, 4 months ago) by gbeauche
Branch: MAIN
CVS Tags: HEAD
Changes since 1.8: +1 -1 lines
Log Message:
Happy New Year!

File Contents

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