src/troff/hvunits.h

   1 /*@
   2  * Copyright (c) 2014 - 2015 Steffen (Daode) Nurpmeso <sdaoden@users.sf.net>.
   3  *
   4  * Copyright (C) 1989 - 1992 Free Software Foundation, Inc.
   5  *      Written by James Clark (jjc@jclark.com)
   6  *
   7  * This is free software; you can redistribute it and/or modify it under
   8  * the terms of the GNU General Public License as published by the Free
   9  * Software Foundation; either version 2, or (at your option) any later
  10  * version.
  11  *
  12  * This is distributed in the hope that it will be useful, but WITHOUT ANY
  13  * WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  15  * for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along
  18  * with groff; see the file COPYING.  If not, write to the Free Software
  19  * Foundation, 51 Franklin St - Fifth Floor, Boston, MA 02110-1301, USA.
  20  */
  21 #ifndef _HVUNITS_H
  22 #define _HVUNITS_H
  23
  24 #include "config.h"
  25 #include "troff-config.h"
  26
  27 class vunits
  28 {
  29   friend inline vunits scale(vunits n, units x, units y); // scale n by x/y
  30   friend inline vunits scale(vunits n, vunits x, vunits y);
  31   friend inline vunits operator +(const vunits&, const vunits&);
  32   friend inline vunits operator -(const vunits&, const vunits&);
  33   friend inline vunits operator -(const vunits&);
  34   friend inline int operator /(const vunits&, const vunits&);
  35   friend inline vunits operator /(const vunits&, int);
  36   friend inline vunits operator *(const vunits&, int);
  37   friend inline vunits operator *(int, const vunits&);
  38   friend inline int operator <(const vunits&, const vunits&);
  39   friend inline int operator >(const vunits&, const vunits&);
  40   friend inline int operator <=(const vunits&, const vunits&);
  41   friend inline int operator >=(const vunits&, const vunits&);
  42   friend inline int operator ==(const vunits&, const vunits&);
  43   friend inline int operator !=(const vunits&, const vunits&);
  44
  45   int n;
  46
  47 public:
  48   vunits();
  49   vunits(units);
  50   units to_units();
  51   int is_zero();
  52   vunits& operator+=(const vunits&);
  53   vunits& operator-=(const vunits&);
  54 };
  55
  56 extern vunits V0;
  57
  58 class hunits
  59 {
  60   friend inline hunits scale(hunits n, units x, units y); // scale n by x/y
  61   friend inline hunits scale(hunits n, double x);
  62   friend inline hunits operator +(const hunits&, const hunits&);
  63   friend inline hunits operator -(const hunits&, const hunits&);
  64   friend inline hunits operator -(const hunits&);
  65   friend inline int operator /(const hunits&, const hunits&);
  66   friend inline hunits operator /(const hunits&, int);
  67   friend inline hunits operator *(const hunits&, int);
  68   friend inline hunits operator *(int, const hunits&);
  69   friend inline int operator <(const hunits&, const hunits&);
  70   friend inline int operator >(const hunits&, const hunits&);
  71   friend inline int operator <=(const hunits&, const hunits&);
  72   friend inline int operator >=(const hunits&, const hunits&);
  73   friend inline int operator ==(const hunits&, const hunits&);
  74   friend inline int operator !=(const hunits&, const hunits&);
  75
  76   int n;
  77
  78 public:
  79   hunits();
  80   hunits(units);
  81   units to_units();
  82   int is_zero();
  83   hunits& operator+=(const hunits&);
  84   hunits& operator-=(const hunits&);
  85 };
  86
  87 extern hunits H0;
  88
  89 extern int get_vunits(vunits *, unsigned char si);
  90 extern int get_hunits(hunits *, unsigned char si);
  91 extern int get_vunits(vunits *, unsigned char si, vunits prev_value);
  92 extern int get_hunits(hunits *, unsigned char si, hunits prev_value);
  93
  94 inline vunits:: vunits() : n(0)
  95 {
  96 }
  97
  98 inline units vunits::to_units()
  99 {
 100   return n*vresolution;
 101 }
 102
 103 inline int vunits::is_zero()
 104 {
 105   return n == 0;
 106 }
 107
 108 inline vunits operator +(const vunits & x, const vunits & y)
 109 {
 110   vunits r;
 111   r = x;
 112   r.n += y.n;
 113   return r;
 114 }
 115
 116 inline vunits operator -(const vunits & x, const vunits & y)
 117 {
 118   vunits r;
 119   r = x;
 120   r.n -= y.n;
 121   return r;
 122 }
 123
 124 inline vunits operator -(const vunits & x)
 125 {
 126   vunits r;
 127   r.n = -x.n;
 128   return r;
 129 }
 130
 131 inline int operator /(const vunits & x, const vunits & y)
 132 {
 133   return x.n/y.n;
 134 }
 135
 136 inline vunits operator /(const vunits & x, int n)
 137 {
 138   vunits r;
 139   r = x;
 140   r.n /= n;
 141   return r;
 142 }
 143
 144 inline vunits operator *(const vunits & x, int n)
 145 {
 146   vunits r;
 147   r = x;
 148   r.n *= n;
 149   return r;
 150 }
 151
 152 inline vunits operator *(int n, const vunits & x)
 153 {
 154   vunits r;
 155   r = x;
 156   r.n *= n;
 157   return r;
 158 }
 159
 160 inline int operator <(const vunits & x, const vunits & y)
 161 {
 162   return x.n < y.n;
 163 }
 164
 165 inline int operator >(const vunits & x, const vunits & y)
 166 {
 167   return x.n > y.n;
 168 }
 169
 170 inline int operator <=(const vunits & x, const vunits & y)
 171 {
 172   return x.n <= y.n;
 173 }
 174
 175 inline int operator >=(const vunits & x, const vunits & y)
 176 {
 177   return x.n >= y.n;
 178 }
 179
 180 inline int operator ==(const vunits & x, const vunits & y)
 181 {
 182   return x.n == y.n;
 183 }
 184
 185 inline int operator !=(const vunits & x, const vunits & y)
 186 {
 187   return x.n != y.n;
 188 }
 189
 190
 191 inline vunits& vunits::operator+=(const vunits & x)
 192 {
 193   n += x.n;
 194   return *this;
 195 }
 196
 197 inline vunits& vunits::operator-=(const vunits & x)
 198 {
 199   n -= x.n;
 200   return *this;
 201 }
 202
 203 inline hunits:: hunits() : n(0)
 204 {
 205 }
 206
 207 inline units hunits::to_units()
 208 {
 209   return n*hresolution;
 210 }
 211
 212 inline int hunits::is_zero()
 213 {
 214   return n == 0;
 215 }
 216
 217 inline hunits operator +(const hunits & x, const hunits & y)
 218 {
 219   hunits r;
 220   r = x;
 221   r.n += y.n;
 222   return r;
 223 }
 224
 225 inline hunits operator -(const hunits & x, const hunits & y)
 226 {
 227   hunits r;
 228   r = x;
 229   r.n -= y.n;
 230   return r;
 231 }
 232
 233 inline hunits operator -(const hunits & x)
 234 {
 235   hunits r;
 236   r = x;
 237   r.n = -x.n;
 238   return r;
 239 }
 240
 241 inline int operator /(const hunits & x, const hunits & y)
 242 {
 243   return x.n/y.n;
 244 }
 245
 246 inline hunits operator /(const hunits & x, int n)
 247 {
 248   hunits r;
 249   r = x;
 250   r.n /= n;
 251   return r;
 252 }
 253
 254 inline hunits operator *(const hunits & x, int n)
 255 {
 256   hunits r;
 257   r = x;
 258   r.n *= n;
 259   return r;
 260 }
 261
 262 inline hunits operator *(int n, const hunits & x)
 263 {
 264   hunits r;
 265   r = x;
 266   r.n *= n;
 267   return r;
 268 }
 269
 270 inline int operator <(const hunits & x, const hunits & y)
 271 {
 272   return x.n < y.n;
 273 }
 274
 275 inline int operator >(const hunits & x, const hunits & y)
 276 {
 277   return x.n > y.n;
 278 }
 279
 280 inline int operator <=(const hunits & x, const hunits & y)
 281 {
 282   return x.n <= y.n;
 283 }
 284
 285 inline int operator >=(const hunits & x, const hunits & y)
 286 {
 287   return x.n >= y.n;
 288 }
 289
 290 inline int operator ==(const hunits & x, const hunits & y)
 291 {
 292   return x.n == y.n;
 293 }
 294
 295 inline int operator !=(const hunits & x, const hunits & y)
 296 {
 297   return x.n != y.n;
 298 }
 299
 300 inline hunits& hunits::operator+=(const hunits & x)
 301 {
 302   n += x.n;
 303   return *this;
 304 }
 305
 306 inline hunits& hunits::operator-=(const hunits & x)
 307 {
 308   n -= x.n;
 309   return *this;
 310 }
 311
 312 inline hunits scale(hunits n, units x, units y)
 313 {
 314   hunits r;
 315   r.n = scale(n.n, x, y);
 316   return r;
 317 }
 318
 319 inline vunits scale(vunits n, units x, units y)
 320 {
 321   vunits r;
 322   r.n = scale(n.n, x, y);
 323   return r;
 324 }
 325
 326 inline vunits scale(vunits n, vunits x, vunits y)
 327 {
 328   vunits r;
 329   r.n = scale(n.n, x.n, y.n);
 330   return r;
 331 }
 332
 333 inline hunits scale(hunits n, double x)
 334 {
 335   hunits r;
 336   r.n = int(n.n*x);
 337   return r;
 338 }
 339
 340 inline units scale(units n, double x)
 341 {
 342   return int(n*x);
 343 }
 344
 345 inline units points_to_units(units n)
 346 {
 347   return scale(n, units_per_inch, 72);
 348 }
 349
 350 #endif // _HVUNITS_H
 351 // s-it2-mode