summaryrefslogtreecommitdiff
path: root/fontconvert/output-gf.c
blob: 9a6417121708ca5615db4524003cc88f9cfdae4a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
/* output-gf.c: write a GF file.

Copyright (C) 1992 Free Software Foundation, Inc.

This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */

#include "config.h"

#include "filename.h"
#include "gf.h"
#include "report.h"

#include "output-gf.h"

/* The basename of the input file.  */
static string input_basename;

/* Open the output file and write the preamble.  We don't bother to
   change the comment to identify ourselves, since the changes we will
   make aren't likely to be drastic.  We have to ensure that we do not
   overwrite the input file; if INPUT_NAME and our constructed output
   name do refer to the same file, we simply prepend an `x' to the
   output name.  Not very elegant, but it does solve the problem.  */

void
gf_start_output (string input_name, const_string output_name, string dpi,
                 string comment)
{
  string gf_name = extend_filename (output_name, concat (dpi, "gf"));
  
  if (same_file_p (input_name, gf_name))
    {
      string old_gf_name = gf_name;
      
      gf_name = make_prefix ("x", gf_name);
      WARNING2 ("fontconvert: The output file (%s) is also the \
the input file, so I am writing to `%s'", old_gf_name, gf_name);
    }

  if (!gf_open_output_file (gf_name))
    FATAL_PERROR (gf_name);
  
  gf_put_preamble (comment);
  
  /* We might need this in `gf_finish_output', to open the TFM file.  */
  input_basename = basename (input_name);
}

/* Write a single character.   */

void
gf_output_char (char_info_type c, real design_size_ratio)
{
  gf_char_type gf_char;
  
  GF_CHARCODE (gf_char) = CHARCODE (c);
  GF_BITMAP (gf_char) = CHAR_BITMAP (c);
  GF_CHAR_BB (gf_char) = CHAR_BB (c);
  GF_H_ESCAPEMENT (gf_char) = CHAR_SET_WIDTH (c);
  GF_TFM_WIDTH (gf_char) = design_size_ratio * CHAR_TFM_WIDTH (c);
  
  gf_put_char (gf_char);
}

/* Write the postamble and close the file.  */


void
gf_finish_output (real design_size, real dpi)
{
  gf_put_postamble (real_to_fix (design_size), dpi, dpi);
  gf_close_output_file ();
}