~ubuntu-branches/ubuntu/trusty/drizzle/trusty

« back to all changes in this revision

Viewing changes to plugin/memory/hp_block.cc

  • Committer: Bazaar Package Importer
  • Author(s): Monty Taylor
  • Date: 2010-10-02 14:17:48 UTC
  • mfrom: (1.1.1 upstream)
  • mto: (2.1.17 sid)
  • mto: This revision was merged to the branch mainline in revision 3.
  • Revision ID: james.westby@ubuntu.com-20101002141748-m6vbfbfjhrw1153e
Tags: 2010.09.1802-1
* New upstream release.
* Removed pid-file argument hack.
* Updated GPL-2 address to be new address.
* Directly copy in drizzledump.1 since debian doesn't have sphinx 1.0 yet.
* Link to jquery from libjs-jquery. Add it as a depend.
* Add drizzled.8 symlink to the install files.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* Copyright (C) 2000-2002, 2004 MySQL AB
 
2
 
 
3
   This program is free software; you can redistribute it and/or modify
 
4
   it under the terms of the GNU General Public License as published by
 
5
   the Free Software Foundation; version 2 of the License.
 
6
 
 
7
   This program is distributed in the hope that it will be useful,
 
8
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 
9
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
10
   GNU General Public License for more details.
 
11
 
 
12
   You should have received a copy of the GNU General Public License
 
13
   along with this program; if not, write to the Free Software
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
15
 
 
16
/* functions on blocks; Keys and records are saved in blocks */
 
17
 
 
18
#include "heap_priv.h"
 
19
 
 
20
#include <cstdlib>
 
21
 
 
22
/*
 
23
  Find record according to record-position.
 
24
 
 
25
  The record is located by factoring position number pos into (p_0, p_1, ...)
 
26
  such that
 
27
     pos = SUM_i(block->level_info[i].records_under_level * p_i)
 
28
  {p_0, p_1, ...} serve as indexes to descend the blocks tree.
 
29
*/
 
30
 
 
31
unsigned char *hp_find_block(HP_BLOCK *block, uint32_t pos)
 
32
{
 
33
  int i;
 
34
  HP_PTRS *ptr; /* block base ptr */
 
35
 
 
36
  for (i= block->levels-1, ptr=block->root ; i > 0 ; i--)
 
37
  {
 
38
    ptr=(HP_PTRS*)ptr->blocks[pos/block->level_info[i].records_under_level];
 
39
    pos%=block->level_info[i].records_under_level;
 
40
  }
 
41
  return (unsigned char*) ptr+ pos*block->recbuffer;
 
42
}
 
43
 
 
44
 
 
45
/*
 
46
  Get one new block-of-records. Alloc ptr to block if needed
 
47
 
 
48
  SYNOPSIS
 
49
    hp_get_new_block()
 
50
      block             HP_BLOCK tree-like block
 
51
      alloc_length OUT  Amount of memory allocated from the heap
 
52
 
 
53
  Interrupts are stopped to allow ha_panic in interrupts
 
54
  RETURN
 
55
    0  OK
 
56
    1  Out of memory
 
57
*/
 
58
 
 
59
int hp_get_new_block(HP_BLOCK *block, size_t *alloc_length)
 
60
{
 
61
  uint32_t i;
 
62
  HP_PTRS *root;
 
63
 
 
64
  for (i=0 ; i < block->levels ; i++)
 
65
    if (block->level_info[i].free_ptrs_in_block)
 
66
      break;
 
67
 
 
68
  /*
 
69
    Allocate space for leaf block plus space for upper level blocks up to
 
70
    first level that has a free slot to put the pointer.
 
71
    In some cases we actually allocate more then we need:
 
72
    Consider e.g. a situation where we have one level 1 block and one level 0
 
73
    block, the level 0 block is full and this function is called. We only
 
74
    need a leaf block in this case. Nevertheless, we will get here with i=1
 
75
    and will also allocate sizeof(HP_PTRS) for non-leaf block and will never
 
76
    use this space.
 
77
    This doesn't add much overhead - with current values of sizeof(HP_PTRS)
 
78
    and my_default_record_cache_size we get about 1/128 unused memory.
 
79
   */
 
80
  *alloc_length=sizeof(HP_PTRS)*i+block->records_in_block* block->recbuffer;
 
81
  if (!(root=(HP_PTRS*) malloc(*alloc_length)))
 
82
    return 1;
 
83
 
 
84
  if (i == 0)
 
85
  {
 
86
    block->levels=1;
 
87
    block->root=block->level_info[0].last_blocks=root;
 
88
  }
 
89
  else
 
90
  {
 
91
    if ((uint) i == block->levels)
 
92
    {
 
93
      /* Adding a new level on top of the existing ones. */
 
94
      block->levels=i+1;
 
95
      /*
 
96
        Use first allocated HP_PTRS as a top-level block. Put the current
 
97
        block tree into the first slot of a new top-level block.
 
98
      */
 
99
      block->level_info[i].free_ptrs_in_block=HP_PTRS_IN_NOD-1;
 
100
      ((HP_PTRS**) root)[0]= block->root;
 
101
      block->root=block->level_info[i].last_blocks= root++;
 
102
    }
 
103
    /* Occupy the free slot we've found at level i */
 
104
    block->level_info[i].last_blocks->
 
105
      blocks[HP_PTRS_IN_NOD - block->level_info[i].free_ptrs_in_block--]=
 
106
        (unsigned char*) root;
 
107
 
 
108
    /* Add a block subtree with each node having one left-most child */
 
109
    for (uint32_t j= i-1 ; j >0 ; j--)
 
110
    {
 
111
      block->level_info[j].last_blocks= root++;
 
112
      block->level_info[j].last_blocks->blocks[0]=(unsigned char*) root;
 
113
      block->level_info[j].free_ptrs_in_block=HP_PTRS_IN_NOD-1;
 
114
    }
 
115
 
 
116
    /*
 
117
      root now points to last (block->records_in_block* block->recbuffer)
 
118
      allocated bytes. Use it as a leaf block.
 
119
    */
 
120
    block->level_info[0].last_blocks= root;
 
121
  }
 
122
  return 0;
 
123
}
 
124
 
 
125
 
 
126
        /* free all blocks under level */
 
127
 
 
128
unsigned char *hp_free_level(HP_BLOCK *block, uint32_t level, HP_PTRS *pos, unsigned char *last_pos)
 
129
{
 
130
  int max_pos;
 
131
  unsigned char *next_ptr;
 
132
 
 
133
  if (level == 1)
 
134
  {
 
135
    next_ptr=(unsigned char*) pos+block->recbuffer;
 
136
  }
 
137
  else
 
138
  {
 
139
    max_pos= (block->level_info[level-1].last_blocks == pos) ?
 
140
      HP_PTRS_IN_NOD - block->level_info[level-1].free_ptrs_in_block :
 
141
    HP_PTRS_IN_NOD;
 
142
 
 
143
    next_ptr=(unsigned char*) (pos+1);
 
144
    for (int i= 0; i < max_pos ; i++)
 
145
      next_ptr=hp_free_level(block,level-1,
 
146
                              (HP_PTRS*) pos->blocks[i],next_ptr);
 
147
  }
 
148
 
 
149
  if ((unsigned char*) pos != last_pos)
 
150
  {
 
151
    free((unsigned char*) pos);
 
152
    return last_pos;
 
153
  }
 
154
  return next_ptr;                      /* next memory position */
 
155
}