[thirdparty/util-linux.git] / sys-utils / ldattach.c

/* line discipline loading daemon
 * open a serial device and attach a line discipline on it
 *
 * Usage:
 *	ldattach GIGASET_M101 /dev/ttyS0
 *
 * =====================================================================
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 * =====================================================================
 */

#include <errno.h>
#include <fcntl.h>
#include <getopt.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/ioctl.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <termios.h>
#include <unistd.h>

#include "c.h"
#include "all-io.h"
#include "nls.h"
#include "strutils.h"
#include "closestream.h"

#include <signal.h>
#include <sys/socket.h>
#include <linux/if.h>

#include <linux/tty.h>		/* for N_GSM0710 */

#ifdef LINUX_GSMMUX_H
# include <linux/gsmmux.h>	/* Add by guowenxue */
#else
struct gsm_config
{
	unsigned int adaption;
	unsigned int encapsulation;
	unsigned int initiator;
	unsigned int t1;
	unsigned int t2;
	unsigned int t3;
	unsigned int n2;
	unsigned int mru;
	unsigned int mtu;
	unsigned int k;
	unsigned int i;
	unsigned int unused[8];		/* Padding for expansion without
					   breaking stuff */
};
# define GSMIOC_GETCONF		_IOR('G', 0, struct gsm_config)
# define GSMIOC_SETCONF		_IOW('G', 1, struct gsm_config)
#endif

#ifndef N_GIGASET_M101
# define N_GIGASET_M101 16
#endif

#ifndef N_PPS
# define N_PPS 18
#endif

#ifndef N_GSM0710
# define N_GSM0710 21
#endif

#define MAXINTROPARMLEN 32

/* attach a line discipline ioctl */
#ifndef TIOCSETD
# define TIOCSETD   0x5423
#endif

static int debug = 0;

struct ld_table {
	const char *name;
	int value;
};

/* currently supported line disciplines, plus some aliases */
static const struct ld_table ld_discs[] = {
	{ "TTY",		N_TTY },
	{ "SLIP",		N_SLIP },
	{ "MOUSE",		N_MOUSE },
	{ "PPP",		N_PPP },
	{ "STRIP",		N_STRIP },
	{ "AX25",		N_AX25 },
	{ "X25",		N_X25 },
	{ "6PACK",		N_6PACK },
	{ "R3964",		N_R3964 },
	{ "IRDA",		N_IRDA },
	{ "HDLC",		N_HDLC },
	{ "SYNC_PPP",		N_SYNC_PPP },
	{ "SYNCPPP",		N_SYNC_PPP },
	{ "HCI",		N_HCI },
	{ "GIGASET_M101",	N_GIGASET_M101 },
	{ "M101",		N_GIGASET_M101 },
	{ "GIGASET",		N_GIGASET_M101 },
	{ "PPS",		N_PPS },
	{ "GSM0710",		N_GSM0710},
	{ NULL,	0 }
};

/* known c_iflag names */
static const struct ld_table ld_iflags[] =
{
	{ "IGNBRK",	IGNBRK },
	{ "BRKINT",	BRKINT },
	{ "IGNPAR",	IGNPAR },
	{ "PARMRK",	PARMRK },
	{ "INPCK",	INPCK },
	{ "ISTRIP",	ISTRIP },
	{ "INLCR",	INLCR },
	{ "IGNCR",	IGNCR },
	{ "ICRNL",	ICRNL },
	{ "IUCLC",	IUCLC },
	{ "IXON",	IXON },
	{ "IXANY",	IXANY },
	{ "IXOFF",	IXOFF },
	{ "IMAXBEL",	IMAXBEL },
	{ "IUTF8",	IUTF8 },
	{ NULL,		0 }
};

static void dbg(char *fmt, ...)
{
	va_list args;

	if (debug == 0)
		return;
	fflush(NULL);
	fprintf(stderr, "%s: ", program_invocation_short_name);
	va_start(args, fmt);
	vfprintf(stderr, fmt, args);
	va_end(args);
	fprintf(stderr, "\n");
	fflush(NULL);
	return;
}

static int lookup_table(const struct ld_table *tab, const char *str)
{
	const struct ld_table *t;

	for (t = tab; t && t->name; t++)
		if (!strcasecmp(t->name, str))
			return t->value;
	return -1;
}

static void print_table(FILE * out, const struct ld_table *tab)
{
	const struct ld_table *t;
	int i;

	for (t = tab, i = 1; t && t->name; t++, i++) {
		fprintf(out, "  %-12s", t->name);
		if (!(i % 5))
			fputc('\n', out);
	}
}

