mirror of
				https://github.com/MariaDB/server.git
				synced 2025-11-03 14:33:32 +03:00 
			
		
		
		
	--- Added casts and fixed wrong type. --- Added casts and fixed wrong type. --- Merge jamppa@bk-internal.mysql.com:/home/bk/mysql-5.1-marvel into a88-113-38-195.elisa-laajakaista.fi:/home/my/bk/mysql-5.1-marvel --- Don't give warning that readonly variable is forced to be readonly mysql-test-run run now fails if we have [Warning] and [ERROR] as tags in .err file Fixed wrong reference to the mysql manual Fixed wrong prototype that caused some tests to fail on 64 bit platforms --- Disabled compiler warnings mainly for Win 64. --- Added casts to remove compiler warnings on windows Give warnings also for safe_mutex errors found by test system Added some warnings from different machines in pushbuild --- Merge bk-internal.mysql.com:/home/bk/mysql-5.1-marvel into mysql.com:/home/my/mysql-5.1 --- Added escapes for double quotes and parenthesis. --- Archive db fix plus added non-critical warnings in ignore list. --- Fixed previously added patch and added new ignored warning.
		
			
				
	
	
		
			357 lines
		
	
	
		
			8.9 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			357 lines
		
	
	
		
			8.9 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
/* Copyright (C) 2000 MySQL AB
 | 
						|
 | 
						|
   This program 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; version 2 of the License.
 | 
						|
 | 
						|
   This program 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; if not, write to the Free Software
 | 
						|
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 | 
						|
 | 
						|
/* Handling of arrays that can grow dynamicly. */
 | 
						|
 | 
						|
#include "mysys_priv.h"
 | 
						|
#include "m_string.h"
 | 
						|
 | 
						|
/*
 | 
						|
  Initiate dynamic array
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    init_dynamic_array2()
 | 
						|
      array		Pointer to an array
 | 
						|
      element_size	Size of element
 | 
						|
      init_buffer       Initial buffer pointer
 | 
						|
      init_alloc	Number of initial elements
 | 
						|
      alloc_increment	Increment for adding new elements
 | 
						|
 | 
						|
  DESCRIPTION
 | 
						|
    init_dynamic_array() initiates array and allocate space for 
 | 
						|
    init_alloc eilements. 
 | 
						|
    Array is usable even if space allocation failed.
 | 
						|
    Static buffers must begin immediately after the array structure.
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    TRUE	my_malloc_ci() failed
 | 
						|
    FALSE	Ok
 | 
						|
*/
 | 
						|
 | 
						|
my_bool init_dynamic_array2(DYNAMIC_ARRAY *array, uint element_size,
 | 
						|
                            void *init_buffer, uint init_alloc, 
 | 
						|
                            uint alloc_increment CALLER_INFO_PROTO)
 | 
						|
{
 | 
						|
  DBUG_ENTER("init_dynamic_array");
 | 
						|
  if (!alloc_increment)
 | 
						|
  {
 | 
						|
    alloc_increment=max((8192-MALLOC_OVERHEAD)/element_size,16);
 | 
						|
    if (init_alloc > 8 && alloc_increment > init_alloc * 2)
 | 
						|
      alloc_increment=init_alloc*2;
 | 
						|
  }
 | 
						|
 | 
						|
  if (!init_alloc)
 | 
						|
  {
 | 
						|
    init_alloc=alloc_increment;
 | 
						|
    init_buffer= 0;
 | 
						|
  }
 | 
						|
  array->elements=0;
 | 
						|
  array->max_element=init_alloc;
 | 
						|
  array->alloc_increment=alloc_increment;
 | 
						|
  array->size_of_element=element_size;
 | 
						|
  if ((array->buffer= init_buffer))
 | 
						|
    DBUG_RETURN(FALSE);
 | 
						|
  if (!(array->buffer=(uchar*) my_malloc_ci(element_size*init_alloc,MYF(MY_WME))))
 | 
						|
  {
 | 
						|
    array->max_element=0;
 | 
						|
    DBUG_RETURN(TRUE);
 | 
						|
  }
 | 
						|
  DBUG_RETURN(FALSE);
 | 
						|
} 
 | 
						|
 | 
						|
my_bool init_dynamic_array(DYNAMIC_ARRAY *array, uint element_size,
 | 
						|
                           uint init_alloc, 
 | 
						|
                           uint alloc_increment CALLER_INFO_PROTO)
 | 
						|
{
 | 
						|
  /* placeholder to preserve ABI */
 | 
						|
  return my_init_dynamic_array_ci(array, element_size, init_alloc, 
 | 
						|
                                  alloc_increment);
 | 
						|
}
 | 
						|
/*
 | 
						|
  Insert element at the end of array. Allocate memory if needed.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    insert_dynamic()
 | 
						|
      array
 | 
						|
      element
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    TRUE	Insert failed
 | 
						|
    FALSE	Ok
 | 
						|
*/
 | 
						|
 | 
						|
