wip: fork

1 files changed, 0 insertions, 294 deletions

diff --git a/src/drivers/Cocoa/Fl_Cocoa_Window_Driver.cxx b/src/drivers/Cocoa/Fl_Cocoa_Window_Driver.cxx
deleted file mode 100644
index 55d1bea32..000000000
--- a/src/drivers/Cocoa/Fl_Cocoa_Window_Driver.cxx
+++ /dev/null
@@ -1,294 +0,0 @@
-//
-// Definition of Apple Cocoa window driver.
-//
-// Copyright 1998-2026 by Bill Spitzak and others.
-//
-// This library is free software. Distribution and use rights are outlined in
-// the file "COPYING" which should have been included with this file.  If this
-// file is missing or damaged, see the license at:
-//
-//     https://www.fltk.org/COPYING.php
-//
-// Please see the following page on how to report bugs and issues:
-//
-//     https://www.fltk.org/bugs.php
-//
-
-
-#include <config.h>
-#include "Fl_Cocoa_Window_Driver.H"
-#include "../../Fl_Screen_Driver.H"
-#include "../Quartz/Fl_Quartz_Graphics_Driver.H"
-#include <FL/Fl_Double_Window.H>
-#include <FL/Fl_Overlay_Window.H>
-#include <FL/Fl_Image_Surface.H>
-#include <FL/fl_draw.H>
-#include <FL/Fl.H>
-#include <FL/platform.H>
-#include <math.h>
-
-
-Fl_Cocoa_Window_Driver::Fl_Cocoa_Window_Driver(Fl_Window *win)
-: Fl_Window_Driver(win)
-{
-  cursor = nil;
-  window_flags_ = 0;
-  icon_image = NULL;
-  screen_num_ = 0;
-  shape_data_ = NULL;
-}
-
-
-void Fl_Cocoa_Window_Driver::take_focus()
-{
-  set_key_window();
-}
-
-
-void Fl_Cocoa_Window_Driver::flush_overlay()
-{
-  Fl_Overlay_Window *oWindow = pWindow->as_overlay_window();
-  int erase_overlay = (pWindow->damage()&FL_DAMAGE_OVERLAY) | (overlay() == oWindow);
-  pWindow->clear_damage((uchar)(pWindow->damage()&~FL_DAMAGE_OVERLAY));
-
-  if (!oWindow->shown()) return;
-  pWindow->make_current(); // make sure fl_gc is non-zero
-  if (!other_xid) {
-    other_xid = new Fl_Image_Surface(oWindow->w(), oWindow->h(), 1);
-    oWindow->clear_damage(FL_DAMAGE_ALL);
-  }
-  if (oWindow->damage() & ~FL_DAMAGE_EXPOSE) {
-    Fl_X *myi = Fl_X::flx(pWindow);
-    fl_clip_region(myi->region); myi->region = 0;
-    Fl_Surface_Device::push_current(other_xid);
-    draw();
-    Fl_Surface_Device::pop_current();
-  }
-  if (erase_overlay) fl_clip_region(0);
-  fl_copy_offscreen(0, 0, oWindow->w(), oWindow->h(), other_xid->offscreen(), 0, 0);
-  if (overlay() == oWindow) oWindow->draw_overlay();
-}
-
-
-void Fl_Cocoa_Window_Driver::draw_begin()
-{
-  if (!Fl_Surface_Device::surface()->driver()->has_feature(Fl_Graphics_Driver::NATIVE)) return;
-  CGContextRef my_gc = (CGContextRef)Fl_Surface_Device::surface()->driver()->gc();
-  if (shape_data_) {
-    if (shape_data_->mask) {
-      CGContextClipToMask(my_gc, CGRectMake(0,0,w(),h()), shape_data_->mask); // requires Mac OS 10.4
-    }
-    CGContextSaveGState(my_gc);
-  }
-}
-
-
-void Fl_Cocoa_Window_Driver::draw_end()
-{
-  if (Fl_Surface_Device::surface()->driver()->has_feature(Fl_Graphics_Driver::NATIVE)) {
-    CGContextRef my_gc = (CGContextRef)Fl_Surface_Device::surface()->driver()->gc();
-    if (shape_data_) CGContextRestoreGState(my_gc);
-  }
-}
-
-
-
-static void MyProviderReleaseData (void *info, const void *data, size_t size) {
-  delete[] (uchar*)data;
-}
-
-// bitwise inversion of all 4-bit quantities
-static const unsigned char swapped[16] = {0,8,4,12,2,10,6,14,1,9,5,13,3,11,7,15};
-
-static inline uchar swap_byte(const uchar b) {
-  // reverse the order of bits of byte b: 1->8 becomes 8->1
-  return (swapped[b & 0xF] << 4) | swapped[b >> 4];
-}
-
-
-void Fl_Cocoa_Window_Driver::shape_bitmap_(Fl_Image* b) {
-  shape_data_->shape_ = b;
-  if (b) {
-    // complement mask bits and perform bitwise inversion of all bytes and also reverse top and bottom
-    int bytes_per_row = (b->w() + 7)/8;
-    uchar *from = new uchar[bytes_per_row * b->h()];
-    for (int i = 0; i < b->h(); i++) {
-      uchar *p = (uchar*)(*b->data()) + bytes_per_row * i;
-      uchar *last = p + bytes_per_row;
-      uchar *q = from + (b->h() - 1 - i) * bytes_per_row;
-      while (p < last) {
-        *q++ = swap_byte(~*p++);
-      }
-    }
-    CGDataProviderRef provider = CGDataProviderCreateWithData(NULL, from, bytes_per_row * b->h(), MyProviderReleaseData);
-    shape_data_->mask = CGImageMaskCreate(b->w(), b->h(), 1, 1, bytes_per_row, provider, NULL, false);
-    CFRelease(provider);
-  }
-}
-
-
-void Fl_Cocoa_Window_Driver::shape_alpha_(Fl_Image* img, int offset) {
-  int i, d = img->d(), w = img->w(), h = img->h();
-  shape_data_->shape_ = img;
-  if (shape_data_->shape_) {
-    // reverse top and bottom and convert to gray scale if img->d() == 3 and complement bits
-    int bytes_per_row = w * d;
-    uchar *from = new uchar[w * h];
-    for ( i = 0; i < h; i++) {
-      uchar *p = (uchar*)(*img->data()) + bytes_per_row * i + offset;
-      uchar *last = p + bytes_per_row;
-      uchar *q = from + (h - 1 - i) * w;
-      while (p < last) {
-        if (d == 3) {
-          unsigned u = *p++;
-          u += *p++;
-          u += *p++;
-          *q++ = ~(u/3);
-        }
-        else {
-          *q++ = ~(*p);
-          p += d;
-        }
-      }
-    }
-    CGDataProviderRef provider = CGDataProviderCreateWithData(NULL, from, w * h, MyProviderReleaseData);
-    shape_data_->mask = CGImageMaskCreate(w, h, 8, 8, w, provider, NULL, false);
-    CFRelease(provider);
-  }
-}
-
-
-void Fl_Cocoa_Window_Driver::shape(const Fl_Image* img) {
-  if (shape_data_) {
-    if (shape_data_->mask) { CGImageRelease(shape_data_->mask); }
-  }
-  else {
-    shape_data_ = new shape_data_type;
-  }
-  memset(shape_data_, 0, sizeof(shape_data_type));
-  int d = img->d();
-  if (d && img->count() >= 2) {
-    shape_pixmap_((Fl_Image*)img);
-    shape_data_->shape_ = (Fl_Image*)img;
-  }
-  else if (d == 0) shape_bitmap_((Fl_Image*)img);
-  else if (d == 2 || d == 4) shape_alpha_((Fl_Image*)img, d - 1);
-  else if ((d == 1 || d == 3) && img->count() == 1) shape_alpha_((Fl_Image*)img, 0);
-  pWindow->border(false);
-}
-
-
-void Fl_Cocoa_Window_Driver::hide() {
-  Fl_X* ip = Fl_X::flx(pWindow);
-  // MacOS X manages a single pointer per application. Make sure that hiding
-  // a toplevel window will not leave us with some random pointer shape, or
-  // worst case, an invisible pointer
-  if (ip && !parent()) pWindow->cursor(FL_CURSOR_DEFAULT);
-  if ( hide_common() ) return;
-  q_release_context(this);
-  if ( ip->xid == (fl_uintptr_t)fl_window )
-    fl_window = 0;
-  if (ip->region) Fl_Graphics_Driver::default_driver().XDestroyRegion(ip->region);
-  destroy((FLWindow*)ip->xid);
-  delete subRect();
-  delete ip;
-}
-
-
-int Fl_Cocoa_Window_Driver::scroll(int src_x, int src_y, int src_w, int src_h, int dest_x, int dest_y, void (*draw_area)(void*, int,int,int,int), void* data)
-{
-  if ( (src_x < 0) || (src_y < 0) )
-    return 1;
-  if ( (src_x+src_w > pWindow->w()) || (src_y+src_h > pWindow->h()) )
-    return 1;
-  CGImageRef img = CGImage_from_window_rect(src_x, src_y, src_w, src_h);
-  if (!img)
-    return 1;
-  // the current surface is generally the display, but is an Fl_Image_Surface when scrolling an Fl_Overlay_Window
-  Fl_Quartz_Graphics_Driver *qgd = (Fl_Quartz_Graphics_Driver*)Fl_Surface_Device::surface()->driver();
-  float s = qgd->scale();
-  qgd->draw_CGImage(img, dest_x, dest_y, (int)lround(s*src_w), (int)lround(s*src_h), 0, 0, src_w, src_h);
-  CFRelease(img);
-  return 0;
-}
-
-static const unsigned mapped_mask = 1;
-static const unsigned changed_mask = 2;
-static const unsigned view_resized_mask = 4;
-static const unsigned through_resize_mask = 8;
-
-bool Fl_Cocoa_Window_Driver::mapped_to_retina() {
-  return window_flags_ & mapped_mask;
-}
-
-void Fl_Cocoa_Window_Driver::mapped_to_retina(bool b) {
-  if (b) window_flags_ |= mapped_mask;
-  else window_flags_ &= ~mapped_mask;
-}
-
-bool Fl_Cocoa_Window_Driver::changed_resolution() {
-  return window_flags_ & changed_mask;
-}
-
-void Fl_Cocoa_Window_Driver::changed_resolution(bool b) {
-  if (b) window_flags_ |= changed_mask;
-  else window_flags_ &= ~changed_mask;
-}
-
-bool Fl_Cocoa_Window_Driver::view_resized() {
-  return window_flags_ & view_resized_mask;
-}
-
-void Fl_Cocoa_Window_Driver::view_resized(bool b) {
-  if (b) window_flags_ |= view_resized_mask;
-  else window_flags_ &= ~view_resized_mask;
-}
-
-bool Fl_Cocoa_Window_Driver::through_resize() {
-  return window_flags_ & through_resize_mask;
-}
-
-void Fl_Cocoa_Window_Driver::through_resize(bool b) {
-  if (b) window_flags_ |= through_resize_mask;
-  else window_flags_ &= ~through_resize_mask;
-}
-
-const Fl_Image* Fl_Cocoa_Window_Driver::shape() {
-  return shape_data_ ? shape_data_->shape_ : NULL;
-}
-
-/* Returns images of the capture of the window title-bar.
- On the Mac OS platform, left, bottom and right are returned NULL; top is returned with depth 4.
- */
-void Fl_Cocoa_Window_Driver::capture_titlebar_and_borders(Fl_RGB_Image*& top, Fl_RGB_Image*& left, Fl_RGB_Image*& bottom, Fl_RGB_Image*& right)
-{
-  top = left = bottom = right = NULL;
-  int htop, hleft, hright, hbottom;
-  Fl_Cocoa_Window_Driver::decoration_sizes(&htop, &hleft,  &hright, &hbottom);
-  if (htop == 0) return; // when window is fullscreen
-  CGColorSpaceRef cspace = CGColorSpaceCreateDeviceRGB();
-  float s = Fl::screen_driver()->scale(screen_num());
-  int scaled_w = int(w() * s);
-  const int factor = (mapped_to_retina() ? 2 : 1);
-  int data_w = factor * scaled_w, data_h = factor * htop;
-  uchar *rgba = new uchar[4 * data_w * data_h];
-  CGContextRef auxgc = CGBitmapContextCreate(rgba, data_w, data_h, 8, 4 * data_w, cspace, kCGImageAlphaPremultipliedLast);
-  CGColorSpaceRelease(cspace);
-  CGContextClearRect(auxgc, CGRectMake(0,0,data_w,data_h));
-  CGContextScaleCTM(auxgc, factor, factor);
-  draw_titlebar_to_context(auxgc, scaled_w, htop);
-  top = new Fl_RGB_Image(rgba, data_w, data_h, 4);
-  top->alloc_array = 1;
-  top->scale(w(),htop, s <1 ? 0 : 1, 1);
-  CGContextRelease(auxgc);
-}
-
-
-FLWindow *fl_mac_xid(const Fl_Window *win) {
-  return (FLWindow*)Fl_Window_Driver::xid(win);
-}
-
-
-Fl_Window *fl_mac_find(FLWindow *xid) {
-  return Fl_Window_Driver::find((fl_uintptr_t)xid);
-}