[BACK]Return to segments.c CVS log [TXT] [DIR] Up to [RetroPC.NET] / np2 / i386c / ia32

Diff for /np2/i386c/ia32/segments.c between versions 1.7 and 1.10

version 1.7, 2004/01/23 14:33:26 version 1.10, 2004/02/04 13:24:35
Line 70  load_segreg(int idx, WORD selector, int  Line 70  load_segreg(int idx, WORD selector, int 
                 ia32_panic("load_segreg: CS");                  ia32_panic("load_segreg: CS");
         }          }
   
         rv = parse_selector(&sel, selector);          rv = parse_selector_user(&sel, selector);
         if (rv < 0) {          if (rv < 0) {
                 if ((rv != -2) || (idx == CPU_SS_INDEX)) {                  if ((rv != -2) || (idx == CPU_SS_INDEX)) {
                         EXCEPTION(exc, sel.idx);                          EXCEPTION(exc, sel.idx);
Line 134  load_segreg(int idx, WORD selector, int  Line 134  load_segreg(int idx, WORD selector, int 
  * load SS register   * load SS register
  */   */
 void  void
 load_ss(WORD selector, descriptor_t* sdp, BYTE cpl)  load_ss(WORD selector, descriptor_t* sdp, DWORD cpl)
 {  {
   
         CPU_STAT_SS32 = sdp->d;          CPU_STAT_SS32 = sdp->d;
Line 146  load_ss(WORD selector, descriptor_t* sdp Line 146  load_ss(WORD selector, descriptor_t* sdp
  * load CS register   * load CS register
  */   */
 void  void
 load_cs(WORD selector, descriptor_t* sdp, BYTE cpl)  load_cs(WORD selector, descriptor_t* sdp, DWORD cpl)
 {  {
   
         CPU_INST_OP32 = CPU_INST_AS32 =          CPU_INST_OP32 = CPU_INST_AS32 =
Line 166  load_ldtr(WORD selector, int exc) Line 166  load_ldtr(WORD selector, int exc)
         selector_t sel;          selector_t sel;
         int rv;          int rv;
   
         rv = parse_selector(&sel, selector);          rv = parse_selector_user(&sel, selector);
         if (rv < 0 || sel.ldt) {          if (rv < 0 || sel.ldt) {
                 if (rv == -2) {                  if (rv == -2) {
                         /* null segment */                          /* null segment */
Line 193  load_ldtr(WORD selector, int exc) Line 193  load_ldtr(WORD selector, int exc)
                 EXCEPTION((exc == TS_EXCEPTION) ? TS_EXCEPTION : NP_EXCEPTION, sel.selector);                  EXCEPTION((exc == TS_EXCEPTION) ? TS_EXCEPTION : NP_EXCEPTION, sel.selector);
         }          }
   
 #if defined(DEBUG)  #if defined(MORE_DEBUG)
         ldtr_dump(sel.desc.u.seg.segbase, sel.desc.u.seg.limit);          ldtr_dump(sel.desc.u.seg.segbase, sel.desc.u.seg.limit);
 #endif  #endif
   
Line 202  load_ldtr(WORD selector, int exc) Line 202  load_ldtr(WORD selector, int exc)
 }  }
   
 void  void
 load_descriptor(descriptor_t *descp, DWORD addr)  load_descriptor(descriptor_t *descp, DWORD addr, int user_mode)
 {  {
           DWORD l, h;
   
         memset(descp, 0, sizeof(*descp));          memset(descp, 0, sizeof(*descp));
   
         descp->addr = addr;          l = cpu_lmemoryread_d(addr, user_mode);
         descp->l = cpu_lmemoryread_d(descp->addr);          h = cpu_lmemoryread_d(addr + 4, user_mode);
         descp->h = cpu_lmemoryread_d(descp->addr + 4);          VERBOSE(("load_descriptor: descriptor address = 0x%08x, h = 0x%08x, l = %08x", addr, h, l));
         VERBOSE(("load_descriptor: descriptor address = 0x%08x, h = 0x%08x, l = %08x", descp->addr, descp->h, descp->l));  
   
         descp->flag = 0;          descp->flag = 0;
   
         descp->p = (descp->h & CPU_DESC_H_P) == CPU_DESC_H_P;          descp->p = (h & CPU_DESC_H_P) == CPU_DESC_H_P;
         descp->type = (descp->h & CPU_DESC_H_TYPE) >> 8;          descp->type = (h & CPU_DESC_H_TYPE) >> 8;
         descp->dpl = (descp->h & CPU_DESC_H_DPL) >> 13;          descp->dpl = (h & CPU_DESC_H_DPL) >> 13;
         descp->s = (descp->h & CPU_DESC_H_S) == CPU_DESC_H_S;          descp->s = (h & CPU_DESC_H_S) == CPU_DESC_H_S;
   
         VERBOSE(("load_descriptor: present = %s, type = %d, DPL = %d", descp->p ? "true" : "false", descp->type, descp->dpl));          VERBOSE(("load_descriptor: present = %s, type = %d, DPL = %d", descp->p ? "true" : "false", descp->type, descp->dpl));
   
         if (descp->s) {          if (descp->s) {
                 /* code/data */                  /* code/data */
                 descp->valid = 1;                  descp->valid = 1;
                 descp->d = (descp->h & CPU_SEGDESC_H_D) ? 1 : 0;                  descp->d = (h & CPU_SEGDESC_H_D) ? 1 : 0;
   
                 descp->u.seg.c = (descp->h & CPU_SEGDESC_H_D_C) ? 1 : 0;                  descp->u.seg.c = (h & CPU_SEGDESC_H_D_C) ? 1 : 0;
                 descp->u.seg.g = (descp->h & CPU_SEGDESC_H_G) ? 1 : 0;                  descp->u.seg.g = (h & CPU_SEGDESC_H_G) ? 1 : 0;
                 descp->u.seg.wr = (descp->type & CPU_SEGDESC_TYPE_WR) ? 1 : 0;                  descp->u.seg.wr = (descp->type & CPU_SEGDESC_TYPE_WR) ? 1 : 0;
                 descp->u.seg.ec = (descp->type & CPU_SEGDESC_TYPE_EC) ? 1 : 0;                  descp->u.seg.ec = (descp->type & CPU_SEGDESC_TYPE_EC) ? 1 : 0;
   
                 descp->u.seg.segbase  = (descp->l >> 16) & 0xffff;                  descp->u.seg.segbase  = (l >> 16) & 0xffff;
                 descp->u.seg.segbase |= (descp->h & 0xff) << 16;                  descp->u.seg.segbase |= (h & 0xff) << 16;
                 descp->u.seg.segbase |= descp->h & 0xff000000;                  descp->u.seg.segbase |= h & 0xff000000;
                 descp->u.seg.limit = (descp->h & 0xf0000) | (descp->l & 0xffff);                  descp->u.seg.limit = (h & 0xf0000) | (l & 0xffff);
                 if (descp->u.seg.g) {                  if (descp->u.seg.g) {
                         descp->u.seg.limit <<= 12;                          descp->u.seg.limit <<= 12;
                         descp->u.seg.limit |= 0xfff;                          descp->u.seg.limit |= 0xfff;
Line 250  load_descriptor(descriptor_t *descp, DWO Line 250  load_descriptor(descriptor_t *descp, DWO
                 switch (descp->type) {                  switch (descp->type) {
                 case CPU_SYSDESC_TYPE_LDT:              /* LDT */                  case CPU_SYSDESC_TYPE_LDT:              /* LDT */
                         descp->valid = 1;                          descp->valid = 1;
                         descp->u.seg.g = (descp->h & CPU_SEGDESC_H_G) ? 1 : 0;                          descp->u.seg.g = (h & CPU_SEGDESC_H_G) ? 1 : 0;
   
                         descp->u.seg.segbase  = descp->h & 0xff000000;                          descp->u.seg.segbase  = h & 0xff000000;
                         descp->u.seg.segbase |= (descp->h & 0xff) << 16;                          descp->u.seg.segbase |= (h & 0xff) << 16;
                         descp->u.seg.segbase |= descp->l >> 16;                          descp->u.seg.segbase |= l >> 16;
                         descp->u.seg.limit  = descp->h & 0xf0000;                          descp->u.seg.limit  = h & 0xf0000;
                         descp->u.seg.limit |= descp->l & 0xffff;                          descp->u.seg.limit |= l & 0xffff;
                         if (descp->u.seg.g) {                          if (descp->u.seg.g) {
                                 descp->u.seg.limit <<= 12;                                  descp->u.seg.limit <<= 12;
                                 descp->u.seg.limit |= 0xfff;                                  descp->u.seg.limit |= 0xfff;
Line 269  load_descriptor(descriptor_t *descp, DWO Line 269  load_descriptor(descriptor_t *descp, DWO
   
                 case CPU_SYSDESC_TYPE_TASK:             /* task gate */                  case CPU_SYSDESC_TYPE_TASK:             /* task gate */
                         descp->valid = 1;                          descp->valid = 1;
                         descp->u.gate.selector = descp->l >> 16;                          descp->u.gate.selector = l >> 16;
   
                         VERBOSE(("load_descriptor: task descriptor: selector = 0x%04x", descp->u.gate.selector));                          VERBOSE(("load_descriptor: task descriptor: selector = 0x%04x", descp->u.gate.selector));
                         break;                          break;
Line 279  load_descriptor(descriptor_t *descp, DWO Line 279  load_descriptor(descriptor_t *descp, DWO
                 case CPU_SYSDESC_TYPE_TSS_32:           /* 386 TSS */                  case CPU_SYSDESC_TYPE_TSS_32:           /* 386 TSS */
                 case CPU_SYSDESC_TYPE_TSS_BUSY_32:      /* 386 TSS Busy */                  case CPU_SYSDESC_TYPE_TSS_BUSY_32:      /* 386 TSS Busy */
                         descp->valid = 1;                          descp->valid = 1;
                         descp->d = (descp->h & CPU_GATEDESC_H_D) ? 1 : 0;                          descp->d = (h & CPU_GATEDESC_H_D) ? 1 : 0;
                         descp->u.seg.g = (descp->h & CPU_SEGDESC_H_G) ? 1 : 0;                          descp->u.seg.g = (h & CPU_SEGDESC_H_G) ? 1 : 0;
   
                         descp->u.seg.segbase  = descp->h & 0xff000000;                          descp->u.seg.segbase  = h & 0xff000000;
                         descp->u.seg.segbase |= (descp->h & 0xff) << 16;                          descp->u.seg.segbase |= (h & 0xff) << 16;
                         descp->u.seg.segbase |= descp->l >> 16;                          descp->u.seg.segbase |= l >> 16;
                         descp->u.seg.limit  = descp->h & 0xf0000;                          descp->u.seg.limit  = h & 0xf0000;
                         descp->u.seg.limit |= descp->l & 0xffff;                          descp->u.seg.limit |= l & 0xffff;
                         if (descp->u.seg.g) {                          if (descp->u.seg.g) {
                                 descp->u.seg.limit <<= 12;                                  descp->u.seg.limit <<= 12;
                                 descp->u.seg.limit |= 0xfff;                                  descp->u.seg.limit |= 0xfff;
Line 304  load_descriptor(descriptor_t *descp, DWO Line 304  load_descriptor(descriptor_t *descp, DWO
                 case CPU_SYSDESC_TYPE_CALL_32:          /* 386 call gate */                  case CPU_SYSDESC_TYPE_CALL_32:          /* 386 call gate */
                 case CPU_SYSDESC_TYPE_INTR_32:          /* 386 interrupt gate */                  case CPU_SYSDESC_TYPE_INTR_32:          /* 386 interrupt gate */
                 case CPU_SYSDESC_TYPE_TRAP_32:          /* 386 trap gate */                  case CPU_SYSDESC_TYPE_TRAP_32:          /* 386 trap gate */
                         if ((descp->h & 0x0000000e0) == 0) {                          if ((h & 0x0000000e0) == 0) {
                                 descp->valid = 1;                                  descp->valid = 1;
                                 descp->d = (descp->h & CPU_GATEDESC_H_D) ? 1:0;                                  descp->d = (h & CPU_GATEDESC_H_D) ? 1:0;
                                 descp->u.gate.selector = descp->l >> 16;                                  descp->u.gate.selector = l >> 16;
                                 descp->u.gate.offset  = descp->h & 0xffff0000;                                  descp->u.gate.offset  = h & 0xffff0000;
                                 descp->u.gate.offset |= descp->l & 0xffff;                                  descp->u.gate.offset |= l & 0xffff;
                                 descp->u.gate.count = descp->h & 0x1f;                                  descp->u.gate.count = h & 0x1f;
   
                                 VERBOSE(("load_descriptor: %dbit %s gate descriptor", descp->d ? 32 : 16, ((descp->type & CPU_SYSDESC_TYPE_MASKBIT) == CPU_SYSDESC_TYPE_CALL) ? "call" : (((descp->type & CPU_SYSDESC_TYPE_MASKBIT) == CPU_SYSDESC_TYPE_INTR) ? "interrupt" : "trap")));                                  VERBOSE(("load_descriptor: %dbit %s gate descriptor", descp->d ? 32 : 16, ((descp->type & CPU_SYSDESC_TYPE_MASKBIT) == CPU_SYSDESC_TYPE_CALL) ? "call" : (((descp->type & CPU_SYSDESC_TYPE_MASKBIT) == CPU_SYSDESC_TYPE_INTR) ? "interrupt" : "trap")));
                                 VERBOSE(("load_descriptor: selector = 0x%04x, offset = 0x%08x, count = %d, d = %s", descp->u.gate.selector, descp->u.gate.offset, descp->u.gate.count, descp->d ? "on" : "off"));                                  VERBOSE(("load_descriptor: selector = 0x%04x, offset = 0x%08x, count = %d, d = %s", descp->u.gate.selector, descp->u.gate.offset, descp->u.gate.count, descp->d ? "on" : "off"));
Line 329  load_descriptor(descriptor_t *descp, DWO Line 329  load_descriptor(descriptor_t *descp, DWO
 }  }
   
 int  int
 parse_selector(selector_t* ssp, WORD selector)  parse_selector(selector_t* ssp, WORD selector, int user_mode)
 {  {
         DWORD base;          DWORD base;
         WORD limit;          WORD limit;
Line 339  parse_selector(selector_t* ssp, WORD sel Line 339  parse_selector(selector_t* ssp, WORD sel
         ssp->idx = selector & ~3;          ssp->idx = selector & ~3;
         ssp->rpl = selector & 3;          ssp->rpl = selector & 3;
         ssp->ldt = selector & CPU_SEGMENT_TABLE_IND;          ssp->ldt = selector & CPU_SEGMENT_TABLE_IND;
           ssp->user_mode = user_mode;
   
         VERBOSE(("parse_selector: selector = %04x, index = %d, RPL = %d, %cDT", ssp->selector, ssp->idx >> 3, ssp->rpl, ssp->ldt ? 'L' : 'G'));          VERBOSE(("parse_selector: selector = %04x, index = %d, RPL = %d, %cDT %c", ssp->selector, ssp->idx >> 3, ssp->rpl, ssp->ldt ? 'L' : 'G', user_mode ? 'u' : 's'));
   
         /* descriptor table */          /* descriptor table */
         idx = selector & ~7;          idx = selector & ~7;
Line 365  parse_selector(selector_t* ssp, WORD sel Line 366  parse_selector(selector_t* ssp, WORD sel
                 VERBOSE(("parse_selector: segment limit check failed"));                  VERBOSE(("parse_selector: segment limit check failed"));
                 return -3;                  return -3;
         }          }
   
         /* load descriptor */          /* load descriptor */
         CPU_SET_SEGDESC(&ssp->desc, base + idx);          ssp->addr = base + idx;
           CPU_SET_SEGDESC(&ssp->desc, ssp->addr, ssp->user_mode);
         if (!ssp->desc.valid) {          if (!ssp->desc.valid) {
                 VERBOSE(("parse_selector: segment descriptor is invalid"));                  VERBOSE(("parse_selector: segment descriptor is invalid"));
                 return -4;                  return -4;
         }          }
   
         return 0;          return 0;
 }  }
   
 int  int
 selector_is_not_present(selector_t* ssp)  selector_is_not_present(selector_t *ssp)
 {  {
           DWORD h;
   
         /* not present */          /* not present */
         if (!ssp->desc.p) {          if (!ssp->desc.p) {
                 VERBOSE(("selector_is_not_present: not present"));                  VERBOSE(("selector_is_not_present: not present"));
                 return -1;                  return -1;
         }          }
         CPU_SET_SEGDESC_POSTPART(&ssp->desc);  
           /* set access bit if code/data segment descriptor */
           if (ssp->desc.s) {
                   h = cpu_lmemoryread_d(ssp->addr + 4, ssp->user_mode);
                   if (!(h & CPU_SEGDESC_H_A)) {
                           h |= CPU_SEGDESC_H_A;
                           cpu_lmemorywrite_d(ssp->addr + 4, h, ssp->user_mode);
                   }
           }
   
         return 0;          return 0;
 }  }
Removed from v.1.7  
changed lines
  Added in v.1.10

RetroPC.NET-CVS <cvs@retropc.net>