my_bool insert_dynamic(DYNAMIC_ARRAY *array, uchar* element)
 | 
						|
{
 | 
						|
  uchar* buffer;
 | 
						|
  if (array->elements == array->max_element)
 | 
						|
  {						/* Call only when nessesary */
 | 
						|
    if (!(buffer=alloc_dynamic(array)))
 | 
						|
      return TRUE;
 | 
						|
  }
 | 
						|
  else
 | 
						|
  {
 | 
						|
    buffer=array->buffer+(array->elements * array->size_of_element);
 | 
						|
    array->elements++;
 | 
						|
  }
 | 
						|
  memcpy(buffer,element,(size_t) array->size_of_element);
 | 
						|
  return FALSE;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Alloc space for next element(s) 
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    alloc_dynamic()
 | 
						|
      array
 | 
						|
 | 
						|
  DESCRIPTION
 | 
						|
    alloc_dynamic() checks if there is empty space for at least
 | 
						|
    one element if not tries to allocate space for alloc_increment
 | 
						|
    elements at the end of array.
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    pointer	Pointer to empty space for element
 | 
						|
    0		Error
 | 
						|
*/
 | 
						|
 | 
						|
uchar *alloc_dynamic(DYNAMIC_ARRAY *array)
 | 
						|
{
 | 
						|
  if (array->elements == array->max_element)
 | 
						|
  {
 | 
						|
    char *new_ptr;
 | 
						|
    if (array->buffer == (uchar *)(array + 1))
 | 
						|
    {
 | 
						|
      /*
 | 
						|
        In this senerio, the buffer is statically preallocated,
 | 
						|
        so we have to create an all-new malloc since we overflowed
 | 
						|
      */
 | 
						|
      if (!(new_ptr= (char *) my_malloc((array->max_element+
 | 
						|
                                         array->alloc_increment) *
 | 
						|
                                        array->size_of_element,
 | 
						|
                                        MYF(MY_WME))))
 | 
						|
        return 0;
 | 
						|
      memcpy(new_ptr, array->buffer, 
 | 
						|
             array->elements * array->size_of_element);
 | 
						|
    }
 | 
						|
    else
 | 
						|
    if (!(new_ptr=(char*) my_realloc(array->buffer,(array->max_element+
 | 
						|
                                     array->alloc_increment)*
 | 
						|
                                     array->size_of_element,
 | 
						|
                                     MYF(MY_WME | MY_ALLOW_ZERO_PTR))))
 | 
						|
      return 0;
 | 
						|
    array->buffer= (uchar*) new_ptr;
 | 
						|
    array->max_element+=array->alloc_increment;
 | 
						|
  }
 | 
						|
  return array->buffer+(array->elements++ * array->size_of_element);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Pop last element from array.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    pop_dynamic()
 | 
						|
      array
 | 
						|
  
 | 
						|
  RETURN VALUE    
 | 
						|
    pointer	Ok
 | 
						|
    0		Array is empty
 | 
						|
*/
 | 
						|
 | 
						|
uchar *pop_dynamic(DYNAMIC_ARRAY *array)
 | 
						|
{
 | 
						|
  if (array->elements)
 | 
						|
    return array->buffer+(--array->elements * array->size_of_element);
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
  Replace elemnent in array with given element and index
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    set_dynamic()
 | 
						|
      array
 | 
						|
      element	Element to be inserted
 | 
						|
      idx	Index where element is to be inserted
 | 
						|
 | 
						|
  DESCRIPTION
 | 
						|
    set_dynamic() replaces element in array. 
 | 
						|
    If idx > max_element insert new element. Allocate memory if needed. 
 | 
						|
 
 | 
						|
  RETURN VALUE
 | 
						|
    TRUE	Idx was out of range and allocation of new memory failed
 | 
						|
    FALSE	Ok
 | 
						|
*/
 | 
						|
 | 
						|
my_bool set_dynamic(DYNAMIC_ARRAY *array, uchar* element, uint idx)
 | 
						|
{
 | 
						|
  if (idx >= array->elements)
 | 
						|
  {
 | 
						|
    if (idx >= array->max_element)
 | 
						|
    {
 | 
						|
      uint size;
 | 
						|
      char *new_ptr;
 | 
						|
      size=(idx+array->alloc_increment)/array->alloc_increment;
 | 
						|
      size*= array->alloc_increment;
 | 
						|
      if (array->buffer == (uchar *)(array + 1))
 | 
						|
      {
 | 
						|
        /*
 | 
						|
          In this senerio, the buffer is statically preallocated,
 | 
						|
          so we have to create an all-new malloc since we overflowed
 | 
						|
        */
 | 
						|
        if (!(new_ptr= (char *) my_malloc(size *
 | 
						|
                                          array->size_of_element,
 | 
						|
                                          MYF(MY_WME))))
 | 
						|
          return 0;
 | 
						|
        memcpy(new_ptr, array->buffer, 
 | 
						|
               array->elements * array->size_of_element);
 | 
						|
      }
 | 
						|
      else
 | 
						|
      if (!(new_ptr=(char*) my_realloc(array->buffer,size*
 | 
						|
                                       array->size_of_element,
 | 
						|
                                       MYF(MY_WME | MY_ALLOW_ZERO_PTR))))
 | 
						|
	return TRUE;
 | 
						|
      array->buffer= (uchar*) new_ptr;
 | 
						|
      array->max_element=size;
 | 
						|
    }
 | 
						|
    bzero((uchar*) (array->buffer+array->elements*array->size_of_element),
 | 
						|
          (idx - array->elements)*array->size_of_element);
 | 
						|
    array->elements=idx+1;
 | 
						|
  }
 | 
						|
  memcpy(array->buffer+(idx * array->size_of_element),element,
 | 
						|
         (size_t) array->size_of_element);
 | 
						|
  return FALSE;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
  Get an element from array by given index
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    get_dynamic()
 | 
						|
      array	
 | 
						|
      uchar*	Element to be returned. If idx > elements contain zeroes.
 | 
						|
      idx	Index of element wanted. 
 | 
						|
*/
 | 
						|
 | 
						|
void get_dynamic(DYNAMIC_ARRAY *array, uchar* element, uint idx)
 | 
						|
{
 | 
						|
  if (idx >= array->elements)
 | 
						|
  {
 | 
						|
    DBUG_PRINT("warning",("To big array idx: %d, array size is %d",
 | 
						|
                          idx,array->elements));
 | 
						|
    bzero(element,array->size_of_element);
 | 
						|
    return;
 | 
						|
  }
 | 
						|
  memcpy(element,array->buffer+idx*array->size_of_element,
 | 
						|
         (size_t) array->size_of_element);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Empty array by freeing all memory
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    delete_dynamic()
 | 
						|
      array	Array to be deleted
 | 
						|
*/
 | 
						|
 | 
						|
void delete_dynamic(DYNAMIC_ARRAY *array)
 | 
						|
{
 | 
						|
  /*
 | 
						|
    Just mark as empty if we are using a static buffer
 | 
						|
  */
 | 
						|
  if (array->buffer == (uchar *)(array + 1))
 | 
						|
    array->elements= 0;
 | 
						|
  else
 | 
						|
  if (array->buffer)
 | 
						|
  {
 | 
						|
    my_free(array->buffer,MYF(MY_WME));
 | 
						|
    array->buffer=0;
 | 
						|
    array->elements=array->max_element=0;
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
  Delete element by given index
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    delete_dynamic_element()
 | 
						|
      array
 | 
						|
      idx        Index of element to be deleted
 | 
						|
*/
 | 
						|
 | 
						|
void delete_dynamic_element(DYNAMIC_ARRAY *array, uint idx)
 | 
						|
{
 | 
						|
  char *ptr= (char*) array->buffer+array->size_of_element*idx;
 | 
						|
  array->elements--;
 | 
						|
  memmove(ptr,ptr+array->size_of_element,
 | 
						|
          (array->elements-idx)*array->size_of_element);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Free unused memory
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    freeze_size()
 | 
						|
      array	Array to be freed
 | 
						|
 | 
						|
*/
 | 
						|
 | 
						|
void freeze_size(DYNAMIC_ARRAY *array)
 | 
						|
{
 | 
						|
  uint elements=max(array->elements,1);
 | 
						|
 | 
						|
  /*
 | 
						|
    Do nothing if we are using a static buffer
 | 
						|
  */
 | 
						|
  if (array->buffer == (uchar *)(array + 1))
 | 
						|
    return;
 | 
						|
    
 | 
						|
  if (array->buffer && array->max_element != elements)
 | 
						|
  {
 | 
						|
    array->buffer=(uchar*) my_realloc(array->buffer,
 | 
						|
                                     elements*array->size_of_element,
 | 
						|
                                     MYF(MY_WME));
 | 
						|
    array->max_element=elements;
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Get the index of a dynamic element
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    get_index_dynamic()
 | 
						|
     array	Array
 | 
						|
     element Whose element index 
 | 
						|
 | 
						|
*/
 | 
						|
 | 
						|
int get_index_dynamic(DYNAMIC_ARRAY *array, uchar* element)
 | 
						|
{
 | 
						|
  uint ret;
 | 
						|
  if (array->buffer > element)
 | 
						|
    return -1;
 | 
						|
 | 
						|
  ret= (element - array->buffer) /  array->size_of_element;
 | 
						|
  if (ret > array->elements)
 | 
						|
    return -1;
 | 
						|
 | 
						|
  return ret;
 | 
						|
 | 
						|
}
 |