p3_ida_scripts/debug_set_ship_destination.idc at master · P3Modding/p3_ida_scripts · 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
#include <idc.idc>
#include "lib/lib.idc"

static handle_op_set_ship_destination() {
    auto ship_index = GetRegValue("eax");
    auto ship = get_ship_by_index(ship_index);
    auto op = OperationSetShipDestination(GetRegValue("edi")+0x04);
    Message(
        "\n\nShip 0x%x (0x%x, 0x%x) -> (0x%x, 0x%x)\n",
        ship_index,
        ship.get_x(),
        ship.get_y(),
        op.get_x(),
        op.get_y());
}

static handle_op_set_ship_destination_fix() {
    auto ship_index = GetRegValue("eax");
    auto ship = get_ship_by_index(ship_index);
    auto op = OperationSetShipDestination(GetRegValue("edi")+0x04);

    // Patch source
    patch_dbg_dword(ship.address + 0x1c, 0x6e97fff);
    patch_dbg_dword(ship.address + 0x20, 0x2567fff);

    // Patch destination
    patch_dbg_dword(op.address + 0x08, 0x70a);
    patch_dbg_dword(op.address + 0x0c, 0x1b1);

    handle_op_set_ship_destination();
}

static handle_calculate_ship_path() {
    Message("handle_calculate_ship_path found starting navpoint\n");
}

static handle_calculate_ship_path_find_matrix_path() {
    auto eax = GetRegValue("eax");
    auto ship_nav_path = ShipNavPath(eax);
    Message("matrix path: %s\n", ship_nav_path.to_string());
}

static handle_calculate_ship_path_first_point() {
    auto edx = GetRegValue("edx");
    auto x = Word(GetRegValue("eax") + 4 * edx);
    auto y = Word(GetRegValue("eax") + 4 * edx + 2);
    Message("enqueueing point %02d (0x%04x, 0x%04x) (calculate_ship_path)\n", edx, x, y);
}

static handle_ship_path_enqueue() {
    auto esp = GetRegValue("esp");
    auto a3 = ShortPoint(Dword(esp + 0x10));
    auto a2 = ShortPoint(Dword(esp + 0x0c));
    auto a1 = ShortPoint(Dword(esp + 0x08));
    Message(
        "handle_ship_path_enqueue(%s, %s, %s)\n",
        a1.to_string(),
        a2.to_string(),
        a3.to_string());
}

static handle_ship_path_enqueue_1() {
    auto path_ptr = Dword(GetRegValue("esi"));
    auto old_path_len = GetRegValue("ebx");
    Message(
        "enqueueing point %02d (0x%04x, 0x%04x) (path_enqueue_stuff loc1)\n",
        GetRegValue("ebx"),
        Word(path_ptr + old_path_len * 4),
        Word(path_ptr + old_path_len * 4 + 2));
}

static handle_ship_path_enqueue_2() {
    auto old_path_len = GetRegValue("eax");
    auto path_ptr = Dword(GetRegValue("esi"));
    Message(
        "enqueueing point %02d (0x%04x, 0x%04x) (path_enqueue_stuff loc2)\n",
        old_path_len,
        Word(path_ptr + old_path_len * 4),
        Word(path_ptr + old_path_len * 4 + 2));
}

static handle_ship_path_done() {
    auto path_ptr = Dword(GetRegValue("edi"));
    Message("Finished route 0x%x with %d nodes\n", path_ptr, Dword(path_ptr + 0x04));
}

static handle_calculate_ship_path_find_matrix_path_update_candidate() {
    auto esp = GetRegValue("esp");
    auto calculated_destination_index = GetRegValue("edx");
    auto calculated_source_index = GetRegValue("edi");
    auto distance_old = TO_LONG(Dword(esp + 0x38));
    auto distance_new = TO_LONG(GetRegValue("ecx"));
    auto path_distance_new = GetRegValue("eax");

    Message("%d -> %d (path_distance_new=%d, distance_new=%d)\n",
        calculated_source_index,
        calculated_destination_index,
        path_distance_new,
        distance_old,
        distance_new);
}

static main() {
    AddBpt(0x00537686);
    SetBptCnd(0x00537686, "handle_op_set_ship_destination_fix()");

    AddBpt(0x00445340);
    SetBptCnd(0x00445340, "handle_calculate_ship_path()");

    AddBpt(0x00445340);
    SetBptCnd(0x00445340, "handle_calculate_ship_path_find_matrix_path()");

    AddBpt(0x004453E0);
    SetBptCnd(0x004453E0, "handle_calculate_ship_path_first_point()");

    AddBpt(0x00446F21);
    SetBptCnd(0x00446F21, "handle_ship_path_enqueue()");

    AddBpt(0x00447454);
    SetBptCnd(0x00447454, "handle_ship_path_enqueue_1()");

    AddBpt(0x004474BB);
    SetBptCnd(0x004474BB, "handle_ship_path_enqueue_2()");

    AddBpt(0x0051738B);
    SetBptCnd(0x0051738B, "handle_ship_path_done()");

    AddBpt(0x00444B3B);
    SetBptCnd(0x00444B3B, "handle_calculate_ship_path_find_matrix_path_update_candidate()");
}