Select.c

Go to the documentation of this file.

/*
 * ObjectivelyMVC: Object oriented MVC framework for SDL3 and C.
 * Copyright (C) 2014 Jay Dolan <jay@jaydolan.com>
 *
 * This software is provided 'as-is', without any express or implied
 * warranty. In no event will the authors be held liable for any damages
 * arising from the use of this software.
 *
 * Permission is granted to anyone to use this software for any purpose,
 * including commercial applications, and to alter it and redistribute it
 * freely, subject to the following restrictions:
 *
 * 1. The origin of this software must not be misrepresented; you must not
 * claim that you wrote the original software. If you use this software
 * in a product, an acknowledgment in the product documentation would be
 * appreciated but is not required.
 *
 * 2. Altered source versions must be plainly marked as such, and must not be
 * misrepresented as being the original software.
 *
 * 3. This notice may not be removed or altered from any source distribution.
 */
 
#include <assert.h>
 
#include <Objectively/Array.h>
 
#include "Select.h"
 
#define _Class _Select
 
#pragma mark - Object
 
static void dealloc(Object *self) {
 
  Select *this = (Select *) self;
 
  memset(&this->delegate, 0, sizeof(this->delegate));
 
  release(this->options);
  release(this->stackView);
 
  super(Object, self, dealloc);
}
 
#pragma mark - View
 
static View *init(View *self) {
  return (View *) $((Select *) self, initWithFrame, NULL);
}
 
static void layoutSubviews(View *self) {
 
  Select *this = (Select *) self;
 
  Control *control = (Control *) self;
 
  if (control->selection == ControlSelectionSingle) {
 
    const Array *options = (Array *) this->options;
    for (size_t i = 0; i < options->count; i++) {
 
      Option *option = $(options, objectAtIndex, i);
      if (option->isSelected) {
        $((View *) option, setVisibility, ViewVisibilityVisible);
      } else if ($(control, isHighlighted)) {
        $((View *) option, setVisibility, ViewVisibilityVisible);
      } else {
        $((View *) option, setVisibility, ViewVisibilityHidden);
      }
    }
 
    $((View *) this->stackView, sizeToFit);
    $((View *) this->stackView, layoutIfNeeded);
 
    // Keep the expanded menu on-screen. The options are only un-hidden (and the menu
    // sized to its full height) just above, so this is the earliest point the true
    // height is known -- stateDidChange sees a collapsed, all-hidden menu. The menu
    // opens downward from the control and is parented to the window root (its frame
    // is window space); if it runs past the bottom edge, shift it up, clamped to the
    // top. Idempotent: once its bottom sits at the window edge, re-running is a no-op.
    View *menu = (View *) this->stackView;
    if ($(control, isHighlighted) && menu->window) {
 
      int windowHeight;
      SDL_GetWindowSize(menu->window, NULL, &windowHeight);
 
      const int bottom = menu->frame.y + menu->frame.h;
      if (bottom > windowHeight) {
        menu->frame.y -= (bottom - windowHeight);
        if (menu->frame.y < 0) {
          menu->frame.y = 0;
        }
      }
    }
  }
 
  super(View, self, layoutSubviews);
}
 
static SDL_Size sizeThatFits(const View *self) {
 
  const Select *this = (Select *) self;
 
  SDL_Size size = super(View, self, sizeThatFits);
 
  const Array *options = (Array *) this->options;
  for (size_t i = 0; i < options->count; i++) {
 
    const View *option = $(options, objectAtIndex, i);
    const SDL_Size optionSize = $(option, sizeThatFits);
 
    size.w = max(size.w, optionSize.w + self->padding.left + self->padding.right);
    size.h = max(size.h, optionSize.h + self->padding.top + self->padding.bottom);
  }
 
  return size;
}
 
#pragma mark - Control
 
