1 /* $Id: term_ascii.c,v 1.12 2011/01/25 17:32:04 kristaps Exp $ */ 2 /* 3 * Copyright (c) 2010 Kristaps Dzonsons <kristaps@bsd.lv> 4 * 5 * Permission to use, copy, modify, and distribute this software for any 6 * purpose with or without fee is hereby granted, provided that the above 7 * copyright notice and this permission notice appear in all copies. 8 * 9 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES 10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR 12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF 15 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 16 */ 17 #ifdef HAVE_CONFIG_H 18 #include "config.h" 19 #endif 20 21 #include <sys/types.h> 22 23 #include <assert.h> 24 #include <stdint.h> 25 #include <stdio.h> 26 #include <stdlib.h> 27 #include <unistd.h> 28 29 #include "mandoc.h" 30 #include "out.h" 31 #include "term.h" 32 #include "main.h" 33 34 static double ascii_hspan(const struct termp *, 35 const struct roffsu *); 36 static size_t ascii_width(const struct termp *, char); 37 static void ascii_advance(struct termp *, size_t); 38 static void ascii_begin(struct termp *); 39 static void ascii_end(struct termp *); 40 static void ascii_endline(struct termp *); 41 static void ascii_letter(struct termp *, char); 42 43 44 void * 45 ascii_alloc(char *outopts) 46 { 47 struct termp *p; 48 const char *toks[2]; 49 char *v; 50 51 p = term_alloc(TERMENC_ASCII); 52 53 p->tabwidth = 5; 54 p->defrmargin = 78; 55 56 p->advance = ascii_advance; 57 p->begin = ascii_begin; 58 p->end = ascii_end; 59 p->endline = ascii_endline; 60 p->hspan = ascii_hspan; 61 p->letter = ascii_letter; 62 p->type = TERMTYPE_CHAR; 63 p->width = ascii_width; 64 65 toks[0] = "width"; 66 toks[1] = NULL; 67 68 while (outopts && *outopts) 69 switch (getsubopt(&outopts, UNCONST(toks), &v)) { 70 case (0): 71 p->defrmargin = (size_t)atoi(v); 72 break; 73 default: 74 break; 75 } 76 77 /* Enforce a lower boundary. */ 78 if (p->defrmargin < 58) 79 p->defrmargin = 58; 80 81 return(p); 82 } 83 84 85 /* ARGSUSED */ 86 static size_t 87 ascii_width(const struct termp *p, char c) 88 { 89 90 return(1); 91 } 92 93 94 void 95 ascii_free(void *arg) 96 { 97 98 term_free((struct termp *)arg); 99 } 100 101 102 /* ARGSUSED */ 103 static void 104 ascii_letter(struct termp *p, char c) 105 { 106 107 /* LINTED */ 108 putchar(c); 109 } 110 111 112 static void 113 ascii_begin(struct termp *p) 114 { 115 116 (*p->headf)(p, p->argf); 117 } 118 119 120 static void 121 ascii_end(struct termp *p) 122 { 123 124 (*p->footf)(p, p->argf); 125 } 126 127 128 /* ARGSUSED */ 129 static void 130 ascii_endline(struct termp *p) 131 { 132 133 putchar('\n'); 134 } 135 136 137 /* ARGSUSED */ 138 static void 139 ascii_advance(struct termp *p, size_t len) 140 { 141 size_t i; 142 143 /* Just print whitespace on the terminal. */ 144 for (i = 0; i < len; i++) 145 putchar(' '); 146 } 147 148 149 /* ARGSUSED */ 150 static double 151 ascii_hspan(const struct termp *p, const struct roffsu *su) 152 { 153 double r; 154 155 /* 156 * Approximate based on character width. These are generated 157 * entirely by eyeballing the screen, but appear to be correct. 158 */ 159 160 switch (su->unit) { 161 case (SCALE_CM): 162 r = 4 * su->scale; 163 break; 164 case (SCALE_IN): 165 r = 10 * su->scale; 166 break; 167 case (SCALE_PC): 168 r = (10 * su->scale) / 6; 169 break; 170 case (SCALE_PT): 171 r = (10 * su->scale) / 72; 172 break; 173 case (SCALE_MM): 174 r = su->scale / 1000; 175 break; 176 case (SCALE_VS): 177 r = su->scale * 2 - 1; 178 break; 179 default: 180 r = su->scale; 181 break; 182 } 183 184 return(r); 185 } 186 187