polar-method-tree-iterator.c

/* Internal API: method tree iterator type for polar-objc.
   Copyright (C) 2022-2025 Michael Malicoat <[email protected]>
 
   This file is part of polar-objc.
 
   polar-objc is free software; you can redistribute it and/or modify it under the terms of the GNU General Public
   License as published by the Free Software Foundation; either version 3, or (at your option) any later version.
 
   polar-objc is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied
   warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
   details.
 
   You should have received a copy of the GNU General Public License along with this program; see the file LICENSE.  If
   not, see <http://www.gnu.org/licenses/>.
*/
 
// polar_method_tree_iterator ******************************************************************************************
// Private =============================================================================================================
 
// This variable is initialized in polar_method_tree_iterator_get_type()
static polar_method_tree_iterator_class class_polar_method_tree_iterator;
 
// This variable is initialized in _polar_method_tree_iterator_class_init()
static polar_runtime_object_class *superclass_polar_method_tree_iterator = NULL;
 
// ---------------------------------------------------------------------------------------------------------------------
 
POLAR_FUNCTION_INTERNAL BOOL
_polar_method_tree_iterator_get_next( polar_method_tree_iterator *self, void **out_next_element )
{
  assert( out_next_element != NULL );
  assert( ((polar_btree_iterator *)self)->tree_target != NULL );
 
  // Chain up
  if( POLAR_ITERATOR_CLASS(superclass_polar_method_tree_iterator)->get_next((polar_iterator *)self, out_next_element) )
    return YES;
 
  if( (self->tree_next != NULL) && (self->tree_next != OBJC_CLASS_METHOD_TREE_LIST_END) )
  {
    ( (polar_btree_iterator *)self )->tree_target = (polar_btree *)(self->tree_next);
    ( (polar_btree_iterator *)self )->node_current = NULL;
    ( (polar_btree_iterator *)self )->idx_current = 0;
 
    self->tree_next = (polar_method_tree *)( ((polar_list_node *)(self->tree_next))->node_next );
 
    return
      POLAR_ITERATOR_CLASS(superclass_polar_method_tree_iterator)->get_next( (polar_iterator *)self, out_next_element );
  }
 
  return NO;
}
 
POLAR_FUNCTION_INTERNAL void
_polar_method_tree_iterator_class_init( polar_method_tree_iterator_class *self )
{
  // Acquire our superclass
  superclass_polar_method_tree_iterator = POLAR_RUNTIME_OBJECT_CLASS(self)->class_superclass;
 
  // Establish our virtual methods
  ( (polar_iterator_class *)self )->get_next = (void *)_polar_method_tree_iterator_get_next;
}
 
static struct polar_internal_type_info pti_polar_method_tree_iterator =
{
  .name_type          = "polar_method_tree_iterator",
  .size_type_instance = sizeof(polar_method_tree_iterator),
  .size_type_class    = sizeof(polar_method_tree_iterator_class),
  .type_class_init    = (polar_func_runtime_object_class_lifecycle)_polar_method_tree_iterator_class_init
};
 
// Public ==============================================================================================================
 
POLAR_FUNCTION_INTERNAL OBJC_FUNCTION_CONSTANT polar_internal_type
polar_method_tree_iterator_get_type( void )
{
  static polar_internal_type pt_polar_method_tree_iterator = POLAR_INTERNAL_TYPE_INVALID;
 
  if( pt_polar_method_tree_iterator != POLAR_INTERNAL_TYPE_INVALID )
    return pt_polar_method_tree_iterator;
 
  pt_polar_method_tree_iterator = polar_internal_type_init( POLAR_TYPE_BTREE_ITERATOR,
                                                            &class_polar_method_tree_iterator,
                                                            &pti_polar_method_tree_iterator );
 
  return pt_polar_method_tree_iterator;
}