ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/AmigaOS/clip_amiga.cpp
Revision: 1.5
Committed: 2001-02-02T20:52:57Z (23 years, 4 months ago) by cebix
Branch: MAIN
CVS Tags: snapshot-17022001, snapshot-29052001, release-0_9-1
Changes since 1.4: +1 -1 lines
Log Message:
- bumped version number to 0.9
- updated copyright dates

File Contents

# Content
1 /*
2 * clip_amiga.cpp - Clipboard handling, AmigaOS implementation
3 *
4 * Basilisk II (C) 1997-2001 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 #include <proto/exec.h>
27 #include <proto/iffparse.h>
28
29 #include "clip.h"
30 #include "prefs.h"
31
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 static bool no_clip_conversion;
41
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 no_clip_conversion = PrefsFindBool("noclipconversion");
71
72 // 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 c = 10;
125 } else if (!no_clip_conversion)
126 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 }