Windows Phone 运动轨迹记录工具 (20130404 更新)

轨迹记录工具

带有 GPS 记录功能的运动手表价格不菲，于是我自己写了一个简单的运动轨迹记录工具。核心代码如下，只有不到 200 行。

工具记录的数据可以使用 Isolated Storage Explorer Tool 导出，进行进一步的分析、处理和转换。

下载链接 http://pan.baidu.com/s/1sjO43s5

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Device.Location;
using System.IO;
using System.IO.IsolatedStorage;
using System.Text;
using System.Windows;
using Microsoft.Phone.Controls;
using Microsoft.Phone.Shell;

namespace Tracker
{
    public partial class MainPage : PhoneApplicationPage
    {
        bool tracking;
        string logName;
        GeoCoordinateWatcher watcher;
        List<GeoCoordinate> locations;
        List<long> timestamps;
        Object lockObject;

        public MainPage()
        {
            tracking = false;
            lockObject = new Object();
            InitializeComponent();
            PhoneApplicationService.Current.ApplicationIdleDetectionMode = IdleDetectionMode.Disabled;
            updateLogName();
            status.Text = "GPS Tracker by coolypf";
            watcher = new GeoCoordinateWatcher(GeoPositionAccuracy.High);
            watcher.MovementThreshold = 0.0;
            watcher.PositionChanged += onMove;
        }

        void onMove(object sender, GeoPositionChangedEventArgs<GeoCoordinate> e)
        {
            if (!tracking || watcher.Status != GeoPositionStatus.Ready)
                return;
            lock (lockObject)
            {
                locations.Add(e.Position.Location);
                timestamps.Add(e.Position.Timestamp.UtcTicks);
            }
        }

        void updateLogName()
        {
            IsolatedStorageFile isf = IsolatedStorageFile.GetUserStoreForApplication();
            DateTime now = DateTime.Now;
            String prefix = now.Year + "-" + now.Month + "-" + now.Day + "-";
            String filename;
            int idx = 1;
            while (true)
            {
                filename = prefix + idx + ".txt";
                if (!isf.FileExists(filename))
                    break;
                idx++;
            }
            name.Text = filename;
        }

        void writeLog()
        {
            lock (lockObject)
            {
                if (locations.Count < 2)
                    return;
                IsolatedStorageFile isf = IsolatedStorageFile.GetUserStoreForApplication();
                StreamWriter w = new StreamWriter(isf.OpenFile(logName, FileMode.Create, FileAccess.Write));
                for (int i = 0; i < locations.Count; ++i)
                {
                    w.Write(timestamps[i]);
                    w.Write(" ");
                    GeoCoordinate g = locations[i];
                    w.Write(g.Latitude);
                    w.Write(" ");
                    w.Write(g.Longitude);
                    w.Write(" ");
                    w.Write(g.Altitude);
                    w.WriteLine();
                }
                w.Close();
            }
        }

        void onControl(object sender, RoutedEventArgs e)
        {
            control.IsEnabled = false;
            if (tracking)
            {
                watcher.Stop();
                writeLog();
                status.Text = getStatus();
                control.Content = "Start";
                show.IsEnabled = false;
                updateLogName();
                name.IsEnabled = true;
                tracking = false;
            }
            else
            {
                name.IsEnabled = false;
                logName = name.Text;
                locations = new List<GeoCoordinate>();
                timestamps = new List<long>();
                tracking = true;
                watcher.Start();
                control.Content = "Stop";
                show.IsEnabled = true;
            }
            control.IsEnabled = true;
        }

