1
/* Copyright (C) 2000-2001, 2004 MySQL AB
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.
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.
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 */
17
Logging of MyISAM commands and records on logfile for debugging
18
The log can be examined with help of the myisamlog command.
21
#include "myisamdef.h"
22
#if defined(MSDOS) || defined(__WIN__)
29
#include <processes.h>
32
#undef GETPID /* For HPUX */
33
#define GETPID() (log_type == 1 ? (long) myisam_pid : (long) my_thread_dbug_id())
35
/* Activate logging if flag is 1 and reset logging if flag is 0 */
37
static int log_type=0;
40
int mi_log(int activate_log)
46
log_type=activate_log;
50
myisam_pid=(ulong) getpid();
51
if (myisam_log_file < 0)
53
if ((myisam_log_file = my_create(fn_format(buff,myisam_log_filename,
55
0,(O_RDWR | O_BINARY | O_APPEND),MYF(0)))
57
DBUG_RETURN(my_errno);
60
else if (myisam_log_file >= 0)
62
error=my_close(myisam_log_file,MYF(0)) ? my_errno : 0 ;
69
/* Logging of records and commands on logfile */
70
/* All logs starts with command(1) dfile(2) process(4) result(2) */
72
void _myisam_log(enum myisam_log_commands command, MI_INFO *info,
73
const uchar *buffert, uint length)
77
ulong pid=(ulong) GETPID();
79
bzero(buff,sizeof(buff));
80
buff[0]=(char) command;
81
mi_int2store(buff+1,info->dfile);
82
mi_int4store(buff+3,pid);
83
mi_int2store(buff+9,length);
85
pthread_mutex_lock(&THR_LOCK_myisam);
86
error=my_lock(myisam_log_file,F_WRLCK,0L,F_TO_EOF,MYF(MY_SEEK_NOT_DONE));
87
VOID(my_write(myisam_log_file,buff,sizeof(buff),MYF(0)));
88
VOID(my_write(myisam_log_file,buffert,length,MYF(0)));
90
error=my_lock(myisam_log_file,F_UNLCK,0L,F_TO_EOF,MYF(MY_SEEK_NOT_DONE));
91
pthread_mutex_unlock(&THR_LOCK_myisam);
96
void _myisam_log_command(enum myisam_log_commands command, MI_INFO *info,
97
const uchar *buffert, uint length, int result)
101
ulong pid=(ulong) GETPID();
104
buff[0]=(char) command;
105
mi_int2store(buff+1,info->dfile);
106
mi_int4store(buff+3,pid);
107
mi_int2store(buff+7,result);
108
pthread_mutex_lock(&THR_LOCK_myisam);
109
error=my_lock(myisam_log_file,F_WRLCK,0L,F_TO_EOF,MYF(MY_SEEK_NOT_DONE));
110
VOID(my_write(myisam_log_file,buff,sizeof(buff),MYF(0)));
112
VOID(my_write(myisam_log_file,buffert,length,MYF(0)));
114
error=my_lock(myisam_log_file,F_UNLCK,0L,F_TO_EOF,MYF(MY_SEEK_NOT_DONE));
115
pthread_mutex_unlock(&THR_LOCK_myisam);
120
void _myisam_log_record(enum myisam_log_commands command, MI_INFO *info,
121
const uchar *record, my_off_t filepos, int result)
126
ulong pid=(ulong) GETPID();
129
if (!info->s->base.blobs)
130
length=info->s->base.reclength;
132
length=info->s->base.reclength+ _my_calc_total_blob_length(info,record);
133
buff[0]=(uchar) command;
134
mi_int2store(buff+1,info->dfile);
135
mi_int4store(buff+3,pid);
136
mi_int2store(buff+7,result);
137
mi_sizestore(buff+9,filepos);
138
mi_int4store(buff+17,length);
139
pthread_mutex_lock(&THR_LOCK_myisam);
140
error=my_lock(myisam_log_file,F_WRLCK,0L,F_TO_EOF,MYF(MY_SEEK_NOT_DONE));
141
VOID(my_write(myisam_log_file, buff,sizeof(buff),MYF(0)));
142
VOID(my_write(myisam_log_file, record,info->s->base.reclength,MYF(0)));
143
if (info->s->base.blobs)
147
for (end=info->blobs+info->s->base.blobs, blob= info->blobs;
151
memcpy_fixed((uchar*) &pos, record+blob->offset+blob->pack_length,
153
VOID(my_write(myisam_log_file,pos,blob->length,MYF(0)));
157
error=my_lock(myisam_log_file,F_UNLCK,0L,F_TO_EOF,MYF(MY_SEEK_NOT_DONE));
158
pthread_mutex_unlock(&THR_LOCK_myisam);