summaryrefslogtreecommitdiff
path: root/fslsfonts.c
diff options
context:
space:
mode:
Diffstat (limited to 'fslsfonts.c')
-rw-r--r--fslsfonts.c498
1 files changed, 498 insertions, 0 deletions
diff --git a/fslsfonts.c b/fslsfonts.c
new file mode 100644
index 0000000..f7a927f
--- /dev/null
+++ b/fslsfonts.c
@@ -0,0 +1,498 @@
+/* $Xorg: fslsfonts.c,v 1.4 2001/02/09 02:05:30 xorgcvs Exp $ */
+/*
+
+Copyright 1990, 1998 The Open Group
+
+Permission to use, copy, modify, distribute, and sell this software and its
+documentation for any purpose is hereby granted without fee, provided that
+the above copyright notice appear in all copies and that both that
+copyright notice and this permission notice appear in supporting
+documentation.
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+Except as contained in this notice, the name of The Open Group shall not be
+used in advertising or otherwise to promote the sale, use or other dealings
+in this Software without prior written authorization from The Open Group.
+
+ * Copyright 1990 Network Computing Devices;
+ * Portions Copyright 1987 by Digital Equipment Corporation
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and
+ * its documentation for any purpose is hereby granted without fee, provided
+ * that the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the names of Network Computing Devices, or Digital
+ * not be used in advertising or publicity pertaining to distribution
+ * of the software without specific, written prior permission.
+ *
+ * NETWORK COMPUTING DEVICES, AND DIGITAL DISCLAIM ALL WARRANTIES WITH
+ * REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL NETWORK COMPUTING DEVICES,
+ * OR DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
+ * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
+ * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
+ * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF
+ * THIS SOFTWARE.
+ */
+
+#include "FSlib.h"
+#include <stdio.h>
+#include <X11/Xos.h>
+
+#ifndef N_START
+#define N_START 1000 /* Maximum # of fonts to start with */
+#endif
+
+int max_output_line_width = 79;
+int output_line_padding = 3;
+int columns = 0;
+
+#define L_SHORT 0
+#define L_MEDIUM 1
+#define L_LONG 2
+#define L_VERYLONG 3
+
+Bool sort_output = True;
+int long_list = L_SHORT;
+int nnames = N_START;
+int font_cnt;
+int min_max;
+typedef struct {
+ char *name;
+ FSXFontInfoHeader *info;
+ FSPropInfo *pi;
+ FSPropOffset *po;
+ unsigned char *pd;
+} FontList;
+FontList *font_list;
+
+FSServer *svr;
+
+char *program_name;
+
+
+usage()
+{
+ fprintf(stderr, "usage: %s [-options] [-fn pattern]\n", program_name);
+ fprintf(stderr, "where options include:\n");
+
+ fprintf(stderr,
+ " -l[l[l]] give long info about each font\n");
+ fprintf(stderr,
+ " -m give character min and max bounds\n");
+
+ fprintf(stderr,
+ " -C force columns\n");
+ fprintf(stderr,
+ " -1 force single column\n");
+ fprintf(stderr,
+ " -u keep output unsorted\n");
+ fprintf(stderr,
+ " -w width maximum width for multiple columns\n");
+ fprintf(stderr,
+ " -n columns number of columns if multi column\n");
+ fprintf(stderr,
+ " -server servername font server to contact\n");
+ fprintf(stderr,
+ "\n");
+ exit(1);
+}
+
+main(argc, argv)
+ int argc;
+ char **argv;
+{
+ int argcnt = 0,
+ i;
+ char *servername = NULL;
+
+ program_name = argv[0];
+
+ for (i = 1; i < argc; i++) {
+ if (strncmp(argv[i], "-s", 2) == 0) {
+ if (++i >= argc)
+ usage();
+ servername = argv[i];
+ }
+ }
+
+ if ((svr = FSOpenServer(servername)) == NULL) {
+ fprintf(stderr, "%s: unable to open server \"%s\"\n",
+ program_name, FSServerName(servername));
+ exit(0);
+ }
+ /* Handle command line arguments, open display */
+ for (argv++, argc--; argc; argv++, argc--) {
+ if (argv[0][0] == '-') {
+ if (argcnt > 0)
+ usage();
+ for (i = 1; argv[0][i]; i++)
+ switch (argv[0][i]) {
+ case 'l':
+ long_list++;
+ break;
+ case 'm':
+ min_max++;
+ break;
+ case 'C':
+ columns = 0;
+ break;
+ case '1':
+ columns = 1;
+ break;
+ case 'f':
+ if (--argc <= 0)
+ usage();
+ argcnt++;
+ argv++;
+ get_list(argv[0]);
+ goto next;
+ case 'w':
+ if (--argc <= 0)
+ usage();
+ argv++;
+ max_output_line_width = atoi(argv[0]);
+ goto next;
+ case 'n':
+ if (--argc <= 0)
+ usage();
+ argv++;
+ columns = atoi(argv[0]);
+ goto next;
+ case 'u':
+ sort_output = False;
+ break;
+ case 's': /* eat -s */
+ if (--argc <= 0)
+ usage();
+ argv++;
+ goto next;
+ default:
+ usage();
+ break;
+ }
+ if (i == 1)
+ usage();
+ } else {
+ argcnt++;
+ get_list(argv[0]);
+ }
+next: ;
+ }
+ if (argcnt == 0)
+ get_list("*");
+ FSCloseServer(svr);
+ show_fonts();
+ exit(0);
+}
+
+get_list(pattern)
+ char *pattern;
+{
+ int available = nnames + 1,
+ i;
+ char **fonts;
+ FSXFontInfoHeader **info;
+ FSPropInfo **props;
+ FSPropOffset **offsets;
+ unsigned char **pdata;
+
+ /* Get list of fonts matching pattern */
+ for (;;) {
+
+ if (long_list >= L_MEDIUM)
+ fonts = FSListFontsWithXInfo(svr,
+ pattern, nnames, &available, &info, &props, &offsets, &pdata);
+ else
+ fonts = FSListFonts(svr, pattern, nnames, &available);
+ if (fonts == NULL || available < nnames)
+ break;
+
+ if (long_list >= L_MEDIUM) {
+ for (i = 0; i < available; i++) {
+ FSFree((char *) fonts[i]);
+ FSFree((char *) info[i]);
+ FSFree((char *) props[i]);
+ FSFree((char *) offsets[i]);
+ FSFree((char *) pdata[i]);
+ }
+ FSFree((char *) fonts);
+ FSFree((char *) info);
+ FSFree((char *) props);
+ FSFree((char *) offsets);
+ FSFree((char *) pdata);
+ } else {
+ FSFreeFontNames(fonts);
+ }
+ nnames = available * 2;
+ }
+
+ if (fonts == NULL) {
+ fprintf(stderr, "%s: pattern \"%s\" unmatched\n",
+ program_name, pattern);
+ return;
+ }
+ if (font_list)
+ font_list = (FontList *) realloc(font_list,
+ (font_cnt + available) * sizeof(FontList));
+ else
+ font_list = (FontList *) malloc((unsigned)
+ (font_cnt + available) * sizeof(FontList));
+ for (i = 0; i < available; i++) {
+ font_list[font_cnt].name = fonts[i];
+
+ if (long_list >= L_MEDIUM) {
+ font_list[font_cnt].info = info[i];
+ font_list[font_cnt].pi = props[i];
+ font_list[font_cnt].po = offsets[i];
+ font_list[font_cnt].pd = pdata[i];
+ } else
+ font_list[font_cnt].info = NULL;
+ font_cnt++;
+ }
+}
+
+compare(f1, f2)
+ FontList *f1,
+ *f2;
+{
+ char *p1 = f1->name,
+ *p2 = f2->name;
+
+ while (*p1 && *p2 && *p1 == *p2)
+ p1++, p2++;
+ return (*p1 - *p2);
+}
+
+show_fonts()
+{
+ int i;
+
+ if (font_cnt == 0)
+ return;
+
+ /* first sort the output */
+ if (sort_output)
+ qsort(font_list, font_cnt, sizeof(FontList), compare);
+
+ if (long_list > L_MEDIUM) {
+ print_font_header();
+ for (i = 0; i < font_cnt; i++) {
+ show_font_header(&font_list[i]);
+ show_font_props(&font_list[i]);
+ }
+ return;
+ }
+ if (long_list == L_MEDIUM) {
+ print_font_header();
+
+ for (i = 0; i < font_cnt; i++) {
+ show_font_header(&font_list[i]);
+ }
+
+ return;
+ }
+ if ((columns == 0 && isatty(1)) || columns > 1) {
+ int width,
+ max_width = 0,
+ lines_per_column,
+ j,
+ index;
+
+ for (i = 0; i < font_cnt; i++) {
+ width = strlen(font_list[i].name);
+ if (width > max_width)
+ max_width = width;
+ }
+ if (max_width == 0) {
+ fprintf(stderr, "all %d fontnames listed are zero length",
+ font_cnt);
+ exit(-1);
+ }
+ if (columns == 0) {
+ if ((max_width * 2) + output_line_padding >
+ max_output_line_width) {
+ columns = 1;
+ } else {
+ max_width += output_line_padding;
+ columns = ((max_output_line_width +
+ output_line_padding) / max_width);
+ }
+ } else {
+ max_width += output_line_padding;
+ }
+ if (columns <= 1)
+ goto single_column;
+
+ if (font_cnt < columns)
+ columns = font_cnt;
+ lines_per_column = (font_cnt + columns - 1) / columns;
+
+ for (i = 0; i < lines_per_column; i++) {
+ for (j = 0; j < columns; j++) {
+ index = j * lines_per_column + i;
+ if (index >= font_cnt)
+ break;
+ if (j + 1 == columns)
+ printf("%s", font_list[index].name);
+ else
+ printf("%-*s",
+ max_width,
+ font_list[index].name);
+ }
+ printf("\n");
+ }
+ return;
+ }
+single_column:
+ for (i = 0; i < font_cnt; i++)
+ printf("%s\n", font_list[i].name);
+}
+
+print_font_header()
+{
+ printf("DIR ");
+ printf("MIN ");
+ printf("MAX ");
+ printf("EXIST ");
+ printf("DFLT ");
+ printf("ASC ");
+ printf("DESC ");
+ printf("NAME");
+ printf("\n");
+}
+
+show_font_header(list)
+ FontList *list;
+{
+ char *string;
+ FSXFontInfoHeader *pfh;
+
+ pfh = list->info;
+ if (!pfh) {
+ fprintf(stderr,
+ "%s: no font information for font \"%s\".\n",
+ program_name, list->name ? list->name : "");
+ return;
+ }
+ if (pfh->draw_direction == LeftToRightDrawDirection)
+ string = "-->";
+ else
+ string = "<--";
+ printf("%-4s", string);
+ if (pfh->char_range.min_char.high == 0
+ && pfh->char_range.max_char.high == 0) {
+ printf(" %3d ", pfh->char_range.min_char.low);
+ printf(" %3d ", pfh->char_range.max_char.low);
+ } else {
+ printf("*%3d ", pfh->char_range.min_char.high);
+ printf("*%3d ", pfh->char_range.max_char.high);
+ }
+ printf("%5s ", (pfh->flags & FontInfoAllCharsExist) ? "all" : "some");
+ printf("%4d ", (pfh->default_char.high << 8) + pfh->default_char.low);
+ printf("%3d ", pfh->font_ascent);
+ printf("%4d ", pfh->font_descent);
+ printf("%s\n", list->name);
+ if (min_max) {
+ char min[BUFSIZ],
+ max[BUFSIZ];
+ char *pmax = max,
+ *pmin = min;
+
+ strcpy(pmin, " min(l,r,w,a,d) = (");
+ strcpy(pmax, " max(l,r,w,a,d) = (");
+ pmin += strlen(pmin);
+ pmax += strlen(pmax);
+
+ copy_number(&pmin, &pmax,
+ pfh->min_bounds.left,
+ pfh->max_bounds.left);
+ *pmin++ = *pmax++ = ',';
+ copy_number(&pmin, &pmax,
+ pfh->min_bounds.right,
+ pfh->max_bounds.right);
+ *pmin++ = *pmax++ = ',';
+ copy_number(&pmin, &pmax,
+ pfh->min_bounds.width,
+ pfh->max_bounds.width);
+ *pmin++ = *pmax++ = ',';
+ copy_number(&pmin, &pmax,
+ pfh->min_bounds.ascent,
+ pfh->max_bounds.ascent);
+ *pmin++ = *pmax++ = ',';
+ copy_number(&pmin, &pmax,
+ pfh->min_bounds.descent,
+ pfh->max_bounds.descent);
+ *pmin++ = *pmax++ = ')';
+ *pmin = *pmax = '\0';
+ printf("%s\n", min);
+ printf("%s\n", max);
+ }
+}
+
+#define max(a, b) ((a) > (b) ? (a) : (b))
+
+copy_number(pp1, pp2, n1, n2)
+ char **pp1,
+ **pp2;
+ int n1,
+ n2;
+{
+ char *p1 = *pp1;
+ char *p2 = *pp2;
+ int w;
+
+ sprintf(p1, "%d", n1);
+ sprintf(p2, "%d", n2);
+ w = max(strlen(p1), strlen(p2));
+ sprintf(p1, "%*d", w, n1);
+ sprintf(p2, "%*d", w, n2);
+ p1 += strlen(p1);
+ p2 += strlen(p2);
+ *pp1 = p1;
+ *pp2 = p2;
+}
+
+show_font_props(list)
+ FontList *list;
+{
+ int i;
+ char buf[1000];
+ FSPropInfo *pi = list->pi;
+ FSPropOffset *po = list->po;
+ unsigned char *pd = list->pd;
+ int num_props;
+
+ num_props = pi->num_offsets;
+ for (i = 0; i < num_props; i++, po++) {
+ strncpy(buf, (char *) (pd + po->name.position), po->name.length);
+ buf[po->name.length] = '\0';
+ printf("%s\t", buf);
+ switch (po->type) {
+ case PropTypeString:
+ strncpy(buf, (char *)pd + po->value.position, po->value.length);
+ buf[po->value.length] = '\0';
+ printf("%s\n", buf);
+ break;
+ case PropTypeUnsigned:
+ printf("%d\n", (unsigned long) po->value.position);
+ break;
+ case PropTypeSigned:
+ printf("%d\n", (long) po->value.position);
+ break;
+ default:
+ fprintf(stderr, "bogus property\n");
+ break;
+ }
+
+ }
+}
generated by cgit v1.2.3 (git 2.39.1) at 2024-06-21 02:58:31 +0000