//----------------------------------
//MemoryManager.java  
//
//Auther:Hu Dong 
//-----------------------------------
import javax.swing.*;
import java.awt.*;
import java.awt.event.*;
import javax.swing.event.*;
import javax.swing.border.*;

//main函數所在類

public class  MemoryManager
{
	public static void main(String[] args)
	{
		MemoryManagerFrame MMF=new MemoryManagerFrame();
		MMF.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
		MMF.setVisible(true);
	}
} 
//窗體
class MemoryManagerFrame extends JFrame
{
	public MemoryManagerFrame()
	{
		setTitle("RamManager");
		setSize(DEFAULT_WIDTH,DEFAULT_HEIGHT);
		//add MMP to frame
		
		MemoryManagerPane MMP=new MemoryManagerPane();
		add(MMP);	
	}
	
	public static final int DEFAULT_WIDTH=600;
	public static final int DEFAULT_HEIGHT=580;
}
//面板
class MemoryManagerPane extends JPanel 
{
	public MemoryManagerPane()
	{
		
		JPanel p1=new JPanel();
		JPanel p2=new JPanel();
		p1.setLayout(new GridBagLayout());
		p2.setLayout(new BorderLayout());
		//border
		Border etched=BorderFactory.createEtchedBorder();
		Border title1=BorderFactory.createTitledBorder(etched,"操作");
		Border title2=BorderFactory.createTitledBorder(etched,"狀態");
		p1.setBorder(title1);
		p2.setBorder(title2);
		//
		s[0][0]=0;s[0][1]=0;s[0][2]=512;s[0][3]=1;//1表示該內存可用
		//
		final JTable table=new JTable(s,colmenu);
		JScrollPane t = new JScrollPane(table);

		//Button Action one 
		btn1.addActionListener(
			new ActionListener()
			{
				public void actionPerformed(ActionEvent e)
				{
					int i=0;
										
					if(tf1.getText().equals(""))  //判斷用戶是否輸入數據
					{
						int confirm=JOptionPane.showConfirmDialog(null,"輸入有誤！","錯誤信息",
 	  															 JOptionPane.OK_CANCEL_OPTION,
 	  														      JOptionPane.WARNING_MESSAGE);
    					if(confirm==JOptionPane.CANCEL_OPTION)
    						System.exit(0);	
					}
					int r=Integer.parseInt(tf1.getText().trim());
					
					for(i=0;i<30;i++) //i指示table中的最后一行
					{
						if(s[i][3]==1) break;
					}
					if(r<=s[i][2]) //內存足夠時進行分配
					{
						s[i+1][0]=s[i][0]+1;
						s[i+1][1]=s[i][1]+r;
						s[i+1][2]=s[i][2]-r;
						s[i+1][3]=1;
						s[i][2]=r;
						s[i][3]=0;
					}
					else   //內存不足，報錯
					{	
 	  					int confirm=JOptionPane.showConfirmDialog(null,"內存不夠！","錯誤信息",
 	  															 JOptionPane.OK_CANCEL_OPTION,
 	  														      JOptionPane.WARNING_MESSAGE);
    					if(confirm==JOptionPane.CANCEL_OPTION)
    						System.exit(0);	
    				}
					table.updateUI();	
				}
			}
			);

		//Buton Action two
		btn2.addActionListener(     
			new ActionListener()
			{
				public void actionPerformed(ActionEvent e)
				{
					int i=0;
					
					if(tf2.getText().equals(""))  //判斷用戶是否輸入數據
					{
						int confirm=JOptionPane.showConfirmDialog(null,"輸入有誤！","錯誤信息",
 	  															 JOptionPane.OK_CANCEL_OPTION,
 	  														      JOptionPane.WARNING_MESSAGE);
    					if(confirm==JOptionPane.CANCEL_OPTION)
    						System.exit(0);	
					}
					int id=Integer.parseInt(tf2.getText());
					
					for(i=0;i<30;i++)//i指示table中的最后一行
					{
						if(s[i][3]==1) break;
					}
					if(i==0)  //沒有內存分配
					{	
 	  					int confirm=JOptionPane.showConfirmDialog(null,"該內存沒有分配！","錯誤信息",
 	  															 JOptionPane.OK_CANCEL_OPTION,
 	  														      JOptionPane.WARNING_MESSAGE);
    					if(confirm==JOptionPane.CANCEL_OPTION)
    						System.exit(0);	
    				}
    				else
    				{ 
						if(id==0) //當釋放第一塊內存區域時
						{
							if(i==1)  //當只有第一塊內存分配時
							{
								s[0][0]=0;s[0][1]=0;s[0][2]=512;s[0][3]=1;
								//置i行屬性值為null
								s[i][0]=null;s[i][1]=null;s[i][2]=null;s[i][3]=null;		
							}
							else
							{
						
								int sum=0;//計算s[][2]
								
								s[0][3]=s[1][3];
								for(int j=1;j<(i-1);j++)
								{
									sum+=s[j][2];
									s[j][1]=sum;
									s[j][2]=s[j+1][2];
								}
								s[i-1][1]=sum+s[i-1][2];
								s[i-1][2]=512-s[i-1][1];
								s[i-1][3]=1;
								
								s[i][0]=null;s[i][1]=null;s[i][2]=null;s[i][3]=null;		
							}
						}
						else if(id<i)  //當釋放中間內存區域時
						{
							for(int j=id;j<i;j++)
							{
								if(j==(i-1)) //當j到達i的下一行時，需要單獨考慮
								{
									s[j][2]=512-s[j][1]; 
									s[j][3]=1;
								}
								else
								{
									s[j][2]=s[j+1][2];
									s[j+1][1]=s[j][1]+s[j][2];
								}
							}
							s[i][0]=null;s[i][1]=null;s[i][2]=null;s[i][3]=null;
						}
						else 
						{	
	 	  					int confirm=JOptionPane.showConfirmDialog(null,"該內存未分配！","錯誤信息",
	 	  															 JOptionPane.OK_CANCEL_OPTION,
	 	  														      JOptionPane.WARNING_MESSAGE);
	    					if(confirm==JOptionPane.CANCEL_OPTION)
	    						System.exit(0);	
	    				}
	    			}
					table.updateUI();	
				}
			}
			);		
		//add components into panel1
		p1.add(a1, new GBC(0,0));
		p1.add(a2,new GBC(0,1));
		p1.add(tf1, new GBC(1,0));
		p1.add(tf2, new GBC(1,1));
		p1.add(a3, new GBC(2,0));
		p1.add(btn1, new GBC(3,0));
		p1.add(btn2, new GBC(3,1));
		//add components into panel2
		p2.add(t, BorderLayout.CENTER); 
		//JFrame中添加兩個Panel
		add(p1);
		add(p2);	
	}
	
	private JLabel a1=new JLabel("要申請的內存大小");
	private JLabel a2=new JLabel("要結束的內存ID");
	private JLabel a3=new JLabel("MBytes 0~512");
	
	private JTextField tf1=new JTextField(10);
	private JTextField tf2=new JTextField(10);
	
	private JButton btn1=new JButton("分配");
	private JButton btn2=new JButton("釋放");
	
	private Integer[][] s=new Integer[30][4];
	
	private String[] colmenu={"ID","起始地址","塊大小","塊狀態"};
		
}