% Path to the mksqlite package
addpath('/home/rasmus/installed_drivers/mksqlite-2.0/');

% Connects to our database
mksqlite('open','my_db.db');

% Fetch our sql query files
query_wifi = fileread('database_queries/query_wifi.sql');
query_hspa = fileread('database_queries/query_mobile_hspa.sql');
query_hspa_plus = fileread('database_queries/query_mobile_hspa+.sql');
query_lte = fileread('database_queries/query_lte.sql');
query_three_g = fileread('database_queries/query_mobile_3g.sql');

% Does our queries and returns the data
results_wifi = mksqlite(query_wifi);
results_hspa =  mksqlite(query_hspa);
results_hspa_plus =  mksqlite(query_hspa_plus);
results_lte =  mksqlite(query_lte);

result_3g = mksqlite(query_three_g);

% extract the relevant 3G data 
mydata = [[result_3g.device_latitude]; [result_3g.device_longitude]; [result_3g.cell_signal_strength_dbm]; [result_3g.device_position_accuracy]];
mydata=mydata';

small2_y_max = 0.035 + 5.837e1;
small2_y_min = 0.005 + 5.837e1;
small2_x_max = 0.035 + 1.555e1;
small2_x_min = 0.005 + 1.555e1;

% take a small dataset
small_dataset = mydata(mydata(:,1)>58.39 & mydata(:,1)<58.40,1:4 );
small_dataset = small_dataset(small_dataset(:,2)>15.575 & small_dataset(:,2)<15.58,1:4 );
small_dataset2 = mydata(mydata(:,1)>small2_y_min & mydata(:,1)<small2_y_max,1:4 );
small_dataset2 = small_dataset2(small_dataset2(:,2)>small2_x_min & small_dataset2(:,2)<small2_x_max,1:4 );
small_dataset3 = small_dataset(small_dataset(:,4)<200,1:4);
%dlmwrite('small_dataset.csv',small_dataset,'delimiter',',','precision',10);
% Closes the connection to our database
mksqlite('close');