import java.io.*;
import java.net.*;
import java.util.*;
import java.awt.*;
import java.awt.event.*;
import javax.swing.*;
import javax.swing.border.*;
import java.applet.*;

class JS implements ItemListener, ActionListener, Runnable{

	class Kasutajad{
		String kasutaja=new String();
		Socket yhendus=new Socket();
		boolean klient=false;
		boolean kirj=true;
		boolean lug=true;
	}

	class JutukaL6im extends Thread{
		Kasutajad k;
		public JutukaL6im(Kasutajad uus_k){
			k=uus_k;
			start();
		}

    private String LZ(int asi){
			String sasi=asi+"";
			if(asi<10){
				sasi="0"+asi;
			}
			return sasi;
    }

		/*aja näitamine*/
		private String ajam2rk(){
				Calendar aeg=Calendar.getInstance();
				return "["+LZ(aeg.get(Calendar.HOUR_OF_DAY))+":"+LZ(aeg.get(Calendar.MINUTE))+"] ";
		}

		public void run(){
			try{
				PrintWriter pw=new PrintWriter(k.yhendus.getOutputStream(),true);
				BufferedReader br=new BufferedReader(new InputStreamReader(k.yhendus.getInputStream()));
				pw.println("Kirjuta oma kasutajanimi siia: ");
				k.kasutaja=br.readLine();
				if(k.kasutaja.startsWith("#klient")){
					k.klient=true;
					k.kasutaja=br.readLine();
				}
				kas.add(k);
				KasList();//uuendatakse kasutajate nimekirja tekstialas

				boolean veel=true;

				/*suurem tekstiala*/
				JTabbedPane suva2=(JTabbedPane)content.getComponent(1);
				JScrollPane suva=(JScrollPane)suva2.getComponent(0);
				JViewport suva0=(JViewport)suva.getComponent(0);
				JTextArea suva1=(JTextArea)suva0.getComponent(0);

				//kõigile teatatakse et uus kasutaja sisenes
				suva1.append(ajam2rk()+" Sisenes kasutaja "+k.kasutaja+"\n");
				for(int i=0;i<kas.size();i++){
					Kasutajad temp=(Kasutajad)kas.elementAt(i);
					Socket temp0=(Socket)temp.yhendus;
					PrintWriter v2ljund=new PrintWriter(temp0.getOutputStream(),true);
					v2ljund.println(ajam2rk()+" Sisenes kasutaja "+k.kasutaja);
				}

				while(veel){
					String s6num=br.readLine();
					boolean n2ita=true;//käske ei kuvata

					if(((!k.klient) && (s6num.startsWith(".v2lju"))) || ((k.klient) && (s6num.equals("#v2lju")))){
						n2ita=false;
						veel=false;
						suva1.append(ajam2rk()+" Lahkus kasutaja "+k.kasutaja+"\n");

						for(int i=0;i<kas.size();i++){
							Kasutajad temp=(Kasutajad)kas.elementAt(i);
							Socket temp0=(Socket)temp.yhendus;
							PrintWriter v2ljund=new PrintWriter(temp0.getOutputStream(),true);
							v2ljund.println(ajam2rk()+" Lahkus kasutaja "+k.kasutaja);
						}
					}

					if(s6num.startsWith(".abi")){//abi näidatakse tekstifailist
						n2ita=false;
						boolean edu=true;
						String s=new String();
						try{
							BufferedReader br0=new BufferedReader(new FileReader("abi.txt"));
							StringBuffer sb=new StringBuffer();
							char[] buffer=new char[10];
							while(br0.ready()){
								int len=br0.read(buffer,0,10);
								if(len==-1)break;
								sb.append(buffer,0,len);
							}
							br0.close();
							s=sb.toString();
						}catch(Exception e){
							edu=false;
							pw.println("\nAnna andeks, aga abi ei ole võimalik hetkel näidata.");
						}
						pw.println(s);
						if(edu){
							suva1.append(ajam2rk()+" Kasutaja "+k.kasutaja+" küsis abi ja sai seda\n");
						}else{
							suva1.append(ajam2rk()+" Kasutaja "+k.kasutaja+" küsis abi kuid ei saanud seda\n");
						}
					}

					if(s6num.startsWith(".kes")){
						n2ita=false;
						String str;
						if(k.klient){
							str="#K";
							for(int i=0;i<kas.size();i++){
								Kasutajad temp=(Kasutajad)kas.elementAt(i);
								String temp0=(String)temp.kasutaja;
								str=str.concat(temp0+";");
							}
							pw.println(str);
						}else{
							pw.println("\nHetkel on sees järgmised tegelased: \n");
							for(int i=0;i<kas.size();i++){
								Kasutajad temp=(Kasutajad)kas.elementAt(i);
								String temp0=(String)temp.kasutaja;
								pw.println((i+1)+" "+temp0);
							}
							pw.println();
						}
						suva1.append(ajam2rk()+" Kasutaja "+k.kasutaja+" vaatab, kes sees on\n");
					}
					
					if((s6num.startsWith(".ytle")) && (k.kirj)){
						boolean leidub=false;
						n2ita=false;
						StringTokenizer st=new StringTokenizer(s6num);

						if(st.countTokens()>=3){
							String sihtmärk=new String();
							for(int i=0;i<2;i++){
								sihtmärk=st.nextToken();
							}
							for(int i=0;i<kas.size();i++){
								Kasutajad temp=(Kasutajad)kas.elementAt(i);
								String temp_kasutaja=(String)temp.kasutaja;
								Socket temp_yhendus=(Socket)temp.yhendus;
								if(temp_kasutaja.equals(sihtmärk)){
									leidub=true;
									String[] mass=s6num.split(" ");
									s6num="";
									for(int j=2;j<mass.length;j++){
										s6num=s6num+mass[j]+" ";
									}
									PrintWriter pw2=new PrintWriter(temp_yhendus.getOutputStream(),true);
									if(k.kasutaja.equals(sihtmärk)){
										pw2.println(ajam2rk()+" Sa ütled iseendale >> "+s6num);
										suva1.append(ajam2rk()+k.kasutaja+" ütleb iseendale >> "+s6num+"\n");
									}else{
										pw2.println(ajam2rk()+k.kasutaja+" ütleb sulle >> "+s6num);
										pw.println(ajam2rk()+" Sa ütled kasutajale "+sihtmärk+" >> "+s6num);
										suva1.append(ajam2rk()+k.kasutaja+" ütleb kasutajale "+sihtmärk+" >> "+s6num+"\n");
										if(heli && say_heli){
											say.play();
										}
									}
								}
							}
							if(!leidub){
								pw.println("Sellist kasutajat ei ole!");
								suva1.append(ajam2rk()+k.kasutaja+" üritab olematule kasutajale midagi öelda\n");
							}
						}else{
							pw.println("Kasutamine: .ytle <kasutaja> jutt");
							suva1.append(ajam2rk()+k.kasutaja+" eksib käsu .ytle kasutamisel\n");
						}
					}

					if(n2ita && k.kirj){//teksti näitamine

						suva1.append(ajam2rk()+k.kasutaja+">> "+s6num+"\n");
						if(heli && talk_heli){
							talk.play();
						}
						for(int i=0;i<kas.size();i++){
							Kasutajad temp=(Kasutajad)kas.elementAt(i);
							Socket temp0=(Socket)temp.yhendus;
							if(temp.lug){
								PrintWriter v2ljund=new PrintWriter(temp0.getOutputStream(),true);
								v2ljund.println(ajam2rk()+k.kasutaja+" >> "+s6num);
							}
						}
					}
				}
				k.yhendus.close();
			}catch(Exception e){System.out.println("Viga JutukaL6imes: "+e);}
			kas.remove(k);
			if(heli && logout_heli){
				logout.play();
			}
			KasList();//uuendatakse kasutajate nimekirja tekstialas
		}

	}

/*Globaalsed muutujad*/
	JPanel content=new JPanel(new BorderLayout());
	Vector kas=new Vector();
	AudioClip login;
	AudioClip logout;
	AudioClip talk;
	AudioClip say;
	String login_path="gong.au";
	String logout_path="snore.wav";
	String talk_path="ding.au";
	String say_path="piiks.wav";
	StringBuffer linnukesed=new StringBuffer("-------");//Peab olema globaalne