        String getStatus()
        {
            StringBuilder b = new StringBuilder();
            lock (lockObject)
            {
                b.Append("Tracked positions: ");
                b.Append(locations.Count);
                b.AppendLine();
                if (locations.Count >= 2)
                {
                    double dist = 0.0, dist_r = 0.0, speed = 0.0;
                    long ticks = timestamps[timestamps.Count - 1] - timestamps[0], ticks_r = 0;
                    for (int i = 1; i < locations.Count; ++i)
                    {
                        double dd = locations[i - 1].GetDistanceTo(locations[i]);
                        long dt = timestamps[i] - timestamps[i - 1];
                        if (dt > 0)
                            speed = dd * 1e7 / dt;
                        if (speed > 2.0)
                        {
                            dist_r += dd;
                            ticks_r += dt;
                        }
                        dist += dd;
                    }
                    b.Append("Total distance: ");
                    b.Append(dist * 1e-3);
                    b.AppendLine(" km");
                    b.Append("Total time: ");
                    b.Append(new TimeSpan(ticks).ToString());
                    b.AppendLine();
                    b.Append("Average speed: ");
                    if (ticks > 0)
                        speed = dist * 3.6e7 / ticks;
                    else
                        speed = 0.0;
                    b.Append(speed);
                    b.AppendLine(" km/h");
                    b.Append("Running speed: ");
                    if (ticks_r > 0)
                        speed = dist_r * 3.6e7 / ticks_r;
                    else
                        speed = 0.0;
                    b.Append(speed);
                    b.AppendLine(" km/h");
                }
            }
            return b.ToString();
        }

        void onShow(object sender, RoutedEventArgs e)
        {
            if (!tracking)
                return;
            status.Text = getStatus() + "GPS status: " + watcher.Status.ToString();
        }

        protected override void OnBackKeyPress(CancelEventArgs e)
        {
            if (tracking)
            {
                MessageBoxResult result = MessageBox.Show("Tracking is in progress. If you quit, all recorded data will be lost.", "Quit Tracker?", MessageBoxButton.OKCancel);
                if (result != MessageBoxResult.OK)
                    e.Cancel = true;
            }
            base.OnBackKeyPress(e);
        }
    }
}

轨迹处理工具

下面的程序可以处理轨迹数据，进行简单的分析，并将数据转换成 CSV 和 GPX 格式。前者可以用 Excel 打开，后者可以导入 Google Earth 中，并进一步转换成 KMZ 格式导入到 Google Maps 里面。

#include <stdio.h>
#include <string.h>
#include <math.h>
#include <vector>

using std::vector;

static double distance(double lat1, double lon1, double lat2, double lon2);
static void evil_transform(double wg_lat, double wg_lon, double &mg_lat, double &mg_lon);
static void bd_encrypt(double gg_lat, double gg_lon, double &bd_lat, double &bd_lon);
static void change_extension(char *name, const char *ext);
static int date_time(long long ticks, int part);

struct Record
{
	long long tick;
	double lat, lon, alt, speed;
};

struct Data
{
	long long tick;
	double lat, lon, alt, speed;
	double time, dist, acc;
};

const double running_threshold = 1.9;
const double walking_threshold = 0.1;

static inline int hour(long long ticks)
{
	return (int)((ticks & 0x3fffffffffffffffll) / 0x861c46800ll % 24ll);
}

static inline int minute(long long ticks)
{
	return (int)((ticks & 0x3fffffffffffffffll) / 0x23c34600ll % 60ll);
}

static inline int second(long long ticks)
{
	return (int)((ticks & 0x3fffffffffffffffll) / 0x989680ll % 60ll);
}

static inline int millisecond(long long ticks)
{
	return (int)((ticks & 0x3fffffffffffffffll) / 10000 % 1000);
}

