mirror of
				https://github.com/cookiengineer/audacity
				synced 2025-10-31 14:13:50 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			186 lines
		
	
	
		
			6.6 KiB
		
	
	
	
		
			C
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			186 lines
		
	
	
		
			6.6 KiB
		
	
	
	
		
			C
		
	
	
		
			Executable File
		
	
	
	
	
| /*
 | |
| ** Copyright (c) 2001-2009 Expat maintainers.
 | |
| **
 | |
| ** Permission is hereby granted, free of charge, to any person obtaining
 | |
| ** a copy of this software and associated documentation files (the
 | |
| ** "Software"), to deal in the Software without restriction, including
 | |
| ** without limitation the rights to use, copy, modify, merge, publish,
 | |
| ** distribute, sublicense, and/or sell copies of the Software, and to
 | |
| ** permit persons to whom the Software is furnished to do so, subject to
 | |
| ** the following conditions:
 | |
| **
 | |
| ** The above copyright notice and this permission notice shall be included
 | |
| ** in all copies or substantial portions of the Software.
 | |
| **
 | |
| ** THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 | |
| ** EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 | |
| ** MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
 | |
| ** IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
 | |
| ** CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
 | |
| ** TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
 | |
| ** SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 | |
| */
 | |
| 
 | |
| #ifdef __USE_INLINE__
 | |
| #undef __USE_INLINE__
 | |
| #endif
 | |
| 
 | |
| #include "expat_68k.h"
 | |
| #include <exec/emulation.h>
 | |
| #include <proto/exec.h>
 | |
| #include <stdarg.h>
 | |
| 
 | |
| static uint32 VARARGS68K call_68k_code (struct ExecIFace *IExec, void *code, int num_args, ...) {
 | |
| 	uint32 res = 0;
 | |
| 
 | |
| 	va_list vargs;
 | |
| 	va_startlinear(vargs, num_args);
 | |
| 	uint32 *args = va_getlinearva(vargs, uint32 *);
 | |
| 
 | |
| 	uint8 *stack = IExec->AllocVec(4096, MEMF_SHARED);
 | |
| 	if (stack) {
 | |
| 		uint32 *sp = (uint32 *)(stack + 4096);
 | |
| 		args += num_args;
 | |
| 		while (num_args--) {
 | |
| 			*--sp = *--args;
 | |
| 		}
 | |
| 
 | |
| 		res = IExec->EmulateTags(code, ET_StackPtr, sp, TAG_END);
 | |
| 		IExec->FreeVec(stack);
 | |
| 	}
 | |
| 
 | |
| 	va_end(vargs);
 | |
| 
 | |
| 	return res;
 | |
| }
 | |
| 
 | |
| void _68k_startelementhandler(void *userdata, const char *name, const char **attrs) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->startelementhandler, 3, p->handlerarg, name, attrs);
 | |
| }
 | |
| 
 | |
| void _68k_endelementhandler(void *userdata, const char *name) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->endelementhandler, 2, p->handlerarg, name);
 | |
| }
 | |
| 
 | |
| void _68k_chardatahandler(void *userdata, const char *s, int len) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->chardatahandler, 3, p->handlerarg, s, len);
 | |
| }
 | |
| 
 | |
| void _68k_procinsthandler(void *userdata, const char *target, const char *data) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->procinsthandler, 3, p->handlerarg, target, data);
 | |
| }
 | |
| 
 | |
| void _68k_commenthandler(void *userdata, const char *data) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->commenthandler, 2, p->handlerarg, data);
 | |
| }
 | |
| 
 | |
| void _68k_startcdatahandler(void *userdata) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->startcdatahandler, 1, p->handlerarg);
 | |
| }
 | |
| 
 | |
| void _68k_endcdatahandler(void *userdata) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->endcdatahandler, 1, p->handlerarg);
 | |
| }
 | |
| 
 | |
| void _68k_defaulthandler(void *userdata, const char *s, int len) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->defaulthandler, 3, p->handlerarg, s, len);
 | |
| }
 | |
| 
 | |
| void _68k_defaulthandlerexp(void *userdata, const char *s, int len) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->defaulthandlerexp, 3, p->handlerarg, s, len);
 | |
