ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/AmigaOS/clip_amiga.cpp
Revision: 1.7
Committed: 2002-06-23T08:27:05Z (22 years ago) by jlachmann
Branch: MAIN
CVS Tags: nigel-build-12, nigel-build-13, nigel-build-16, nigel-build-15
Changes since 1.6: +4 -1 lines
Log Message:
Adapted to OO video scheme; Audio volume/muting/sample rate now settable

File Contents

# User Rev Content
1 cebix 1.1 /*
2     * clip_amiga.cpp - Clipboard handling, AmigaOS implementation
3     *
4 jlachmann 1.7 * Basilisk II (C) 1997-2001 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 jlachmann 1.7 #define __USE_SYSBASE
27 cebix 1.1 #include <proto/exec.h>
28     #include <proto/iffparse.h>
29 jlachmann 1.7 #include <inline/exec.h>
30     #include <inline/iffparse.h>
31 cebix 1.1
32     #include "clip.h"
33 cebix 1.4 #include "prefs.h"
34 cebix 1.1
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 cebix 1.4 static bool no_clip_conversion;
44 cebix 1.1
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 cebix 1.4 no_clip_conversion = PrefsFindBool("noclipconversion");
74    
75 cebix 1.1 // 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 wrote to clipboard
103     */
104    
105     void PutScrap(uint32 type, void *scrap, int32 length)
106     {
107     D(bug("PutScrap type %08lx, data %08lx, length %ld\n", type, scrap, length));
108     if (length <= 0 || !clipboard_open)
109     return;
110    
111     switch (type) {
112     case 'TEXT': {
113     D(bug(" clipping TEXT\n"));
114    
115     // Open IFF stream
116     if (OpenIFF(iffw, IFFF_WRITE))
117     break;
118    
119     // Convert text from Mac charset to ISO-Latin1
120     uint8 *buf = new uint8[length];
121     uint8 *p = (uint8 *)scrap;
122     uint8 *q = buf;
123     for (int i=0; i<length; i++) {
124     uint8 c = *p++;
125     if (c < 0x80) {
126     if (c == 13) // CR -> LF
127 cebix 1.2 c = 10;
128 cebix 1.4 } else if (!no_clip_conversion)
129 cebix 1.1 c = mac2iso[c & 0x7f];
130     *q++ = c;
131     }
132    
133     // Write text
134     if (!PushChunk(iffw, 'FTXT', 'FORM', IFFSIZE_UNKNOWN)) {
135     if (!PushChunk(iffw, 0, 'CHRS', IFFSIZE_UNKNOWN)) {
136     WriteChunkBytes(iffw, scrap, length);
137     PopChunk(iffw);
138     }
139     PopChunk(iffw);
140     }
141    
142     // Close IFF stream
143     CloseIFF(iffw);
144     delete[] buf;
145     break;
146     }
147     }
148     }