int main(int argc, char **argv)
{
	double sampling_threshold = 2.0;
	if (argc < 2)
	{
		fprintf(stderr, "Usage: analyzer tracking_log.txt [sampling_threshold]\nDefault sampling threshold is 2.0 seconds.\n");
		return 1;
	}
	if (argc >= 3)
	{
		double arg = atof(argv[2]);
		if (arg > 0.0 && arg < 3600.0)
			sampling_threshold = arg;
	}
	if (strlen(argv[1]) > 4000)
	{
		fprintf(stderr, "File name too long!\n");
		return 1;
	}

	// Read tracking log records
	static char buf[4096];
	FILE *fp = fopen(argv[1], "r");
	if (!fp)
	{
		fprintf(stderr, "Can not open %s\n", argv[1]);
		return 1;
	}
	vector<Record> vr;
	while (1)
	{
		if (!fgets(buf, 4096, fp))
			break;
		int len = (int)strlen(buf);
		if (len < 10 || len > 4000)
		{
			fprintf(stderr, "Invalid line: %d\n", (int)vr.size() + 1);
			return 1;
		}
		Record rec;
		if (sscanf(buf, "%lld%lf%lf%lf", &rec.tick, &rec.lat, &rec.lon, &rec.alt) != 4)
		{
			fprintf(stderr, "Invalid line: %d\n", (int)vr.size() + 1);
			return 1;
		}
		vr.push_back(rec);
	}
	fclose(fp);

	// Filter invalid records
	if (vr.size() < 2)
	{
		fprintf(stderr, "No enough data to analyze!\n");
		return 1;
	}
	vr[0].speed = 0.0;
	for (size_t i = 1; i < vr.size(); ++i)
	{
		double dd = distance(vr[i - 1].lat, vr[i - 1].lon, vr[i].lat, vr[i].lon);
		long long dt = vr[i].tick - vr[i - 1].tick;
		if (dt > 0)
			vr[i].speed = dd * 1e7 / dt;
		else
			vr[i].speed = vr[i - 1].speed;
	}
	vector<Record> v2;
	double speed_avg = 0.0, speed_devi = 0.0, speed_limit;
	for (size_t i = 0; i < vr.size(); ++i)
		speed_avg += vr[i].speed;
	speed_avg /= vr.size();
	for (size_t i = 0; i < vr.size(); ++i)
		speed_devi += (vr[i].speed - speed_avg) * (vr[i].speed - speed_avg);
	speed_devi = sqrt(speed_devi / vr.size());
	speed_limit = speed_avg + 3.0 * speed_devi;
	//  fprintf(stderr, "speed avg, devi, limit: %.2lf, %.2lf, %.2lf\n", speed_avg, speed_devi, speed_limit);
	for (size_t i = 0; i < vr.size(); ++i)
		if (vr[i].speed < speed_limit)
			v2.push_back(vr[i]);
	vr.swap(v2);
	v2.clear();

	// Resample data
	if (vr.size() < 2)
	{
		fprintf(stderr, "No enough data to analyze!\n");
		return 1;
	}
	vector<Data> vd;
	{
		Data dat0;
		dat0.tick = vr[0].tick;
		dat0.lat = vr[0].lat;
		dat0.lon = vr[0].lon;
		dat0.alt = vr[0].alt;
		dat0.speed = 0.0;
		dat0.time = 0.0;
		dat0.dist = 0.0;
		dat0.acc = 0.0;
		vd.push_back(dat0);
	}
	long long begin = vr[0].tick;
	double prev_time = 0.0, dist = 0.0;
	for (size_t i = 1; i < vr.size(); ++i)
	{
		double time = (vr[i].tick - begin) * 1e-7;
		if (i + 1 < vr.size() && time - prev_time < sampling_threshold)
			continue;
		long long dt = vr[i].tick - vd.back().tick;
		if (dt <= 0)
			continue;
		Data dat;
		double dd = distance(vd.back().lat, vd.back().lon, vr[i].lat, vr[i].lon);
		dist += dd;
		dat.tick = vr[i].tick;
		dat.lat = vr[i].lat;
		dat.lon = vr[i].lon;
		dat.alt = vr[i].alt;
		dat.speed = dd * 1e7 / dt;
		dat.time = time;
		dat.dist = dist;
		vd.push_back(dat);
		prev_time = time;
	}
	vr.clear();

	// Analyze data
	if (vd.size() < 2)
	{
		fprintf(stderr, "No enough data to analyze!\n");
		return 1;
	}
	for (size_t i = 1; i + 1 < vd.size(); ++i)
	{
		vd[i].acc = (vd[i + 1].speed - vd[i].speed) * 2e7 / (vd[i + 1].tick - vd[i - 1].tick);
		vd[i].speed = (vd[i].speed * (vd[i + 1].tick - vd[i].tick) + vd[i + 1].speed * (vd[i].tick - vd[i - 1].tick)) / (vd[i + 1].tick - vd[i - 1].tick);
	}
	vd.back().speed = 0.0;
	vd.back().acc = 0.0;
	double dist_r = 0.0, mx_speed = 0.0;
	long long time_r = 0, time_w = 0; 
	for (size_t i = 1; i < vd.size(); ++i)
	{
		double dd = vd[i].dist - vd[i - 1].dist;
		long long dt = vd[i].tick - vd[i - 1].tick;
		if (vd[i].speed > running_threshold)
		{
			dist_r += dd;
			time_r += dt;
			if (vd[i].speed > mx_speed)
			  	mx_speed = vd[i].speed;
		}
		else if (vd[i].speed > walking_threshold)
			time_w += dt;
	}
	double dist_a = vd.back().dist, dist_w = dist_a - dist_r;
	long long time_a = vd.back().tick - vd.front().tick, time_s = time_a - time_r - time_w;
	printf("%30s: %.3lf km\n", "Total distance", dist_a * 1e-3);
	printf("%30s: %.3lf km\n", "Running distance", dist_r * 1e-3);
	printf("%30s: %.3lf km\n", "Walking distance", dist_w * 1e-3);
	printf("%30s: %d h %d m %d.%03d s\n", "Total time", hour(time_a), minute(time_a), second(time_a), millisecond(time_a));
	printf("%30s: %d h %d m %d.%03d s\n", "Running time", hour(time_r), minute(time_r), second(time_r), millisecond(time_r));
	printf("%30s: %d h %d m %d.%03d s\n", "Walking time", hour(time_w), minute(time_w), second(time_w), millisecond(time_w));
	printf("%30s: %d h %d m %d.%03d s\n", "Stopped time", hour(time_s), minute(time_s), second(time_s), millisecond(time_s));
	printf("%30s: %.2lf m/s , %.2lf km/h\n", "Max speed", mx_speed, mx_speed * 3.6);
	printf("%30s: %.2lf m/s , %.2lf km/h\n", "Average speed", dist_a * 1e7 / time_a, dist_a * 3.6e7 / time_a);
	printf("%30s: %.2lf m/s , %.2lf km/h\n", "Average running speed", dist_r * 1e7 / time_r, dist_r * 3.6e7 / time_r);
	printf("%30s: %.2lf m/s , %.2lf km/h\n", "Average walking speed", dist_w * 1e7 / time_w, dist_w * 3.6e7 / time_w);

	// Export data to CSV
	strcpy(buf, argv[1]);
	change_extension(buf, ".csv");
	fp = fopen(buf, "w");
	if (!fp)
	{
		fprintf(stderr, "Can not write to %s\n", buf);
		return 1;
	}
	fprintf(fp, "Time(s),Distance(km),Altitude(m),Speed(m/s),Speed(km/h),Acceleration(m/s^2)\n");
	for (size_t i = 0; i < vd.size(); ++i)
		fprintf(fp, "%.2lf,%.3lf,%.1lf,%.2lf,%.2lf,%.2lf\n", vd[i].time, vd[i].dist * 1e-3, vd[i].alt, vd[i].speed, vd[i].speed * 3.6, vd[i].acc);
	fclose(fp);

	// Export data to GPX
	const char gpx_head[] = "<?xml version=\"1.0\" encoding=\"UTF-8\" standalone=\"no\" ?>\n\n"
							"<gpx xmlns=\"http://www.topografix.com/GPX/1/1\" version=\"1.1\" creator=\"Analyzer for WP7Tracker\">\n"
							"<metadata><name>%s</name><link href=\"http://blog.csdn.net/coolypf/\"><text>coolypf</text></link></metadata>\n"
							"<trk><name>%s</name><trkseg>\n";
	const char gpx_tail[] = "</trkseg></trk></gpx>\n";

	strcpy(buf, argv[1]);
	change_extension(buf, ".wgs-84.gpx");
	fp = fopen(buf, "w");
	if (!fp)
	{
		fprintf(stderr, "Can not write to %s\n", buf);
		return 1;
	}
	fprintf(fp, gpx_head, buf, buf);
	for (size_t i = 0; i < vd.size(); ++i)
	{
		fprintf(fp, "<trkpt lat=\"%.6lf\" lon=\"%.6lf\"><ele>%.1lf</ele>", vd[i].lat, vd[i].lon, vd[i].alt);
		long long tick = vd[i].tick;
		fprintf(fp, "<time>%04d-%02d-%02dT%02d:%02d:%02dZ</time></trkpt>\n",
				date_time(tick, 0), date_time(tick, 2), date_time(tick, 3),
				hour(tick), minute(tick), second(tick));
	}
	fprintf(fp, gpx_tail);
	fclose(fp);

	strcpy(buf, argv[1]);
	change_extension(buf, ".gcj-02.gpx");
	fp = fopen(buf, "w");
	if (!fp)
	{
		fprintf(stderr, "Can not write to %s\n", buf);
		return 1;
	}
	fprintf(fp, gpx_head, buf, buf);
	for (size_t i = 0; i < vd.size(); ++i)
	{
		double lat, lon;
		evil_transform(vd[i].lat, vd[i].lon, lat, lon);
		vd[i].lat = lat;
		vd[i].lon = lon;
		fprintf(fp, "<trkpt lat=\"%.6lf\" lon=\"%.6lf\"><ele>%.1lf</ele>", vd[i].lat, vd[i].lon, vd[i].alt);
		long long tick = vd[i].tick;
		fprintf(fp, "<time>%04d-%02d-%02dT%02d:%02d:%02dZ</time></trkpt>\n",
				date_time(tick, 0), date_time(tick, 2), date_time(tick, 3),
				hour(tick), minute(tick), second(tick));
	}
	fprintf(fp, gpx_tail);
	fclose(fp);

	strcpy(buf, argv[1]);
	change_extension(buf, ".bd-09.gpx");
	fp = fopen(buf, "w");
	if (!fp)
	{
		fprintf(stderr, "Can not write to %s\n", buf);
		return 1;
	}
	fprintf(fp, gpx_head, buf, buf);
	for (size_t i = 0; i < vd.size(); ++i)
	{
		double lat, lon;
		bd_encrypt(vd[i].lat, vd[i].lon, lat, lon);
		vd[i].lat = lat;
		vd[i].lon = lon;
		fprintf(fp, "<trkpt lat=\"%.6lf\" lon=\"%.6lf\"><ele>%.1lf</ele>", vd[i].lat, vd[i].lon, vd[i].alt);
		long long tick = vd[i].tick;
		fprintf(fp, "<time>%04d-%02d-%02dT%02d:%02d:%02dZ</time></trkpt>\n",
				date_time(tick, 0), date_time(tick, 2), date_time(tick, 3),
				hour(tick), minute(tick), second(tick));
	}
	fprintf(fp, gpx_tail);
	fclose(fp);

	return 0;
}

