Removed old version of asc2navit

git-svn-id: http://svn.code.sf.net/p/navit/code/trunk/navit@1925 ffa7fe5e-494d-0410-b361-a75ebd5db220

1 files changed, 0 insertions, 66 deletions

diff --git a/navit/script/poiwarner2navit b/navit/script/poiwarner2navit
deleted file mode 100755
index 0af74e7ae..000000000
--- a/navit/script/poiwarner2navit
+++ /dev/null
@@ -1,66 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-my $write_osm = 0;
-$write_osm = 1 if (defined(@ARGV) && $ARGV[0] eq '-x' && shift);
-
-if (!($#ARGV + 1)) {
-    print "parses one (or multiple) .asc-file(s) (mainly used by poiwarner) and merges the result into one navit binary mapfile. requires osm2navit\n";
-    print "usage: $0 [-x] OUT in1.asc [in2.asc [...]]\n";
-    print "       creates one big file\n";
-    print "usage: $0 [-x] IN.asc\n";
-    print "       creates a file called IN.asc.bin / .osm\n\n";
-    print "  -x   write in osm's xml format instead of navit's\n";
-    exit 0;
-}
-
-# generate the filename
-my $filename;
-if ($#ARGV == 0) {
-    print "one file: $ARGV[0]\n";
-    $filename = "$ARGV[0].bin";
-    $filename = "$ARGV[0].xml" if ($write_osm);
-} else {
-    $filename = $ARGV[0];
-    shift;
-    print "multiple inputfiles: " . join(' ', @ARGV) . "\n";
-}
-
-print "output: $filename\n";
-
-# open a file handle to store the osm data...
-my $pipe;
-if ($write_osm) {
-    open $pipe, ">$filename" or die $!;
-} else {
-# or a direct pipe to osm2navit
-    open $pipe, "| osm2navit $filename" or die $!;
-}
-
-
-# start generating the osm-code
-print $pipe '<?xml version="1.0" encoding="UTF-8"?>' . "\n";
-print $pipe '<osm version="0.5">' . "\n";
-
-my $i = 0;
-
-while (my $file = shift){
-    my $filehandle;
-    print "processing $file...\n";
-    open ($filehandle, "<$file") or die $!;
-    my $amenity = 'tec_common';
-    while (<$filehandle>) {
-        m/([0-9\.\-]*), ([0-9\.\-]*), "\[([0-9]*).*/ or next;
-        my ($lon, $lat, $id) = ($1, $2, $3);
-        print $pipe "    <node id=\"-$id\" visible=\"true\" lon=\"$lon\" lat=\"$lat\">\n";
-        print $pipe "        <tag k=\"name\" v=\"\" />\n";
-        print $pipe "        <tag k=\"amenity\" v=\"$amenity\" />\n";
-        print $pipe "    </node>\n";
-        $i++;
-    }
-}
-        
-print $pipe '</osm>';
-print "$i poi's processed\n";