static int parse_iflag(char *str, int *set_iflag, int *clr_iflag)
{
	int iflag;
	char *s;

	for (s = strtok(str, ","); s != NULL; s = strtok(NULL, ",")) {
		if (*s == '-')
			s++;
		if ((iflag = lookup_table(ld_iflags, s)) < 0)
			iflag = strtos32_or_err(s, _("invalid iflag"));
		if (s > str && *(s - 1) == '-')
			*clr_iflag |= iflag;
		else
			*set_iflag |= iflag;
	}
	dbg("iflag (set/clear): %d/%d", *set_iflag, *clr_iflag);
	return 0;
}


static void __attribute__ ((__noreturn__)) usage(int exitcode)
{
	FILE *out = exitcode == EXIT_SUCCESS ? stdout : stderr;

	fputs(USAGE_HEADER, out);
	fprintf(out, _(" %s [options] <ldisc> <device>\n"), program_invocation_short_name);

	fputs(USAGE_SEPARATOR, out);
	fputs(_("Attach a line discipline to a serial line.\n"), out);

	fputs(USAGE_OPTIONS, out);
	fputs(_(" -d, --debug             print verbose messages to stderr\n"), out);
	fputs(_(" -s, --speed <value>     set serial line speed\n"), out);
	fputs(_(" -c, --intro-command <string> intro sent before ldattach\n"), out);
	fputs(_(" -p, --pause <seconds>   pause between intro and ldattach\n"), out);
	fputs(_(" -7, --sevenbits         set character size to 7 bits\n"), out);
	fputs(_(" -8, --eightbits         set character size to 8 bits\n"), out);
	fputs(_(" -n, --noparity          set parity to none\n"), out);
	fputs(_(" -e, --evenparity        set parity to even\n"), out);
	fputs(_(" -o, --oddparity         set parity to odd\n"), out);
	fputs(_(" -1, --onestopbit        set stop bits to one\n"), out);
	fputs(_(" -2, --twostopbits       set stop bits to two\n"), out);
	fputs(_(" -i, --iflag [-]<iflag>  set input mode flag\n"), out);

	fputs(USAGE_SEPARATOR, out);
	fputs(USAGE_HELP, out);
	fputs(USAGE_VERSION, out);

	fputs(_("\nKnown <ldisc> names:\n"), out);
	print_table(out, ld_discs);
	fputs(USAGE_SEPARATOR, out);

	fputs(_("\nKnown <iflag> names:\n"), out);
	print_table(out, ld_iflags);

	fprintf(out, USAGE_MAN_TAIL("ldattach(8)"));
	exit(exitcode);
}

static int my_cfsetspeed(struct termios *ts, int speed)
{
	/* Standard speeds
	 * -- cfsetspeed() is able to translate number to Bxxx constants
	 */
	if (cfsetspeed(ts, speed) == 0)
		return 0;

	/* Nonstandard speeds
	 * -- we have to bypass glibc and set the speed manually (because glibc
	 *    checks for speed and supports Bxxx bit rates only)...
	 */
#ifdef _HAVE_STRUCT_TERMIOS_C_ISPEED
# define BOTHER 0010000		/* non standard rate */
	dbg("using non-standard speeds");
	ts->c_ospeed = ts->c_ispeed = speed;
	ts->c_cflag &= ~CBAUD;
	ts->c_cflag |= BOTHER;
	return 0;
#else
	return -1;
#endif
}

static void handler(int s)
{
	dbg("got SIG %i -> exiting\n", s);
	exit(EXIT_SUCCESS);
}

static void gsm0710_set_conf(int tty_fd)
{
	struct gsm_config c;

	/* Add by guowenxue */
	/*  get n_gsm configuration */
	ioctl(tty_fd, GSMIOC_GETCONF, &c);
	/*  we are initiator and need encoding 0 (basic) */
	c.initiator = 1;
	c.encapsulation = 0;
	/*  our modem defaults to a maximum size of 127 bytes */
	c.mru = 127;
	c.mtu = 127;
	/*  set the new configuration */
	ioctl(tty_fd, GSMIOC_SETCONF, &c);
	/* Add by guowenxue end*/
}

