Minor modifications to work with mLib and mgLib.

[xtoys] / xscsize.c

/* -*-c-*-
 *
 * $Id: xscsize.c,v 1.3 1998/12/11 09:50:05 mdw Exp $
 *
 * Return X display size to shell script
 *
 * (c) 1998 Straylight/Edgeware
 */

/*----- Licensing notice --------------------------------------------------* 
 *
 * This file is part of the Edgeware X tools collection.
 *
 * X tools is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 * 
 * X tools is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with X tools; if not, write to the Free Software Foundation,
 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

/*----- Revision history --------------------------------------------------* 
 *
 * $Log: xscsize.c,v $
 * Revision 1.3  1998/12/11 09:50:05  mdw
 * Minor modifications to work with mLib and mgLib.
 *
 * Revision 1.2  1998/11/21 22:30:22  mdw
 * Support GNU-style long options throughout, and introduce proper help
 * text to all programs.  Update manual pages to match.
 *
 * Revision 1.1  1998/11/16 23:00:49  mdw
 * Initial versions.
 *
 */

/*----- Header files ------------------------------------------------------*/

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include <X11/Xlib.h>

#include <mLib/mdwopt.h>
#include <mLib/quis.h>

/*----- Main code ---------------------------------------------------------*/

static void version(FILE *fp)
{
  fprintf(fp, "%s (xtoys version " VERSION ")\n", QUIS);
}

static void usage(FILE *fp)
{
  fprintf(fp, "Usage: %s [-bcx] [-d display]\n", QUIS);
}

int main(int argc, char *argv[])
{
  const char *display = 0;
  unsigned f = 0;
  unsigned long wd, ht;

  enum {
    f_sh = 1,
    f_csh = 2,
    f_shell = 3,
    f_export = 4
  };

  /* --- Parse command line options --- */

  ego(argv[0]);

  for (;;) {
    static struct option opt[] = {
      { "help", 	0,			0,	'h' },
      { "usage", 	0,			0,	'u' },
      { "version", 	0,			0,	'v' },
      { "display", 	required_argument,	0,	'd' },
      { "bourne-shell",	0,			0,	'b' },
      { "c-shell",	0,			0,	'c' },
      { "export",	0,			0,	'x' },
      {	0,		0,			0,	0 }
    };

    int i = getopt_long(argc, argv, "huv d:bcx", opt, 0);
    if (i < 0)
      break;
    switch (i) {
      case 'h':
	version(stdout);
	fputs("\n", stdout);
	usage(stdout);
	fputs(
"\n"
"Reads the size of the X root window and outputs it in a form suitable\n"
"for use as a shell assignment statement, defining variables XWIDTH and\n"
"XHEIGHT.\n"
"\n"
"Options:\n"
"\n"
"-h, --help		Display this help text\n"
"-u, --usage		Display a short usage summary\n"
"-v, --version		Display the program's version number\n"
"\n"
"-d, --display=DISPLAY	Choose X display to connect to\n"
"-b, --bourne-shell	Output text suitable for a Bourne shell\n"
"-c, --c-shell		Output text suitable for a C shell\n"
"-x, --export		Export the variables into the environment\n",
          stdout);
	exit(0);
	break;
      case 'u':
	usage(stdout);
	exit(0);
	break;
      case 'v':
	version(stdout);
	exit(0);
	break;
	
      case 'd':
	display = optarg;
	break;
      case 'b':
	f |= f_sh;
	break;
      case 'c':
	f |= f_csh;
	break;
      case 'x':
	f |= f_export;
	break;
      default:
	usage(stderr);
	exit(EXIT_FAILURE);
	break;
    }
  }

  /* --- Sort out the shell type --- *
   *
   * If the shell name contains the string `csh' then assume it's a C shell.
   * Otherwise assume it's Bourne.  This seems to work in practice.
   */

  if (!(f & f_shell)) {
    const char *s = getenv("SHELL");
    if (!s)
      f |= f_sh;
    if (strstr(s, "csh"))
      f |= f_csh;
    else
      f |= f_sh;
  }

  if ((f & f_sh) && (f & f_csh)) {
    fprintf(stderr, "xscsize: make your mind up about your shell type\n");
    exit(EXIT_FAILURE);
  }

  /* --- Get the important information --- */

  {
    Display *dpy = XOpenDisplay(display);
    int sc;
    if (!dpy) {
      fprintf(stderr, "xscsize: couldn't open display\n");
      exit(EXIT_FAILURE);
    }
    sc = DefaultScreen(dpy);
    wd = DisplayWidth(dpy, sc);
    ht = DisplayHeight(dpy, sc);
    XCloseDisplay(dpy);
  }

  /* --- Do the output thing --- */

  if (f & f_sh) {
    printf("XWIDTH=%lu XHEIGHT=%lu", wd, ht);
    if (f & f_export)
      printf("; export XWIDTH XHEIGHT");
  }
  if (f & f_csh) {
    if (f & f_export)
      printf("setenv XWIDTH %lu; setenv XHEIGHT %lu", wd, ht);
    else
      printf("set XWIDTH=%lu XHEIGHT=%lu", wd, ht);
  }
  putchar('\n');

  /* --- Done --- */

  return (0);
}

/*----- That's all, folks -------------------------------------------------*/