src/BeOS/clip_beos.cpp

/*
 *  clip_beos.cpp - Clipboard handling, BeOS implementation
 *
 *  SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig
 *
 *  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 <support/UTF8.h>

#include "clip.h"
#include "main.h"
#include "cpu_emulation.h"
#include "emul_op.h"

#define DEBUG 0
#include "debug.h"


// Global variables
static bool we_put_this_data = false;   // Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the Be side
static BTranslatorRoster *roster;
static float input_cap = 0;
static translator_info input_info;
static float output_cap = 0;
static translator_id output_trans = 0;


/*
 *  Clipboard manager thread (for calling clipboard functions; this is not safe
 *  under R4 when running on the MacOS stack in kernel space)
 */

// Message constants
const uint32 MSG_QUIT_CLIP_MANAGER = 'quit';
const uint32 MSG_PUT_TEXT = 'ptxt';

static thread_id cm_thread = -1;
static sem_id cm_done_sem = -1;

// Argument passing
static void *cm_scrap;
static int32 cm_length;

static status_t clip_manager(void *arg)
{
        for (;;) {

                // Receive message
                thread_id sender;
                uint32 code = receive_data(&sender, NULL, 0);
                D(bug("Clipboard manager received %08lx\n", code));
                switch (code) {
                        case MSG_QUIT_CLIP_MANAGER:
                                return 0;

                        case MSG_PUT_TEXT:
                                if (be_clipboard->Lock()) {
                                        be_clipboard->Clear();
                                        BMessage *clipper = be_clipboard->Data(); 
        
                                        // Convert text from Mac charset to UTF-8
                                        int32 dest_length = cm_length * 3;
                                        int32 state = 0;
                                        char *inbuf = new char[cm_length];
                                        memcpy(inbuf, cm_scrap, cm_length);     // Copy to user space
                                        char *outbuf = new char[dest_length];
                                        if (convert_to_utf8(B_MAC_ROMAN_CONVERSION, inbuf, &cm_length, outbuf, &dest_length, &state) == B_OK) {
                                                for (int i=0; i<dest_length; i++)
                                                        if (outbuf[i] == 13)
                                                                outbuf[i] = 10;
                
                                                // Add text to Be clipboard
                                                clipper->AddData("text/plain", B_MIME_TYPE, outbuf, dest_length); 
                                                be_clipboard->Commit();
                                        } else {
                                                D(bug(" text conversion failed\n"));
                                        }
                                        delete[] outbuf;
                                        delete[] inbuf;
                                        be_clipboard->Unlock();
                                }
                                break;
                }

                // Acknowledge
                release_sem(cm_done_sem);
        }
}


/*
 *  Initialize clipboard
 */

void ClipInit(void)
{
        // check if there is a translator that can handle the pict datatype
        roster = BTranslatorRoster::Default(); 
        int32 num_translators, i,j; 
        translator_id *translators; 
        const char *translator_name, *trans_info; 
        int32 translator_version; 
        const translation_format *t_formats;
        long t_num;
           
        roster->GetAllTranslators(&translators, &num_translators); 
        for (i=0;i<num_translators;i++) { 
                roster->GetTranslatorInfo(translators[i], &translator_name, 
                        &trans_info, &translator_version); 
                D(bug("found translator %s: %s (%.2f)\n", translator_name, trans_info, 
                        translator_version/100.)); 
                // does this translator support the pict datatype ?
                roster->GetInputFormats(translators[i], &t_formats,&t_num);
                //printf(" supports %d input formats \n",t_num);
                for (j=0;j<t_num;j++) {
                        if (!strcmp (t_formats[j].MIME,"image/pict")) {
                                // matching translator found
                                if (t_formats[j].capability>input_cap) {
                                        input_info.type = t_formats[j].type;
                                        input_info.group = t_formats[j].group;
                                        input_info.quality = t_formats[j].quality;
                                        input_info.capability = t_formats[j].capability;
                                        strcpy(input_info.MIME,t_formats[j].MIME);
                                        strcpy(input_info.name,t_formats[j].name);
                                        input_info.translator=translators[i];
                                        input_cap = t_formats[j].capability;
                                }
                                D(bug("matching input translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n",
                                        t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type,
                                        t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group,
                                        t_formats[j].quality,
                                        t_formats[j].capability,t_formats[j].MIME,
                                        t_formats[j].name));
                        }
                        
                }
                roster->GetOutputFormats(translators[i], &t_formats,&t_num);
                //printf("and %d output formats \n",t_num);
                for (j=0;j<t_num;j++) {
                        if (!strcmp (t_formats[j].MIME,"image/pict")) {
                                if (t_formats[j].capability>output_cap) {
                                        output_trans = translators[i];
                                        output_cap = t_formats[j].capability;
                                }
                                D(bug("matching output translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n",
                                        t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type,
                                        t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group,
                                        t_formats[j].quality,
                                        t_formats[j].capability,t_formats[j].MIME,
                                        t_formats[j].name));
                        }
                }
        } 
        delete [] translators; // clean up our droppings

        // Start clipboard manager thread
        cm_done_sem = create_sem(0, "Clipboard Manager Done");
        cm_thread = spawn_thread(clip_manager, "Clipboard Manager", B_NORMAL_PRIORITY, NULL);
        resume_thread(cm_thread);
}