int main(int argc, char **argv)
{
	int tty_fd;
	struct termios ts;
	int speed = 0, bits = '-', parity = '-', stop = '-';
	int set_iflag = 0, clr_iflag = 0;
	int ldisc;
	int optc;
	char *dev;
	int intropause = 1;
	char *introparm = NULL;

	static const struct option opttbl[] = {
		{"speed", required_argument, NULL, 's'},
		{"sevenbits", no_argument, NULL, '7'},
		{"eightbits", no_argument, NULL, '8'},
		{"noparity", no_argument, NULL, 'n'},
		{"evenparity", no_argument, NULL, 'e'},
		{"oddparity", no_argument, NULL, 'o'},
		{"onestopbit", no_argument, NULL, '1'},
		{"twostopbits", no_argument, NULL, '2'},
		{"iflag", required_argument, NULL, 'i'},
		{"help", no_argument, NULL, 'h'},
		{"version", no_argument, NULL, 'V'},
		{"debug", no_argument, NULL, 'd'},
	        {"intro-command", no_argument, NULL, 'c'},
	        {"pause", no_argument, NULL, 'p'},
		{NULL, 0, NULL, 0}
	};

	signal(SIGKILL, handler);
	signal(SIGINT, handler);

	setlocale(LC_ALL, "");
	bindtextdomain(PACKAGE, LOCALEDIR);
	textdomain(PACKAGE);
	atexit(close_stdout);

	/* parse options */
	if (argc == 0)
		usage(EXIT_SUCCESS);
	while ((optc =
		getopt_long(argc, argv, "dhV78neo12s:i:c:p:", opttbl,
			    NULL)) >= 0) {
		switch (optc) {
		case 'd':
			debug = 1;
			break;
		case '1':
		case '2':
			stop = optc;
			break;
		case '7':
		case '8':
			bits = optc;
			break;
		case 'n':
		case 'e':
		case 'o':
			parity = optc;
			break;
		case 's':
			speed = strtos32_or_err(optarg, _("invalid speed argument"));
			break;
		case 'p':
			intropause = strtou32_or_err(optarg, _("invalid pause argument"));
			if (intropause > 10)
				errx(EXIT_FAILURE, "invalid pause: %s", optarg);
			break;
		case 'c':
			introparm = optarg;
			break;
		case 'i':
			parse_iflag(optarg, &set_iflag, &clr_iflag);
			break;
		case 'V':
			printf(UTIL_LINUX_VERSION);
			return EXIT_SUCCESS;
		case 'h':
			usage(EXIT_SUCCESS);
		default:
			warnx(_("invalid option"));
			usage(EXIT_FAILURE);
		}
	}

	if (argc - optind != 2)
		usage(EXIT_FAILURE);

	/* parse line discipline specification */
	ldisc = lookup_table(ld_discs, argv[optind]);
	if (ldisc < 0)
		ldisc = strtos32_or_err(argv[optind], _("invalid line discipline argument"));

	/* ldisc specific option settings */
	if (ldisc == N_GIGASET_M101) {
		/* device specific defaults for line speed and data format */
		if (speed == 0)
			speed = 115200;
		if (bits == '-')
			bits = '8';
		if (parity == '-')
			parity = 'n';
		if (stop == '-')
			stop = '1';
	}

	/* open device */
	dev = argv[optind + 1];
	if ((tty_fd = open(dev, O_RDWR | O_NOCTTY)) < 0)
		err(EXIT_FAILURE, _("cannot open %s"), dev);
	if (!isatty(tty_fd))
		errx(EXIT_FAILURE, _("%s is not a serial line"), dev);

	dbg("opened %s", dev);

	/* set line speed and format */
	if (tcgetattr(tty_fd, &ts) < 0)
		err(EXIT_FAILURE,
		    _("cannot get terminal attributes for %s"), dev);
	cfmakeraw(&ts);
	if (speed && my_cfsetspeed(&ts, speed) < 0)
		errx(EXIT_FAILURE, _("speed %d unsupported"), speed);

	switch (stop) {
	case '1':
		ts.c_cflag &= ~CSTOPB;
		break;
	case '2':
		ts.c_cflag |= CSTOPB;
		break;
	case '-':
		break;
	default:
		abort();
	}
	switch (bits) {
	case '7':
		ts.c_cflag = (ts.c_cflag & ~CSIZE) | CS7;
		break;
	case '8':
		ts.c_cflag = (ts.c_cflag & ~CSIZE) | CS8;
		break;
	case '-':
		break;
	default:
		abort();
	}
	switch (parity) {
	case 'n':
		ts.c_cflag &= ~(PARENB | PARODD);
		break;
	case 'e':
		ts.c_cflag |= PARENB;
		ts.c_cflag &= ~PARODD;
		break;
	case 'o':
		ts.c_cflag |= (PARENB | PARODD);
		break;
	case '-':
		break;
	default:
		abort();
	}

	ts.c_cflag |= CREAD;	/* just to be on the safe side */
	ts.c_iflag |= set_iflag;
	ts.c_iflag &= ~clr_iflag;

	if (tcsetattr(tty_fd, TCSAFLUSH, &ts) < 0)
		err(EXIT_FAILURE,
		    _("cannot set terminal attributes for %s"), dev);

	dbg("set to raw %d %c%c%c: cflag=0x%x",
	    speed, bits, parity, stop, ts.c_cflag);

	if (introparm && *introparm)
	{
		dbg("intro command is '%s'", introparm);
		if (write_all(tty_fd, introparm, strlen(introparm)) != 0)
			err(EXIT_FAILURE,
			    _("cannot write intro command to %s"), dev);

		if (intropause) {
			dbg("waiting for %d seconds", intropause);
			sleep(intropause);
		}
	}

	/* Attach the line discipline. */
	if (ioctl(tty_fd, TIOCSETD, &ldisc) < 0)
		err(EXIT_FAILURE, _("cannot set line discipline"));

	dbg("line discipline set to %d", ldisc);

	/* ldisc specific post-attach actions */
	if (ldisc == N_GSM0710)
		gsm0710_set_conf(tty_fd);

	/* Go into background if not in debug mode. */
	if (!debug && daemon(0, 0) < 0)
		err(EXIT_FAILURE, _("cannot daemonize"));

	/* Sleep to keep the line discipline active. */
	pause();

	exit(EXIT_SUCCESS);
}
Commit	Line	Data
1e8d11c4 TS	1	/* line discipline loading daemon
	2	* open a serial device and attach a line discipline on it
	3	*
	4	* Usage:
	5	* ldattach GIGASET_M101 /dev/ttyS0
	6	*
	7	* =====================================================================
	8	* This program is free software; you can redistribute it and/or
	9	* modify it under the terms of the GNU General Public License as
	10	* published by the Free Software Foundation; either version 2 of
	11	* the License, or (at your option) any later version.
	12	* =====================================================================
	13	*/
	14
