rf_diskevent.c

RAIDFrame是个非常好的磁盘阵列RAID仿真工具

/*
 * Copyright (c) 1995 Carnegie-Mellon University.
 * All rights reserved.
 *
 * Author: Rachad Youssef
 *
 * Permission to use, copy, modify and distribute this software and
 * its documentation is hereby granted, provided that both the copyright
 * notice and this permission notice appear in all copies of the
 * software, derivative works or modified versions, and any portions
 * thereof, and that both notices appear in supporting documentation.
 *
 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
 * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
 * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
 *
 * Carnegie Mellon requests users of this software to return to
 *
 *  Software Distribution Coordinator  or  [e-mail]
 *  School of Computer Science
 *  Carnegie Mellon University
 *  Pittsburgh PA 15213-3890
 *
 * any improvements or extensions that they make and grant Carnegie the
 * rights to redistribute these changes.
 */

/* 
 * rf_diskevent. - support for disk device, by managing a heap of future events
 * adapted from original code by David Kotz, Song Bac Toh (1994)
 */

/* $Locker:  $
 * $Log: rf_diskevent.c,v $
 * Revision 1.18  1996/07/28  20:31:39  jimz
 * i386netbsd port
 * true/false fixup
 *
 * Revision 1.17  1996/07/27  16:05:19  jimz
 * return ENOMEM if DDEventInit fails its call to InitHeap
 *
 * Revision 1.16  1996/06/10  12:06:24  jimz
 * fix spelling errors
 *
 * Revision 1.15  1996/06/10  11:55:47  jimz
 * Straightened out some per-array/not-per-array distinctions, fixed
 * a couple bugs related to confusion. Added shutdown lists. Removed
 * layout shutdown function (now subsumed by shutdown lists).
 *
 * Revision 1.14  1996/06/07  21:33:04  jimz
 * begin using consistent types for sector numbers,
 * stripe numbers, row+col numbers, recon unit numbers
 *
 * Revision 1.13  1996/06/02  17:31:48  jimz
 * Moved a lot of global stuff into array structure, where it belongs.
 * Fixed up paritylogging, pss modules in this manner. Some general
 * code cleanup. Removed lots of dead code, some dead files.
 *
 * Revision 1.12  1996/05/30  11:29:41  jimz
 * Numerous bug fixes. Stripe lock release code disagreed with the taking code
 * about when stripes should be locked (I made it consistent: no parity, no lock)
 * There was a lot of extra serialization of I/Os which I've removed- a lot of
 * it was to calculate values for the cache code, which is no longer with us.
 * More types, function, macro cleanup. Added code to properly quiesce the array
 * on shutdown. Made a lot of stuff array-specific which was (bogusly) general
 * before. Fixed memory allocation, freeing bugs.
 *
 * Revision 1.11  1996/05/27  18:56:37  jimz
 * more code cleanup
 * better typing
 * compiles in all 3 environments
 *
 * Revision 1.10  1996/05/24  04:28:55  jimz
 * release cleanup ckpt
 *
 * Revision 1.9  1996/05/23  00:33:23  jimz
 * code cleanup: move all debug decls to rf_options.c, all extern
 * debug decls to rf_options.h, all debug vars preceded by rf_
 *
 * Revision 1.8  1996/05/18  19:51:34  jimz
 * major code cleanup- fix syntax, make some types consistent,
 * add prototypes, clean out dead code, et cetera
 *
 * Revision 1.7  1995/12/01  15:57:56  root
 * added copyright info
 *
 */
       
#include "rf_types.h"
#include "rf_heap.h"
#include "rf_diskevent.h"
#include "rf_general.h"
#include "rf_dag.h"
#include "rf_diskthreads.h"
#include "rf_states.h"
#include "rf_shutdown.h"

/* trace printing can be turned on/off in the Makefile */

RF_TICS_t rf_cur_time;
static RF_Owner_t cur_owner;
static RF_Heap_t heap;

static void rf_DDEventShutdown(ignored)
  void  *ignored;
{
  rf_FreeHeap(heap);
}

/* ======================================================================== */
/*  DDEventInit
 *
 *  Initialize the event heap.
 */
int rf_DDEventInit(listp)
  RF_ShutdownList_t  **listp;
{
  int rc;

  heap = rf_InitHeap(RF_HEAP_MAX); /* initialize the heap */
  if (heap == NULL)
    return(ENOMEM);
  rc = rf_ShutdownCreate(listp, rf_DDEventShutdown, NULL);
  if (rc) {
    RF_ERRORMSG3("RAIDFRAME: failed creating shutdown event file %s line %d rc=%d\n",
      __FILE__, __LINE__, rc);
    rf_FreeHeap(heap);
    return(rc);
  }
  rf_cur_time=(RF_TICS_t)0;
  return(0);
}



/*  DDEventRequest
 *
 *  Put an event request into the event heap.
 */
