~ubuntu-branches/ubuntu/quantal/qgis/quantal

« back to all changes in this revision

Viewing changes to providers/grass/qgsgrassprovider.cpp

  • Committer: Bazaar Package Importer
  • Author(s): William Grant
  • Date: 2007-05-06 13:42:32 UTC
  • mfrom: (1.1.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20070506134232-pyli6t388w5asd8x
Tags: 0.8.0-3ubuntu1
* Merge from Debian unstable. Remaining Ubuntu changes:
  - debian/rules, debian/qgis.install, debian/qgis.dirs debian/qgis.desktop:
    Add and install .desktop.
* debian/qgis.desktop: Remove Applications category; it's not real.
* Modify Maintainer value to match Debian-Maintainer-Field Spec

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/***************************************************************************
2
 
    qgsgrassprovider.cpp -  Data provider for GRASS format
3
 
                             -------------------
4
 
    begin                : March, 2004
5
 
    copyright            : (C) 2004 by Gary E.Sherman, Radim Blazek
6
 
    email                : sherman@mrcc.com, blazek@itc.it
7
 
 ***************************************************************************/
8
 
/***************************************************************************
9
 
 *                                                                         *
10
 
 *   This program is free software; you can redistribute it and/or modify  *
11
 
 *   it under the terms of the GNU General Public License as published by  *
12
 
 *   the Free Software Foundation; either version 2 of the License, or     *
13
 
 *   (at your option) any later version.                                   *
14
 
 *                                                                         *
15
 
 ***************************************************************************/
16
 
#include <string.h>
17
 
#include <iostream>
18
 
#include <vector>
19
 
#include <cfloat>
20
 
 
21
 
#include <qpixmap.h>
22
 
#include <qiconset.h>
23
 
#include <qdir.h>
24
 
#include <qstring.h>
25
 
#include <qdatetime.h>
26
 
#include <qmessagebox.h>
27
 
 
28
 
#include "../../src/qgis.h"
29
 
#include "../../src/qgsdataprovider.h"
30
 
#include "../../src/qgsfeature.h"
31
 
#include "../../src/qgsfield.h"
32
 
#include "../../src/qgsrect.h"
33
 
#include "../../src/qgsfeatureattribute.h"
34
 
 
35
 
extern "C" {
36
 
#include <gprojects.h>
37
 
#include <gis.h>
38
 
#include <dbmi.h>
39
 
#include <Vect.h>
40
 
}
41
 
 
42
 
#include "qgsgrass.h"
43
 
#include "qgsgrassprovider.h"
44
 
 
45
 
std::vector<GLAYER> QgsGrassProvider::mLayers;
46
 
std::vector<GMAP> QgsGrassProvider::mMaps;
47
 
 
48
 
QgsGrassProvider::QgsGrassProvider(QString uri):mDataSourceUri(uri)
49
 
{
50
 
    #ifdef QGISDEBUG
51
 
    std::cerr << "QgsGrassProvider URI: " << uri << std::endl;
52
 
    #endif
53
 
 
54
 
    QTime time;
55
 
    time.start();
56
 
 
57
 
    mValid = false;
58
 
    
59
 
    // Parse URI 
60
 
    QDir dir ( uri );  // it is not a directory in fact
61
 
    uri = dir.path();  // no dupl '/'
62
 
 
63
 
    mLayer = dir.dirName();
64
 
    uri = uri.left( dir.path().findRev('/') );
65
 
    dir = QDir(uri);
66
 
    mMapName = dir.dirName();
67
 
    dir.cdUp(); 
68
 
    mMapset = dir.dirName();
69
 
    dir.cdUp(); 
70
 
    mLocation = dir.dirName();
71
 
    dir.cdUp(); 
72
 
    mGisdbase = dir.path();
73
 
    
74
 
    #ifdef QGISDEBUG
75
 
    std::cerr << "gisdbase: " << mGisdbase << std::endl;
76
 
    std::cerr << "location: " << mLocation << std::endl;
77
 
    std::cerr << "mapset: "   << mMapset << std::endl;
78
 
    std::cerr << "mapName: "  << mMapName << std::endl;
79
 
    std::cerr << "layer: "    << mLayer << std::endl;
80
 
    #endif
81
 
 
82
 
    /* Parse Layer, supported layers <field>_point, <field>_line, <field>_area
83
 
    *  Layer is opened even if it is empty (has no features) 
84
 
    */
85
 
    mLayerField = -1;       
86
 
    if ( mLayer.compare("boundary") == 0 ) { // currently not used
87
 
        mLayerType = BOUNDARY;
88
 
        mGrassType = GV_BOUNDARY;
89
 
    } else if ( mLayer.compare("centroid") == 0 ) { // currently not used
90
 
        mLayerType = CENTROID;
91
 
        mGrassType = GV_CENTROID;
92
 
    } else {
93
 
        // Get field number
94
 
        int pos = mLayer.find('_');
95
 
 
96
 
        if ( pos == -1 ) {
97
 
            std::cerr << "Invalid layer name, no underscore found: " << mLayer << std::endl;
98
 
            return;
99
 
        }
100
 
 
101
 
        mLayerField = mLayer.left(pos).toInt();
102
 
 
103
 
        QString ts = mLayer.right( mLayer.length() - pos - 1 );
104
 
        if ( ts.compare("point") == 0 ) {
105
 
            mLayerType = POINT;
106
 
            mGrassType = GV_POINT; // ?! centroids may be points
107
 
        } else if ( ts.compare("line") == 0 ) {
108
 
            mLayerType = LINE;
109
 
            mGrassType = GV_LINE | GV_BOUNDARY; 
110
 
        } else if ( ts.compare("polygon") == 0 ) {
111
 
            mLayerType = POLYGON;
112
 
            mGrassType = GV_AREA; 
113
 
        } else {
114
 
            std::cerr << "Invalid layer name, wrong type: " << ts << std::endl;
115
 
            return;
116
 
        }
117
 
    }
118
 
    #ifdef QGISDEBUG
119
 
    std::cerr << "mLayerField: " << mLayerField << std::endl;
120
 
    std::cerr << "mLayerType: " << mLayerType << std::endl;
121
 
    #endif
122
 
 
123
 
    if ( mLayerType == BOUNDARY || mLayerType == CENTROID ) {
124
 
        std::cerr << "Layer type not supported." << std::endl;
125
 
        return;
126
 
    }
127
 
 
128
 
    // Set QGIS type
129
 
    switch ( mLayerType ) {
130
 
        case POINT:
131
 
        case CENTROID:
132
 
            mQgisType = QGis::WKBPoint; 
133
 
            break;
134
 
        case LINE:
135
 
        case BOUNDARY:
136
 
            mQgisType = QGis::WKBLineString; 
137
 
            break;
138
 
        case POLYGON:
139
 
            mQgisType = QGis::WKBPolygon;
140
 
            break;
141
 
    }
142
 
 
143
 
    mLayerId = openLayer(mGisdbase, mLocation, mMapset, mMapName, mLayerField);
144
 
    if ( mLayerId < 0 ) {
145
 
        std::cerr << "Cannot open GRASS layer:" << uri << std::endl;
146
 
        return;
147
 
    }
148
 
    #ifdef QGISDEBUG
149
 
    std::cerr << "mLayerId: " << mLayerId << std::endl;
150
 
    #endif
151
 
 
152
 
    mMap = layerMap(mLayerId);
153
 
 
154
 
    // Getting the total number of features in the layer
155
 
    mNumberFeatures = 0;
156
 
    mCidxFieldIndex = -1;
157
 
    if ( mLayerField >= 0 ) {
158
 
        mCidxFieldIndex = Vect_cidx_get_field_index ( mMap, mLayerField);
159
 
        if ( mCidxFieldIndex >= 0 ) {
160
 
            mNumberFeatures = Vect_cidx_get_type_count ( mMap, mLayerField, mGrassType );
161
 
            mCidxFieldNumCats = Vect_cidx_get_num_cats_by_index ( mMap, mCidxFieldIndex );
162
 
        }
163
 
    } else {
164
 
        // TODO nofield layers
165
 
        mNumberFeatures = 0;
166
 
        mCidxFieldNumCats = 0;
167
 
    }
168
 
    mNextCidx = 0;
169
 
 
170
 
    #ifdef QGISDEBUG
171
 
    std::cerr << "mNumberFeatures = " << mNumberFeatures << " mCidxFieldIndex = " << mCidxFieldIndex
172
 
              << " mCidxFieldNumCats = " << mCidxFieldNumCats << std::endl;
173
 
    #endif
174
 
 
175
 
 
176
 
    // Create selection array
177
 
    mSelectionSize = allocateSelection ( mMap, &mSelection );
178
 
    resetSelection(1); // TODO ? - where what reset
179
 
 
180
 
    mMapVersion = mMaps[mLayers[mLayerId].mapId].version;
181
 
 
182
 
    // Init structures
183
 
    mPoints = Vect_new_line_struct ();
184
 
    mCats = Vect_new_cats_struct ();
185
 
    mList = Vect_new_list ();
186
 
 
187
 
    mValid = true;
188
 
 
189
 
    #ifdef QGISDEBUG
190
 
    std::cerr << "New GRASS layer opened, time (ms): " << time.elapsed() << std::endl;
191
 
    #endif
192
 
}
193
 
 
194
 
void QgsGrassProvider::update ( void )
195
 
{
196
 
    #ifdef QGISDEBUG
197
 
    std::cerr << "*** QgsGrassProvider::update ***" << std::endl;
198
 
    #endif
199
 
 
200
 
    mValid = false;
201
 
    // TODO check if reopened map is valid
202
 
 
203
 
    // Getting the total number of features in the layer
204
 
    // It may happen that the field disappeares from the map (deleted features, new map without that field)
205
 
    mNumberFeatures = 0;
206
 
    mCidxFieldIndex = -1;
207
 
    if ( mLayerField >= 0 ) {
208
 
        mCidxFieldIndex = Vect_cidx_get_field_index ( mMap, mLayerField);
209
 
        if ( mCidxFieldIndex >= 0 ) {
210
 
            mNumberFeatures = Vect_cidx_get_type_count ( mMap, mLayerField, mGrassType );
211
 
            mCidxFieldNumCats = Vect_cidx_get_num_cats_by_index ( mMap, mCidxFieldIndex );
212
 
        }
213
 
    } else {
214
 
        // TODO nofield layers
215
 
        mNumberFeatures = 0;
216
 
        mCidxFieldNumCats = 0;
217
 
    }
218
 
    mNextCidx = 0;
219
 
 
220
 
    #ifdef QGISDEBUG
221
 
    std::cerr << "mNumberFeatures = " << mNumberFeatures << " mCidxFieldIndex = " << mCidxFieldIndex
222
 
              << " mCidxFieldNumCats = " << mCidxFieldNumCats << std::endl;
223
 
    #endif
224
 
 
225
 
    // Create selection array
226
 
    if ( mSelection ) free ( mSelection );
227
 
    mSelectionSize = allocateSelection ( mMap, &mSelection );
228
 
    resetSelection(1); 
229
 
    
230
 
    mMapVersion = mMaps[mLayers[mLayerId].mapId].version;
231
 
 
232
 
    mValid = true;
233
 
}
234
 
 
235
 
int QgsGrassProvider::allocateSelection( struct Map_info *map, char **selection )
236
 
{
237
 
    int size;
238
 
    #ifdef QGISDEBUG
239
 
    std::cerr << "QgsGrassProvider::allocateSellection" << std::endl;
240
 
    #endif
241
 
    
242
 
    int nlines = Vect_get_num_lines ( map );
243
 
    int nareas = Vect_get_num_areas ( map );
244
 
    
245
 
    if ( nlines > nareas ) {
246
 
        size = nlines + 1;
247
 
    } else {
248
 
        size = nareas + 1;
249
 
    }
250
 
    #ifdef QGISDEBUG
251
 
    std::cerr << "nlines = " << nlines << " nareas = " << nareas << " size = " << size << std::endl;
252
 
    #endif
253
 
 
254
 
    *selection = (char *) malloc ( size );
255
 
 
256
 
    return size;
257
 
}
258
 
 
259
 
QgsGrassProvider::~QgsGrassProvider()
260
 
{
261
 
    #ifdef QGISDEBUG
262
 
    std::cerr << "QgsGrassProvider::~QgsGrassProvider()" << std::endl;
263
 
    #endif
264
 
    closeLayer ( mLayerId );
265
 
}
266
 
 
267
 
/**
268
 
* Get the first feature resutling from a select operation
269
 
* @return QgsFeature
270
 
*/
271
 
QgsFeature *QgsGrassProvider::getFirstFeature(bool fetchAttributes)
272
 
{
273
 
    #ifdef QGISDEBUG
274
 
    std::cout << "QgsGrassProvider::getFirstFeature()" << std::endl;
275
 
    #endif
276
 
 
277
 
    if ( isEdited() )
278
 
        return 0;
279
 
    
280
 
    if ( mCidxFieldIndex < 0 ) return 0; // No features, no features in this layer
281
 
 
282
 
    mNextCidx = 0;
283
 
        
284
 
    return ( getNextFeature(fetchAttributes) );
285
 
}
286
 
 
287
 
/**
288
 
* Get the next feature resulting from a select operation
289
 
* @return false if there are no features in the selection set
290
 
*/
291
 
bool QgsGrassProvider::getNextFeature(QgsFeature &feature, bool fetchAttributes)
292
 
{
293
 
    #if QGISDEBUG > 3
294
 
    std::cout << "QgsGrassProvider::getNextFeature()" << std::endl;
295
 
    #endif
296
 
 
297
 
    if ( isEdited() )
298
 
        return 0;
299
 
    
300
 
    if ( mCidxFieldIndex < 0 ) return 0; // No features, no features in this layer
301
 
 
302
 
    // TODO once clear how to do that 
303
 
    return false;
304
 
}
305
 
 
306
 
/**
307
 
* Get the next feature resulting from a select operation
308
 
* Return 0 if there are no features in the selection set
309
 
* @return QgsFeature
310
 
*/
311
 
QgsFeature *QgsGrassProvider::getNextFeature(bool fetchAttributes)
312
 
{
313
 
    #if QGISDEBUG > 3
314
 
    std::cout << "QgsGrassProvider::getNextFeature() mNextCidx = " << mNextCidx 
315
 
              << " fetchAttributes = " << fetchAttributes << std::endl;
316
 
    #endif
317
 
    
318
 
    if ( isEdited() )
319
 
        return 0;
320
 
 
321
 
    if ( mCidxFieldIndex < 0 ) return 0; // No features, no features in this layer
322
 
 
323
 
    std::list<int> attlist;
324
 
 
325
 
    if ( fetchAttributes ) {
326
 
        int fc = fieldCount();
327
 
        for ( int i = 0; i < fc; i++ ) {
328
 
            attlist.push_back(i);
329
 
        }
330
 
    }
331
 
 
332
 
    return ( getNextFeature(attlist) );
333
 
}
334
 
 
335
 
QgsFeature* QgsGrassProvider::getNextFeature(std::list<int> const& attlist)
336
 
{
337
 
    int cat, type, id, idx;
338
 
    unsigned char *wkb;
339
 
    int wkbsize;
340
 
 
341
 
    #if QGISDEBUG > 3
342
 
    std::cout << "QgsGrassProvider::getNextFeature( attlist )" << std::endl;
343
 
    #endif
344
 
 
345
 
    if ( isEdited() )
346
 
        return 0;
347
 
    
348
 
    if ( mCidxFieldIndex < 0 ) return 0; // No features, no features in this layer
349
 
    
350
 
    // Get next line/area id
351
 
    int found = 0;
352
 
    while ( mNextCidx < mCidxFieldNumCats ) {
353
 
        Vect_cidx_get_cat_by_index ( mMap, mCidxFieldIndex, mNextCidx++, &cat, &type, &id );
354
 
        // Warning: selection array is only of type line/area of current layer -> check type first
355
 
 
356
 
        if ( !(type & mGrassType) ) continue;
357
 
        if ( !mSelection[id] ) continue;
358
 
        found = 1;
359
 
        break;
360
 
    }
361
 
    if ( !found ) return 0; // No more features
362
 
    #if QGISDEBUG > 3
363
 
    std::cout << "cat = " << cat << " type = " << type << " id = " << id << std::endl;
364
 
    #endif
365
 
 
366
 
    QgsFeature *f = new QgsFeature(id);
367
 
 
368
 
    // TODO int may be 64 bits (memcpy)
369
 
    if ( type & (GV_POINTS | GV_LINES) ) { /* points or lines */
370
 
        Vect_read_line ( mMap, mPoints, mCats, id);
371
 
        int npoints = mPoints->n_points;
372
 
        
373
 
        if ( type & GV_POINTS ) {
374
 
            wkbsize = 1 + 4 + 2*8;
375
 
        } else { // GV_LINES
376
 
            wkbsize = 1+4+4+npoints*2*8;
377
 
        }           
378
 
        wkb = new unsigned char[wkbsize];
379
 
        unsigned char *wkbp = wkb;
380
 
        wkbp[0] = (unsigned char) endian();
381
 
        wkbp += 1;
382
 
 
383
 
        /* WKB type */
384
 
        memcpy (wkbp, &mQgisType, 4);
385
 
        wkbp += 4;
386
 
        
387
 
        /* number of points */
388
 
        if ( type & GV_LINES ) {
389
 
            memcpy (wkbp, &npoints, 4);
390
 
            wkbp += 4;
391
 
        }
392
 
        
393
 
        for ( int i = 0; i < npoints; i++ ) {
394
 
            memcpy (wkbp, &(mPoints->x[i]), 8);
395
 
            memcpy (wkbp+8, &(mPoints->y[i]), 8);
396
 
            wkbp += 16;
397
 
        }
398
 
    } else { // GV_AREA
399
 
        Vect_get_area_points ( mMap, id, mPoints );
400
 
        int npoints = mPoints->n_points;
401
 
 
402
 
        wkbsize = 1+4+4+4+npoints*2*8; // size without islands
403
 
        wkb = new unsigned char[wkbsize];
404
 
        wkb[0] = (unsigned char) endian();
405
 
        int offset = 1;
406
 
 
407
 
        /* WKB type */
408
 
        memcpy ( wkb+offset, &mQgisType, 4);
409
 
        offset += 4;
410
 
 
411
 
        /* Number of rings */
412
 
        int nisles = Vect_get_area_num_isles ( mMap, id );
413
 
        int nrings = 1 + nisles; 
414
 
        memcpy (wkb+offset, &nrings, 4);
415
 
        offset += 4;
416
 
 
417
 
        /* Outer ring */
418
 
        memcpy (wkb+offset, &npoints, 4);
419
 
        offset += 4;
420
 
        for ( int i = 0; i < npoints; i++ ) {
421
 
            memcpy (wkb+offset, &(mPoints->x[i]), 8);
422
 
            memcpy (wkb+offset+8, &(mPoints->y[i]), 8);
423
 
            offset += 16;
424
 
        }
425
 
        
426
 
        /* Isles */
427
 
        for ( int i = 0; i < nisles; i++ ) {
428
 
            Vect_get_isle_points ( mMap, Vect_get_area_isle (mMap, id, i), mPoints );
429
 
            npoints = mPoints->n_points;
430
 
            
431
 
            // add space
432
 
            wkbsize += 4+npoints*2*8;
433
 
            wkb = (unsigned char *) realloc (wkb, wkbsize);
434
 
 
435
 
            memcpy (wkb+offset, &npoints, 4);
436
 
            offset += 4;
437
 
            for ( int i = 0; i < npoints; i++ ) {
438
 
                memcpy (wkb+offset, &(mPoints->x[i]), 8);
439
 
                memcpy (wkb+offset+8, &(mPoints->y[i]), 8);
440
 
                offset += 16;
441
 
            }
442
 
        }
443
 
    }
444
 
 
445
 
    f->setGeometry(wkb, wkbsize);
446
 
 
447
 
    setFeatureAttributes( mLayerId, cat, f, attlist );  
448
 
    
449
 
    return f;
450
 
 
451
 
    return 0;//soon
452
 
}
453
 
 
454
 
void QgsGrassProvider::resetSelection( bool sel)
455
 
{
456
 
    #ifdef QGISDEBUG
457
 
    std::cout << "QgsGrassProvider::resetSelection()" << std::endl;
458
 
    #endif
459
 
    memset ( mSelection, (int) sel, mSelectionSize );
460
 
    mNextCidx = 0;
461
 
}
462
 
 
463
 
/**
464
 
* Select features based on a bounding rectangle. Features can be retrieved
465
 
* with calls to getFirstFeature and getNextFeature.
466
 
* @param mbr QgsRect containing the extent to use in selecting features
467
 
*/
468
 
void QgsGrassProvider::select(QgsRect *rect, bool useIntersect)
469
 
{
470
 
    #ifdef QGISDEBUG
471
 
    std::cout << "QgsGrassProvider::select() useIntersect = " << useIntersect << std::endl;
472
 
    #endif
473
 
 
474
 
    if ( isEdited() )
475
 
        return;
476
 
 
477
 
    // check if outdated and update if necessary
478
 
    int mapId = mLayers[mLayerId].mapId;
479
 
    if ( mapOutdated(mapId) ) {
480
 
        updateMap ( mapId );
481
 
    }
482
 
    if ( mMapVersion < mMaps[mapId].version ) {
483
 
        update();
484
 
    }
485
 
    if ( attributesOutdated(mapId) ) {
486
 
        loadAttributes (mLayers[mLayerId]);
487
 
    }
488
 
 
489
 
    resetSelection(0);
490
 
    
491
 
    if ( !useIntersect ) { // select by bounding boxes only
492
 
        BOUND_BOX box;
493
 
        box.N = rect->yMax(); box.S = rect->yMin(); 
494
 
        box.E = rect->xMax(); box.W = rect->xMin(); 
495
 
        box.T = PORT_DOUBLE_MAX; box.B = -PORT_DOUBLE_MAX; 
496
 
        if ( mLayerType == POINT || mLayerType == CENTROID || mLayerType == LINE || mLayerType == BOUNDARY ) {
497
 
            Vect_select_lines_by_box(mMap, &box, mGrassType, mList);
498
 
        } else if ( mLayerType == POLYGON ) {
499
 
            Vect_select_areas_by_box(mMap, &box, mList);
500
 
        }
501
 
 
502
 
    } else { // check intersection
503
 
        struct line_pnts *Polygon;
504
 
        
505
 
        Polygon = Vect_new_line_struct();
506
 
 
507
 
        Vect_append_point( Polygon, rect->xMin(), rect->yMin(), 0);
508
 
        Vect_append_point( Polygon, rect->xMax(), rect->yMin(), 0);
509
 
        Vect_append_point( Polygon, rect->xMax(), rect->yMax(), 0);
510
 
        Vect_append_point( Polygon, rect->xMin(), rect->yMax(), 0);
511
 
        Vect_append_point( Polygon, rect->xMin(), rect->yMin(), 0);
512
 
 
513
 
        if ( mLayerType == POINT || mLayerType == CENTROID || mLayerType == LINE || mLayerType == BOUNDARY ) {
514
 
            Vect_select_lines_by_polygon ( mMap, Polygon, 0, NULL, mGrassType, mList);
515
 
        } else if ( mLayerType == POLYGON ) {
516
 
            Vect_select_areas_by_polygon ( mMap, Polygon, 0, NULL, mList);
517
 
        }
518
 
 
519
 
        Vect_destroy_line_struct (Polygon);
520
 
    }
521
 
    for ( int i = 0; i < mList->n_values; i++ ) {
522
 
        if ( mList->value[i] <= mSelectionSize ) {
523
 
            mSelection[mList->value[i]] = 1;
524
 
        } else {
525
 
            std::cerr << "Selected element out of range" << std::endl;
526
 
        }
527
 
    }
528
 
        
529
 
    #ifdef QGISDEBUG
530
 
    std::cout << mList->n_values << " features selected" << std::endl;
531
 
    #endif
532
 
}
533
 
 
534
 
/**
535
 
* Set the data source specification. This may be a path or database
536
 
* connection string
537
 
* @uri data source specification
538
 
*/
539
 
void QgsGrassProvider::setDataSourceUri(QString uri)
540
 
{
541
 
        mDataSourceUri = uri;
542
 
}
543
 
 
544
 
/**
545
 
* Get the data source specification. This may be a path or database
546
 
* connection string
547
 
* @return data source specification
548
 
*/
549
 
QString QgsGrassProvider::getDataSourceUri()
550
 
{
551
 
        return mDataSourceUri;
552
 
}
553
 
 
554
 
/**
555
 
* Identify features within the search radius specified by rect
556
 
* @param rect Bounding rectangle of search radius
557
 
* @return std::vector containing QgsFeature objects that intersect rect
558
 
*/
559
 
std::vector<QgsFeature>& QgsGrassProvider::identify(QgsRect * rect)
560
 
{
561
 
    #ifdef QGISDEBUG
562
 
    std::cout << "QgsGrassProvider::identify()" << std::endl;
563
 
    #endif
564
 
 
565
 
    // TODO: does not return vector of features! Should it?
566
 
 
567
 
    if ( !isEdited() ) {
568
 
        select(rect, true);
569
 
    }
570
 
}
571
 
 
572
 
QgsRect *QgsGrassProvider::extent()
573
 
{
574
 
    BOUND_BOX box;
575
 
    Vect_get_map_box ( mMap, &box );
576
 
 
577
 
    return new QgsRect( box.W, box.S, box.E, box.N);
578
 
}
579
 
 
580
 
/** 
581
 
* Return the feature type
582
 
*/
583
 
int QgsGrassProvider::geometryType() const
584
 
{
585
 
    return mQgisType;
586
 
}
587
 
/** 
588
 
* Return the feature type
589
 
*/
590
 
long QgsGrassProvider::featureCount() const 
591
 
{
592
 
    return mNumberFeatures;
593
 
}
594
 
 
595
 
/**
596
 
* Return the number of fields
597
 
*/
598
 
int QgsGrassProvider::fieldCount() const
599
 
{
600
 
    #ifdef QGISDEBUG
601
 
    std::cerr << "QgsGrassProvider::fieldCount() return:" << mLayers[mLayerId].fields.size() << std::endl;
602
 
    #endif
603
 
    return mLayers[mLayerId].fields.size();
604
 
}
605
 
 
606
 
/**
607
 
* Return fields
608
 
*/
609
 
std::vector<QgsField> const & QgsGrassProvider::fields() const
610
 
{
611
 
      return mLayers[mLayerId].fields;
612
 
}
613
 
 
614
 
void QgsGrassProvider::reset()
615
 
{
616
 
    if ( isEdited() )
617
 
        return;
618
 
 
619
 
    int mapId = mLayers[mLayerId].mapId;
620
 
    if ( mapOutdated(mapId) ) {
621
 
        updateMap ( mapId );
622
 
    }
623
 
    if ( mMapVersion < mMaps[mapId].version ) {
624
 
        update();
625
 
    }
626
 
    if ( attributesOutdated(mapId) ) {
627
 
        loadAttributes (mLayers[mLayerId]);
628
 
    }
629
 
    
630
 
    resetSelection(1);
631
 
    mNextCidx = 0;
632
 
}
633
 
 
634
 
QString QgsGrassProvider::minValue(int position)
635
 
{
636
 
    if ( position >= fieldCount() ) {
637
 
        std::cerr << "Warning: access requested to invalid position in QgsGrassProvider::minValue()" 
638
 
                  << std::endl;
639
 
    }
640
 
    return QString::number( mLayers[mLayerId].minmax[position][0], 'f', 2 );
641
 
}
642
 
 
643
 
 
644
 
QString QgsGrassProvider::maxValue(int position)
645
 
{
646
 
    if ( position >= fieldCount() ) {
647
 
        std::cerr << "Warning: access requested to invalid position in QgsGrassProvider::maxValue()" 
648
 
                  << std::endl;
649
 
    }
650
 
    return QString::number( mLayers[mLayerId].minmax[position][1], 'f', 2 );
651
 
}
652
 
 
653
 
bool QgsGrassProvider::isValid(){
654
 
    #ifdef QGISDEBUG
655
 
    QString validString = mValid?"true":"false";
656
 
    std::cerr << "QgsGrassProvider::isValid() returned: " << validString << std::endl;
657
 
    #endif
658
 
    return mValid;
659
 
}
660
 
 
661
 
// ------------------------------------------------------------------------------------------------------
662
 
// Compare categories in GATT
663
 
static int cmpAtt ( const void *a, const void *b ) {
664
 
    GATT *p1 = (GATT *) a;
665
 
    GATT *p2 = (GATT *) b;
666
 
    return (p1->cat - p2->cat);
667
 
}
668
 
 
669
 
/* returns layerId or -1 on error */
670
 
int QgsGrassProvider::openLayer(QString gisdbase, QString location, QString mapset, QString mapName, int field)
671
 
{
672
 
    #ifdef QGISDEBUG
673
 
    std::cerr << "QgsGrassProvider::openLayer()" << std::endl;
674
 
    std::cerr << "gisdbase: " << gisdbase << std::endl;
675
 
    std::cerr << "location: " << location << std::endl;
676
 
    std::cerr << "mapset: "   << mapset << std::endl;
677
 
    std::cerr << "mapName: "  << mapName << std::endl;
678
 
    std::cerr << "field: "    << field << std::endl;
679
 
    #endif
680
 
 
681
 
    // Check if this layer is already opened
682
 
 
683
 
    for ( int i = 0; i <  mLayers.size(); i++) {
684
 
        if ( !(mLayers[i].valid) ) continue;
685
 
 
686
 
        GMAP *mp = &(mMaps[mLayers[i].mapId]);
687
 
 
688
 
        if ( mp->gisdbase == gisdbase && mp->location == location && 
689
 
             mp->mapset == mapset && mp->mapName == mapName && mLayers[i].field == field )
690
 
        {
691
 
            // the layer already exists, return layer id
692
 
            #ifdef QGISDEBUG
693
 
            std::cerr << "The layer is already opened with ID = " << i << std::endl;
694
 
            #endif
695
 
            mLayers[i].nUsers++;
696
 
            return i;
697
 
        }
698
 
    }
699
 
 
700
 
    // Create a new layer
701
 
    GLAYER layer;
702
 
    layer.valid = false;
703
 
    layer.field = field; 
704
 
    layer.nUsers = 1; 
705
 
 
706
 
    // Open map
707
 
    layer.mapId = openMap ( gisdbase, location, mapset, mapName );
708
 
    if ( layer.mapId < 0 ) {
709
 
        std::cerr << "Cannot open vector map" << std::endl;
710
 
        return -1;
711
 
    }
712
 
    #ifdef QGISDEBUG
713
 
    std::cerr << "layer.mapId = " << layer.mapId << std::endl;
714
 
    #endif
715
 
    layer.map = mMaps[layer.mapId].map;
716
 
 
717
 
    layer.attributes = 0; // because loadLayerSourcesFromMap will release old
718
 
    loadLayerSourcesFromMap ( layer );
719
 
 
720
 
    layer.valid = true;
721
 
 
722
 
    // Add new layer to layers
723
 
    mLayers.push_back(layer);
724
 
        
725
 
    #ifdef QGISDEBUG
726
 
    std::cerr << "New layer successfully opened" << layer.nAttributes << std::endl;
727
 
    #endif
728
 
        
729
 
    return mLayers.size() - 1; 
730
 
}
731
 
 
732
 
void QgsGrassProvider::loadLayerSourcesFromMap ( GLAYER &layer )
733
 
{
734
 
    #ifdef QGISDEBUG
735
 
    std::cerr << "QgsGrassProvider::loadLayerSourcesFromMap" << std::endl;
736
 
    #endif
737
 
 
738
 
    // Reset and free 
739
 
    layer.fields.clear();
740
 
    if ( layer.attributes ) { 
741
 
        for ( int i = 0; i < layer.nAttributes; i ++ ) {
742
 
            for ( int j = 0; j < layer.nColumns; j ++ ) {
743
 
                if ( layer.attributes[i].values[j] )
744
 
                    free ( layer.attributes[i].values[j] );
745
 
            }
746
 
            free ( layer.attributes[i].values );
747
 
        }
748
 
        free ( layer.attributes );
749
 
    }
750
 
    loadAttributes ( layer );
751
 
}
752
 
    
753
 
void QgsGrassProvider::loadAttributes ( GLAYER &layer )
754
 
{
755
 
    #ifdef QGISDEBUG
756
 
    std::cerr << "QgsGrassProvider::loadLayerSourcesFromMap" << std::endl;
757
 
    #endif
758
 
 
759
 
    // Get field info
760
 
    layer.fieldInfo = Vect_get_field( layer.map, layer.field); // should work also with field = 0
761
 
 
762
 
    // Read attributes
763
 
    layer.nColumns = 0;
764
 
    layer.nAttributes = 0;
765
 
    layer.attributes = 0;
766
 
    layer.fields.clear();
767
 
    layer.keyColumn = -1;
768
 
    if ( layer.fieldInfo == NULL ) {
769
 
        #ifdef QGISDEBUG
770
 
        std::cerr << "No field info -> no attribute table" << std::endl;
771
 
        #endif
772
 
    } else { 
773
 
        #ifdef QGISDEBUG
774
 
        std::cerr << "Field info found -> open database" << std::endl;
775
 
        #endif
776
 
        dbDriver *databaseDriver = db_start_driver_open_database ( layer.fieldInfo->driver, 
777
 
                                                                   layer.fieldInfo->database );
778
 
 
779
 
        if ( databaseDriver == NULL ) {
780
 
            std::cerr << "Cannot open database " << layer.fieldInfo->database << " by driver " 
781
 
                      << layer.fieldInfo->driver << std::endl;
782
 
        } else {
783
 
            #ifdef QGISDEBUG
784
 
            std::cerr << "Database opened -> open select cursor" << std::endl;
785
 
            #endif
786
 
            dbString dbstr; 
787
 
            db_init_string (&dbstr);
788
 
            db_set_string (&dbstr, "select * from ");
789
 
            db_append_string (&dbstr, layer.fieldInfo->table);
790
 
            
791
 
            #ifdef QGISDEBUG
792
 
            std::cerr << "SQL: " << db_get_string(&dbstr) << std::endl;
793
 
            #endif
794
 
            dbCursor databaseCursor;
795
 
            if ( db_open_select_cursor(databaseDriver, &dbstr, &databaseCursor, DB_SCROLL) != DB_OK ){
796
 
                layer.nColumns = 0;
797
 
                db_close_database_shutdown_driver ( databaseDriver );
798
 
                QMessageBox::warning( 0, "Warning", "Cannot select attributes from table '" + 
799
 
                                 QString(layer.fieldInfo->table) + "'" );
800
 
            } else {
801
 
                int nRecords = db_get_num_rows ( &databaseCursor );
802
 
                #ifdef QGISDEBUG
803
 
                std::cerr << "Number of records: " << nRecords << std::endl;
804
 
                #endif
805
 
                
806
 
                dbTable  *databaseTable = db_get_cursor_table (&databaseCursor);
807
 
                layer.nColumns = db_get_table_number_of_columns(databaseTable);
808
 
 
809
 
                layer.minmax = new double[layer.nColumns][2];
810
 
 
811
 
                // Read columns' description 
812
 
                for (int i = 0; i < layer.nColumns; i++) {
813
 
                    layer.minmax[i][0] = DBL_MAX;
814
 
                    layer.minmax[i][1] = -DBL_MAX;
815
 
 
816
 
                    dbColumn *column = db_get_table_column (databaseTable, i);
817
 
 
818
 
                    int ctype = db_sqltype_to_Ctype ( db_get_column_sqltype(column) );
819
 
                    #ifdef QGISDEBUG
820
 
                    std::cerr << "column = " << db_get_column_name(column) 
821
 
                              << " ctype = " << ctype << std::endl;
822
 
                    #endif
823
 
                    
824
 
                    QString ctypeStr;
825
 
                    switch ( ctype ) {
826
 
                        case DB_C_TYPE_INT:
827
 
                            ctypeStr = "integer";
828
 
                            break; 
829
 
                        case DB_C_TYPE_DOUBLE:
830
 
                            ctypeStr = "double";
831
 
                            break; 
832
 
                        case DB_C_TYPE_STRING:
833
 
                            ctypeStr = "string";
834
 
                            break; 
835
 
                        case DB_C_TYPE_DATETIME:
836
 
                            ctypeStr = "datetime";
837
 
                            break; 
838
 
                    }
839
 
                    layer.fields.push_back ( QgsField( db_get_column_name(column), ctypeStr, 
840
 
                                     db_get_column_length(column), db_get_column_precision(column) ) );
841
 
                    
842
 
                    if ( G_strcasecmp ( db_get_column_name(column), layer.fieldInfo->key) == 0 ) {
843
 
                        layer.keyColumn = i;
844
 
                    }
845
 
                }
846
 
    
847
 
                if ( layer.keyColumn < 0 ) {
848
 
                    layer.fields.clear();
849
 
                    layer.nColumns = 0;
850
 
 
851
 
                    QMessageBox::warning( 0, "Warning", "Key column '" + QString(layer.fieldInfo->key) + 
852
 
                                 "' not found in the table '" + QString(layer.fieldInfo->table) + "'" );
853
 
                } else {
854
 
                    // Read attributes to the memory
855
 
                    layer.attributes = (GATT *) malloc ( nRecords * sizeof(GATT) );
856
 
                    while ( 1 ) {
857
 
                        int more;
858
 
                                
859
 
                        if ( db_fetch (&databaseCursor, DB_NEXT, &more) != DB_OK ) {
860
 
                            std::cout << "Cannot fetch DB record" << std::endl;
861
 
                            break;
862
 
                        }
863
 
                        if ( !more ) break; // no more records
864
 
 
865
 
                        // Check cat value
866
 
                        dbColumn *column = db_get_table_column (databaseTable, layer.keyColumn);
867
 
                        dbValue *value = db_get_column_value(column);
868
 
                        
869
 
                        if ( db_test_value_isnull(value) ) continue;
870
 
                        layer.attributes[layer.nAttributes].cat = db_get_value_int (value);
871
 
                        if ( layer.attributes[layer.nAttributes].cat < 0 ) continue; 
872
 
 
873
 
                        layer.attributes[layer.nAttributes].values = (char **) malloc ( layer.nColumns * sizeof(char*) );
874
 
 
875
 
                        for (int i = 0; i < layer.nColumns; i++) {
876
 
                            column = db_get_table_column (databaseTable, i);
877
 
                            int sqltype = db_get_column_sqltype(column);
878
 
                            int ctype = db_sqltype_to_Ctype ( sqltype );
879
 
                            value = db_get_column_value(column);
880
 
                            db_convert_value_to_string ( value, sqltype, &dbstr);
881
 
 
882
 
                            #if QGISDEBUG > 3
883
 
                            std::cout << "column: " << db_get_column_name(column) << std::endl;
884
 
                            std::cout << "value: " << db_get_string(&dbstr) << std::endl;
885
 
                            #endif
886
 
 
887
 
                            layer.attributes[layer.nAttributes].values[i] = strdup ( db_get_string(&dbstr) );
888
 
 
889
 
                            double dbl;
890
 
                            if ( ctype == DB_C_TYPE_INT ) {
891
 
                                dbl = db_get_value_int ( value );
892
 
                            } else if ( ctype == DB_C_TYPE_DOUBLE ) {
893
 
                                dbl = db_get_value_double ( value );
894
 
                            } else {
895
 
                                dbl = 0;
896
 
                            }
897
 
                            
898
 
                            if ( dbl < layer.minmax[i][0] ) {
899
 
                                layer.minmax[i][0] = dbl;
900
 
                            }
901
 
                            if ( dbl > layer.minmax[i][1] ) {
902
 
                                layer.minmax[i][1] = dbl;
903
 
                            }
904
 
                        }
905
 
                        layer.nAttributes++;
906
 
                    }
907
 
                    // Sort attributes by category
908
 
                    qsort ( layer.attributes, layer.nAttributes, sizeof(GATT), cmpAtt );
909
 
                }
910
 
                db_close_cursor (&databaseCursor);
911
 
                db_close_database_shutdown_driver ( databaseDriver );
912
 
                db_free_string(&dbstr);
913
 
 
914
 
                #ifdef QGISDEBUG
915
 
                std::cerr << "fields.size = " << layer.fields.size() << std::endl;
916
 
                std::cerr << "number of attributes = " << layer.nAttributes << std::endl;
917
 
                #endif
918
 
 
919
 
            }
920
 
        }
921
 
    }
922
 
 
923
 
    // Add cat if no attribute fields exist (otherwise qgis crashes)
924
 
    if ( layer.nColumns == 0 ) {
925
 
        layer.fields.push_back ( QgsField( "cat", "integer", 10, 0) );
926
 
        layer.minmax = new double[1][2];
927
 
        layer.minmax[0][0] = 0; 
928
 
        layer.minmax[0][1] = 0; 
929
 
 
930
 
        int cidx = Vect_cidx_get_field_index ( layer.map, layer.field );
931
 
        if ( cidx >= 0 ) {
932
 
            int ncats, cat, type, id;
933
 
            
934
 
            ncats = Vect_cidx_get_num_cats_by_index ( layer.map, cidx );
935
 
 
936
 
            if ( ncats > 0 ) {
937
 
                Vect_cidx_get_cat_by_index ( layer.map, cidx, 0, &cat, &type, &id );
938
 
                layer.minmax[0][0] = cat; 
939
 
 
940
 
                Vect_cidx_get_cat_by_index ( layer.map, cidx, ncats-1, &cat, &type, &id );
941
 
                layer.minmax[0][1] = cat; 
942
 
            }
943
 
        }
944
 
    }
945
 
 
946
 
    GMAP *map = &(mMaps[layer.mapId]);
947
 
    
948
 
    QFileInfo di ( map->gisdbase + "/" + map->location + "/" + map->mapset + "/vector/" + map->mapName + "/dbln" );
949
 
    map->lastAttributesModified = di.lastModified();
950
 
}
951
 
 
952
 
void QgsGrassProvider::closeLayer( int layerId )
953
 
{
954
 
    #ifdef QGISDEBUG
955
 
    std::cerr << "Close layer " << layerId << " nUsers = " << mLayers[layerId].nUsers << std::endl;
956
 
    #endif
957
 
 
958
 
    // TODO: not tested because delete is never used for providers
959
 
    mLayers[layerId].nUsers--;
960
 
 
961
 
    if ( mLayers[layerId].nUsers == 0 ) { // No more users, free sources
962
 
        #ifdef QGISDEBUG
963
 
        std::cerr << "No more users -> delete layer" << std::endl;
964
 
        #endif
965
 
 
966
 
        mLayers[layerId].valid = false;
967
 
 
968
 
        // Column names/types
969
 
        mLayers[layerId].fields.resize(0);
970
 
        
971
 
        // Attributes
972
 
        #ifdef QGISDEBUG
973
 
        std::cerr << "Delete attribute values" << std::endl;
974
 
        #endif
975
 
        for ( int i = 0; i < mLayers[layerId].nAttributes; i++ ) {
976
 
            free ( mLayers[layerId].attributes[i].values );
977
 
        }
978
 
        free ( mLayers[layerId].attributes );
979
 
                
980
 
        delete[] mLayers[layerId].minmax;
981
 
 
982
 
        // Field info
983
 
        free ( mLayers[layerId].fieldInfo );
984
 
 
985
 
        closeMap ( mLayers[layerId].mapId );
986
 
    }
987
 
}
988
 
 
989
 
/* returns mapId or -1 on error */
990
 
int QgsGrassProvider::openMap(QString gisdbase, QString location, QString mapset, QString mapName)
991
 
{
992
 
    #ifdef QGISDEBUG
993
 
    std::cerr << "QgsGrassProvider::openMap()" << std::endl;
994
 
    #endif
995
 
 
996
 
    QString tmpPath = gisdbase + "/" + location + "/" + mapset + "/" + mapName;
997
 
 
998
 
    // Check if this map is already opened
999
 
    for ( int i = 0; i <  mMaps.size(); i++) {
1000
 
        if ( mMaps[i].valid && mMaps[i].path == tmpPath ) 
1001
 
        {
1002
 
            // the map is already opened, return map id
1003
 
            #ifdef QGISDEBUG
1004
 
            std::cerr << "The map is already opened with ID = " << i << std::endl;
1005
 
            #endif
1006
 
            mMaps[i].nUsers++;
1007
 
            return i;
1008
 
        }
1009
 
    }
1010
 
 
1011
 
    GMAP map;
1012
 
    map.gisdbase = gisdbase;
1013
 
    map.location = location;
1014
 
    map.mapset = mapset;
1015
 
    map.mapName = mapName;
1016
 
    map.path = tmpPath;
1017
 
    map.nUsers = 1;
1018
 
    map.version = 1;
1019
 
    map.update = 0;
1020
 
    map.map = (struct Map_info *) malloc ( sizeof(struct Map_info) );
1021
 
 
1022
 
    // Set GRASS location
1023
 
    QgsGrass::setLocation ( gisdbase, location ); 
1024
 
#ifdef QGISDEBUG
1025
 
        std::cerr << "Setting  gisdbase, location: " << gisdbase << ", " << location << std::endl;
1026
 
#endif
1027
 
 
1028
 
    // Find the vector
1029
 
    char *ms = G_find_vector2 ( (char *) mapName.ascii(), (char *) mapset.ascii()) ;
1030
 
 
1031
 
    if ( ms == NULL) {
1032
 
        std::cerr << "Cannot find GRASS vector" << std::endl;
1033
 
        return -1;
1034
 
    }
1035
 
 
1036
 
    // Read the time of vector dir before Vect_open_old, because it may take long time (when the vector
1037
 
    // could be owerwritten)
1038
 
    QFileInfo di ( gisdbase + "/" + location + "/" + mapset + "/vector/" + mapName );
1039
 
    map.lastModified = di.lastModified();
1040
 
    
1041
 
    di.setFile ( gisdbase + "/" + location + "/" + mapset + "/vector/" + mapName + "/dbln" );
1042
 
    map.lastAttributesModified = di.lastModified();
1043
 
 
1044
 
    // Open vector
1045
 
    QgsGrass::resetError(); // to "catch" error after Vect_open_old()
1046
 
    Vect_set_open_level (2);
1047
 
    Vect_open_old ( map.map, (char *) mapName.ascii(), (char *) mapset.ascii());
1048
 
 
1049
 
    if ( QgsGrass::getError() == QgsGrass::FATAL ) {
1050
 
        std::cerr << "Cannot open GRASS vector: " << QgsGrass::getErrorMessage() << std::endl;
1051
 
        return -1;
1052
 
    }
1053
 
    #ifdef QGISDEBUG
1054
 
    std::cerr << "GRASS map successfully opened" << std::endl;
1055
 
    #endif
1056
 
 
1057
 
    // Add new map to maps
1058
 
    mMaps.push_back(map);
1059
 
 
1060
 
    return mMaps.size() - 1; // map id 
1061
 
}
1062
 
 
1063
 
void QgsGrassProvider::updateMap ( int mapId )
1064
 
{
1065
 
    #ifdef QGISDEBUG
1066
 
    std::cerr << "QgsGrassProvider::updateMap() mapId = " << mapId << std::endl;
1067
 
    #endif
1068
 
 
1069
 
    /* Close map */
1070
 
    GMAP *map = &(mMaps[mapId]);
1071
 
 
1072
 
    map->valid = false;
1073
 
    map->version++;
1074
 
 
1075
 
    QgsGrass::setLocation ( (char *) map->gisdbase.ascii(), (char *) map->location.ascii() ); 
1076
 
 
1077
 
    // TODO: Should be done better / in other place ?
1078
 
    // TODO: Is it necessary for close ?
1079
 
    G__setenv( "MAPSET", (char *) map->mapset.ascii() );
1080
 
    
1081
 
    Vect_close ( map->map );
1082
 
 
1083
 
    QFileInfo di ( map->gisdbase + "/" + map->location + "/" + map->mapset + "/vector/" + map->mapName );
1084
 
    map->lastModified = di.lastModified();
1085
 
 
1086
 
    di.setFile ( map->gisdbase + "/" + map->location + "/" + map->mapset + "/vector/" + map->mapName + "/dbln" );
1087
 
    map->lastAttributesModified = di.lastModified();
1088
 
 
1089
 
    // Reopen vector
1090
 
    QgsGrass::resetError(); // to "catch" error after Vect_open_old()
1091
 
    Vect_set_open_level (2);
1092
 
    Vect_open_old ( map->map, (char *) map->mapName.ascii(), (char *) map->mapset.ascii());
1093
 
 
1094
 
    if ( QgsGrass::getError() == QgsGrass::FATAL ) {
1095
 
        std::cerr << "Cannot reopen GRASS vector: " << QgsGrass::getErrorMessage() << std::endl;
1096
 
 
1097
 
        // TODO if reopen fails, mLayers should be also updated
1098
 
        return;
1099
 
    }
1100
 
 
1101
 
    #ifdef QGISDEBUG
1102
 
    std::cerr << "GRASS map successfully reopened for reading." << std::endl;
1103
 
    #endif
1104
 
 
1105
 
    for ( int i = 0; i <  mLayers.size(); i++) {
1106
 
        // if ( !(mLayers[i].valid) ) continue; // ?
1107
 
 
1108
 
        if  ( mLayers[i].mapId == mapId ) {
1109
 
            loadLayerSourcesFromMap ( mLayers[i] );
1110
 
        }
1111
 
    }
1112
 
 
1113
 
    map->valid = true;
1114
 
}
1115
 
 
1116
 
void QgsGrassProvider::closeMap( int mapId )
1117
 
{
1118
 
    #ifdef QGISDEBUG
1119
 
    std::cerr << "Close map " << mapId << " nUsers = " << mMaps[mapId].nUsers << std::endl;
1120
 
    #endif
1121
 
 
1122
 
    // TODO: not tested because delete is never used for providers
1123
 
    mMaps[mapId].nUsers--;
1124
 
 
1125
 
    if ( mMaps[mapId].nUsers == 0 ) { // No more users, free sources
1126
 
        #ifdef QGISDEBUG
1127
 
        std::cerr << "No more users -> delete map" << std::endl;
1128
 
        #endif
1129
 
 
1130
 
        // TODO: do this better, probably maintain QgsGrassEdit as one user
1131
 
        if ( mMaps[mapId].update ) {
1132
 
            QMessageBox::warning( 0, "Warning", "The vector was currently edited, "
1133
 
                                     "you can expect crash soon." );
1134
 
        }
1135
 
 
1136
 
        mMaps[mapId].valid = false;
1137
 
        Vect_close ( mMaps[mapId].map );
1138
 
    }
1139
 
}
1140
 
 
1141
 
bool QgsGrassProvider::mapOutdated( int mapId )
1142
 
{
1143
 
    #ifdef QGISDEBUG
1144
 
    std::cerr << "QgsGrassProvider::mapOutdated()" << std::endl;
1145
 
    #endif
1146
 
 
1147
 
    GMAP *map = &(mMaps[mapId]);
1148
 
    
1149
 
    QString dp = map->gisdbase + "/" + map->location + "/" + map->mapset + "/vector/" + map->mapName;
1150
 
    QFileInfo di ( dp );
1151
 
 
1152
 
    if ( map->lastModified < di.lastModified() ) {
1153
 
        #ifdef QGISDEBUG
1154
 
        std::cerr << "**** The map " << mapId << " was modified ****" << std::endl;
1155
 
        #endif
1156
 
        
1157
 
        return true;
1158
 
    }
1159
 
 
1160
 
    return false;
1161
 
}
1162
 
 
1163
 
bool QgsGrassProvider::attributesOutdated( int mapId )
1164
 
{
1165
 
    #ifdef QGISDEBUG
1166
 
    std::cerr << "QgsGrassProvider::attributesOutdated()" << std::endl;
1167
 
    #endif
1168
 
 
1169
 
    GMAP *map = &(mMaps[mapId]);
1170
 
    
1171
 
    QString dp = map->gisdbase + "/" + map->location + "/" + map->mapset + "/vector/" + map->mapName + "/dbln";
1172
 
    QFileInfo di ( dp );
1173
 
 
1174
 
    if ( map->lastAttributesModified < di.lastModified() ) {
1175
 
        #ifdef QGISDEBUG
1176
 
        std::cerr << "**** The attributes of the map " << mapId << " were modified ****" << std::endl;
1177
 
        #endif
1178
 
        
1179
 
        return true;
1180
 
    }
1181
 
 
1182
 
    return false;
1183
 
}
1184
 
 
1185
 
/** Set feature attributes */
1186
 
void QgsGrassProvider::setFeatureAttributes ( int layerId, int cat, QgsFeature *feature )
1187
 
{
1188
 
    #if QGISDEBUG > 3
1189
 
    std::cerr << "setFeatureAttributes cat = " << cat << std::endl;
1190
 
    #endif
1191
 
    if ( mLayers[layerId].nColumns > 0 ) {
1192
 
        // find cat
1193
 
        GATT key;
1194
 
        key.cat = cat;
1195
 
    
1196
 
        GATT *att = (GATT *) bsearch ( &key, mLayers[layerId].attributes, mLayers[layerId].nAttributes,
1197
 
                                       sizeof(GATT), cmpAtt);
1198
 
 
1199
 
        for (int i = 0; i < mLayers[layerId].nColumns; i++) {
1200
 
            if ( att != NULL ) {
1201
 
                QCString cstr( att->values[i] );
1202
 
                feature->addAttribute ( mLayers[layerId].fields[i].name(), mEncoding->toUnicode(cstr) );
1203
 
            } else { /* it may happen that attributes are missing -> set to empty string */
1204
 
                feature->addAttribute ( mLayers[layerId].fields[i].name(), "");
1205
 
            }
1206
 
        }
1207
 
    } else { 
1208
 
        QString tmp;
1209
 
        tmp.sprintf("%d", cat );
1210
 
        feature->addAttribute ( "cat", tmp);
1211
 
    }
1212
 
}
1213
 
 
1214
 
void QgsGrassProvider::setFeatureAttributes ( int layerId, int cat, QgsFeature *feature, std::list<int> const& attlist)
1215
 
{
1216
 
    #if QGISDEBUG > 3
1217
 
    std::cerr << "setFeatureAttributes cat = " << cat << std::endl;
1218
 
    #endif
1219
 
    if ( mLayers[layerId].nColumns > 0 ) {
1220
 
        // find cat
1221
 
        GATT key;
1222
 
        key.cat = cat;
1223
 
        GATT *att = (GATT *) bsearch ( &key, mLayers[layerId].attributes, mLayers[layerId].nAttributes,
1224
 
                                       sizeof(GATT), cmpAtt);
1225
 
 
1226
 
        for (std::list<int>::const_iterator iter=attlist.begin(); iter!=attlist.end();++iter) {
1227
 
            if ( att != NULL ) {
1228
 
                QCString cstr( att->values[*iter] );
1229
 
                feature->addAttribute ( mLayers[layerId].fields[*iter].name(), mEncoding->toUnicode(cstr) );
1230
 
            } else { /* it may happen that attributes are missing -> set to empty string */
1231
 
                feature->addAttribute ( mLayers[layerId].fields[*iter].name(), "");     
1232
 
            } 
1233
 
        }
1234
 
    } else { 
1235
 
        QString tmp;
1236
 
        tmp.sprintf("%d", cat );
1237
 
        feature->addAttribute ( "cat", tmp);
1238
 
    }
1239
 
}
1240
 
 
1241
 
/** Get pointer to map */
1242
 
struct Map_info *QgsGrassProvider::layerMap ( int layerId )
1243
 
{
1244
 
    return ( mMaps[mLayers[layerId].mapId].map );
1245
 
}
1246
 
 
1247
 
QString QgsGrassProvider::getProjectionWKT(void)
1248
 
{
1249
 
    QString WKT;
1250
 
 
1251
 
    struct Cell_head cellhd;
1252
 
 
1253
 
    QgsGrass::setLocation ( mGisdbase, mLocation ); 
1254
 
    G_get_default_window(&cellhd);
1255
 
    if (cellhd.proj != PROJECTION_XY) {
1256
 
        struct Key_Value *projinfo = G_get_projinfo();
1257
 
        struct Key_Value *projunits = G_get_projunits();
1258
 
        char *wkt = GPJ_grass_to_wkt ( projinfo, projunits,  0, 0 );
1259
 
        WKT = QString(wkt);
1260
 
        free ( wkt);
1261
 
    }
1262
 
    
1263
 
    return WKT;
1264
 
}
1265
 
 
1266
 
int QgsGrassProvider::grassLayer()
1267
 
{
1268
 
        return mLayerField;
1269
 
}
1270
 
 
1271
 
//-----------------------------------------  Edit -------------------------------------------------------
1272
 
 
1273
 
bool QgsGrassProvider::isGrassEditable ( void )
1274
 
{
1275
 
    #ifdef QGISDEBUG
1276
 
    std::cerr << "QgsGrassProvider::isGrassEditable" << std::endl;
1277
 
    #endif
1278
 
 
1279
 
    if ( !isValid() ) 
1280
 
        return false;
1281
 
 
1282
 
    /* Check if current user is owner of mapset */
1283
 
    if ( G__mapset_permissions2((char*)mGisdbase.ascii(),(char*)mLocation.ascii(),(char*)mMapset.ascii()) != 1 )
1284
 
        return false;
1285
 
 
1286
 
    // TODO: check format? (cannot edit OGR layers)
1287
 
 
1288
 
    return true;
1289
 
}
1290
 
 
1291
 
bool QgsGrassProvider::isEdited ( void )
1292
 
{
1293
 
    #if QGISDEBUG > 3
1294
 
    std::cerr << "QgsGrassProvider::isEdited" << std::endl;
1295
 
    #endif
1296
 
 
1297
 
    GMAP *map = &(mMaps[mLayers[mLayerId].mapId]);
1298
 
    return (map->update);
1299
 
}
1300
 
 
1301
 
bool QgsGrassProvider::startEdit ( void )
1302
 
{
1303
 
    #ifdef QGISDEBUG
1304
 
    std::cerr << "QgsGrassProvider::startEdit" << std::endl;
1305
 
    std::cerr << "  uri = " << mDataSourceUri << std::endl;
1306
 
    std::cerr << "  mMaps.size() = " << mMaps.size() << std::endl;
1307
 
    #endif
1308
 
 
1309
 
    if ( !isGrassEditable() )
1310
 
        return false;
1311
 
 
1312
 
    // Check number of maps (the problem may appear if static variables are not shared - runtime linker)
1313
 
    if ( mMaps.size() == 0 ) {
1314
 
        QMessageBox::warning( 0, "Warning", "No maps opened in mMaps, probably problem in runtime linking, " 
1315
 
                              "static variables are not shared by provider and plugin." );
1316
 
        return false;
1317
 
    }
1318
 
 
1319
 
    /* Close map */
1320
 
    GMAP *map = &(mMaps[mLayers[mLayerId].mapId]);
1321
 
    map->valid = false;
1322
 
 
1323
 
    QgsGrass::setLocation ( (char *) map->gisdbase.ascii(), (char *) map->location.ascii() ); 
1324
 
 
1325
 
    // Set current mapset (mapset was previously checked by isGrassEditable() )
1326
 
    // TODO: Should be done better / in other place ?
1327
 
    G__setenv( "MAPSET", (char *) map->mapset.ascii() );
1328
 
 
1329
 
    Vect_close ( map->map );
1330
 
 
1331
 
    // TODO: Catch error 
1332
 
     
1333
 
    QgsGrass::resetError();
1334
 
    int level = Vect_open_update ( map->map, (char *) map->mapName.ascii(), (char *) map->mapset.ascii() );
1335
 
    if (  level < 2 ) { 
1336
 
        if ( QgsGrass::getError() == QgsGrass::FATAL ) {
1337
 
            std::cerr << "Cannot open GRASS vector for update: " << QgsGrass::getErrorMessage() << std::endl;
1338
 
        } else {
1339
 
            std::cerr << "Cannot open GRASS vector for update on level 2." << std::endl;
1340
 
        }
1341
 
        
1342
 
        // reopen vector for reading
1343
 
        QgsGrass::resetError();
1344
 
        Vect_set_open_level (2);
1345
 
        level = Vect_open_old ( map->map, (char *) map->mapName.ascii(), (char *) map->mapset.ascii() );
1346
 
    
1347
 
        if ( level < 2 ) {
1348
 
            if ( QgsGrass::getError() == QgsGrass::FATAL ) {
1349
 
                std::cerr << "Cannot reopen GRASS vector: " << QgsGrass::getErrorMessage() << std::endl;
1350
 
            } else {
1351
 
                std::cerr << "Cannot reopen GRASS vector on level 2." << std::endl;
1352
 
            }
1353
 
        } else {
1354
 
            map->valid = true;
1355
 
        }
1356
 
        
1357
 
        return false;
1358
 
    }
1359
 
 
1360
 
    // Write history
1361
 
    Vect_hist_command ( map->map );
1362
 
 
1363
 
    #ifdef QGISDEBUG
1364
 
    std::cerr << "Vector successfully reopened for update." << std::endl;
1365
 
    #endif
1366
 
 
1367
 
    map->update = true;
1368
 
    map->valid = true;
1369
 
 
1370
 
    return true;
1371
 
}
1372
 
 
1373
 
bool QgsGrassProvider::closeEdit ( void )
1374
 
{
1375
 
    #ifdef QGISDEBUG
1376
 
    std::cerr << "QgsGrassProvider::closeEdit" << std::endl;
1377
 
    #endif
1378
 
 
1379
 
    if ( !isValid() )
1380
 
        return false;
1381
 
 
1382
 
    /* Close map */
1383
 
    GMAP *map = &(mMaps[mLayers[mLayerId].mapId]);
1384
 
    
1385
 
    if ( !(map->update) )
1386
 
        return false;
1387
 
 
1388
 
    map->valid = false;
1389
 
    map->version++;
1390
 
 
1391
 
    QgsGrass::setLocation ( (char *) map->gisdbase.ascii(), (char *) map->location.ascii() ); 
1392
 
 
1393
 
    // Set current mapset (mapset was previously checked by isGrassEditable() )
1394
 
    // TODO: Should be done better / in other place ?
1395
 
    // TODO: Is it necessary for build/close ?
1396
 
    G__setenv( "MAPSET", (char *) map->mapset.ascii() );
1397
 
    
1398
 
    Vect_build_partial ( map->map, GV_BUILD_NONE, NULL);
1399
 
    Vect_build ( map->map, stderr );
1400
 
    Vect_close ( map->map );
1401
 
 
1402
 
    QFileInfo di ( mGisdbase + "/" + mLocation + "/" + mMapset + "/vector/" + mMapName );
1403
 
    map->lastModified = di.lastModified();
1404
 
 
1405
 
    di.setFile ( mGisdbase + "/" + mLocation + "/" + mMapset + "/vector/" + mMapset + "/dbln" );
1406
 
    map->lastAttributesModified = di.lastModified();
1407
 
 
1408
 
    // Reopen vector
1409
 
    QgsGrass::resetError(); // to "catch" error after Vect_open_old()
1410
 
    Vect_set_open_level (2);
1411
 
    Vect_open_old ( map->map, (char *) map->mapName.ascii(), (char *) map->mapset.ascii());
1412
 
 
1413
 
    if ( QgsGrass::getError() == QgsGrass::FATAL ) {
1414
 
        std::cerr << "Cannot reopen GRASS vector: " << QgsGrass::getErrorMessage() << std::endl;
1415
 
        return -1;
1416
 
    }
1417
 
 
1418
 
    #ifdef QGISDEBUG
1419
 
    std::cerr << "GRASS map successfully reopened for reading." << std::endl;
1420
 
    #endif
1421
 
 
1422
 
    // Reload sources to layers
1423
 
    for ( int i = 0; i <  mLayers.size(); i++) {
1424
 
        // if ( !(mLayers[i].valid) ) continue; // ?
1425
 
 
1426
 
        if  ( mLayers[i].mapId == mLayers[mLayerId].mapId ) {
1427
 
            loadLayerSourcesFromMap ( mLayers[i] );
1428
 
        }
1429
 
    }
1430
 
 
1431
 
    map->update = false;
1432
 
    map->valid = true;
1433
 
 
1434
 
    return true;
1435
 
}
1436
 
 
1437
 
int QgsGrassProvider::numLines ( void )
1438
 
{
1439
 
    #ifdef QGISDEBUG
1440
 
    std::cerr << "QgsGrassProvider::numLines" << std::endl;
1441
 
    #endif
1442
 
 
1443
 
    return ( Vect_get_num_lines(mMap) );
1444
 
}
1445
 
 
1446
 
int QgsGrassProvider::numNodes ( void )
1447
 
{
1448
 
    #ifdef QGISDEBUG
1449
 
    std::cerr << "QgsGrassProvider::numNodes" << std::endl;
1450
 
    #endif
1451
 
 
1452
 
    return ( Vect_get_num_nodes(mMap) );
1453
 
}
1454
 
 
1455
 
int QgsGrassProvider::readLine ( struct line_pnts *Points, struct line_cats *Cats, int line )
1456
 
{
1457
 
    #if QGISDEBUG > 3
1458
 
    std::cerr << "QgsGrassProvider::readLine" << std::endl;
1459
 
    #endif
1460
 
 
1461
 
    if ( Points )
1462
 
        Vect_reset_line ( Points );
1463
 
 
1464
 
    if ( Cats )
1465
 
        Vect_reset_cats ( Cats );
1466
 
 
1467
 
    if ( !Vect_line_alive(mMap, line) ) return -1;
1468
 
 
1469
 
    return ( Vect_read_line(mMap, Points, Cats, line) );
1470
 
}
1471
 
 
1472
 
bool QgsGrassProvider::nodeCoor ( int node, double *x, double *y )
1473
 
{
1474
 
    #if QGISDEBUG > 3
1475
 
    std::cerr << "QgsGrassProvider::nodeCoor" << std::endl;
1476
 
    #endif
1477
 
 
1478
 
    if ( !Vect_node_alive ( mMap, node) ) {
1479
 
        *x = 0.0;
1480
 
        *y = 0.0;
1481
 
        return false;
1482
 
    }
1483
 
    
1484
 
    Vect_get_node_coor ( mMap, node, x, y, NULL);
1485
 
    return true;
1486
 
}
1487
 
 
1488
 
bool QgsGrassProvider::lineNodes ( int line, int *node1, int *node2 )
1489
 
{
1490
 
    #if QGISDEBUG > 3
1491
 
    std::cerr << "QgsGrassProvider::lineNodes" << std::endl;
1492
 
    #endif
1493
 
    
1494
 
    if ( !Vect_line_alive(mMap, line) ) {
1495
 
        *node1 = 0;
1496
 
        *node2 = 0;
1497
 
        return false;
1498
 
    }
1499
 
    
1500
 
    Vect_get_line_nodes ( mMap, line, node1, node2 );
1501
 
    return true;
1502
 
}
1503
 
 
1504
 
int QgsGrassProvider::writeLine ( int type, struct line_pnts *Points, struct line_cats *Cats )
1505
 
{
1506
 
    #ifdef QGISDEBUG
1507
 
    std::cerr << "QgsGrassProvider::writeLine n_points = " << Points->n_points 
1508
 
              << " n_cats = " << Cats->n_cats << std::endl;
1509
 
    #endif
1510
 
 
1511
 
    if ( !isEdited() )
1512
 
        return -1;
1513
 
 
1514
 
    return ( (int) Vect_write_line(mMap,type,Points,Cats) );
1515
 
}
1516
 
 
1517
 
int QgsGrassProvider::rewriteLine ( int line, int type, struct line_pnts *Points, struct line_cats *Cats )
1518
 
{
1519
 
    #ifdef QGISDEBUG
1520
 
    std::cerr << "QgsGrassProvider::rewriteLine n_points = " << Points->n_points 
1521
 
              << " n_cats = " << Cats->n_cats << std::endl;
1522
 
    #endif
1523
 
 
1524
 
    if ( !isEdited() )
1525
 
        return -1;
1526
 
 
1527
 
    return ( Vect_rewrite_line(mMap,line,type,Points,Cats) );
1528
 
}
1529
 
 
1530
 
 
1531
 
int QgsGrassProvider::deleteLine ( int line )
1532
 
{
1533
 
    #ifdef QGISDEBUG
1534
 
    std::cerr << "QgsGrassProvider::deleteLine" << std::endl;
1535
 
    #endif
1536
 
 
1537
 
    if ( !isEdited() )
1538
 
        return -1;
1539
 
 
1540
 
    return ( Vect_delete_line(mMap,line) );
1541
 
}
1542
 
 
1543
 
int QgsGrassProvider::findLine ( double x, double y, int type, double threshold )
1544
 
{
1545
 
    #if QGISDEBUG > 3
1546
 
    std::cerr << "QgsGrassProvider::findLine" << std::endl;
1547
 
    #endif
1548
 
 
1549
 
    return ( Vect_find_line(mMap,x,y,0,type,threshold,0,0) );
1550
 
}
1551
 
 
1552
 
int QgsGrassProvider::findNode ( double x, double y, double threshold )
1553
 
{
1554
 
    return ( Vect_find_node ( mMap, x, y, 0, threshold, 0 ) );
1555
 
}
1556
 
 
1557
 
bool QgsGrassProvider::lineAreas ( int line, int *left, int *right )
1558
 
{
1559
 
    #if QGISDEBUG > 3
1560
 
    std::cerr << "QgsGrassProvider::lineAreas" << std::endl;
1561
 
    #endif
1562
 
    
1563
 
    if ( !Vect_line_alive(mMap, line) ) {
1564
 
        *left = 0;
1565
 
        *right = 0;
1566
 
        return false;
1567
 
    }
1568
 
    
1569
 
    Vect_get_line_areas ( mMap, line, left, right );
1570
 
    return true;
1571
 
}
1572
 
 
1573
 
int QgsGrassProvider::centroidArea ( int centroid )
1574
 
{
1575
 
    #if QGISDEBUG > 3
1576
 
    std::cerr << "QgsGrassProvider::centroidArea" << std::endl;
1577
 
    #endif
1578
 
    
1579
 
    if ( !Vect_line_alive(mMap, centroid) ) {
1580
 
        return 0;
1581
 
    }
1582
 
    
1583
 
    return ( Vect_get_centroid_area(mMap,centroid) );
1584
 
}
1585
 
 
1586
 
int QgsGrassProvider::nodeNLines ( int node )
1587
 
{
1588
 
    #if QGISDEBUG > 3
1589
 
    std::cerr << "QgsGrassProvider::nodeNLines" << std::endl;
1590
 
    #endif
1591
 
    
1592
 
    if ( !Vect_node_alive(mMap, node) ) {
1593
 
        return 0;
1594
 
    }
1595
 
    
1596
 
    return ( Vect_get_node_n_lines(mMap,node) );
1597
 
}
1598
 
 
1599
 
int QgsGrassProvider::nodeLine ( int node, int idx )
1600
 
{
1601
 
    #if QGISDEBUG > 3
1602
 
    std::cerr << "QgsGrassProvider::nodeLine" << std::endl;
1603
 
    #endif
1604
 
    
1605
 
    if ( !Vect_node_alive(mMap, node) ) {
1606
 
        return 0;
1607
 
    }
1608
 
 
1609
 
    return ( Vect_get_node_line(mMap,node,idx) );
1610
 
}
1611
 
 
1612
 
int QgsGrassProvider::lineAlive ( int line )
1613
 
{
1614
 
    #if QGISDEBUG > 3
1615
 
    std::cerr << "QgsGrassProvider::lineAlive" << std::endl;
1616
 
    #endif
1617
 
    
1618
 
    return ( Vect_line_alive(mMap, line) ) ;
1619
 
}
1620
 
 
1621
 
int QgsGrassProvider::nodeAlive ( int node )
1622
 
{
1623
 
    #if QGISDEBUG > 3
1624
 
    std::cerr << "QgsGrassProvider::nodeAlive" << std::endl;
1625
 
    #endif
1626
 
    
1627
 
    return ( Vect_node_alive(mMap, node) ) ;
1628
 
}
1629
 
 
1630
 
int QgsGrassProvider::numUpdatedLines ( void )
1631
 
{
1632
 
    #ifdef QGISDEBUG
1633
 
    std::cerr << "QgsGrassProvider::numUpdatedLines" << std::endl;
1634
 
    std::cerr << "  numUpdatedLines = " << Vect_get_num_updated_lines(mMap) << std::endl;
1635
 
    #endif
1636
 
    
1637
 
    return ( Vect_get_num_updated_lines(mMap) ) ;
1638
 
}
1639
 
 
1640
 
int QgsGrassProvider::numUpdatedNodes ( void )
1641
 
{
1642
 
    #ifdef QGISDEBUG
1643
 
    std::cerr << "QgsGrassProvider::numUpdatedNodes" << std::endl;
1644
 
    std::cerr << "  numUpdatedNodes = " << Vect_get_num_updated_nodes(mMap) << std::endl;
1645
 
    #endif
1646
 
    
1647
 
    return ( Vect_get_num_updated_nodes(mMap) ) ;
1648
 
}
1649
 
 
1650
 
int QgsGrassProvider::updatedLine ( int idx )
1651
 
{
1652
 
    #ifdef QGISDEBUG
1653
 
    std::cerr << "QgsGrassProvider::updatedLine idx = " << idx << std::endl;
1654
 
    std::cerr << "  updatedLine = " << Vect_get_updated_line( mMap, idx ) << std::endl;
1655
 
    #endif
1656
 
    
1657
 
    return ( Vect_get_updated_line( mMap, idx ) ) ;
1658
 
}
1659
 
 
1660
 
int QgsGrassProvider::updatedNode ( int idx )
1661
 
{
1662
 
    #ifdef QGISDEBUG
1663
 
    std::cerr << "QgsGrassProvider::updatedNode idx = " << idx << std::endl;
1664
 
    std::cerr << "  updatedNode = " << Vect_get_updated_node( mMap, idx ) << std::endl;
1665
 
    #endif
1666
 
    
1667
 
    return ( Vect_get_updated_node( mMap, idx ) ) ;
1668
 
}
1669
 
 
1670
 
// ------------------ Attributes -------------------------------------------------
1671
 
 
1672
 
QString *QgsGrassProvider::key ( int field )
1673
 
{
1674
 
    #ifdef QGISDEBUG
1675
 
    std::cerr << "QgsGrassProvider::key() field = " << field << std::endl;
1676
 
    #endif
1677
 
 
1678
 
    QString *key = new QString();
1679
 
 
1680
 
    struct  field_info *fi = Vect_get_field( mMap, field); // should work also with field = 0
1681
 
 
1682
 
    if ( fi == NULL ) {
1683
 
        #ifdef QGISDEBUG
1684
 
        std::cerr << "No field info -> no attributes" << std::endl;
1685
 
        #endif
1686
 
        return key;
1687
 
    }
1688
 
 
1689
 
    key->setAscii(fi->key);
1690
 
    return key;
1691
 
}
1692
 
 
1693
 
std::vector<QgsField> *QgsGrassProvider::columns ( int field )
1694
 
{
1695
 
    #ifdef QGISDEBUG
1696
 
    std::cerr << "QgsGrassProvider::columns() field = " << field << std::endl;
1697
 
    #endif
1698
 
 
1699
 
    std::vector<QgsField> *col = new std::vector<QgsField>;
1700
 
    
1701
 
    struct  field_info *fi = Vect_get_field( mMap, field); // should work also with field = 0
1702
 
 
1703
 
    // Read attributes
1704
 
    if ( fi == NULL ) {
1705
 
        #ifdef QGISDEBUG
1706
 
        std::cerr << "No field info -> no attributes" << std::endl;
1707
 
        #endif
1708
 
        return ( col );
1709
 
    }
1710
 
 
1711
 
    #ifdef QGISDEBUG
1712
 
    std::cerr << "Field info found -> open database" << std::endl;
1713
 
    #endif
1714
 
    QgsGrass::setMapset ( mGisdbase, mLocation, mMapset ); 
1715
 
    dbDriver *driver = db_start_driver_open_database ( fi->driver, fi->database );
1716
 
 
1717
 
    if ( driver == NULL ) {
1718
 
        std::cerr << "Cannot open database " << fi->database << " by driver " << fi->driver << std::endl;
1719
 
        return ( col );
1720
 
    }
1721
 
 
1722
 
    #ifdef QGISDEBUG
1723
 
    std::cerr << "Database opened -> describe table" << std::endl;
1724
 
    #endif
1725
 
 
1726
 
    dbString tableName;
1727
 
    db_init_string ( &tableName );
1728
 
    db_set_string ( &tableName, fi->table);
1729
 
    
1730
 
    dbTable *table;
1731
 
    if(db_describe_table (driver, &tableName, &table) != DB_OK) {
1732
 
        std::cerr << "Cannot describe table" << std::endl;
1733
 
        return ( col );
1734
 
    }
1735
 
 
1736
 
    int nCols = db_get_table_number_of_columns(table);
1737
 
 
1738
 
    for (int c = 0; c < nCols; c++) {
1739
 
        dbColumn *column = db_get_table_column (table, c);
1740
 
 
1741
 
        int ctype = db_sqltype_to_Ctype( db_get_column_sqltype (column) );
1742
 
        QString type;
1743
 
        switch ( ctype ) {
1744
 
            case DB_C_TYPE_INT:
1745
 
                type = "int";
1746
 
                break;
1747
 
            case DB_C_TYPE_DOUBLE:
1748
 
                type = "double";
1749
 
                break;
1750
 
            case DB_C_TYPE_STRING:
1751
 
                type = "string";
1752
 
                break;
1753
 
            case DB_C_TYPE_DATETIME:
1754
 
                type = "datetime";
1755
 
                break;
1756
 
        }
1757
 
        col->push_back ( QgsField( db_get_column_name (column), type, db_get_column_length(column), 0) );
1758
 
    }
1759
 
        
1760
 
    db_close_database_shutdown_driver ( driver );
1761
 
 
1762
 
    return col;
1763
 
}
1764
 
 
1765
 
std::vector<QgsFeatureAttribute> *QgsGrassProvider::attributes ( int field, int cat )
1766
 
{
1767
 
    #ifdef QGISDEBUG
1768
 
    std::cerr << "QgsGrassProvider::attributes() field = " << field << " cat = " << cat << std::endl;
1769
 
    #endif
1770
 
 
1771
 
    std::vector<QgsFeatureAttribute> *att = new std::vector<QgsFeatureAttribute>;
1772
 
 
1773
 
    struct  field_info *fi = Vect_get_field( mMap, field); // should work also with field = 0
1774
 
 
1775
 
    // Read attributes
1776
 
    if ( fi == NULL ) {
1777
 
        #ifdef QGISDEBUG
1778
 
        std::cerr << "No field info -> no attributes" << std::endl;
1779
 
        #endif
1780
 
        return att;
1781
 
    }
1782
 
 
1783
 
    #ifdef QGISDEBUG
1784
 
    std::cerr << "Field info found -> open database" << std::endl;
1785
 
    #endif
1786
 
    QgsGrass::setMapset ( mGisdbase, mLocation, mMapset ); 
1787
 
    dbDriver *driver = db_start_driver_open_database ( fi->driver, fi->database );
1788
 
 
1789
 
    if ( driver == NULL ) {
1790
 
        std::cerr << "Cannot open database " << fi->database << " by driver " << fi->driver << std::endl;
1791
 
        return att;
1792
 
    }
1793
 
 
1794
 
    #ifdef QGISDEBUG
1795
 
    std::cerr << "Database opened -> read attributes" << std::endl;
1796
 
    #endif
1797
 
 
1798
 
    dbString dbstr; 
1799
 
    db_init_string (&dbstr);
1800
 
    QString query;
1801
 
    query.sprintf("select * from %s where %s = %d", fi->table, fi->key, cat );
1802
 
    db_set_string (&dbstr, (char *)query.ascii());
1803
 
    
1804
 
    #ifdef QGISDEBUG
1805
 
    std::cerr << "SQL: " << db_get_string(&dbstr) << std::endl;
1806
 
    #endif
1807
 
 
1808
 
    dbCursor databaseCursor;
1809
 
    if ( db_open_select_cursor(driver, &dbstr, &databaseCursor, DB_SCROLL) != DB_OK ){
1810
 
        db_close_database_shutdown_driver ( driver );
1811
 
        std::cerr << "Cannot select attributes from table" << std::endl;
1812
 
        return att;
1813
 
    } 
1814
 
 
1815
 
    int nRecords = db_get_num_rows ( &databaseCursor );
1816
 
    #ifdef QGISDEBUG
1817
 
    std::cerr << "Number of records: " << nRecords << std::endl;
1818
 
    #endif
1819
 
 
1820
 
    if ( nRecords < 1 ) {
1821
 
        std::cerr << "No DB record" << std::endl;
1822
 
        return att;
1823
 
    }
1824
 
    
1825
 
    dbTable  *databaseTable = db_get_cursor_table (&databaseCursor);
1826
 
    int nColumns = db_get_table_number_of_columns(databaseTable);
1827
 
 
1828
 
    int more;
1829
 
    if ( db_fetch (&databaseCursor, DB_NEXT, &more) != DB_OK ) {
1830
 
        std::cout << "Cannot fetch DB record" << std::endl;
1831
 
        return att;
1832
 
    }
1833
 
 
1834
 
    // Read columns' description 
1835
 
    for (int i = 0; i < nColumns; i++) {
1836
 
        dbColumn *column = db_get_table_column (databaseTable, i);
1837
 
        db_convert_column_value_to_string (column, &dbstr);
1838
 
 
1839
 
        QString v = mEncoding->toUnicode(db_get_string(&dbstr));
1840
 
        std::cerr << "Value: " << v << std::endl;
1841
 
        att->push_back ( QgsFeatureAttribute( db_get_column_name(column), v ) );
1842
 
    }
1843
 
 
1844
 
    db_close_cursor (&databaseCursor);
1845
 
    db_close_database_shutdown_driver ( driver );
1846
 
    db_free_string(&dbstr);
1847
 
 
1848
 
    return att;
1849
 
}
1850
 
 
1851
 
QString *QgsGrassProvider::updateAttributes ( int field, int cat, const QString &values )
1852
 
{
1853
 
    #ifdef QGISDEBUG
1854
 
    std::cerr << "QgsGrassProvider::updateAttributes() field = " << field << " cat = " << cat << std::endl;
1855
 
    #endif
1856
 
 
1857
 
    QString *error = new QString();
1858
 
    struct  field_info *fi = Vect_get_field( mMap, field); // should work also with field = 0
1859
 
 
1860
 
    // Read attributes
1861
 
    if ( fi == NULL ) {
1862
 
        #ifdef QGISDEBUG
1863
 
        std::cerr << "No field info -> no attributes" << std::endl;
1864
 
        #endif
1865
 
        error->setLatin1( "Cannot get field info" );
1866
 
        return error;
1867
 
    }
1868
 
 
1869
 
    #ifdef QGISDEBUG
1870
 
    std::cerr << "Field info found -> open database" << std::endl;
1871
 
    #endif
1872
 
    QgsGrass::setMapset ( mGisdbase, mLocation, mMapset ); 
1873
 
    dbDriver *driver = db_start_driver_open_database ( fi->driver, fi->database );
1874
 
 
1875
 
    if ( driver == NULL ) {
1876
 
        std::cerr << "Cannot open database " << fi->database << " by driver " << fi->driver << std::endl;
1877
 
        error->setAscii("Cannot open database");
1878
 
        return error;
1879
 
    }
1880
 
 
1881
 
    #ifdef QGISDEBUG
1882
 
    std::cerr << "Database opened -> read attributes" << std::endl;
1883
 
    #endif
1884
 
 
1885
 
    dbString dbstr; 
1886
 
    db_init_string (&dbstr);
1887
 
    QString query;
1888
 
    
1889
 
    query = "update " + QString(fi->table) + " set " + values + " where " + QString(fi->key) 
1890
 
            + " = " + QString::number(cat);
1891
 
 
1892
 
    #ifdef QGISDEBUG
1893
 
    std::cerr << "query: " << query << std::endl;
1894
 
    #endif
1895
 
 
1896
 
    // For some strange reason, mEncoding->fromUnicode(query) does not work, 
1897
 
    // but probably it is not correct, because Qt widgets will use current locales for input
1898
 
    //  -> it is possible to edit only in current locales at present
1899
 
    // QCString qcs = mEncoding->fromUnicode(query);
1900
 
 
1901
 
    QCString qcs = query.local8Bit();
1902
 
    #ifdef QGISDEBUG
1903
 
    std::cerr << "qcs: " << qcs << std::endl;
1904
 
    #endif
1905
 
    
1906
 
    char *cs = new char[qcs.length() + 1];
1907
 
    strcpy(cs, (const char *)qcs);
1908
 
    db_set_string (&dbstr, cs );
1909
 
    delete[] cs;
1910
 
    
1911
 
    #ifdef QGISDEBUG
1912
 
    std::cerr << "SQL: " << db_get_string(&dbstr) << std::endl;
1913
 
    #endif
1914
 
 
1915
 
    int ret = db_execute_immediate (driver, &dbstr);
1916
 
 
1917
 
    if ( ret != DB_OK) { 
1918
 
        std::cerr << "Error: " <<  db_get_error_msg() << std::endl;
1919
 
        error->setLatin1( db_get_error_msg() );
1920
 
    }
1921
 
 
1922
 
    db_close_database_shutdown_driver ( driver );
1923
 
    db_free_string(&dbstr);
1924
 
 
1925
 
    return error;
1926
 
}
1927
 
 
1928
 
int QgsGrassProvider::numDbLinks ( void )
1929
 
{
1930
 
    #ifdef QGISDEBUG
1931
 
    std::cerr << "QgsGrassProvider::numDbLinks()" << std::endl;
1932
 
    #endif
1933
 
 
1934
 
    return ( Vect_get_num_dblinks(mMap) );
1935
 
}
1936
 
 
1937
 
int QgsGrassProvider::dbLinkField ( int link )
1938
 
{
1939
 
    #ifdef QGISDEBUG
1940
 
    std::cerr << "QgsGrassProvider::dbLinkField()" << std::endl;
1941
 
    #endif
1942
 
 
1943
 
    struct  field_info *fi = Vect_get_dblink ( mMap, link );
1944
 
 
1945
 
    if ( fi == NULL ) return 0;
1946
 
 
1947
 
    return ( fi->number );
1948
 
}
1949
 
 
1950
 
 
1951
 
 
1952
 
QString *QgsGrassProvider::createTable ( int field, const QString &key, const QString &columns )
1953
 
{
1954
 
    #ifdef QGISDEBUG
1955
 
    std::cerr << "QgsGrassProvider::createTable() field = " << field << std::endl;
1956
 
    #endif
1957
 
 
1958
 
    QString *error = new QString();
1959
 
    struct  field_info *fi = Vect_get_field( mMap, field); // should work also with field = 0
1960
 
 
1961
 
    // Read attributes
1962
 
    if ( fi != NULL ) {
1963
 
        #ifdef QGISDEBUG
1964
 
        std::cerr << "The table for this field already exists" << std::endl;
1965
 
        #endif
1966
 
        error->setLatin1( "The table for this field already exists" );
1967
 
        return error;
1968
 
    }
1969
 
 
1970
 
    #ifdef QGISDEBUG
1971
 
    std::cerr << "Field info not found -> create new table" << std::endl;
1972
 
    #endif
1973
 
 
1974
 
    int nLinks = Vect_get_num_dblinks( mMap );
1975
 
    if ( nLinks == 0 ) {
1976
 
        fi = Vect_default_field_info ( mMap, field, NULL, GV_1TABLE );
1977
 
    } else {
1978
 
        fi = Vect_default_field_info ( mMap, field, NULL, GV_MTABLE );
1979
 
    }
1980
 
    
1981
 
    QgsGrass::setMapset ( mGisdbase, mLocation, mMapset ); 
1982
 
    dbDriver *driver = db_start_driver_open_database ( fi->driver, fi->database );
1983
 
 
1984
 
    if ( driver == NULL ) {
1985
 
        std::cerr << "Cannot open database " << fi->database << " by driver " << fi->driver << std::endl;
1986
 
        error->setAscii("Cannot open database");
1987
 
        return error;
1988
 
    }
1989
 
 
1990
 
    #ifdef QGISDEBUG
1991
 
    std::cerr << "Database opened -> create table" << std::endl;
1992
 
    #endif
1993
 
 
1994
 
    dbString dbstr; 
1995
 
    db_init_string (&dbstr);
1996
 
    QString query;
1997
 
    
1998
 
    query.sprintf("create table %s ( %s )", fi->table, columns.latin1() );
1999
 
    db_set_string (&dbstr, (char *)query.latin1());
2000
 
    
2001
 
    #ifdef QGISDEBUG
2002
 
    std::cerr << "SQL: " << db_get_string(&dbstr) << std::endl;
2003
 
    #endif
2004
 
 
2005
 
    int ret = db_execute_immediate (driver, &dbstr);
2006
 
 
2007
 
    if ( ret != DB_OK) { 
2008
 
        std::cerr << "Error: " <<  db_get_error_msg() << std::endl;
2009
 
        error->setLatin1( db_get_error_msg() );
2010
 
    }
2011
 
 
2012
 
    db_close_database_shutdown_driver ( driver );
2013
 
    db_free_string(&dbstr);
2014
 
 
2015
 
    if ( !error->isEmpty() ) return error;
2016
 
 
2017
 
    ret = Vect_map_add_dblink ( mMap, field, NULL, fi->table, (char *)key.latin1(), 
2018
 
                                    fi->database, fi->driver);
2019
 
 
2020
 
    if ( ret == -1 ) { 
2021
 
        std::cerr << "Error: Cannot add dblink" << std::endl;
2022
 
        error->setLatin1( "Cannot create link to the table. The table was created!" );
2023
 
    }
2024
 
 
2025
 
    return error;
2026
 
}
2027
 
 
2028
 
QString *QgsGrassProvider::addColumn ( int field, const QString &column )
2029
 
{
2030
 
    #ifdef QGISDEBUG
2031
 
    std::cerr << "QgsGrassProvider::addColumn() field = " << field << std::endl;
2032
 
    #endif
2033
 
 
2034
 
    QString *error = new QString();
2035
 
    struct  field_info *fi = Vect_get_field( mMap, field); // should work also with field = 0
2036
 
 
2037
 
    // Read attributes
2038
 
    if ( fi == NULL ) {
2039
 
        #ifdef QGISDEBUG
2040
 
        std::cerr << "No field info" << std::endl;
2041
 
        #endif
2042
 
        error->setLatin1( "Cannot get field info" );
2043
 
        return error;
2044
 
    }
2045
 
 
2046
 
    #ifdef QGISDEBUG
2047
 
    std::cerr << "Field info found -> open database" << std::endl;
2048
 
    #endif
2049
 
    QgsGrass::setMapset ( mGisdbase, mLocation, mMapset ); 
2050
 
    dbDriver *driver = db_start_driver_open_database ( fi->driver, fi->database );
2051
 
 
2052
 
    if ( driver == NULL ) {
2053
 
        std::cerr << "Cannot open database " << fi->database << " by driver " << fi->driver << std::endl;
2054
 
        error->setAscii("Cannot open database");
2055
 
        return error;
2056
 
    }
2057
 
 
2058
 
    #ifdef QGISDEBUG
2059
 
    std::cerr << "Database opened -> add column" << std::endl;
2060
 
    #endif
2061
 
 
2062
 
    dbString dbstr; 
2063
 
    db_init_string (&dbstr);
2064
 
    QString query;
2065
 
    
2066
 
    query.sprintf("alter table %s add column %s", fi->table, column.latin1() );
2067
 
    db_set_string (&dbstr, (char *)query.latin1());
2068
 
    
2069
 
    #ifdef QGISDEBUG
2070
 
    std::cerr << "SQL: " << db_get_string(&dbstr) << std::endl;
2071
 
    #endif
2072
 
 
2073
 
    int ret = db_execute_immediate (driver, &dbstr);
2074
 
 
2075
 
    if ( ret != DB_OK) { 
2076
 
        std::cerr << "Error: " <<  db_get_error_msg() << std::endl;
2077
 
        error->setLatin1( db_get_error_msg() );
2078
 
    }
2079
 
 
2080
 
    db_close_database_shutdown_driver ( driver );
2081
 
    db_free_string(&dbstr);
2082
 
 
2083
 
    return error;
2084
 
}
2085
 
 
2086
 
QString *QgsGrassProvider::insertAttributes ( int field, int cat )
2087
 
{
2088
 
    #ifdef QGISDEBUG
2089
 
    std::cerr << "QgsGrassProvider::insertAttributes() field = " << field << " cat = " << cat << std::endl;
2090
 
    #endif
2091
 
 
2092
 
    QString *error = new QString();
2093
 
    struct  field_info *fi = Vect_get_field( mMap, field); // should work also with field = 0
2094
 
 
2095
 
    // Read attributes
2096
 
    if ( fi == NULL ) {
2097
 
        #ifdef QGISDEBUG
2098
 
        std::cerr << "No field info -> no attributes" << std::endl;
2099
 
        #endif
2100
 
        error->setLatin1( "Cannot get field info" );
2101
 
        return error;
2102
 
    }
2103
 
 
2104
 
    #ifdef QGISDEBUG
2105
 
    std::cerr << "Field info found -> open database" << std::endl;
2106
 
    #endif
2107
 
    QgsGrass::setMapset ( mGisdbase, mLocation, mMapset ); 
2108
 
    dbDriver *driver = db_start_driver_open_database ( fi->driver, fi->database );
2109
 
 
2110
 
    if ( driver == NULL ) {
2111
 
        std::cerr << "Cannot open database " << fi->database << " by driver " << fi->driver << std::endl;
2112
 
        error->setAscii("Cannot open database");
2113
 
        return error;
2114
 
    }
2115
 
 
2116
 
    #ifdef QGISDEBUG
2117
 
    std::cerr << "Database opened -> insert new record" << std::endl;
2118
 
    #endif
2119
 
 
2120
 
    dbString dbstr; 
2121
 
    db_init_string (&dbstr);
2122
 
    QString query;
2123
 
    
2124
 
    query.sprintf("insert into %s ( %s ) values ( %d )", fi->table, fi->key, cat );
2125
 
    db_set_string (&dbstr, (char *)query.latin1());
2126
 
    
2127
 
    #ifdef QGISDEBUG
2128
 
    std::cerr << "SQL: " << db_get_string(&dbstr) << std::endl;
2129
 
    #endif
2130
 
 
2131
 
    int ret = db_execute_immediate (driver, &dbstr);
2132
 
 
2133
 
    if ( ret != DB_OK) { 
2134
 
        std::cerr << "Error: " <<  db_get_error_msg() << std::endl;
2135
 
        error->setLatin1( db_get_error_msg() );
2136
 
    }
2137
 
 
2138
 
    db_close_database_shutdown_driver ( driver );
2139
 
    db_free_string(&dbstr);
2140
 
 
2141
 
    return error;
2142
 
}
2143
 
 
2144
 
 
2145
 
// -------------------------------------------------------------------------------
2146
 
 
2147
 
int QgsGrassProvider::cidxGetNumFields( ) 
2148
 
{
2149
 
    return ( Vect_cidx_get_num_fields(mMap) );
2150
 
}
2151
 
 
2152
 
int QgsGrassProvider::cidxGetFieldNumber( int idx ) 
2153
 
{
2154
 
    return ( Vect_cidx_get_field_number(mMap, idx) );
2155
 
}
2156
 
 
2157
 
int QgsGrassProvider::cidxGetMaxCat( int idx ) 
2158
 
{
2159
 
    int ncats = Vect_cidx_get_num_cats_by_index ( mMap, idx);
2160
 
 
2161
 
    int cat, type, id;
2162
 
    Vect_cidx_get_cat_by_index ( mMap, idx, ncats-1, &cat, &type, &id );
2163
 
    
2164
 
    return ( cat );
2165
 
}
2166