28e91b83 SK	15	#include <errno.h>
	16	#include <fcntl.h>
	17	#include <getopt.h>
1e8d11c4	18	#include <stdio.h>
28e91b83	19	#include <stdlib.h>
1e8d11c4	20	#include <string.h>
1e8d11c4	21	#include <sys/ioctl.h>
28e91b83 SK	22	#include <sys/stat.h>
28e91b83 SK	23	#include <sys/types.h>
f8132752	24	#include <termios.h>
1e8d11c4	25	#include <unistd.h>
1e8d11c4	26
becc79d5	27	#include "c.h"
8596f639	28	#include "all-io.h"
fcba4577	29	#include "nls.h"
7b2d3de4	30	#include "strutils.h"
efb8854f	31	#include "closestream.h"
fcba4577	32
8596f639 KZ	33	#include <signal.h>
	34	#include <sys/socket.h>
	35	#include <linux/if.h>
	36
	37	#include <linux/tty.h> /* for N_GSM0710 */
	38
	39	#ifdef LINUX_GSMMUX_H
	40	# include <linux/gsmmux.h> /* Add by guowenxue */
	41	#else
	42	struct gsm_config
	43	{
	44	unsigned int adaption;
	45	unsigned int encapsulation;
	46	unsigned int initiator;
	47	unsigned int t1;
	48	unsigned int t2;
	49	unsigned int t3;
	50	unsigned int n2;
	51	unsigned int mru;
	52	unsigned int mtu;
	53	unsigned int k;
	54	unsigned int i;
	55	unsigned int unused[8]; /* Padding for expansion without
	56	breaking stuff */
	57	};
	58	# define GSMIOC_GETCONF _IOR('G', 0, struct gsm_config)
	59	# define GSMIOC_SETCONF _IOW('G', 1, struct gsm_config)
	60	#endif
	61
1e8d11c4	62	#ifndef N_GIGASET_M101
f8132752	63	# define N_GIGASET_M101 16
1e8d11c4 TS	64	#endif
1e8d11c4 TS	65
d5f36dec TS	66	#ifndef N_PPS
	67	# define N_PPS 18
	68	#endif
	69
58c17460 TS	70	#ifndef N_GSM0710
	71	# define N_GSM0710 21
	72	#endif
	73
8596f639 KZ	74	#define MAXINTROPARMLEN 32
8596f639 KZ	75
f8132752 KZ	76	/* attach a line discipline ioctl */
	77	#ifndef TIOCSETD
	78	# define TIOCSETD 0x5423
