mirror of
https://github.com/rn10950/RetroZilla.git
synced 2024-08-28 16:50:17 +02:00
228 lines
6.1 KiB
C++
228 lines
6.1 KiB
C++
|
/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
|
||
|
/* ***** BEGIN LICENSE BLOCK *****
|
||
|
* Version: MPL 1.1/GPL 2.0/LGPL 2.1
|
||
|
*
|
||
|
* The contents of this file are subject to the Mozilla Public License Version
|
||
|
* 1.1 (the "License"); you may not use this file except in compliance with
|
||
|
* the License. You may obtain a copy of the License at
|
||
|
* http://www.mozilla.org/MPL/
|
||
|
*
|
||
|
* Software distributed under the License is distributed on an "AS IS" basis,
|
||
|
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
|
||
|
* for the specific language governing rights and limitations under the
|
||
|
* License.
|
||
|
*
|
||
|
* The Original Code is Mozilla Communicator client code.
|
||
|
*
|
||
|
* The Initial Developer of the Original Code is
|
||
|
* Netscape Communications Corporation.
|
||
|
* Portions created by the Initial Developer are Copyright (C) 1998
|
||
|
* the Initial Developer. All Rights Reserved.
|
||
|
*
|
||
|
* Contributor(s):
|
||
|
* Simon Fraser <sfraser@netscape.com>
|
||
|
*
|
||
|
* Alternatively, the contents of this file may be used under the terms of
|
||
|
* either of the GNU General Public License Version 2 or later (the "GPL"),
|
||
|
* or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
|
||
|
* in which case the provisions of the GPL or the LGPL are applicable instead
|
||
|
* of those above. If you wish to allow use of your version of this file only
|
||
|
* under the terms of either the GPL or the LGPL, and not to allow others to
|
||
|
* use your version of this file under the terms of the MPL, indicate your
|
||
|
* decision by deleting the provisions above and replace them with the notice
|
||
|
* and other provisions required by the GPL or the LGPL. If you do not delete
|
||
|
* the provisions above, a recipient may use your version of this file under
|
||
|
* the terms of any one of the MPL, the GPL or the LGPL.
|
||
|
*
|
||
|
* ***** END LICENSE BLOCK ***** */
|
||
|
|
||
|
|
||
|
|
||
|
#include "nsAEUtils.h"
|
||
|
|
||
|
#include "nsAECoercionHandlers.h"
|
||
|
|
||
|
|
||
|
|
||
|
AECoercionHandlers* AECoercionHandlers::sAECoercionHandlers = nil;
|
||
|
|
||
|
|
||
|
/*----------------------------------------------------------------------------
|
||
|
AECoercionHandlers
|
||
|
|
||
|
----------------------------------------------------------------------------*/
|
||
|
|
||
|
AECoercionHandlers::AECoercionHandlers()
|
||
|
: mTextDescToPascalString(nil)
|
||
|
, mPascalStringDescToText(nil)
|
||
|
{
|
||
|
OSErr err;
|
||
|
|
||
|
// XXX: Note inconsistent type between NewAECoerceDescProc and AEInstallCoercionHandler. Buggy headers when using Carbon?
|
||
|
mTextDescToPascalString = NewAECoerceDescUPP(TextToPascalStringCoercion);
|
||
|
ThrowIfNil(mTextDescToPascalString);
|
||
|
|
||
|
err = ::AEInstallCoercionHandler(typeChar, typePascalString,
|
||
|
(AECoercionHandlerUPP) mTextDescToPascalString,
|
||
|
(long)this,
|
||
|
true, /* Pass a pointer not a descriptor */
|
||
|
false ); /* Application table, not System */
|
||
|
ThrowIfOSErr(err);
|
||
|
|
||
|
mPascalStringDescToText = NewAECoerceDescUPP(PascalStringToTextCoercion);
|
||
|
ThrowIfNil(mPascalStringDescToText);
|
||
|
|
||
|
err = ::AEInstallCoercionHandler(typePascalString, typeChar,
|
||
|
(AECoercionHandlerUPP) mPascalStringDescToText,
|
||
|
(long)this,
|
||
|
true, /* Pass a pointer not a descriptor */
|
||
|
false ); /* Application table, not System */
|
||
|
ThrowIfOSErr(err);
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
/*----------------------------------------------------------------------------
|
||
|
~AECoercionHandlers
|
||
|
|
||
|
----------------------------------------------------------------------------*/
|
||
|
|
||
|
AECoercionHandlers::~AECoercionHandlers()
|
||
|
{
|
||
|
if (mTextDescToPascalString)
|
||
|
{
|
||
|
AERemoveCoercionHandler(typeChar, typePascalString, (AECoercionHandlerUPP) mTextDescToPascalString, false);
|
||
|
DisposeAECoerceDescUPP(mTextDescToPascalString);
|
||
|
}
|
||
|
|
||
|
if (mPascalStringDescToText)
|
||
|
{
|
||
|
AERemoveCoercionHandler(typePascalString, typeChar, (AECoercionHandlerUPP) mPascalStringDescToText, false);
|
||
|
DisposeAECoerceDescUPP(mPascalStringDescToText);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
|
||
|
#pragma mark -
|
||
|
|
||
|
/*----------------------------------------------------------------------------
|
||
|
TextToPascalStringCoercion
|
||
|
|
||
|
----------------------------------------------------------------------------*/
|
||
|
pascal OSErr AECoercionHandlers::TextToPascalStringCoercion(const AEDesc *fromDesc, DescType toType, long handlerRefcon, AEDesc *toDesc)
|
||
|
{
|
||
|
OSErr err = noErr;
|
||
|
|
||
|
if (toType != typePascalString)
|
||
|
return errAECoercionFail;
|
||
|
|
||
|
switch (fromDesc->descriptorType)
|
||
|
{
|
||
|
case typeChar:
|
||
|
Str255 pString;
|
||
|
DescToPString(fromDesc, pString, 255);
|
||
|
err = AECreateDesc(typePascalString, pString, pString[0] + 1, toDesc);
|
||
|
break;
|
||
|
|
||
|
default:
|
||
|
err = errAECoercionFail;
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
return err;
|
||
|
}
|
||
|
|
||
|
/*----------------------------------------------------------------------------
|
||
|
PascalStringToTextCoercion
|
||
|
|
||
|
----------------------------------------------------------------------------*/
|
||
|
|
||
|
pascal OSErr AECoercionHandlers::PascalStringToTextCoercion(const AEDesc *fromDesc, DescType toType, long handlerRefcon, AEDesc *toDesc)
|
||
|
{
|
||
|
OSErr err = noErr;
|
||
|
|
||
|
if (toType != typeChar)
|
||
|
return errAECoercionFail;
|
||
|
|
||
|
switch (fromDesc->descriptorType)
|
||
|
{
|
||
|
case typePascalString:
|
||
|
{
|
||
|
long stringLen = AEGetDescDataSize(fromDesc);
|
||
|
if (stringLen > 255)
|
||
|
{
|
||
|
err = errAECoercionFail;
|
||
|
break;
|
||
|
}
|
||
|
Str255 str;
|
||
|
AEGetDescData(fromDesc, str, sizeof(str) - 1);
|
||
|
err = AECreateDesc(typeChar, str + 1, str[0], toDesc);
|
||
|
}
|
||
|
break;
|
||
|
|
||
|
default:
|
||
|
err = errAECoercionFail;
|
||
|
break;
|
||
|
}
|
||
|
|
||
|
return err;
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
#pragma mark -
|
||
|
|
||
|
/*----------------------------------------------------------------------------
|
||
|
CreateCoercionHandlers
|
||
|
|
||
|
----------------------------------------------------------------------------*/
|
||
|
|
||
|
OSErr CreateCoercionHandlers()
|
||
|
{
|
||
|
OSErr err = noErr;
|
||
|
|
||
|
if (AECoercionHandlers::sAECoercionHandlers)
|
||
|
return noErr;
|
||
|
|
||
|
try
|
||
|
{
|
||
|
AECoercionHandlers::sAECoercionHandlers = new AECoercionHandlers;
|
||
|
}
|
||
|
catch(OSErr catchErr)
|
||
|
{
|
||
|
err = catchErr;
|
||
|
}
|
||
|
catch( ... )
|
||
|
{
|
||
|
err = paramErr;
|
||
|
}
|
||
|
|
||
|
return err;
|
||
|
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
/*----------------------------------------------------------------------------
|
||
|
ShutdownCoercionHandlers
|
||
|
|
||
|
----------------------------------------------------------------------------*/
|
||
|
|
||
|
OSErr ShutdownCoercionHandlers()
|
||
|
{
|
||
|
if (!AECoercionHandlers::sAECoercionHandlers)
|
||
|
return noErr;
|
||
|
|
||
|
try
|
||
|
{
|
||
|
delete AECoercionHandlers::sAECoercionHandlers;
|
||
|
}
|
||
|
catch(...)
|
||
|
{
|
||
|
}
|
||
|
|
||
|
AECoercionHandlers::sAECoercionHandlers = nil;
|
||
|
return noErr;
|
||
|
}
|
||
|
|