OpenCores
URL https://opencores.org/ocsvn/s80186/s80186/trunk

Subversion Repositories s80186

[/] [s80186/] [trunk/] [sim/] [cppmodel/] [instructions/] [call.cpp] - Blame information for rev 2

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 2 jamieiles
// Copyright Jamie Iles, 2017
2
//
3
// This file is part of s80x86.
4
//
5
// s80x86 is free software: you can redistribute it and/or modify
6
// it under the terms of the GNU General Public License as published by
7
// the Free Software Foundation, either version 3 of the License, or
8
// (at your option) any later version.
9
//
10
// s80x86 is distributed in the hope that it will be useful,
11
// but WITHOUT ANY WARRANTY; without even the implied warranty of
12
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
// GNU General Public License for more details.
14
//
15
// You should have received a copy of the GNU General Public License
16
// along with s80x86.  If not, see <http://www.gnu.org/licenses/>.
17
 
18
void EmulatorPimpl::calle8()
19
{
20
    auto displacement = fetch_16bit();
21
 
22
    push_word(registers->get(IP) + instr_length);
23
 
24
    registers->set(IP, registers->get(IP) + instr_length + displacement);
25
    jump_taken = true;
26
}
27
 
28
void EmulatorPimpl::callff_intra()
29
{
30
    auto displacement = read_data<uint16_t>();
31
 
32
    push_word(registers->get(IP) + instr_length);
33
 
34
    registers->set(IP, displacement);
35
    jump_taken = true;
36
}
37
 
38
void EmulatorPimpl::callff_inter()
39
{
40
    if (modrm_decoder->rm_type() == OP_REG)
41
        return;
42
 
43
    push_word(registers->get(CS));
44
    push_word(registers->get(IP) + instr_length);
45
 
46
    auto cs_ip = read_data<uint32_t>();
47
 
48
    registers->set(IP, cs_ip & 0xffff);
49
    registers->set(CS, (cs_ip >> 16) & 0xffff);
50
    jump_taken = true;
51
}
52
 
53
void EmulatorPimpl::call9a()
54
{
55
    auto new_ip = fetch_16bit();
56
    auto new_cs = fetch_16bit();
57
 
58
    push_word(registers->get(CS));
59
    push_word(registers->get(IP) + instr_length);
60
 
61
    registers->set(CS, new_cs);
62
    registers->set(IP, new_ip);
63
    jump_taken = true;
64
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.