File: ProfilerProcess.cs

package info (click to toggle)
mono-tools 4.2-3.1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, bullseye, sid
  • size: 13,868 kB
  • sloc: cs: 100,909; sh: 3,845; makefile: 2,040; javascript: 1,557; xml: 126
file content (127 lines) | stat: -rw-r--r-- 3,452 bytes parent folder | download | duplicates (9)
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
// Copyright (c) 2009  Novell, Inc.  <http://www.novell.com>
//
// Permission is hereby granted, free of charge, to any person obtaining
// a copy of this software and associated documentation files (the
// "Software"), to deal in the Software without restriction, including
// without limitation the rights to use, copy, modify, merge, publish,
// distribute, sublicense, and/or sell copies of the Software, and to
// permit persons to whom the Software is furnished to do so, subject to
// the following conditions:
// 
// The above copyright notice and this permission notice shall be
// included in all copies or substantial portions of the Software.
// 
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.


	
using System;
using System.Diagnostics;
using System.Net;
using System.Net.Sockets;
using Mono.Profiler;

namespace Mono.Profiler.Widgets {

	public class ProfilerProcess {	

		Process proc;
		string log_file;

		public ProfilerProcess (ProfileConfiguration config)
		{
			log_file = System.IO.Path.GetTempFileName ();
			proc = new Process ();
			proc.StartInfo.FileName = "mono";
			proc.StartInfo.Arguments = "--profile=logging:" + config.ToArgs () + ",o=" + log_file + ",cp=" + Port.ToString () + " " + config.AssemblyPath;
			proc.EnableRaisingEvents = true;
			proc.Exited += delegate { OnExited (); };
		}

		int port;
		int Port {
			get {
				if (port == 0) {
					IPEndPoint ep = new IPEndPoint (IPAddress.Any, 0);
					using (Socket socket = new Socket (AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)) {
						socket.Bind (ep);
						port = ((IPEndPoint) socket.LocalEndPoint).Port;
					}
				}
				return port;
			}
		}

		NetworkStream stream;
		NetworkStream Stream {
			get {
				if (stream == null) {
					IPEndPoint ep = new IPEndPoint (IPAddress.Loopback, Port);
					TcpClient client = new TcpClient ();
					client.Connect (ep);
					stream = client.GetStream ();
				}
				return stream;
			}
		}
					
		public event EventHandler Exited;

		void OnExited ()
		{
			if (Exited == null)
				return;
			Exited (this, EventArgs.Empty);
		}

		public event EventHandler Paused;

		void OnPaused ()
		{
			if (Paused == null)
				return;
			Paused (this, EventArgs.Empty);
		}

		public string LogFile {
			get { return log_file; }
		}

		string SendCommand (string cmd)
		{
			byte[] buffer = System.Text.Encoding.ASCII.GetBytes (cmd); 
			NetworkStream stream = Stream;
			stream.Write (buffer, 0, buffer.Length);
			buffer = new byte [1024];
			int cnt = stream.Read (buffer, 0, buffer.Length);
			return System.Text.Encoding.ASCII.GetString (buffer, 0, cnt);
		}

		public void Pause ()
		{
			string resp = SendCommand ("disable\n");
			if (resp == "DONE\n")
				OnPaused ();
			else
				throw new Exception ("'disable' command produced error");
		}

		public void Resume ()
		{
			string resp = SendCommand ("enable\n");
			if (resp != "DONE\n")
				throw new Exception ("'enable' command produced error");
		}

		public void Start ()
		{
			proc.Start ();
		}
	}
}