1e8d11c4 TS	79	#endif
1e8d11c4 TS	80
1e8d11c4 TS	81	static int debug = 0;
1e8d11c4 TS	82
7b549aff	83	struct ld_table {
28e91b83 SK	84	const char *name;
28e91b83 SK	85	int value;
7b549aff KZ	86	};
7b549aff KZ	87
1e8d11c4	88	/* currently supported line disciplines, plus some aliases */
28e91b83 SK	89	static const struct ld_table ld_discs[] = {
	90	{ "TTY", N_TTY },
	91	{ "SLIP", N_SLIP },
	92	{ "MOUSE", N_MOUSE },
	93	{ "PPP", N_PPP },
	94	{ "STRIP", N_STRIP },
	95	{ "AX25", N_AX25 },
	96	{ "X25", N_X25 },
	97	{ "6PACK", N_6PACK },
	98	{ "R3964", N_R3964 },
	99	{ "IRDA", N_IRDA },
	100	{ "HDLC", N_HDLC },
	101	{ "SYNC_PPP", N_SYNC_PPP },
	102	{ "SYNCPPP", N_SYNC_PPP },
	103	{ "HCI", N_HCI },
58c17460	104	{ "GIGASET_M101", N_GIGASET_M101 },
a8023b9a SK	105	{ "M101", N_GIGASET_M101 },
a8023b9a SK	106	{ "GIGASET", N_GIGASET_M101 },
58c17460 TS	107	{ "PPS", N_PPS },
58c17460 TS	108	{ "GSM0710", N_GSM0710},
8596f639	109	{ NULL, 0 }
1e8d11c4 TS	110	};
1e8d11c4 TS	111
b091b880 TS	112	/* known c_iflag names */
	113	static const struct ld_table ld_iflags[] =
	114	{
	115	{ "IGNBRK", IGNBRK },
	116	{ "BRKINT", BRKINT },
	117	{ "IGNPAR", IGNPAR },
	118	{ "PARMRK", PARMRK },
	119	{ "INPCK", INPCK },
	120	{ "ISTRIP", ISTRIP },
	121	{ "INLCR", INLCR },
	122	{ "IGNCR", IGNCR },
	123	{ "ICRNL", ICRNL },
	124	{ "IUCLC", IUCLC },
	125	{ "IXON", IXON },
	126	{ "IXANY", IXANY },
	127	{ "IXOFF", IXOFF },
	128	{ "IMAXBEL", IMAXBEL },
	129	{ "IUTF8", IUTF8 },
28e91b83	130	{ NULL, 0 }
b091b880 TS	131	};
b091b880 TS	132
d91757a0	133	static void dbg(char *fmt, ...)
3a134012 SK	134	{
	135	va_list args;
	136
	137	if (debug == 0)
	138	return;
	139	fflush(NULL);
	140	fprintf(stderr, "%s: ", program_invocation_short_name);
	141	va_start(args, fmt);
	142	vfprintf(stderr, fmt, args);
	143	va_end(args);
	144	fprintf(stderr, "\n");
	145	fflush(NULL);
	146	return;
	147	}
	148
7b549aff	149	static int lookup_table(const struct ld_table tab, const char str)
1e8d11c4	150	{
28e91b83	151	const struct ld_table *t;
1e8d11c4	152
28e91b83 SK	153	for (t = tab; t && t->name; t++)
	154	if (!strcasecmp(t->name, str))
	155	return t->value;
	156	return -1;
1e8d11c4 TS	157	}
1e8d11c4 TS	158
28e91b83	159	static void print_table(FILE * out, const struct ld_table *tab)
1e8d11c4	160	{
28e91b83 SK	161	const struct ld_table *t;
	162	int i;
	163
	164	for (t = tab, i = 1; t && t->name; t++, i++) {
b5225af3 TS	165	fprintf(out, " %-12s", t->name);
b5225af3 TS	166	if (!(i % 5))
28e91b83 SK	167	fputc('\n', out);
28e91b83 SK	168	}
7b549aff KZ	169	}
7b549aff KZ	170
b091b880 TS	171	static int parse_iflag(char str, int set_iflag, int *clr_iflag)
b091b880 TS	172	{
28e91b83	173	int iflag;
7b2d3de4	174	char *s;
28e91b83 SK	175
	176	for (s = strtok(str, ","); s != NULL; s = strtok(NULL, ",")) {
	177	if (*s == '-')
	178	s++;
7b2d3de4	179	if ((iflag = lookup_table(ld_iflags, s)) < 0)
20a39982	180	iflag = strtos32_or_err(s, _("invalid iflag"));
28e91b83 SK	181	if (s > str && *(s - 1) == '-')
	182	*clr_iflag \|= iflag;
	183	else
	184	*set_iflag \|= iflag;
b091b880	185	}
28e91b83 SK	186	dbg("iflag (set/clear): %d/%d", set_iflag, clr_iflag);
28e91b83 SK	187	return 0;
b091b880 TS	188	}
	189
	190