const double pi = 3.14159265358979324;
const double f = pi / 180.0;
const double x_pi = f * 3000.0;
const double a = 6378245.0;
const double ee = 0.00669342162296594323;
const double r = 6376500.0;

double distance(double lat1, double lon1, double lat2, double lon2)
{
	double rad1 = lat1 * f, rad2 = lat2 * f;
	double dlat = rad2 - rad1, dlon = (lon2 - lon1) * f;
	double x = pow(sin(dlat / 2.0), 2.0) + (cos(rad1) * cos(rad2)) * pow(sin(dlon / 2.0), 2.0);
	return r * 2.0 * atan2(sqrt(x), sqrt(1.0 - x));
}

static bool out_of_mars(double lat, double lon)
{
	if (lon < 72.004 || lon > 137.8347)
		return true;
	if (lat < 0.8293 || lat > 55.8271)
		return true;
	return false;
}

static double transform_lat(double x, double y)
{
	double ret = -100.0 + 2.0 * x + 3.0 * y + 0.2 * y * y + 0.1 * x * y + 0.2 * sqrt(fabs(x));
	ret += (20.0 * sin(6.0 * x * pi) + 20.0 * sin(2.0 * x * pi)) * 2.0 / 3.0;
	ret += (20.0 * sin(y * pi) + 40.0 * sin(y / 3.0 * pi)) * 2.0 / 3.0;
	ret += (160.0 * sin(y / 12.0 * pi) + 320 * sin(y * pi / 30.0)) * 2.0 / 3.0;
	return ret;
}