static bool captureEvent(Control *self, const SDL_Event *event) {
 
  Select *this = (Select *) self;
 
  const Array *options = (Array *) this->options;
 
  if (event->type == SDL_EVENT_MOUSE_BUTTON_DOWN) {
    if (self->state & ControlStateHighlighted) {
      $((View *) self, becomeTouchResponder);
      return true;
    }
  }
 
  if (event->type == SDL_EVENT_MOUSE_BUTTON_UP) {
    if (self->state & ControlStateHighlighted) {
      self->state &= ~ControlStateHighlighted;
 
      for (size_t i = 0; i < options->count; i++) {
 
        Option *option = $(options, objectAtIndex, i);
        if ($((View *) option, didReceiveEvent, event)) {
          $(this, selectOption, option);
          if (this->delegate.didSelectOption) {
            this->delegate.didSelectOption(this, option);
          }
          return true;
        }
      }
    } else {
      self->state |= ControlStateHighlighted;
      return true;
    }
  }
 
  if (event->type == SDL_EVENT_KEY_DOWN) {
 
    switch (event->key.key) {
 
      case SDLK_ESCAPE:
        self->state &= ~ControlStateHighlighted;
        return true;
 
      case SDLK_RETURN:
      case SDLK_KP_ENTER:
        self->state ^= ControlStateHighlighted;
        return true;
 
      case SDLK_UP:
      case SDLK_DOWN: {
        Option *option = $(this, selectedOption);
        if (option) {
 
          ssize_t index = $(options, indexOfObject, option);
          if (event->key.key == SDLK_UP) {
            index = (index - 1 + options->count) % options->count;
          } else {
            index = (index + 1) % options->count;
          }
 
          option = $(options, objectAtIndex, index);
 
          $(this, selectOption, option);
          if (this->delegate.didSelectOption) {
            this->delegate.didSelectOption(this, option);
          }
        }
        return true;
      }
    }
  }
 
  return super(Control, self, captureEvent, event);
}
 
static void stateDidChange(Control *self) {
 
  Select *this = (Select *) self;
 
  if (self->selection == ControlSelectionSingle) {
 
    View *stackView = (View *) this->stackView;
 
    if ($(self, isHighlighted)) {
 
      const SDL_Rect renderFrame = $((View *) self, renderFrame);
 
      stackView->frame.x = renderFrame.x + self->view.padding.left;
      stackView->frame.y = renderFrame.y + self->view.padding.top;
 
      View *view = (View *) self;
 
      while (view->superview) {
        view = view->superview;
      }
 
      $(stackView, addClassName, "options");
      $(view, addSubview, stackView);
 
      stackView->nextResponder = (View *) self;
 
    } else {
 
      $(stackView, removeClassName, "options");
      $((View *) self, addSubview, stackView);
 
      stackView->nextResponder = NULL;
    }
 
    $(stackView, sizeToFit);
  }
 
  super(Control, self, stateDidChange);
}
 
#pragma mark - Select
 
static void addOption_removeSubview(const Array *array, ident obj, ident data) {
  $((View *) data, removeSubview, obj);
}
 
static void addOption_addSubview(const Array *array, ident obj, ident data) {
  $((View *) data, addSubview, obj);
}
 
static void addOption(Select *self, const char *title, ident value) {
 
  Option *option = $(alloc(Option), initWithTitle, title, value);
  assert(option);
 
  $(self->options, addObject, option);
 
  $((Array *) self->options, enumerate, addOption_removeSubview, self->stackView);
 
  if (self->comparator) {
    $(self->options, sort, self->comparator);
  }
 
  $((Array *) self->options, enumerate, addOption_addSubview, self->stackView);
 
  if (self->control.selection == ControlSelectionSingle) {
    if ($(self, selectedOption) == NULL) {
      $(option, setSelected, true);
    }
  }
 
  option->view.nextResponder = (View *) self;
 
  release(option);
 
  $((View *) self, setNeedsLayout);
}
 
static Select *initWithFrame(Select *self, const SDL_Rect *frame) {
 
  self = (Select *) super(Control, self, initWithFrame, frame);
  if (self) {
 
    self->control.selection = ControlSelectionSingle;
 
    self->options = $$(Array, arrayWithCapacity, 8);
    assert(self->options);
 
    self->stackView = $(alloc(StackView), initWithFrame, NULL);
    assert(self->stackView);
 
    $((View *) self, addSubview, (View *) self->stackView);
  }
 
  return self;
}
 