/*
 *  Deinitialize clipboard
 */

void ClipExit(void)
{
        // Stop clipboard manager
        if (cm_thread > 0) {
                status_t l;
                send_data(cm_thread, MSG_QUIT_CLIP_MANAGER, NULL, 0);
                while (wait_for_thread(cm_thread, &l) == B_INTERRUPTED) ;
        }

        // Delete semaphores
        delete_sem(cm_done_sem);
}


/*
 *  Mac application wrote to clipboard
 */

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

        switch (type) {
                case 'TEXT':
                        D(bug(" clipping TEXT\n"));
                        cm_scrap = scrap;
                        cm_length = length;
                        while (send_data(cm_thread, MSG_PUT_TEXT, NULL, 0) == B_INTERRUPTED) ;
                        while (acquire_sem(cm_done_sem) == B_INTERRUPTED) ;
                        break;

                case 'PICT':
                        D(bug(" clipping PICT\n"));
                        //!! this has to be converted to use the Clipboard Manager
#if 0
                        if (be_clipboard->Lock()) {
                                be_clipboard->Clear();
                                BMessage *clipper = be_clipboard->Data();                               
        // Waaaah! This crashes!
                                if (input_cap > 0) {            // if there is an converter for PICT datatype convert data to bitmap.
                                        BMemoryIO *in_buffer = new BMemoryIO(scrap, length);
                                        BMallocIO *out_buffer = new BMallocIO();
                                        status_t result=roster->Translate(in_buffer,&input_info,NULL,out_buffer,B_TRANSLATOR_BITMAP);
                                        clipper->AddData("image/x-be-bitmap", B_MIME_TYPE, out_buffer->Buffer(), out_buffer->BufferLength());
                                        D(bug("conversion result:%08x buffer_size:%d\n",result,out_buffer->BufferLength()));
                                        delete in_buffer;
                                        delete out_buffer;
                                }
                                clipper->AddData("image/pict", B_MIME_TYPE, scrap, length);
                                be_clipboard->Commit();
                                be_clipboard->Unlock();
                        }
#endif
                        break;
        }
}


/*
 *  Mac application reads clipboard
 */

