*** empty log message ***

eserte · Jul 3, 2005 · 6bdd462 · 6bdd462
1 parent 0f594e0
commit 6bdd462
Show file tree

Hide file tree

Showing 62 changed files with 821 additions and 349 deletions.
diff --git a/BBBikeGlobalVars.pm b/BBBikeGlobalVars.pm
@@ -1,7 +1,7 @@
 # -*- perl -*-
 
 #
-# $Id: BBBikeGlobalVars.pm,v 1.28 2005/06/30 00:44:26 eserte Exp eserte $
+# $Id: BBBikeGlobalVars.pm,v 1.29 2005/07/02 22:36:23 eserte Exp $
 # Author: Slaven Rezic
 #
 # Copyright (C) 2003,2004 Slaven Rezic. All rights reserved.
@@ -15,7 +15,7 @@
 package BBBikeGlobalVars;
 
 use vars qw($VERSION);
-$VERSION = sprintf("%d.%03d", q$Revision: 1.28 $ =~ /(\d+)\.(\d+)/);
+$VERSION = sprintf("%d.%03d", q$Revision: 1.29 $ =~ /(\d+)\.(\d+)/);
 
 package main;
 

diff --git a/BBBikeMapserver.pm b/BBBikeMapserver.pm
@@ -2,7 +2,7 @@
 # -*- perl -*-
 
 #
-# $Id: BBBikeMapserver.pm,v 1.27 2005/06/03 23:26:34 eserte Exp $
+# $Id: BBBikeMapserver.pm,v 1.28 2005/07/01 20:25:00 eserte Exp $
 # Author: Slaven Rezic
 #
 # Copyright (C) 2002,2003,2005 Slaven Rezic. All rights reserved.
@@ -71,6 +71,16 @@ sub has_coords {
 	&& @{ $self->{MultiCoords}[0] };
 }
 