28e91b83	191	static void __attribute__ ((__noreturn__)) usage(int exitcode)
7b549aff	192	{
28e91b83	193	FILE *out = exitcode == EXIT_SUCCESS ? stdout : stderr;
b5b28b43	194
a8023b9a SK	195	fputs(USAGE_HEADER, out);
a8023b9a SK	196	fprintf(out, _(" %s [options] <ldisc> <device>\n"), program_invocation_short_name);
a8023b9a	197
451dbcfa BS	198	fputs(USAGE_SEPARATOR, out);
	199	fputs(_("Attach a line discipline to a serial line.\n"), out);
	200
	201	fputs(USAGE_OPTIONS, out);
a8023b9a SK	202	fputs(_(" -d, --debug print verbose messages to stderr\n"), out);
a8023b9a SK	203	fputs(_(" -s, --speed <value> set serial line speed\n"), out);
8596f639 KZ	204	fputs(_(" -c, --intro-command <string> intro sent before ldattach\n"), out);
8596f639 KZ	205	fputs(_(" -p, --pause <seconds> pause between intro and ldattach\n"), out);
a8023b9a SK	206	fputs(_(" -7, --sevenbits set character size to 7 bits\n"), out);
	207	fputs(_(" -8, --eightbits set character size to 8 bits\n"), out);
	208	fputs(_(" -n, --noparity set parity to none\n"), out);
	209	fputs(_(" -e, --evenparity set parity to even\n"), out);
	210	fputs(_(" -o, --oddparity set parity to odd\n"), out);
	211	fputs(_(" -1, --onestopbit set stop bits to one\n"), out);
	212	fputs(_(" -2, --twostopbits set stop bits to two\n"), out);
	213	fputs(_(" -i, --iflag [-]<iflag> set input mode flag\n"), out);
5ff20423	214
a8023b9a SK	215	fputs(USAGE_SEPARATOR, out);
	216	fputs(USAGE_HELP, out);
	217	fputs(USAGE_VERSION, out);
158e4182	218
28e91b83 SK	219	fputs(_("\nKnown <ldisc> names:\n"), out);
28e91b83 SK	220	print_table(out, ld_discs);
158e4182 KZ	221	fputs(USAGE_SEPARATOR, out);
158e4182 KZ	222
28e91b83 SK	223	fputs(_("\nKnown <iflag> names:\n"), out);
28e91b83 SK	224	print_table(out, ld_iflags);
158e4182	225
a8023b9a	226	fprintf(out, USAGE_MAN_TAIL("ldattach(8)"));
28e91b83	227	exit(exitcode);
1e8d11c4 TS	228	}
1e8d11c4 TS	229
f8132752 KZ	230	static int my_cfsetspeed(struct termios *ts, int speed)
	231	{
	232	/* Standard speeds
	233	* -- cfsetspeed() is able to translate number to Bxxx constants
	234	*/
	235	if (cfsetspeed(ts, speed) == 0)
	236	return 0;
	237
	238	/* Nonstandard speeds
28e91b83 SK	239	* -- we have to bypass glibc and set the speed manually (because glibc
28e91b83 SK	240	* checks for speed and supports Bxxx bit rates only)...
f8132752 KZ	241	*/
f8132752 KZ	242	#ifdef _HAVE_STRUCT_TERMIOS_C_ISPEED
28e91b83	243	# define BOTHER 0010000 /* non standard rate */
f8132752 KZ	244	dbg("using non-standard speeds");
	245	ts->c_ospeed = ts->c_ispeed = speed;
	246	ts->c_cflag &= ~CBAUD;
	247	ts->c_cflag \|= BOTHER;
	248	return 0;
	249	#else
	250	return -1;
	251	#endif
	252	}
	253
8596f639 KZ	254	static void handler(int s)
	255	{
	256	dbg("got SIG %i -> exiting\n", s);
	257	exit(EXIT_SUCCESS);
	258	}
	259
	260	static void gsm0710_set_conf(int tty_fd)
	261	{
	262	struct gsm_config c;
	263
	264	/* Add by guowenxue */
	265	/* get n_gsm configuration */
	266	ioctl(tty_fd, GSMIOC_GETCONF, &c);
	267	/* we are initiator and need encoding 0 (basic) */
	268	c.initiator = 1;
	269	c.encapsulation = 0;
	270	/* our modem defaults to a maximum size of 127 bytes */
	271	c.mru = 127;
	272	c.mtu = 127;
	273	/* set the new configuration */
	274	ioctl(tty_fd, GSMIOC_SETCONF, &c);
	275	/* Add by guowenxue end*/
	276	}
	277