	JLabel L_login_heli=new JLabel(login_path);
	JLabel L_logout_heli=new JLabel(logout_path);
	JLabel L_talk_heli=new JLabel(talk_path);
	JLabel L_say_heli=new JLabel(say_path);
	JCheckBox CB_heli=new JCheckBox("Heli lubamine",false);
	JCheckBox CB_login=new JCheckBox("Sisselogimise heli",false);
	JCheckBox CB_logout=new JCheckBox("Väljalogimise heli", false);
	JCheckBox CB_talk=new JCheckBox("Avaliku jutu heli", false);
	JCheckBox CB_say=new JCheckBox("Privaatse jutu heli", false);
	boolean heli=false;
	boolean login_heli=false;
	boolean logout_heli=false;
	boolean talk_heli=false;
	boolean say_heli=false;
	
	JComboBox C_kas=new JComboBox();
	JCheckBox CB_lugemine=new JCheckBox("Keela lugemine", false);
	JCheckBox CB_kirjutamine=new JCheckBox("Keela kirjutamine", false);

	public JS(){ //Konstruktor laseb käima selle osa, mis ühendusi hakkab kuulama
		uuendaHeli();
		new Thread(this).start();
	}

	public void run(){//algul on logimine ja siis tekitatakse uus l6im selle kasutajaga edasi tegelemiseks
		try{
			ServerSocket ss=new ServerSocket(22222);

			while(true){
				Kasutajad k=new Kasutajad();
				k.yhendus=ss.accept();
				if(heli && login_heli){
					login.play();
				}
				new JutukaL6im(k);
			}
		}catch(Exception e){System.out.println("Ilmnes viga: "+e);}
	}

