~drizzle-trunk/drizzle/development

1 by brian
clean slate
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
/* Read a record with random-access. The position to the record must
17
   get by MI_INFO. The next record can be read with pos= MI_POS_ERROR */
18
19
20
#include "myisamdef.h"
21
22
/*
23
	   Read a row based on position.
24
	   If filepos= HA_OFFSET_ERROR then read next row
25
	   Return values
26
	   Returns one of following values:
27
	   0 = Ok.
28
	   HA_ERR_RECORD_DELETED = Record is deleted.
29
	   HA_ERR_END_OF_FILE = EOF.
30
*/
31
32
int mi_rrnd(MI_INFO *info, uchar *buf, register my_off_t filepos)
33
{
34
  my_bool skip_deleted_blocks;
35
36
  skip_deleted_blocks=0;
37
38
  if (filepos == HA_OFFSET_ERROR)
39
  {
40
    skip_deleted_blocks=1;
41
    if (info->lastpos == HA_OFFSET_ERROR)	/* First read ? */
42
      filepos= info->s->pack.header_length;	/* Read first record */
43
    else
44
      filepos= info->nextpos;
45
  }
46
47
  if (info->once_flags & RRND_PRESERVE_LASTINX)
48
    info->once_flags&= ~RRND_PRESERVE_LASTINX;
49
  else
50
    info->lastinx= -1;                          /* Can't forward or backward */
51
  /* Init all but update-flag */
52
  info->update&= (HA_STATE_CHANGED | HA_STATE_ROW_CHANGED);
53
54
  if (info->opt_flag & WRITE_CACHE_USED && flush_io_cache(&info->rec_cache))
51.1.109 by Jay Pipes
Removed/replaced DBUG
55
    return(my_errno);
1 by brian
clean slate
56
51.1.109 by Jay Pipes
Removed/replaced DBUG
57
  return ((*info->s->read_rnd)(info,buf,filepos,skip_deleted_blocks));
1 by brian
clean slate
58
}