annotate src/hardcopy.c @ 1920:3dfff6a80088 v7.2.217

updated for version 7.2-217
author vimboss
date Wed, 24 Jun 2009 16:08:18 +0000
parents e5602d92da8c
children cccb71c2c5c1
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1 /* vi:set ts=8 sts=4 sw=4:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3 * VIM - Vi IMproved by Bram Moolenaar
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
4 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
5 * Do ":help uganda" in Vim to read copying and usage conditions.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
6 * Do ":help credits" in Vim to see a list of people who contributed.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
7 * See README.txt for an overview of the Vim source code.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
8 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
9
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
10 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
11 * hardcopy.c: printing to paper
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
12 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
13
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
14 #include "vim.h"
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
15 #include "version.h"
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
16
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
17 #if defined(FEAT_PRINTER) || defined(PROTO)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
18 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
19 * To implement printing on a platform, the following functions must be
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
20 * defined:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
21 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
22 * int mch_print_init(prt_settings_T *psettings, char_u *jobname, int forceit)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
23 * Called once. Code should display printer dialogue (if appropriate) and
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
24 * determine printer font and margin settings. Reset has_color if the printer
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
25 * doesn't support colors at all.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
26 * Returns FAIL to abort.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
27 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
28 * int mch_print_begin(prt_settings_T *settings)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
29 * Called to start the print job.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
30 * Return FALSE to abort.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
31 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
32 * int mch_print_begin_page(char_u *msg)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
33 * Called at the start of each page.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
34 * "msg" indicates the progress of the print job, can be NULL.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
35 * Return FALSE to abort.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
36 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
37 * int mch_print_end_page()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
38 * Called at the end of each page.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
39 * Return FALSE to abort.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
40 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
41 * int mch_print_blank_page()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
42 * Called to generate a blank page for collated, duplex, multiple copy
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
43 * document. Return FALSE to abort.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
44 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
45 * void mch_print_end(prt_settings_T *psettings)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
46 * Called at normal end of print job.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
47 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
48 * void mch_print_cleanup()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
49 * Called if print job ends normally or is abandoned. Free any memory, close
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
50 * devices and handles. Also called when mch_print_begin() fails, but not
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
51 * when mch_print_init() fails.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
52 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
53 * void mch_print_set_font(int Bold, int Italic, int Underline);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
54 * Called whenever the font style changes.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
55 *
843
9f279ebda751 updated for version 7.0f01
vimboss
parents: 840
diff changeset
56 * void mch_print_set_bg(long_u bgcol);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
57 * Called to set the background color for the following text. Parameter is an
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
58 * RGB value.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
59 *
843
9f279ebda751 updated for version 7.0f01
vimboss
parents: 840
diff changeset
60 * void mch_print_set_fg(long_u fgcol);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
61 * Called to set the foreground color for the following text. Parameter is an
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
62 * RGB value.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
63 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
64 * mch_print_start_line(int margin, int page_line)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
65 * Sets the current position at the start of line "page_line".
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
66 * If margin is TRUE start in the left margin (for header and line number).
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
67 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
68 * int mch_print_text_out(char_u *p, int len);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
69 * Output one character of text p[len] at the current position.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
70 * Return TRUE if there is no room for another character in the same line.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
71 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
72 * Note that the generic code has no idea of margins. The machine code should
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
73 * simply make the page look smaller! The header and the line numbers are
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
74 * printed in the margin.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
75 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
76
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
77 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
78 static const long_u cterm_color_8[8] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
79 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
80 (long_u)0x000000L, (long_u)0xff0000L, (long_u)0x00ff00L, (long_u)0xffff00L,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
81 (long_u)0x0000ffL, (long_u)0xff00ffL, (long_u)0x00ffffL, (long_u)0xffffffL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
82 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
83
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
84 static const long_u cterm_color_16[16] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
85 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
86 (long_u)0x000000L, (long_u)0x0000c0L, (long_u)0x008000L, (long_u)0x004080L,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
87 (long_u)0xc00000L, (long_u)0xc000c0L, (long_u)0x808000L, (long_u)0xc0c0c0L,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
88 (long_u)0x808080L, (long_u)0x6060ffL, (long_u)0x00ff00L, (long_u)0x00ffffL,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
89 (long_u)0xff8080L, (long_u)0xff40ffL, (long_u)0xffff00L, (long_u)0xffffffL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
90 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
91
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
92 static int current_syn_id;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
93 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
94
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
95 #define PRCOLOR_BLACK (long_u)0
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
96 #define PRCOLOR_WHITE (long_u)0xFFFFFFL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
97
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
98 static int curr_italic;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
99 static int curr_bold;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
100 static int curr_underline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
101 static long_u curr_bg;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
102 static long_u curr_fg;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
103 static int page_count;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
104
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
105 #if defined(FEAT_MBYTE) && defined(FEAT_POSTSCRIPT)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
106 # define OPT_MBFONT_USECOURIER 0
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
107 # define OPT_MBFONT_ASCII 1
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
108 # define OPT_MBFONT_REGULAR 2
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
109 # define OPT_MBFONT_BOLD 3
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
110 # define OPT_MBFONT_OBLIQUE 4
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
111 # define OPT_MBFONT_BOLDOBLIQUE 5
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
112 # define OPT_MBFONT_NUM_OPTIONS 6
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
113
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
114 static option_table_T mbfont_opts[OPT_MBFONT_NUM_OPTIONS] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
115 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
116 {"c", FALSE, 0, NULL, 0, FALSE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
117 {"a", FALSE, 0, NULL, 0, FALSE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
118 {"r", FALSE, 0, NULL, 0, FALSE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
119 {"b", FALSE, 0, NULL, 0, FALSE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
120 {"i", FALSE, 0, NULL, 0, FALSE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
121 {"o", FALSE, 0, NULL, 0, FALSE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
122 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
123 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
124
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
125 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
126 * These values determine the print position on a page.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
127 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
128 typedef struct
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
129 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
130 int lead_spaces; /* remaining spaces for a TAB */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
131 int print_pos; /* virtual column for computing TABs */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
132 colnr_T column; /* byte column */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
133 linenr_T file_line; /* line nr in the buffer */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
134 long_u bytes_printed; /* bytes printed so far */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
135 int ff; /* seen form feed character */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
136 } prt_pos_T;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
137
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
138 static char_u *parse_list_options __ARGS((char_u *option_str, option_table_T *table, int table_size));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
139
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
140 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
141 static long_u darken_rgb __ARGS((long_u rgb));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
142 static long_u prt_get_term_color __ARGS((int colorindex));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
143 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
144 static void prt_set_fg __ARGS((long_u fg));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
145 static void prt_set_bg __ARGS((long_u bg));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
146 static void prt_set_font __ARGS((int bold, int italic, int underline));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
147 static void prt_line_number __ARGS((prt_settings_T *psettings, int page_line, linenr_T lnum));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
148 static void prt_header __ARGS((prt_settings_T *psettings, int pagenum, linenr_T lnum));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
149 static void prt_message __ARGS((char_u *s));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
150 static colnr_T hardcopy_line __ARGS((prt_settings_T *psettings, int page_line, prt_pos_T *ppos));
744
07f7b4a7755c updated for version 7.0222
vimboss
parents: 688
diff changeset
151 #ifdef FEAT_SYN_HL
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
152 static void prt_get_attr __ARGS((int hl_id, prt_text_attr_T* pattr, int modec));
744
07f7b4a7755c updated for version 7.0222
vimboss
parents: 688
diff changeset
153 #endif
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
154
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
155 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
156 * Parse 'printoptions' and set the flags in "printer_opts".
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
157 * Returns an error message or NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
158 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
159 char_u *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
160 parse_printoptions()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
161 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
162 return parse_list_options(p_popt, printer_opts, OPT_PRINT_NUM_OPTIONS);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
163 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
164
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
165 #if (defined(FEAT_MBYTE) && defined(FEAT_POSTSCRIPT)) || defined(PROTO)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
166 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
167 * Parse 'printoptions' and set the flags in "printer_opts".
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
168 * Returns an error message or NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
169 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
170 char_u *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
171 parse_printmbfont()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
172 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
173 return parse_list_options(p_pmfn, mbfont_opts, OPT_MBFONT_NUM_OPTIONS);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
174 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
175 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
176
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
177 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
178 * Parse a list of options in the form
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
179 * option:value,option:value,option:value
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
180 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
181 * "value" can start with a number which is parsed out, e.g. margin:12mm
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
182 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
183 * Returns an error message for an illegal option, NULL otherwise.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
184 * Only used for the printer at the moment...
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
185 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
186 static char_u *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
187 parse_list_options(option_str, table, table_size)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
188 char_u *option_str;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
189 option_table_T *table;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
190 int table_size;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
191 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
192 char_u *stringp;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
193 char_u *colonp;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
194 char_u *commap;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
195 char_u *p;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
196 int idx = 0; /* init for GCC */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
197 int len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
198
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
199 for (idx = 0; idx < table_size; ++idx)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
200 table[idx].present = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
201
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
202 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
203 * Repeat for all comma separated parts.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
204 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
205 stringp = option_str;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
206 while (*stringp)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
207 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
208 colonp = vim_strchr(stringp, ':');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
209 if (colonp == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
210 return (char_u *)N_("E550: Missing colon");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
211 commap = vim_strchr(stringp, ',');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
212 if (commap == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
213 commap = option_str + STRLEN(option_str);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
214
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
215 len = (int)(colonp - stringp);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
216
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
217 for (idx = 0; idx < table_size; ++idx)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
218 if (STRNICMP(stringp, table[idx].name, len) == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
219 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
220
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
221 if (idx == table_size)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
222 return (char_u *)N_("E551: Illegal component");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
223
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
224 p = colonp + 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
225 table[idx].present = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
226
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
227 if (table[idx].hasnum)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
228 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
229 if (!VIM_ISDIGIT(*p))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
230 return (char_u *)N_("E552: digit expected");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
231
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
232 table[idx].number = getdigits(&p); /*advances p*/
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
233 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
234
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
235 table[idx].string = p;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
236 table[idx].strlen = (int)(commap - p);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
237
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
238 stringp = commap;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
239 if (*stringp == ',')
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
240 ++stringp;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
241 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
242
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
243 return NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
244 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
245
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
246
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
247 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
248 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
249 * If using a dark background, the colors will probably be too bright to show
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
250 * up well on white paper, so reduce their brightness.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
251 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
252 static long_u
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
253 darken_rgb(rgb)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
254 long_u rgb;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
255 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
256 return ((rgb >> 17) << 16)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
257 + (((rgb & 0xff00) >> 9) << 8)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
258 + ((rgb & 0xff) >> 1);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
259 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
260
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
261 static long_u
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
262 prt_get_term_color(colorindex)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
263 int colorindex;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
264 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
265 /* TODO: Should check for xterm with 88 or 256 colors. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
266 if (t_colors > 8)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
267 return cterm_color_16[colorindex % 16];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
268 return cterm_color_8[colorindex % 8];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
269 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
270
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
271 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
272 prt_get_attr(hl_id, pattr, modec)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
273 int hl_id;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
274 prt_text_attr_T *pattr;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
275 int modec;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
276 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
277 int colorindex;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
278 long_u fg_color;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
279 long_u bg_color;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
280 char *color;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
281
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
282 pattr->bold = (highlight_has_attr(hl_id, HL_BOLD, modec) != NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
283 pattr->italic = (highlight_has_attr(hl_id, HL_ITALIC, modec) != NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
284 pattr->underline = (highlight_has_attr(hl_id, HL_UNDERLINE, modec) != NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
285 pattr->undercurl = (highlight_has_attr(hl_id, HL_UNDERCURL, modec) != NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
286
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
287 # ifdef FEAT_GUI
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
288 if (gui.in_use)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
289 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
290 bg_color = highlight_gui_color_rgb(hl_id, FALSE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
291 if (bg_color == PRCOLOR_BLACK)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
292 bg_color = PRCOLOR_WHITE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
293
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
294 fg_color = highlight_gui_color_rgb(hl_id, TRUE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
295 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
296 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
297 # endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
298 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
299 bg_color = PRCOLOR_WHITE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
300
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
301 color = (char *)highlight_color(hl_id, (char_u *)"fg", modec);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
302 if (color == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
303 colorindex = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
304 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
305 colorindex = atoi(color);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
306
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
307 if (colorindex >= 0 && colorindex < t_colors)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
308 fg_color = prt_get_term_color(colorindex);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
309 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
310 fg_color = PRCOLOR_BLACK;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
311 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
312
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
313 if (fg_color == PRCOLOR_WHITE)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
314 fg_color = PRCOLOR_BLACK;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
315 else if (*p_bg == 'd')
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
316 fg_color = darken_rgb(fg_color);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
317
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
318 pattr->fg_color = fg_color;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
319 pattr->bg_color = bg_color;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
320 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
321 #endif /* FEAT_SYN_HL */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
322
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
323 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
324 prt_set_fg(fg)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
325 long_u fg;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
326 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
327 if (fg != curr_fg)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
328 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
329 curr_fg = fg;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
330 mch_print_set_fg(fg);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
331 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
332 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
333
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
334 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
335 prt_set_bg(bg)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
336 long_u bg;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
337 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
338 if (bg != curr_bg)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
339 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
340 curr_bg = bg;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
341 mch_print_set_bg(bg);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
342 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
343 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
344
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
345 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
346 prt_set_font(bold, italic, underline)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
347 int bold;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
348 int italic;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
349 int underline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
350 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
351 if (curr_bold != bold
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
352 || curr_italic != italic
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
353 || curr_underline != underline)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
354 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
355 curr_underline = underline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
356 curr_italic = italic;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
357 curr_bold = bold;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
358 mch_print_set_font(bold, italic, underline);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
359 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
360 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
361
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
362 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
363 * Print the line number in the left margin.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
364 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
365 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
366 prt_line_number(psettings, page_line, lnum)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
367 prt_settings_T *psettings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
368 int page_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
369 linenr_T lnum;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
370 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
371 int i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
372 char_u tbuf[20];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
373
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
374 prt_set_fg(psettings->number.fg_color);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
375 prt_set_bg(psettings->number.bg_color);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
376 prt_set_font(psettings->number.bold, psettings->number.italic, psettings->number.underline);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
377 mch_print_start_line(TRUE, page_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
378
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
379 /* Leave two spaces between the number and the text; depends on
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
380 * PRINT_NUMBER_WIDTH. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
381 sprintf((char *)tbuf, "%6ld", (long)lnum);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
382 for (i = 0; i < 6; i++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
383 (void)mch_print_text_out(&tbuf[i], 1);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
384
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
385 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
386 if (psettings->do_syntax)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
387 /* Set colors for next character. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
388 current_syn_id = -1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
389 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
390 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
391 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
392 /* Set colors and font back to normal. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
393 prt_set_fg(PRCOLOR_BLACK);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
394 prt_set_bg(PRCOLOR_WHITE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
395 prt_set_font(FALSE, FALSE, FALSE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
396 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
397 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
398
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
399 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
400 * Get the currently effective header height.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
401 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
402 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
403 prt_header_height()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
404 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
405 if (printer_opts[OPT_PRINT_HEADERHEIGHT].present)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
406 return printer_opts[OPT_PRINT_HEADERHEIGHT].number;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
407 return 2;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
408 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
409
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
410 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
411 * Return TRUE if using a line number for printing.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
412 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
413 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
414 prt_use_number()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
415 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
416 return (printer_opts[OPT_PRINT_NUMBER].present
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
417 && TOLOWER_ASC(printer_opts[OPT_PRINT_NUMBER].string[0]) == 'y');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
418 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
419
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
420 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
421 * Return the unit used in a margin item in 'printoptions'.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
422 * Returns PRT_UNIT_NONE if not recognized.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
423 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
424 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
425 prt_get_unit(idx)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
426 int idx;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
427 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
428 int u = PRT_UNIT_NONE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
429 int i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
430 static char *(units[4]) = PRT_UNIT_NAMES;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
431
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
432 if (printer_opts[idx].present)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
433 for (i = 0; i < 4; ++i)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
434 if (STRNICMP(printer_opts[idx].string, units[i], 2) == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
435 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
436 u = i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
437 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
438 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
439 return u;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
440 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
441
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
442 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
443 * Print the page header.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
444 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
445 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
446 prt_header(psettings, pagenum, lnum)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
447 prt_settings_T *psettings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
448 int pagenum;
1880
e5602d92da8c updated for version 7.2-177
vimboss
parents: 1504
diff changeset
449 linenr_T lnum UNUSED;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
450 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
451 int width = psettings->chars_per_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
452 int page_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
453 char_u *tbuf;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
454 char_u *p;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
455 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
456 int l;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
457 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
458
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
459 /* Also use the space for the line number. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
460 if (prt_use_number())
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
461 width += PRINT_NUMBER_WIDTH;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
462
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
463 tbuf = alloc(width + IOSIZE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
464 if (tbuf == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
465 return;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
466
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
467 #ifdef FEAT_STL_OPT
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
468 if (*p_header != NUL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
469 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
470 linenr_T tmp_lnum, tmp_topline, tmp_botline;
677
e649c78407e6 updated for version 7.0202
vimboss
parents: 499
diff changeset
471 int use_sandbox = FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
472
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
473 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
474 * Need to (temporarily) set current line number and first/last line
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
475 * number on the 'window'. Since we don't know how long the page is,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
476 * set the first and current line number to the top line, and guess
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
477 * that the page length is 64.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
478 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
479 tmp_lnum = curwin->w_cursor.lnum;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
480 tmp_topline = curwin->w_topline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
481 tmp_botline = curwin->w_botline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
482 curwin->w_cursor.lnum = lnum;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
483 curwin->w_topline = lnum;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
484 curwin->w_botline = lnum + 63;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
485 printer_page_num = pagenum;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
486
677
e649c78407e6 updated for version 7.0202
vimboss
parents: 499
diff changeset
487 # ifdef FEAT_EVAL
681
9364d114ed8d updated for version 7.0204
vimboss
parents: 677
diff changeset
488 use_sandbox = was_set_insecurely((char_u *)"printheader", 0);
677
e649c78407e6 updated for version 7.0202
vimboss
parents: 499
diff changeset
489 # endif
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
490 build_stl_str_hl(curwin, tbuf, (size_t)(width + IOSIZE),
677
e649c78407e6 updated for version 7.0202
vimboss
parents: 499
diff changeset
491 p_header, use_sandbox,
681
9364d114ed8d updated for version 7.0204
vimboss
parents: 677
diff changeset
492 ' ', width, NULL, NULL);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
493
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
494 /* Reset line numbers */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
495 curwin->w_cursor.lnum = tmp_lnum;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
496 curwin->w_topline = tmp_topline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
497 curwin->w_botline = tmp_botline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
498 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
499 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
500 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
501 sprintf((char *)tbuf, _("Page %d"), pagenum);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
502
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
503 prt_set_fg(PRCOLOR_BLACK);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
504 prt_set_bg(PRCOLOR_WHITE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
505 prt_set_font(TRUE, FALSE, FALSE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
506
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
507 /* Use a negative line number to indicate printing in the top margin. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
508 page_line = 0 - prt_header_height();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
509 mch_print_start_line(TRUE, page_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
510 for (p = tbuf; *p != NUL; )
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
511 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
512 if (mch_print_text_out(p,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
513 #ifdef FEAT_MBYTE
474
a5fcf36ef512 updated for version 7.0127
vimboss
parents: 442
diff changeset
514 (l = (*mb_ptr2len)(p))
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
515 #else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
516 1
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
517 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
518 ))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
519 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
520 ++page_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
521 if (page_line >= 0) /* out of room in header */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
522 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
523 mch_print_start_line(TRUE, page_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
524 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
525 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
526 p += l;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
527 #else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
528 p++;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
529 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
530 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
531
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
532 vim_free(tbuf);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
533
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
534 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
535 if (psettings->do_syntax)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
536 /* Set colors for next character. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
537 current_syn_id = -1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
538 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
539 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
540 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
541 /* Set colors and font back to normal. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
542 prt_set_fg(PRCOLOR_BLACK);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
543 prt_set_bg(PRCOLOR_WHITE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
544 prt_set_font(FALSE, FALSE, FALSE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
545 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
546 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
547
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
548 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
549 * Display a print status message.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
550 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
551 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
552 prt_message(s)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
553 char_u *s;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
554 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
555 screen_fill((int)Rows - 1, (int)Rows, 0, (int)Columns, ' ', ' ', 0);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
556 screen_puts(s, (int)Rows - 1, 0, hl_attr(HLF_R));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
557 out_flush();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
558 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
559
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
560 void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
561 ex_hardcopy(eap)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
562 exarg_T *eap;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
563 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
564 linenr_T lnum;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
565 int collated_copies, uncollated_copies;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
566 prt_settings_T settings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
567 long_u bytes_to_print = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
568 int page_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
569 int jobsplit;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
570
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
571 memset(&settings, 0, sizeof(prt_settings_T));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
572 settings.has_color = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
573
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
574 # ifdef FEAT_POSTSCRIPT
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
575 if (*eap->arg == '>')
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
576 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
577 char_u *errormsg = NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
578
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
579 /* Expand things like "%.ps". */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
580 if (expand_filename(eap, eap->cmdlinep, &errormsg) == FAIL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
581 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
582 if (errormsg != NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
583 EMSG(errormsg);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
584 return;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
585 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
586 settings.outfile = skipwhite(eap->arg + 1);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
587 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
588 else if (*eap->arg != NUL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
589 settings.arguments = eap->arg;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
590 # endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
591
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
592 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
593 * Initialise for printing. Ask the user for settings, unless forceit is
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
594 * set.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
595 * The mch_print_init() code should set up margins if applicable. (It may
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
596 * not be a real printer - for example the engine might generate HTML or
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
597 * PS.)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
598 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
599 if (mch_print_init(&settings,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
600 curbuf->b_fname == NULL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
601 ? (char_u *)buf_spname(curbuf)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
602 : curbuf->b_sfname == NULL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
603 ? curbuf->b_fname
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
604 : curbuf->b_sfname,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
605 eap->forceit) == FAIL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
606 return;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
607
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
608 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
609 # ifdef FEAT_GUI
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
610 if (gui.in_use)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
611 settings.modec = 'g';
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
612 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
613 # endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
614 if (t_colors > 1)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
615 settings.modec = 'c';
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
616 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
617 settings.modec = 't';
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
618
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
619 if (!syntax_present(curbuf))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
620 settings.do_syntax = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
621 else if (printer_opts[OPT_PRINT_SYNTAX].present
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
622 && TOLOWER_ASC(printer_opts[OPT_PRINT_SYNTAX].string[0]) != 'a')
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
623 settings.do_syntax =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
624 (TOLOWER_ASC(printer_opts[OPT_PRINT_SYNTAX].string[0]) == 'y');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
625 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
626 settings.do_syntax = settings.has_color;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
627 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
628
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
629 /* Set up printing attributes for line numbers */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
630 settings.number.fg_color = PRCOLOR_BLACK;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
631 settings.number.bg_color = PRCOLOR_WHITE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
632 settings.number.bold = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
633 settings.number.italic = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
634 settings.number.underline = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
635 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
636 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
637 * Syntax highlighting of line numbers.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
638 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
639 if (prt_use_number() && settings.do_syntax)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
640 {
744
07f7b4a7755c updated for version 7.0222
vimboss
parents: 688
diff changeset
641 int id;
07f7b4a7755c updated for version 7.0222
vimboss
parents: 688
diff changeset
642
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
643 id = syn_name2id((char_u *)"LineNr");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
644 if (id > 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
645 id = syn_get_final_id(id);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
646
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
647 prt_get_attr(id, &settings.number, settings.modec);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
648 }
744
07f7b4a7755c updated for version 7.0222
vimboss
parents: 688
diff changeset
649 #endif
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
650
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
651 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
652 * Estimate the total lines to be printed
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
653 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
654 for (lnum = eap->line1; lnum <= eap->line2; lnum++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
655 bytes_to_print += (long_u)STRLEN(skipwhite(ml_get(lnum)));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
656 if (bytes_to_print == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
657 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
658 MSG(_("No text to be printed"));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
659 goto print_fail_no_begin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
660 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
661
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
662 /* Set colors and font to normal. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
663 curr_bg = (long_u)0xffffffffL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
664 curr_fg = (long_u)0xffffffffL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
665 curr_italic = MAYBE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
666 curr_bold = MAYBE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
667 curr_underline = MAYBE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
668
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
669 prt_set_fg(PRCOLOR_BLACK);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
670 prt_set_bg(PRCOLOR_WHITE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
671 prt_set_font(FALSE, FALSE, FALSE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
672 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
673 current_syn_id = -1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
674 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
675
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
676 jobsplit = (printer_opts[OPT_PRINT_JOBSPLIT].present
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
677 && TOLOWER_ASC(printer_opts[OPT_PRINT_JOBSPLIT].string[0]) == 'y');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
678
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
679 if (!mch_print_begin(&settings))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
680 goto print_fail_no_begin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
681
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
682 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
683 * Loop over collated copies: 1 2 3, 1 2 3, ...
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
684 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
685 page_count = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
686 for (collated_copies = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
687 collated_copies < settings.n_collated_copies;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
688 collated_copies++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
689 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
690 prt_pos_T prtpos; /* current print position */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
691 prt_pos_T page_prtpos; /* print position at page start */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
692 int side;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
693
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
694 memset(&page_prtpos, 0, sizeof(prt_pos_T));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
695 page_prtpos.file_line = eap->line1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
696 prtpos = page_prtpos;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
697
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
698 if (jobsplit && collated_copies > 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
699 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
700 /* Splitting jobs: Stop a previous job and start a new one. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
701 mch_print_end(&settings);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
702 if (!mch_print_begin(&settings))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
703 goto print_fail_no_begin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
704 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
705
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
706 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
707 * Loop over all pages in the print job: 1 2 3 ...
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
708 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
709 for (page_count = 0; prtpos.file_line <= eap->line2; ++page_count)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
710 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
711 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
712 * Loop over uncollated copies: 1 1 1, 2 2 2, 3 3 3, ...
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
713 * For duplex: 12 12 12 34 34 34, ...
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
714 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
715 for (uncollated_copies = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
716 uncollated_copies < settings.n_uncollated_copies;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
717 uncollated_copies++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
718 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
719 /* Set the print position to the start of this page. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
720 prtpos = page_prtpos;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
721
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
722 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
723 * Do front and rear side of a page.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
724 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
725 for (side = 0; side <= settings.duplex; ++side)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
726 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
727 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
728 * Print one page.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
729 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
730
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
731 /* Check for interrupt character every page. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
732 ui_breakcheck();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
733 if (got_int || settings.user_abort)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
734 goto print_fail;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
735
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
736 sprintf((char *)IObuff, _("Printing page %d (%d%%)"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
737 page_count + 1 + side,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
738 prtpos.bytes_printed > 1000000
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
739 ? (int)(prtpos.bytes_printed /
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
740 (bytes_to_print / 100))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
741 : (int)((prtpos.bytes_printed * 100)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
742 / bytes_to_print));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
743 if (!mch_print_begin_page(IObuff))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
744 goto print_fail;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
745
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
746 if (settings.n_collated_copies > 1)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
747 sprintf((char *)IObuff + STRLEN(IObuff),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
748 _(" Copy %d of %d"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
749 collated_copies + 1,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
750 settings.n_collated_copies);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
751 prt_message(IObuff);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
752
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
753 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
754 * Output header if required
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
755 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
756 if (prt_header_height() > 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
757 prt_header(&settings, page_count + 1 + side,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
758 prtpos.file_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
759
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
760 for (page_line = 0; page_line < settings.lines_per_page;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
761 ++page_line)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
762 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
763 prtpos.column = hardcopy_line(&settings,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
764 page_line, &prtpos);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
765 if (prtpos.column == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
766 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
767 /* finished a file line */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
768 prtpos.bytes_printed +=
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
769 STRLEN(skipwhite(ml_get(prtpos.file_line)));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
770 if (++prtpos.file_line > eap->line2)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
771 break; /* reached the end */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
772 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
773 else if (prtpos.ff)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
774 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
775 /* Line had a formfeed in it - start new page but
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
776 * stay on the current line */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
777 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
778 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
779 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
780
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
781 if (!mch_print_end_page())
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
782 goto print_fail;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
783 if (prtpos.file_line > eap->line2)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
784 break; /* reached the end */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
785 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
786
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
787 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
788 * Extra blank page for duplexing with odd number of pages and
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
789 * more copies to come.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
790 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
791 if (prtpos.file_line > eap->line2 && settings.duplex
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
792 && side == 0
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
793 && uncollated_copies + 1 < settings.n_uncollated_copies)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
794 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
795 if (!mch_print_blank_page())
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
796 goto print_fail;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
797 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
798 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
799 if (settings.duplex && prtpos.file_line <= eap->line2)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
800 ++page_count;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
801
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
802 /* Remember the position where the next page starts. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
803 page_prtpos = prtpos;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
804 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
805
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
806 vim_snprintf((char *)IObuff, IOSIZE, _("Printed: %s"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
807 settings.jobname);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
808 prt_message(IObuff);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
809 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
810
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
811 print_fail:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
812 if (got_int || settings.user_abort)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
813 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
814 sprintf((char *)IObuff, "%s", _("Printing aborted"));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
815 prt_message(IObuff);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
816 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
817 mch_print_end(&settings);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
818
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
819 print_fail_no_begin:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
820 mch_print_cleanup();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
821 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
822
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
823 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
824 * Print one page line.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
825 * Return the next column to print, or zero if the line is finished.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
826 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
827 static colnr_T
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
828 hardcopy_line(psettings, page_line, ppos)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
829 prt_settings_T *psettings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
830 int page_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
831 prt_pos_T *ppos;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
832 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
833 colnr_T col;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
834 char_u *line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
835 int need_break = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
836 int outputlen;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
837 int tab_spaces;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
838 long_u print_pos;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
839 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
840 prt_text_attr_T attr;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
841 int id;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
842 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
843
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
844 if (ppos->column == 0 || ppos->ff)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
845 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
846 print_pos = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
847 tab_spaces = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
848 if (!ppos->ff && prt_use_number())
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
849 prt_line_number(psettings, page_line, ppos->file_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
850 ppos->ff = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
851 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
852 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
853 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
854 /* left over from wrap halfway a tab */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
855 print_pos = ppos->print_pos;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
856 tab_spaces = ppos->lead_spaces;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
857 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
858
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
859 mch_print_start_line(0, page_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
860 line = ml_get(ppos->file_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
861
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
862 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
863 * Loop over the columns until the end of the file line or right margin.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
864 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
865 for (col = ppos->column; line[col] != NUL && !need_break; col += outputlen)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
866 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
867 outputlen = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
868 #ifdef FEAT_MBYTE
474
a5fcf36ef512 updated for version 7.0127
vimboss
parents: 442
diff changeset
869 if (has_mbyte && (outputlen = (*mb_ptr2len)(line + col)) < 1)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
870 outputlen = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
871 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
872 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
873 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
874 * syntax highlighting stuff.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
875 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
876 if (psettings->do_syntax)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
877 {
1504
1b55bbf5c580 updated for version 7.1-219
vimboss
parents: 1218
diff changeset
878 id = syn_get_id(curwin, ppos->file_line, col, 1, NULL, FALSE);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
879 if (id > 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
880 id = syn_get_final_id(id);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
881 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
882 id = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
883 /* Get the line again, a multi-line regexp may invalidate it. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
884 line = ml_get(ppos->file_line);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
885
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
886 if (id != current_syn_id)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
887 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
888 current_syn_id = id;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
889 prt_get_attr(id, &attr, psettings->modec);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
890 prt_set_font(attr.bold, attr.italic, attr.underline);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
891 prt_set_fg(attr.fg_color);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
892 prt_set_bg(attr.bg_color);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
893 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
894 }
744
07f7b4a7755c updated for version 7.0222
vimboss
parents: 688
diff changeset
895 #endif
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
896
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
897 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
898 * Appropriately expand any tabs to spaces.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
899 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
900 if (line[col] == TAB || tab_spaces != 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
901 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
902 if (tab_spaces == 0)
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
903 tab_spaces = (int)(curbuf->b_p_ts - (print_pos % curbuf->b_p_ts));
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
904
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
905 while (tab_spaces > 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
906 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
907 need_break = mch_print_text_out((char_u *)" ", 1);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
908 print_pos++;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
909 tab_spaces--;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
910 if (need_break)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
911 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
912 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
913 /* Keep the TAB if we didn't finish it. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
914 if (need_break && tab_spaces > 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
915 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
916 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
917 else if (line[col] == FF
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
918 && printer_opts[OPT_PRINT_FORMFEED].present
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
919 && TOLOWER_ASC(printer_opts[OPT_PRINT_FORMFEED].string[0])
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
920 == 'y')
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
921 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
922 ppos->ff = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
923 need_break = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
924 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
925 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
926 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
927 need_break = mch_print_text_out(line + col, outputlen);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
928 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
929 if (has_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
930 print_pos += (*mb_ptr2cells)(line + col);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
931 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
932 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
933 print_pos++;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
934 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
935 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
936
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
937 ppos->lead_spaces = tab_spaces;
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
938 ppos->print_pos = (int)print_pos;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
939
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
940 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
941 * Start next line of file if we clip lines, or have reached end of the
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
942 * line, unless we are doing a formfeed.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
943 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
944 if (!ppos->ff
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
945 && (line[col] == NUL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
946 || (printer_opts[OPT_PRINT_WRAP].present
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
947 && TOLOWER_ASC(printer_opts[OPT_PRINT_WRAP].string[0])
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
948 == 'n')))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
949 return 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
950 return col;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
951 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
952
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
953 # if defined(FEAT_POSTSCRIPT) || defined(PROTO)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
954
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
955 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
956 * PS printer stuff.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
957 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
958 * Sources of information to help maintain the PS printing code:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
959 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
960 * 1. PostScript Language Reference, 3rd Edition,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
961 * Addison-Wesley, 1999, ISBN 0-201-37922-8
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
962 * 2. PostScript Language Program Design,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
963 * Addison-Wesley, 1988, ISBN 0-201-14396-8
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
964 * 3. PostScript Tutorial and Cookbook,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
965 * Addison Wesley, 1985, ISBN 0-201-10179-3
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
966 * 4. PostScript Language Document Structuring Conventions Specification,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
967 * version 3.0,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
968 * Adobe Technote 5001, 25th September 1992
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
969 * 5. PostScript Printer Description File Format Specification, Version 4.3,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
970 * Adobe technote 5003, 9th February 1996
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
971 * 6. Adobe Font Metrics File Format Specification, Version 4.1,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
972 * Adobe Technote 5007, 7th October 1998
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
973 * 7. Adobe CMap and CIDFont Files Specification, Version 1.0,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
974 * Adobe Technote 5014, 8th October 1996
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
975 * 8. Adobe CJKV Character Collections and CMaps for CID-Keyed Fonts,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
976 * Adoboe Technote 5094, 8th September, 2001
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
977 * 9. CJKV Information Processing, 2nd Edition,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
978 * O'Reilly, 2002, ISBN 1-56592-224-7
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
979 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
980 * Some of these documents can be found in PDF form on Adobe's web site -
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
981 * http://www.adobe.com
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
982 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
983
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
984 #define NUM_ELEMENTS(arr) (sizeof(arr)/sizeof((arr)[0]))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
985
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
986 #define PRT_PS_DEFAULT_DPI (72) /* Default user space resolution */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
987 #define PRT_PS_DEFAULT_FONTSIZE (10)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
988 #define PRT_PS_DEFAULT_BUFFER_SIZE (80)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
989
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
990 struct prt_mediasize_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
991 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
992 char *name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
993 float width; /* width and height in points for portrait */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
994 float height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
995 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
996
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
997 #define PRT_MEDIASIZE_LEN (sizeof(prt_mediasize) / sizeof(struct prt_mediasize_S))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
998
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
999 static struct prt_mediasize_S prt_mediasize[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1000 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1001 {"A4", 595.0, 842.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1002 {"letter", 612.0, 792.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1003 {"10x14", 720.0, 1008.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1004 {"A3", 842.0, 1191.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1005 {"A5", 420.0, 595.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1006 {"B4", 729.0, 1032.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1007 {"B5", 516.0, 729.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1008 {"executive", 522.0, 756.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1009 {"folio", 595.0, 935.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1010 {"ledger", 1224.0, 792.0}, /* Yes, it is wider than taller! */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1011 {"legal", 612.0, 1008.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1012 {"quarto", 610.0, 780.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1013 {"statement", 396.0, 612.0},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1014 {"tabloid", 792.0, 1224.0}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1015 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1016
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1017 /* PS font names, must be in Roman, Bold, Italic, Bold-Italic order */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1018 struct prt_ps_font_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1019 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1020 int wx;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1021 int uline_offset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1022 int uline_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1023 int bbox_min_y;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1024 int bbox_max_y;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1025 char *(ps_fontname[4]);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1026 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1027
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1028 #define PRT_PS_FONT_ROMAN (0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1029 #define PRT_PS_FONT_BOLD (1)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1030 #define PRT_PS_FONT_OBLIQUE (2)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1031 #define PRT_PS_FONT_BOLDOBLIQUE (3)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1032
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1033 /* Standard font metrics for Courier family */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1034 static struct prt_ps_font_S prt_ps_courier_font =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1035 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1036 600,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1037 -100, 50,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1038 -250, 805,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1039 {"Courier", "Courier-Bold", "Courier-Oblique", "Courier-BoldOblique"}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1040 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1041
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1042 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1043 /* Generic font metrics for multi-byte fonts */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1044 static struct prt_ps_font_S prt_ps_mb_font =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1045 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1046 1000,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1047 -100, 50,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1048 -250, 805,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1049 {NULL, NULL, NULL, NULL}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1050 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1051 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1052
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1053 /* Pointer to current font set being used */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1054 static struct prt_ps_font_S* prt_ps_font;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1055
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1056 /* Structures to map user named encoding and mapping to PS equivalents for
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1057 * building CID font name */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1058 struct prt_ps_encoding_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1059 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1060 char *encoding;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1061 char *cmap_encoding;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1062 int needs_charset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1063 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1064
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1065 struct prt_ps_charset_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1066 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1067 char *charset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1068 char *cmap_charset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1069 int has_charset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1070 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1071
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1072 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1073
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1074 #define CS_JIS_C_1978 (0x01)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1075 #define CS_JIS_X_1983 (0x02)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1076 #define CS_JIS_X_1990 (0x04)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1077 #define CS_NEC (0x08)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1078 #define CS_MSWINDOWS (0x10)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1079 #define CS_CP932 (0x20)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1080 #define CS_KANJITALK6 (0x40)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1081 #define CS_KANJITALK7 (0x80)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1082
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1083 /* Japanese encodings and charsets */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1084 static struct prt_ps_encoding_S j_encodings[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1085 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1086 {"iso-2022-jp", NULL, (CS_JIS_C_1978|CS_JIS_X_1983|CS_JIS_X_1990|
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1087 CS_NEC)},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1088 {"euc-jp", "EUC", (CS_JIS_C_1978|CS_JIS_X_1983|CS_JIS_X_1990)},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1089 {"sjis", "RKSJ", (CS_JIS_C_1978|CS_JIS_X_1983|CS_MSWINDOWS|
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1090 CS_KANJITALK6|CS_KANJITALK7)},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1091 {"cp932", "RKSJ", CS_JIS_X_1983},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1092 {"ucs-2", "UCS2", CS_JIS_X_1990},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1093 {"utf-8", "UTF8" , CS_JIS_X_1990}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1094 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1095 static struct prt_ps_charset_S j_charsets[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1096 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1097 {"JIS_C_1978", "78", CS_JIS_C_1978},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1098 {"JIS_X_1983", NULL, CS_JIS_X_1983},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1099 {"JIS_X_1990", "Hojo", CS_JIS_X_1990},
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1100 {"NEC", "Ext", CS_NEC},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1101 {"MSWINDOWS", "90ms", CS_MSWINDOWS},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1102 {"CP932", "90ms", CS_JIS_X_1983},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1103 {"KANJITALK6", "83pv", CS_KANJITALK6},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1104 {"KANJITALK7", "90pv", CS_KANJITALK7}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1105 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1106
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1107 #define CS_GB_2312_80 (0x01)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1108 #define CS_GBT_12345_90 (0x02)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1109 #define CS_GBK2K (0x04)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1110 #define CS_SC_MAC (0x08)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1111 #define CS_GBT_90_MAC (0x10)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1112 #define CS_GBK (0x20)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1113 #define CS_SC_ISO10646 (0x40)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1114
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1115 /* Simplified Chinese encodings and charsets */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1116 static struct prt_ps_encoding_S sc_encodings[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1117 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1118 {"iso-2022", NULL, (CS_GB_2312_80|CS_GBT_12345_90)},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1119 {"gb18030", NULL, CS_GBK2K},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1120 {"euc-cn", "EUC", (CS_GB_2312_80|CS_GBT_12345_90|CS_SC_MAC|
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1121 CS_GBT_90_MAC)},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1122 {"gbk", "EUC", CS_GBK},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1123 {"ucs-2", "UCS2", CS_SC_ISO10646},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1124 {"utf-8", "UTF8", CS_SC_ISO10646}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1125 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1126 static struct prt_ps_charset_S sc_charsets[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1127 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1128 {"GB_2312-80", "GB", CS_GB_2312_80},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1129 {"GBT_12345-90","GBT", CS_GBT_12345_90},
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1130 {"MAC", "GBpc", CS_SC_MAC},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1131 {"GBT-90_MAC", "GBTpc", CS_GBT_90_MAC},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1132 {"GBK", "GBK", CS_GBK},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1133 {"GB18030", "GBK2K", CS_GBK2K},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1134 {"ISO10646", "UniGB", CS_SC_ISO10646}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1135 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1136
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1137 #define CS_CNS_PLANE_1 (0x01)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1138 #define CS_CNS_PLANE_2 (0x02)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1139 #define CS_CNS_PLANE_1_2 (0x04)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1140 #define CS_B5 (0x08)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1141 #define CS_ETEN (0x10)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1142 #define CS_HK_GCCS (0x20)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1143 #define CS_HK_SCS (0x40)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1144 #define CS_HK_SCS_ETEN (0x80)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1145 #define CS_MTHKL (0x100)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1146 #define CS_MTHKS (0x200)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1147 #define CS_DLHKL (0x400)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1148 #define CS_DLHKS (0x800)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1149 #define CS_TC_ISO10646 (0x1000)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1150
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1151 /* Traditional Chinese encodings and charsets */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1152 static struct prt_ps_encoding_S tc_encodings[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1153 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1154 {"iso-2022", NULL, (CS_CNS_PLANE_1|CS_CNS_PLANE_2)},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1155 {"euc-tw", "EUC", CS_CNS_PLANE_1_2},
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1156 {"big5", "B5", (CS_B5|CS_ETEN|CS_HK_GCCS|CS_HK_SCS|
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1157 CS_HK_SCS_ETEN|CS_MTHKL|CS_MTHKS|CS_DLHKL|
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1158 CS_DLHKS)},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1159 {"cp950", "B5", CS_B5},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1160 {"ucs-2", "UCS2", CS_TC_ISO10646},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1161 {"utf-8", "UTF8", CS_TC_ISO10646},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1162 {"utf-16", "UTF16", CS_TC_ISO10646},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1163 {"utf-32", "UTF32", CS_TC_ISO10646}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1164 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1165 static struct prt_ps_charset_S tc_charsets[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1166 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1167 {"CNS_1992_1", "CNS1", CS_CNS_PLANE_1},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1168 {"CNS_1992_2", "CNS2", CS_CNS_PLANE_2},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1169 {"CNS_1993", "CNS", CS_CNS_PLANE_1_2},
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1170 {"BIG5", NULL, CS_B5},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1171 {"CP950", NULL, CS_B5},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1172 {"ETEN", "ETen", CS_ETEN},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1173 {"HK_GCCS", "HKgccs", CS_HK_GCCS},
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1174 {"SCS", "HKscs", CS_HK_SCS},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1175 {"SCS_ETEN", "ETHK", CS_HK_SCS_ETEN},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1176 {"MTHKL", "HKm471", CS_MTHKL},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1177 {"MTHKS", "HKm314", CS_MTHKS},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1178 {"DLHKL", "HKdla", CS_DLHKL},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1179 {"DLHKS", "HKdlb", CS_DLHKS},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1180 {"ISO10646", "UniCNS", CS_TC_ISO10646}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1181 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1182
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1183 #define CS_KR_X_1992 (0x01)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1184 #define CS_KR_MAC (0x02)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1185 #define CS_KR_X_1992_MS (0x04)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1186 #define CS_KR_ISO10646 (0x08)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1187
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1188 /* Korean encodings and charsets */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1189 static struct prt_ps_encoding_S k_encodings[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1190 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1191 {"iso-2022-kr", NULL, CS_KR_X_1992},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1192 {"euc-kr", "EUC", (CS_KR_X_1992|CS_KR_MAC)},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1193 {"johab", "Johab", CS_KR_X_1992},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1194 {"cp1361", "Johab", CS_KR_X_1992},
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1195 {"uhc", "UHC", CS_KR_X_1992_MS},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1196 {"cp949", "UHC", CS_KR_X_1992_MS},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1197 {"ucs-2", "UCS2", CS_KR_ISO10646},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1198 {"utf-8", "UTF8", CS_KR_ISO10646}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1199 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1200 static struct prt_ps_charset_S k_charsets[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1201 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1202 {"KS_X_1992", "KSC", CS_KR_X_1992},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1203 {"CP1361", "KSC", CS_KR_X_1992},
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1204 {"MAC", "KSCpc", CS_KR_MAC},
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1205 {"MSWINDOWS", "KSCms", CS_KR_X_1992_MS},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1206 {"CP949", "KSCms", CS_KR_X_1992_MS},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1207 {"WANSUNG", "KSCms", CS_KR_X_1992_MS},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1208 {"ISO10646", "UniKS", CS_KR_ISO10646}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1209 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1210
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1211 /* Collections of encodings and charsets for multi-byte printing */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1212 struct prt_ps_mbfont_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1213 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1214 int num_encodings;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1215 struct prt_ps_encoding_S *encodings;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1216 int num_charsets;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1217 struct prt_ps_charset_S *charsets;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1218 char *ascii_enc;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1219 char *defcs;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1220 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1221
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1222 static struct prt_ps_mbfont_S prt_ps_mbfonts[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1223 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1224 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1225 NUM_ELEMENTS(j_encodings),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1226 j_encodings,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1227 NUM_ELEMENTS(j_charsets),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1228 j_charsets,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1229 "jis_roman",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1230 "JIS_X_1983"
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1231 },
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1232 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1233 NUM_ELEMENTS(sc_encodings),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1234 sc_encodings,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1235 NUM_ELEMENTS(sc_charsets),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1236 sc_charsets,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1237 "gb_roman",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1238 "GB_2312-80"
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1239 },
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1240 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1241 NUM_ELEMENTS(tc_encodings),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1242 tc_encodings,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1243 NUM_ELEMENTS(tc_charsets),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1244 tc_charsets,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1245 "cns_roman",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1246 "BIG5"
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1247 },
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1248 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1249 NUM_ELEMENTS(k_encodings),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1250 k_encodings,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1251 NUM_ELEMENTS(k_charsets),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1252 k_charsets,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1253 "ks_roman",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1254 "KS_X_1992"
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1255 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1256 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1257 #endif /* FEAT_MBYTE */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1258
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1259 struct prt_ps_resource_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1260 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1261 char_u name[64];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1262 char_u filename[MAXPATHL + 1];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1263 int type;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1264 char_u title[256];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1265 char_u version[256];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1266 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1267
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1268 /* Types of PS resource file currently used */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1269 #define PRT_RESOURCE_TYPE_PROCSET (0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1270 #define PRT_RESOURCE_TYPE_ENCODING (1)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1271 #define PRT_RESOURCE_TYPE_CMAP (2)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1272
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1273 /* The PS prolog file version number has to match - if the prolog file is
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1274 * updated, increment the number in the file and here. Version checking was
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1275 * added as of VIM 6.2.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1276 * The CID prolog file version number behaves as per PS prolog.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1277 * Table of VIM and prolog versions:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1278 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1279 * VIM Prolog CIDProlog
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1280 * 6.2 1.3
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1281 * 7.0 1.4 1.0
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1282 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1283 #define PRT_PROLOG_VERSION ((char_u *)"1.4")
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1284 #define PRT_CID_PROLOG_VERSION ((char_u *)"1.0")
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1285
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1286 /* String versions of PS resource types - indexed by constants above so don't
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1287 * re-order!
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1288 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1289 static char *prt_resource_types[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1290 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1291 "procset",
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1292 "encoding",
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1293 "cmap"
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1294 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1295
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1296 /* Strings to look for in a PS resource file */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1297 #define PRT_RESOURCE_HEADER "%!PS-Adobe-"
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1298 #define PRT_RESOURCE_RESOURCE "Resource-"
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1299 #define PRT_RESOURCE_PROCSET "ProcSet"
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1300 #define PRT_RESOURCE_ENCODING "Encoding"
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1301 #define PRT_RESOURCE_CMAP "CMap"
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1302
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1303
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1304 /* Data for table based DSC comment recognition, easy to extend if VIM needs to
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1305 * read more comments. */
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1306 #define PRT_DSC_MISC_TYPE (-1)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1307 #define PRT_DSC_TITLE_TYPE (1)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1308 #define PRT_DSC_VERSION_TYPE (2)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1309 #define PRT_DSC_ENDCOMMENTS_TYPE (3)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1310
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1311 #define PRT_DSC_TITLE "%%Title:"
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1312 #define PRT_DSC_VERSION "%%Version:"
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1313 #define PRT_DSC_ENDCOMMENTS "%%EndComments:"
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1314
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1315 struct prt_dsc_comment_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1316 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1317 char *string;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1318 int len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1319 int type;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1320 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1321
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1322 struct prt_dsc_line_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1323 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1324 int type;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1325 char_u *string;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1326 int len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1327 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1328
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1329
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1330 #define SIZEOF_CSTR(s) (sizeof(s) - 1)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1331 static struct prt_dsc_comment_S prt_dsc_table[] =
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1332 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1333 {PRT_DSC_TITLE, SIZEOF_CSTR(PRT_DSC_TITLE), PRT_DSC_TITLE_TYPE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1334 {PRT_DSC_VERSION, SIZEOF_CSTR(PRT_DSC_VERSION),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1335 PRT_DSC_VERSION_TYPE},
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1336 {PRT_DSC_ENDCOMMENTS, SIZEOF_CSTR(PRT_DSC_ENDCOMMENTS),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1337 PRT_DSC_ENDCOMMENTS_TYPE}
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1338 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1339
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1340 static void prt_write_file_raw_len __ARGS((char_u *buffer, int bytes));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1341 static void prt_write_file __ARGS((char_u *buffer));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1342 static void prt_write_file_len __ARGS((char_u *buffer, int bytes));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1343 static void prt_write_string __ARGS((char *s));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1344 static void prt_write_int __ARGS((int i));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1345 static void prt_write_boolean __ARGS((int b));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1346 static void prt_def_font __ARGS((char *new_name, char *encoding, int height, char *font));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1347 static void prt_real_bits __ARGS((double real, int precision, int *pinteger, int *pfraction));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1348 static void prt_write_real __ARGS((double val, int prec));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1349 static void prt_def_var __ARGS((char *name, double value, int prec));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1350 static void prt_flush_buffer __ARGS((void));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1351 static void prt_resource_name __ARGS((char_u *filename, void *cookie));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1352 static int prt_find_resource __ARGS((char *name, struct prt_ps_resource_S *resource));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1353 static int prt_open_resource __ARGS((struct prt_ps_resource_S *resource));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1354 static int prt_check_resource __ARGS((struct prt_ps_resource_S *resource, char_u *version));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1355 static void prt_dsc_start __ARGS((void));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1356 static void prt_dsc_noarg __ARGS((char *comment));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1357 static void prt_dsc_textline __ARGS((char *comment, char *text));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1358 static void prt_dsc_text __ARGS((char *comment, char *text));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1359 static void prt_dsc_ints __ARGS((char *comment, int count, int *ints));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1360 static void prt_dsc_requirements __ARGS((int duplex, int tumble, int collate, int color, int num_copies));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1361 static void prt_dsc_docmedia __ARGS((char *paper_name, double width, double height, double weight, char *colour, char *type));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1362 static void prt_dsc_resources __ARGS((char *comment, char *type, char *strings));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1363 static void prt_dsc_font_resource __ARGS((char *resource, struct prt_ps_font_S *ps_font));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1364 static float to_device_units __ARGS((int idx, double physsize, int def_number));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1365 static void prt_page_margins __ARGS((double width, double height, double *left, double *right, double *top, double *bottom));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1366 static void prt_font_metrics __ARGS((int font_scale));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1367 static int prt_get_cpl __ARGS((void));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1368 static int prt_get_lpp __ARGS((void));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1369 static int prt_add_resource __ARGS((struct prt_ps_resource_S *resource));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1370 static int prt_resfile_next_line __ARGS((void));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1371 static int prt_resfile_strncmp __ARGS((int offset, char *string, int len));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1372 static int prt_resfile_skip_nonws __ARGS((int offset));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1373 static int prt_resfile_skip_ws __ARGS((int offset));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1374 static int prt_next_dsc __ARGS((struct prt_dsc_line_S *p_dsc_line));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1375 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1376 static int prt_build_cid_fontname __ARGS((int font, char_u *name, int name_len));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1377 static void prt_def_cidfont __ARGS((char *new_name, int height, char *cidfont));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1378 static void prt_dup_cidfont __ARGS((char *original_name, char *new_name));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1379 static int prt_match_encoding __ARGS((char *p_encoding, struct prt_ps_mbfont_S *p_cmap, struct prt_ps_encoding_S **pp_mbenc));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1380 static int prt_match_charset __ARGS((char *p_charset, struct prt_ps_mbfont_S *p_cmap, struct prt_ps_charset_S **pp_mbchar));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1381 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1382
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1383 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1384 * Variables for the output PostScript file.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1385 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1386 static FILE *prt_ps_fd;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1387 static int prt_file_error;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1388 static char_u *prt_ps_file_name = NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1389
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1390 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1391 * Various offsets and dimensions in default PostScript user space (points).
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1392 * Used for text positioning calculations
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1393 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1394 static float prt_page_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1395 static float prt_page_height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1396 static float prt_left_margin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1397 static float prt_right_margin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1398 static float prt_top_margin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1399 static float prt_bottom_margin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1400 static float prt_line_height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1401 static float prt_first_line_height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1402 static float prt_char_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1403 static float prt_number_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1404 static float prt_bgcol_offset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1405 static float prt_pos_x_moveto = 0.0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1406 static float prt_pos_y_moveto = 0.0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1407
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1408 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1409 * Various control variables used to decide when and how to change the
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1410 * PostScript graphics state.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1411 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1412 static int prt_need_moveto;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1413 static int prt_do_moveto;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1414 static int prt_need_font;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1415 static int prt_font;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1416 static int prt_need_underline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1417 static int prt_underline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1418 static int prt_do_underline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1419 static int prt_need_fgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1420 static int prt_fgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1421 static int prt_need_bgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1422 static int prt_do_bgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1423 static int prt_bgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1424 static int prt_new_bgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1425 static int prt_attribute_change;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1426 static float prt_text_run;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1427 static int prt_page_num;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1428 static int prt_bufsiz;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1429
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1430 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1431 * Variables controlling physical printing.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1432 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1433 static int prt_media;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1434 static int prt_portrait;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1435 static int prt_num_copies;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1436 static int prt_duplex;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1437 static int prt_tumble;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1438 static int prt_collate;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1439
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1440 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1441 * Buffers used when generating PostScript output
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1442 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1443 static char_u prt_line_buffer[257];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1444 static garray_T prt_ps_buffer;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1445
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1446 # ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1447 static int prt_do_conv;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1448 static vimconv_T prt_conv;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1449
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1450 static int prt_out_mbyte;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1451 static int prt_custom_cmap;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1452 static char prt_cmap[80];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1453 static int prt_use_courier;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1454 static int prt_in_ascii;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1455 static int prt_half_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1456 static char *prt_ascii_encoding;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1457 static char_u prt_hexchar[] = "0123456789abcdef";
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1458 # endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1459
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1460 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1461 prt_write_file_raw_len(buffer, bytes)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1462 char_u *buffer;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1463 int bytes;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1464 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1465 if (!prt_file_error
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1466 && fwrite(buffer, sizeof(char_u), bytes, prt_ps_fd)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1467 != (size_t)bytes)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1468 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1469 EMSG(_("E455: Error writing to PostScript output file"));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1470 prt_file_error = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1471 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1472 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1473
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1474 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1475 prt_write_file(buffer)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1476 char_u *buffer;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1477 {
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1478 prt_write_file_len(buffer, (int)STRLEN(buffer));
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1479 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1480
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1481 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1482 prt_write_file_len(buffer, bytes)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1483 char_u *buffer;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1484 int bytes;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1485 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1486 #ifdef EBCDIC
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1487 ebcdic2ascii(buffer, bytes);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1488 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1489 prt_write_file_raw_len(buffer, bytes);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1490 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1491
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1492 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1493 * Write a string.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1494 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1495 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1496 prt_write_string(s)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1497 char *s;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1498 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1499 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer), "%s", s);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1500 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1501 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1502
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1503 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1504 * Write an int and a space.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1505 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1506 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1507 prt_write_int(i)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1508 int i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1509 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1510 sprintf((char *)prt_line_buffer, "%d ", i);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1511 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1512 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1513
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1514 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1515 * Write a boolean and a space.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1516 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1517 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1518 prt_write_boolean(b)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1519 int b;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1520 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1521 sprintf((char *)prt_line_buffer, "%s ", (b ? "T" : "F"));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1522 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1523 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1524
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1525 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1526 * Write PostScript to re-encode and define the font.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1527 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1528 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1529 prt_def_font(new_name, encoding, height, font)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1530 char *new_name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1531 char *encoding;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1532 int height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1533 char *font;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1534 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1535 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1536 "/_%s /VIM-%s /%s ref\n", new_name, encoding, font);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1537 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1538 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1539 if (prt_out_mbyte)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1540 sprintf((char *)prt_line_buffer, "/%s %d %f /_%s sffs\n",
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1541 new_name, height, 500./prt_ps_courier_font.wx, new_name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1542 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1543 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1544 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1545 "/%s %d /_%s ffs\n", new_name, height, new_name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1546 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1547 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1548
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1549 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1550 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1551 * Write a line to define the CID font.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1552 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1553 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1554 prt_def_cidfont(new_name, height, cidfont)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1555 char *new_name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1556 int height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1557 char *cidfont;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1558 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1559 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1560 "/_%s /%s[/%s] vim_composefont\n", new_name, prt_cmap, cidfont);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1561 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1562 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1563 "/%s %d /_%s ffs\n", new_name, height, new_name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1564 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1565 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1566
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1567 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1568 * Write a line to define a duplicate of a CID font
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1569 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1570 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1571 prt_dup_cidfont(original_name, new_name)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1572 char *original_name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1573 char *new_name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1574 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1575 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1576 "/%s %s d\n", new_name, original_name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1577 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1578 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1579 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1580
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1581 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1582 * Convert a real value into an integer and fractional part as integers, with
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1583 * the fractional part being in the range [0,10^precision). The fractional part
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1584 * is also rounded based on the precision + 1'th fractional digit.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1585 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1586 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1587 prt_real_bits(real, precision, pinteger, pfraction)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1588 double real;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1589 int precision;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1590 int *pinteger;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1591 int *pfraction;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1592 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1593 int i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1594 int integer;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1595 float fraction;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1596
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1597 integer = (int)real;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1598 fraction = (float)(real - integer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1599 if (real < (double)integer)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1600 fraction = -fraction;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1601 for (i = 0; i < precision; i++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1602 fraction *= 10.0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1603
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1604 *pinteger = integer;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1605 *pfraction = (int)(fraction + 0.5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1606 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1607
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1608 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1609 * Write a real and a space. Save bytes if real value has no fractional part!
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1610 * We use prt_real_bits() as %f in sprintf uses the locale setting to decide
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1611 * what decimal point character to use, but PS always requires a '.'.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1612 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1613 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1614 prt_write_real(val, prec)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1615 double val;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1616 int prec;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1617 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1618 int integer;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1619 int fraction;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1620
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1621 prt_real_bits(val, prec, &integer, &fraction);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1622 /* Emit integer part */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1623 sprintf((char *)prt_line_buffer, "%d", integer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1624 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1625 /* Only emit fraction if necessary */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1626 if (fraction != 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1627 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1628 /* Remove any trailing zeros */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1629 while ((fraction % 10) == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1630 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1631 prec--;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1632 fraction /= 10;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1633 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1634 /* Emit fraction left padded with zeros */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1635 sprintf((char *)prt_line_buffer, ".%0*d", prec, fraction);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1636 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1637 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1638 sprintf((char *)prt_line_buffer, " ");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1639 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1640 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1641
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1642 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1643 * Write a line to define a numeric variable.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1644 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1645 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1646 prt_def_var(name, value, prec)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1647 char *name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1648 double value;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1649 int prec;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1650 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1651 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1652 "/%s ", name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1653 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1654 prt_write_real(value, prec);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1655 sprintf((char *)prt_line_buffer, "d\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1656 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1657 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1658
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1659 /* Convert size from font space to user space at current font scale */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1660 #define PRT_PS_FONT_TO_USER(scale, size) ((size) * ((scale)/1000.0))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1661
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1662 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1663 prt_flush_buffer()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1664 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1665 if (prt_ps_buffer.ga_len > 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1666 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1667 /* Any background color must be drawn first */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1668 if (prt_do_bgcol && (prt_new_bgcol != PRCOLOR_WHITE))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1669 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1670 int r, g, b;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1671
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1672 if (prt_do_moveto)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1673 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1674 prt_write_real(prt_pos_x_moveto, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1675 prt_write_real(prt_pos_y_moveto, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1676 prt_write_string("m\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1677 prt_do_moveto = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1678 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1679
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1680 /* Size of rect of background color on which text is printed */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1681 prt_write_real(prt_text_run, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1682 prt_write_real(prt_line_height, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1683
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1684 /* Lastly add the color of the background */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1685 r = ((unsigned)prt_new_bgcol & 0xff0000) >> 16;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1686 g = ((unsigned)prt_new_bgcol & 0xff00) >> 8;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1687 b = prt_new_bgcol & 0xff;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1688 prt_write_real(r / 255.0, 3);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1689 prt_write_real(g / 255.0, 3);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1690 prt_write_real(b / 255.0, 3);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1691 prt_write_string("bg\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1692 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1693 /* Draw underlines before the text as it makes it slightly easier to
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1694 * find the starting point.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1695 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1696 if (prt_do_underline)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1697 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1698 if (prt_do_moveto)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1699 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1700 prt_write_real(prt_pos_x_moveto, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1701 prt_write_real(prt_pos_y_moveto, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1702 prt_write_string("m\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1703 prt_do_moveto = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1704 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1705
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1706 /* Underline length of text run */
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1707 prt_write_real(prt_text_run, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1708 prt_write_string("ul\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1709 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1710 /* Draw the text
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1711 * Note: we write text out raw - EBCDIC conversion is handled in the
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1712 * PostScript world via the font encoding vector. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1713 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1714 if (prt_out_mbyte)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1715 prt_write_string("<");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1716 else
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1717 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1718 prt_write_string("(");
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1719 prt_write_file_raw_len(prt_ps_buffer.ga_data, prt_ps_buffer.ga_len);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1720 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1721 if (prt_out_mbyte)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1722 prt_write_string(">");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1723 else
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1724 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1725 prt_write_string(")");
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1726 /* Add a moveto if need be and use the appropriate show procedure */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1727 if (prt_do_moveto)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1728 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1729 prt_write_real(prt_pos_x_moveto, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1730 prt_write_real(prt_pos_y_moveto, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1731 /* moveto and a show */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1732 prt_write_string("ms\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1733 prt_do_moveto = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1734 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1735 else /* Simple show */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1736 prt_write_string("s\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1737
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1738 ga_clear(&prt_ps_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1739 ga_init2(&prt_ps_buffer, (int)sizeof(char), prt_bufsiz);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1740 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1741 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1742
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1743
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1744 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1745 prt_resource_name(filename, cookie)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1746 char_u *filename;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1747 void *cookie;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1748 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1749 char_u *resource_filename = cookie;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1750
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1751 if (STRLEN(filename) >= MAXPATHL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1752 *resource_filename = NUL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1753 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1754 STRCPY(resource_filename, filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1755 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1756
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1757 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1758 prt_find_resource(name, resource)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1759 char *name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1760 struct prt_ps_resource_S *resource;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1761 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1762 char_u buffer[MAXPATHL + 1];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1763
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1764 STRCPY(resource->name, name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1765 /* Look for named resource file in runtimepath */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1766 STRCPY(buffer, "print");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1767 add_pathsep(buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1768 STRCAT(buffer, name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1769 STRCAT(buffer, ".ps");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1770 resource->filename[0] = NUL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1771 return (do_in_runtimepath(buffer, FALSE, prt_resource_name,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1772 resource->filename)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1773 && resource->filename[0] != NUL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1774 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1775
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1776 /* PS CR and LF characters have platform independent values */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1777 #define PSLF (0x0a)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1778 #define PSCR (0x0d)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1779
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1780 /* Static buffer to read initial comments in a resource file, some can have a
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1781 * couple of KB of comments! */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1782 #define PRT_FILE_BUFFER_LEN (2048)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1783 struct prt_resfile_buffer_S
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1784 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1785 char_u buffer[PRT_FILE_BUFFER_LEN];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1786 int len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1787 int line_start;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1788 int line_end;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1789 };
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1790
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1791 static struct prt_resfile_buffer_S prt_resfile;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1792
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1793 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1794 prt_resfile_next_line()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1795 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1796 int idx;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1797
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1798 /* Move to start of next line and then find end of line */
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1799 idx = prt_resfile.line_end + 1;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1800 while (idx < prt_resfile.len)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1801 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1802 if (prt_resfile.buffer[idx] != PSLF && prt_resfile.buffer[idx] != PSCR)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1803 break;
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1804 idx++;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1805 }
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1806 prt_resfile.line_start = idx;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1807
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1808 while (idx < prt_resfile.len)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1809 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1810 if (prt_resfile.buffer[idx] == PSLF || prt_resfile.buffer[idx] == PSCR)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1811 break;
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1812 idx++;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1813 }
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1814 prt_resfile.line_end = idx;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1815
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1816 return (idx < prt_resfile.len);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1817 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1818
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1819 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1820 prt_resfile_strncmp(offset, string, len)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1821 int offset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1822 char *string;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1823 int len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1824 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1825 /* Force not equal if string is longer than remainder of line */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1826 if (len > (prt_resfile.line_end - (prt_resfile.line_start + offset)))
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1827 return 1;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1828
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1829 return STRNCMP(&prt_resfile.buffer[prt_resfile.line_start + offset],
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1830 string, len);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1831 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1832
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1833 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1834 prt_resfile_skip_nonws(offset)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1835 int offset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1836 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1837 int idx;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1838
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1839 idx = prt_resfile.line_start + offset;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1840 while (idx < prt_resfile.line_end)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1841 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1842 if (isspace(prt_resfile.buffer[idx]))
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1843 return idx - prt_resfile.line_start;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1844 idx++;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1845 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1846 return -1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1847 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1848
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1849 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1850 prt_resfile_skip_ws(offset)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1851 int offset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1852 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1853 int idx;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1854
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1855 idx = prt_resfile.line_start + offset;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1856 while (idx < prt_resfile.line_end)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1857 {
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1858 if (!isspace(prt_resfile.buffer[idx]))
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1859 return idx - prt_resfile.line_start;
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
1860 idx++;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1861 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1862 return -1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1863 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1864
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1865 /* prt_next_dsc() - returns detail on next DSC comment line found. Returns true
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1866 * if a DSC comment is found, else false */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1867 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1868 prt_next_dsc(p_dsc_line)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1869 struct prt_dsc_line_S *p_dsc_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1870 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1871 int comment;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1872 int offset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1873
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1874 /* Move to start of next line */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1875 if (!prt_resfile_next_line())
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1876 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1877
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1878 /* DSC comments always start %% */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1879 if (prt_resfile_strncmp(0, "%%", 2) != 0)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1880 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1881
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1882 /* Find type of DSC comment */
1880
e5602d92da8c updated for version 7.2-177
vimboss
parents: 1504
diff changeset
1883 for (comment = 0; comment < (int)NUM_ELEMENTS(prt_dsc_table); comment++)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1884 if (prt_resfile_strncmp(0, prt_dsc_table[comment].string,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1885 prt_dsc_table[comment].len) == 0)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1886 break;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1887
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1888 if (comment != NUM_ELEMENTS(prt_dsc_table))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1889 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1890 /* Return type of comment */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1891 p_dsc_line->type = prt_dsc_table[comment].type;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1892 offset = prt_dsc_table[comment].len;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1893 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1894 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1895 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1896 /* Unrecognised DSC comment, skip to ws after comment leader */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1897 p_dsc_line->type = PRT_DSC_MISC_TYPE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1898 offset = prt_resfile_skip_nonws(0);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1899 if (offset == -1)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1900 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1901 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1902
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1903 /* Skip ws to comment value */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1904 offset = prt_resfile_skip_ws(offset);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1905 if (offset == -1)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1906 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1907
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1908 p_dsc_line->string = &prt_resfile.buffer[prt_resfile.line_start + offset];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1909 p_dsc_line->len = prt_resfile.line_end - (prt_resfile.line_start + offset);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1910
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1911 return TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1912 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1913
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1914 /* Improved hand crafted parser to get the type, title, and version number of a
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1915 * PS resource file so the file details can be added to the DSC header comments.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1916 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1917 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1918 prt_open_resource(resource)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1919 struct prt_ps_resource_S *resource;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1920 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1921 int offset;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1922 int seen_all;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1923 int seen_title;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1924 int seen_version;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1925 FILE *fd_resource;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1926 struct prt_dsc_line_S dsc_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1927
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1928 fd_resource = mch_fopen((char *)resource->filename, READBIN);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1929 if (fd_resource == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1930 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1931 EMSG2(_("E624: Can't open file \"%s\""), resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1932 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1933 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1934 vim_memset(prt_resfile.buffer, NUL, PRT_FILE_BUFFER_LEN);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1935
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1936 /* Parse first line to ensure valid resource file */
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1937 prt_resfile.len = (int)fread((char *)prt_resfile.buffer, sizeof(char_u),
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1938 PRT_FILE_BUFFER_LEN, fd_resource);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1939 if (ferror(fd_resource))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1940 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1941 EMSG2(_("E457: Can't read PostScript resource file \"%s\""),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1942 resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1943 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1944 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1945 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1946
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1947 prt_resfile.line_end = -1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1948 prt_resfile.line_start = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1949 if (!prt_resfile_next_line())
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1950 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1951
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1952 offset = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1953
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1954 if (prt_resfile_strncmp(offset, PRT_RESOURCE_HEADER,
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1955 (int)STRLEN(PRT_RESOURCE_HEADER)) != 0)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1956 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1957 EMSG2(_("E618: file \"%s\" is not a PostScript resource file"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1958 resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1959 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1960 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1961 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1962
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1963 /* Skip over any version numbers and following ws */
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1964 offset += (int)STRLEN(PRT_RESOURCE_HEADER);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1965 offset = prt_resfile_skip_nonws(offset);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1966 if (offset == -1)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1967 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1968 offset = prt_resfile_skip_ws(offset);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1969 if (offset == -1)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
1970 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1971
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1972 if (prt_resfile_strncmp(offset, PRT_RESOURCE_RESOURCE,
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1973 (int)STRLEN(PRT_RESOURCE_RESOURCE)) != 0)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1974 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1975 EMSG2(_("E619: file \"%s\" is not a supported PostScript resource file"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1976 resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1977 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1978 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1979 }
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1980 offset += (int)STRLEN(PRT_RESOURCE_RESOURCE);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1981
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1982 /* Decide type of resource in the file */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1983 if (prt_resfile_strncmp(offset, PRT_RESOURCE_PROCSET,
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1984 (int)STRLEN(PRT_RESOURCE_PROCSET)) == 0)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1985 resource->type = PRT_RESOURCE_TYPE_PROCSET;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1986 else if (prt_resfile_strncmp(offset, PRT_RESOURCE_ENCODING,
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1987 (int)STRLEN(PRT_RESOURCE_ENCODING)) == 0)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1988 resource->type = PRT_RESOURCE_TYPE_ENCODING;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1989 else if (prt_resfile_strncmp(offset, PRT_RESOURCE_CMAP,
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
1990 (int)STRLEN(PRT_RESOURCE_CMAP)) == 0)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1991 resource->type = PRT_RESOURCE_TYPE_CMAP;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1992 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1993 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1994 EMSG2(_("E619: file \"%s\" is not a supported PostScript resource file"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1995 resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1996 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1997 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1998 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
1999
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2000 /* Look for title and version of resource */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2001 resource->title[0] = '\0';
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2002 resource->version[0] = '\0';
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2003 seen_title = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2004 seen_version = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2005 seen_all = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2006 while (!seen_all && prt_next_dsc(&dsc_line))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2007 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2008 switch (dsc_line.type)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2009 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2010 case PRT_DSC_TITLE_TYPE:
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2011 vim_strncpy(resource->title, dsc_line.string, dsc_line.len);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2012 seen_title = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2013 if (seen_version)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2014 seen_all = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2015 break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2016
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2017 case PRT_DSC_VERSION_TYPE:
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2018 vim_strncpy(resource->version, dsc_line.string, dsc_line.len);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2019 seen_version = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2020 if (seen_title)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2021 seen_all = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2022 break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2023
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2024 case PRT_DSC_ENDCOMMENTS_TYPE:
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2025 /* Wont find title or resource after this comment, stop searching */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2026 seen_all = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2027 break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2028
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2029 case PRT_DSC_MISC_TYPE:
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2030 /* Not interested in whatever comment this line had */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2031 break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2032 }
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2033 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2034
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2035 if (!seen_title || !seen_version)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2036 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2037 EMSG2(_("E619: file \"%s\" is not a supported PostScript resource file"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2038 resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2039 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2040 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2041 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2042
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2043 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2044
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2045 return TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2046 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2047
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2048 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2049 prt_check_resource(resource, version)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2050 struct prt_ps_resource_S *resource;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2051 char_u *version;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2052 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2053 /* Version number m.n should match, the revision number does not matter */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2054 if (STRNCMP(resource->version, version, STRLEN(version)))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2055 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2056 EMSG2(_("E621: \"%s\" resource file has wrong version"),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2057 resource->name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2058 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2059 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2060
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2061 /* Other checks to be added as needed */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2062 return TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2063 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2064
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2065 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2066 prt_dsc_start()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2067 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2068 prt_write_string("%!PS-Adobe-3.0\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2069 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2070
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2071 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2072 prt_dsc_noarg(comment)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2073 char *comment;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2074 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2075 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2076 "%%%%%s\n", comment);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2077 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2078 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2079
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2080 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2081 prt_dsc_textline(comment, text)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2082 char *comment;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2083 char *text;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2084 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2085 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2086 "%%%%%s: %s\n", comment, text);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2087 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2088 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2089
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2090 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2091 prt_dsc_text(comment, text)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2092 char *comment;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2093 char *text;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2094 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2095 /* TODO - should scan 'text' for any chars needing escaping! */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2096 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2097 "%%%%%s: (%s)\n", comment, text);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2098 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2099 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2100
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2101 #define prt_dsc_atend(c) prt_dsc_text((c), "atend")
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2102
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2103 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2104 prt_dsc_ints(comment, count, ints)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2105 char *comment;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2106 int count;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2107 int *ints;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2108 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2109 int i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2110
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2111 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2112 "%%%%%s:", comment);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2113 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2114
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2115 for (i = 0; i < count; i++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2116 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2117 sprintf((char *)prt_line_buffer, " %d", ints[i]);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2118 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2119 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2120
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2121 prt_write_string("\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2122 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2123
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2124 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2125 prt_dsc_resources(comment, type, string)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2126 char *comment; /* if NULL add to previous */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2127 char *type;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2128 char *string;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2129 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2130 if (comment != NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2131 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2132 "%%%%%s: %s", comment, type);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2133 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2134 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2135 "%%%%+ %s", type);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2136 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2137
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2138 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2139 " %s\n", string);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2140 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2141 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2142
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2143 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2144 prt_dsc_font_resource(resource, ps_font)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2145 char *resource;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2146 struct prt_ps_font_S *ps_font;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2147 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2148 int i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2149
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2150 prt_dsc_resources(resource, "font",
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2151 ps_font->ps_fontname[PRT_PS_FONT_ROMAN]);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2152 for (i = PRT_PS_FONT_BOLD ; i <= PRT_PS_FONT_BOLDOBLIQUE ; i++)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2153 if (ps_font->ps_fontname[i] != NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2154 prt_dsc_resources(NULL, "font", ps_font->ps_fontname[i]);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2155 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2156
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2157 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2158 prt_dsc_requirements(duplex, tumble, collate, color, num_copies)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2159 int duplex;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2160 int tumble;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2161 int collate;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2162 int color;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2163 int num_copies;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2164 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2165 /* Only output the comment if we need to.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2166 * Note: tumble is ignored if we are not duplexing
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2167 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2168 if (!(duplex || collate || color || (num_copies > 1)))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2169 return;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2170
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2171 sprintf((char *)prt_line_buffer, "%%%%Requirements:");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2172 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2173
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2174 if (duplex)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2175 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2176 prt_write_string(" duplex");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2177 if (tumble)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2178 prt_write_string("(tumble)");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2179 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2180 if (collate)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2181 prt_write_string(" collate");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2182 if (color)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2183 prt_write_string(" color");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2184 if (num_copies > 1)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2185 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2186 prt_write_string(" numcopies(");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2187 /* Note: no space wanted so dont use prt_write_int() */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2188 sprintf((char *)prt_line_buffer, "%d", num_copies);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2189 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2190 prt_write_string(")");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2191 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2192 prt_write_string("\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2193 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2194
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2195 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2196 prt_dsc_docmedia(paper_name, width, height, weight, colour, type)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2197 char *paper_name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2198 double width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2199 double height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2200 double weight;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2201 char *colour;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2202 char *type;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2203 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2204 vim_snprintf((char *)prt_line_buffer, sizeof(prt_line_buffer),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2205 "%%%%DocumentMedia: %s ", paper_name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2206 prt_write_file(prt_line_buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2207 prt_write_real(width, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2208 prt_write_real(height, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2209 prt_write_real(weight, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2210 if (colour == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2211 prt_write_string("()");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2212 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2213 prt_write_string(colour);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2214 prt_write_string(" ");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2215 if (type == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2216 prt_write_string("()");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2217 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2218 prt_write_string(type);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2219 prt_write_string("\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2220 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2221
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2222 void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2223 mch_print_cleanup()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2224 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2225 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2226 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2227 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2228 int i;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2229
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2230 /* Free off all CID font names created, but first clear duplicate
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2231 * pointers to the same string (when the same font is used for more than
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2232 * one style).
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2233 */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2234 for (i = PRT_PS_FONT_ROMAN; i <= PRT_PS_FONT_BOLDOBLIQUE; i++)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2235 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2236 if (prt_ps_mb_font.ps_fontname[i] != NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2237 vim_free(prt_ps_mb_font.ps_fontname[i]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2238 prt_ps_mb_font.ps_fontname[i] = NULL;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2239 }
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2240 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2241
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2242 if (prt_do_conv)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2243 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2244 convert_setup(&prt_conv, NULL, NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2245 prt_do_conv = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2246 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2247 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2248 if (prt_ps_fd != NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2249 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2250 fclose(prt_ps_fd);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2251 prt_ps_fd = NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2252 prt_file_error = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2253 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2254 if (prt_ps_file_name != NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2255 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2256 vim_free(prt_ps_file_name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2257 prt_ps_file_name = NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2258 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2259 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2260
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2261 static float
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2262 to_device_units(idx, physsize, def_number)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2263 int idx;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2264 double physsize;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2265 int def_number;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2266 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2267 float ret;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2268 int u;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2269 int nr;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2270
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2271 u = prt_get_unit(idx);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2272 if (u == PRT_UNIT_NONE)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2273 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2274 u = PRT_UNIT_PERC;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2275 nr = def_number;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2276 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2277 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2278 nr = printer_opts[idx].number;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2279
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2280 switch (u)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2281 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2282 case PRT_UNIT_INCH:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2283 ret = (float)(nr * PRT_PS_DEFAULT_DPI);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2284 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2285 case PRT_UNIT_MM:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2286 ret = (float)(nr * PRT_PS_DEFAULT_DPI) / (float)25.4;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2287 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2288 case PRT_UNIT_POINT:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2289 ret = (float)nr;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2290 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2291 case PRT_UNIT_PERC:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2292 default:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2293 ret = (float)(physsize * nr) / 100;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2294 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2295 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2296
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2297 return ret;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2298 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2299
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2300 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2301 * Calculate margins for given width and height from printoptions settings.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2302 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2303 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2304 prt_page_margins(width, height, left, right, top, bottom)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2305 double width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2306 double height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2307 double *left;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2308 double *right;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2309 double *top;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2310 double *bottom;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2311 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2312 *left = to_device_units(OPT_PRINT_LEFT, width, 10);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2313 *right = width - to_device_units(OPT_PRINT_RIGHT, width, 5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2314 *top = height - to_device_units(OPT_PRINT_TOP, height, 5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2315 *bottom = to_device_units(OPT_PRINT_BOT, height, 5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2316 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2317
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2318 static void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2319 prt_font_metrics(font_scale)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2320 int font_scale;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2321 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2322 prt_line_height = (float)font_scale;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2323 prt_char_width = (float)PRT_PS_FONT_TO_USER(font_scale, prt_ps_font->wx);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2324 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2325
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2326
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2327 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2328 prt_get_cpl()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2329 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2330 if (prt_use_number())
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2331 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2332 prt_number_width = PRINT_NUMBER_WIDTH * prt_char_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2333 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2334 /* If we are outputting multi-byte characters then line numbers will be
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2335 * printed with half width characters
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2336 */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2337 if (prt_out_mbyte)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2338 prt_number_width /= 2;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2339 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2340 prt_left_margin += prt_number_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2341 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2342 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2343 prt_number_width = 0.0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2344
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2345 return (int)((prt_right_margin - prt_left_margin) / prt_char_width);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2346 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2347
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2348 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2349 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2350 prt_build_cid_fontname(font, name, name_len)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2351 int font;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2352 char_u *name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2353 int name_len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2354 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2355 char *fontname;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2356
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2357 fontname = (char *)alloc(name_len + 1);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2358 if (fontname == NULL)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2359 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2360 vim_strncpy((char_u *)fontname, name, name_len);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2361 prt_ps_mb_font.ps_fontname[font] = fontname;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2362
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2363 return TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2364 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2365 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2366
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2367 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2368 * Get number of lines of text that fit on a page (excluding the header).
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2369 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2370 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2371 prt_get_lpp()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2372 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2373 int lpp;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2374
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2375 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2376 * Calculate offset to lower left corner of background rect based on actual
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2377 * font height (based on its bounding box) and the line height, handling the
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2378 * case where the font height can exceed the line height.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2379 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2380 prt_bgcol_offset = (float)PRT_PS_FONT_TO_USER(prt_line_height,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2381 prt_ps_font->bbox_min_y);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2382 if ((prt_ps_font->bbox_max_y - prt_ps_font->bbox_min_y) < 1000.0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2383 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2384 prt_bgcol_offset -= (float)PRT_PS_FONT_TO_USER(prt_line_height,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2385 (1000.0 - (prt_ps_font->bbox_max_y -
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2386 prt_ps_font->bbox_min_y)) / 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2387 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2388
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2389 /* Get height for topmost line based on background rect offset. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2390 prt_first_line_height = prt_line_height + prt_bgcol_offset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2391
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2392 /* Calculate lpp */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2393 lpp = (int)((prt_top_margin - prt_bottom_margin) / prt_line_height);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2394
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2395 /* Adjust top margin if there is a header */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2396 prt_top_margin -= prt_line_height * prt_header_height();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2397
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2398 return lpp - prt_header_height();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2399 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2400
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2401 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2402 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2403 prt_match_encoding(p_encoding, p_cmap, pp_mbenc)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2404 char *p_encoding;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2405 struct prt_ps_mbfont_S *p_cmap;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2406 struct prt_ps_encoding_S **pp_mbenc;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2407 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2408 int mbenc;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2409 int enc_len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2410 struct prt_ps_encoding_S *p_mbenc;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2411
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2412 *pp_mbenc = NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2413 /* Look for recognised encoding */
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
2414 enc_len = (int)STRLEN(p_encoding);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2415 p_mbenc = p_cmap->encodings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2416 for (mbenc = 0; mbenc < p_cmap->num_encodings; mbenc++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2417 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2418 if (STRNICMP(p_mbenc->encoding, p_encoding, enc_len) == 0)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2419 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2420 *pp_mbenc = p_mbenc;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2421 return TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2422 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2423 p_mbenc++;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2424 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2425 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2426 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2427
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2428 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2429 prt_match_charset(p_charset, p_cmap, pp_mbchar)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2430 char *p_charset;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2431 struct prt_ps_mbfont_S *p_cmap;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2432 struct prt_ps_charset_S **pp_mbchar;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2433 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2434 int mbchar;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2435 int char_len;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2436 struct prt_ps_charset_S *p_mbchar;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2437
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2438 /* Look for recognised character set, using default if one is not given */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2439 if (*p_charset == NUL)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2440 p_charset = p_cmap->defcs;
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
2441 char_len = (int)STRLEN(p_charset);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2442 p_mbchar = p_cmap->charsets;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2443 for (mbchar = 0; mbchar < p_cmap->num_charsets; mbchar++)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2444 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2445 if (STRNICMP(p_mbchar->charset, p_charset, char_len) == 0)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2446 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2447 *pp_mbchar = p_mbchar;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2448 return TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2449 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2450 p_mbchar++;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2451 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2452 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2453 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2454 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2455
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2456 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2457 mch_print_init(psettings, jobname, forceit)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2458 prt_settings_T *psettings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2459 char_u *jobname;
1880
e5602d92da8c updated for version 7.2-177
vimboss
parents: 1504
diff changeset
2460 int forceit UNUSED;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2461 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2462 int i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2463 char *paper_name;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2464 int paper_strlen;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2465 int fontsize;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2466 char_u *p;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2467 double left;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2468 double right;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2469 double top;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2470 double bottom;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2471 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2472 int props;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2473 int cmap = 0;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2474 char_u *p_encoding;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2475 struct prt_ps_encoding_S *p_mbenc;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2476 struct prt_ps_encoding_S *p_mbenc_first;
944
b2dcb8457067 updated for version 7.0-070
vimboss
parents: 864
diff changeset
2477 struct prt_ps_charset_S *p_mbchar = NULL;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2478 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2479
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2480 #if 0
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2481 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2482 * TODO:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2483 * If "forceit" is false: pop up a dialog to select:
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2484 * - printer name
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2485 * - copies
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2486 * - collated/uncollated
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2487 * - duplex off/long side/short side
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2488 * - paper size
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2489 * - portrait/landscape
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2490 * - font size
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2491 *
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2492 * If "forceit" is true: use the default printer and settings
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2493 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2494 if (forceit)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2495 s_pd.Flags |= PD_RETURNDEFAULT;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2496 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2497
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2498 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2499 * Set up font and encoding.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2500 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2501 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2502 p_encoding = enc_skip(p_penc);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2503 if (*p_encoding == NUL)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2504 p_encoding = enc_skip(p_enc);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2505
864
bc620d6bdf06 updated for version 7.0g03
vimboss
parents: 856
diff changeset
2506 /* Look for a multi-byte font that matches the encoding and character set.
bc620d6bdf06 updated for version 7.0g03
vimboss
parents: 856
diff changeset
2507 * Only look if multi-byte character set is defined, or using multi-byte
bc620d6bdf06 updated for version 7.0g03
vimboss
parents: 856
diff changeset
2508 * encoding other than Unicode. This is because a Unicode encoding does not
bc620d6bdf06 updated for version 7.0g03
vimboss
parents: 856
diff changeset
2509 * uniquely identify a CJK character set to use. */
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2510 p_mbenc = NULL;
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 744
diff changeset
2511 props = enc_canon_props(p_encoding);
864
bc620d6bdf06 updated for version 7.0g03
vimboss
parents: 856
diff changeset
2512 if (!(props & ENC_8BIT) && ((*p_pmcs != NUL) || !(props & ENC_UNICODE)))
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 744
diff changeset
2513 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2514 p_mbenc_first = NULL;
1880
e5602d92da8c updated for version 7.2-177
vimboss
parents: 1504
diff changeset
2515 for (cmap = 0; cmap < (int)NUM_ELEMENTS(prt_ps_mbfonts); cmap++)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2516 if (prt_match_encoding((char *)p_encoding, &prt_ps_mbfonts[cmap],
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2517 &p_mbenc))
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2518 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2519 if (p_mbenc_first == NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2520 p_mbenc_first = p_mbenc;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2521 if (prt_match_charset((char *)p_pmcs, &prt_ps_mbfonts[cmap],
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2522 &p_mbchar))
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2523 break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2524 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2525
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2526 /* Use first encoding matched if no charset matched */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2527 if (p_mbchar == NULL && p_mbenc_first != NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2528 p_mbenc = p_mbenc_first;
819
23f82b5d2814 updated for version 7.0c10
vimboss
parents: 744
diff changeset
2529 }
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2530
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2531 prt_out_mbyte = (p_mbenc != NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2532 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2533 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2534 /* Build CMap name - will be same for all multi-byte fonts used */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2535 prt_cmap[0] = NUL;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2536
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2537 prt_custom_cmap = (p_mbchar == NULL);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2538 if (!prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2539 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2540 /* Check encoding and character set are compatible */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2541 if ((p_mbenc->needs_charset & p_mbchar->has_charset) == 0)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2542 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2543 EMSG(_("E673: Incompatible multi-byte encoding and character set."));
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2544 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2545 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2546
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2547 /* Add charset name if not empty */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2548 if (p_mbchar->cmap_charset != NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2549 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2550 vim_strncpy((char_u *)prt_cmap,
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2551 (char_u *)p_mbchar->cmap_charset, sizeof(prt_cmap) - 3);
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2552 STRCAT(prt_cmap, "-");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2553 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2554 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2555 else
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2556 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2557 /* Add custom CMap character set name */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2558 if (*p_pmcs == NUL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2559 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2560 EMSG(_("E674: printmbcharset cannot be empty with multi-byte encoding."));
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2561 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2562 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2563 vim_strncpy((char_u *)prt_cmap, p_pmcs, sizeof(prt_cmap) - 3);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2564 STRCAT(prt_cmap, "-");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2565 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2566
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2567 /* CMap name ends with (optional) encoding name and -H for horizontal */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2568 if (p_mbenc->cmap_encoding != NULL && STRLEN(prt_cmap)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2569 + STRLEN(p_mbenc->cmap_encoding) + 3 < sizeof(prt_cmap))
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2570 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2571 STRCAT(prt_cmap, p_mbenc->cmap_encoding);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2572 STRCAT(prt_cmap, "-");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2573 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2574 STRCAT(prt_cmap, "H");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2575
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2576 if (!mbfont_opts[OPT_MBFONT_REGULAR].present)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2577 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2578 EMSG(_("E675: No default font specified for multi-byte printing."));
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2579 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2580 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2581
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2582 /* Derive CID font names with fallbacks if not defined */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2583 if (!prt_build_cid_fontname(PRT_PS_FONT_ROMAN,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2584 mbfont_opts[OPT_MBFONT_REGULAR].string,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2585 mbfont_opts[OPT_MBFONT_REGULAR].strlen))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2586 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2587 if (mbfont_opts[OPT_MBFONT_BOLD].present)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2588 if (!prt_build_cid_fontname(PRT_PS_FONT_BOLD,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2589 mbfont_opts[OPT_MBFONT_BOLD].string,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2590 mbfont_opts[OPT_MBFONT_BOLD].strlen))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2591 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2592 if (mbfont_opts[OPT_MBFONT_OBLIQUE].present)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2593 if (!prt_build_cid_fontname(PRT_PS_FONT_OBLIQUE,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2594 mbfont_opts[OPT_MBFONT_OBLIQUE].string,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2595 mbfont_opts[OPT_MBFONT_OBLIQUE].strlen))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2596 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2597 if (mbfont_opts[OPT_MBFONT_BOLDOBLIQUE].present)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2598 if (!prt_build_cid_fontname(PRT_PS_FONT_BOLDOBLIQUE,
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2599 mbfont_opts[OPT_MBFONT_BOLDOBLIQUE].string,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2600 mbfont_opts[OPT_MBFONT_BOLDOBLIQUE].strlen))
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2601 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2602
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2603 /* Check if need to use Courier for ASCII code range, and if so pick up
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2604 * the encoding to use */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2605 prt_use_courier = mbfont_opts[OPT_MBFONT_USECOURIER].present &&
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2606 (TOLOWER_ASC(mbfont_opts[OPT_MBFONT_USECOURIER].string[0]) == 'y');
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2607 if (prt_use_courier)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2608 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2609 /* Use national ASCII variant unless ASCII wanted */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2610 if (mbfont_opts[OPT_MBFONT_ASCII].present &&
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2611 (TOLOWER_ASC(mbfont_opts[OPT_MBFONT_ASCII].string[0]) == 'y'))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2612 prt_ascii_encoding = "ascii";
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2613 else
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2614 prt_ascii_encoding = prt_ps_mbfonts[cmap].ascii_enc;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2615 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2616
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2617 prt_ps_font = &prt_ps_mb_font;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2618 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2619 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2620 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2621 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2622 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2623 prt_use_courier = FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2624 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2625 prt_ps_font = &prt_ps_courier_font;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2626 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2627
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2628 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2629 * Find the size of the paper and set the margins.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2630 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2631 prt_portrait = (!printer_opts[OPT_PRINT_PORTRAIT].present
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2632 || TOLOWER_ASC(printer_opts[OPT_PRINT_PORTRAIT].string[0]) == 'y');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2633 if (printer_opts[OPT_PRINT_PAPER].present)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2634 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2635 paper_name = (char *)printer_opts[OPT_PRINT_PAPER].string;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2636 paper_strlen = printer_opts[OPT_PRINT_PAPER].strlen;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2637 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2638 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2639 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2640 paper_name = "A4";
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2641 paper_strlen = 2;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2642 }
1880
e5602d92da8c updated for version 7.2-177
vimboss
parents: 1504
diff changeset
2643 for (i = 0; i < (int)PRT_MEDIASIZE_LEN; ++i)
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2644 if (STRLEN(prt_mediasize[i].name) == (unsigned)paper_strlen
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2645 && STRNICMP(prt_mediasize[i].name, paper_name,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2646 paper_strlen) == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2647 break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2648 if (i == PRT_MEDIASIZE_LEN)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2649 i = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2650 prt_media = i;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2651
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2652 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2653 * Set PS pagesize based on media dimensions and print orientation.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2654 * Note: Media and page sizes have defined meanings in PostScript and should
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2655 * be kept distinct. Media is the paper (or transparency, or ...) that is
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2656 * printed on, whereas the page size is the area that the PostScript
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2657 * interpreter renders into.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2658 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2659 if (prt_portrait)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2660 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2661 prt_page_width = prt_mediasize[i].width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2662 prt_page_height = prt_mediasize[i].height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2663 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2664 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2665 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2666 prt_page_width = prt_mediasize[i].height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2667 prt_page_height = prt_mediasize[i].width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2668 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2669
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2670 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2671 * Set PS page margins based on the PS pagesize, not the mediasize - this
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2672 * needs to be done before the cpl and lpp are calculated.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2673 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2674 prt_page_margins(prt_page_width, prt_page_height, &left, &right, &top,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2675 &bottom);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2676 prt_left_margin = (float)left;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2677 prt_right_margin = (float)right;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2678 prt_top_margin = (float)top;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2679 prt_bottom_margin = (float)bottom;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2680
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2681 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2682 * Set up the font size.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2683 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2684 fontsize = PRT_PS_DEFAULT_FONTSIZE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2685 for (p = p_pfn; (p = vim_strchr(p, ':')) != NULL; ++p)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2686 if (p[1] == 'h' && VIM_ISDIGIT(p[2]))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2687 fontsize = atoi((char *)p + 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2688 prt_font_metrics(fontsize);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2689
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2690 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2691 * Return the number of characters per line, and lines per page for the
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2692 * generic print code.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2693 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2694 psettings->chars_per_line = prt_get_cpl();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2695 psettings->lines_per_page = prt_get_lpp();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2696
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2697 /* Catch margin settings that leave no space for output! */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2698 if (psettings->chars_per_line <= 0 || psettings->lines_per_page <= 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2699 return FAIL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2700
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2701 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2702 * Sort out the number of copies to be printed. PS by default will do
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2703 * uncollated copies for you, so once we know how many uncollated copies are
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2704 * wanted cache it away and lie to the generic code that we only want one
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2705 * uncollated copy.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2706 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2707 psettings->n_collated_copies = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2708 psettings->n_uncollated_copies = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2709 prt_num_copies = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2710 prt_collate = (!printer_opts[OPT_PRINT_COLLATE].present
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2711 || TOLOWER_ASC(printer_opts[OPT_PRINT_COLLATE].string[0]) == 'y');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2712 if (prt_collate)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2713 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2714 /* TODO: Get number of collated copies wanted. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2715 psettings->n_collated_copies = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2716 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2717 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2718 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2719 /* TODO: Get number of uncollated copies wanted and update the cached
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2720 * count.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2721 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2722 prt_num_copies = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2723 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2724
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2725 psettings->jobname = jobname;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2726
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2727 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2728 * Set up printer duplex and tumble based on Duplex option setting - default
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2729 * is long sided duplex printing (i.e. no tumble).
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2730 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2731 prt_duplex = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2732 prt_tumble = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2733 psettings->duplex = 1;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2734 if (printer_opts[OPT_PRINT_DUPLEX].present)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2735 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2736 if (STRNICMP(printer_opts[OPT_PRINT_DUPLEX].string, "off", 3) == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2737 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2738 prt_duplex = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2739 psettings->duplex = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2740 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2741 else if (STRNICMP(printer_opts[OPT_PRINT_DUPLEX].string, "short", 5)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2742 == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2743 prt_tumble = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2744 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2745
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2746 /* For now user abort not supported */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2747 psettings->user_abort = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2748
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2749 /* If the user didn't specify a file name, use a temp file. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2750 if (psettings->outfile == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2751 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2752 prt_ps_file_name = vim_tempname('p');
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2753 if (prt_ps_file_name == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2754 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2755 EMSG(_(e_notmp));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2756 return FAIL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2757 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2758 prt_ps_fd = mch_fopen((char *)prt_ps_file_name, WRITEBIN);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2759 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2760 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2761 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2762 p = expand_env_save(psettings->outfile);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2763 if (p != NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2764 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2765 prt_ps_fd = mch_fopen((char *)p, WRITEBIN);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2766 vim_free(p);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2767 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2768 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2769 if (prt_ps_fd == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2770 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2771 EMSG(_("E324: Can't open PostScript output file"));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2772 mch_print_cleanup();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2773 return FAIL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2774 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2775
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2776 prt_bufsiz = psettings->chars_per_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2777 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2778 if (prt_out_mbyte)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2779 prt_bufsiz *= 2;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2780 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2781 ga_init2(&prt_ps_buffer, (int)sizeof(char), prt_bufsiz);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2782
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2783 prt_page_num = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2784
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2785 prt_attribute_change = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2786 prt_need_moveto = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2787 prt_need_font = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2788 prt_need_fgcol = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2789 prt_need_bgcol = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2790 prt_need_underline = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2791
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2792 prt_file_error = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2793
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2794 return OK;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2795 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2796
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2797 static int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2798 prt_add_resource(resource)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2799 struct prt_ps_resource_S *resource;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2800 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2801 FILE* fd_resource;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2802 char_u resource_buffer[512];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2803 size_t bytes_read;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2804
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2805 fd_resource = mch_fopen((char *)resource->filename, READBIN);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2806 if (fd_resource == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2807 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2808 EMSG2(_("E456: Can't open file \"%s\""), resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2809 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2810 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2811 prt_dsc_resources("BeginResource", prt_resource_types[resource->type],
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2812 (char *)resource->title);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2813
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2814 prt_dsc_textline("BeginDocument", (char *)resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2815
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2816 for (;;)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2817 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2818 bytes_read = fread((char *)resource_buffer, sizeof(char_u),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2819 sizeof(resource_buffer), fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2820 if (ferror(fd_resource))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2821 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2822 EMSG2(_("E457: Can't read PostScript resource file \"%s\""),
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2823 resource->filename);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2824 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2825 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2826 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2827 if (bytes_read == 0)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2828 break;
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
2829 prt_write_file_raw_len(resource_buffer, (int)bytes_read);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2830 if (prt_file_error)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2831 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2832 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2833 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2834 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2835 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2836 fclose(fd_resource);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2837
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2838 prt_dsc_noarg("EndDocument");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2839
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2840 prt_dsc_noarg("EndResource");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2841
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2842 return TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2843 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2844
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2845 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2846 mch_print_begin(psettings)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2847 prt_settings_T *psettings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2848 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2849 time_t now;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2850 int bbox[4];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2851 char *p_time;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2852 double left;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2853 double right;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2854 double top;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2855 double bottom;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2856 struct prt_ps_resource_S res_prolog;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2857 struct prt_ps_resource_S res_encoding;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2858 char buffer[256];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2859 char_u *p_encoding;
840
2c885fab04e3 updated for version 7.0e06
vimboss
parents: 835
diff changeset
2860 char_u *p;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2861 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2862 struct prt_ps_resource_S res_cidfont;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2863 struct prt_ps_resource_S res_cmap;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2864 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2865
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2866 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2867 * PS DSC Header comments - no PS code!
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2868 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2869 prt_dsc_start();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2870 prt_dsc_textline("Title", (char *)psettings->jobname);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2871 if (!get_user_name((char_u *)buffer, 256))
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2872 STRCPY(buffer, "Unknown");
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2873 prt_dsc_textline("For", buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2874 prt_dsc_textline("Creator", VIM_VERSION_LONG);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2875 /* Note: to ensure Clean8bit I don't think we can use LC_TIME */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2876 now = time(NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2877 p_time = ctime(&now);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2878 /* Note: ctime() adds a \n so we have to remove it :-( */
840
2c885fab04e3 updated for version 7.0e06
vimboss
parents: 835
diff changeset
2879 p = vim_strchr((char_u *)p_time, '\n');
2c885fab04e3 updated for version 7.0e06
vimboss
parents: 835
diff changeset
2880 if (p != NULL)
2c885fab04e3 updated for version 7.0e06
vimboss
parents: 835
diff changeset
2881 *p = NUL;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2882 prt_dsc_textline("CreationDate", p_time);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2883 prt_dsc_textline("DocumentData", "Clean8Bit");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2884 prt_dsc_textline("Orientation", "Portrait");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2885 prt_dsc_atend("Pages");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2886 prt_dsc_textline("PageOrder", "Ascend");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2887 /* The bbox does not change with orientation - it is always in the default
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2888 * user coordinate system! We have to recalculate right and bottom
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2889 * coordinates based on the font metrics for the bbox to be accurate. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2890 prt_page_margins(prt_mediasize[prt_media].width,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2891 prt_mediasize[prt_media].height,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2892 &left, &right, &top, &bottom);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2893 bbox[0] = (int)left;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2894 if (prt_portrait)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2895 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2896 /* In portrait printing the fixed point is the top left corner so we
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2897 * derive the bbox from that point. We have the expected cpl chars
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2898 * across the media and lpp lines down the media.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2899 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2900 bbox[1] = (int)(top - (psettings->lines_per_page + prt_header_height())
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2901 * prt_line_height);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2902 bbox[2] = (int)(left + psettings->chars_per_line * prt_char_width
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2903 + 0.5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2904 bbox[3] = (int)(top + 0.5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2905 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2906 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2907 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2908 /* In landscape printing the fixed point is the bottom left corner so we
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2909 * derive the bbox from that point. We have lpp chars across the media
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2910 * and cpl lines up the media.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2911 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2912 bbox[1] = (int)bottom;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2913 bbox[2] = (int)(left + ((psettings->lines_per_page
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2914 + prt_header_height()) * prt_line_height) + 0.5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2915 bbox[3] = (int)(bottom + psettings->chars_per_line * prt_char_width
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2916 + 0.5);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2917 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2918 prt_dsc_ints("BoundingBox", 4, bbox);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2919 /* The media width and height does not change with landscape printing! */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2920 prt_dsc_docmedia(prt_mediasize[prt_media].name,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2921 prt_mediasize[prt_media].width,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2922 prt_mediasize[prt_media].height,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2923 (double)0, NULL, NULL);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2924 /* Define fonts needed */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2925 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2926 if (!prt_out_mbyte || prt_use_courier)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2927 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2928 prt_dsc_font_resource("DocumentNeededResources", &prt_ps_courier_font);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2929 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2930 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2931 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2932 prt_dsc_font_resource((prt_use_courier ? NULL
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2933 : "DocumentNeededResources"), &prt_ps_mb_font);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2934 if (!prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2935 prt_dsc_resources(NULL, "cmap", prt_cmap);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2936 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2937 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2938
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2939 /* Search for external resources VIM supplies */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2940 if (!prt_find_resource("prolog", &res_prolog))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2941 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2942 EMSG(_("E456: Can't find PostScript resource file \"prolog.ps\""));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2943 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2944 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2945 if (!prt_open_resource(&res_prolog))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2946 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2947 if (!prt_check_resource(&res_prolog, PRT_PROLOG_VERSION))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2948 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2949 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2950 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2951 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2952 /* Look for required version of multi-byte printing procset */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2953 if (!prt_find_resource("cidfont", &res_cidfont))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2954 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2955 EMSG(_("E456: Can't find PostScript resource file \"cidfont.ps\""));
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2956 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2957 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2958 if (!prt_open_resource(&res_cidfont))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2959 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2960 if (!prt_check_resource(&res_cidfont, PRT_CID_PROLOG_VERSION))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2961 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2962 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2963 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2964
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2965 /* Find an encoding to use for printing.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2966 * Check 'printencoding'. If not set or not found, then use 'encoding'. If
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2967 * that cannot be found then default to "latin1".
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2968 * Note: VIM specific encoding header is always skipped.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2969 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2970 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2971 if (!prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2972 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2973 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2974 p_encoding = enc_skip(p_penc);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2975 if (*p_encoding == NUL
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2976 || !prt_find_resource((char *)p_encoding, &res_encoding))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2977 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2978 /* 'printencoding' not set or not supported - find alternate */
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2979 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2980 int props;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2981
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2982 p_encoding = enc_skip(p_enc);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2983 props = enc_canon_props(p_encoding);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2984 if (!(props & ENC_8BIT)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2985 || !prt_find_resource((char *)p_encoding, &res_encoding))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2986 /* 8-bit 'encoding' is not supported */
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
2987 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2988 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2989 /* Use latin1 as default printing encoding */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2990 p_encoding = (char_u *)"latin1";
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2991 if (!prt_find_resource((char *)p_encoding, &res_encoding))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2992 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2993 EMSG2(_("E456: Can't find PostScript resource file \"%s.ps\""),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2994 p_encoding);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2995 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2996 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2997 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2998 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
2999 if (!prt_open_resource(&res_encoding))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3000 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3001 /* For the moment there are no checks on encoding resource files to
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3002 * perform */
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3003 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3004 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3005 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3006 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3007 p_encoding = enc_skip(p_penc);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3008 if (*p_encoding == NUL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3009 p_encoding = enc_skip(p_enc);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3010 if (prt_use_courier)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3011 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3012 /* Include ASCII range encoding vector */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3013 if (!prt_find_resource(prt_ascii_encoding, &res_encoding))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3014 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3015 EMSG2(_("E456: Can't find PostScript resource file \"%s.ps\""),
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3016 prt_ascii_encoding);
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3017 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3018 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3019 if (!prt_open_resource(&res_encoding))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3020 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3021 /* For the moment there are no checks on encoding resource files to
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3022 * perform */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3023 }
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3024 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3025
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3026 prt_conv.vc_type = CONV_NONE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3027 if (!(enc_canon_props(p_enc) & enc_canon_props(p_encoding) & ENC_8BIT)) {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3028 /* Set up encoding conversion if required */
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3029 if (FAIL == convert_setup(&prt_conv, p_enc, p_encoding))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3030 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3031 EMSG2(_("E620: Unable to convert to print encoding \"%s\""),
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3032 p_encoding);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3033 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3034 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3035 prt_do_conv = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3036 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3037 prt_do_conv = prt_conv.vc_type != CONV_NONE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3038
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3039 if (prt_out_mbyte && prt_custom_cmap)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3040 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3041 /* Find user supplied CMap */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3042 if (!prt_find_resource(prt_cmap, &res_cmap))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3043 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3044 EMSG2(_("E456: Can't find PostScript resource file \"%s.ps\""),
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3045 prt_cmap);
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3046 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3047 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3048 if (!prt_open_resource(&res_cmap))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3049 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3050 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3051 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3052
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3053 /* List resources supplied */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3054 STRCPY(buffer, res_prolog.title);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3055 STRCAT(buffer, " ");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3056 STRCAT(buffer, res_prolog.version);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3057 prt_dsc_resources("DocumentSuppliedResources", "procset", buffer);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3058 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3059 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3060 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3061 STRCPY(buffer, res_cidfont.title);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3062 STRCAT(buffer, " ");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3063 STRCAT(buffer, res_cidfont.version);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3064 prt_dsc_resources(NULL, "procset", buffer);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3065
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3066 if (prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3067 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3068 STRCPY(buffer, res_cmap.title);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3069 STRCAT(buffer, " ");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3070 STRCAT(buffer, res_cmap.version);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3071 prt_dsc_resources(NULL, "cmap", buffer);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3072 }
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3073 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3074 if (!prt_out_mbyte || prt_use_courier)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3075 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3076 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3077 STRCPY(buffer, res_encoding.title);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3078 STRCAT(buffer, " ");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3079 STRCAT(buffer, res_encoding.version);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3080 prt_dsc_resources(NULL, "encoding", buffer);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3081 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3082 prt_dsc_requirements(prt_duplex, prt_tumble, prt_collate,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3083 #ifdef FEAT_SYN_HL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3084 psettings->do_syntax
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3085 #else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3086 0
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3087 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3088 , prt_num_copies);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3089 prt_dsc_noarg("EndComments");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3090
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3091 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3092 * PS Document page defaults
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3093 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3094 prt_dsc_noarg("BeginDefaults");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3095
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3096 /* List font resources most likely common to all pages */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3097 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3098 if (!prt_out_mbyte || prt_use_courier)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3099 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3100 prt_dsc_font_resource("PageResources", &prt_ps_courier_font);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3101 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3102 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3103 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3104 prt_dsc_font_resource((prt_use_courier ? NULL : "PageResources"),
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3105 &prt_ps_mb_font);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3106 if (!prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3107 prt_dsc_resources(NULL, "cmap", prt_cmap);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3108 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3109 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3110
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3111 /* Paper will be used for all pages */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3112 prt_dsc_textline("PageMedia", prt_mediasize[prt_media].name);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3113
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3114 prt_dsc_noarg("EndDefaults");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3115
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3116 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3117 * PS Document prolog inclusion - all required procsets.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3118 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3119 prt_dsc_noarg("BeginProlog");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3120
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3121 /* Add required procsets - NOTE: order is important! */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3122 if (!prt_add_resource(&res_prolog))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3123 return FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3124 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3125 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3126 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3127 /* Add CID font procset, and any user supplied CMap */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3128 if (!prt_add_resource(&res_cidfont))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3129 return FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3130 if (prt_custom_cmap && !prt_add_resource(&res_cmap))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3131 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3132 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3133 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3134
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3135 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3136 if (!prt_out_mbyte || prt_use_courier)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3137 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3138 /* There will be only one Roman font encoding to be included in the PS
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3139 * file. */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3140 if (!prt_add_resource(&res_encoding))
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3141 return FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3142
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3143 prt_dsc_noarg("EndProlog");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3144
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3145 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3146 * PS Document setup - must appear after the prolog
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3147 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3148 prt_dsc_noarg("BeginSetup");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3149
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3150 /* Device setup - page size and number of uncollated copies */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3151 prt_write_int((int)prt_mediasize[prt_media].width);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3152 prt_write_int((int)prt_mediasize[prt_media].height);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3153 prt_write_int(0);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3154 prt_write_string("sps\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3155 prt_write_int(prt_num_copies);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3156 prt_write_string("nc\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3157 prt_write_boolean(prt_duplex);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3158 prt_write_boolean(prt_tumble);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3159 prt_write_string("dt\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3160 prt_write_boolean(prt_collate);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3161 prt_write_string("c\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3162
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3163 /* Font resource inclusion and definition */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3164 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3165 if (!prt_out_mbyte || prt_use_courier)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3166 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3167 /* When using Courier for ASCII range when printing multi-byte, need to
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3168 * pick up ASCII encoding to use with it. */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3169 if (prt_use_courier)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3170 p_encoding = (char_u *)prt_ascii_encoding;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3171 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3172 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3173 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_ROMAN]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3174 prt_def_font("F0", (char *)p_encoding, (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3175 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_ROMAN]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3176 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3177 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_BOLD]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3178 prt_def_font("F1", (char *)p_encoding, (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3179 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_BOLD]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3180 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3181 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_OBLIQUE]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3182 prt_def_font("F2", (char *)p_encoding, (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3183 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_OBLIQUE]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3184 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3185 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_BOLDOBLIQUE]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3186 prt_def_font("F3", (char *)p_encoding, (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3187 prt_ps_courier_font.ps_fontname[PRT_PS_FONT_BOLDOBLIQUE]);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3188 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3189 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3190 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3191 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3192 /* Define the CID fonts to be used in the job. Typically CJKV fonts do
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3193 * not have an italic form being a western style, so where no font is
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3194 * defined for these faces VIM falls back to an existing face.
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3195 * Note: if using Courier for the ASCII range then the printout will
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3196 * have bold/italic/bolditalic regardless of the setting of printmbfont.
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3197 */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3198 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3199 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_ROMAN]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3200 if (!prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3201 prt_dsc_resources("IncludeResource", "cmap", prt_cmap);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3202 prt_def_cidfont("CF0", (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3203 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_ROMAN]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3204
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3205 if (prt_ps_mb_font.ps_fontname[PRT_PS_FONT_BOLD] != NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3206 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3207 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3208 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_BOLD]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3209 if (!prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3210 prt_dsc_resources("IncludeResource", "cmap", prt_cmap);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3211 prt_def_cidfont("CF1", (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3212 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_BOLD]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3213 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3214 else
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3215 /* Use ROMAN for BOLD */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3216 prt_dup_cidfont("CF0", "CF1");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3217
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3218 if (prt_ps_mb_font.ps_fontname[PRT_PS_FONT_OBLIQUE] != NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3219 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3220 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3221 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_OBLIQUE]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3222 if (!prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3223 prt_dsc_resources("IncludeResource", "cmap", prt_cmap);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3224 prt_def_cidfont("CF2", (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3225 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_OBLIQUE]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3226 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3227 else
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3228 /* Use ROMAN for OBLIQUE */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3229 prt_dup_cidfont("CF0", "CF2");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3230
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3231 if (prt_ps_mb_font.ps_fontname[PRT_PS_FONT_BOLDOBLIQUE] != NULL)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3232 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3233 prt_dsc_resources("IncludeResource", "font",
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3234 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_BOLDOBLIQUE]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3235 if (!prt_custom_cmap)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3236 prt_dsc_resources("IncludeResource", "cmap", prt_cmap);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3237 prt_def_cidfont("CF3", (int)prt_line_height,
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3238 prt_ps_mb_font.ps_fontname[PRT_PS_FONT_BOLDOBLIQUE]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3239 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3240 else
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3241 /* Use BOLD for BOLDOBLIQUE */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3242 prt_dup_cidfont("CF1", "CF3");
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3243 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3244 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3245
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3246 /* Misc constant vars used for underlining and background rects */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3247 prt_def_var("UO", PRT_PS_FONT_TO_USER(prt_line_height,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3248 prt_ps_font->uline_offset), 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3249 prt_def_var("UW", PRT_PS_FONT_TO_USER(prt_line_height,
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3250 prt_ps_font->uline_width), 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3251 prt_def_var("BO", prt_bgcol_offset, 2);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3252
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3253 prt_dsc_noarg("EndSetup");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3254
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3255 /* Fail if any problems writing out to the PS file */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3256 return !prt_file_error;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3257 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3258
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3259 void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3260 mch_print_end(psettings)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3261 prt_settings_T *psettings;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3262 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3263 prt_dsc_noarg("Trailer");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3264
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3265 /*
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3266 * Output any info we don't know in toto until we finish
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3267 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3268 prt_dsc_ints("Pages", 1, &prt_page_num);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3269
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3270 prt_dsc_noarg("EOF");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3271
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3272 /* Write CTRL-D to close serial communication link if used.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3273 * NOTHING MUST BE WRITTEN AFTER THIS! */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3274 prt_write_file((char_u *)IF_EB("\004", "\067"));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3275
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3276 if (!prt_file_error && psettings->outfile == NULL
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3277 && !got_int && !psettings->user_abort)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3278 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3279 /* Close the file first. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3280 if (prt_ps_fd != NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3281 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3282 fclose(prt_ps_fd);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3283 prt_ps_fd = NULL;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3284 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3285 prt_message((char_u *)_("Sending to printer..."));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3286
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3287 /* Not printing to a file: use 'printexpr' to print the file. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3288 if (eval_printexpr(prt_ps_file_name, psettings->arguments) == FAIL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3289 EMSG(_("E365: Failed to print PostScript file"));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3290 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3291 prt_message((char_u *)_("Print job sent."));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3292 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3293
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3294 mch_print_cleanup();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3295 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3296
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3297 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3298 mch_print_end_page()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3299 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3300 prt_flush_buffer();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3301
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3302 prt_write_string("re sp\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3303
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3304 prt_dsc_noarg("PageTrailer");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3305
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3306 return !prt_file_error;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3307 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3308
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3309 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3310 mch_print_begin_page(str)
1880
e5602d92da8c updated for version 7.2-177
vimboss
parents: 1504
diff changeset
3311 char_u *str UNUSED;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3312 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3313 int page_num[2];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3314
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3315 prt_page_num++;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3316
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3317 page_num[0] = page_num[1] = prt_page_num;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3318 prt_dsc_ints("Page", 2, page_num);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3319
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3320 prt_dsc_noarg("BeginPageSetup");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3321
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3322 prt_write_string("sv\n0 g\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3323 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3324 prt_in_ascii = !prt_out_mbyte;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3325 if (prt_out_mbyte)
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3326 prt_write_string("CF0 sf\n");
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3327 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3328 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3329 prt_write_string("F0 sf\n");
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3330 prt_fgcol = PRCOLOR_BLACK;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3331 prt_bgcol = PRCOLOR_WHITE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3332 prt_font = PRT_PS_FONT_ROMAN;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3333
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3334 /* Set up page transformation for landscape printing. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3335 if (!prt_portrait)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3336 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3337 prt_write_int(-((int)prt_mediasize[prt_media].width));
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3338 prt_write_string("sl\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3339 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3340
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3341 prt_dsc_noarg("EndPageSetup");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3342
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3343 /* We have reset the font attributes, force setting them again. */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3344 curr_bg = (long_u)0xffffffff;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3345 curr_fg = (long_u)0xffffffff;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3346 curr_bold = MAYBE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3347
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3348 return !prt_file_error;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3349 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3350
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3351 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3352 mch_print_blank_page()
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3353 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3354 return (mch_print_begin_page(NULL) ? (mch_print_end_page()) : FALSE);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3355 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3356
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3357 static float prt_pos_x = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3358 static float prt_pos_y = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3359
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3360 void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3361 mch_print_start_line(margin, page_line)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3362 int margin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3363 int page_line;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3364 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3365 prt_pos_x = prt_left_margin;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3366 if (margin)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3367 prt_pos_x -= prt_number_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3368
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3369 prt_pos_y = prt_top_margin - prt_first_line_height -
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3370 page_line * prt_line_height;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3371
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3372 prt_attribute_change = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3373 prt_need_moveto = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3374 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3375 prt_half_width = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3376 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3377 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3378
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3379 int
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3380 mch_print_text_out(p, len)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3381 char_u *p;
1880
e5602d92da8c updated for version 7.2-177
vimboss
parents: 1504
diff changeset
3382 int len UNUSED;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3383 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3384 int need_break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3385 char_u ch;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3386 char_u ch_buff[8];
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3387 float char_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3388 float next_pos;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3389 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3390 int in_ascii;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3391 int half_width;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3392 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3393
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3394 char_width = prt_char_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3395
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3396 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3397 /* Ideally VIM would create a rearranged CID font to combine a Roman and
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3398 * CJKV font to do what VIM is doing here - use a Roman font for characters
1218
2136af39a655 updated for version 7.1b
vimboss
parents: 944
diff changeset
3399 * in the ASCII range, and the original CID font for everything else.
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3400 * The problem is that GhostScript still (as of 8.13) does not support
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3401 * rearranged fonts even though they have been documented by Adobe for 7
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3402 * years! If they ever do, a lot of this code will disappear.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3403 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3404 if (prt_use_courier)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3405 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3406 in_ascii = (len == 1 && *p < 0x80);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3407 if (prt_in_ascii)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3408 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3409 if (!in_ascii)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3410 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3411 /* No longer in ASCII range - need to switch font */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3412 prt_in_ascii = FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3413 prt_need_font = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3414 prt_attribute_change = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3415 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3416 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3417 else if (in_ascii)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3418 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3419 /* Now in ASCII range - need to switch font */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3420 prt_in_ascii = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3421 prt_need_font = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3422 prt_attribute_change = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3423 }
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3424 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3425 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3426 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3427 half_width = ((*mb_ptr2cells)(p) == 1);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3428 if (half_width)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3429 char_width /= 2;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3430 if (prt_half_width)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3431 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3432 if (!half_width)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3433 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3434 prt_half_width = FALSE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3435 prt_pos_x += prt_char_width/4;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3436 prt_need_moveto = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3437 prt_attribute_change = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3438 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3439 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3440 else if (half_width)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3441 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3442 prt_half_width = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3443 prt_pos_x += prt_char_width/4;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3444 prt_need_moveto = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3445 prt_attribute_change = TRUE;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3446 }
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3447 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3448 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3449
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3450 /* Output any required changes to the graphics state, after flushing any
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3451 * text buffered so far.
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3452 */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3453 if (prt_attribute_change)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3454 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3455 prt_flush_buffer();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3456 /* Reset count of number of chars that will be printed */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3457 prt_text_run = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3458
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3459 if (prt_need_moveto)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3460 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3461 prt_pos_x_moveto = prt_pos_x;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3462 prt_pos_y_moveto = prt_pos_y;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3463 prt_do_moveto = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3464
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3465 prt_need_moveto = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3466 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3467 if (prt_need_font)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3468 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3469 #ifdef FEAT_MBYTE
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3470 if (!prt_in_ascii)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3471 prt_write_string("CF");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3472 else
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3473 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3474 prt_write_string("F");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3475 prt_write_int(prt_font);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3476 prt_write_string("sf\n");
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3477 prt_need_font = FALSE;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3478 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3479 if (prt_need_fgcol)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3480 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3481 int r, g, b;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3482 r = ((unsigned)prt_fgcol & 0xff0000) >> 16;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3483 g = ((unsigned)prt_fgcol & 0xff00) >> 8;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3484 b = prt_fgcol & 0xff;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3485
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3486 prt_write_real(r / 255.0, 3);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3487 if (r == g && g == b)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3488 prt_write_string("g\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3489 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3490 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3491 prt_write_real(g / 255.0, 3);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3492 prt_write_real(b / 255.0, 3);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3493 prt_write_string("r\n");
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3494 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3495 prt_need_fgcol = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3496 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3497
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3498 if (prt_bgcol != PRCOLOR_WHITE)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3499 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3500 prt_new_bgcol = prt_bgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3501 if (prt_need_bgcol)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3502 prt_do_bgcol = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3503 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3504 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3505 prt_do_bgcol = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3506 prt_need_bgcol = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3507
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3508 if (prt_need_underline)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3509 prt_do_underline = prt_underline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3510 prt_need_underline = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3511
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3512 prt_attribute_change = FALSE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3513 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3514
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3515 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3516 if (prt_do_conv)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3517 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3518 /* Convert from multi-byte to 8-bit encoding */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3519 p = string_convert(&prt_conv, p, &len);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3520 if (p == NULL)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3521 p = (char_u *)"";
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3522 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3523
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3524 if (prt_out_mbyte)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3525 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3526 /* Multi-byte character strings are represented more efficiently as hex
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3527 * strings when outputting clean 8 bit PS.
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3528 */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3529 do
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3530 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3531 ch = prt_hexchar[(unsigned)(*p) >> 4];
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3532 ga_append(&prt_ps_buffer, ch);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3533 ch = prt_hexchar[(*p) & 0xf];
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3534 ga_append(&prt_ps_buffer, ch);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3535 p++;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3536 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3537 while (--len);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3538 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3539 else
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3540 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3541 {
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3542 /* Add next character to buffer of characters to output.
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3543 * Note: One printed character may require several PS characters to
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3544 * represent it, but we only count them as one printed character.
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3545 */
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3546 ch = *p;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3547 if (ch < 32 || ch == '(' || ch == ')' || ch == '\\')
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3548 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3549 /* Convert non-printing characters to either their escape or octal
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3550 * sequence, ensures PS sent over a serial line does not interfere
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3551 * with the comms protocol. Note: For EBCDIC we need to write out
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3552 * the escape sequences as ASCII codes!
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3553 * Note 2: Char codes < 32 are identical in EBCDIC and ASCII AFAIK!
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3554 */
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3555 ga_append(&prt_ps_buffer, IF_EB('\\', 0134));
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3556 switch (ch)
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3557 {
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3558 case BS: ga_append(&prt_ps_buffer, IF_EB('b', 0142)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3559 case TAB: ga_append(&prt_ps_buffer, IF_EB('t', 0164)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3560 case NL: ga_append(&prt_ps_buffer, IF_EB('n', 0156)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3561 case FF: ga_append(&prt_ps_buffer, IF_EB('f', 0146)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3562 case CAR: ga_append(&prt_ps_buffer, IF_EB('r', 0162)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3563 case '(': ga_append(&prt_ps_buffer, IF_EB('(', 0050)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3564 case ')': ga_append(&prt_ps_buffer, IF_EB(')', 0051)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3565 case '\\': ga_append(&prt_ps_buffer, IF_EB('\\', 0134)); break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3566
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3567 default:
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3568 sprintf((char *)ch_buff, "%03o", (unsigned int)ch);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3569 #ifdef EBCDIC
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3570 ebcdic2ascii(ch_buff, 3);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3571 #endif
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3572 ga_append(&prt_ps_buffer, ch_buff[0]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3573 ga_append(&prt_ps_buffer, ch_buff[1]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3574 ga_append(&prt_ps_buffer, ch_buff[2]);
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3575 break;
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3576 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3577 }
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3578 else
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3579 ga_append(&prt_ps_buffer, ch);
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3580 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3581
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3582 #ifdef FEAT_MBYTE
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3583 /* Need to free any translated characters */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3584 if (prt_do_conv && (*p != NUL))
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3585 vim_free(p);
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3586 #endif
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3587
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3588 prt_text_run += char_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3589 prt_pos_x += char_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3590
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3591 /* The downside of fp - use relative error on right margin check */
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3592 next_pos = prt_pos_x + prt_char_width;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3593 need_break = (next_pos > prt_right_margin) &&
856
8cd729851562 updated for version 7.0g
vimboss
parents: 843
diff changeset
3594 ((next_pos - prt_right_margin) > (prt_right_margin*1e-5));
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3595
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3596 if (need_break)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3597 prt_flush_buffer();
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3598
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3599 return need_break;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3600 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3601
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3602 void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3603 mch_print_set_font(iBold, iItalic, iUnderline)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3604 int iBold;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3605 int iItalic;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3606 int iUnderline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3607 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3608 int font = 0;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3609
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3610 if (iBold)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3611 font |= 0x01;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3612 if (iItalic)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3613 font |= 0x02;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3614
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3615 if (font != prt_font)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3616 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3617 prt_font = font;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3618 prt_attribute_change = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3619 prt_need_font = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3620 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3621 if (prt_underline != iUnderline)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3622 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3623 prt_underline = iUnderline;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3624 prt_attribute_change = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3625 prt_need_underline = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3626 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3627 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3628
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3629 void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3630 mch_print_set_bg(bgcol)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3631 long_u bgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3632 {
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
3633 prt_bgcol = (int)bgcol;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3634 prt_attribute_change = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3635 prt_need_bgcol = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3636 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3637
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3638 void
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3639 mch_print_set_fg(fgcol)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3640 long_u fgcol;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3641 {
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3642 if (fgcol != (long_u)prt_fgcol)
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3643 {
835
8bebcabccc2c updated for version 7.0e01
vimboss
parents: 823
diff changeset
3644 prt_fgcol = (int)fgcol;
442
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3645 prt_attribute_change = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3646 prt_need_fgcol = TRUE;
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3647 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3648 }
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3649
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3650 # endif /*FEAT_POSTSCRIPT*/
c36697964844 updated for version 7.0115
vimboss
parents:
diff changeset
3651 #endif /*FEAT_PRINTER*/