1e8d11c4 TS	278	int main(int argc, char **argv)
1e8d11c4 TS	279	{
28e91b83 SK	280	int tty_fd;
	281	struct termios ts;
	282	int speed = 0, bits = '-', parity = '-', stop = '-';
	283	int set_iflag = 0, clr_iflag = 0;
	284	int ldisc;
	285	int optc;
28e91b83	286	char *dev;
8596f639 KZ	287	int intropause = 1;
	288	char *introparm = NULL;
	289
28e91b83 SK	290	static const struct option opttbl[] = {
	291	{"speed", required_argument, NULL, 's'},
	292	{"sevenbits", no_argument, NULL, '7'},
	293	{"eightbits", no_argument, NULL, '8'},
	294	{"noparity", no_argument, NULL, 'n'},
	295	{"evenparity", no_argument, NULL, 'e'},
	296	{"oddparity", no_argument, NULL, 'o'},
	297	{"onestopbit", no_argument, NULL, '1'},
	298	{"twostopbits", no_argument, NULL, '2'},
	299	{"iflag", required_argument, NULL, 'i'},
	300	{"help", no_argument, NULL, 'h'},
	301	{"version", no_argument, NULL, 'V'},
	302	{"debug", no_argument, NULL, 'd'},
8596f639 KZ	303	{"intro-command", no_argument, NULL, 'c'},
8596f639 KZ	304	{"pause", no_argument, NULL, 'p'},
28e91b83 SK	305	{NULL, 0, NULL, 0}
	306	};
	307
8596f639 KZ	308	signal(SIGKILL, handler);
	309	signal(SIGINT, handler);
	310
28e91b83 SK	311	setlocale(LC_ALL, "");
	312	bindtextdomain(PACKAGE, LOCALEDIR);
	313	textdomain(PACKAGE);
efb8854f	314	atexit(close_stdout);
28e91b83 SK	315
28e91b83 SK	316	/* parse options */
28e91b83 SK	317	if (argc == 0)
	318	usage(EXIT_SUCCESS);
	319	while ((optc =
8596f639	320	getopt_long(argc, argv, "dhV78neo12s:i:c:p:", opttbl,
28e91b83 SK	321	NULL)) >= 0) {
	322	switch (optc) {
	323	case 'd':
3a134012	324	debug = 1;
28e91b83 SK	325	break;
	326	case '1':
	327	case '2':
	328	stop = optc;
	329	break;
	330	case '7':
	331	case '8':
	332	bits = optc;
	333	break;
	334	case 'n':
	335	case 'e':
	336	case 'o':
	337	parity = optc;
	338	break;
	339	case 's':
20a39982	340	speed = strtos32_or_err(optarg, _("invalid speed argument"));
28e91b83	341	break;
8596f639 KZ	342	case 'p':
	343	intropause = strtou32_or_err(optarg, _("invalid pause argument"));
	344	if (intropause > 10)
	345	errx(EXIT_FAILURE, "invalid pause: %s", optarg);
	346	break;
	347	case 'c':
	348	introparm = optarg;
	349	break;
28e91b83 SK	350	case 'i':
	351	parse_iflag(optarg, &set_iflag, &clr_iflag);
	352	break;
	353	case 'V':
a8023b9a SK	354	printf(UTIL_LINUX_VERSION);
a8023b9a SK	355	return EXIT_SUCCESS;
28e91b83 SK	356	case 'h':
	357	usage(EXIT_SUCCESS);
	358	default:
	359	warnx(_("invalid option"));
	360	usage(EXIT_FAILURE);
	361	}
	362	}
	363
	364	if (argc - optind != 2)
	365	usage(EXIT_FAILURE);
	366
	367	/* parse line discipline specification */
	368	ldisc = lookup_table(ld_discs, argv[optind]);
7b2d3de4	369	if (ldisc < 0)
20a39982	370	ldisc = strtos32_or_err(argv[optind], _("invalid line discipline argument"));
28e91b83	371
5687494a TS	372	/* ldisc specific option settings */
	373	if (ldisc == N_GIGASET_M101) {
	374	/* device specific defaults for line speed and data format */
158e4182 KZ	375	if (speed == 0)
	376	speed = 115200;
	377	if (bits == '-')
	378	bits = '8';
	379	if (parity == '-')
	380	parity = 'n';
	381	if (stop == '-')
	382	stop = '1';
5687494a TS	383	}
5687494a TS	384
28e91b83 SK	385	/* open device */
	386	dev = argv[optind + 1];
	387	if ((tty_fd = open(dev, O_RDWR \| O_NOCTTY)) < 0)
	388	err(EXIT_FAILURE, _("cannot open %s"), dev);
	389	if (!isatty(tty_fd))
	390	errx(EXIT_FAILURE, _("%s is not a serial line"), dev);
	391
	392	dbg("opened %s", dev);
	393
	394	/* set line speed and format */
	395	if (tcgetattr(tty_fd, &ts) < 0)
	396	err(EXIT_FAILURE,
	397	_("cannot get terminal attributes for %s"), dev);
	398	cfmakeraw(&ts);
	399	if (speed && my_cfsetspeed(&ts, speed) < 0)
	400	errx(EXIT_FAILURE, _("speed %d unsupported"), speed);
	401
	402	switch (stop) {
1e8d11c4	403	case '1':
28e91b83 SK	404	ts.c_cflag &= ~CSTOPB;
28e91b83 SK	405	break;
1e8d11c4	406	case '2':
28e91b83 SK	407	ts.c_cflag \|= CSTOPB;
28e91b83 SK	408	break;
ba64bbd2 SK	409	case '-':
	410	break;
	411	default:
	412	abort();
28e91b83 SK	413	}
28e91b83 SK	414	switch (bits) {
1e8d11c4	415	case '7':
28e91b83 SK	416	ts.c_cflag = (ts.c_cflag & ~CSIZE) \| CS7;
28e91b83 SK	417	break;
1e8d11c4	418	case '8':
28e91b83 SK	419	ts.c_cflag = (ts.c_cflag & ~CSIZE) \| CS8;
28e91b83 SK	420	break;
ba64bbd2 SK	421	case '-':
	422	break;
	423	default:
	424	abort();
28e91b83 SK	425	}
28e91b83 SK	426	switch (parity) {
1e8d11c4	427	case 'n':
28e91b83 SK	428	ts.c_cflag &= ~(PARENB \| PARODD);
28e91b83 SK	429	break;
1e8d11c4	430	case 'e':
28e91b83 SK	431	ts.c_cflag \|= PARENB;
	432	ts.c_cflag &= ~PARODD;
	433	break;
1e8d11c4	434	case 'o':
28e91b83 SK	435	ts.c_cflag \|= (PARENB \| PARODD);
28e91b83 SK	436	break;
ba64bbd2 SK	437	case '-':
	438	break;
	439	default:
	440	abort();
1e8d11c4	441	}
28e91b83 SK	442
	443	ts.c_cflag \|= CREAD; /* just to be on the safe side */
	444	ts.c_iflag \|= set_iflag;
	445	ts.c_iflag &= ~clr_iflag;
	446
	447	if (tcsetattr(tty_fd, TCSAFLUSH, &ts) < 0)
	448	err(EXIT_FAILURE,
	449	_("cannot set terminal attributes for %s"), dev);
	450
	451	dbg("set to raw %d %c%c%c: cflag=0x%x",
	452	speed, bits, parity, stop, ts.c_cflag);
	453
8596f639 KZ	454	if (introparm && *introparm)
	455	{
	456	dbg("intro command is '%s'", introparm);
	457	if (write_all(tty_fd, introparm, strlen(introparm)) != 0)
	458	err(EXIT_FAILURE,
	459	_("cannot write intro command to %s"), dev);
	460
	461	if (intropause) {
	462	dbg("waiting for %d seconds", intropause);
	463	sleep(intropause);
	464	}
	465	}
	466
5687494a	467	/* Attach the line discipline. */
28e91b83 SK	468	if (ioctl(tty_fd, TIOCSETD, &ldisc) < 0)
	469	err(EXIT_FAILURE, _("cannot set line discipline"));
	470
	471	dbg("line discipline set to %d", ldisc);
	472
5687494a	473	/* ldisc specific post-attach actions */
8596f639 KZ	474	if (ldisc == N_GSM0710)
	475	gsm0710_set_conf(tty_fd);
	476
28e91b83 SK	477	/* Go into background if not in debug mode. */
	478	if (!debug && daemon(0, 0) < 0)
	479	err(EXIT_FAILURE, _("cannot daemonize"));
	480
	481	/* Sleep to keep the line discipline active. */
	482	pause();
	483
	484	exit(EXIT_SUCCESS);
1e8d11c4	485	}