void rf_DDEventRequest(
  RF_TICS_t      eventTime,
  int          (*CompleteFunc)(),
  void          *argument,
  RF_Owner_t     owner,
  RF_RowCol_t    row,
  RF_RowCol_t    col,
  RF_Raid_t     *raidPtr,
  void          *diskid)
{
  RF_HeapData_t *hpdat;

  RF_Malloc(hpdat,sizeof(RF_HeapData_t),(RF_HeapData_t *) );
  if (hpdat == NULL) {
    fprintf(stderr, "DDEventRequest: malloc failed\n");
    RF_PANIC();
  }

  hpdat->eventTime = eventTime;
  hpdat->CompleteFunc = CompleteFunc;  
  hpdat->argument = argument;
  hpdat->owner = owner;
  hpdat->row = row;
  hpdat->col = col;
  hpdat->raidPtr = raidPtr;
  hpdat->diskid = diskid;
  rf_AddHeap(heap, hpdat, (hpdat->eventTime));
}

void rf_DAGEventRequest(
  RF_TICS_t             eventTime,
  RF_Owner_t            owner,
  RF_RowCol_t           row,
  RF_RowCol_t           col,
  RF_RaidAccessDesc_t  *desc,
  RF_Raid_t            *raidPtr) 
{
  RF_HeapData_t *hpdat;    

  RF_Malloc(hpdat,sizeof(RF_HeapData_t),(RF_HeapData_t *) );
  if (hpdat == NULL) {
    fprintf(stderr, "DDEventRequest: malloc failed\n");
    RF_PANIC();
  }

  hpdat->eventTime = eventTime;
  hpdat->CompleteFunc = NULL;  
  hpdat->argument = NULL;
  hpdat->owner = owner;
  hpdat->row = row;
  hpdat->col = col;
  hpdat->desc=desc;
  hpdat->raidPtr = raidPtr;

  rf_AddHeap(heap, hpdat, (hpdat->eventTime));
}


/* ------------------------------------------------------------------------ */
/* @SUBTITLE "Print out the request queue" */
/* There is only 1 request queue so no argument is needed for this
   function */
void rf_DDPrintRequests()
{
  RF_HeapData_t *Hpdat;
  RF_HeapKey_t Hpkey;
  RF_Heap_t tempHp;

  printf("Events on heap:\n");

  tempHp = rf_InitHeap(RF_HEAP_MAX);
  while (rf_RemHeap(heap, &Hpdat, &Hpkey) != RF_HEAP_NONE)
    {
	 printf ("at %5g HpKey there is: something for owner %d  at disk  %d %d\n",Hpkey,
		 Hpdat->owner,Hpdat->row,Hpdat->col);
	 rf_AddHeap(tempHp, Hpdat, Hpdat->eventTime);
    }

  printf("END heap:\n");
  rf_FreeHeap(heap);		 /* free the empty old heap */

  heap = tempHp;		 /* restore the recycled heap */
}
/* ------------------------------------------------------------------------ */

int rf_ProcessEvent()
{
  RF_HeapData_t *Hpdat;
  RF_HeapKey_t Hpkey;
  int retcode;

  retcode = rf_RemHeap(heap, &Hpdat, &Hpkey);

  if (retcode==RF_HEAP_FOUND) {          
    if (rf_eventDebug) {
      rf_DDPrintRequests();
      printf ("Now processing: at %5g something for owner %d  at disk  %d %d\n",
        Hpkey, Hpdat->owner, Hpdat->row, Hpdat->col);
    }
    rf_cur_time=Hpkey;

    rf_SetCurrentOwner(Hpdat->owner);

    if (Hpdat->row>=0) {/* ongoing dag event */
      rf_SetDiskIdle (Hpdat->raidPtr, Hpdat->row, Hpdat->col);
      if (Hpdat->diskid != NULL) {
        rf_simulator_complete_io(Hpdat->diskid);
      }
      retcode=(Hpdat->CompleteFunc)(Hpdat->argument,0);
      if (retcode==RF_HEAP_FOUND)
        (((RF_DagNode_t *) (Hpdat->argument))->dagHdr->cbFunc)(((RF_DagNode_t *) (Hpdat->argument))->dagHdr->cbArg);
      RF_Free(Hpdat,sizeof(RF_HeapData_t));
      return(retcode);
    }
    else {
      /* this is a dag event or reconstruction event */
      if (Hpdat->row==RF_DD_DAGEVENT_ROW){ /* dag event */
        rf_ContinueRaidAccess(Hpdat->desc);
        retcode = RF_FALSE;
        RF_Free(Hpdat,sizeof(RF_HeapData_t));
        return (RF_FALSE);
      }
      else {
        /* recon event */
        retcode=(Hpdat->CompleteFunc)(Hpdat->argument,0);
        retcode = RF_FALSE;
        RF_Free(Hpdat,sizeof(RF_HeapData_t));
        return (RF_FALSE);
      }
    }
  }
  if (rf_eventDebug)
    printf("HEAP is empty\n");
  return(RF_DD_NOTHING_THERE);
}

RF_Owner_t rf_GetCurrentOwner()
{
  return(cur_owner);
}

void rf_SetCurrentOwner(RF_Owner_t owner)
{
  cur_owner=owner;
}

RF_TICS_t rf_CurTime()
{
  return(rf_cur_time);
}