+sub get_first_coord {
+    my $self = shift;
+    $self->{MultiCoords}[0][0];
+}
+
+sub get_last_coord {
+    my $self = shift;
+    $self->{MultiCoords}[-1][-1];
+}
+
 sub has_more_than_one_coord {
     my $self = shift;
     return 0 if !$self->{MultiCoords} || !@{ $self->{MultiCoords} };
@@ -272,7 +282,7 @@ sub create_mapfile {
 	my $dist = 0;
 	if ($self->{MultiCoords}) {
 	    if (!$self->has_more_than_one_coord) {
-		print TMP1 "\tRoute " . $self->{MultiCoords}[0][0] . "\n";
+		print TMP1 "\tRoute " . $self->get_first_coord . "\n";
 	    } else {
 		for my $line (@{ $self->{MultiCoords} }) {
 		    my $old_dist = $dist;
@@ -313,14 +323,15 @@ sub create_mapfile {
 	    $self->{CenterTo} = $args{-start}
 		unless defined $self->{CenterTo};
 	} elsif ($self->has_more_than_one_coord) {
-	    my $start = $self->{MultiCoords}[0][0];
+	    my $start = $self->get_first_coord;
 	    @marker_args = (-start => $start,
-			    -goal  => $self->{MultiCoords}[-1][-1]);
+			    -goal  => $self->get_last_coord,
+			   );
 	    $self->{CenterTo} = $start
 		unless defined $self->{CenterTo};
 	} elsif ($self->has_coords) { # exactly one coordinate?
-	    @marker_args = (-markerpoint => $self->{MultiCoords}[-1][-1]);
-	    $self->{CenterTo} = $self->{MultiCoords}[0][0]
+	    @marker_args = (-markerpoint => $self->get_last_coord);
+	    $self->{CenterTo} = $self->get_first_coord
 		unless defined $self->{CenterTo};
 	}
 	if ($args{-markerpoint}) {
@@ -378,12 +389,12 @@ sub create_mapfile {
 sub get_extents {
     my($self, $width, $height, $do_center, %args) = @_;
     my $center_to = $self->{CenterTo};
-    if (!defined $center_to) {
+    if (!defined $center_to || $center_to eq "") {
 	if (!$self->has_coords) {
 	    # Default is Brandenburger Tor, do not hardcode XXX get from Geography object
 	    $center_to = ["8593,12243"];
 	} else {
-	    $center_to = $self->{MultiCoords}[0][0];
+	    $center_to = $self->get_first_coord;
 	}
     }
     my($x1,$y1) = split /,/, $center_to;

diff --git a/MANIFEST.addtocvs b/MANIFEST.addtocvs
@@ -320,3 +320,4 @@ HOWTO_edit_bbbike_data.html
 docbook.css
 Makefile.doc
 miscsrc/check_station_category
+miscsrc/bbd2polish
diff --git a/TODO.pod b/TODO.pod
@@ -14,6 +14,11 @@ Legend:
 
 =over
 
+=item * (M4)
+
+Implement minimal scrolling: if scrolling to a point of a polyline,
+then choose the nearest one!
+
 =item * (M3)
 
 Tk::Getopt addition: for some changes a post dialog should be shown,
@@ -814,6 +819,9 @@ steht.)
 
 Teile nach BBBikeGPS etc. auslagern => schon gemacht, noch mehr?
 
+=item cgpsmapper f�r die Konvertierung der BBBike-Daten nach
+Garmin-Karten verwenden. Siehe auch: http://gps.chrisb.org/en/qstart.htm
+
 =item VernE<uuml>nftige Koordinaten verwenden
 
 Wahrscheinlich ist GKK (fE<uuml>r Deutschland) die beste Wahl.

diff --git a/bbbike b/bbbike
@@ -2,7 +2,7 @@
 # -*- perl -*-
 
 #
-# $Id: bbbike,v 3.175 2005/06/30 00:43:20 eserte Exp eserte $
+# $Id: bbbike,v 3.176 2005/07/02 22:33:34 eserte Exp $
 # Author: Slaven Rezic
 #
 # Copyright (c) 1995-2005 Slaven Rezic. All rights reserved.
@@ -186,7 +186,7 @@ $^W = 1;
 # $VERSION is the version of the BBBike distribution
 # $PROG_REVISION is the version of the main program
 $VERSION = $BBBike::VERSION;
-$PROG_REVISION = sprintf("%d.%03d", q$Revision: 3.175 $ =~ /(\d+)\.(\d+)/);
+$PROG_REVISION = sprintf("%d.%03d", q$Revision: 3.176 $ =~ /(\d+)\.(\d+)/);
 # since version 3.40 => 3.040
 
 # OS related

diff --git a/cgi/bbbike.cgi b/cgi/bbbike.cgi
@@ -5,7 +5,7 @@
 # -*- perl -*-
 
 #
-# $Id: bbbike.cgi,v 7.29 2005/06/15 19:40:01 eserte Exp $
+# $Id: bbbike.cgi,v 7.30 2005/07/02 14:47:05 eserte Exp $
 # Author: Slaven Rezic
 #
 # Copyright (C) 1998-2005 Slaven Rezic. All rights reserved.
@@ -665,7 +665,7 @@ sub my_exit {
     exit @_;
 }
 
-$VERSION = sprintf("%d.%02d", q$Revision: 7.29 $ =~ /(\d+)\.(\d+)/);
+$VERSION = sprintf("%d.%02d", q$Revision: 7.30 $ =~ /(\d+)\.(\d+)/);
 
 use vars qw($font $delim);
 $font = 'sans-serif,helvetica,verdana,arial'; # also set in bbbike.css
@@ -2303,13 +2303,20 @@ sub get_cookie {
 
 sub set_cookie {
     my($href) = @_;
-    $q->cookie
-	(-name => $cookiename,
-	 -value => $href,
-	 -expires => '+1y',
-# XXX dirname okay with backward compatibility?
-	 -path => dirname($q->url(-absolute => 1)),
-	);
+    # Create a dirname and a non-dirname cookie (both for backward compat):
+    [$q->cookie
+     (-name => "$cookiename-dir",
+      -value => $href,
+      -expires => '+1y',
+      -path => dirname($q->url(-absolute => 1)),
+     ),
+     $q->cookie
+     (-name => $cookiename,
+      -value => $href,
+      -expires => '+1y',
+      -path => $q->url(-absolute => 1),
+     ),
+    ];
 }
 
 use vars qw($default_speed $default_cat $default_quality
@@ -5607,7 +5614,7 @@ EOF
         $os = "\U$Config::Config{'osname'} $Config::Config{'osvers'}\E";
     }
 
-    my $cgi_date = '$Date: 2005/06/15 19:40:01 $';
+    my $cgi_date = '$Date: 2005/07/02 14:47:05 $';
     ($cgi_date) = $cgi_date =~ m{(\d{4}/\d{2}/\d{2})};
     my $data_date;
     for (@Strassen::datadirs) {

diff --git a/data/Makefile b/data/Makefile
@@ -1,5 +1,5 @@
 #
-# $Id: Makefile,v 2.51 2005/07/01 00:59:30 eserte Exp $
+# $Id: Makefile,v 2.52 2005/07/02 22:29:17 eserte Exp $
 #
 # This Makefile is only usable with a modern version of BSD make (also known
 # as "pmake"). The source for pmake can be found at
@@ -576,6 +576,13 @@ temp_blockings/bbbike-temp-blockings-optimized.pl:	temp_blockings/bbbike-temp-bl
 	touch .check_bbbike-temp-blockings-optimized
 	-@$(READONLY) $@
 
+# XXX Optimierungsmöglichkeit: aus "fragezeichen" alle Strecken herausnehmen, die bereits auf Strecken in strassen+landstrassen matchen
+# XXX vielleicht umbenennen: fragezeichen-approx-matches.bbd oder so
+${PERSISTENTTMPDIR}/fragezeichen-matches.bbd:	fragezeichen ${DATADIR}/strassen ${DATADIR}/landstrassen ${DATADIR}/landstrassen2
+	$(MISCRSRCDIR)/match_bbd_data -incatrx . -v fragezeichen ${DATADIR}/strassen ${DATADIR}/landstrassen ${DATADIR}/landstrassen2 > /tmp/fragezeichen-matches.bbd
+	mv /tmp/fragezeichen-matches.bbd ${PERSISTENTTMPDIR}/fragezeichen-matches.bbd
+
+
 .OPTIONAL: .check_bbbike-temp-blockings-optimized
 
 # It is legal for fragezeichen points to not be on strassen, so this is
@@ -863,8 +870,10 @@ sort-coords.data:	sort-Berlin.coords.data sort-Potsdam.coords.data
 
 .for city in Berlin Potsdam
 sort-$(city).coords.data:
+	-@$(WRITEABLE) $(city).coords.data~
 	mv $(city).coords.data $(city).coords.data~
 	env LC_ALL=de_DE.ISO_8859-1 sort ${COORDS_DATA_SORT_OPTS} < $(city).coords.data~ > $(city).coords.data
+	@$(READABLE) $(city).coords.data
 	touch .check_$(city)_coords_data
 .endfor
 

diff --git a/data/ampeln b/data/ampeln
@@ -388,7 +388,7 @@
 	X 13761,7328
 	X 14004,7642
 	X 14606,7251
-	X 13459,8072
+	X 13474,8060
 	X 13107,8343
 	X 15758,6204
 	X 16143,6750
@@ -924,8 +924,7 @@ Wirklich?	? -3755,17090
 	X 12008,20368
 	X 11907,19749
 	X 8540,12420
-	X 7941,12902
-	X 7814,13284
+	X 7862,12917
 	X 7126,12721
 	X 16415,11926
 	X 6786,13106

diff --git a/data/ampeln-orig b/data/ampeln-orig
@@ -1,4 +1,4 @@
-# $Id: ampeln-orig,v 4.10 2005/06/30 00:00:59 eserte Exp eserte $
+# $Id: ampeln-orig,v 4.11 2005/07/02 22:32:39 eserte Exp eserte $
 	X 9222,8787
 	X 8982,8781
 	X 8594,8773
@@ -389,7 +389,7 @@
 	X 13761,7328
 	X 14004,7642
 	X 14606,7251
-	X 13459,8072
+	X 13474,8060
 	X 13107,8343
 	X 15758,6204
 	X 16143,6750
@@ -925,8 +925,9 @@ Wirklich?	? -3755,17090
 	X 12008,20368
 	X 11907,19749
 	X 8540,12420
-	X 7941,12902
-	X 7814,13284
+	X 7862,12917
+#: XXX laut Luftbild wahrscheinlich keine Ampel mehr:
+#	X 7814,13284
 	X 7126,12721
 	X 16415,11926
 	X 6786,13106

diff --git a/data/brunnels b/data/brunnels
@@ -49,7 +49,7 @@ Komturbr
 Mussehlbr�cke	Br 11129,5798 11190,5856
 Wilhelm-Borgmann-Br�cke	Br 12052,5710 12107,5651
 Britzer Br�cke	Br 12718,5845 12699,5909
-Rungiusbr�cke	Br 13065,5969 13077,5905
+Rungiusbr�cke	Br 13064,5953 13077,5893
 Buschkrugbr�cke	Br 13428,6095 13483,5973
 Britzer Hafensteg	Br 13935,6194 13968,6206
 Grenzalleebr�cke	Br 13785,6675 13930,6686

diff --git a/data/brunnels-orig b/data/brunnels-orig
@@ -51,7 +51,7 @@ Komturbr
 Mussehlbr�cke	Br 11129,5798 11190,5856
 Wilhelm-Borgmann-Br�cke	Br 12052,5710 12107,5651
 Britzer Br�cke	Br 12718,5845 12699,5909
-Rungiusbr�cke	Br 13065,5969 13077,5905
+Rungiusbr�cke	Br 13064,5953 13077,5893
 Buschkrugbr�cke	Br 13428,6095 13483,5973
 Britzer Hafensteg	Br 13935,6194 13968,6206
 Grenzalleebr�cke	Br 13785,6675 13930,6686

diff --git a/data/comments_kfzverkehr b/data/comments_kfzverkehr
@@ -88,7 +88,7 @@ Cremzow - Baumgarten: so gut wie kein Kfz-Verkehr	-2 51178,106442 50981,106368 5
 Simon-Bolivar-Str.: relativ stark befahren	+1 15763,15003 16025,14753 16128,14685 16284,14601
 Bizetstr.: relativer starker Verkehr	+1 13423,15702 13470,15762 14063,15976 14296,16065 14550,16161
 Seecktstr.: kein Durchgangsverkehr	-1 -4259,13267 -3998,13138
-Rungiusstr.: sehr wenig Verkehr	-1 13158,5490 13116,5689 13077,5905 13065,5969 13027,6168 12997,6290 12981,6371 12962,6433
+Rungiusstr.: sehr wenig Verkehr	-1 13158,5490 13116,5689 13077,5893 13064,5953 13027,6168 12997,6290 12981,6371 12966,6424
 Eiskeller - Sch�nwalder Allee: eingeschr�nkter Autoverkehr	-1 -6791,20816 -7102,20371 -7586,20088 -7598,19871 -8028,19646 -7991,19503 -8022,19052
 Krampnitzer Weg: manchmal etwas mehr Verkehr	+1 -9005,4933 -8638,4874 -8290,4853 -8098,4842 -7498,4786
 Lansstr.: wenig Autoverkehr	-1 3054,5677 2953,5606 2785,5482

diff --git a/data/comments_kfzverkehr-orig b/data/comments_kfzverkehr-orig
@@ -94,7 +94,7 @@ Bizetstr.: relativer starker Verkehr	+1 13423,15702 13470,15762 14063,15976 1429
 #: by: juergen V. Leitner:
 Seecktstr.: kein Durchgangsverkehr	-1 -4259,13267 -3998,13138
 #: by: Joachim Westphal:
-Rungiusstr.: sehr wenig Verkehr	-1 13158,5490 13116,5689 13077,5905 13065,5969 13027,6168 12997,6290 12981,6371 12962,6433
+Rungiusstr.: sehr wenig Verkehr	-1 13158,5490 13116,5689 13077,5893 13064,5953 13027,6168 12997,6290 12981,6371 12966,6424
 #: by: Andreas M�hlhausen: vvv
 Eiskeller - Sch�nwalder Allee: eingeschr�nkter Autoverkehr	-1 -6791,20816 -7102,20371 -7586,20088 -7598,19871 -8028,19646 -7991,19503 -8022,19052
 Krampnitzer Weg: manchmal etwas mehr Verkehr	+1 -9005,4933 -8638,4874 -8290,4853 -8098,4842 -7498,4786

diff --git a/data/comments_misc b/data/comments_misc
@@ -62,3 +62,4 @@ Kreisverkehr	CP 60197,12001
 Kreisverkehr	CP 61156,11478
 Kreisverkehr	CP 33787,7828
 Kreisverkehr	CP 30290,8562
+Beim �berqueren der Blaschkoallee m�ssen Bordsteine �berwunden werden	CP 13162,5382 13112,5253 13039,5122
diff --git a/data/comments_misc-orig b/data/comments_misc-orig
@@ -65,3 +65,4 @@ Kreisverkehr	CP 60197,12001
 Kreisverkehr	CP 61156,11478
 Kreisverkehr	CP 33787,7828
 Kreisverkehr	CP 30290,8562
+Beim �berqueren der Blaschkoallee m�ssen Bordsteine �berwunden werden	CP 13162,5382 13112,5253 13039,5122
diff --git a/data/comments_mount b/data/comments_mount
@@ -62,8 +62,8 @@ Steigung	St; 35134,4500 35175,4637 35125,4840
 Gef�lle	Gf; 35125,4840 35175,4637 35134,4500
 Steigung	St; 44158,21724 44471,21631
 Gef�lle	Gf; 44471,21631 44158,21724
-Steigung (vom Straussee aus)	St; 43406,21325 43584,20871
-Gef�lle (vom Straussee aus)	Gf; 43584,20871 43406,21325
+Steigung (vom Straussee aus)	St; 43406,21325 43498,21028 43584,20871
+Gef�lle (vom Straussee aus)	Gf; 43584,20871 43498,21028 43406,21325
 Steigung (vom Straussee aus)	St; 43345,21745 43109,21939
 Gef�lle (vom Straussee aus)	Gf; 43109,21939 43345,21745
 Steigung (Gamengrund)	St; 39372,22521 39578,22450

diff --git a/data/comments_mount-orig b/data/comments_mount-orig
@@ -35,7 +35,7 @@ Steigung	St; 36850,7443 37078,7418 37315,7487 37459,7468
 Steigung	St; 35134,4500 35218,4409
 Steigung	St; 35134,4500 35175,4637 35125,4840
 Steigung	St; 44158,21724 44471,21631
-Steigung (vom Straussee aus)	St; 43406,21325 43584,20871
+Steigung (vom Straussee aus)	St; 43406,21325 43498,21028 43584,20871
 Steigung (vom Straussee aus)	St; 43345,21745 43109,21939
 Steigung (Gamengrund)	St; 39372,22521 39578,22450
 Steigung (Gamengrund)	St; 39372,22521 39307,22734

diff --git a/data/comments_path b/data/comments_path
@@ -12,7 +12,7 @@ Fu
 Stra�enseite bei der Fu�g�ngerampel Yorckstr./Katzbachstr. wechseln	PI; 8773,9524 8648,9526 8595,9495
 von der Brandenburgischen in die Paderborner: fr�hzeitig auf den linken Gehweg wechseln	PI; 3930,9919 3906,10035 3720,9996
 nach links zum Bahndamm abbiegen: bis zur Kreuzung Gregoroviusweg vorfahren	PI; 18690,10016 18698,9996 19675,10410
-Treptower Str./Sonnenallee: Ampel an der Hertzbergstr. benutzen	CP 13510,8138 13459,8072 13359,7949
+Treptower Str./Sonnenallee: Ampel an der Hertzbergstr. benutzen	CP 13510,8138 13478,8095 13459,8072 13359,7949
 zur Prenzlauer Promenade: Stra�enseite wechseln	PI; 11907,19838 11907,19749 11933,19590
 zur Pasewalker Stra�e: Stra�enseite wechseln	PI; 11950,18529 11934,18576
 Abbiegender Waldweg ist nicht ausgeschildert	CP; 21576,6644 20858,7143 20887,7267

diff --git a/data/comments_path-orig b/data/comments_path-orig
@@ -1,4 +1,4 @@
-# $Id: comments_path-orig,v 4.19 2005/06/30 00:44:51 eserte Exp $
+# $Id: comments_path-orig,v 4.19 2005/06/30 00:44:51 eserte Exp eserte $
 # CP;  : Kommentar an Punkt B bei Fahrt von A nach C
 # CP   : wie "CP;", Kommentar g�ltig f�r beide Fahrtrichtungen
 # CP2; : Kommentar an Punkt A bei Fahrt von A nach B
@@ -28,7 +28,7 @@ von der Brandenburgischen in die Paderborner: fr
 #: add_fragezeichen: das hier wird wegfallen, falls es eine andere Verbindung zwischen Gregoroviusweg und Bahndamm gibt
 nach links zum Bahndamm abbiegen: bis zur Kreuzung Gregoroviusweg vorfahren	PI; 18690,10016 18698,9996 19675,10410
 #XXX del: lohnt sich nicht, wegen Einbahnstr. in der Ontarioseestr.: Treskowallee - Ontarioseestr: an der Kreuzung Gregoroviusweg auf den linken Gehweg wechseln	PI; 18737,9901 18698,9996 18690,10016 18577,10023
-Treptower Str./Sonnenallee: Ampel an der Hertzbergstr. benutzen	CP 13510,8138 13459,8072 13359,7949
+Treptower Str./Sonnenallee: Ampel an der Hertzbergstr. benutzen	CP 13510,8138 13478,8095 13459,8072 13359,7949
 zur Prenzlauer Promenade: Stra�enseite wechseln	PI; 11907,19838 11907,19749 11933,19590
 zur Pasewalker Stra�e: Stra�enseite wechseln	PI; 11950,18529 11934,18576
 Abbiegender Waldweg ist nicht ausgeschildert	CP; 21576,6644 20858,7143 20887,7267

diff --git a/data/flaechen-orig b/data/flaechen-orig
@@ -1,4 +1,4 @@
-# $Id: flaechen-orig,v 4.13 2005/06/29 23:58:50 eserte Exp eserte $
+# $Id: flaechen-orig,v 4.14 2005/07/02 22:36:41 eserte Exp $
 # Koordinaten von sonstigen Fl�chen (berlinmap)
 Viktoriapark	F:P 8598,9061 8678,9066 8685,8997 8725,8959 8734,8790 8787,8796 8784,8965 8876,8984 8875,9055 8951,9042 9032,9036 9121,9067 9145,9145 9073,9173 9070,9215 9125,9273 9056,9286 9044,9264 9024,9271 9015,9323 8598,9264
 Hasenheide	F:P 10901,8849 10995,8878 11065,8956 11049,9118 10719,9180 10716,9197 10962,9153 10970,9144 11100,9119 11096,9189 11212,9168 11208,9114 11430,9070 11429,9135 11623,9104 11610,8906 11594,8874 11601,8667 11577,8644 11587,8516 11627,8485 11632,8302 11416,8283 10859,8476