← Back to branch summary

~ubuntu-branches/ubuntu/precise/grass/precise

« back to all changes in this revision

Viewing changes to scripts/d.rast.leg/d.rast.leg

  • Committer: Bazaar Package Importer
  • Author(s): Francesco Paolo Lovergine
  • Date: 2011-04-13 17:08:41 UTC
  • mfrom: (8.1.7 sid)
  • Revision ID: james.westby@ubuntu.com-20110413170841-ss1t9bic0d0uq0gz
Tags: 6.4.1-1
* New upstream version.
* Now build-dep on libjpeg-dev and current libreadline6-dev.
* Removed patch swig: obsolete.
* Policy bumped to 3.9.2, without changes.

Show diffs side-by-side

added added

removed removed

Lines of Context:
scripts/d.rast.leg/d.rast.leg
51
51
#% key: map
52
52
#% type: string
53
53
#% gisprompt: old,cell,raster
54
 
#% description: Name of raster map
 
54
#% description: Name of raster map to display
55
55
#% required : yes
56
56
#%end
57
57
#%option
77
77
#% key: position
78
78
#% type: double
79
79
#% description: Position of vertical map-legend separator (in percent)
80
 
#% answer: 65
 
80
#% answer: 80
81
81
#% required : no
82
82
#%end
83
83
 
84
84
if test "$GISBASE" = ""; then
85
 
 echo "You must be in GRASS GIS to run this program." >&2
86
 
 exit 1
 
85
    echo "You must be in GRASS GIS to run this program." >&2
 
86
    exit 1
87
87
fi
88
88
 
89
89
if [ "$1" != "@ARGS_PARSED@" ] ; then
90
 
  exec g.parser "$0" "$@"
 
90
    exec g.parser "$0" "$@"
91
91
fi
92
92
 
93
93
if [ $GIS_FLAG_N -eq 1 ] ; then
94
94
  OMIT="-n"
 
95
else
 
96
  OMIT=""
95
97
fi
96
98
 
97
99
if [ $GIS_FLAG_F -eq 1 ] ; then
111
113
   exit 1
112
114
fi
113
115
filemapset="${mapset}"
 
116
# would it be better to search for cats/ file ??
114
117
eval `g.gisenv`
115
118
HISTFILEDIR=$GISDBASE/$LOCATION_NAME/$filemapset/cell_misc/
 
119
eval `r.info -t "$GIS_OPT_MAP"`
116
120
 
117
121
# for rast=
118
 
if [ ! -z $GIS_OPT_RAST ] ; then 
119
 
        eval `g.findfile el=cell file=$GIS_OPT_RAST`
120
 
        if [ ! "$file" ] ; then
121
 
           g.message -e "Raster map '$GIS_OPT_RAST' not found in mapset search path"
122
 
           exit 1
123
 
        fi
 
122
if [ -n "$GIS_OPT_RAST" ] ; then
 
123
    eval `g.findfile el=cell file="$GIS_OPT_RAST"`
 
124
    if [ ! "$file" ] ; then
 
125
        g.message -e "Raster map '$GIS_OPT_RAST' not found in mapset search path"
 
126
        exit 1
 
127
    else
 
128
        eval `r.info -t "$GIS_OPT_RAST"`
 
129
    fi
124
130
fi
125
131
 
 
132
 
126
133
# save defined font setting
127
134
FONTCMD=`d.frame -l | grep d.font | sed 's+"++1'| sed 's+"++1'`
128
135
d.frame -e
133
140
XPOS=$GIS_OPT_POSITION
134
141
 
135
142
#at=bottom,top,left,right
136
 
 
137
 
if [ -z "$GIS_OPT_NUM_OF_LINES" ]
138
 
then
139
 
 
140
 
       #draw title
141
 
        d.frame -s at=90,100,$XPOS,100  frame=title
142
 
#       if test -f $GISBASE/bin/d.text.freetype ; then
143
 
#          d.text.freetype -sp text=$GIS_OPT_MAP col=black size=18 \
144
 
#                east_north=20,20 path=/usr/X11R6/lib/X11/fonts/TTF/luximb.ttf
145
 
#       else
146
 
          echo "$MAPNAME" | d.text col=black size=30
147
 
#       fi
148
 
 
149
 
       #draw legend
150
 
        d.frame -s at=0,90,$XPOS,100 frame=right
151
 
        if [ -z $GIS_OPT_RAST ] ; then
152
 
                if test -f $HISTFILEDIR/$GIS_OPT_MAP/histogram ; then
153
 
                     d.legend $FLIP -n map=$GIS_OPT_MAP
154
 
                else
155
 
                     d.legend $FLIP $OMIT map=$GIS_OPT_MAP
156
 
                fi
157
 
        else
158
 
                if test -f $HISTFILEDIR/$GIS_OPT_RAST/histogram ; then
159
 
                     d.legend $FLIP -n map=$GIS_OPT_RAST
160
 
                else
161
 
                     d.legend $FLIP $OMIT map=$GIS_OPT_RAST
162
 
                fi
163
 
        fi
164
 
 
165
 
       #draw map
166
 
        d.frame -s at=0,100,0,$XPOS frame=left