static double transform_lon(double x, double y)
{
	double ret = 300.0 + x + 2.0 * y + 0.1 * x * x + 0.1 * x * y + 0.1 * sqrt(fabs(x));
	ret += (20.0 * sin(6.0 * x * pi) + 20.0 * sin(2.0 * x * pi)) * 2.0 / 3.0;
	ret += (20.0 * sin(x * pi) + 40.0 * sin(x / 3.0 * pi)) * 2.0 / 3.0;
	ret += (150.0 * sin(x / 12.0 * pi) + 300.0 * sin(x / 30.0 * pi)) * 2.0 / 3.0;
	return ret;
}

void evil_transform(double wg_lat, double wg_lon, double &mg_lat, double &mg_lon)
{
	if (out_of_mars(wg_lat, wg_lon))
	{
	    mg_lat = wg_lat;
	    mg_lon = wg_lon;
	    return;
	}
	double d_lat = transform_lat(wg_lon - 105.0, wg_lat - 35.0);
	double d_lon = transform_lon(wg_lon - 105.0, wg_lat - 35.0);
	double rad_lat = wg_lat / 180.0 * pi;
	double magic = sin(rad_lat);
	magic = 1 - ee * magic * magic;
	double sqrt_magic = sqrt(magic);
	d_lat = (d_lat * 180.0) / ((a * (1 - ee)) / (magic * sqrt_magic) * pi);
	d_lon = (d_lon * 180.0) / (a / sqrt_magic * cos(rad_lat) * pi);
	mg_lat = wg_lat + d_lat;
	mg_lon = wg_lon + d_lon;
}