	public void uuendaHeli(){
		try{
			login=Applet.newAudioClip(new File(login_path).toURL());
			logout=Applet.newAudioClip(new File(logout_path).toURL());
			talk=Applet.newAudioClip(new File(talk_path).toURL());
			say=Applet.newAudioClip(new File(say_path).toURL());
		}catch(Exception e){System.out.println("Jama heliga.");}
	}

	public void KasList(){//See funktsioon on hea kasutajate hetkeseisu näitamiseks parempoolsel tekstialal
		StringBuffer sb=new StringBuffer();
		C_kas.removeAllItems();
		for(int i=0;i<kas.size();i++){
			Kasutajad temp=(Kasutajad)kas.elementAt(i);//Pisut tüübiteisendusi, et vektorist vajalikud andmed kätte saada
			String temp0=(String)temp.kasutaja;
			C_kas.insertItemAt(temp0,i);
			sb.append(temp0+"\n");
		}
		String s=sb.toString();
		JPanel temp1=(JPanel)content.getComponent(0);
		JScrollPane temp2=(JScrollPane)temp1.getComponent(1);//ning veel tüübiteisendusi, et need õigesse tekstialasse panna
		JViewport temp3=(JViewport)temp2.getComponent(0);
		JTextArea temp4=(JTextArea)temp3.getComponent(0);
		temp4.setText(s);
		
		//See osa saadab kliendile kasutajate nimekirja
		s="#K";
		for(int i=0;i<kas.size();i++){
			Kasutajad temp=(Kasutajad)kas.elementAt(i);
			String temp0=(String)temp.kasutaja;
			s=s.concat(temp0+";");
		}
		for(int i=0;i<kas.size();i++){
			Kasutajad tmp=(Kasutajad)kas.elementAt(i);
			boolean tmp0=(boolean)tmp.klient;
			Socket tmp1=(Socket)tmp.yhendus;
			if(tmp0){
				try{
					PrintWriter pw2=new PrintWriter(tmp1.getOutputStream(),true);
					pw2.println(s);
				}catch(Exception e){System.out.println("Mingi jama KasList'is"+e);}
			}
		}

	}

