OSStatus
TextViewDefaultSettings( HIViewRef textView )
{
OSStatus status = paramErr;
static const CFStringRef taskCFStr = CFSTR("TaskDefault");
WindowRef window;
status = AddTextToTheTextView( textView );
check_noerr( status );
status = TextViewEditCommandSupport( textView, true );
check_noerr( status );
status = TextViewFontPanelSupport( textView, false );
check_noerr( status );
status = TextViewSpellingSupport( textView, false );
check_noerr( status );
status = TextViewScrollingOptions( textView, (UInt32)kTXNAutoScrollInsertionIntoView );
check_noerr( status );
status = TXNSetSelection(HITextViewGetTXNObject(textView), kTXNStartOffset, kTXNStartOffset);
check_noerr( status );
status = HIScrollViewNavigate(HIViewGetSuperview(textView),kHIScrollViewScrollToTop) ;
check_noerr( status );
status = SignalHelpMessage( HIViewGetWindow( textView ), taskCFStr );
return status;
}
/* YASTControlSetData is dispatched from our control event handler. It is where
we handle all calls to SetControlData directed to our control. */
static OSStatus YASTControlSetData(
YASTControlVarsPtr varsp,
ResType inTagName,
void * inBuffer,
Size inBufferSize) {
OSStatus err, returnedResult;
/* default result */
returnedResult = eventNotHandledErr;
/* dispatch according to the tag */
switch (inTagName) {
case kYASTControlAllTextTag: /* char* */
case kYASTControlSelectedTextTag: /* char* */
{ TXNOffset oStartOffset, oEndOffset;
/* pick the range of chars we want to replace */
if (inTagName == kYASTControlSelectedTextTag)
TXNGetSelection( varsp->fTXNObject, &oStartOffset, &oEndOffset);
else { oStartOffset = kTXNStartOffset; oEndOffset = kTXNEndOffset; }
/* get the new text */
err = TXNSetData( varsp->fTXNObject, kTXNTextData,
inBuffer, inBufferSize, oStartOffset, oEndOffset );
}
returnedResult = err;
break;
case kYASTControlAllUnicodeTextTag: /* CFStringRef */
case kYASTControlSelectedUnicodeTextTag: /* CFStringRef */
if (inBufferSize != sizeof(CFStringRef)) {
err = paramErr;
} else {
CFStringRef theString;
CFIndex length;
UniChar *buffer;
TXNOffset oStartOffset, oEndOffset;
/* pick the range of chars we want to replace */
if (inTagName == kYASTControlSelectedUnicodeTextTag)
TXNGetSelection( varsp->fTXNObject, &oStartOffset, &oEndOffset);
else { oStartOffset = kTXNStartOffset; oEndOffset = kTXNEndOffset; }
theString = * (CFStringRef*) inBuffer;
/* get the new text */
length = CFStringGetLength(theString);
buffer = (UniChar *) malloc(length*sizeof(UniChar));
if (buffer != NULL) {
CFRange range;
range.location = 0;
range.length = length;
CFStringGetCharacters(theString, range, buffer);
/* add the new text */
err = TXNSetData( varsp->fTXNObject, kTXNUnicodeTextData,
buffer, length*2, oStartOffset, oEndOffset);
free(buffer);
} else {
err = memFullErr;
}
}
returnedResult = err;
break;
case kYASTControlSelectionRangeTag: /* YASTControlEditTextSelectionRec */
if (inBufferSize != sizeof(CFRange)) {
err = paramErr;
} else {
YASTControlEditTextSelectionPtr range;
range = (YASTControlEditTextSelectionPtr) inBuffer;
err = TXNSetSelection( varsp->fTXNObject, range->selStart, range->selEnd);
if (err == noErr) {
TXNShowSelection( varsp->fTXNObject, false);
}
}
returnedResult = err;
break;
case kYASTControlTabsAdvanceFocusTag: /* Boolean (default true) */
if (inBufferSize != sizeof(Boolean)) {
err = paramErr;
} else {
varsp->fTabMovesFocus = * (Boolean*) inBuffer;
err = noErr;
}
returnedResult = err;
break;
case kYASTControlDoDrawFocusTag: /* Boolean (default true) */
if (inBufferSize != sizeof(Boolean)) {
err = paramErr;
} else {
varsp->fDrawFocusBox = * (Boolean*) inBuffer;
RedrawFocusOutline(varsp);
err = noErr;
}
returnedResult = err;
break;
case kYASTControlReadOnlyTag:
if (inBufferSize != sizeof(Boolean)) {
err = paramErr;
} else {
TXNControlData txnCControlData;
TXNControlTag txnControlTag;
txnControlTag = kTXNIOPrivilegesTag;
if ( * (Boolean*) inBuffer )
txnCControlData.uValue = kTXNReadOnly;
else txnCControlData.uValue = kTXNReadWrite;
err = TXNSetTXNObjectControls( varsp->fTXNObject,
false, 1, &txnControlTag, &txnCControlData );
if (err == noErr) {
varsp->fIsReadOnly = * (Boolean*) inBuffer;
}
}
returnedResult = err;
break;
case kYASTControlTabSizeTag:
if (inBufferSize != sizeof(SInt16)) {
err = paramErr;
} else {
TXNTab txnTabData;
TXNControlTag txnControlTag;
txnControlTag = kTXNTabSettingsTag;
txnTabData.value = * (SInt16*) inBuffer;
txnTabData.tabType = kTXNRightTab;
txnTabData.filler = 0;
err = TXNSetTXNObjectControls( varsp->fTXNObject,
false, 1, &txnControlTag, &txnTabData );
}
returnedResult = err;
break;
}
return returnedResult;
}
/* YASTControlCarbonEventHandler defines the main entry point for all
of the carbon event handlers installed for the YASTControl. */
static pascal OSStatus YASTControlCarbonEventHandler(
EventHandlerCallRef myHandler,
EventRef event,
void* userData) {
#pragma unused ( myHandler )
OSStatus err, returnedResult;
YASTControlVarsPtr varsp;
UInt32 eclass, ekind;
/* set up locals */
eclass = GetEventClass(event);
ekind = GetEventKind(event);
varsp = (YASTControlVarsPtr) userData;
returnedResult = eventNotHandledErr;
/* dispatch the event by class*/
switch (eclass) {
case kEventClassWindow:
if ( ekind == kEventWindowCursorChange ) {
Point where;
UInt32 modifiers;
Boolean cursorWasSet;
/* get the mouse position */
err = GetEventParameter( event, kEventParamMouseLocation,
typeQDPoint, NULL, sizeof(where), NULL, &where);
if (err == noErr) {
err = GetEventParameter( event, kEventParamKeyModifiers,
typeUInt32, NULL, sizeof(modifiers), NULL, &modifiers);
if (err == noErr) {
SetPort(varsp->fGrafPtr);
GlobalToLocal(&where);
if (PtInRect(where, &varsp->fRBounds)) {
err = HandleControlSetCursor( varsp->fControl, where, modifiers, &cursorWasSet);
if (err != noErr) cursorWasSet = false;
if ( ! cursorWasSet ) InitCursor();
returnedResult = noErr;
}
}
}
}
break;
case kEventClassMouse:
/* handle mouse downs in the control, but only if the
control is in focus. */
if ( ekind == kEventMouseDown ) {
EventRecord outEvent;
if ( varsp->fInFocus ) {
if (ConvertEventRefToEventRecord( event, &outEvent)) {
TXNClick( varsp->fTXNObject, &outEvent);
}
returnedResult = noErr;
}
}
break;
case kEventClassTextInput:
if ( ekind == kEventUnicodeForKeyEvent
&& varsp->fTabMovesFocus) {
UniChar mUnicodeText[8];
UInt32 bytecount, nchars;
/* get the character */
err = GetEventParameter(event, kEventParamTextInputSendText,
typeUnicodeText, NULL, sizeof(mUnicodeText),
&bytecount, (char*) mUnicodeText);
if ((err == noErr)
&& (bytecount >= sizeof(UniChar))) {
nchars = ( bytecount / sizeof(UniChar) );
/* if it's not the tab key, forget it... */
if ( mUnicodeText[0] == '\t' ) {
EventRef rawKeyEvent;
Boolean shiftDown;
/* is the shift key held down? */
shiftDown = false;
err = GetEventParameter(event, kEventParamTextInputSendKeyboardEvent,
typeEventRef, NULL, sizeof(rawKeyEvent), NULL, &rawKeyEvent);
if (err == noErr) {
UInt32 modifiers;
err = GetEventParameter(rawKeyEvent, kEventParamKeyModifiers,
typeUInt32, NULL, sizeof(modifiers), NULL, &modifiers);
if (err == noErr) {
shiftDown = ( (modifiers & shiftKey) != 0 );
}
}
/* advance the keyboard focus, backwards if shift is down */
if (shiftDown)
ReverseKeyboardFocus( varsp->fWindow );
else AdvanceKeyboardFocus( varsp->fWindow );
/* noErr lets the CEM know we handled the event */
returnedResult = noErr;
}
}
}
break;
case kEventClassControl:
switch (ekind) {
case kEventControlSetFocusPart:
{ ControlPartCode thePart;
err = GetEventParameter(event, kEventParamControlPart,
typeControlPartCode, NULL, sizeof(thePart), NULL, &thePart);
if (err == noErr) {
switch (thePart) {
default:
case kControlFocusNoPart: /* turn off focus */
if ( varsp->fInFocus ) {
TXNFocus( varsp->fTXNObject, false);
varsp->fInFocus = false;
}
thePart = kControlFocusNoPart;
break;
case kYASTControlOnlyPart: /* turn on focus */
if ( ! varsp->fInFocus ) {
TXNFocus( varsp->fTXNObject, true);
varsp->fInFocus = true;
}
thePart = kYASTControlOnlyPart;
break;
case kControlFocusPrevPart: /* toggle focus on/off */
case kControlFocusNextPart:
varsp->fInFocus = ! varsp->fInFocus;
TXNFocus( varsp->fTXNObject, varsp->fInFocus);
thePart = (varsp->fInFocus ? kYASTControlOnlyPart : kControlFocusNoPart);
break;
}
SetPort(varsp->fGrafPtr);
/* calculate the next highlight state */
SetTextActivation(varsp, varsp->fIsActive && varsp->fInFocus);
/* redraw the text fram and focus rectangle to indicate the
new focus state */
DrawThemeEditTextFrame(&varsp->fRTextOutline,
varsp->fIsActive ? kThemeStateActive: kThemeStateInactive);
RedrawFocusOutline(varsp);
}
/* pass back the foocus part code */
err = SetEventParameter( event, kEventParamControlPart,
typeControlPartCode, sizeof(thePart), &thePart);
returnedResult = err;
}
break;
case kEventControlHitTest:
/* this event does not necessairly mean that a mouse click
has occured. Here we are simply testing to see if a particular
point is located inside of the control. More complicated controls
would return different part codes for different parts of
themselves; but, since YASTControls only advertise one part, the
hit test here is more or less a boolean test. */
{ ControlPartCode thePart;
Point where;
err = GetEventParameter(event, kEventParamMouseLocation,
typeQDPoint, NULL, sizeof(where), NULL, &where);
if (err == noErr) {
if (PtInRect(where, &varsp->fRTextArea)) {
thePart = kYASTControlOnlyPart;
} else thePart = 0;
err = SetEventParameter( event, kEventParamControlPart,
typeControlPartCode, sizeof(thePart), &thePart);
}
returnedResult = err;
}
break;
case kEventControlClick:
/* here we handle focus switching on the control. Actual tracking
of mouse down events in the control is performed in the kEventClassMouse
mouse down handler above. */
if ( ! varsp->fInFocus ) {
SetKeyboardFocus(varsp->fWindow, varsp->fControl, kYASTControlOnlyPart);
returnedResult = noErr;
}
break;
case kEventControlBoundsChanged:
/* we moved, or switched size - recalculate our rectangles */
{ Rect bounds;
err = GetEventParameter(event, kEventParamCurrentBounds,
typeQDRectangle, NULL, sizeof(bounds), NULL, &bounds);
if (err == noErr) {
YASTControlCalculateBounds(varsp, &bounds);
TXNSetFrameBounds( varsp->fTXNObject,
varsp->fRTextArea.top, varsp->fRTextArea.left,
varsp->fRTextArea.bottom, varsp->fRTextArea.right,
varsp->fTXNFrameID);
}
}
break;
case kEventControlActivate:
case kEventControlDeactivate:
{ SetPort(varsp->fGrafPtr);
varsp->fIsActive = (ekind == kEventControlActivate);
SetTextActivation(varsp, varsp->fIsActive && varsp->fInFocus);
/* redraw the frame */
DrawThemeEditTextFrame(&varsp->fRTextOutline,
varsp->fIsActive ? kThemeStateActive: kThemeStateInactive);
RedrawFocusOutline(varsp);
returnedResult = noErr;
}
break;
case kEventControlDraw:
/* redraw the control */
SetPort(varsp->fGrafPtr);
/* update the text region */
TXNDraw(varsp->fTXNObject, NULL);
/* restore the drawing environment */
/* draw the text frame and focus frame (if necessary) */
DrawThemeEditTextFrame(&varsp->fRTextOutline,
varsp->fIsActive ? kThemeStateActive: kThemeStateInactive);
RedrawFocusOutline(varsp);
returnedResult = noErr;
break;
case kEventControlSetCursor:
/* cursor adjustment */
{ SetPortWindowPort(varsp->fWindow);
TXNAdjustCursor( varsp->fTXNObject, varsp->fRTextOutlineRegion);
returnedResult = noErr;
}
break;
case kEventControlDispose:
/* RemoveEventHandler(varsp->fControlEvents); -- this call has been
left out on purpose because it will be called automatically when the
control is disposed. */
RemoveEventHandler(varsp->fWindowEvents);
TXNDeleteObject(varsp->fTXNObject);
DisposeRgn(varsp->fRTextOutlineRegion);
free(varsp);
/* returnedResult = noErr; -- this has been left out on purpose
because we want the dispatching to continue and dispose of the control */
break;
case kEventControlSetData:
{ ResType inTagName;
Size inBufferSize;
void * inBuffer;
err = GetEventParameter( event, kEventParamControlDataTag, typeEnumeration,
NULL, sizeof(inTagName), NULL, &inTagName);
if (err == noErr) {
err = GetEventParameter( event, kEventParamControlDataBuffer, typePtr,
NULL, sizeof(inBuffer), NULL, &inBuffer);
if (err == noErr) {
err = GetEventParameter( event, kEventParamControlDataBufferSize, typeLongInteger,
NULL, sizeof(inBufferSize), NULL, &inBufferSize);
if (err == noErr) {
err = YASTControlSetData(varsp, inTagName, inBuffer, inBufferSize);
}
}
}
returnedResult = err;
}
break;
case kEventControlGetData:
{ ResType inTagName;
Size inBufferSize, outBufferSize;
void * inBuffer;
err = GetEventParameter( event, kEventParamControlDataTag, typeEnumeration,
NULL, sizeof(inTagName), NULL, &inTagName);
if (err == noErr) {
err = GetEventParameter( event, kEventParamControlDataBuffer, typePtr,
NULL, sizeof(inBuffer), NULL, &inBuffer);
if (err == noErr) {
err = GetEventParameter( event, kEventParamControlDataBufferSize, typeLongInteger,
NULL, sizeof(inBufferSize), NULL, &inBufferSize);
if (err == noErr) {
err = YASTControlGetData(varsp, inTagName, inBuffer, inBufferSize, &outBufferSize);
if (err == noErr) {
err = SetEventParameter( event, kEventParamControlDataBufferSize,
typeLongInteger, sizeof(outBufferSize), &outBufferSize);
}
}
}
}
returnedResult = err;
}
break;
}
break;
case kEventClassCommand:
if ( ekind == kEventProcessCommand ) {
HICommand command;
err = GetEventParameter( event, kEventParamDirectObject,
typeHICommand, NULL, sizeof(command), NULL, &command);
if (err == noErr) {
switch (command.commandID) {
case kHICommandUndo:
TXNUndo(varsp->fTXNObject);
returnedResult = noErr;
break;
case kHICommandRedo:
TXNRedo(varsp->fTXNObject);
returnedResult = noErr;
break;
case kHICommandCut:
ClearCurrentScrap();
err = TXNCut(varsp->fTXNObject);
if (err == noErr)
err = TXNConvertToPublicScrap();
returnedResult = err;
break;
case kHICommandCopy:
ClearCurrentScrap();
err = TXNCopy(varsp->fTXNObject);
if (err == noErr)
err = TXNConvertToPublicScrap();
returnedResult = err;
break;
case kHICommandPaste:
err = TXNConvertFromPublicScrap();
if (err == noErr)
err = TXNPaste(varsp->fTXNObject);
returnedResult = err;
break;
case kHICommandClear:
err = TXNClear(varsp->fTXNObject);
returnedResult = err;
break;
case kHICommandSelectAll:
err = TXNSetSelection(varsp->fTXNObject, kTXNStartOffset, kTXNEndOffset);
returnedResult = err;
break;
}
}
} else if ( ekind == kEventCommandUpdateStatus ) {
HICommand command;
TXNOffset oStartOffset, oEndOffset;
TXNActionKey oActionKey;
err = GetEventParameter( event, kEventParamDirectObject, typeHICommand,
NULL, sizeof(command), NULL, &command);
if ((err == noErr)
&& ((command.attributes & kHICommandFromMenu) != 0)) {
switch (command.commandID) {
case kHICommandUndo:
if (TXNCanUndo(varsp->fTXNObject, &oActionKey)) {
EnableMenuItem(command.menu.menuRef, 0); /* required pre OS 10.2 */
EnableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
} else DisableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
returnedResult = noErr;
break;
case kHICommandRedo:
if (TXNCanRedo(varsp->fTXNObject, &oActionKey)) {
EnableMenuItem(command.menu.menuRef, 0); /* required pre OS 10.2 */
EnableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
} else DisableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
returnedResult = noErr;
break;
case kHICommandCut:
case kHICommandCopy:
case kHICommandClear:
TXNGetSelection(varsp->fTXNObject, &oStartOffset, &oEndOffset);
if (oStartOffset != oEndOffset) {
EnableMenuItem(command.menu.menuRef, 0); /* required pre OS 10.2 */
EnableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
} else DisableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
returnedResult = noErr;
break;
case kHICommandPaste:
if (TXNIsScrapPastable()) {
EnableMenuItem(command.menu.menuRef, 0); /* required pre OS 10.2 */
EnableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
} else DisableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
returnedResult = noErr;
break;
case kHICommandSelectAll:
if(TXNDataSize(varsp->fTXNObject) > 0) {
EnableMenuItem(command.menu.menuRef, 0); /* required pre OS 10.2 */
EnableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
} else DisableMenuItem(command.menu.menuRef, command.menu.menuItemIndex);
returnedResult = noErr;
break;
}
}
}
break;
}
return returnedResult;
}
OSStatus DisplayReleaseNotes(void)
{
OSStatus err;
IBNibRef nib = NULL;
WindowRef window = NULL;
err = CreateNibReference(CFSTR("SecondLife"), &nib);
if(err == noErr)
{
CreateWindowFromNib(nib, CFSTR("Release Notes"), &window);
}
if(err == noErr)
{
// Get the text view control
HIViewRef textView;
ControlID id;
id.signature = 'text';
id.id = 0;
LLString releaseNotesText;
_read_file_into_string(releaseNotesText, "releasenotes.txt"); // Flawfinder: ignore
err = HIViewFindByID(HIViewGetRoot(window), id, &textView);
if(err == noErr)
{
// Convert from the encoding used in the release notes.
CFStringRef str = CFStringCreateWithBytes(
NULL,
(const UInt8*)releaseNotesText.c_str(),
releaseNotesText.size(),
kCFStringEncodingWindowsLatin1, // This matches the way the Windows version displays the release notes.
FALSE);
if(str != NULL)
{
int size = CFStringGetLength(str);
if(size > 0)
{
UniChar *chars = new UniChar[size + 1];
CFStringGetCharacters(str, CFRangeMake(0, size), chars);
err = TXNSetData(HITextViewGetTXNObject(textView), kTXNUnicodeTextData, chars, size * sizeof(UniChar), kTXNStartOffset, kTXNStartOffset);
delete[] chars;
}
CFRelease(str);
}
else
{
// Creating the string failed. Probably an encoding problem. Display SOMETHING...
err = TXNSetData(HITextViewGetTXNObject(textView), kTXNTextData, releaseNotesText.c_str(), releaseNotesText.size(), kTXNStartOffset, kTXNStartOffset);
}
}
// Set the selection to the beginning of the text and scroll it into view.
if(err == noErr)
{
err = TXNSetSelection(HITextViewGetTXNObject(textView), kTXNStartOffset, kTXNStartOffset);
}
if(err == noErr)
{
// This function returns void.
TXNShowSelection(HITextViewGetTXNObject(textView), false);
}
}
if(err == noErr)
{
ShowWindow(window);
}
if(err == noErr)
{
// Set up an event handler for the window.
EventHandlerRef handler = NULL;
EventTypeSpec handlerEvents[] =
{
{ kEventClassCommand, kEventCommandProcess }
};
InstallWindowEventHandler(
window,
NewEventHandlerUPP(simpleDialogHandler),
GetEventTypeCount (handlerEvents),
handlerEvents,
(void*)window,
&handler);
}
if(err == noErr)
{
RunAppModalLoopForWindow(window);
}
if(window != NULL)
{
DisposeWindow(window);
}
if(nib != NULL)
{
DisposeNibReference(nib);
}
return(err);
}