void bd_encrypt(double gg_lat, double gg_lon, double &bd_lat, double &bd_lon)
{
	double x = gg_lon, y = gg_lat;
	double z = sqrt(x * x + y * y) + 0.00002 * sin(y * x_pi);
	double theta = atan2(y, x) + 0.000003 * cos(x * x_pi);
	bd_lon = z * cos(theta) + 0.0065;
	bd_lat = z * sin(theta) + 0.006;
}

void change_extension(char *name, const char *ext)
{
	int i = (int)strlen(name);
	while (1)
	{
		if (i <= 0 || name[i] == '/' || name[i] =='\\')
		{
			i = (int)strlen(name);
			break;
		}
		if (name[i] == '.')
			break;
		--i;
	}
	strcpy(name + i, ext);
}

int date_time(long long ticks, int part)
{
	const int days_to_month_365[] = { 0, 0x1f, 0x3b, 90, 120, 0x97, 0xb5, 0xd4, 0xf3, 0x111, 0x130, 0x14e, 0x16d };
	const int days_to_month_366[] = { 0, 0x1f, 60, 0x5b, 0x79, 0x98, 0xb6, 0xd5, 0xf4, 0x112, 0x131, 0x14f, 0x16e };
	ticks &= 0x3fffffffffffffffll;
	int num2 = (int)(ticks / 0xc92a69c000ll);
	int num3 = num2 / 0x23ab1;
	num2 -= num3 * 0x23ab1;
	int num4 = num2 / 0x8eac;
	if (num4 == 4)
		num4 = 3;
	num2 -= num4 * 0x8eac;
	int num5 = num2 / 0x5b5;
	num2 -= num5 * 0x5b5;
	int num6 = num2 / 0x16d;
	if (num6 == 4)
		num6 = 3;
	if (part == 0)
		return num3 * 400 + num4 * 100 + num5 * 4 + num6 + 1;
	num2 -= num6 * 0x16d;
	if (part == 1)
		return num2 + 1;
	const int *num_array = (num6 == 3 && (num5 != 0x18 || num4 == 3)) ? days_to_month_366 : days_to_month_365;
	int index = num2 >> 6;
	while (num2 >= num_array[index])
		index++;
	if (part == 2)
		return index;
	return num2 - num_array[index - 1] + 1;
}