| }
 | |
| 
 | |
| int _68k_extentrefhandler(XML_Parser parser, const char *context, const char *base,
 | |
| 	const char *sysid, const char *pubid)
 | |
| {
 | |
| 	M68kXML_Parser p = XML_GetUserData(parser);
 | |
| 	void *arg = p->extenthandlerarg;
 | |
| 	return (int)call_68k_code(p->IExec, p->extentrefhandler, 5, arg ? arg : p, context, base, sysid, pubid);
 | |
| }
 | |
| 
 | |
| int _68k_unknownenchandler(void *enchandlerdata, const char *name, XML_Encoding *info) {
 | |
| 	M68kXML_Parser p = enchandlerdata;
 | |
| 	return (int)call_68k_code(p->IExec, p->unknownenchandler, 3, p->enchandlerarg, name, info);
 | |
| }
 | |
| 
 | |
| void _68k_startnamespacehandler(void *userdata, const char *prefix, const char *uri) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->startnamespacehandler, 3, p->handlerarg, prefix, uri);
 | |
| }
 | |
| 
 | |
| void _68k_endnamespacehandler(void *userdata, const char *prefix) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->endnamespacehandler, 2, p->handlerarg, prefix);
 | |
| }
 | |
| 
 | |
| void _68k_xmldeclhandler(void *userdata, const char *version, const char *encoding, int standalone) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->xmldeclhandler, 4, p->handlerarg, version, encoding, standalone);
 | |
| }
 | |
| 
 | |
| void _68k_startdoctypehandler(void *userdata, const char *doctypename,
 | |
| 	const char *sysid, const char *pubid, int has_internal_subset)
 | |
| {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->startdoctypehandler, 5, p->handlerarg, doctypename, sysid, pubid, has_internal_subset);
 | |
| }
 | |
| 
 | |
| void _68k_enddoctypehandler(void *userdata) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->enddoctypehandler, 1, p->handlerarg);
 | |
| }
 | |
| 
 | |
| void _68k_elementdeclhandler(void *userdata, const char *name, XML_Content *model) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->elementdeclhandler, 3, p->handlerarg, name, model);
 | |
| }
 | |
| 
 | |
| void _68k_attlistdeclhandler(void *userdata, const char *elname, const char *attname,
 | |
| 	const char *att_type, const char *dflt, int isrequired)
 | |
| {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->attlistdeclhandler, 6, p->handlerarg, elname, attname, att_type, dflt, isrequired);
 | |
| }
 | |
| 
 | |
| void _68k_entitydeclhandler(void *userdata, const char *entityname, int is_param_entity,
 | |
| 	const char *value, int value_length, const char *base, const char *sysid, const char *pubid,
 | |
| 	const char *notationname)
 | |
| {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->entitydeclhandler, 9, p->handlerarg, entityname, is_param_entity,
 | |
| 		value, value_length, base, sysid, pubid, notationname);
 | |
| }
 | |
| 
 | |
| void _68k_unparseddeclhandler(void *userdata, const char *entityname, const char *base,
 | |
| 	const char *sysid, const char *pubid, const char *notationname)
 | |
| {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->unparseddeclhandler, 6, p->handlerarg, entityname, base, sysid, pubid, notationname);
 | |
| }
 | |
| 
 | |
| void _68k_notationdeclhandler(void *userdata, const char *notationname, const char *base,
 | |
| 	const char *sysid, const char *pubid)
 | |
| {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->notationdeclhandler, 5, p->handlerarg, notationname, base, sysid, pubid);
 | |
| }
 | |
| 
 | |
| int _68k_notstandalonehandler(void *userdata) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	return (int)call_68k_code(p->IExec, p->notstandalonehandler, 1, p->handlerarg);
 | |
| }
 | |
| 
 | |
| void _68k_skippedentityhandler(void *userdata, const char *entityname, int is_param_entity) {
 | |
| 	M68kXML_Parser p = userdata;
 | |
| 	call_68k_code(p->IExec, p->skippedentityhandler, 3, p->handlerarg, entityname, is_param_entity);
 | |
| }
 |