void
drivers_notification_item (ControlRef browser,
DataBrowserItemID itemID, DataBrowserItemNotification message)
{
static Boolean ignore_next = false, selected = false;
switch (message)
{
case kDataBrowserItemSelected:
if (DRIVERCHOOSER->b_configure)
{
ActivateControl (DRIVERCHOOSER->b_remove);
DrawOneControl (DRIVERCHOOSER->b_remove);
ActivateControl (DRIVERCHOOSER->b_configure);
DrawOneControl (DRIVERCHOOSER->b_configure);
}
else
{
ActivateControl (DRIVERCHOOSER->b_add);
DrawOneControl (DRIVERCHOOSER->b_add);
}
if (selected)
ignore_next = true;
else
selected = true;
break;
case kDataBrowserItemDeselected:
if (!ignore_next)
{
if (DRIVERCHOOSER->b_configure)
{
DeactivateControl (DRIVERCHOOSER->b_remove);
DrawOneControl (DRIVERCHOOSER->b_remove);
DeactivateControl (DRIVERCHOOSER->b_configure);
DrawOneControl (DRIVERCHOOSER->b_configure);
}
else
{
DeactivateControl (DRIVERCHOOSER->b_add);
DrawOneControl (DRIVERCHOOSER->b_add);
}
selected = false;
}
else
{
ignore_next = false;
selected = true;
}
break;
case kDataBrowserItemDoubleClicked:
if (DRIVERCHOOSER->b_configure)
driver_configure_clicked (NULL, NULL, DRIVERCHOOSER);
break;
};
}
static pascal OSStatus MacOSXDialogCommandProcess(EventHandlerCallRef inHandlerCallRef, EventRef inEvent, void* inUserData)
{
HICommand aCommand;
OSStatus status = eventNotHandledErr;
GetEventParameter(inEvent, kEventParamDirectObject, typeHICommand, NULL, sizeof(HICommand), NULL, &aCommand);
switch (aCommand.commandID)
{
case kHICommandOK:
// we got a valid click on the OK button so let's quit our local run loop
QuitAppModalLoopForWindow((WindowRef) inUserData);
break;
case 'CBED':
{
// we still enable or disable the custom spot view depending on whether the box is checked or not
HIViewRef checkBox = ((HICommandExtended *)&aCommand)->source.control;
SInt32 enable = GetControl32BitValue(checkBox);
HIViewID hidcsv = {0, 13};
HIViewRef customSpotView;
HIViewFindByID(HIViewGetRoot(GetControlOwner(checkBox)), hidcsv, &customSpotView);
if (enable)
ActivateControl(customSpotView);
else
DeactivateControl(customSpotView);
HIViewSetNeedsDisplay(customSpotView, true);
}
break;
}
return status;
}
static void
fdsn_notification_item (ControlRef browser,
DataBrowserItemID itemID, DataBrowserItemNotification message)
{
static Boolean ignore_next = false, selected = false;
switch (message)
{
case kDataBrowserItemSelected:
ActivateControl (DSNCHOOSER->fremove);
DrawOneControl (DSNCHOOSER->fremove);
ActivateControl (DSNCHOOSER->ftest);
DrawOneControl (DSNCHOOSER->ftest);
ActivateControl (DSNCHOOSER->fconfigure);
DrawOneControl (DSNCHOOSER->fconfigure);
if (selected)
ignore_next = true;
else
selected = true;
break;
case kDataBrowserItemDeselected:
if (!ignore_next)
{
DeactivateControl (DSNCHOOSER->fremove);
DrawOneControl (DSNCHOOSER->fremove);
DeactivateControl (DSNCHOOSER->ftest);
DrawOneControl (DSNCHOOSER->ftest);
DeactivateControl (DSNCHOOSER->fconfigure);
DrawOneControl (DSNCHOOSER->fconfigure);
}
else
{
ignore_next = false;
selected = true;
}
break;
case kDataBrowserItemDoubleClicked:
filedsn_configure_clicked (NULL, NULL, DSNCHOOSER);
break;
};
}
/* HiliteDControl(theDialog, itemNumber, enable)
Thread Safety: HiliteDControl is not thread-safe.
*/
void
HiliteDControl(DialogPtr theDialog, int itemNumber, int enable)
{
ControlHandle controlH;
if (XOPGetDialogItemAsControl(theDialog, itemNumber, &controlH) == 0) {
if (enable)
ActivateControl(controlH);
else
DeactivateControl(controlH);
}
}
static void DeleteCheatItem (void)
{
OSStatus err;
HIViewRef ctl, root;
HIViewID cid;
Handle selectedItems;
ItemCount selectionCount;
selectedItems = NewHandle(0);
if (!selectedItems)
return;
err = GetDataBrowserItems(dbRef, kDataBrowserNoItem, true, kDataBrowserItemIsSelected, selectedItems);
selectionCount = (GetHandleSize(selectedItems) / sizeof(DataBrowserItemID));
if (selectionCount == 0)
{
DisposeHandle(selectedItems);
return;
}
err = RemoveDataBrowserItems(dbRef, kDataBrowserNoItem, selectionCount, (DataBrowserItemID *) *selectedItems, kDataBrowserItemNoProperty);
for (unsigned int i = 0; i < selectionCount; i++)
{
citem[((DataBrowserItemID *) (*selectedItems))[i] - 1].valid = false;
citem[((DataBrowserItemID *) (*selectedItems))[i] - 1].enabled = false;
numofcheats--;
}
DisposeHandle(selectedItems);
root = HIViewGetRoot(wRef);
cid.id = 0;
if (numofcheats < MAC_MAX_CHEATS)
{
cid.signature = kNewButton;
HIViewFindByID(root, cid, &ctl);
err = ActivateControl(ctl);
}
if (numofcheats == 0)
{
cid.signature = kAllButton;
HIViewFindByID(root, cid, &ctl);
err = DeactivateControl(ctl);
}
}
static void
dsnsetup_notification_item (ControlRef browser,
DataBrowserItemID itemID, DataBrowserItemNotification message)
{
static Boolean ignore_next = false, selected = false;
switch (message)
{
case kDataBrowserItemSelected:
if (DSNSETUP)
{
ActivateControl (DSNSETUP->bupdate);
DrawOneControl (DSNSETUP->bupdate);
SetControlData (DSNSETUP->key_entry, 0, kControlEditTextCFStringTag,
sizeof(CFStringRef), &DSNSETUP_array[0][itemID - DBITEM_ID - 1]);
DrawOneControl (DSNSETUP->key_entry);
SetControlData (DSNSETUP->value_entry, 0, kControlEditTextCFStringTag,
sizeof(CFStringRef), &DSNSETUP_array[1][itemID - DBITEM_ID - 1]);
DrawOneControl (DSNSETUP->value_entry);
}
if (selected)
ignore_next = true;
else
selected = true;
break;
case kDataBrowserItemDeselected:
if (!ignore_next && DSNSETUP)
{
DeactivateControl (DSNSETUP->bupdate);
DrawOneControl (DSNSETUP->bupdate);
SetControlData (DSNSETUP->key_entry, 0, kControlEditTextTextTag, 0,
"");
DrawOneControl (DSNSETUP->key_entry);
SetControlData (DSNSETUP->value_entry, 0, kControlEditTextTextTag,
0, "");
DrawOneControl (DSNSETUP->value_entry);
selected = false;
}
else
{
ignore_next = false;
selected = true;
}
break;
};
}
static void AddCheatItem (void)
{
OSStatus err;
HIViewRef ctl, root;
HIViewID cid;
DataBrowserItemID id[1];
unsigned int i;
if (numofcheats == MAC_MAX_CHEATS)
return;
for (i = 0; i < MAC_MAX_CHEATS; i++)
if (citem[i].valid == false)
break;
if (i == MAC_MAX_CHEATS)
return;
numofcheats++;
citem[i].valid = true;
citem[i].enabled = false;
citem[i].address = 0;
citem[i].value = 0;
sprintf(citem[i].description, "Cheat %03" PRIu32, citem[i].id);
id[0] = citem[i].id;
err = AddDataBrowserItems(dbRef, kDataBrowserNoItem, 1, id, kDataBrowserItemNoProperty);
err = RevealDataBrowserItem(dbRef, id[0], kCmAddress, true);
root = HIViewGetRoot(wRef);
cid.id = 0;
if (numofcheats == MAC_MAX_CHEATS)
{
cid.signature = kNewButton;
HIViewFindByID(root, cid, &ctl);
err = DeactivateControl(ctl);
}
if (numofcheats)
{
cid.signature = kAllButton;
HIViewFindByID(root, cid, &ctl);
err = ActivateControl(ctl);
}
}
static pascal void DBItemNotificationCallBack (HIViewRef browser, DataBrowserItemID itemID, DataBrowserItemNotification message)
{
OSStatus err;
HIViewRef ctl;
HIViewID cid = { kDelButton, 0 };
ItemCount selectionCount;
switch (message)
{
case kDataBrowserSelectionSetChanged:
HIViewFindByID(HIViewGetRoot(wRef), cid, &ctl);
err = GetDataBrowserItemCount(browser, kDataBrowserNoItem, true, kDataBrowserItemIsSelected, &selectionCount);
if (selectionCount == 0)
err = DeactivateControl(ctl);
else
err = ActivateControl(ctl);
}
}
static void
parse_attribute_line (TGENSETUP * gensetup_t,
LPCSTR dsn,
LPCSTR attrs,
BOOL add)
{
if (dsn)
{
SetControlData (gensetup_t->dsn_entry, 0, kControlEditTextTextTag,
STRLEN (dsn), (UInt8 *) dsn);
if (add)
ActivateControl (gensetup_t->dsn_entry);
else
DeactivateControl (gensetup_t->dsn_entry);
DrawOneControl (gensetup_t->dsn_entry);
}
addkeywords_to_list (gensetup_t->key_list, attrs, gensetup_t);
}
static void RunDialogTheMacOS8or9Way(DialogRef theDialog)
{
SInt16 itemHit;
ControlRef theControl;
ControlRef theTextControl;
BringToFront(GetDialogWindow(theDialog));
do {
ModalDialog(MyMacOS8or9DialogFilter, &itemHit);
switch (itemHit)
{
case 2:
{
// we still enable or disable the user pane depending on whether the box is checked or not
GetDialogItemAsControl(theDialog, itemHit, &theControl);
SInt32 enable = GetControl32BitValue(theControl);
SetControl32BitValue(theControl, 1 - enable);
GetDialogItemAsControl(theDialog, 13, &theControl);
if (!enable)
ActivateControl(theControl);
else
DeactivateControl(theControl);
}
break;
case 9: case 10:
{
// we got a click in an edit text control, if didn't have the focus, let's set it
GetDialogItemAsControl(theDialog, itemHit, &theTextControl);
ControlRef currentFocus;
GetKeyboardFocus(GetDialogWindow(theDialog), ¤tFocus);
if (currentFocus != theTextControl)
SetKeyboardFocus(GetDialogWindow(theDialog), theTextControl, kControlFocusNextPart);
}
break;
}
} while (!(itemHit == ok));
DisposeDialog(theDialog);
}
bool wxToolBarTool::DoEnable(bool enable)
{
if ( IsControl() )
{
GetControl()->Enable( enable ) ;
}
else if ( IsButton() )
{
#if TARGET_API_MAC_OSX
if ( enable )
EnableControl( m_controlHandle ) ;
else
DisableControl( m_controlHandle ) ;
#else
if ( enable )
ActivateControl( m_controlHandle ) ;
else
DeactivateControl( m_controlHandle ) ;
#endif
}
return true ;
}
// --------------------------------------------------------------------------------------
void HandleActivate(WindowRef window, Boolean activate)
{
ControlRef rootControl;
ListHandle iconList;
SInt16 pixelDepth;
Boolean isColorDevice;
GetRootControl(window, &rootControl);
GetWindowProperty(window, kAppSignature, kIconListTag, sizeof(ListHandle), NULL, &iconList);
SetPortWindowPort(window);
GetWindowDeviceDepthAndColor(window, &pixelDepth, &isColorDevice);
if (activate)
{
SetThemeTextColor(kThemeTextColorModelessDialogActive, pixelDepth, isColorDevice);
ActivateControl(rootControl);
SetThemeBackground(kThemeBrushWhite, pixelDepth, isColorDevice);
LActivate(true, iconList);
RedrawPrefsWindowList(window); // redraw the list with the active appearance
drawFrameAndFocus(iconList, true, window);
EnableMenuItem(GetMenuRef(mFile), iClose);
}
else // deactivate
{
SetThemeTextColor(kThemeTextColorModelessDialogInactive, pixelDepth, isColorDevice);
DeactivateControl(rootControl);
SetThemeBackground(kThemeBrushWhite, pixelDepth, isColorDevice);
LActivate(false, iconList);
RedrawPrefsWindowList(window); // redraw the list with the inactive appearance
drawFrameAndFocus(iconList, false, window);
DisableMenuItem(GetMenuRef(mFile), iClose);
}
}
ALIST_API void ALActivate(Boolean isActive, ALHandle hAL)
{ short status;
short hilite;
ALPtr pAL;
// Sanity check!
if (hAL == nil || *hAL == nil)
return;
// Get current status of the active flag
status = BTST((*hAL)->flags, alFActive) ? alBitSet : alBitClear;
if ((isActive && status == alBitSet) || (!isActive && status == alBitClear))
return; // Do nothing, we're already the way the user wants us to be.
else {
// Hide the selection hiliting.
_ALHiliteSelected(hAL);
pAL = *hAL;
if ( isActive ) {
BSET(pAL->flags, alFComingActive);
BSET(pAL->flags, alFActive);
hilite = kControlNoPart;
} else {
BCLR(pAL->flags, alFActive);
hilite = kControlInactivePart;
// Dispose of the offscreen port if we're inactive.
if (pAL->offscreenPort != nil) {
DisposeGWorld(pAL->offscreenPort);
(*hAL)->offscreenPort = nil;
}
}
// Show the selection hiliting.
_ALHiliteSelected(hAL);
#if ALIST_USEAPPEARANCEMGR
if (BTST((*hAL)->flags, alFHasAppearanceMgr) != 0) {
if ((*hAL)->vScroll != nil) {
if (hilite == kControlInactivePart)
DeactivateControl((*hAL)->vScroll);
else
ActivateControl((*hAL)->vScroll);
}
if ((*hAL)->hScroll != nil) {
if (hilite == kControlInactivePart)
DeactivateControl((*hAL)->hScroll);
else
ActivateControl((*hAL)->hScroll);
}
} else
#endif
{
if ((*hAL)->vScroll != nil)
HiliteControl((*hAL)->vScroll, hilite);
if ((*hAL)->hScroll != nil)
HiliteControl((*hAL)->hScroll, hilite);
}
ALUpdate( nil, hAL );
}
} // ALActivate
pascal OSStatus
gensetup_update_clicked (EventHandlerCallRef inHandlerRef,
EventRef inEvent, void *inUserData)
{
TGENSETUP *gensetup_t = (TGENSETUP *) inUserData;
DataBrowserItemID item = DBITEM_ID + 1, first, last;
DataBrowserCallbacks dbCallbacks;
ThemeDrawingState outState = NULL;
UInt16 colSize[2] = { 150, 250 };
SInt16 outBaseline;
Point ioBound;
CFStringRef data[2];
Size len;
int i = 0, j;
if (gensetup_t)
{
GetThemeDrawingState (&outState);
GetControlData (gensetup_t->key_entry, 0, kControlEditTextCFStringTag,
sizeof (CFStringRef), &data[0], &len);
if (CFStringGetLength(data[0]))
{
GetControlData (gensetup_t->value_entry, 0, kControlEditTextCFStringTag,
sizeof (CFStringRef), &data[1], &len);
if(GetDataBrowserSelectionAnchor (gensetup_t->key_list, &first, &last) == noErr)
{
i = first - DBITEM_ID - 1;
item += i;
}
else i = 0;
/* Install an event handler on the component databrowser */
dbCallbacks.version = kDataBrowserLatestCallbacks;
InitDataBrowserCallbacks (&dbCallbacks);
dbCallbacks.u.v1.itemNotificationCallback =
NewDataBrowserItemNotificationUPP (dsnsetup_notification_item);
/* On Mac OS X 10.0.x : this is clientDataCallback */
dbCallbacks.u.v1.itemDataCallback =
NewDataBrowserItemDataUPP (dsnsetup_getset_item);
SetDataBrowserCallbacks (gensetup_t->key_list, &dbCallbacks);
/* Begin the draw of the data browser */
SetDataBrowserTarget (gensetup_t->key_list, DBITEM_ID);
/* An update operation */
if(i<DSNSETUP_nrows)
{
CFRelease (DSNSETUP_array[0][i]);
CFRelease (DSNSETUP_array[1][i]);
DSNSETUP_array[0][i] = data[0];
DSNSETUP_array[1][i] = data[1];
UpdateDataBrowserItems (gensetup_t->key_list, DBITEM_ID, 1,
&item, GSKEYWORD_ID, kDataBrowserItemNoProperty);
}
for(j = 0 ; j < DSNSETUP_nrows ; j++)
{
for(i = 0 ; i < 2 ; i++)
{
GetThemeTextDimensions (DSNSETUP_array[i][j], kThemeSystemFont,
kThemeStateActive, false, &ioBound, &outBaseline);
if(colSize[i] < ioBound.h) colSize[i] = ioBound.h;
}
}
ActivateControl (gensetup_t->key_list);
/* Resize the columns to have a good look */
SetDataBrowserTableViewNamedColumnWidth (gensetup_t->key_list, GSKEYWORD_ID, colSize[0] + 20);
SetDataBrowserTableViewNamedColumnWidth (gensetup_t->key_list, GSVALUE_ID, colSize[1] + 20);
DrawOneControl (gensetup_t->key_list);
/* Remove the DataBrowser callback */
SetDataBrowserCallbacks (NULL, &dbCallbacks);
}
SetControlData (gensetup_t->key_entry, 0, kControlEditTextTextTag, 0,
"");
DrawOneControl (gensetup_t->key_entry);
SetControlData (gensetup_t->value_entry, 0, kControlEditTextTextTag, 0,
"");
DrawOneControl (gensetup_t->value_entry);
DeactivateControl (DSNSETUP->bupdate);
DrawOneControl (DSNSETUP->bupdate);
}
return noErr;
}
static void
addkeywords_to_list (ControlRef widget,
LPCSTR attrs,
TGENSETUP * gensetup_t)
{
DataBrowserItemID item = DBITEM_ID + 1;
DataBrowserCallbacks dbCallbacks;
ThemeDrawingState outState = NULL;
UInt16 colSize[2] = { 150, 250 };
SInt16 outBaseline;
Point ioBound;
char *curr, *cour;
int i;
if (!widget)
return;
GetThemeDrawingState (&outState);
/* Install an event handler on the component databrowser */
dbCallbacks.version = kDataBrowserLatestCallbacks;
InitDataBrowserCallbacks (&dbCallbacks);
dbCallbacks.u.v1.itemNotificationCallback =
NewDataBrowserItemNotificationUPP (dsnsetup_notification_item);
/* On Mac OS X 10.0.x : this is clientDataCallback */
dbCallbacks.u.v1.itemDataCallback =
NewDataBrowserItemDataUPP (dsnsetup_getset_item);
SetDataBrowserCallbacks (widget, &dbCallbacks);
/* Begin the draw of the data browser */
SetDataBrowserTarget (widget, DBITEM_ID);
/* Make the clean up */
for (i = 0; i < DSNSETUP_nrows; i++)
{
CFRelease (DSNSETUP_array[0][i]);
DSNSETUP_array[0][i] = NULL;
CFRelease (DSNSETUP_array[1][i]);
DSNSETUP_array[1][i] = NULL;
}
/* Global Initialization */
DSNSETUP_nrows = 0;
item = DBITEM_ID + 1;
for (curr = (LPSTR) attrs; *curr; curr += (STRLEN (curr) + 1))
{
if (!strncasecmp (curr, "DSN=", STRLEN ("DSN=")) ||
!strncasecmp (curr, "Driver=", STRLEN ("Driver=")) ||
!strncasecmp (curr, "Description=", STRLEN ("Description=")))
continue;
if ((cour = strchr ((char*)curr, '=')))
{
*cour = '\0';
DSNSETUP_array[0][DSNSETUP_nrows] =
CFStringCreateWithCString (NULL, curr, kCFStringEncodingUTF8);
*cour = '=';
DSNSETUP_array[1][DSNSETUP_nrows] =
CFStringCreateWithCString (NULL, ((char*)cour) + 1, kCFStringEncodingUTF8);
}
else
DSNSETUP_array[0][DSNSETUP_nrows] =
CFStringCreateWithCString (NULL, "", kCFStringEncodingUTF8);
for(i = 0 ; i < 2 ; i++)
{
GetThemeTextDimensions (DSNSETUP_array[i][DSNSETUP_nrows], kThemeSystemFont,
kThemeStateActive, false, &ioBound, &outBaseline);
if(colSize[i] < ioBound.h) colSize[i] = ioBound.h;
}
AddDataBrowserItems (widget, DBITEM_ID, 1, &item, GSKEYWORD_ID);
item++;
DSNSETUP_nrows++;
}
ActivateControl (widget);
/* Resize the columns to have a good look */
SetDataBrowserTableViewNamedColumnWidth (widget, GSKEYWORD_ID, colSize[0] + 20);
SetDataBrowserTableViewNamedColumnWidth (widget, GSVALUE_ID, colSize[1] + 20);
DrawOneControl (widget);
/* Remove the DataBrowser callback */
SetDataBrowserCallbacks (NULL, &dbCallbacks);
}
static pascal OSStatus PreferencesEventHandler (EventHandlerCallRef inHandlerRef, EventRef inEvent, void *inUserData)
{
OSStatus err, result = eventNotHandledErr;
WindowRef tWindowRef = (WindowRef) inUserData;
switch (GetEventClass(inEvent))
{
case kEventClassWindow:
{
switch (GetEventKind(inEvent))
{
case kEventWindowClose:
{
QuitAppModalLoopForWindow(tWindowRef);
result = noErr;
break;
}
}
break;
}
case kEventClassCommand:
{
switch (GetEventKind(inEvent))
{
HICommand tHICommand;
case kEventCommandUpdateStatus:
{
err = GetEventParameter(inEvent, kEventParamDirectObject, typeHICommand, NULL, sizeof(HICommand), NULL, &tHICommand);
if (err == noErr && tHICommand.commandID == 'clos')
{
UpdateMenuCommandStatus(true);
result = noErr;
}
break;
}
case kEventCommandProcess:
{
HIViewRef ctl, root;
HIViewID cid;
SInt32 value;
FSRef ref;
bool8 r;
root = HIViewGetRoot(tWindowRef);
err = GetEventParameter(inEvent, kEventParamDirectObject, typeHICommand, NULL, sizeof(HICommand), NULL, &tHICommand);
if (err == noErr)
{
switch (tHICommand.commandID)
{
case 'S_EF':
{
HideWindow(tWindowRef);
ConfigureSoundEffects();
ShowWindow(tWindowRef);
result = noErr;
break;
}
case 'G_FL':
{
if (systemVersion >= 0x1040)
{
HideWindow(tWindowRef);
ConfigureCoreImageFilter();
ShowWindow(tWindowRef);
}
result = noErr;
break;
}
case 'G__7':
{
cid.signature = 'grap';
cid.id = iNibGGLStretch;
HIViewFindByID(root, cid, &ctl);
value = GetControl32BitValue(ctl);
cid.id = iNibGAspectRatio;
HIViewFindByID(root, cid, &ctl);
if (value)
ActivateControl(ctl);
else
DeactivateControl(ctl);
result = noErr;
break;
}
case 'G_13':
{
cid.signature = 'grap';
cid.id = iNibGScreenCurvature;
HIViewFindByID(root, cid, &ctl);
value = GetControl32BitValue(ctl);
cid.id = iNibGCurvatureWarp;
HIViewFindByID(root, cid, &ctl);
if (value)
ActivateControl(ctl);
else
DeactivateControl(ctl);
result = noErr;
break;
}
case 'S__3':
{
cid.signature = 'snd_';
cid.id = iNibSStereo;
HIViewFindByID(root, cid, &ctl);
value = GetControl32BitValue(ctl);
cid.id = iNibSReverseStereo;
HIViewFindByID(root, cid, &ctl);
if (value)
ActivateControl(ctl);
else
DeactivateControl(ctl);
result = noErr;
break;
}
case 'F_FL':
{
UInt32 modifierkey;
err = GetEventParameter(inEvent, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifierkey);
if (err == noErr)
{
if (modifierkey & optionKey)
{
CFStringRef str;
MenuRef menu;
str = CFCopyLocalizedString(CFSTR("NoneSelected"), "NoneSelected");
cid.signature = 'othe';
cid.id = iNibOSaveFolder;
HIViewFindByID(root, cid, &ctl);
SetControl32BitValue(ctl, 3);
err = GetControlData(ctl, kControlMenuPart, kControlPopupButtonMenuRefTag, sizeof(MenuRef), &menu, NULL);
err = SetMenuItemTextWithCFString(menu, iNibSaveFolderNameMenuItem, str);
DisableMenuItem(menu, iNibSaveFolderNameMenuItem);
HIViewSetNeedsDisplay(ctl, true);
CFRelease(str);
if (saveFolderPath)
CFRelease(saveFolderPath);
saveFolderPath = NULL;
}
else
r = NavBeginChooseFolderSheet(tWindowRef);
}
result = noErr;
break;
}
case 'NvDn':
{
r = NavEndChooseFolderSheet(&ref);
if (r)
{
CFStringRef str;
CFURLRef url;
MenuRef menu;
url = CFURLCreateFromFSRef(kCFAllocatorDefault, &ref);
str = CFURLCopyLastPathComponent(url);
cid.signature = 'othe';
cid.id = iNibOSaveFolder;
HIViewFindByID(root, cid, &ctl);
SetControl32BitValue(ctl, iNibSaveFolderNameMenuItem);
err = GetControlData(ctl, kControlMenuPart, kControlPopupButtonMenuRefTag, sizeof(MenuRef), &menu, NULL);
err = SetMenuItemTextWithCFString(menu, iNibSaveFolderNameMenuItem, str);
EnableMenuItem(menu, iNibSaveFolderNameMenuItem);
HIViewSetNeedsDisplay(ctl, true);
CFRelease(str);
str = CFURLCopyFileSystemPath(url, kCFURLPOSIXPathStyle);
if (saveFolderPath)
CFRelease(saveFolderPath);
saveFolderPath = str;
CFRelease(url);
}
result = noErr;
break;
}
}
}
break;
}
}
break;
}
}
return (result);
}
/*****************************************************
*
* Handle_WindowCommandProcess(inHandlerCallRef, inEvent, inUserData)
*
* Purpose: called to handle of the events generated by the various controls of the HICustomView_Tester window
*
* Inputs: inHandlerCallRef - reference to the current handler call chain
* inEvent - the event
* inUserData - app-specified data you passed in the call to InstallEventHandler
*
* Returns: OSStatus - noErr indicates the event was handled
* eventNotHandledErr indicates the event was not handled and the Toolbox should take over
*/
static pascal OSStatus Handle_WindowCommandProcess(EventHandlerCallRef inHandlerCallRef, EventRef inEvent, void *inUserData)
{
OSStatus status;
HIViewRef customView = (HIViewRef)inUserData;
// getting the command
HICommandExtended aCommand;
status = GetEventParameter(inEvent, kEventParamDirectObject, typeHICommand, NULL, sizeof(aCommand), NULL, &aCommand);
require_noerr(status, ExitCommandProcess);
status = eventNotHandledErr;
// cheking that the command came from a control
if ( ! (aCommand.attributes & kHICommandFromControl) ) goto ExitCommandProcess;
switch (aCommand.commandID)
{
//
// Asking for a refresh of the custom view
//
case 'SNDt':
HIViewSetNeedsDisplay(customView, true);
status = noErr;
break;
//
// Setting the control value of the custom view
//
case 'SV00':
SetControl32BitValue(customView, 0);
status = noErr;
break;
case 'SV01':
SetControl32BitValue(customView, 1);
status = noErr;
break;
case 'SV17':
SetControl32BitValue(customView, 17);
status = noErr;
break;
case 'SVTH':
SetControl32BitValue(customView, 1000);
status = noErr;
break;
case 'SVet':
{
HIViewRef editText;
HIViewFindByID(HIViewGetRoot(GetControlOwner(customView)), kSetValueEditID, &editText);
char buffer[11];
Size actualSize;
GetControlData(editText, kControlEntireControl, kControlEditTextTextTag, 10, buffer, &actualSize);
if (actualSize > 10) actualSize = 10;
buffer[actualSize] = 0;
SetControl32BitValue(customView, atoi(buffer));
}
status = noErr;
break;
//
// Setting the state of the custom view
//
case 'CHlt':
// setting the hilite to non-0 also stomps the previous hilite state if any
// and we don't want that in our testing
if (GetControl32BitValue(aCommand.source.control) == 1)
HiliteControl(customView, 1);
else
HiliteControl(customView, 0);
status = noErr;
break;
case 'CEnb':
{
HIViewRef hiliteControl;
HIViewFindByID(HIViewGetRoot(GetControlOwner(customView)), kCheckHiliteID, &hiliteControl);
if (GetControl32BitValue(aCommand.source.control) == 1)
EnableControl(customView);
else
DisableControl(customView);
UInt16 prevHilite = GetControlHilite(customView);
if ((prevHilite == kControlInactivePart) || (prevHilite == kControlDisabledPart))
DisableControl(hiliteControl);
else
EnableControl(hiliteControl);
HIViewSetNeedsDisplay(customView, true);
}
status = noErr;
break;
case 'CAct':
{
HIViewRef hiliteControl;
HIViewFindByID(HIViewGetRoot(GetControlOwner(customView)), kCheckHiliteID, &hiliteControl);
if (GetControl32BitValue(aCommand.source.control) == 1)
ActivateControl(customView);
else
DeactivateControl(customView);
UInt16 prevHilite = GetControlHilite(customView);
if ((prevHilite == kControlInactivePart) || (prevHilite == kControlDisabledPart))
DisableControl(hiliteControl);
else
EnableControl(hiliteControl);
HIViewSetNeedsDisplay(customView, true);
}
status = noErr;
break;
//
// Testing the custom view in or as a scroller in a HIScrollView
//
case 'CTiS':
case 'CTaS':
if (GetControl32BitValue(aCommand.source.control) == 1)
{
// create a HIScrollView and install it where and as the custom view was
HIViewRef scrollView;
status = HIScrollViewCreate(kHIScrollViewValidOptions, &scrollView);
require_noerr(status, ExitCommandProcess);
HIRect frame;
status = HIViewGetFrame(customView, &frame);
require_noerr(status, ExitCommandProcess);
status = HIViewSetFrame(scrollView, &frame);
require_noerr(status, ExitCommandProcess);
HIViewSetLayoutInfo(scrollView, &kBindToParentLayout);
HIViewSetLayoutInfo(customView, &kNoBindLayout);
status = HIViewAddSubview(HIViewGetSuperview(customView), scrollView);
require_noerr(status, ExitCommandProcess);
if (aCommand.commandID == 'CTiS')
{
// if we are testing the custom view in a scroller, we embed it in a scrolling User Pane
// that we embed in the HIScrollView
Rect boundsRect = {0, 0, 1000, 1000};
HIViewRef userPane;
status = CreateUserPaneControl(NULL, &boundsRect, kControlSupportsEmbedding, &userPane);
require_noerr(status, ExitCommandProcess);
EventTypeSpec userPaneEvents[] =
{
{kEventClassScrollable, kEventScrollableGetInfo},
{kEventClassScrollable, kEventScrollableScrollTo}
};
InstallControlEventHandler(userPane, UserPaneHandler, 2, userPaneEvents, userPane, NULL);
status = HIViewAddSubview(scrollView, userPane);
require_noerr(status, ExitCommandProcess);
status = HIViewAddSubview(userPane, customView);
require_noerr(status, ExitCommandProcess);
HIViewSetVisible(userPane, true);
}
else
{
// else we just embed the custom view directly in the HIScrollView
status = HIViewAddSubview(scrollView, customView);
require_noerr(status, ExitCommandProcess);
}
HIViewSetVisible(scrollView, true);
// the 2 modes are not compatible so we disable the other check box
HIViewRef otherCheckToDisable;
if (aCommand.commandID == 'CTiS')
HIViewFindByID(HIViewGetRoot(GetControlOwner(customView)), kCheckTestAsScrollID, &otherCheckToDisable);
else
HIViewFindByID(HIViewGetRoot(GetControlOwner(customView)), kCheckTestInScrollID, &otherCheckToDisable);
require_noerr(status, ExitCommandProcess);
DisableControl(otherCheckToDisable);
// if we reach here, status is already set to noErr so we don't set it again
}
else
{
// we remove the HIScrollView and set the custom view back to where and as it was
HIViewRef scrollView;
if (aCommand.commandID == 'CTiS')
scrollView = HIViewGetSuperview(HIViewGetSuperview(customView));
else
scrollView = HIViewGetSuperview(customView);
status = HIViewAddSubview(HIViewGetSuperview(scrollView), customView);
require_noerr(status, ExitCommandProcess);
HIRect frame;
status = HIViewGetFrame(scrollView, &frame);
require_noerr(status, ExitCommandProcess);
status = HIViewSetFrame(customView, &frame);
require_noerr(status, ExitCommandProcess);
HIViewSetLayoutInfo(customView, &kBindToParentLayout);
// by releasing the HIScrollView, we also release the scrolling User Pane if any
// which was embedded inside
CFRelease(scrollView);
// we renable the other check box
HIViewRef otherCheckToEnable;
if (aCommand.commandID == 'CTiS')
HIViewFindByID(HIViewGetRoot(GetControlOwner(customView)), kCheckTestAsScrollID, &otherCheckToEnable);
else
HIViewFindByID(HIViewGetRoot(GetControlOwner(customView)), kCheckTestInScrollID, &otherCheckToEnable);
require_noerr(status, ExitCommandProcess);
EnableControl(otherCheckToEnable);
// if we reach here, status is already set to noErr so we don't set it again
}
break;
}
ExitCommandProcess:
return status;
} // Handle_WindowCommandProcess
void ConfigureCheat (void)
{
if (!cartOpen)
return;
OSStatus err;
IBNibRef nibRef;
err = CreateNibReference(kMacS9XCFString, &nibRef);
if (err == noErr)
{
err = CreateWindowFromNib(nibRef, CFSTR("CheatEntry"), &wRef);
if (err == noErr)
{
DataBrowserCallbacks callbacks;
EventHandlerRef eref;
EventHandlerUPP eUPP;
EventTypeSpec events[] = { { kEventClassCommand, kEventCommandProcess },
{ kEventClassCommand, kEventCommandUpdateStatus },
{ kEventClassWindow, kEventWindowClose } };
HIViewRef ctl, root;
HIViewID cid;
root = HIViewGetRoot(wRef);
cid.id = 0;
cid.signature = kDataBrowser;
HIViewFindByID(root, cid, &dbRef);
#ifdef MAC_PANTHER_SUPPORT
if (systemVersion < 0x1040)
{
HISize minSize;
Rect rct;
GetWindowBounds(wRef, kWindowContentRgn, &rct);
minSize.width = (float) (rct.right - rct.left);
minSize.height = (float) (rct.bottom - rct.top );
err = SetWindowResizeLimits(wRef, &minSize, NULL);
}
#endif
callbacks.version = kDataBrowserLatestCallbacks;
err = InitDataBrowserCallbacks(&callbacks);
callbacks.u.v1.itemDataCallback = NewDataBrowserItemDataUPP(DBClientDataCallback);
callbacks.u.v1.itemCompareCallback = NewDataBrowserItemCompareUPP(DBCompareCallBack);
callbacks.u.v1.itemNotificationCallback = NewDataBrowserItemNotificationUPP(DBItemNotificationCallBack);
err = SetDataBrowserCallbacks(dbRef, &callbacks);
if (systemVersion >= 0x1040)
err = DataBrowserChangeAttributes(dbRef, kDataBrowserAttributeListViewAlternatingRowColors, kDataBrowserAttributeNone);
InitCheatItems();
ImportCheatItems();
DataBrowserItemID *id;
id = new DataBrowserItemID[MAC_MAX_CHEATS];
if (!id)
QuitWithFatalError(0, "cheat 01");
numofcheats = 0;
for (unsigned int i = 0; i < MAC_MAX_CHEATS; i++)
{
if (citem[i].valid)
{
id[numofcheats] = citem[i].id;
numofcheats++;
}
}
if (numofcheats)
err = AddDataBrowserItems(dbRef, kDataBrowserNoItem, numofcheats, id, kDataBrowserItemNoProperty);
delete [] id;
cid.signature = kNewButton;
HIViewFindByID(root, cid, &ctl);
if (numofcheats == MAC_MAX_CHEATS)
err = DeactivateControl(ctl);
else
err = ActivateControl(ctl);
cid.signature = kAllButton;
HIViewFindByID(root, cid, &ctl);
if (numofcheats == 0)
err = DeactivateControl(ctl);
else
err = ActivateControl(ctl);
cid.signature = kDelButton;
HIViewFindByID(root, cid, &ctl);
err = DeactivateControl(ctl);
eUPP = NewEventHandlerUPP(CheatEventHandler);
err = InstallWindowEventHandler(wRef, eUPP, GetEventTypeCount(events), events, (void *) wRef, &eref);
err = SetKeyboardFocus(wRef, dbRef, kControlFocusNextPart);
MoveWindowPosition(wRef, kWindowCheatEntry, true);
ShowWindow(wRef);
err = RunAppModalLoopForWindow(wRef);
HideWindow(wRef);
SaveWindowPosition(wRef, kWindowCheatEntry);
err = RemoveEventHandler(eref);
DisposeEventHandlerUPP(eUPP);
DisposeDataBrowserItemNotificationUPP(callbacks.u.v1.itemNotificationCallback);
DisposeDataBrowserItemCompareUPP(callbacks.u.v1.itemCompareCallback);
DisposeDataBrowserItemDataUPP(callbacks.u.v1.itemDataCallback);
CFRelease(wRef);
DetachCheatItems();
}
DisposeNibReference(nibRef);
}
}
void
addfdsns_to_list (TDSNCHOOSER *dsnchoose_t, char *path, Boolean b_reset)
{
DataBrowserItemID item = DBITEM_ID + 1;
DataBrowserCallbacks dbCallbacks;
ThemeDrawingState outState = NULL;
UInt16 colSize[3] = { 400, 100, 150 };
SInt16 outBaseline;
Point ioBound;
int i;
DIR *dir;
char *path_buf;
struct dirent *dir_entry;
struct stat fstat;
int b_added;
ControlRef widget;
WindowRef dlg;
if (!dsnchoose_t || !path)
return;
widget = dsnchoose_t->fdsnlist;
dlg = dsnchoose_t->mainwnd;
GetThemeDrawingState (&outState);
/* Install an event handler on the component databrowser */
dbCallbacks.version = kDataBrowserLatestCallbacks;
InitDataBrowserCallbacks (&dbCallbacks);
dbCallbacks.u.v1.itemNotificationCallback =
NewDataBrowserItemNotificationUPP (fdsn_notification_item);
/* On Mac OS X 10.0.x : clientDataCallback */
dbCallbacks.u.v1.itemDataCallback =
NewDataBrowserItemDataUPP (fdsn_getset_item);
SetDataBrowserCallbacks (widget, &dbCallbacks);
/* Begin the draw of the data browser */
SetDataBrowserTarget (widget, DBITEM_ID);
/* Make the clean up */
for (i = 0; i < FDSN_nrows; i++, item++)
{
CFRelease (FDSN_array[i]);
FDSN_array[i] = NULL;
FDSN_type[i] = 0;
RemoveDataBrowserItems (widget, DBITEM_ID, 1, &item, DBNAME_ID);
}
ActivateControl (widget);
DrawOneControl (widget);
/* Global Initialization */
FDSN_nrows = 0;
item = DBITEM_ID + 1;
if ((dir = opendir (path)))
{
while ((dir_entry = readdir (dir)) && FDSN_nrows < MAX_ROWS)
{
asprintf (&path_buf, "%s/%s", path, dir_entry->d_name);
b_added = 0;
if (stat ((LPCSTR) path_buf, &fstat) >= 0 && S_ISDIR (fstat.st_mode))
{
if (dir_entry->d_name && dir_entry->d_name[0] != '.')
{
FDSN_array[FDSN_nrows] = CFStringCreateWithCString(NULL, dir_entry->d_name, kCFStringEncodingUTF8);
FDSN_type[FDSN_nrows] = 0;
b_added = 1;
}
}
else if (stat ((LPCSTR) path_buf, &fstat) >= 0 && !S_ISDIR (fstat.st_mode)
&& strstr (dir_entry->d_name, ".dsn"))
{
FDSN_array[FDSN_nrows] = CFStringCreateWithCString(NULL, dir_entry->d_name, kCFStringEncodingUTF8);
FDSN_type[FDSN_nrows] = 1;
b_added = 1;
}
if (path_buf)
free (path_buf);
if (b_added)
{
GetThemeTextDimensions (FDSN_array[FDSN_nrows], kThemeSystemFont,
kThemeStateActive, false, &ioBound, &outBaseline);
if(colSize[0] < ioBound.h) colSize[0] = ioBound.h;
AddDataBrowserItems (widget, DBITEM_ID, 1, &item, DBNAME_ID);
item++;
FDSN_nrows++;
}
}
/* Close the directory entry */
closedir (dir);
}
else
create_error (NULL, NULL, "Error during accessing directory information",
strerror (errno));
ActivateControl (widget);
/* Resize the columns to have a good look */
SetDataBrowserTableViewNamedColumnWidth (widget, DBNAME_ID, colSize[0] + 20);
DrawOneControl (widget);
/* Remove the DataBrowser callback */
SetDataBrowserCallbacks (NULL, &dbCallbacks);
if(outState) DisposeThemeDrawingState (outState);
if (b_reset)
SetDataBrowserScrollPosition(widget, 0, 0);
fill_dir_menu(dsnchoose_t, path);
}
pascal OSStatus
keyval_add_clicked (EventHandlerCallRef inHandlerRef,
EventRef inEvent, void *inUserData)
{
TKEYVAL *keyval_t = (TKEYVAL *) inUserData;
DataBrowserItemID item = DBITEM_ID + 1;
DataBrowserCallbacks dbCallbacks;
ThemeDrawingState outState = NULL;
UInt16 colSize[2] = { 150, 250 };
SInt16 outBaseline;
Point ioBound;
CFStringRef data[2];
Size len;
int i = 0, j;
if (keyval_t)
{
GetThemeDrawingState (&outState);
GetControlData (keyval_t->key_entry, 0, kControlEditTextCFStringTag,
sizeof (CFStringRef), &data[0], &len);
if (CFStringGetLength(data[0]))
{
GetControlData (keyval_t->value_entry, 0, kControlEditTextCFStringTag,
sizeof (CFStringRef), &data[1], &len);
/* Try to see if the keyword already exists */
for (i = 0; i < KEYVAL_nrows; i++, item++)
if (CFStringCompare (data[0], KEYVAL_array[0][i],
0) == kCFCompareEqualTo)
goto done;
/* Install an event handler on the component databrowser */
dbCallbacks.version = kDataBrowserLatestCallbacks;
InitDataBrowserCallbacks (&dbCallbacks);
dbCallbacks.u.v1.itemNotificationCallback =
NewDataBrowserItemNotificationUPP (keyval_notification_item);
/* On Mac OS X 10.0.x : this is clientDataCallback */
dbCallbacks.u.v1.itemDataCallback =
NewDataBrowserItemDataUPP (keyval_getset_item);
SetDataBrowserCallbacks (keyval_t->key_list, &dbCallbacks);
/* Begin the draw of the data browser */
SetDataBrowserTarget (keyval_t->key_list, DBITEM_ID);
/* An update operation */
if(i<KEYVAL_nrows)
{
CFRelease (KEYVAL_array[1][i]);
KEYVAL_array[1][i] = data[1];
UpdateDataBrowserItems (keyval_t->key_list, DBITEM_ID, 1, &item,
GSKEYWORD_ID, kDataBrowserItemNoProperty);
}
else if(len)
{
KEYVAL_array[0][i] = data[0];
KEYVAL_array[1][i] = data[1];
AddDataBrowserItems (keyval_t->key_list, DBITEM_ID, 1, &item,
GSKEYWORD_ID);
KEYVAL_nrows++;
}
for(j = 0 ; j < KEYVAL_nrows ; j++)
{
for(i = 0 ; i < 2 ; i++)
{
GetThemeTextDimensions (KEYVAL_array[i][j], kThemeSystemFont,
kThemeStateActive, false, &ioBound, &outBaseline);
if(colSize[i] < ioBound.h) colSize[i] = ioBound.h;
}
}
ActivateControl (keyval_t->key_list);
/* Resize the columns to have a good look */
SetDataBrowserTableViewNamedColumnWidth (keyval_t->key_list, GSKEYWORD_ID, colSize[0] + 20);
SetDataBrowserTableViewNamedColumnWidth (keyval_t->key_list, GSVALUE_ID, colSize[1] + 20);
DrawOneControl (keyval_t->key_list);
/* Remove the DataBrowser callback */
SetDataBrowserCallbacks (NULL, &dbCallbacks);
}
done:
SetControlData (keyval_t->key_entry, 0, kControlEditTextTextTag, 0,
"");
DrawOneControl (keyval_t->key_entry);
SetControlData (keyval_t->value_entry, 0, kControlEditTextTextTag, 0,
"");
DrawOneControl (keyval_t->value_entry);
DeactivateControl (KEYVAL->bupdate);
DrawOneControl (KEYVAL->bupdate);
}
return noErr;
}
/* Changed ... Have to implement the same for translators */
void
adddrivers_to_list (ControlRef widget, WindowRef dlg, BOOL addNotify)
{
wchar_t drvdesc[1024], drvattrs[1024], driver[1024];
DataBrowserItemID item = DBITEM_ID + 1;
DataBrowserCallbacks dbCallbacks;
ThemeDrawingState outState = NULL;
UInt16 colSize[5] = { 150, 150, 100, 50 , 50};
void *handle;
SInt16 outBaseline;
Point ioBound;
struct stat _stat;
SQLSMALLINT len, len1;
SQLRETURN ret;
HENV henv, drv_henv;
HDBC drv_hdbc;
pSQLGetInfoFunc funcHdl;
pSQLAllocHandle allocHdl;
pSQLAllocEnv allocEnvHdl = NULL;
pSQLAllocConnect allocConnectHdl = NULL;
pSQLFreeHandle freeHdl;
pSQLFreeEnv freeEnvHdl;
pSQLFreeConnect freeConnectHdl;
char *_drv_u8 = NULL;
int i;
if (!widget)
return;
GetThemeDrawingState (&outState);
/* Install an event handler on the component databrowser */
dbCallbacks.version = kDataBrowserLatestCallbacks;
InitDataBrowserCallbacks (&dbCallbacks);
if (addNotify)
dbCallbacks.u.v1.itemNotificationCallback =
NewDataBrowserItemNotificationUPP (drivers_notification_item);
/* On Mac OS X 10.0.x : clientDataCallback */
dbCallbacks.u.v1.itemDataCallback =
NewDataBrowserItemDataUPP (drivers_getset_item);
SetDataBrowserCallbacks (widget, &dbCallbacks);
/* Begin the draw of the data browser */
SetDataBrowserTarget (widget, DBITEM_ID);
/* Make the clean up */
for (i = 0; i < Drivers_nrows; i++, item++)
{
CFRelease (Drivers_array[0][i]);
Drivers_array[0][i] = NULL;
CFRelease (Drivers_array[1][i]);
Drivers_array[1][i] = NULL;
CFRelease (Drivers_array[2][i]);
Drivers_array[2][i] = NULL;
CFRelease (Drivers_array[3][i]);
Drivers_array[3][i] = NULL;
CFRelease (Drivers_array[4][i]);
Drivers_array[4][i] = NULL;
RemoveDataBrowserItems (widget, DBITEM_ID, 1, &item, DBNAME_ID);
}
/* Global Initialization */
Drivers_nrows = 0;
item = DBITEM_ID + 1;
/* Create a HENV to get the list of drivers then */
ret = SQLAllocHandle (SQL_HANDLE_ENV, SQL_NULL_HANDLE, &henv);
if (ret != SQL_SUCCESS && ret != SQL_SUCCESS_WITH_INFO)
{
_iodbcdm_nativeerrorbox (dlg, henv, SQL_NULL_HANDLE, SQL_NULL_HANDLE);
goto end;
}
/* Set the version ODBC API to use */
SQLSetEnvAttr (henv, SQL_ATTR_ODBC_VERSION, (SQLPOINTER) SQL_OV_ODBC3,
SQL_IS_UINTEGER);
/* Get the list of drivers */
ret =
SQLDriversW (henv, SQL_FETCH_FIRST, drvdesc, sizeof (drvdesc)/sizeof(wchar_t),
&len, drvattrs, sizeof (drvattrs)/sizeof(wchar_t), &len1);
if (ret != SQL_SUCCESS && ret != SQL_SUCCESS_WITH_INFO && ret != SQL_NO_DATA)
{
_iodbcdm_nativeerrorbox (dlg, henv, SQL_NULL_HANDLE, SQL_NULL_HANDLE);
goto error;
}
while (ret != SQL_NO_DATA)
{
Drivers_array[0][Drivers_nrows] = convert_wchar_to_CFString(drvdesc);
/* Get the driver library name */
SQLSetConfigMode (ODBC_BOTH_DSN);
SQLGetPrivateProfileStringW (drvdesc, L"Driver", L"", driver,
sizeof (driver)/sizeof(wchar_t), L"odbcinst.ini");
if (driver[0] == L'\0')
SQLGetPrivateProfileStringW (L"Default", L"Driver", L"", driver,
sizeof (driver)/sizeof(wchar_t), L"odbcinst.ini");
if (driver[0] == L'\0')
{
if (Drivers_array[0][Drivers_nrows])
{
CFRelease (Drivers_array[0][Drivers_nrows]);
Drivers_array[0][Drivers_nrows] = NULL;
}
goto skip;
}
Drivers_array[1][Drivers_nrows] = convert_wchar_to_CFString(driver);
/* Alloc a connection handle */
drv_hdbc = NULL;
drv_henv = NULL;
_drv_u8 = (char *) dm_SQL_WtoU8((SQLWCHAR*)driver, SQL_NTS);
if (_drv_u8 == NULL)
goto skip;
if ((handle = DLL_OPEN(_drv_u8)) != NULL)
{
if ((allocHdl = (pSQLAllocHandle)DLL_PROC(handle, "SQLAllocHandle")) != NULL)
{
ret = allocHdl(SQL_HANDLE_ENV, SQL_NULL_HANDLE, &drv_henv);
if (ret == SQL_ERROR) goto nodriverver;
ret = allocHdl(SQL_HANDLE_DBC, drv_henv, &drv_hdbc);
if (ret == SQL_ERROR) goto nodriverver;
}
else
{
if ((allocEnvHdl = (pSQLAllocEnv)DLL_PROC(handle, "SQLAllocEnv")) != NULL)
{
ret = allocEnvHdl(&drv_henv);
if (ret == SQL_ERROR) goto nodriverver;
}
else goto nodriverver;
if ((allocConnectHdl = (pSQLAllocConnect)DLL_PROC(handle, "SQLAllocConnect")) != NULL)
{
ret = allocConnectHdl(drv_henv, &drv_hdbc);
if (ret == SQL_ERROR) goto nodriverver;
}
else goto nodriverver;
}
/*
* Use SQLGetInfoA for Unicode drivers
* and SQLGetInfo for ANSI drivers
*/
funcHdl = (pSQLGetInfoFunc)DLL_PROC(handle, "SQLGetInfoA");
if (!funcHdl)
funcHdl = (pSQLGetInfoFunc)DLL_PROC(handle, "SQLGetInfo");
if (funcHdl)
{
/* Retrieve some informations */
ret = funcHdl (drv_hdbc, SQL_DRIVER_VER, drvattrs, sizeof(drvattrs), &len);
if (ret == SQL_SUCCESS || ret == SQL_SUCCESS_WITH_INFO)
{
char *p = drvattrs;
/* Find the description if one provided */
for (; *p ; p++)
{
if (*p == ' ')
{
*p++ = '\0';
break;
}
}
/*
* Store Version
*/
Drivers_array[2][Drivers_nrows] = CFStringCreateWithCString(NULL, (char *)drvattrs, kCFStringEncodingUTF8);
}
else goto nodriverver;
}
else if ((funcHdl = (pSQLGetInfoFunc)DLL_PROC(handle, "SQLGetInfoW")) != NULL)
{
/* Retrieve some informations */
ret = funcHdl (drv_hdbc, SQL_DRIVER_VER, drvattrs, sizeof(drvattrs), &len);
if (ret == SQL_SUCCESS || ret == SQL_SUCCESS_WITH_INFO)
{
wchar_t *p = drvattrs;
/* Find the description if one provided */
for (; *p ; p++)
{
if (*p == L' ')
{
*p++ = L'\0';
break;
}
}
/*
* Store Version
*/
Drivers_array[2][Drivers_nrows] = convert_wchar_to_CFString(drvattrs);
}
else goto nodriverver;
}
else goto nodriverver;
}
else
{
nodriverver:
Drivers_array[2][Drivers_nrows] = CFStringCreateWithCString(NULL,
"##.##", kCFStringEncodingUTF8);
}
if(drv_hdbc || drv_henv)
{
if(allocConnectHdl &&
(freeConnectHdl = (pSQLFreeConnect)DLL_PROC(handle, "SQLFreeConnect")) != NULL)
{ freeConnectHdl(drv_hdbc); drv_hdbc = NULL; }
if(allocEnvHdl &&
(freeEnvHdl = (pSQLFreeEnv)DLL_PROC(handle, "SQLFreeEnv")) != NULL)
{ freeEnvHdl(drv_henv); drv_henv = NULL; }
}
if ((drv_hdbc || drv_henv) &&
(freeHdl = (pSQLFreeHandle)DLL_PROC(handle, "SQLFreeHandle")) != NULL)
{
if(drv_hdbc) freeHdl(SQL_HANDLE_DBC, drv_hdbc);
if(drv_henv) freeHdl(SQL_HANDLE_ENV, drv_henv);
}
DLL_CLOSE(handle);
/* Get the size and date of the driver */
if (!stat (_drv_u8, &_stat))
{
CFStringRef strRef;
struct tm drivertime;
char buf[100];
Drivers_array[3][Drivers_nrows] =
CFStringCreateWithFormat(NULL, NULL,
strRef = CFStringCreateWithCString(NULL, "%d Kb", kCFStringEncodingUTF8),
(int) (_stat.st_size / 1024));
CFRelease(strRef);
localtime_r (&_stat.st_mtime, &drivertime);
strftime (buf, sizeof (buf), "%c", &drivertime);
Drivers_array[4][Drivers_nrows] = CFStringCreateWithCString(NULL,
buf, kCFStringEncodingUTF8);
}
else
{
Drivers_array[3][Drivers_nrows] = CFStringCreateWithCString(NULL,
"-", kCFStringEncodingUTF8);
Drivers_array[4][Drivers_nrows] = CFStringCreateWithCString(NULL,
"-", kCFStringEncodingUTF8);
}
for(i = 0 ; i < 5 ; i++)
{
GetThemeTextDimensions (Drivers_array[i][Drivers_nrows], kThemeSystemFont,
kThemeStateActive, false, &ioBound, &outBaseline);
if(colSize[i] < ioBound.h) colSize[i] = ioBound.h;
}
AddDataBrowserItems (widget, DBITEM_ID, 1, &item, DBNAME_ID);
item++;
Drivers_nrows++;
/* Process next one */
skip:
MEM_FREE (_drv_u8);
_drv_u8 = NULL;
ret = SQLDriversW (henv, SQL_FETCH_NEXT, drvdesc,
sizeof (drvdesc)/sizeof(wchar_t), &len, drvattrs,
sizeof (drvattrs)/sizeof(wchar_t), &len1);
if (ret != SQL_SUCCESS && ret != SQL_SUCCESS_WITH_INFO && ret != SQL_NO_DATA)
{
_iodbcdm_nativeerrorbox (dlg, henv, SQL_NULL_HANDLE,
SQL_NULL_HANDLE);
goto error;
}
}
error:
/* Clean all that */
SQLFreeHandle (SQL_HANDLE_ENV, henv);
end:
ActivateControl (widget);
/* Resize the columns to have a good look */
SetDataBrowserTableViewNamedColumnWidth (widget, DBNAME_ID, colSize[0] + 20);
SetDataBrowserTableViewNamedColumnWidth (widget, DBFILE_ID, colSize[1] + 20);
SetDataBrowserTableViewNamedColumnWidth (widget, DBVERSION_ID, colSize[2] + 20);
SetDataBrowserTableViewNamedColumnWidth (widget, DBSIZE_ID, colSize[3] + 20);
SetDataBrowserTableViewNamedColumnWidth (widget, DBDATE_ID, colSize[4] + 20);
DrawOneControl (widget);
/* Remove the DataBrowser callback */
SetDataBrowserCallbacks (NULL, &dbCallbacks);
if(outState) DisposeThemeDrawingState (outState);
}
