117. 填充每个节点的下一个右侧节点指针 II（递归）

/**
 * 117. 填充每个节点的下一个右侧节点指针 II
 * @author wsq
 * @date 2020/09/29
	给定一个二叉树
	struct Node {
	  int val;
	  Node *left;
	  Node *right;
	  Node *next;
	}

	填充它的每个 next 指针，让这个指针指向其下一个右侧节点。如果找不到下一个右侧节点，则将 next 指针设置为 NULL。
	初始状态下，所有 next 指针都被设置为 NULL。

	进阶：
	你只能使用常量级额外空间。
	使用递归解题也符合要求，本题中递归程序占用的栈空间不算做额外的空间复杂度。
	
	示例：
	输入：root = [1,2,3,4,5,null,7]
	输出：[1,#,2,3,#,4,5,7,#]
	解释：给定二叉树如图 A 所示，你的函数应该填充它的每个 next 指针，以指向其下一个右侧节点，如图 B 所示。
	
	链接：https://leetcode-cn.com/problems/populating-next-right-pointers-in-each-node-ii
 */
package com.wsq.leetcode;



class Node {
    public int val;
    public Node left;
    public Node right;
    public Node next;

    public Node() {}
    
    public Node(int _val) {
        val = _val;
    }

    public Node(int _val, Node _left, Node _right, Node _next) {
        val = _val;
        left = _left;
        right = _right;
        next = _next;
    }
}

public class ConnectNextNode {
	/**
	 * 	采用递归的方式实现
	 *	1. 由于左边树节点建立next指针需要依赖右边树节点的next节点的建立
	 *	2. 因此，从树的最右边开始建立连接，
	 * @param root
	 * @return
	 */
    public Node connect(Node root) {
    	dfs(root);
    	return root;
    }
    
    public void dfs(Node currNode) {
    	if(currNode == null) {
    		return;
    	}
    	if(currNode.right != null) {
    		if (currNode.next != null) {
    			Node tmpNode = currNode.next;
    			while(tmpNode != null) {
    				if(tmpNode.left != null || tmpNode.right != null) {
    					break;
    				}
    				tmpNode = tmpNode.next;
    			}
    			if(tmpNode != null) {
    				if(tmpNode.left != null) {
        				currNode.right.next = tmpNode.left;
        			}else {
        				currNode.right.next = tmpNode.right;
        			}
    			}
			}
    	}
    	
    	if(currNode.left != null) {
    		if(currNode.right != null) {
    			currNode.left.next = currNode.right;
    		}else if(currNode.next != null){
    			Node tmpNode = currNode.next;
    			while(tmpNode != null) {
    				if(tmpNode.left != null || tmpNode.right != null) {
    					break;
    				}
    				tmpNode = tmpNode.next;
    			}
    			if(tmpNode != null) {
    				if(tmpNode.left != null) {
        				currNode.left.next = tmpNode.left;
        			}else {
        				currNode.left.next = tmpNode.right;
        			}
    			}
    		}
    	}
    	dfs(currNode.right);
    	dfs(currNode.left);
    }
    
    public static void main(String[] args) {
		Integer[] arr = {1,2,3,4,5,null,7};
		Node head = buildTree(arr, 0);
		ConnectNextNode cn = new ConnectNextNode();
		cn.connect(head);
		System.out.println(head.val);
	}
    
    public static Node buildTree(Integer[] a, int pos) {
    	if(pos >= a.length || a[pos] == null) {
    		return null;
    	}
    	Node root = new Node(a[pos]);
    	root.left = buildTree(a, 2 * pos + 1);
    	root.right = buildTree(a, 2 * pos + 2);
    	return root;
    }
}