gecko/widget/os2/nsLookAndFeel.cpp

582 lines
18 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.org 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):
* John Fairhurst <john_fairhurst@iname.com>
* Michael Lowe <michael.lowe@bigfoot.com>
* Pierre Phaneuf <pp@ludusdesign.com>
*
* Alternatively, the contents of this file may be used under the terms of
* either 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 ***** */
#define INCL_WIN
#define INCL_WINWINDOWMGR
#define INCL_WINSHELLDATA
#define INCL_DOSNLS
#define INCL_DOSERRORS
#include <os2.h>
#include <stdlib.h>
#include "nsLookAndFeel.h"
#include "nsFont.h"
#include "nsSize.h"
#include "nsStyleConsts.h"
static bool bIsDBCS;
static bool bIsDBCSSet = false;
nsLookAndFeel::nsLookAndFeel() : nsXPLookAndFeel()
{
}
nsLookAndFeel::~nsLookAndFeel()
{
}
nsresult
nsLookAndFeel::NativeGetColor(ColorID aID, nscolor &aColor)
{
nsresult res = NS_OK;
int idx;
switch (aID) {
case eColorID_WindowBackground:
idx = SYSCLR_WINDOW;
break;
case eColorID_WindowForeground:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID_WidgetBackground:
idx = SYSCLR_BUTTONMIDDLE;
break;
case eColorID_WidgetForeground:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID_WidgetSelectBackground:
idx = SYSCLR_HILITEBACKGROUND;
break;
case eColorID_WidgetSelectForeground:
idx = SYSCLR_HILITEFOREGROUND;
break;
case eColorID_Widget3DHighlight:
idx = SYSCLR_BUTTONLIGHT;
break;
case eColorID_Widget3DShadow:
idx = SYSCLR_BUTTONDARK;
break;
case eColorID_TextBackground:
idx = SYSCLR_WINDOW;
break;
case eColorID_TextForeground:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID_TextSelectBackground:
case eColorID_IMESelectedRawTextBackground:
case eColorID_IMESelectedConvertedTextBackground:
idx = SYSCLR_HILITEBACKGROUND;
break;
case eColorID_TextSelectForeground:
case eColorID_IMESelectedRawTextForeground:
case eColorID_IMESelectedConvertedTextForeground:
idx = SYSCLR_HILITEFOREGROUND;
break;
case eColorID_IMERawInputBackground:
case eColorID_IMEConvertedTextBackground:
aColor = NS_TRANSPARENT;
return NS_OK;
case eColorID_IMERawInputForeground:
case eColorID_IMEConvertedTextForeground:
aColor = NS_SAME_AS_FOREGROUND_COLOR;
return NS_OK;
case eColorID_IMERawInputUnderline:
case eColorID_IMEConvertedTextUnderline:
aColor = NS_SAME_AS_FOREGROUND_COLOR;
return NS_OK;
case eColorID_IMESelectedRawTextUnderline:
case eColorID_IMESelectedConvertedTextUnderline:
aColor = NS_TRANSPARENT;
return NS_OK;
case eColorID_SpellCheckerUnderline:
aColor = NS_RGB(0xff, 0, 0);
return NS_OK;
// New CSS 2 Color definitions
case eColorID_activeborder:
idx = SYSCLR_ACTIVEBORDER;
break;
case eColorID_activecaption:
idx = SYSCLR_ACTIVETITLETEXT;
break;
case eColorID_appworkspace:
idx = SYSCLR_APPWORKSPACE;
break;
case eColorID_background:
idx = SYSCLR_BACKGROUND;
break;
case eColorID_buttonface:
case eColorID__moz_buttonhoverface:
idx = SYSCLR_BUTTONMIDDLE;
break;
case eColorID_buttonhighlight:
idx = SYSCLR_BUTTONLIGHT;
break;
case eColorID_buttonshadow:
idx = SYSCLR_BUTTONDARK;
break;
case eColorID_buttontext:
case eColorID__moz_buttonhovertext:
idx = SYSCLR_MENUTEXT;
break;
case eColorID_captiontext:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID_graytext:
idx = SYSCLR_MENUDISABLEDTEXT;
break;
case eColorID_highlight:
case eColorID__moz_html_cellhighlight:
idx = SYSCLR_HILITEBACKGROUND;
break;
case eColorID_highlighttext:
case eColorID__moz_html_cellhighlighttext:
idx = SYSCLR_HILITEFOREGROUND;
break;
case eColorID_inactiveborder:
idx = SYSCLR_INACTIVEBORDER;
break;
case eColorID_inactivecaption:
idx = SYSCLR_INACTIVETITLE;
break;
case eColorID_inactivecaptiontext:
idx = SYSCLR_INACTIVETITLETEXT;
break;
case eColorID_infobackground:
aColor = NS_RGB( 255, 255, 228);
return res;
case eColorID_infotext:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID_menu:
idx = SYSCLR_MENU;
break;
case eColorID_menutext:
case eColorID__moz_menubartext:
idx = SYSCLR_MENUTEXT;
break;
case eColorID_scrollbar:
idx = SYSCLR_SCROLLBAR;
break;
case eColorID_threeddarkshadow:
idx = SYSCLR_BUTTONDARK;
break;
case eColorID_threedface:
idx = SYSCLR_BUTTONMIDDLE;
break;
case eColorID_threedhighlight:
idx = SYSCLR_BUTTONLIGHT;
break;
case eColorID_threedlightshadow:
idx = SYSCLR_BUTTONMIDDLE;
break;
case eColorID_threedshadow:
idx = SYSCLR_BUTTONDARK;
break;
case eColorID_window:
idx = SYSCLR_WINDOW;
break;
case eColorID_windowframe:
idx = SYSCLR_WINDOWFRAME;
break;
case eColorID_windowtext:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID__moz_eventreerow:
case eColorID__moz_oddtreerow:
case eColorID__moz_field:
case eColorID__moz_combobox:
idx = SYSCLR_ENTRYFIELD;
break;
case eColorID__moz_fieldtext:
case eColorID__moz_comboboxtext:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID__moz_dialog:
case eColorID__moz_cellhighlight:
idx = SYSCLR_DIALOGBACKGROUND;
break;
case eColorID__moz_dialogtext:
case eColorID__moz_cellhighlighttext:
idx = SYSCLR_WINDOWTEXT;
break;
case eColorID__moz_buttondefault:
idx = SYSCLR_BUTTONDEFAULT;
break;
case eColorID__moz_menuhover:
if (WinQuerySysColor(HWND_DESKTOP, SYSCLR_MENUHILITEBGND, 0) ==
WinQuerySysColor(HWND_DESKTOP, SYSCLR_MENU, 0)) {
// if this happens, we would paint menu selections unreadable
// (we are most likely on Warp3), so let's fake a dark grey
// background for the selected menu item
aColor = NS_RGB( 132, 130, 132);
return res;
} else {
idx = SYSCLR_MENUHILITEBGND;
}
break;
case eColorID__moz_menuhovertext:
case eColorID__moz_menubarhovertext:
if (WinQuerySysColor(HWND_DESKTOP, SYSCLR_MENUHILITEBGND, 0) ==
WinQuerySysColor(HWND_DESKTOP, SYSCLR_MENU, 0)) {
// white text to be readable on dark grey
aColor = NS_RGB( 255, 255, 255);
return res;
} else {
idx = SYSCLR_MENUHILITE;
}
break;
case eColorID__moz_nativehyperlinktext:
aColor = NS_RGB( 0, 0, 255);
return res;
default:
idx = SYSCLR_WINDOW;
break;
}
long lColor = WinQuerySysColor( HWND_DESKTOP, idx, 0);
int iRed = (lColor & RGB_RED) >> 16;
int iGreen = (lColor & RGB_GREEN) >> 8;
int iBlue = (lColor & RGB_BLUE);
aColor = NS_RGB( iRed, iGreen, iBlue);
return res;
}
nsresult
nsLookAndFeel::GetIntImpl(IntID aID, PRInt32 &aResult)
{
nsresult res = nsXPLookAndFeel::GetIntImpl(aID, aResult);
if (NS_SUCCEEDED(res))
return res;
res = NS_OK;
switch (aID) {
case eIntID_CaretBlinkTime:
aResult = WinQuerySysValue( HWND_DESKTOP, SV_CURSORRATE);
break;
case eIntID_CaretWidth:
aResult = 1;
break;
case eIntID_ShowCaretDuringSelection:
aResult = 0;
break;
case eIntID_SelectTextfieldsOnKeyFocus:
// Do not select textfield content when focused by kbd
// used by nsEventStateManager::sTextfieldSelectModel
aResult = 0;
break;
case eIntID_SubmenuDelay:
aResult = 300;
break;
case eIntID_TooltipDelay:
aResult = 500;
break;
case eIntID_MenusCanOverlapOSBar:
// we want XUL popups to be able to overlap the task bar.
aResult = 1;
break;
case eIntID_ScrollArrowStyle:
aResult = eScrollArrowStyle_Single;
break;
case eIntID_ScrollSliderStyle:
aResult = eScrollThumbStyle_Proportional;
break;
case eIntID_TreeOpenDelay:
aResult = 1000;
break;
case eIntID_TreeCloseDelay:
aResult = 0;
break;
case eIntID_TreeLazyScrollDelay:
aResult = 150;
break;
case eIntID_TreeScrollDelay:
aResult = 100;
break;
case eIntID_TreeScrollLinesMax:
aResult = 3;
break;
case eIntID_DWMCompositor:
case eIntID_WindowsClassic:
case eIntID_WindowsDefaultTheme:
case eIntID_TouchEnabled:
case eIntID_WindowsThemeIdentifier:
aResult = 0;
res = NS_ERROR_NOT_IMPLEMENTED;
break;
case eIntID_MacGraphiteTheme:
case eIntID_MacLionTheme:
case eIntID_MaemoClassic:
aResult = 0;
res = NS_ERROR_NOT_IMPLEMENTED;
break;
case eIntID_IMERawInputUnderlineStyle:
case eIntID_IMEConvertedTextUnderlineStyle:
aResult = NS_STYLE_TEXT_DECORATION_STYLE_SOLID;
break;
case eIntID_IMESelectedRawTextUnderlineStyle:
case eIntID_IMESelectedConvertedTextUnderline:
aResult = NS_STYLE_TEXT_DECORATION_STYLE_NONE;
break;
case eIntID_SpellCheckerUnderlineStyle:
aResult = NS_STYLE_TEXT_DECORATION_STYLE_WAVY;
break;
case eIntID_ScrollbarButtonAutoRepeatBehavior:
aResult = 0;
break;
default:
aResult = 0;
res = NS_ERROR_FAILURE;
}
return res;
}
nsresult
nsLookAndFeel::GetFloatImpl(FloatID aID, float &aResult)
{
nsresult res = nsXPLookAndFeel::GetFloatImpl(aID, aResult);
if (NS_SUCCEEDED(res))
return res;
res = NS_OK;
switch (aID) {
case eFloatID_IMEUnderlineRelativeSize:
aResult = 1.0f;
break;
case eFloatID_SpellCheckerUnderlineRelativeSize:
aResult = 1.0f;
break;
default:
aResult = -1.0;
res = NS_ERROR_FAILURE;
}
return res;
}
/* Helper function to determine if we are running on DBCS */
static bool
IsDBCS()
{
if (!bIsDBCSSet) {
APIRET rc;
COUNTRYCODE ctrycodeInfo = {0};
CHAR achDBCSInfo[12] = {0}; // DBCS environmental vector
ctrycodeInfo.country = 0; // current country
ctrycodeInfo.codepage = 0; // current codepage
rc = DosQueryDBCSEnv(sizeof(achDBCSInfo), &ctrycodeInfo, achDBCSInfo);
if (rc == NO_ERROR) {
// DBCS countries will have at least one nonzero byte in the
// first four bytes of the DBCS environmental vector
bIsDBCS = (achDBCSInfo[0] != 0 || achDBCSInfo[1] != 0 ||
achDBCSInfo[2] != 0 || achDBCSInfo[3] != 0);
} else {
bIsDBCS = false;
}
bIsDBCSSet = true;
}
return bIsDBCS;
}
/* Helper function to query font from INI file */
static void
QueryFontFromINI(char* fontType, char* fontName, ULONG ulLength)
{
ULONG ulMaxNameL = ulLength;
// We must use PrfQueryProfileData here, because some users have
// binary font data in their INI files.
if (PrfQueryProfileData(HINI_USER,
(PCSZ)"PM_SystemFonts",
(PCSZ)fontType,
fontName, &ulMaxNameL)) {
// PrfQueryProfileData does not nul-terminate for us.
fontName[ulMaxNameL] = '\0';
} else {
// If there was no entry in the INI, default to something sensible.
// Make sure to use a DBCS-capable font in a DBCS-capable environment.
if (IsDBCS()) {
strcpy(fontName, "9.WarpSans Combined");
} else {
strcpy(fontName, "9.WarpSans");
}
}
}
/*
* Query the font used for various CSS properties (aID) from the system.
* For OS/2, only very few fonts are defined in the system, so most of the IDs
* resolve to the same system font.
* The font queried will give back a string like
* 9.WarpSans Bold
* 12.Times New Roman Bold Italic
* 10.Times New Roman.Strikeout.Underline
* 20.Bitstream Vera Sans Mono Obli
* (always restricted to 32 chars, at least before the second dot)
* We use the value before the dot as the font size (in pt, and convert it to
* px using the screen resolution) and then try to use the rest of the string
* to determine the font style from it.
*/
bool
nsLookAndFeel::GetFont(FontID aID, nsString& aFontName,
gfxFontStyle& aFontStyle)
{
char szFontNameSize[MAXNAMEL];
switch (aID)
{
case eFont_Icon:
QueryFontFromINI("IconText", szFontNameSize, MAXNAMEL);
break;
case eFont_Menu:
QueryFontFromINI("Menus", szFontNameSize, MAXNAMEL);
break;
case eFont_Caption:
case eFont_MessageBox:
case eFont_SmallCaption:
case eFont_StatusBar:
case eFont_Tooltips:
case eFont_Widget:
case eFont_Window: // css3
case eFont_Document:
case eFont_Workspace:
case eFont_Desktop:
case eFont_Info:
case eFont_Dialog:
case eFont_Button:
case eFont_PullDownMenu:
case eFont_List:
case eFont_Field:
QueryFontFromINI("WindowText", szFontNameSize, MAXNAMEL);
break;
default:
NS_WARNING("None of the listed font types, using WarpSans");
if (!IsDBCS()) {
strcpy(szFontNameSize, "9.WarpSans");
} else {
strcpy(szFontNameSize, "9.WarpSans Combined");
}
}
char *szFacename = strchr(szFontNameSize, '.');
if (!szFacename || (*(szFacename++) == '\0'))
return false;
// local DPI for size will be taken into account below
aFontStyle.size = atof(szFontNameSize);
// determine DPI resolution of screen device to compare compute
// font size in pixels
HPS ps = WinGetScreenPS(HWND_DESKTOP);
HDC dc = GpiQueryDevice(ps);
// effective vertical resolution in DPI
LONG vertScreenRes = 120; // assume 120 dpi as default
DevQueryCaps(dc, CAPS_VERTICAL_FONT_RES, 1, &vertScreenRes);
WinReleasePS(ps);
// now scale to make pixels from points (1 pt = 1/72in)
aFontStyle.size *= vertScreenRes / 72.0;
NS_ConvertUTF8toUTF16 fontFace(szFacename);
int pos = 0;
// this is a system font in any case
aFontStyle.systemFont = true;
// bold fonts should have " Bold" in their names, at least we hope that they
// do, otherwise it's bad luck
NS_NAMED_LITERAL_CSTRING(spcBold, " Bold");
if ((pos = fontFace.Find(spcBold.get(), false, 0, -1)) > -1) {
aFontStyle.weight = NS_FONT_WEIGHT_BOLD;
// strip the attribute, now that we have set it in the gfxFontStyle
fontFace.Cut(pos, spcBold.Length());
} else {
aFontStyle.weight = NS_FONT_WEIGHT_NORMAL;
}
// FIXME: Set aFontStyle.stretch correctly!
aFontStyle.stretch = NS_FONT_STRETCH_NORMAL;
// similar hopes for italic and oblique fonts...
NS_NAMED_LITERAL_CSTRING(spcItalic, " Italic");
NS_NAMED_LITERAL_CSTRING(spcOblique, " Oblique");
NS_NAMED_LITERAL_CSTRING(spcObli, " Obli");
if ((pos = fontFace.Find(spcItalic.get(), false, 0, -1)) > -1) {
aFontStyle.style = NS_FONT_STYLE_ITALIC;
fontFace.Cut(pos, spcItalic.Length());
} else if ((pos = fontFace.Find(spcOblique.get(), false, 0, -1)) > -1) {
// oblique fonts are rare on OS/2 and not specially supported by
// the GPI system, but at least we are trying...
aFontStyle.style = NS_FONT_STYLE_OBLIQUE;
fontFace.Cut(pos, spcOblique.Length());
} else if ((pos = fontFace.Find(spcObli.get(), false, 0, -1)) > -1) {
// especially oblique often gets cut by the 32 char limit to "Obli",
// so search for that, too (anything shorter would be ambiguous)
aFontStyle.style = NS_FONT_STYLE_OBLIQUE;
// In this case, assume that this is the last property in the line
// and cut off everything else, too
// This is needed in case it was really Obliq or Obliqu...
fontFace.Cut(pos, fontFace.Length());
} else {
aFontStyle.style = NS_FONT_STYLE_NORMAL;
}
// just throw away any modifiers that are separated by dots (which are either
// .Strikeout, .Underline, or .Outline, none of which have a corresponding
// gfxFont property)
if ((pos = fontFace.Find(".", false, 0, -1)) > -1) {
fontFace.Cut(pos, fontFace.Length());
}
// seems like we need quotes around the font name
NS_NAMED_LITERAL_STRING(quote, "\"");
aFontName = quote + fontFace + quote;
return true;
}