1 files changed, 126 insertions, 0 deletions
diff --git a/basctl/source/basicide/linenumberwindow.cxx b/basctl/source/basicide/linenumberwindow.cxx
new file mode 100644
index 000000000..7dcbff0dd
--- /dev/null
+++ b/basctl/source/basicide/linenumberwindow.cxx
@@ -0,0 +1,126 @@
+/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This file is part of the LibreOffice project.
+ *
+ * This Source Code Form is subject to the terms of the Mozilla Public
+ * License, v. 2.0. If a copy of the MPL was not distributed with this
+ * file, You can obtain one at http://mozilla.org/MPL/2.0/.
+ */
+
+#include "baside2.hxx"
+
+#include <vcl/event.hxx>
+#include <vcl/textview.hxx>
+#include <vcl/xtextedt.hxx>
+#include <vcl/settings.hxx>
+
+namespace basctl
+{
+LineNumberWindow::LineNumberWindow(vcl::Window* pParent, ModulWindow* pModulWindow)
+    : Window(pParent, WB_BORDER)
+    , m_pModulWindow(pModulWindow)
+    , m_nCurYOffset(0)
+{
+    SetBackground(Wallpaper(GetSettings().GetStyleSettings().GetWindowColor()));
+    m_FontColor = GetSettings().GetStyleSettings().GetWindowTextColor();
+    m_nBaseWidth = GetTextWidth("8");
+    m_nWidth = m_nBaseWidth * 3 + m_nBaseWidth / 2;
+}
+
+LineNumberWindow::~LineNumberWindow() { disposeOnce(); }
+
+void LineNumberWindow::dispose()
+{
+    m_pModulWindow.clear();
+    Window::dispose();
+}
+
+void LineNumberWindow::Paint(vcl::RenderContext& rRenderContext, const tools::Rectangle&)
+{
+    if (SyncYOffset())
+        return;
+
+    ExtTextEngine* txtEngine = m_pModulWindow->GetEditEngine();
+    if (!txtEngine)
+        return;
+
+    TextView* txtView = m_pModulWindow->GetEditView();
+    if (!txtView)
+        return;
+
+    GetParent()->Resize();
+
+    int windowHeight = rRenderContext.GetOutputSize().Height();
+    int nLineHeight = rRenderContext.GetTextHeight();
+    if (!nLineHeight)
+    {
+        return;
+    }
+
+    int startY = txtView->GetStartDocPos().Y();
+    const sal_uInt32 nStartLine = startY / nLineHeight + 1;
+    sal_uInt32 nEndLine = (startY + windowHeight) / nLineHeight + 1;
+
+    if (txtEngine->GetParagraphCount() + 1 < nEndLine)
+        nEndLine = txtEngine->GetParagraphCount() + 1;
+
+    // FIXME: it would be best if we could get notified of a font change
+    // rather than doing that re-calculation at each Paint event
+    m_nBaseWidth = GetTextWidth("8");
+
+    // reserve enough for 3 digit minimum, with a bit to spare for comfort
+    m_nWidth = m_nBaseWidth * 3 + m_nBaseWidth / 2;
+    auto nMaxLineNumber = std::max(nEndLine, txtEngine->GetParagraphCount() + 1);
+    sal_uInt32 i = (nMaxLineNumber + 1) / 1000;
+    while (i)
+    {
+        i /= 10;
+        m_nWidth += m_nBaseWidth;
+    }
+
+    sal_Int64 y = (nStartLine - 1) * static_cast<sal_Int64>(nLineHeight);
+    rRenderContext.SetTextColor(m_FontColor);
+    for (sal_uInt32 n = nStartLine; n <= nEndLine; ++n, y += nLineHeight)
+        rRenderContext.DrawText(Point(0, y - m_nCurYOffset), OUString::number(n));
+}
+
+void LineNumberWindow::DataChanged(DataChangedEvent const& rDCEvt)
+{
+    Window::DataChanged(rDCEvt);
+    if (rDCEvt.GetType() == DataChangedEventType::SETTINGS
+        && (rDCEvt.GetFlags() & AllSettingsFlags::STYLE))
+    {
+        Color aColor(GetSettings().GetStyleSettings().GetFieldColor());
+        const AllSettings* pOldSettings = rDCEvt.GetOldSettings();
+        if (!pOldSettings || aColor != pOldSettings->GetStyleSettings().GetFieldColor())
+        {
+            SetBackground(Wallpaper(aColor));
+            Invalidate();
+        }
+    }
+}
+
+void LineNumberWindow::DoScroll(tools::Long nVertScroll)
+{
+    m_nCurYOffset -= nVertScroll;
+    Window::Scroll(0, nVertScroll);
+}
+
+bool LineNumberWindow::SyncYOffset()
+{
+    TextView* pView = m_pModulWindow->GetEditView();
+    if (!pView)
+        return false;
+
+    tools::Long nViewYOffset = pView->GetStartDocPos().Y();
+    if (m_nCurYOffset == nViewYOffset)
+        return false;
+
+    m_nCurYOffset = nViewYOffset;
+    Invalidate();
+    return true;
+}
+
+} // namespace basctl
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */