~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to drizzled/records.cc

  • Committer: Brian Aker
  • Date: 2008-12-15 19:32:58 UTC
  • mfrom: (677.1.2 devel)
  • Revision ID: brian@tangent.org-20081215193258-fsvc1sh9h7a9sb1t
Merge from Monty

Show diffs side-by-side

added added

removed removed

Lines of Context:
11
11
 
12
12
   You should have received a copy of the GNU General Public License
13
13
   along with this program; if not, write to the Free Software
14
 
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA */
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
15
 
15
16
 
16
17
/**
17
18
  @file
19
20
  @brief
20
21
  Functions for easy reading of records, possible through a cache
21
22
*/
22
 
#include "config.h"
23
 
 
24
 
#include "drizzled/drizzled.h"
25
 
#include "drizzled/error.h"
26
 
#include "drizzled/internal/iocache.h"
27
 
#include "drizzled/internal/my_sys.h"
28
 
#include "drizzled/optimizer/range.h"
29
 
#include "drizzled/plugin/storage_engine.h"
30
 
#include "drizzled/records.h"
31
 
#include "drizzled/session.h"
32
 
#include "drizzled/table.h"
33
 
 
34
 
namespace drizzled
35
 
{
36
 
 
37
 
static int rr_sequential(ReadRecord *info);
38
 
static int rr_quick(ReadRecord *info);
39
 
static int rr_from_tempfile(ReadRecord *info);
40
 
static int rr_unpack_from_tempfile(ReadRecord *info);
41
 
static int rr_unpack_from_buffer(ReadRecord *info);
42
 
static int rr_from_pointers(ReadRecord *info);
43
 
static int rr_from_cache(ReadRecord *info);
 
23
#include <drizzled/server_includes.h>
 
24
#include <drizzled/error.h>
 
25
#include <drizzled/table.h>
 
26
#include <drizzled/session.h>
 
27
 
 
28
static int rr_quick(READ_RECORD *info);
 
29
int rr_sequential(READ_RECORD *info);
 
30
static int rr_from_tempfile(READ_RECORD *info);
 
31
static int rr_unpack_from_tempfile(READ_RECORD *info);
 
32
static int rr_unpack_from_buffer(READ_RECORD *info);
 
33
static int rr_from_pointers(READ_RECORD *info);
 
34
static int rr_from_cache(READ_RECORD *info);
 
35
static int init_rr_cache(Session *session, READ_RECORD *info);
44
36
static int rr_cmp(unsigned char *a,unsigned char *b);
45
 
static int rr_index_first(ReadRecord *info);
46
 
static int rr_index(ReadRecord *info);
47
 
 
48
 
void ReadRecord::init_reard_record_sequential()
49
 
{
50
 
  read_record= rr_sequential;
51
 
}
52
 
 
53
 
int ReadRecord::init_read_record_idx(Session *,
54
 
                                     Table *table_arg,
55
 
                                     bool print_error_arg,
56
 
                                     uint32_t idx)
57
 
{
58
 
  table_arg->emptyRecord();
59
 
  table= table_arg;
60
 
  cursor=  table->cursor;
61
 
  record= table->getInsertRecord();
62
 
  print_error= print_error_arg;
 
37
static int rr_index_first(READ_RECORD *info);
 
38
static int rr_index(READ_RECORD *info);
 
39
 
 
40
 
 
41
/**
 
42
  Initialize READ_RECORD structure to perform full index scan (in forward
 
43
  direction) using read_record.read_record() interface.
 
44
 
 
45
    This function has been added at late stage and is used only by
 
46
    UPDATE/DELETE. Other statements perform index scans using
 
47
    join_read_first/next functions.
 
48
 
 
49
  @param info         READ_RECORD structure to initialize.
 
50
  @param session          Thread handle
 
51
  @param table        Table to be accessed
 
52
  @param print_error  If true, call table->file->print_error() if an error
 
53
                      occurs (except for end-of-records error)
 
54
  @param idx          index to scan
 
55
*/
 
56
 
 
57
void init_read_record_idx(READ_RECORD *info, Session *, Table *table,
 
58
                          bool print_error, uint32_t idx)
 
59
{
 
60
  empty_record(table);
 
61
  memset(info, 0, sizeof(*info));
 
62
  info->table= table;
 
63
  info->file=  table->file;
 
64
  info->record= table->record[0];
 
65
  info->print_error= print_error;
63
66
 
64
67
  table->status=0;                      /* And it's always found */
65
 
  if (not table->cursor->inited)
66
 
  {
67
 
    int error= table->cursor->startIndexScan(idx, 1);
68
 
    if (error != 0)
69
 
      return error;
70
 
  }
 
68
  if (!table->file->inited)
 
69
    table->file->ha_index_init(idx, 1);
71
70
  /* read_record will be changed to rr_index in rr_index_first */
72
 
  read_record= rr_index_first;
73
 
 
74
 
  return 0;
 
71
  info->read_record= rr_index_first;
75
72
}
76
73
 
77
74
 
78
 
int ReadRecord::init_read_record(Session *session_arg,
79
 
                                 Table *table_arg,
80
 
                                 optimizer::SqlSelect *select_arg,
81
 
                                 int use_record_cache,
82
 
                                 bool print_error_arg)
 
75
/*
 
76
  init_read_record is used to scan by using a number of different methods.
 
77
  Which method to use is set-up in this call so that later calls to
 
78
  the info->read_record will call the appropriate method using a function
 
79
  pointer.
 
80
 
 
81
  There are five methods that relate completely to the sort function
 
82
  filesort. The result of a filesort is retrieved using read_record
 
83
  calls. The other two methods are used for normal table access.
 
84
 
 
85
  The filesort will produce references to the records sorted, these
 
86
  references can be stored in memory or in a temporary file.
 
87
 
 
88
  The temporary file is normally used when the references doesn't fit into
 
89
  a properly sized memory buffer. For most small queries the references
 
90
  are stored in the memory buffer.
 
91
 
 
92
  The temporary file is also used when performing an update where a key is
 
93
  modified.
 
94
 
 
95
  Methods used when ref's are in memory (using rr_from_pointers):
 
96
    rr_unpack_from_buffer:
 
97
    ----------------------
 
98
      This method is used when table->sort.addon_field is allocated.
 
99
      This is allocated for most SELECT queries not involving any BLOB's.
 
100
      In this case the records are fetched from a memory buffer.
 
101
    rr_from_pointers:
 
102
    -----------------
 
103
      Used when the above is not true, UPDATE, DELETE and so forth and
 
104
      SELECT's involving BLOB's. It is also used when the addon_field
 
105
      buffer is not allocated due to that its size was bigger than the
 
106
      session variable max_length_for_sort_data.
 
107
      In this case the record data is fetched from the handler using the
 
108
      saved reference using the rnd_pos handler call.
 
109
 
 
110
  Methods used when ref's are in a temporary file (using rr_from_tempfile)
 
111
    rr_unpack_from_tempfile:
 
112
    ------------------------
 
113
      Same as rr_unpack_from_buffer except that references are fetched from
 
114
      temporary file. Should obviously not really happen other than in
 
115
      strange configurations.
 
116
 
 
117
    rr_from_tempfile:
 
118
    -----------------
 
119
      Same as rr_from_pointers except that references are fetched from
 
120
      temporary file instead of from
 
121
    rr_from_cache:
 
122
    --------------
 
123
      This is a special variant of rr_from_tempfile that can be used for
 
124
      handlers that is not using the HA_FAST_KEY_READ table flag. Instead
 
125
      of reading the references one by one from the temporary file it reads
 
126
      a set of them, sorts them and reads all of them into a buffer which
 
127
      is then used for a number of subsequent calls to rr_from_cache.
 
128
      It is only used for SELECT queries and a number of other conditions
 
129
      on table size.
 
130
 
 
131
  All other accesses use either index access methods (rr_quick) or a full
 
132
  table scan (rr_sequential).
 
133
  rr_quick:
 
134
  ---------
 
135
    rr_quick uses one of the QUICK_SELECT classes in opt_range.cc to
 
136
    perform an index scan. There are loads of functionality hidden
 
137
    in these quick classes. It handles all index scans of various kinds.
 
138
  rr_sequential:
 
139
  --------------
 
140
    This is the most basic access method of a table using rnd_init,
 
141
    rnd_next and rnd_end. No indexes are used.
 
142
*/
 
143
void init_read_record(READ_RECORD *info,Session *session, Table *table,
 
144
                      SQL_SELECT *select,
 
145
                      int use_record_cache, bool print_error)
83
146
{
84
 
  internal::IO_CACHE *tempfile;
85
 
  int error= 0;
86
 
 
87
 
  session= session_arg;
88
 
  table= table_arg;
89
 
  cursor= table->cursor;
90
 
  forms= &table;                /* Only one table */
 
147
  IO_CACHE *tempfile;
 
148
 
 
149
  memset(info, 0, sizeof(*info));
 
150
  info->session=session;
 
151
  info->table=table;
 
152
  info->file= table->file;
 
153
  info->forms= &info->table;            /* Only one table */
 
154
 
 
155
  if (table->s->tmp_table == NON_TRANSACTIONAL_TMP_TABLE &&
 
156
      !table->sort.addon_field)
 
157
    table->file->extra(HA_EXTRA_MMAP);
91
158
 
92
159
  if (table->sort.addon_field)
93
160
  {
94
 
    rec_buf= table->sort.addon_buf;
95
 
    ref_length= table->sort.addon_length;
 
161
    info->rec_buf= table->sort.addon_buf;
 
162
    info->ref_length= table->sort.addon_length;
96
163
  }
97
164
  else
98
165
  {
99
 
    table->emptyRecord();
100
 
    record= table->getInsertRecord();
101
 
    ref_length= table->cursor->ref_length;
 
166
    empty_record(table);
 
167
    info->record= table->record[0];
 
168
    info->ref_length= table->file->ref_length;
102
169
  }
103
 
  select= select_arg;
104
 
  print_error= print_error_arg;
105
 
  ignore_not_found_rows= 0;
 
170
  info->select=select;
 
171
  info->print_error=print_error;
 
172
  info->ignore_not_found_rows= 0;
106
173
  table->status=0;                      /* And it's always found */
107
174
 
108
 
  if (select && my_b_inited(select->file))
109
 
  {
110
 
    tempfile= select->file;
111
 
  }
 
175
  if (select && my_b_inited(&select->file))
 
176
    tempfile= &select->file;
112
177
  else
113
 
  {
114
178
    tempfile= table->sort.io_cache;
115
 
  }
116
 
 
117
179
  if (tempfile && my_b_inited(tempfile)) // Test if ref-records was used
118
180
  {
119
 
    read_record= (table->sort.addon_field ?
120
 
                  rr_unpack_from_tempfile : rr_from_tempfile);
121
 
 
122
 
    io_cache=tempfile;
123
 
    io_cache->reinit_io_cache(internal::READ_CACHE,0L,0,0);
124
 
    ref_pos=table->cursor->ref;
125
 
    if (!table->cursor->inited)
126
 
    {
127
 
      error= table->cursor->startTableScan(0);
128
 
      if (error != 0)
129
 
        return error;
130
 
    }
 
181
    info->read_record= (table->sort.addon_field ?
 
182
                        rr_unpack_from_tempfile : rr_from_tempfile);
 
183
    info->io_cache=tempfile;
 
184
    reinit_io_cache(info->io_cache,READ_CACHE,0L,0,0);
 
185
    info->ref_pos=table->file->ref;
 
186
    if (!table->file->inited)
 
187
      table->file->ha_rnd_init(0);
131
188
 
132
189
    /*
133
190
      table->sort.addon_field is checked because if we use addon fields,
135
192
      and table->sort.io_cache is read sequentially
136
193
    */
137
194
    if (!table->sort.addon_field &&
138
 
        session->variables.read_rnd_buff_size &&
139
 
        !(table->cursor->getEngine()->check_flag(HTON_BIT_FAST_KEY_READ)) &&
140
 
        (table->db_stat & HA_READ_ONLY ||
141
 
        table->reginfo.lock_type <= TL_READ_NO_INSERT) &&
142
 
        (uint64_t) table->getShare()->getRecordLength() * (table->cursor->stats.records+
143
 
                                                table->cursor->stats.deleted) >
144
 
        (uint64_t) MIN_FILE_LENGTH_TO_USE_ROW_CACHE &&
145
 
        io_cache->end_of_file/ref_length * table->getShare()->getRecordLength() >
146
 
        (internal::my_off_t) MIN_ROWS_TO_USE_TABLE_CACHE &&
147
 
        !table->getShare()->blob_fields &&
148
 
        ref_length <= MAX_REFLENGTH)
 
195
        session->variables.read_rnd_buff_size &&
 
196
        !(table->file->ha_table_flags() & HA_FAST_KEY_READ) &&
 
197
        (table->db_stat & HA_READ_ONLY ||
 
198
         table->reginfo.lock_type <= TL_READ_NO_INSERT) &&
 
199
        (uint64_t) table->s->reclength* (table->file->stats.records+
 
200
                                          table->file->stats.deleted) >
 
201
        (uint64_t) MIN_FILE_LENGTH_TO_USE_ROW_CACHE &&
 
202
        info->io_cache->end_of_file/info->ref_length * table->s->reclength >
 
203
        (my_off_t) MIN_ROWS_TO_USE_TABLE_CACHE &&
 
204
        !table->s->blob_fields &&
 
205
        info->ref_length <= MAX_REFLENGTH)
149
206
    {
150
 
      if (init_rr_cache())
 
207
      if (! init_rr_cache(session, info))
151
208
      {
152
 
        read_record= rr_from_cache;
 
209
        info->read_record=rr_from_cache;
153
210
      }
154
211
    }
155
212
  }
156
213
  else if (select && select->quick)
157
214
  {
158
 
    read_record= rr_quick;
 
215
    info->read_record=rr_quick;
159
216
  }
160
217
  else if (table->sort.record_pointers)
161
218
  {
162
 
    error= table->cursor->startTableScan(0);
163
 
    if (error != 0)
164
 
      return error;
165
 
 
166
 
    cache_pos=table->sort.record_pointers;
167
 
    cache_end= cache_pos+ table->sort.found_records * ref_length;
168
 
    read_record= (table->sort.addon_field ?  rr_unpack_from_buffer : rr_from_pointers);
 
219
    table->file->ha_rnd_init(0);
 
220
    info->cache_pos=table->sort.record_pointers;
 
221
    info->cache_end=info->cache_pos+
 
222
                    table->sort.found_records*info->ref_length;
 
223
    info->read_record= (table->sort.addon_field ?
 
224
                        rr_unpack_from_buffer : rr_from_pointers);
169
225
  }
170
226
  else
171
227
  {
172
 
    read_record= rr_sequential;
173
 
    error= table->cursor->startTableScan(1);
174
 
    if (error != 0)
175
 
      return error;
176
 
 
 
228
    info->read_record=rr_sequential;
 
229
    table->file->ha_rnd_init(1);
177
230
    /* We can use record cache if we don't update dynamic length tables */
178
231
    if (!table->no_cache &&
179
 
        (use_record_cache > 0 ||
180
 
        (int) table->reginfo.lock_type <= (int) TL_READ_WITH_SHARED_LOCKS ||
181
 
        !(table->getShare()->db_options_in_use & HA_OPTION_PACK_RECORD)))
182
 
    {
183
 
      table->cursor->extra_opt(HA_EXTRA_CACHE, session->variables.read_buff_size);
184
 
    }
 
232
        (use_record_cache > 0 ||
 
233
         (int) table->reginfo.lock_type <= (int) TL_READ_HIGH_PRIORITY ||
 
234
         !(table->s->db_options_in_use & HA_OPTION_PACK_RECORD) ||
 
235
         (use_record_cache < 0 &&
 
236
          !(table->file->ha_table_flags() & HA_NOT_DELETE_WITH_CACHE))))
 
237
      table->file->extra_opt(HA_EXTRA_CACHE, session->variables.read_buff_size);
185
238
  }
 
239
  /*
 
240
    Do condition pushdown for UPDATE/DELETE.
 
241
    TODO: Remove this from here as it causes two condition pushdown calls
 
242
    when we're running a SELECT and the condition cannot be pushed down.
 
243
  */
 
244
  if (session->variables.engine_condition_pushdown &&
 
245
      select && select->cond &&
 
246
      (select->cond->used_tables() & table->map) &&
 
247
      !table->file->pushed_cond)
 
248
    table->file->cond_push(select->cond);
186
249
 
187
 
  return 0;
 
250
  return;
188
251
} /* init_read_record */
189
252
 
190
253
 
191
 
void ReadRecord::end_read_record()
 
254
 
 
255
void end_read_record(READ_RECORD *info)
192
256
{                   /* free cache if used */
193
 
  if (cache)
 
257
  if (info->cache)
194
258
  {
195
 
    global_read_rnd_buffer.sub(session->variables.read_rnd_buff_size);
196
 
    free((char*) cache);
197
 
    cache= NULL;
 
259
    free((char*) info->cache);
 
260
    info->cache=0;
198
261
  }
199
 
  if (table)
 
262
  if (info->table)
200
263
  {
201
 
    table->filesort_free_buffers();
202
 
    (void) cursor->extra(HA_EXTRA_NO_CACHE);
203
 
    if (read_record != rr_quick) // otherwise quick_range does it
204
 
      (void) cursor->ha_index_or_rnd_end();
205
 
 
206
 
    table= NULL;
 
264
    filesort_free_buffers(info->table,0);
 
265
    (void) info->file->extra(HA_EXTRA_NO_CACHE);
 
266
    if (info->read_record != rr_quick) // otherwise quick_range does it
 
267
      (void) info->file->ha_index_or_rnd_end();
 
268
    info->table=0;
207
269
  }
208
270
}
209
271
 
210
 
static int rr_handle_error(ReadRecord *info, int error)
 
272
static int rr_handle_error(READ_RECORD *info, int error)
211
273
{
212
274
  if (error == HA_ERR_END_OF_FILE)
213
275
    error= -1;
214
276
  else
215
277
  {
216
278
    if (info->print_error)
217
 
      info->table->print_error(error, MYF(0));
 
279
      info->table->file->print_error(error, MYF(0));
218
280
    if (error < 0)                            // Fix negative BDB errno
219
281
      error= 1;
220
282
  }
221
283
  return error;
222
284
}
223
285
 
 
286
 
224
287
/** Read a record from head-database. */
225
 
static int rr_quick(ReadRecord *info)
 
288
 
 
289
static int rr_quick(READ_RECORD *info)
226
290
{
227
291
  int tmp;
228
292
  while ((tmp= info->select->quick->get_next()))
229
293
  {
230
 
    if (info->session->getKilled())
 
294
    if (info->session->killed)
231
295
    {
232
296
      my_error(ER_SERVER_SHUTDOWN, MYF(0));
233
297
      return 1;
238
302
      break;
239
303
    }
240
304
  }
241
 
 
 
305
  update_virtual_fields_marked_for_write(info->table);
242
306
  return tmp;
243
307
}
244
308
 
 
309
 
245
310
/**
246
311
  Reads first row in an index scan.
247
312
 
254
319
  @retval
255
320
    1   Error
256
321
*/
257
 
static int rr_index_first(ReadRecord *info)
 
322
 
 
323
static int rr_index_first(READ_RECORD *info)
258
324
{
259
 
  int tmp= info->cursor->index_first(info->record);
 
325
  int tmp= info->file->index_first(info->record);
260
326
  info->read_record= rr_index;
261
327
  if (tmp)
262
328
    tmp= rr_handle_error(info, tmp);
263
329
  return tmp;
264
330
}
265
331
 
 
332
 
266
333
/**
267
334
  Reads index sequentially after first row.
268
335
 
278
345
  @retval
279
346
    1   Error
280
347
*/
281
 
static int rr_index(ReadRecord *info)
 
348
 
 
349
static int rr_index(READ_RECORD *info)
282
350
{
283
 
  int tmp= info->cursor->index_next(info->record);
 
351
  int tmp= info->file->index_next(info->record);
284
352
  if (tmp)
285
353
    tmp= rr_handle_error(info, tmp);
286
354
  return tmp;
287
355
}
288
356
 
289
 
int rr_sequential(ReadRecord *info)
 
357
 
 
358
int rr_sequential(READ_RECORD *info)
290
359
{
291
360
  int tmp;
292
 
  while ((tmp= info->cursor->rnd_next(info->record)))
 
361
  while ((tmp=info->file->rnd_next(info->record)))
293
362
  {
294
 
    if (info->session->getKilled())
 
363
    if (info->session->killed)
295
364
    {
296
365
      info->session->send_kill_message();
297
366
      return 1;
298
367
    }
299
368
    /*
300
 
      TODO> Fix this so that engine knows how to behave on its own.
301
369
      rnd_next can return RECORD_DELETED for MyISAM when one thread is
302
370
      reading and another deleting without locks.
303
371
    */
307
375
      break;
308
376
    }
309
377
  }
310
 
 
 
378
  if (!tmp)
 
379
    update_virtual_fields_marked_for_write(info->table);
311
380
  return tmp;
312
381
}
313
382
 
314
 
static int rr_from_tempfile(ReadRecord *info)
 
383
 
 
384
static int rr_from_tempfile(READ_RECORD *info)
315
385
{
316
386
  int tmp;
317
387
  for (;;)
318
388
  {
319
389
    if (my_b_read(info->io_cache,info->ref_pos,info->ref_length))
320
 
      return -1;                                        /* End of cursor */
321
 
    if (!(tmp=info->cursor->rnd_pos(info->record,info->ref_pos)))
 
390
      return -1;                                        /* End of file */
 
391
    if (!(tmp=info->file->rnd_pos(info->record,info->ref_pos)))
322
392
      break;
323
393
    /* The following is extremely unlikely to happen */
324
394
    if (tmp == HA_ERR_RECORD_DELETED ||
330
400
  return tmp;
331
401
} /* rr_from_tempfile */
332
402
 
 
403
 
333
404
/**
334
 
  Read a result set record from a temporary cursor after sorting.
 
405
  Read a result set record from a temporary file after sorting.
335
406
 
336
 
  The function first reads the next sorted record from the temporary cursor.
 
407
  The function first reads the next sorted record from the temporary file.
337
408
  into a buffer. If a success it calls a callback function that unpacks
338
409
  the fields values use in the result set from this buffer into their
339
410
  positions in the regular record buffer.
345
416
  @retval
346
417
    -1   There is no record to be read anymore.
347
418
*/
348
 
static int rr_unpack_from_tempfile(ReadRecord *info)
 
419
 
 
420
static int rr_unpack_from_tempfile(READ_RECORD *info)
349
421
{
350
422
  if (my_b_read(info->io_cache, info->rec_buf, info->ref_length))
351
423
    return -1;
355
427
  return 0;
356
428
}
357
429
 
358
 
static int rr_from_pointers(ReadRecord *info)
 
430
static int rr_from_pointers(READ_RECORD *info)
359
431
{
360
432
  int tmp;
361
433
  unsigned char *cache_pos;
362
434
 
363
 
 
364
435
  for (;;)
365
436
  {
366
437
    if (info->cache_pos == info->cache_end)
367
 
      return -1;                                        /* End of cursor */
 
438
      return -1;                                        /* End of file */
368
439
    cache_pos= info->cache_pos;
369
440
    info->cache_pos+= info->ref_length;
370
441
 
371
 
    if (!(tmp=info->cursor->rnd_pos(info->record,cache_pos)))
 
442
    if (!(tmp=info->file->rnd_pos(info->record,cache_pos)))
372
443
      break;
373
444
 
374
445
    /* The following is extremely unlikely to happen */
396
467
  @retval
397
468
    -1   There is no record to be read anymore.
398
469
*/
399
 
static int rr_unpack_from_buffer(ReadRecord *info)
 
470
 
 
471
static int rr_unpack_from_buffer(READ_RECORD *info)
400
472
{
401
473
  if (info->cache_pos == info->cache_end)
402
474
    return -1;                      /* End of buffer */
406
478
 
407
479
  return 0;
408
480
}
 
481
        /* cacheing of records from a database */
409
482
 
410
 
/* cacheing of records from a database */
411
 
bool ReadRecord::init_rr_cache()
 
483
static int init_rr_cache(Session *session, READ_RECORD *info)
412
484
{
413
 
  uint32_t local_rec_cache_size;
414
 
 
415
 
  struct_length= 3 + MAX_REFLENGTH;
416
 
  reclength= ALIGN_SIZE(table->getShare()->getRecordLength() + 1);
417
 
  if (reclength < struct_length)
418
 
    reclength= ALIGN_SIZE(struct_length);
419
 
 
420
 
  error_offset= table->getShare()->getRecordLength();
421
 
  cache_records= (session->variables.read_rnd_buff_size /
422
 
                        (reclength + struct_length));
423
 
  local_rec_cache_size= cache_records * reclength;
424
 
  rec_cache_size= cache_records * ref_length;
425
 
 
426
 
  if (not global_read_rnd_buffer.add(session->variables.read_rnd_buff_size))
427
 
  {
428
 
    my_error(ER_OUT_OF_GLOBAL_READRNDMEMORY, MYF(ME_ERROR+ME_WAITTANG));
429
 
    return false;
430
 
  }
 
485
  uint32_t rec_cache_size;
 
486
 
 
487
  info->struct_length= 3+MAX_REFLENGTH;
 
488
  info->reclength= ALIGN_SIZE(info->table->s->reclength+1);
 
489
  if (info->reclength < info->struct_length)
 
490
    info->reclength= ALIGN_SIZE(info->struct_length);
 
491
 
 
492
  info->error_offset= info->table->s->reclength;
 
493
  info->cache_records= (session->variables.read_rnd_buff_size /
 
494
                        (info->reclength+info->struct_length));
 
495
  rec_cache_size= info->cache_records*info->reclength;
 
496
  info->rec_cache_size= info->cache_records*info->ref_length;
431
497
 
432
498
  // We have to allocate one more byte to use uint3korr (see comments for it)
433
 
  if (cache_records <= 2 ||
434
 
      !(cache=(unsigned char*) malloc(local_rec_cache_size + cache_records * struct_length + 1)))
435
 
  {
436
 
    return false;
437
 
  }
438
 
#ifdef HAVE_VALGRIND
 
499
  if (info->cache_records <= 2 ||
 
500
      !(info->cache=(unsigned char*) malloc(rec_cache_size+info->cache_records*
 
501
                                            info->struct_length+1)))
 
502
    return(1);
 
503
#ifdef HAVE_purify
439
504
  // Avoid warnings in qsort
440
 
  memset(cache, 0, local_rec_cache_size + cache_records * struct_length + 1);
 
505
  memset(info->cache, 0,
 
506
         rec_cache_size+info->cache_records* info->struct_length+1);
441
507
#endif
442
 
  read_positions= cache + local_rec_cache_size;
443
 
  cache_pos= cache_end= cache;
444
 
 
445
 
  return true;
 
508
  info->read_positions=info->cache+rec_cache_size;
 
509
  info->cache_pos=info->cache_end=info->cache;
 
510
  return(0);
446
511
} /* init_rr_cache */
447
512
 
448
 
static int rr_from_cache(ReadRecord *info)
 
513
 
 
514
static int rr_from_cache(READ_RECORD *info)
449
515
{
 
516
  register uint32_t i;
450
517
  uint32_t length;
451
 
  internal::my_off_t rest_of_file;
 
518
  my_off_t rest_of_file;
452
519
  int16_t error;
453
520
  unsigned char *position,*ref_position,*record_pos;
454
521
  uint32_t record;
459
526
    {
460
527
      if (info->cache_pos[info->error_offset])
461
528
      {
462
 
        shortget(error,info->cache_pos);
463
 
        if (info->print_error)
464
 
          info->table->print_error(error,MYF(0));
 
529
        shortget(error,info->cache_pos);
 
530
        if (info->print_error)
 
531
          info->table->file->print_error(error,MYF(0));
465
532
      }
466
533
      else
467
534
      {
468
 
        error=0;
469
 
        memcpy(info->record,info->cache_pos, (size_t) info->table->getShare()->getRecordLength());
 
535
        error=0;
 
536
        memcpy(info->record,info->cache_pos,
 
537
               (size_t) info->table->s->reclength);
470
538
      }
471
 
      info->cache_pos+= info->reclength;
 
539
      info->cache_pos+=info->reclength;
472
540
      return ((int) error);
473
541
    }
474
542
    length=info->rec_cache_size;
475
 
    rest_of_file= info->io_cache->end_of_file - my_b_tell(info->io_cache);
476
 
    if ((internal::my_off_t) length > rest_of_file)
477
 
    {
 
543
    rest_of_file=info->io_cache->end_of_file - my_b_tell(info->io_cache);
 
544
    if ((my_off_t) length > rest_of_file)
478
545
      length= (uint32_t) rest_of_file;
479
 
    }
480
 
 
481
 
    if (!length || my_b_read(info->io_cache, info->getCache(), length))
 
546
    if (!length || my_b_read(info->io_cache,info->cache,length))
482
547
    {
483
 
      return -1;                        /* End of cursor */
 
548
      return -1;                        /* End of file */
484
549
    }
485
550
 
486
551
    length/=info->ref_length;
487
 
    position=info->getCache();
 
552
    position=info->cache;
488
553
    ref_position=info->read_positions;
489
 
    for (uint32_t i= 0 ; i < length ; i++,position+=info->ref_length)
 
554
    for (i=0 ; i < length ; i++,position+=info->ref_length)
490
555
    {
491
556
      memcpy(ref_position,position,(size_t) info->ref_length);
492
557
      ref_position+=MAX_REFLENGTH;
493
558
      int3store(ref_position,(long) i);
494
559
      ref_position+=3;
495
560
    }
496
 
    internal::my_qsort(info->read_positions, length, info->struct_length,
497
 
                       (qsort_cmp) rr_cmp);
 
561
    my_qsort(info->read_positions, length, info->struct_length,
 
562
             (qsort_cmp) rr_cmp);
498
563
 
499
564
    position=info->read_positions;
500
 
    for (uint32_t i= 0 ; i < length ; i++)
 
565
    for (i=0 ; i < length ; i++)
501
566
    {
502
 
      memcpy(info->ref_pos, position, (size_t)info->ref_length);
 
567
      memcpy(info->ref_pos,position,(size_t) info->ref_length);
503
568
      position+=MAX_REFLENGTH;
504
569
      record=uint3korr(position);
505
570
      position+=3;
506
 
      record_pos= info->getCache() + record * info->reclength;
507
 
      if ((error=(int16_t) info->cursor->rnd_pos(record_pos,info->ref_pos)))
 
571
      record_pos=info->cache+record*info->reclength;
 
572
      if ((error=(int16_t) info->file->rnd_pos(record_pos,info->ref_pos)))
508
573
      {
509
 
        record_pos[info->error_offset]=1;
510
 
        shortstore(record_pos,error);
 
574
        record_pos[info->error_offset]=1;
 
575
        shortstore(record_pos,error);
511
576
      }
512
577
      else
513
 
        record_pos[info->error_offset]=0;
 
578
        record_pos[info->error_offset]=0;
514
579
    }
515
 
    info->cache_end= (info->cache_pos= info->getCache())+length*info->reclength;
 
580
    info->cache_end=(info->cache_pos=info->cache)+length*info->reclength;
516
581
  }
517
582
} /* rr_from_cache */
518
583
 
 
584
 
519
585
static int rr_cmp(unsigned char *a,unsigned char *b)
520
586
{
521
587
  if (a[0] != b[0])
538
604
  return (int) a[7] - (int) b[7];
539
605
#endif
540
606
}
541
 
 
542
 
} /* namespace drizzled */