Initial commit of OpenSPARC T2 architecture model.

[OpenSPARC-T2-SAM] / sam-t2 / sam / cpus / vonk / ss / lib / cpu / src / SS_Tte.cc

// ========== Copyright Header Begin ==========================================
// 
// OpenSPARC T2 Processor File: SS_Tte.cc
// Copyright (c) 2006 Sun Microsystems, Inc.  All Rights Reserved.
// DO NOT ALTER OR REMOVE COPYRIGHT NOTICES.
// 
// The above named program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public
// License version 2 as published by the Free Software Foundation.
// 
// The above named program is distributed in the hope that it will be 
// useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
// General Public License for more details.
// 
// You should have received a copy of the GNU General Public
// License along with this work; if not, write to the Free Software
// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
// 
// ========== Copyright Header End ============================================

#include "SS_Tte.h"

void SS_Tte::snapshot( SS_SnapShot& ss, const char* prefix )/*{{{*/
{
 char  flg[32];
 char* ptr = flg;

 if (ss.do_save())
 {
   // Save the tte_flags as a char string rather then a number to
   // make us independant of the implementations. The characters
   // are choosens to "match" the flags, e.g. 'x' is execuable, etc.
   // If flags == 0 then a '-' is used to give the flags string length.

   if (p())            *ptr++ = 'p';
   if (x())            *ptr++ = 'x';
   if (w())            *ptr++ = 'w';
   if (nfo())          *ptr++ = 'n';
   if (ie())           *ptr++ = 'i';
   if (cp())           *ptr++ = 'P';
   if (cv())           *ptr++ = 'V';
   if (e())            *ptr++ = 'e';
   if (lock())         *ptr++ = 'L';
   if (valid_bit())    *ptr++ = 'v';
   if (real_bit())     *ptr++ = 'r';
   if (flg == ptr)     *ptr++ = '-';
   *ptr = 0;
 }

 sprintf(ss.tag,"%s.pid",prefix);      ss.val(&tte_pid);
 sprintf(ss.tag,"%s.sze",prefix);      ss.val(&tte_page_size);
 sprintf(ss.tag,"%s.ctx",prefix);      ss.val(&tte_context);
 sprintf(ss.tag,"%s.flg",prefix);      ss.val(flg);
 sprintf(ss.tag,"%s.tag",prefix);      ss.val(&tte_tag);
 sprintf(ss.tag,"%s.pa",prefix);       ss.val(&tte_taddr);

 if (ss.do_load())
 {
   // Load the tte flags back, converting the characters back to
   // numeric flags values. The character to flag conversion has to match 
   // the once in teh do_save() black above.
 
   tte_flags = 0;
   while (*ptr) 
   {
     switch (*ptr++)
     {
       case '-': break;
       case 'p': p(1); break;
       case 'x': x(1); break;
       case 'w': w(1); break;
       case 'n': nfo(1); break;
       case 'i': ie(1); break;
       case 'P': cp(1); break;
       case 'V': cv(1); break;
       case 'e': e(1); break;
       case 'L': lock(1); break;
       case 'v': valid_bit(1); break;
       case 'r': real_bit(1); break; 
       default: fprintf(stderr,"Warning: Unknown character in TTE flags of snapshot %s\n",flg);
     }
   }
     
   adapt();
 }
}
/*}}}*/
void SS_Tte::dump(FILE *fp)/*{{{*/
{
 char m[7];

 m[0] = is_real() ? 'r' : (is_virt() ? 'v' : '-');
 m[1] = p() ? 'p' : '-';
 m[2] = x() ? 'x' : '-';
 m[3] = w() ? 'w' : '-';
 m[4] = e() ? 'e' : '-';
 m[5] = nfo() ? 'f' : '-';
 m[6] = 0;

 if (is_real())
   fprintf(fp,"[%04x] %s %016llx(%016llx) %016llx %016llx ----\n",index,m,virt_page,tag(),virt_mask,phys_page);
 else 
   fprintf(fp,"[%04x] %s %016llx(%016llx) %016llx %016llx %04x\n",index,m,virt_page,tag(),virt_mask,phys_page,context());
}
/*}}}*/