static bool optionWithValue_predicate(ident obj, ident data) {
  return ((Option *) obj)->value == data;
}
 
static Option *optionWithValue(const Select *self, const ident value) {
  return $((Array *) self->options, find, optionWithValue_predicate, value);
}
 
static void removeAllOptions(Select *self) {
 
  Option *option;
  while ((option = $((Array *) self->options, lastObject))) {
    $(self, removeOption, option);
  }
}
 
static void removeOption(Select *self, Option *option) {
 
  if ($((Array *) self->options, containsObject, option)) {
 
    $(self->options, removeObject, option);
    $((View *) self->stackView, removeSubview, (View *) option);
 
    if (self->control.selection == ControlSelectionSingle) {
      if ($(self, selectedOption) == NULL) {
        Option *first_option = $((Array *) self->options, firstObject);
        if (first_option) {
          $(self, selectOption, first_option);
        }
      }
    }
 
    $((View *) self, setNeedsLayout);
  }
}
 
static void removeOptionWithValue(Select *self, ident value) {
 
  Option *option = (Option *) $(self, optionWithValue, value);
  if (option) {
    $(self, removeOption, option);
  }
}
 
static void selectOption_enumerate(const Array *array, ident obj, ident data) {
  $((Option *) obj, setSelected, false);
}
 
static void selectOption(Select *self, Option *option) {
 
  if (self->control.selection == ControlSelectionSingle) {
    $((Array *) self->options, enumerate, selectOption_enumerate, NULL);
  }
 
  if (option) {
 
    if (option && option->isSelected == false) {
      $(option, setSelected, true);
    }
  }
 
  $((View *) self, setNeedsLayout);
}
 
static void selectOptionWithValue(Select *self, ident value) {
 
  Option *option = $(self, optionWithValue, value);
 
  $(self, selectOption, option);
}
 
static bool selectedOptions_predicate(ident obj, ident data) {
  return ((Option *) obj)->isSelected;
}
 
static Option *selectedOption(const Select *self) {
  return $((Array *) self->options, find, selectedOptions_predicate, NULL);
}
 
static Array *selectedOptions(const Select *self) {
  return $((Array *) self->options, filteredArray, selectedOptions_predicate, NULL);
}
 
#pragma mark - Class lifecycle
 
static void initialize(Class *clazz) {
 
  ((ObjectInterface *) clazz->interface)->dealloc = dealloc;
 
  ((ViewInterface *) clazz->interface)->init = init;
  ((ViewInterface *) clazz->interface)->layoutSubviews = layoutSubviews;
  ((ViewInterface *) clazz->interface)->sizeThatFits = sizeThatFits;
 
  ((ControlInterface *) clazz->interface)->captureEvent = captureEvent;
  ((ControlInterface *) clazz->interface)->stateDidChange = stateDidChange;
 
  ((SelectInterface *) clazz->interface)->addOption = addOption;
  ((SelectInterface *) clazz->interface)->initWithFrame = initWithFrame;
  ((SelectInterface *) clazz->interface)->optionWithValue = optionWithValue;
  ((SelectInterface *) clazz->interface)->removeAllOptions = removeAllOptions;
  ((SelectInterface *) clazz->interface)->removeOption = removeOption;
  ((SelectInterface *) clazz->interface)->removeOptionWithValue = removeOptionWithValue;
  ((SelectInterface *) clazz->interface)->selectOption = selectOption;
  ((SelectInterface *) clazz->interface)->selectOptionWithValue = selectOptionWithValue;
  ((SelectInterface *) clazz->interface)->selectedOption = selectedOption;
  ((SelectInterface *) clazz->interface)->selectedOptions = selectedOptions;
}
 
Class *_Select(void) {
  static Class *clazz;
  static Once once;
 
  do_once(&once, {
    clazz = _initialize(&(const ClassDef) {
      .name = "Select",
      .superclass = _Control(),
      .instanceSize = sizeof(Select),
      .interfaceSize = sizeof(SelectInterface),
      .initialize = initialize,
    });
  });
 
  return clazz;
}
 
#undef _Class