void GetScrap(void **handle, uint32 type, int32 offset)
{
        M68kRegisters r;
        D(bug("GetScrap handle %p, type %08lx, offset %ld\n", handle, type, offset));
        return; //!! GetScrap is currently broken (should use Clipboard Manager)
                        //!! replace with clipboard notification in BeOS R4.1

        switch (type) {
                case 'TEXT':
                        D(bug(" clipping TEXT\n"));
                        if (be_clipboard->Lock()) {
                                BMessage *clipper = be_clipboard->Data(); 
                                char *clip;
                                ssize_t length;

                                // Check if we already copied this data
                                if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE))
                                        return;
                                bigtime_t cookie = system_time();
                                clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t)); 

                                // No, is there text in it?
                                if (clipper->FindData("text/plain", B_MIME_TYPE, &clip, &length) == B_OK) {
                                        D(bug(" text/plain found\n"));

                                        // Convert text from UTF-8 to Mac charset
                                        int32 src_length = length;
                                        int32 dest_length = length;
                                        int32 state = 0;
                                        char *outbuf = new char[dest_length];
                                        if (convert_from_utf8(B_MAC_ROMAN_CONVERSION, clip, &src_length, outbuf, &dest_length, &state) == B_OK) {
                                                for (int i=0; i<dest_length; i++)
                                                        if (outbuf[i] == 10)
                                                                outbuf[i] = 13;

                                                // Add text to Mac clipboard
                                                static uint16 proc[] = {
                                                        0x598f,                                 // subq.l       #4,sp
                                                        0xa9fc,                                 // ZeroScrap()
                                                        0x2f3c, 0, 0,                   // move.l       #length,-(sp)
                                                        0x2f3c, 'TE', 'XT',             // move.l       #'TEXT',-(sp)
                                                        0x2f3c, 0, 0,                   // move.l       #outbuf,-(sp)
                                                        0xa9fe,                                 // PutScrap()
                                                        0x588f,                                 // addq.l       #4,sp
                                                        M68K_RTS
                                                };
                                                *(int32 *)(proc + 3) = dest_length;
                                                *(char **)(proc + 9) = outbuf;
                                                we_put_this_data = true;
                                                Execute68k((uint32)proc, &r);
                                        } else {
                                                D(bug(" text conversion failed\n"));
                                        }
                                        delete[] outbuf;
                                }
                                be_clipboard->Commit();
                                be_clipboard->Unlock();
                        }
                        break;

                case 'PICT':
                        D(bug(" clipping PICT\n"));
                        if (be_clipboard->Lock()) {
                                BMessage *clipper = be_clipboard->Data(); 
                                char *clip;
                                ssize_t length;

                                // Check if we already copied this data
                                if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE))
                                        return;
                                bigtime_t cookie = system_time();
                                clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t)); 

                                static uint16 proc2[] = {
                                        0x598f,                                 // subq.l       #4,sp
                                        0xa9fc,                                 // ZeroScrap()
                                        0x2f3c, 0, 0,                   // move.l       #length,-(sp)
                                        0x2f3c, 'PI', 'CT',             // move.l       #'PICT',-(sp)
                                        0x2f3c, 0, 0,                   // move.l       #buf,-(sp)
                                        0xa9fe,                                 // PutScrap()
                                        0x588f,                                 // addq.l       #4,sp
                                        M68K_RTS
                                };

                                // No, is there a pict ?
                                if (clipper->FindData("image/pict", B_MIME_TYPE, &clip, &length) == B_OK ) {
                                        D(bug(" image/pict found\n"));

                                        // Add pict to Mac clipboard
                                        *(int32 *)(proc2 + 3) = length;
                                        *(char **)(proc2 + 9) = clip;
                                        we_put_this_data = true;
                                        Execute68k((uint32)proc2, &r);
#if 0
                                // No, is there a bitmap ?
                                } else if (clipper->FindData("image/x-be-bitmap", B_MIME_TYPE, &clip, &length) == B_OK || output_cap > 0) {
                                        D(bug(" image/x-be-bitmap found\nstarting conversion to PICT\n"));

                                        BMemoryIO *in_buffer = new BMemoryIO(clip, length);
                                        BMallocIO *out_buffer = new BMallocIO();
                                        status_t result=roster->Translate(output_trans,in_buffer,NULL,out_buffer,'PICT');
                                        D(bug("result of conversion:%08x buffer_size:%d\n",result,out_buffer->BufferLength()));

                                        // Add pict to Mac clipboard
                                        *(int32 *)(proc2 + 3) = out_buffer->BufferLength();
                                        *(char **)(proc2 + 9) = (char *)out_buffer->Buffer();
                                        we_put_this_data = true;
                                        Execute68k(proc2, &r);

                                        delete in_buffer;
                                        delete out_buffer;
#endif
                                }
                                be_clipboard->Commit();
                                be_clipboard->Unlock();
                        }
                        break;
        }
}
Revision:	1.3
Committed:	2005-01-30T21:48:19Z (19 years, 9 months ago) by gbeauche
Branch:	MAIN
Changes since 1.2:	+1 -1 lines
Log Message:	Happy New Year 2005!
#	User	Rev	Content
1	cebix	1.1	/*
2			* clip_beos.cpp - Clipboard handling, BeOS implementation
3			*
4	gbeauche	1.3	* SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig
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			#include <support/UTF8.h>
22
23			#include "clip.h"
24			#include "main.h"
25			#include "cpu_emulation.h"
26			#include "emul_op.h"
27
28			#define DEBUG 0
29			#include "debug.h"
30
31
32			// Global variables
33			static bool we_put_this_data = false; // Flag for PutScrap(): the data was put by GetScrap(), don't bounce it back to the Be side
34			static BTranslatorRoster *roster;
35			static float input_cap = 0;
36			static translator_info input_info;
37			static float output_cap = 0;
38			static translator_id output_trans = 0;
39
40
41			/*
42			* Clipboard manager thread (for calling clipboard functions; this is not safe
43			* under R4 when running on the MacOS stack in kernel space)
44			*/
45
46			// Message constants
47			const uint32 MSG_QUIT_CLIP_MANAGER = 'quit';
48			const uint32 MSG_PUT_TEXT = 'ptxt';
49
50			static thread_id cm_thread = -1;
51			static sem_id cm_done_sem = -1;
52
53			// Argument passing
54			static void *cm_scrap;
55			static int32 cm_length;
56
57			static status_t clip_manager(void *arg)
58			{
59			for (;;) {
60
61			// Receive message
62			thread_id sender;
63			uint32 code = receive_data(&sender, NULL, 0);
64			D(bug("Clipboard manager received %08lx\n", code));
65			switch (code) {
66			case MSG_QUIT_CLIP_MANAGER:
67			return 0;
68
69			case MSG_PUT_TEXT:
70			if (be_clipboard->Lock()) {
71			be_clipboard->Clear();
72			BMessage *clipper = be_clipboard->Data();
73
74			// Convert text from Mac charset to UTF-8
75			int32 dest_length = cm_length * 3;
76			int32 state = 0;
77			char *inbuf = new char[cm_length];
78			memcpy(inbuf, cm_scrap, cm_length); // Copy to user space
79			char *outbuf = new char[dest_length];
80			if (convert_to_utf8(B_MAC_ROMAN_CONVERSION, inbuf, &cm_length, outbuf, &dest_length, &state) == B_OK) {
81			for (int i=0; i<dest_length; i++)
82			if (outbuf[i] == 13)
83			outbuf[i] = 10;
84
85			// Add text to Be clipboard
86			clipper->AddData("text/plain", B_MIME_TYPE, outbuf, dest_length);
87			be_clipboard->Commit();
88			} else {
89			D(bug(" text conversion failed\n"));
90			}
91			delete[] outbuf;
92			delete[] inbuf;
93			be_clipboard->Unlock();
94			}
95			break;
96			}
97
98			// Acknowledge
99			release_sem(cm_done_sem);
100			}
101			}
102
103
104			/*
105			* Initialize clipboard
106			*/
107
108			void ClipInit(void)
109			{
110			// check if there is a translator that can handle the pict datatype
111			roster = BTranslatorRoster::Default();
112			int32 num_translators, i,j;
113			translator_id *translators;
114			const char translator_name, trans_info;
115			int32 translator_version;
116			const translation_format *t_formats;
117			long t_num;
118
119			roster->GetAllTranslators(&translators, &num_translators);
120			for (i=0;i<num_translators;i++) {
121			roster->GetTranslatorInfo(translators[i], &translator_name,
122			&trans_info, &translator_version);
123			D(bug("found translator %s: %s (%.2f)\n", translator_name, trans_info,
124			translator_version/100.));
125			// does this translator support the pict datatype ?
126			roster->GetInputFormats(translators[i], &t_formats,&t_num);
127			//printf(" supports %d input formats \n",t_num);
128			for (j=0;j<t_num;j++) {
129			if (!strcmp (t_formats[j].MIME,"image/pict")) {
130			// matching translator found
131			if (t_formats[j].capability>input_cap) {
132			input_info.type = t_formats[j].type;
133			input_info.group = t_formats[j].group;
134			input_info.quality = t_formats[j].quality;
135			input_info.capability = t_formats[j].capability;
136			strcpy(input_info.MIME,t_formats[j].MIME);
137			strcpy(input_info.name,t_formats[j].name);
138			input_info.translator=translators[i];
139			input_cap = t_formats[j].capability;
140			}
141			D(bug("matching input translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n",
142			t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type,
143			t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group,
144			t_formats[j].quality,
145			t_formats[j].capability,t_formats[j].MIME,
146			t_formats[j].name));
147			}
148
149			}
150			roster->GetOutputFormats(translators[i], &t_formats,&t_num);
151			//printf("and %d output formats \n",t_num);
152			for (j=0;j<t_num;j++) {
153			if (!strcmp (t_formats[j].MIME,"image/pict")) {
154			if (t_formats[j].capability>output_cap) {
155			output_trans = translators[i];
156			output_cap = t_formats[j].capability;
157			}
158			D(bug("matching output translator found:type:%c%c%c%c group:%c%c%c%c quality:%f capability:%f MIME:%s name:%s\n",
159			t_formats[j].type>>24,t_formats[j].type>>16,t_formats[j].type>>8,t_formats[j].type,
160			t_formats[j].group>>24,t_formats[j].group>>16,t_formats[j].group>>8,t_formats[j].group,
161			t_formats[j].quality,
162			t_formats[j].capability,t_formats[j].MIME,
163			t_formats[j].name));
164			}
165			}
166			}
167			delete [] translators; // clean up our droppings
168
169			// Start clipboard manager thread
170			cm_done_sem = create_sem(0, "Clipboard Manager Done");
171			cm_thread = spawn_thread(clip_manager, "Clipboard Manager", B_NORMAL_PRIORITY, NULL);
172			resume_thread(cm_thread);
173			}
174
175
176			/*
177			* Deinitialize clipboard
178			*/
179
180			void ClipExit(void)
181			{
182			// Stop clipboard manager
183			if (cm_thread > 0) {
184			status_t l;
185			send_data(cm_thread, MSG_QUIT_CLIP_MANAGER, NULL, 0);
186			while (wait_for_thread(cm_thread, &l) == B_INTERRUPTED) ;
187			}
188
189			// Delete semaphores
190			delete_sem(cm_done_sem);
191			}
192
193
194			/*
195			* Mac application wrote to clipboard
196			*/
197
198			void PutScrap(uint32 type, void *scrap, int32 length)
199			{
200			D(bug("PutScrap type %08lx, data %p, length %ld\n", type, scrap, length));
201			if (we_put_this_data) {
202			we_put_this_data = false;
203			return;
204			}
205			if (length <= 0)
206			return;
207
208			switch (type) {
209			case 'TEXT':
210			D(bug(" clipping TEXT\n"));
211			cm_scrap = scrap;
212			cm_length = length;
213			while (send_data(cm_thread, MSG_PUT_TEXT, NULL, 0) == B_INTERRUPTED) ;
214			while (acquire_sem(cm_done_sem) == B_INTERRUPTED) ;
215			break;
216
217			case 'PICT':
218			D(bug(" clipping PICT\n"));
219			//!! this has to be converted to use the Clipboard Manager
220			#if 0
221			if (be_clipboard->Lock()) {
222			be_clipboard->Clear();
223			BMessage *clipper = be_clipboard->Data();
224			// Waaaah! This crashes!
225			if (input_cap > 0) { // if there is an converter for PICT datatype convert data to bitmap.
226			BMemoryIO *in_buffer = new BMemoryIO(scrap, length);
227			BMallocIO *out_buffer = new BMallocIO();
228			status_t result=roster->Translate(in_buffer,&input_info,NULL,out_buffer,B_TRANSLATOR_BITMAP);
229			clipper->AddData("image/x-be-bitmap", B_MIME_TYPE, out_buffer->Buffer(), out_buffer->BufferLength());
230			D(bug("conversion result:%08x buffer_size:%d\n",result,out_buffer->BufferLength()));
231			delete in_buffer;
232			delete out_buffer;
233			}
234			clipper->AddData("image/pict", B_MIME_TYPE, scrap, length);
235			be_clipboard->Commit();
236			be_clipboard->Unlock();
237			}
238			#endif
239			break;
240			}
241			}
242
243
244			/*
245			* Mac application reads clipboard
246			*/
247
248			void GetScrap(void **handle, uint32 type, int32 offset)
249			{
250			M68kRegisters r;
251			D(bug("GetScrap handle %p, type %08lx, offset %ld\n", handle, type, offset));
252			return; //!! GetScrap is currently broken (should use Clipboard Manager)
253			//!! replace with clipboard notification in BeOS R4.1
254
255			switch (type) {
256			case 'TEXT':
257			D(bug(" clipping TEXT\n"));
258			if (be_clipboard->Lock()) {
259			BMessage *clipper = be_clipboard->Data();
260			char *clip;
261			ssize_t length;
262
263			// Check if we already copied this data
264			if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE))
265			return;
266			bigtime_t cookie = system_time();
267			clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t));
268
269			// No, is there text in it?
270			if (clipper->FindData("text/plain", B_MIME_TYPE, &clip, &length) == B_OK) {
271			D(bug(" text/plain found\n"));
272
273			// Convert text from UTF-8 to Mac charset
274			int32 src_length = length;
275			int32 dest_length = length;
276			int32 state = 0;
277			char *outbuf = new char[dest_length];
278			if (convert_from_utf8(B_MAC_ROMAN_CONVERSION, clip, &src_length, outbuf, &dest_length, &state) == B_OK) {
279			for (int i=0; i<dest_length; i++)
280			if (outbuf[i] == 10)
281			outbuf[i] = 13;
282
283			// Add text to Mac clipboard
284			static uint16 proc[] = {
285			0x598f, // subq.l #4,sp
286			0xa9fc, // ZeroScrap()
287			0x2f3c, 0, 0, // move.l #length,-(sp)
288			0x2f3c, 'TE', 'XT', // move.l #'TEXT',-(sp)
289			0x2f3c, 0, 0, // move.l #outbuf,-(sp)
290			0xa9fe, // PutScrap()
291			0x588f, // addq.l #4,sp
292			M68K_RTS
293			};
294			(int32 )(proc + 3) = dest_length;
295			(char *)(proc + 9) = outbuf;
296			we_put_this_data = true;
297			Execute68k((uint32)proc, &r);
298			} else {
299			D(bug(" text conversion failed\n"));
300			}
301			delete[] outbuf;
302			}
303			be_clipboard->Commit();
304			be_clipboard->Unlock();
305			}
306			break;
307
308			case 'PICT':
309			D(bug(" clipping PICT\n"));
310			if (be_clipboard->Lock()) {
311			BMessage *clipper = be_clipboard->Data();
312			char *clip;
313			ssize_t length;
314
315			// Check if we already copied this data
316			if (clipper->HasData("application/x-SheepShaver-cookie", B_MIME_TYPE))
317			return;
318			bigtime_t cookie = system_time();
319			clipper->AddData("application/x-SheepShaver-cookie", B_MIME_TYPE, &cookie, sizeof(bigtime_t));
320
321			static uint16 proc2[] = {
322			0x598f, // subq.l #4,sp
323			0xa9fc, // ZeroScrap()
324			0x2f3c, 0, 0, // move.l #length,-(sp)
325			0x2f3c, 'PI', 'CT', // move.l #'PICT',-(sp)
326			0x2f3c, 0, 0, // move.l #buf,-(sp)
327			0xa9fe, // PutScrap()
328			0x588f, // addq.l #4,sp
329			M68K_RTS
330			};
331
332			// No, is there a pict ?
333			if (clipper->FindData("image/pict", B_MIME_TYPE, &clip, &length) == B_OK ) {
334			D(bug(" image/pict found\n"));
335
336			// Add pict to Mac clipboard
337			(int32 )(proc2 + 3) = length;
338			(char *)(proc2 + 9) = clip;
339			we_put_this_data = true;
340			Execute68k((uint32)proc2, &r);
341			#if 0
342			// No, is there a bitmap ?
343			} else if (clipper->FindData("image/x-be-bitmap", B_MIME_TYPE, &clip, &length) == B_OK \|\| output_cap > 0) {
344			D(bug(" image/x-be-bitmap found\nstarting conversion to PICT\n"));
345
346			BMemoryIO *in_buffer = new BMemoryIO(clip, length);
347			BMallocIO *out_buffer = new BMallocIO();
348			status_t result=roster->Translate(output_trans,in_buffer,NULL,out_buffer,'PICT');
349			D(bug("result of conversion:%08x buffer_size:%d\n",result,out_buffer->BufferLength()));
350
351			// Add pict to Mac clipboard
352			(int32 )(proc2 + 3) = out_buffer->BufferLength();
353			(char )(proc2 + 9) = (char )out_buffer->Buffer();
354			we_put_this_data = true;
355			Execute68k(proc2, &r);
356
357			delete in_buffer;
358			delete out_buffer;
359			#endif
360			}
361			be_clipboard->Commit();
362			be_clipboard->Unlock();
363			}
364			break;
365			}
366			}