fis-gtm/sr_unix/jnl_fsync.c

142 lines
4.2 KiB
C
Raw Permalink Normal View History

/****************************************************************
* *
* Copyright 2001, 2011 Fidelity Information Services, Inc *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#include "mdef.h"
#include "gtm_unistd.h"
#include "gdsroot.h"
#include "gtm_facility.h"
#include "fileinfo.h"
#include "gdsbt.h"
#include "gdsfhead.h"
#include "gdsbgtr.h"
#include "filestruct.h"
#include "iosp.h"
#include "jnl.h"
#include "aswp.h"
#include "interlock.h"
#include "sleep_cnt.h"
#include "eintr_wrappers.h"
#include "performcaslatchcheck.h"
#include "send_msg.h"
#include "wcs_sleep.h"
#include "is_file_identical.h"
#include "gtm_string.h"
#include "gtm_c_stack_trace.h"
#include "gtmsecshr.h" /* for continue_proc */
#ifdef DEBUG
#include "gt_timer.h"
#include "gtm_stdio.h"
#include "wbox_test_init.h"
#endif
GBLREF uint4 process_id;
error_def(ERR_JNLFSYNCERR);
error_def(ERR_FSYNCTIMOUT);
error_def(ERR_TEXT);
error_def(ERR_JNLFRCDTERM);
error_def(ERR_JNLFSYNCLSTCK);
#define CURRENT_WRITER jb->fsync_in_prog_latch.u.parts.latch_pid
void jnl_fsync(gd_region *reg, uint4 fsync_addr)
{
jnl_private_control *jpc;
jnl_buffer_ptr_t jb;
uint4 lcnt, saved_dsk_addr, saved_status;
sgmnt_addrs *csa;
sgmnt_data_ptr_t csd;
int4 lck_state;
int fsync_ret, save_errno;
csa = &FILE_INFO(reg)->s_addrs;
jpc = csa->jnl;
jb = jpc->jnl_buff;
if ((NOJNL != jpc->channel) && !JNL_FILE_SWITCHED(jpc))
{
csd = csa->hdr;
for (lcnt = 1; fsync_addr > jb->fsync_dskaddr && !JNL_FILE_SWITCHED(jpc); lcnt++)
{
if (MAX_FSYNC_WAIT_CNT / 2 == lcnt) /* half way into the wait timeout */
{
saved_status = jpc->status;
jpc->status = SS_NORMAL;
DEBUG_ONLY(
if (CURRENT_WRITER)
GET_C_STACK_FROM_SCRIPT("JNLFSYNCSTUCK_HALF_TIME",
process_id, CURRENT_WRITER, ONCE);
)
jnl_send_oper(jpc, ERR_JNLFSYNCLSTCK);
jpc->status = saved_status;
} else if (MAX_FSYNC_WAIT_CNT < lcnt) /* timed-out waiting for the fsync lock */
{
saved_status = jpc->status;
jpc->status = SS_NORMAL;
if (CURRENT_WRITER)
GET_C_STACK_FROM_SCRIPT("JNLFSYNCSTUCK", process_id, CURRENT_WRITER, TWICE);
jnl_send_oper(jpc, ERR_JNLFSYNCLSTCK);
jpc->status = saved_status;
send_msg(VARLSTCNT(4) ERR_FSYNCTIMOUT, 2, JNL_LEN_STR(csd));
GTMASSERT;
}
BG_TRACE_PRO_ANY(csa, n_jnl_fsync_tries);
if (GET_SWAPLOCK(&jb->fsync_in_prog_latch))
break;
wcs_sleep(lcnt);
/* trying to wake up the lock holder one iteration before calling c_script */
if ((MAX_FSYNC_WAIT_CNT / 2 - 1 == lcnt) || (MAX_FSYNC_WAIT_CNT == lcnt))
performCASLatchCheck(&jb->fsync_in_prog_latch, TRUE);
}
DEBUG_ONLY(
if (gtm_white_box_test_case_enabled
&& (WBTEST_EXTEND_JNL_FSYNC == gtm_white_box_test_case_number))
{
FPRINTF(stderr, "JNL_FSYNC: will sleep for 40 seconds\n", process_id);
LONG_SLEEP(40);
FPRINTF(stderr, "JNL_FSYNC: done sleeping\n", process_id);
gtm_white_box_test_case_enabled = FALSE;
}
)
if (fsync_addr > jb->fsync_dskaddr && !JNL_FILE_SWITCHED(jpc))
{
assert(process_id == jb->fsync_in_prog_latch.u.parts.latch_pid); /* assert we have the lock */
saved_dsk_addr = jb->dskaddr;
if (jpc->sync_io)
{ /* We need to maintain the fsync control fields irrespective of the type of IO, because we might
* switch between these at any time.
*/
jb->fsync_dskaddr = saved_dsk_addr;
} else
{
GTM_FSYNC(jpc->channel, fsync_ret);
if (-1 == fsync_ret)
{
save_errno = errno;
assert(FALSE);
send_msg(VARLSTCNT(9) ERR_JNLFSYNCERR, 2, JNL_LEN_STR(csd),
ERR_TEXT, 2, RTS_ERROR_TEXT("Error with fsync"), save_errno);
rts_error(VARLSTCNT(9) ERR_JNLFSYNCERR, 2, JNL_LEN_STR(csd),
ERR_TEXT, 2, RTS_ERROR_TEXT("Error with fsync"), save_errno);
} else
{
jb->fsync_dskaddr = saved_dsk_addr;
BG_TRACE_PRO_ANY(csa, n_jnl_fsyncs);
}
}
}
if (process_id == jb->fsync_in_prog_latch.u.parts.latch_pid)
RELEASE_SWAPLOCK(&jb->fsync_in_prog_latch);
}
return;
}