	//reageeritakse linnukeste tegemistele
	public void itemStateChanged(ItemEvent e){
		Object source=e.getItemSelectable();
		int index=0;
		char c='-';

		if(source==CB_heli){
			index=0;
			c='h';
		}
		if(source==CB_login){
			index=1;
			c='i';
		}
		if(source==CB_logout){
			index=2;
			c='o';
		}
		if(source==CB_talk){
			index=3;
			c='t';
		}
		if(source==CB_say){
			index=4;
			c='s';
		}
		if((source==CB_kirjutamine)||(source==CB_lugemine)){
			index=5;
			for(int i=0;i<kas.size();i++){
				Kasutajad otsing=(Kasutajad)kas.elementAt(i);
				String kasutaja=(String)otsing.kasutaja;
				String otsitav=(String)C_kas.getSelectedItem();
				if(otsitav.equals(kasutaja)){
					kas.remove(otsing);
					if(source==CB_kirjutamine){
						otsing.kirj=e.getStateChange()==ItemEvent.DESELECTED;
					}else{
						otsing.lug=e.getStateChange()==ItemEvent.DESELECTED;
					}
					kas.add(i, otsing);
				}
			}

		}
		if(e.getStateChange()==ItemEvent.DESELECTED){
			c='-';
		}
		linnukesed.setCharAt(index,c);
		if(linnukesed.toString().startsWith("h")){
			heli=true;
		}else{
			heli=false;
		}
		if(linnukesed.toString().charAt(1)=='i'){
			login_heli=true;
		}else{
			login_heli=false;
		}
		if(linnukesed.toString().charAt(2)=='o'){
			logout_heli=true;
		}else{
			logout_heli=false;
		}
		if(linnukesed.toString().charAt(3)=='t'){
			talk_heli=true;
		}else{
			talk_heli=false;
		}
		if(linnukesed.toString().charAt(4)=='s'){
			say_heli=true;
		}else{
			say_heli=false;
		}
		if(linnukesed.toString().startsWith("-")){
			CB_login.setEnabled(false);
			CB_logout.setEnabled(false);
			CB_talk.setEnabled(false);
			CB_say.setEnabled(false);
		}else{
			CB_login.setEnabled(true);
			CB_logout.setEnabled(true);
			CB_talk.setEnabled(true);
			CB_say.setEnabled(true);
		}
	}

