mn101/out.cpp at master · Andy51/mn101 · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
#include "mn101.hpp"

extern char deviceparams[];
extern char device[];

static void OutVarName(op_t &x)
{
    ea_t addr = x.addr;
    bool H = 0;
    // For branch ops x.value holds halfbyte address and x.addr holds byte address
    if (x.addr != x.value)
        H = x.value & 1;

    ea_t target = toEA(codeSeg(addr, x.n), addr);
    if (!out_name_expr(x, target, addr))
    {
        OutValue(x, OOF_ADDR | OOF_NUMBER | OOFS_NOSIGN | OOFW_32);
        QueueSet(Q_noName, cmd.ea);
    }
    if (H) out_symbol('_');
}

bool idaapi mn101_outop(op_t &x)
{
    switch (x.type)
    {
    case o_phrase:
    case o_displ:
        out_symbol('(');
        // Do not add imm-offset when its zero
        if (x.addr != 0)
        {
            OutValue(x, OOF_ADDR);
            out_symbol(',');
        }
        out_register(ph.regNames[x.reg]);
        out_symbol(')');
        break;

    case o_reg:
        out_register(ph.regNames[x.reg]);
        break;

    case o_bitpos:
    case o_imm:
        OutValue(x, OOF_SIGNED | OOFW_32);
        break;

    case o_far:
    case o_near:
        OutVarName(x);
        break;

    case o_mem:
        out_symbol('(');
        OutVarName(x);
        out_symbol(')');
        break;

    case o_void:
        return 0;

    default:
        warning("out: %a: bad optype %d", cmd.ea, x.type);
        break;
    }
    return 1;
}

void idaapi mn101_out(void)
{
    char buf[MAXSTR];
    init_output_buffer(buf, sizeof(buf)); // setup the output pointer

    OutMnem();

    //First operand
    if (cmd.Op1.type != o_void)
        out_one_operand(0);

    //Second operand
    if (cmd.Op2.type != o_void)
    {
        if (cmd.Op2.type != o_bitpos)
        {
            out_symbol(',');
            OutChar(' ');
        }
        out_one_operand(1);
    }

    // Third operand
    if (cmd.Op3.type != o_void)
    {
        if (cmd.Op3.type != o_bitpos)
        {
            out_symbol(',');
            OutChar(' ');
        }
        out_one_operand(2);
    }

    if (isVoid(cmd.ea, uFlag, 0)) OutImmChar(cmd.Op1);
    if (isVoid(cmd.ea, uFlag, 1)) OutImmChar(cmd.Op2);
    if (isVoid(cmd.ea, uFlag, 2)) OutImmChar(cmd.Op3);

    term_output_buffer();
    gl_comm = 1;
    MakeLine(buf);
}

//--------------------------------------------------------------------------
// Listing header
void idaapi mn101_header(void)
{
    gen_header(GH_PRINT_ALL_BUT_BYTESEX, device[0] ? device : NULL, deviceparams);
}

//--------------------------------------------------------------------------
// Segment start
void idaapi mn101_segstart(ea_t ea)
{
    segment_t *Sarea = getseg(ea);
    if (is_spec_segm(Sarea->type)) return;

    char sname[MAXNAMELEN];
    get_true_segm_name(Sarea, sname, sizeof(sname));

    gen_cmt_line("section %s", sname);
}


//--------------------------------------------------------------------------
// Listing footer
void idaapi mn101_footer(void)
{
    char buf[MAXSTR];
    char *const end = buf + sizeof(buf);
    if (ash.end != NULL)
    {
        MakeNull();
        char *ptr = tag_addstr(buf, end, COLOR_ASMDIR, ash.end);
        qstring name;
        if (get_colored_name(&name, inf.beginEA) > 0)
        {
            register size_t i = strlen(ash.end);
            do
                APPCHAR(ptr, end, ' ');
            while (++i < 8);
            APPEND(ptr, end, name.begin());
        }
        MakeLine(buf, inf.indent);
    }
    else
    {
        gen_cmt_line("end of file");
    }
}