Free cookie consent management tool by TermsFeed Policy Generator

source: trunk/sources/HeuristicLab.CEDMA.Server/ServerForm.cs @ 380

Last change on this file since 380 was 380, checked in by gkronber, 16 years ago

improved contention problem by using ReaderWriterLock in the DB proxy and reducing the number of threads in the RunScheduler (ticket #189)

File size: 4.0 KB
Line 
1#region License Information
2/* HeuristicLab
3 * Copyright (C) 2002-2008 Heuristic and Evolutionary Algorithms Laboratory (HEAL)
4 *
5 * This file is part of HeuristicLab.
6 *
7 * HeuristicLab is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation, either version 3 of the License, or
10 * (at your option) any later version.
11 *
12 * HeuristicLab is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with HeuristicLab. If not, see <http://www.gnu.org/licenses/>.
19 */
20#endregion
21
22using System;
23using System.Collections.Generic;
24using System.ComponentModel;
25using System.Data;
26using System.Drawing;
27using System.Linq;
28using System.Text;
29using System.Windows.Forms;
30using System.ServiceModel;
31using System.ServiceModel.Description;
32using HeuristicLab.PluginInfrastructure;
33using System.Net;
34using HeuristicLab.CEDMA.DB;
35using HeuristicLab.CEDMA.DB.Interfaces;
36using System.Data.Common;
37using System.Threading;
38using HeuristicLab.Grid;
39
40namespace HeuristicLab.CEDMA.Server {
41  public partial class ServerForm : Form {
42    private ServiceHost host;
43    private Database database;
44    private static readonly string dbFile = AppDomain.CurrentDomain.BaseDirectory + "/test.db3";
45    private static readonly string connectionString = "Data Source=\""+dbFile+"\";Pooling=False";
46    public ServerForm() {
47      InitializeComponent();
48      // windows XP returns the external ip on index 0 while windows vista returns the external ip on index 2
49      if (System.Environment.OSVersion.Version.Major >= 6) {
50        addressTextBox.Text = "net.tcp://" + Dns.GetHostAddresses(Dns.GetHostName())[2] + ":8002/CEDMA/World";
51      } else {
52        addressTextBox.Text = "net.tcp://" + Dns.GetHostAddresses(Dns.GetHostName())[0] + ":8002/CEDMA/World";
53      }
54    }
55
56    private void InitAgentScheduler() {
57      AgentScheduler scheduler = new AgentScheduler(database);
58      Thread agentSchedulerThread = new Thread(scheduler.Run);
59      agentSchedulerThread.Start();
60    }
61
62    private void InitRunScheduler() {
63      JobManager jobManager = new JobManager(gridAddress.Text);
64      jobManager.Reset();
65      RunScheduler scheduler = new RunScheduler(database, jobManager);
66      Thread runSchedulerThread = new Thread(scheduler.Run);
67      runSchedulerThread.Start();
68    }
69
70    private void InitDatabase() {
71      DbProviderFactory fact;
72      fact = DbProviderFactories.GetFactory("System.Data.SQLite");
73      if(!System.IO.File.Exists(dbFile)) {
74        database = new Database(connectionString);
75        database.CreateNew();
76      } else {
77        database = new Database(connectionString);
78      }
79    }
80
81    private void Start() {
82      InitDatabase();
83      InitAgentScheduler();
84      InitRunScheduler();
85
86      host = new ServiceHost(database, new Uri(addressTextBox.Text));
87      ServiceThrottlingBehavior throttlingBehavior = new ServiceThrottlingBehavior();
88      throttlingBehavior.MaxConcurrentSessions = 20;
89      host.Description.Behaviors.Add(throttlingBehavior);
90      try {
91        NetTcpBinding binding = new NetTcpBinding();
92        binding.MaxReceivedMessageSize = 10000000; // 10Mbytes
93        binding.ReaderQuotas.MaxStringContentLength = 10000000; // also 10M chars
94        binding.ReaderQuotas.MaxArrayLength = 10000000; // also 10M elements;
95        binding.Security.Mode = SecurityMode.None;
96
97        host.AddServiceEndpoint(typeof(IDatabase), binding, addressTextBox.Text);
98        host.Open();
99      } catch (CommunicationException ex) {
100        MessageBox.Show("An exception occurred: " + ex.Message);
101        host.Abort();
102      }
103    }
104
105    private void startButton_Click(object sender, EventArgs e) {
106      Start();
107      startButton.Enabled = false;
108    }
109  }
110}
Note: See TracBrowser for help on using the repository browser.