	public void actionPerformed(ActionEvent e){
		if(e.getActionCommand()=="login"){
			File newFile=openFile();
			login_path=newFile.getAbsolutePath();
			L_login_heli.setText(login_path);
			uuendaHeli();
		}
		if(e.getActionCommand()=="logout"){
			File newFile=openFile();
			logout_path=newFile.getAbsolutePath();
			L_logout_heli.setText(logout_path);
			uuendaHeli();
		}
		if(e.getActionCommand()=="talk"){
			File newFile=openFile();
			talk_path=newFile.getAbsolutePath();
			L_talk_heli.setText(talk_path);
			uuendaHeli();
		}
		if(e.getActionCommand()=="say"){
			File newFile=openFile();
			say_path=newFile.getAbsolutePath();
			L_say_heli.setText(say_path);
			uuendaHeli();
		}
		if(e.getActionCommand()=="kill"){
			String sihtmärk=(String)C_kas.getSelectedItem();
			for(int i=0;i<kas.size();i++){
				Kasutajad otsing=(Kasutajad)kas.elementAt(i);
				String otsitav=(String)otsing.kasutaja;
				Socket otsitava_port=(Socket)otsing.yhendus;
				if(sihtmärk.equals(otsitav)){
					try{
						if(otsing.klient){
							PrintWriter v2ljund=new PrintWriter(otsitava_port.getOutputStream(),true);
                     		v2ljund.println("#tapa");
						}else{
                     		otsitava_port.close();
                  		}
					}catch(Exception excp){System.out.println("Ei saa socketit kinni panna. Kliendil on nüüd tõsised probleemid;)");}
					kas.remove(i);
					KasList();
				}
			}
		}
		if(e.getActionCommand()=="komboMuutus"){
			String sihtmärk=(String)C_kas.getSelectedItem();
				for(int i=0;i<kas.size();i++){
					Kasutajad otsing=(Kasutajad)kas.elementAt(i);
					String otsitav=(String)otsing.kasutaja;
					if(sihtmärk==otsitav){
						CB_lugemine.setSelected(!otsing.lug);
						CB_kirjutamine.setSelected(!otsing.kirj);
					}
				}
		}
	}

	public File openFile(){
		JFileChooser chooser=new JFileChooser();
		ExampleFileFilter filter=new ExampleFileFilter();
		filter.addExtension("wav");
		filter.addExtension("au");
		filter.setDescription("WAV & AU files");
		chooser.setFileFilter(filter);
		int returnVal;
		returnVal=chooser.showOpenDialog(content);
		if(returnVal==JFileChooser.APPROVE_OPTION){//kui saadakse positiivne vastus(Yes, Ok, vms)
			return chooser.getSelectedFile();
		}else return null;
	}

