/**
 * File: edit_distance.cpp
 * Created Time: 2023-07-13
 * Author: krahets (krahets@163.com)
 */

#include "../utils/common.hpp"

/* Edit distance: brute-force search */
int editDistanceDFS(string s, string t, int i, int j) {
    // If both prefixes s[0:i] and t[0:j] are empty, return 0
    if (i == 0 && j == 0)
        return 0;
    // If the prefix s[0:i] is empty, return j, the length of t[0:j]
    if (i == 0)
        return j;
    // If the prefix t[0:j] is empty, return i, the length of s[0:i]
    if (j == 0)
        return i;
    // If the two characters are equal, skip both of them
    if (s[i - 1] == t[j - 1])
        return editDistanceDFS(s, t, i - 1, j - 1);
    // Minimum edits = the minimum among the insertion, deletion, and replacement subproblems + 1
    int insert = editDistanceDFS(s, t, i, j - 1);
    int del = editDistanceDFS(s, t, i - 1, j);
    int replace = editDistanceDFS(s, t, i - 1, j - 1);
    // Return the minimum number of edits
    return min(min(insert, del), replace) + 1;
}

/* Edit distance: memoized search */
int editDistanceDFSMem(string s, string t, vector<vector<int>> &mem, int i, int j) {
    // If both prefixes s[0:i] and t[0:j] are empty, return 0
    if (i == 0 && j == 0)
        return 0;
    // If the prefix s[0:i] is empty, return j, the length of t[0:j]
    if (i == 0)
        return j;
    // If the prefix t[0:j] is empty, return i, the length of s[0:i]
    if (j == 0)
        return i;
    // If a result has already been recorded, return it directly
    if (mem[i][j] != -1)
        return mem[i][j];
    // If the two characters are equal, skip both of them
    if (s[i - 1] == t[j - 1])
        return editDistanceDFSMem(s, t, mem, i - 1, j - 1);
    // Minimum edits = the minimum among the insertion, deletion, and replacement subproblems + 1
    int insert = editDistanceDFSMem(s, t, mem, i, j - 1);
    int del = editDistanceDFSMem(s, t, mem, i - 1, j);
    int replace = editDistanceDFSMem(s, t, mem, i - 1, j - 1);
    // Record and return the minimum number of edits
    mem[i][j] = min(min(insert, del), replace) + 1;
    return mem[i][j];
}

/* Edit distance: dynamic programming */
int editDistanceDP(string s, string t) {
    int n = s.length(), m = t.length();
    vector<vector<int>> dp(n + 1, vector<int>(m + 1, 0));
    // State transitions: first row and first column
    for (int i = 1; i <= n; i++) {
        dp[i][0] = i;
    }
    for (int j = 1; j <= m; j++) {
        dp[0][j] = j;
    }
    // State transitions: remaining rows and columns
    for (int i = 1; i <= n; i++) {
        for (int j = 1; j <= m; j++) {
            if (s[i - 1] == t[j - 1]) {
                // If the two characters are equal, skip both of them
                dp[i][j] = dp[i - 1][j - 1];
            } else {
                // Minimum edits = the minimum among the insertion, deletion, and replacement subproblems + 1
                dp[i][j] = min(min(dp[i][j - 1], dp[i - 1][j]), dp[i - 1][j - 1]) + 1;
            }
        }
    }
    return dp[n][m];
}

/* Edit distance: space-optimized dynamic programming */
int editDistanceDPComp(string s, string t) {
    int n = s.length(), m = t.length();
    vector<int> dp(m + 1, 0);
    // State transitions: first row
    for (int j = 1; j <= m; j++) {
        dp[j] = j;
    }
    // State transitions: remaining rows
    for (int i = 1; i <= n; i++) {
        // State transitions: first column
        int leftup = dp[0]; // Temporarily store dp[i-1, j-1]
        dp[0] = i;
        // State transitions: remaining columns
        for (int j = 1; j <= m; j++) {
            int temp = dp[j];
            if (s[i - 1] == t[j - 1]) {
                // If the two characters are equal, skip both of them
                dp[j] = leftup;
            } else {
                // Minimum edits = the minimum among the insertion, deletion, and replacement subproblems + 1
                dp[j] = min(min(dp[j - 1], dp[j]), leftup) + 1;
            }
            leftup = temp; // Update to dp[i-1, j-1] for the next iteration
        }
    }
    return dp[m];
}

/* Driver code */
int main() {
    string s = "bag";
    string t = "pack";
    int n = s.length(), m = t.length();

    // Brute-force search
    int res = editDistanceDFS(s, t, n, m);
    cout << "Changing " << s << " to " << t << " requires at least " << res << " edits\n";

    // Memoized search
    vector<vector<int>> mem(n + 1, vector<int>(m + 1, -1));
    res = editDistanceDFSMem(s, t, mem, n, m);
    cout << "Changing " << s << " to " << t << " requires at least " << res << " edits\n";

    // Dynamic programming
    res = editDistanceDP(s, t);
    cout << "Changing " << s << " to " << t << " requires at least " << res << " edits\n";

    // Space-optimized dynamic programming
    res = editDistanceDPComp(s, t);
    cout << "Changing " << s << " to " << t << " requires at least " << res << " edits\n";

    return 0;
}