[mapserver-users] How to project a shapefile ?

Fri Oct 4 01:24:38 PDT 2002

Thank you Anwar for your help
but I don't use Win2000. A s I said in my first post, I use Linux Suse 7.2.
There is no dll with this OS. When I want to use php_mapscript, I must use
at the beginning of the file : dl ('php_mapscript.so'). this the same stuff as the dll
you use except that dll can't be use with Linux

Thank you one more time for your help

Stephane

Hi,
    I a using win 2000, php4.06, mapserver 3.6, apache and php mapscript
4.06 dlls.  I dwonloaded all these from  mapservers website. You can check
you have the exact php_pmapscript.dll in your system. This is different to
the mapserver executable. 

Good luck.

Anwar

-----Original Message-----
From: MOREL Stephane [mailto:stephane.morel at vanoise.com]
Sent: Thursday, October 03, 2002 4:55 AM
To: 'Shaik Anwar Hussain'; 'mapserver-users at lists.gis.umn.edu'
Subject: RE: [mapserver-users] How to project a shapefile ?

Hi Thank for your help
but it still doesn't work
I have this error message :
Fatal error: MapServer Error in msProcessProjection(): projection not named 
in .../../my php files
I saw you load a dll called php_proj.dll. I don't if we need to do the same 
with Linux with something like dl('php_proj.so')
Here is my code
.....
$oLine->addXY($xmin, $ymin);
$oldproj = ms_newprojectionobj("proj=latlong");
$newproj = ms_newprojectionobj("<27585>proj=lcc a=6378249.2 b=6356515.0 
lat_0=46d48'0.0''N lon_0=2d20'14.025''E lat_1=45d53'56.108''N 
lat_2=47d41'45.652''N x_0=600000.0 y_0=2200000.0 towgs84=-168,-60,+320 
units=m no_defs");
$oLine = $oLine->project($oldproj,$newproj);
$oShp->add( $oLine );
...

if I omit <27585> in the $newproj variable, I get another error message :
Fatal error: MapServer Error in msProcessProjection(): unknown projection 
id in

Stephane MOREL
GIS manager
www.vanoise.com

Hi

   This script creates shape file and reproject in to polyconic. U want to
chane in French projection, change the values in $proj2 variable.

Let me know if u have any quetions.

Good luck,

Anwar
www.atsincorp.com

<?php

dl("php_mapscript.dll");
dl("php_dbase.dll");
dl("php_proj.dll");

function convert($n)
{
   $t = explode(' ',$n);

   $d  = trim($t[0]);
   $m  = trim($t[1]);
   $ds = trim($t[2]);

   $dnum  = (int) $d;
   $mnum  = (int) $m;
   $dsnum = (int) $ds;

   $dd = $dnum + ($mnum / 60) + ($dsnum / 3600);
   if ($dnum > 43)
   { $dd = 0 - $dd; }

   //echo $dnum,"  ,  ",$mnum,"  ,  ",$dsnum,"<BR>";
   return $dd;

}

# End of the function

# Function to generate SHAPE Files

function createShape( $x1, $y1, $a1, $b1, $scale, $programId, $pname )
{
    GLOBAL $shpFile,$dbfFile,$proj1,$proj2;

    $x = convert($x1);
    $y = convert($y1);
    $a = convert($a1);
    $b = convert($b1);

    $oShp = ms_newShapeObj(MS_SHP_POLYGON);
    $oLine = ms_newLineObj();

    $opoint = ms_newPointObj();
    $opoint->setXY($x , $y );

    $opoint1 = ms_newPointObj();
    $opoint1->setXY($a , $b );

    $mmwidth = $scale * 228;
    $mwidth = $mmwidth / 1000;
    $swidth = $mwidth / 23.4;
    $dwidth = $swidth / 3600;

    $endx = $x ;
    $endy = $y ;
    $startx = $a ;
    $starty = $b ;

    $indy = $endy - $starty;
    $indx = $endx - $startx;
    echo $indx,' , ', $indy,'  , ';

    if ($indy == 0)
	{
	    $dy = ($dwidth / 2);
		$p1 = ms_newPointObj();
		$p1->setXY( $endx, $endy+$dy );
		$p1=$p1->project($proj1, $proj2);
		$oLine->add($p1);

		$p2 = ms_newPointObj();
		$p2->setXY( $endx, $endy-$dy );
		$p2=$p2->project($proj1, $proj2);
		$oLine->add($p2);

		$p3 = ms_newPointObj();
		$p3->setXY( $startx, $starty-$dy );
		$p3=$p3->project($proj1, $proj2);
		$oLine->add($p3);

		$p4 = ms_newPointObj();
		$p4->setXY( $startx, $starty+$dy );
		$p4=$p4->project($proj1, $proj2);
		$oLine->add($p4);

		$p1 = ms_newPointObj();
		$p1->setXY( $endx, $endy+$dy );
		$p1=$p1->project($proj1, $proj2);
		$oLine->add($p1);
	}

    elseif ($indx == 0)
    {
 		 $dx = ($dwidth / 2);
		 $p1 = ms_newPointObj();
		 $p1->setXY( $endx-$dx, $endy );
		 $p1=$p1->project($proj1, $proj2);
		 $oLine->add($p1);

		 $p2 = ms_newPointObj();
		 $p2->setXY( $endx+$dx, $endy );
		 $p2=$p2->project($proj1, $proj2);
		 $oLine->add($p2);

		 $p3 = ms_newPointObj();
		 $p3->setXY( $startx+$dx, $starty );
		 $p3=$p3->project($proj1, $proj2);
		 $oLine->add($p3);

		 $p4 = ms_newPointObj();
		 $p4->setXY( $startx-$dx, $starty );
		 $p4=$p4->project($proj1, $proj2);
		 $oLine->add($p4);

		 $p1 = ms_newPointObj();
		 $p1->setXY( $endx-$dx, $endy );
		 $p1=$p1->project($proj1, $proj2);
		 $oLine->add($p1);

     }
    else
	{
		$inz = $opoint->distanceToPoint( $opoint1 );
		$dx = ($dwidth / 2) * ($indy / $inz);
		$dy = ($dwidth / 2) * ($indx / $inz);

		$p1 = ms_newPointObj();
		$p1->setXY( $endx-$dx, $endy+$dy );
		$p1=$p1->project($proj1, $proj2);
		$oLine->add($p1);

		$p2 = ms_newPointObj();
		$p2->setXY( $endx+$dx, $endy-$dy );
		$p2=$p2->project($proj1, $proj2);
		$oLine->add($p2);

		$p3 = ms_newPointObj();
		$p3->setXY( $startx+$dx, $starty-$dy );
		$p3=$p3->project($proj1, $proj2);
		$oLine->add($p3);

		$p4 = ms_newPointObj();
		$p4->setXY( $startx-$dx, $starty+$dy );
		$p4=$p4->project($proj1, $proj2);
		$oLine->add($p4);

		$p1 = ms_newPointObj();
		$p1->setXY( $endx-$dx, $endy+$dy );
		$p1=$p1->project($proj1, $proj2);
		$oLine->add($p1);
	}

    $oShp->add($oLine);

    $shpFile->addShape($oShp);
    dbase_add_record($dbfFile, array($programId, $pname ));

}

# End of Function generate SHAPE Files

$shpFname = 'E:\Program Files\Apache
Group\Apache\htdocs\php406\pams\flightline';
$shpFile = ms_newShapeFileObj( $shpFname, MS_SHP_POLYGON);
$dbfFile = dbase_create($shpFname.".dbf",
array(array("PROG_ID","N",5,0),array("PROJ_NAME","C",10)));

$proj1  = ms_newprojectionobj("proj=latlong,ellps=GRS80");
$proj2  =
ms_newprojectionobj("proj=poly,ellps=GRS80,lat_0=40.925n,lon_0=77.75w");

createShape( "-076 17 34","40 03 59","-076 18 34","40 04 59",3000, 1,
"PAMS");

echo "Shapes Created.<BR>";

$shpFile->free();
echo "Shape File ($shpFname) closed.<BR>";

dbase_close($dbfFile);
echo "Dbase file closed. <br>";

?>

-----Original Message-----
From: MOREL Stephane [mailto:stephane.morel at vanoise.com]
Sent: Wednesday, October 02, 2002 12:52 PM
To: 'mapserver-users at lists.gis.umn.edu'
Subject: [mapserver-users] How to project a shapefile ?

Hi list
I'm a newbie on Mapserver
I use Mapserver 3.6.1 / Suse 7.2
MapServer version 3.6.1 OUTPUT=PNG OUTPUT=JPEG OUTPUT=WBMP SUPPORTS=PROJ
SUPPORTS=TTF SUPPORTS=WMS_SERVER INPUT=TIFF INPUT=EPPL7 INPUT=JPEG
INPUT=OGR INPUT=GDAL INPUT=SHAPEFILE
I wrote a small php script to create a shapefile filled with datas
retrieved from a relational database.
Differents users can query the database and i would like to allow them to
cartography their results through Mapserver.
The datas in the database is in latlong projection and all the rest of my
geographic database are in Lambert II etendu which is a french projection.
I found in the archive a post from Claude Philipona about this french
projection parameters.
I've updated my epsg file with those parameters.
The script works perfectly but I still have shapefiles in latlon projection
how can I transform the created shapefile in the french projection ?
In fact I don't know how to use projectionobj with Mapscript

Any help will be appreciated

TIA

Stephane MOREL
GIS manager
www.vanoise.com