	public Container createContentPane(){

		JTabbedPane tp=new JTabbedPane();
		Font rasvane=new Font("Serif",Font.BOLD,16);
		Border mustRaam=BorderFactory.createLineBorder(Color.black,1);

		JPanel kontroll=new JPanel(new BorderLayout());
		JPanel P_hääl=new JPanel(new BorderLayout());
		JPanel P_ahistamine=new JPanel(new GridLayout(3,1));

		JPanel nupp=new JPanel();
		JPanel nupp2=new JPanel();
		JPanel nupp3=new JPanel();
		JPanel nupp4=new JPanel();
		JButton B_browse_login=new JButton("Vali uus");
		B_browse_login.addActionListener(this);
		B_browse_login.setActionCommand("login");
		JButton B_browse_logout=new JButton("Vali uus");
		B_browse_logout.addActionListener(this);
		B_browse_logout.setActionCommand("logout");
		JButton B_browse_talk=new JButton("Vali uus");
		B_browse_talk.addActionListener(this);
		B_browse_talk.setActionCommand("talk");
		JButton B_browse_say=new JButton("Vali uus");
		B_browse_say.addActionListener(this);
		B_browse_say.setActionCommand("say");
		JLabel tyhi=new JLabel();
		JLabel tyhi2=new JLabel();
		CB_heli.addItemListener(this);
		CB_login.setEnabled(false);
		CB_login.addItemListener(this);
		CB_logout.setEnabled(false);
		CB_logout.addItemListener(this);
		CB_talk.setEnabled(false);
		CB_talk.addItemListener(this);
		CB_say.setEnabled(false);
		CB_say.addItemListener(this);
		nupp.add(B_browse_login);
		nupp2.add(B_browse_logout);
		nupp3.add(B_browse_talk);
		nupp4.add(B_browse_say);

		JPanel P_1=new JPanel(new GridLayout(5,1));
		JPanel P_2=new JPanel(new GridLayout(5,1));
		JPanel P_3=new JPanel(new GridLayout(5,1));

		P_1.add(CB_heli);
		P_1.add(CB_login);
		P_1.add(CB_logout);
		P_1.add(CB_talk);
		P_1.add(CB_say);
		
		P_2.add(tyhi);
		P_2.add(L_login_heli);
		P_2.add(L_logout_heli);
		P_2.add(L_talk_heli);
		P_2.add(L_say_heli);
		
		P_3.add(tyhi2);
		P_3.add(nupp);
		P_3.add(nupp2);
		P_3.add(nupp3);
		P_3.add(nupp4);
		
		P_hääl.add(P_1, BorderLayout.WEST);
		P_hääl.add(P_2, BorderLayout.CENTER);
		P_hääl.add(P_3, BorderLayout.EAST);

		P_hääl.setBorder(BorderFactory.createTitledBorder(mustRaam,"Heli",0,0,rasvane));

		JLabel L_kas=new JLabel("Kasutaja: ");
		JButton B_kill=new JButton("Eemalda kasutaja");

		C_kas.setEditable(false);
		CB_lugemine.addItemListener(this);
		CB_kirjutamine.addItemListener(this);
		B_kill.addActionListener(this);
		B_kill.setActionCommand("kill");

		JPanel P_yks=new JPanel();
		JPanel P_kaks=new JPanel();
		JPanel P_kolm=new JPanel();

		P_yks.add(L_kas);
		P_yks.add(C_kas);
		P_kaks.add(CB_lugemine);
		P_kaks.add(CB_kirjutamine);
		P_kolm.add(B_kill);

		C_kas.addActionListener(this);
		C_kas.setActionCommand("komboMuutus");

		P_ahistamine.add(P_yks);
		P_ahistamine.add(P_kaks);
		P_ahistamine.add(P_kolm);
		P_ahistamine.setBorder(BorderFactory.createTitledBorder(mustRaam,"Ahistamine",0,0,rasvane));

		JPanel parem=new JPanel(new BorderLayout());
		JLabel L_silt=new JLabel("Kasutajad");
		L_silt.setFont(rasvane);
		JTextArea txtKas=new JTextArea();//uus tekstiala...
		txtKas.setEditable(false);//..kuhu ei saa ise midagi kirjutada

		JTextArea txtJutt=new JTextArea();
		txtJutt.setEditable(false);
		txtJutt.setLineWrap(true);//jutu lõikamine vastavalt tekstiala laiusele
		txtJutt.setWrapStyleWord(true);//Kui mingi sõna ei mahu ära siis tõstetakse ta tervenisti järgmisele reale

		JScrollPane srcKas=new JScrollPane(txtKas);//uues kerimisribaga alad
		JScrollPane srcJutt=new JScrollPane(txtJutt);
		srcKas.setPreferredSize(new Dimension(100,1));//kerimisalade suurused
		srcJutt.setPreferredSize(new Dimension(700,1));
		srcJutt.setHorizontalScrollBarPolicy(JScrollPane.HORIZONTAL_SCROLLBAR_NEVER);//ei kuvata horisontaalset kerimisriba

		parem.add(L_silt,BorderLayout.NORTH);
		parem.add(srcKas,BorderLayout.CENTER);

		kontroll.add(P_hääl, BorderLayout.NORTH);
		kontroll.add(P_ahistamine, BorderLayout.CENTER);

		tp.addTab("Jutt ja asjad",srcJutt);
		tp.addTab("Kontroll",kontroll);

		content.add(parem, BorderLayout.EAST);//elementide paiknemine aknas
		content.add(tp,BorderLayout.WEST);

		return content;
	}

	public static void main(String args[]) throws IOException{
		JFrame.setDefaultLookAndFeelDecorated(true);//vaikimisi väljanägemine
		JFrame aken=new JFrame("Server");
		aken.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);//X-st kinni panemise võimalus
		JS js=new JS();// uus isend iseendast

		aken.setContentPane(js.createContentPane());//aknasisu luuakse funktsioonis createContentPane()

		aken.setSize(810,400);
		aken.setResizable(true);
		aken.setLocation(100,100);
		aken.show();
	}
}