167
 
        d.rast map=$GIS_OPT_MAP
168
 
 
169
 
else
170
 
 
171
 
       #draw title
172
 
        d.frame -s at=90,100,$XPOS,100 frame=title
173
 
#       if test -f $GISBASE/bin/d.text.freetype ; then
174
 
#          d.text.freetype -sp text=$GIS_OPT_MAP col=black size=18 \
175
 
#                east_north=20,20 path=/usr/X11R6/lib/X11/fonts/TTF/luximb.ttf
176
 
#       else
177
 
          echo "$MAPNAME" | d.text col=black size=30
178
 
#       fi
179
 
 
180
 
       #draw legend
181
 
        d.frame -s at=0,90,$XPOS,100 frame=right
182
 
        if [ -z $GIS_OPT_RAST ] ; then
183
 
                if test -f $HISTFILEDIR/$GIS_OPT_MAP/histogram ; then
184
 
                     d.legend $FLIP -n map=$GIS_OPT_MAP lines=$GIS_OPT_NUM_OF_LINES
185
 
                else
186
 
                     d.legend $FLIP $OMIT map=$GIS_OPT_MAP
187
 
                fi
188
 
        else
189
 
                if test -f $HISTFILEDIR/$GIS_OPT_RAST/histogram ; then
190
 
                     d.legend $FLIP -n map=$GIS_OPT_RAST lines=$GIS_OPT_NUM_OF_LINES
191
 
                else
192
 
                     d.legend $FLIP $OMIT map=$GIS_OPT_RAST
193
 
                fi
194
 
        fi
195
 
 
196
 
       #draw map
197
 
        d.frame -s at=0,100,0,$XPOS frame=left
198
 
        d.rast map=$GIS_OPT_MAP
 
143
if [ "$datatype" = "CELL" ] ; then
 
144
    # using at= turns off automatic font resize to fit in frame
 
145
    LEG_AT=""
 
146
else
 
147
    LEG_AT="at=7,93,3,18"
 
148
fi
 
149
 
 
150
 
 
151
if [ -z "$GIS_OPT_NUM_OF_LINES" ] ; then
 
152
       #draw title
 
153
        d.frame -s at=90,100,$XPOS,100  frame=title
 
154
        echo "$MAPNAME" | d.text col=black size=30
 
155
 
 
156
       #draw legend
 
157
        d.frame -s at=0,90,$XPOS,100 frame=right
 
158
        if [ -z "$GIS_OPT_RAST" ] ; then
 
159
                g.message -d "No lines; own legend"
 
160
                if test -f $HISTFILEDIR/$GIS_OPT_MAP/histogram ; then
 
161
                     d.legend $FLIP -n map="$GIS_OPT_MAP" $LEG_AT
 
162
                else
 
163
                     d.legend $FLIP $OMIT map="$GIS_OPT_MAP" $LEG_AT
 
164
                fi
 
165
        else
 
166
                g.message -d "No lines; external legend"
 
167
                if test -f $HISTFILEDIR/$GIS_OPT_RAST/histogram ; then
 
168
                     d.legend $FLIP -n map="$GIS_OPT_RAST" $LEG_AT
 
169
                else
 
170
                     d.legend $FLIP $OMIT map="$GIS_OPT_RAST" $LEG_AT
 
171
                fi
 
172
        fi
 
173
 
 
174
       #draw map
 
175
        d.frame -s at=0,100,0,$XPOS frame=left
 
176
        d.rast map=$GIS_OPT_MAP
 
177
 
 
178
else
 
179
 
 
180
       #draw title
 
181
        d.frame -s at=90,100,$XPOS,100 frame=title
 
182
        echo "$MAPNAME" | d.text col=black size=30
 
183
 
 
184
       #draw legend
 
185
        d.frame -s at=0,90,$XPOS,100 frame=right
 
186
        if [ -z "$GIS_OPT_RAST" ] ; then
 
187
                g.message -d message="Lines=$GIS_OPT_NUM_OF_LINES; own legend"
 
188
                if test -f $HISTFILEDIR/$GIS_OPT_MAP/histogram ; then
 
189
                     d.legend $FLIP -n map="$GIS_OPT_MAP" \
 
190
                        lines="$GIS_OPT_NUM_OF_LINES" $LEG_AT
 
191
                else
 
192
                     d.legend $FLIP $OMIT map="$GIS_OPT_MAP" $LEG_AT
 
193
                fi
 
194
        else
 
195
                g.message -d message="Lines=$GIS_OPT_NUM_OF_LINES; external legend"
 
196
                if test -f $HISTFILEDIR/$GIS_OPT_RAST/histogram ; then
 
197
                     d.legend $FLIP -n map="$GIS_OPT_RAST" \
 
198
                        lines="$GIS_OPT_NUM_OF_LINES" $LEG_AT
 
199
                else
 
200
                     d.legend $FLIP $OMIT map="$GIS_OPT_RAST" $LEG_AT
 
201
                fi
 
202
        fi
 
203
 
 
204
       #draw map
 
205
        d.frame -s at=0,100,0,$XPOS frame=left
 
206
        d.rast map="$GIS_OPT_MAP"
199
207
fi
200
208
 
201
209