1*7c478bd9Sstevel@tonic-gate /*
2*7c478bd9Sstevel@tonic-gate * CDDL HEADER START
3*7c478bd9Sstevel@tonic-gate *
4*7c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*7c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
6*7c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
7*7c478bd9Sstevel@tonic-gate * with the License.
8*7c478bd9Sstevel@tonic-gate *
9*7c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*7c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
11*7c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
12*7c478bd9Sstevel@tonic-gate * and limitations under the License.
13*7c478bd9Sstevel@tonic-gate *
14*7c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
15*7c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*7c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
17*7c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
18*7c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
19*7c478bd9Sstevel@tonic-gate *
20*7c478bd9Sstevel@tonic-gate * CDDL HEADER END
21*7c478bd9Sstevel@tonic-gate */
22*7c478bd9Sstevel@tonic-gate /*
23*7c478bd9Sstevel@tonic-gate * Copyright 2004 Sun Microsystems, Inc. All rights reserved.
24*7c478bd9Sstevel@tonic-gate * Use is subject to license terms.
25*7c478bd9Sstevel@tonic-gate */
26*7c478bd9Sstevel@tonic-gate
27*7c478bd9Sstevel@tonic-gate /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
28*7c478bd9Sstevel@tonic-gate /* All Rights Reserved */
29*7c478bd9Sstevel@tonic-gate
30*7c478bd9Sstevel@tonic-gate #include <stdio.h>
31*7c478bd9Sstevel@tonic-gate #include <stdlib.h>
32*7c478bd9Sstevel@tonic-gate #include <string.h>
33*7c478bd9Sstevel@tonic-gate #include <unistd.h>
34*7c478bd9Sstevel@tonic-gate #include <errno.h>
35*7c478bd9Sstevel@tonic-gate #include <sys/types.h>
36*7c478bd9Sstevel@tonic-gate #include <sys/priocntl.h>
37*7c478bd9Sstevel@tonic-gate #include <sys/iapriocntl.h>
38*7c478bd9Sstevel@tonic-gate #include <sys/param.h>
39*7c478bd9Sstevel@tonic-gate #include <sys/ia.h>
40*7c478bd9Sstevel@tonic-gate
41*7c478bd9Sstevel@tonic-gate #include "dispadmin.h"
42*7c478bd9Sstevel@tonic-gate
43*7c478bd9Sstevel@tonic-gate /*
44*7c478bd9Sstevel@tonic-gate * This file contains the class specific code implementing
45*7c478bd9Sstevel@tonic-gate * the interactive dispadmin sub-command.
46*7c478bd9Sstevel@tonic-gate */
47*7c478bd9Sstevel@tonic-gate
48*7c478bd9Sstevel@tonic-gate #define BASENMSZ 16
49*7c478bd9Sstevel@tonic-gate
50*7c478bd9Sstevel@tonic-gate extern char *basename();
51*7c478bd9Sstevel@tonic-gate
52*7c478bd9Sstevel@tonic-gate static void get_iadptbl(), set_iadptbl();
53*7c478bd9Sstevel@tonic-gate
54*7c478bd9Sstevel@tonic-gate static char usage[] =
55*7c478bd9Sstevel@tonic-gate "usage: dispadmin -l\n\
56*7c478bd9Sstevel@tonic-gate dispadmin -c IA -g [-r res]\n\
57*7c478bd9Sstevel@tonic-gate dispadmin -c IA -s infile\n";
58*7c478bd9Sstevel@tonic-gate
59*7c478bd9Sstevel@tonic-gate static char basenm[BASENMSZ];
60*7c478bd9Sstevel@tonic-gate static char cmdpath[256];
61*7c478bd9Sstevel@tonic-gate
62*7c478bd9Sstevel@tonic-gate
63*7c478bd9Sstevel@tonic-gate int
main(int argc,char ** argv)64*7c478bd9Sstevel@tonic-gate main(int argc, char **argv)
65*7c478bd9Sstevel@tonic-gate {
66*7c478bd9Sstevel@tonic-gate extern char *optarg;
67*7c478bd9Sstevel@tonic-gate
68*7c478bd9Sstevel@tonic-gate int c;
69*7c478bd9Sstevel@tonic-gate int lflag, gflag, rflag, sflag;
70*7c478bd9Sstevel@tonic-gate ulong_t res;
71*7c478bd9Sstevel@tonic-gate char *infile;
72*7c478bd9Sstevel@tonic-gate
73*7c478bd9Sstevel@tonic-gate (void) strcpy(cmdpath, argv[0]);
74*7c478bd9Sstevel@tonic-gate (void) strcpy(basenm, basename(argv[0]));
75*7c478bd9Sstevel@tonic-gate lflag = gflag = rflag = sflag = 0;
76*7c478bd9Sstevel@tonic-gate while ((c = getopt(argc, argv, "lc:gr:s:")) != -1) {
77*7c478bd9Sstevel@tonic-gate switch (c) {
78*7c478bd9Sstevel@tonic-gate
79*7c478bd9Sstevel@tonic-gate case 'l':
80*7c478bd9Sstevel@tonic-gate lflag++;
81*7c478bd9Sstevel@tonic-gate break;
82*7c478bd9Sstevel@tonic-gate
83*7c478bd9Sstevel@tonic-gate case 'c':
84*7c478bd9Sstevel@tonic-gate if (strcmp(optarg, "IA") != 0)
85*7c478bd9Sstevel@tonic-gate fatalerr("error: %s executed for %s class, "
86*7c478bd9Sstevel@tonic-gate "%s is actually sub-command for IA class\n",
87*7c478bd9Sstevel@tonic-gate cmdpath, optarg, cmdpath);
88*7c478bd9Sstevel@tonic-gate break;
89*7c478bd9Sstevel@tonic-gate
90*7c478bd9Sstevel@tonic-gate case 'g':
91*7c478bd9Sstevel@tonic-gate gflag++;
92*7c478bd9Sstevel@tonic-gate break;
93*7c478bd9Sstevel@tonic-gate
94*7c478bd9Sstevel@tonic-gate case 'r':
95*7c478bd9Sstevel@tonic-gate rflag++;
96*7c478bd9Sstevel@tonic-gate res = strtoul(optarg, (char **)NULL, 10);
97*7c478bd9Sstevel@tonic-gate break;
98*7c478bd9Sstevel@tonic-gate
99*7c478bd9Sstevel@tonic-gate case 's':
100*7c478bd9Sstevel@tonic-gate sflag++;
101*7c478bd9Sstevel@tonic-gate infile = optarg;
102*7c478bd9Sstevel@tonic-gate break;
103*7c478bd9Sstevel@tonic-gate
104*7c478bd9Sstevel@tonic-gate case '?':
105*7c478bd9Sstevel@tonic-gate fatalerr(usage);
106*7c478bd9Sstevel@tonic-gate
107*7c478bd9Sstevel@tonic-gate default:
108*7c478bd9Sstevel@tonic-gate break;
109*7c478bd9Sstevel@tonic-gate }
110*7c478bd9Sstevel@tonic-gate }
111*7c478bd9Sstevel@tonic-gate
112*7c478bd9Sstevel@tonic-gate if (lflag) {
113*7c478bd9Sstevel@tonic-gate if (gflag || rflag || sflag)
114*7c478bd9Sstevel@tonic-gate fatalerr(usage);
115*7c478bd9Sstevel@tonic-gate
116*7c478bd9Sstevel@tonic-gate (void) printf("IA\t(Interactive)\n");
117*7c478bd9Sstevel@tonic-gate return (0);
118*7c478bd9Sstevel@tonic-gate
119*7c478bd9Sstevel@tonic-gate } else if (gflag) {
120*7c478bd9Sstevel@tonic-gate if (lflag || sflag)
121*7c478bd9Sstevel@tonic-gate fatalerr(usage);
122*7c478bd9Sstevel@tonic-gate
123*7c478bd9Sstevel@tonic-gate if (rflag == 0)
124*7c478bd9Sstevel@tonic-gate res = 1000;
125*7c478bd9Sstevel@tonic-gate
126*7c478bd9Sstevel@tonic-gate get_iadptbl(res);
127*7c478bd9Sstevel@tonic-gate return (0);
128*7c478bd9Sstevel@tonic-gate
129*7c478bd9Sstevel@tonic-gate } else if (sflag) {
130*7c478bd9Sstevel@tonic-gate if (lflag || gflag || rflag)
131*7c478bd9Sstevel@tonic-gate fatalerr(usage);
132*7c478bd9Sstevel@tonic-gate
133*7c478bd9Sstevel@tonic-gate set_iadptbl(infile);
134*7c478bd9Sstevel@tonic-gate return (0);
135*7c478bd9Sstevel@tonic-gate
136*7c478bd9Sstevel@tonic-gate } else {
137*7c478bd9Sstevel@tonic-gate fatalerr(usage);
138*7c478bd9Sstevel@tonic-gate }
139*7c478bd9Sstevel@tonic-gate return (1);
140*7c478bd9Sstevel@tonic-gate }
141*7c478bd9Sstevel@tonic-gate
142*7c478bd9Sstevel@tonic-gate
143*7c478bd9Sstevel@tonic-gate /*
144*7c478bd9Sstevel@tonic-gate * Retrieve the current ia_dptbl from memory, convert the time quantum
145*7c478bd9Sstevel@tonic-gate * values to the resolution specified by res and write the table to stdout.
146*7c478bd9Sstevel@tonic-gate */
147*7c478bd9Sstevel@tonic-gate static void
get_iadptbl(ulong_t res)148*7c478bd9Sstevel@tonic-gate get_iadptbl(ulong_t res)
149*7c478bd9Sstevel@tonic-gate {
150*7c478bd9Sstevel@tonic-gate int i;
151*7c478bd9Sstevel@tonic-gate int iadpsz;
152*7c478bd9Sstevel@tonic-gate pcinfo_t pcinfo;
153*7c478bd9Sstevel@tonic-gate pcadmin_t pcadmin;
154*7c478bd9Sstevel@tonic-gate iaadmin_t iaadmin;
155*7c478bd9Sstevel@tonic-gate iadpent_t *ia_dptbl;
156*7c478bd9Sstevel@tonic-gate hrtimer_t hrtime;
157*7c478bd9Sstevel@tonic-gate
158*7c478bd9Sstevel@tonic-gate (void) strcpy(pcinfo.pc_clname, "IA");
159*7c478bd9Sstevel@tonic-gate if (priocntl(0, 0, PC_GETCID, (caddr_t)&pcinfo) == -1)
160*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't get IA class ID, priocntl system "
161*7c478bd9Sstevel@tonic-gate "call failed with errno %d\n",
162*7c478bd9Sstevel@tonic-gate basenm, errno);
163*7c478bd9Sstevel@tonic-gate
164*7c478bd9Sstevel@tonic-gate pcadmin.pc_cid = pcinfo.pc_cid;
165*7c478bd9Sstevel@tonic-gate pcadmin.pc_cladmin = (char *)&iaadmin;
166*7c478bd9Sstevel@tonic-gate iaadmin.ia_cmd = IA_GETDPSIZE;
167*7c478bd9Sstevel@tonic-gate
168*7c478bd9Sstevel@tonic-gate if (priocntl(0, 0, PC_ADMIN, (caddr_t)&pcadmin) == -1)
169*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't get ia_dptbl size, priocntl system "
170*7c478bd9Sstevel@tonic-gate "call failed with errno %d\n",
171*7c478bd9Sstevel@tonic-gate basenm, errno);
172*7c478bd9Sstevel@tonic-gate
173*7c478bd9Sstevel@tonic-gate iadpsz = iaadmin.ia_ndpents * sizeof (iadpent_t);
174*7c478bd9Sstevel@tonic-gate if ((ia_dptbl = (iadpent_t *)malloc(iadpsz)) == NULL)
175*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't allocate memory for ia_dptbl\n", basenm);
176*7c478bd9Sstevel@tonic-gate
177*7c478bd9Sstevel@tonic-gate iaadmin.ia_dpents = ia_dptbl;
178*7c478bd9Sstevel@tonic-gate
179*7c478bd9Sstevel@tonic-gate iaadmin.ia_cmd = IA_GETDPTBL;
180*7c478bd9Sstevel@tonic-gate if (priocntl(0, 0, PC_ADMIN, (caddr_t)&pcadmin) == -1)
181*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't get ia_dptbl, priocntl system call "
182*7c478bd9Sstevel@tonic-gate "call failed with errno %d\n",
183*7c478bd9Sstevel@tonic-gate basenm, errno);
184*7c478bd9Sstevel@tonic-gate
185*7c478bd9Sstevel@tonic-gate (void) printf("# Interactive Dispatcher Configuration\n");
186*7c478bd9Sstevel@tonic-gate (void) printf("RES=%ld\n\n", res);
187*7c478bd9Sstevel@tonic-gate (void) printf("# ia_quantum ia_tqexp ia_slpret ia_maxwait ia_lwait \
188*7c478bd9Sstevel@tonic-gate PRIORITY LEVEL\n");
189*7c478bd9Sstevel@tonic-gate
190*7c478bd9Sstevel@tonic-gate for (i = 0; i < iaadmin.ia_ndpents; i++) {
191*7c478bd9Sstevel@tonic-gate if (res != HZ) {
192*7c478bd9Sstevel@tonic-gate hrtime.hrt_secs = 0;
193*7c478bd9Sstevel@tonic-gate hrtime.hrt_rem = ia_dptbl[i].ia_quantum;
194*7c478bd9Sstevel@tonic-gate hrtime.hrt_res = HZ;
195*7c478bd9Sstevel@tonic-gate if (_hrtnewres(&hrtime, res, HRT_RNDUP) == -1)
196*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't convert to requested "
197*7c478bd9Sstevel@tonic-gate "resolution\n", basenm);
198*7c478bd9Sstevel@tonic-gate if ((ia_dptbl[i].ia_quantum = hrtconvert(&hrtime))
199*7c478bd9Sstevel@tonic-gate == -1)
200*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't express time quantum in "
201*7c478bd9Sstevel@tonic-gate "requested resolution,\n"
202*7c478bd9Sstevel@tonic-gate "try coarser resolution\n",
203*7c478bd9Sstevel@tonic-gate basenm);
204*7c478bd9Sstevel@tonic-gate }
205*7c478bd9Sstevel@tonic-gate (void) printf("%10ld%10d%10d%12d%10d # %3d\n",
206*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_quantum, ia_dptbl[i].ia_tqexp,
207*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_slpret, ia_dptbl[i].ia_maxwait,
208*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_lwait, i);
209*7c478bd9Sstevel@tonic-gate }
210*7c478bd9Sstevel@tonic-gate }
211*7c478bd9Sstevel@tonic-gate
212*7c478bd9Sstevel@tonic-gate
213*7c478bd9Sstevel@tonic-gate /*
214*7c478bd9Sstevel@tonic-gate * Read the ia_dptbl values from infile, convert the time quantum values
215*7c478bd9Sstevel@tonic-gate * to HZ resolution, do a little sanity checking and overwrite the table
216*7c478bd9Sstevel@tonic-gate * in memory with the values from the file.
217*7c478bd9Sstevel@tonic-gate */
218*7c478bd9Sstevel@tonic-gate static void
set_iadptbl(infile)219*7c478bd9Sstevel@tonic-gate set_iadptbl(infile)
220*7c478bd9Sstevel@tonic-gate char *infile;
221*7c478bd9Sstevel@tonic-gate {
222*7c478bd9Sstevel@tonic-gate int i;
223*7c478bd9Sstevel@tonic-gate int niadpents;
224*7c478bd9Sstevel@tonic-gate char *tokp;
225*7c478bd9Sstevel@tonic-gate pcinfo_t pcinfo;
226*7c478bd9Sstevel@tonic-gate pcadmin_t pcadmin;
227*7c478bd9Sstevel@tonic-gate iaadmin_t iaadmin;
228*7c478bd9Sstevel@tonic-gate iadpent_t *ia_dptbl;
229*7c478bd9Sstevel@tonic-gate int linenum;
230*7c478bd9Sstevel@tonic-gate ulong_t res;
231*7c478bd9Sstevel@tonic-gate hrtimer_t hrtime;
232*7c478bd9Sstevel@tonic-gate FILE *fp;
233*7c478bd9Sstevel@tonic-gate char buf[512];
234*7c478bd9Sstevel@tonic-gate int wslength;
235*7c478bd9Sstevel@tonic-gate
236*7c478bd9Sstevel@tonic-gate (void) strcpy(pcinfo.pc_clname, "IA");
237*7c478bd9Sstevel@tonic-gate if (priocntl(0, 0, PC_GETCID, (caddr_t)&pcinfo) == -1)
238*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't get IA class ID, priocntl system "
239*7c478bd9Sstevel@tonic-gate "call failed with errno %d\n", basenm, errno);
240*7c478bd9Sstevel@tonic-gate
241*7c478bd9Sstevel@tonic-gate pcadmin.pc_cid = pcinfo.pc_cid;
242*7c478bd9Sstevel@tonic-gate pcadmin.pc_cladmin = (char *)&iaadmin;
243*7c478bd9Sstevel@tonic-gate iaadmin.ia_cmd = IA_GETDPSIZE;
244*7c478bd9Sstevel@tonic-gate
245*7c478bd9Sstevel@tonic-gate if (priocntl(0, 0, PC_ADMIN, (caddr_t)&pcadmin) == -1)
246*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't get ia_dptbl size, priocntl system "
247*7c478bd9Sstevel@tonic-gate "call failed with errno %d\n", basenm, errno);
248*7c478bd9Sstevel@tonic-gate
249*7c478bd9Sstevel@tonic-gate niadpents = iaadmin.ia_ndpents;
250*7c478bd9Sstevel@tonic-gate if ((ia_dptbl =
251*7c478bd9Sstevel@tonic-gate (iadpent_t *)malloc(niadpents * sizeof (iadpent_t))) == NULL)
252*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't allocate memory for ia_dptbl\n", basenm);
253*7c478bd9Sstevel@tonic-gate
254*7c478bd9Sstevel@tonic-gate if ((fp = fopen(infile, "r")) == NULL)
255*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't open %s for input\n", basenm, infile);
256*7c478bd9Sstevel@tonic-gate
257*7c478bd9Sstevel@tonic-gate linenum = 0;
258*7c478bd9Sstevel@tonic-gate
259*7c478bd9Sstevel@tonic-gate /*
260*7c478bd9Sstevel@tonic-gate * Find the first non-blank, non-comment line. A comment line
261*7c478bd9Sstevel@tonic-gate * is any line with '#' as the first non-white-space character.
262*7c478bd9Sstevel@tonic-gate */
263*7c478bd9Sstevel@tonic-gate do {
264*7c478bd9Sstevel@tonic-gate if (fgets(buf, sizeof (buf), fp) == NULL)
265*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too few lines in input table\n", basenm);
266*7c478bd9Sstevel@tonic-gate linenum++;
267*7c478bd9Sstevel@tonic-gate } while (buf[0] == '#' || buf[0] == '\0' ||
268*7c478bd9Sstevel@tonic-gate (wslength = strspn(buf, " \t\n")) == strlen(buf) ||
269*7c478bd9Sstevel@tonic-gate strchr(buf, '#') == buf + wslength);
270*7c478bd9Sstevel@tonic-gate
271*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(buf, " \t")) == NULL)
272*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, line %d of input file\n",
273*7c478bd9Sstevel@tonic-gate basenm, linenum);
274*7c478bd9Sstevel@tonic-gate if ((int)strlen(tokp) > 4) {
275*7c478bd9Sstevel@tonic-gate if (strncmp(tokp, "RES=", 4) != 0)
276*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
277*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
278*7c478bd9Sstevel@tonic-gate if (tokp[4] == '-')
279*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
280*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
281*7c478bd9Sstevel@tonic-gate res = strtoul(&tokp[4], (char **)NULL, 10);
282*7c478bd9Sstevel@tonic-gate } else if (strlen(tokp) == 4) {
283*7c478bd9Sstevel@tonic-gate if (strcmp(tokp, "RES=") != 0)
284*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
285*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
286*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) == NULL)
287*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
288*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
289*7c478bd9Sstevel@tonic-gate if (tokp[0] == '-')
290*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
291*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
292*7c478bd9Sstevel@tonic-gate res = strtoul(tokp, (char **)NULL, 10);
293*7c478bd9Sstevel@tonic-gate } else if (strlen(tokp) == 3) {
294*7c478bd9Sstevel@tonic-gate if (strcmp(tokp, "RES") != 0)
295*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
296*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
297*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) == NULL)
298*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
299*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
300*7c478bd9Sstevel@tonic-gate if ((int)strlen(tokp) > 1) {
301*7c478bd9Sstevel@tonic-gate if (strncmp(tokp, "=", 1) != 0)
302*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
303*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
304*7c478bd9Sstevel@tonic-gate if (tokp[1] == '-')
305*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
306*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
307*7c478bd9Sstevel@tonic-gate res = strtoul(&tokp[1], (char **)NULL, 10);
308*7c478bd9Sstevel@tonic-gate } else if (strlen(tokp) == 1) {
309*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) == NULL)
310*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
311*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
312*7c478bd9Sstevel@tonic-gate if (tokp[0] == '-')
313*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, \
314*7c478bd9Sstevel@tonic-gate line %d of input file\n", basenm, linenum);
315*7c478bd9Sstevel@tonic-gate res = strtoul(tokp, (char **)NULL, 10);
316*7c478bd9Sstevel@tonic-gate }
317*7c478bd9Sstevel@tonic-gate } else {
318*7c478bd9Sstevel@tonic-gate fatalerr("%s: Bad RES specification, line %d of input file\n",
319*7c478bd9Sstevel@tonic-gate basenm, linenum);
320*7c478bd9Sstevel@tonic-gate }
321*7c478bd9Sstevel@tonic-gate
322*7c478bd9Sstevel@tonic-gate /*
323*7c478bd9Sstevel@tonic-gate * The remainder of the input file should contain exactly enough
324*7c478bd9Sstevel@tonic-gate * non-blank, non-comment lines to fill the table (ia_ndpents lines).
325*7c478bd9Sstevel@tonic-gate * We assume that any non-blank, non-comment line is data for the
326*7c478bd9Sstevel@tonic-gate * table and fail if we find more or less than we need.
327*7c478bd9Sstevel@tonic-gate */
328*7c478bd9Sstevel@tonic-gate for (i = 0; i < iaadmin.ia_ndpents; i++) {
329*7c478bd9Sstevel@tonic-gate
330*7c478bd9Sstevel@tonic-gate /*
331*7c478bd9Sstevel@tonic-gate * Get the next non-blank, non-comment line.
332*7c478bd9Sstevel@tonic-gate */
333*7c478bd9Sstevel@tonic-gate do {
334*7c478bd9Sstevel@tonic-gate if (fgets(buf, sizeof (buf), fp) == NULL)
335*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too few lines in input table\n",
336*7c478bd9Sstevel@tonic-gate basenm);
337*7c478bd9Sstevel@tonic-gate linenum++;
338*7c478bd9Sstevel@tonic-gate } while (buf[0] == '#' || buf[0] == '\0' ||
339*7c478bd9Sstevel@tonic-gate (wslength = strspn(buf, " \t\n")) == strlen(buf) ||
340*7c478bd9Sstevel@tonic-gate strchr(buf, '#') == buf + wslength);
341*7c478bd9Sstevel@tonic-gate
342*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(buf, " \t")) == NULL)
343*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too few values, line %d of input file\n",
344*7c478bd9Sstevel@tonic-gate basenm, linenum);
345*7c478bd9Sstevel@tonic-gate
346*7c478bd9Sstevel@tonic-gate if (res != HZ) {
347*7c478bd9Sstevel@tonic-gate hrtime.hrt_secs = 0;
348*7c478bd9Sstevel@tonic-gate hrtime.hrt_rem = atol(tokp);
349*7c478bd9Sstevel@tonic-gate hrtime.hrt_res = res;
350*7c478bd9Sstevel@tonic-gate if (_hrtnewres(&hrtime, HZ, HRT_RNDUP) == -1)
351*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't convert specified \
352*7c478bd9Sstevel@tonic-gate resolution to ticks\n", basenm);
353*7c478bd9Sstevel@tonic-gate if ((ia_dptbl[i].ia_quantum = hrtconvert(&hrtime))
354*7c478bd9Sstevel@tonic-gate == -1)
355*7c478bd9Sstevel@tonic-gate fatalerr("%s: ia_quantum value out of "
356*7c478bd9Sstevel@tonic-gate "valid range; line %d of input,\n"
357*7c478bd9Sstevel@tonic-gate "table not overwritten\n",
358*7c478bd9Sstevel@tonic-gate basenm, linenum);
359*7c478bd9Sstevel@tonic-gate } else {
360*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_quantum = atol(tokp);
361*7c478bd9Sstevel@tonic-gate }
362*7c478bd9Sstevel@tonic-gate if (ia_dptbl[i].ia_quantum <= 0)
363*7c478bd9Sstevel@tonic-gate fatalerr("%s: ia_quantum value out of valid range; "
364*7c478bd9Sstevel@tonic-gate "line %d of input,\ntable not overwritten\n",
365*7c478bd9Sstevel@tonic-gate basenm, linenum);
366*7c478bd9Sstevel@tonic-gate
367*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) == NULL || tokp[0] == '#')
368*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too few values, line %d of input file\n",
369*7c478bd9Sstevel@tonic-gate basenm, linenum);
370*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_tqexp = (short)atoi(tokp);
371*7c478bd9Sstevel@tonic-gate if (ia_dptbl[i].ia_tqexp < 0 ||
372*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_tqexp > iaadmin.ia_ndpents)
373*7c478bd9Sstevel@tonic-gate fatalerr("%s: ia_tqexp value out of valid range; "
374*7c478bd9Sstevel@tonic-gate "line %d of input,\ntable not overwritten\n",
375*7c478bd9Sstevel@tonic-gate basenm, linenum);
376*7c478bd9Sstevel@tonic-gate
377*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) == NULL || tokp[0] == '#')
378*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too few values, line %d of input file\n",
379*7c478bd9Sstevel@tonic-gate basenm, linenum);
380*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_slpret = (short)atoi(tokp);
381*7c478bd9Sstevel@tonic-gate if (ia_dptbl[i].ia_slpret < 0 ||
382*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_slpret > iaadmin.ia_ndpents)
383*7c478bd9Sstevel@tonic-gate fatalerr("%s: ia_slpret value out of valid range; "
384*7c478bd9Sstevel@tonic-gate "line %d of input,\ntable not overwritten\n",
385*7c478bd9Sstevel@tonic-gate basenm, linenum);
386*7c478bd9Sstevel@tonic-gate
387*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) == NULL || tokp[0] == '#')
388*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too few values, line %d of input file\n",
389*7c478bd9Sstevel@tonic-gate basenm, linenum);
390*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_maxwait = (short)atoi(tokp);
391*7c478bd9Sstevel@tonic-gate if (ia_dptbl[i].ia_maxwait < 0)
392*7c478bd9Sstevel@tonic-gate fatalerr("%s: ia_maxwait value out of valid range; "
393*7c478bd9Sstevel@tonic-gate "line %d of input,\ntable not overwritten\n",
394*7c478bd9Sstevel@tonic-gate basenm, linenum);
395*7c478bd9Sstevel@tonic-gate
396*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) == NULL || tokp[0] == '#')
397*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too few values, line %d of input file\n",
398*7c478bd9Sstevel@tonic-gate basenm, linenum);
399*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_lwait = (short)atoi(tokp);
400*7c478bd9Sstevel@tonic-gate if (ia_dptbl[i].ia_lwait < 0 ||
401*7c478bd9Sstevel@tonic-gate ia_dptbl[i].ia_lwait > iaadmin.ia_ndpents)
402*7c478bd9Sstevel@tonic-gate fatalerr("%s: ia_lwait value out of valid range; "
403*7c478bd9Sstevel@tonic-gate "line %d of input,\ntable not overwritten\n",
404*7c478bd9Sstevel@tonic-gate basenm, linenum);
405*7c478bd9Sstevel@tonic-gate
406*7c478bd9Sstevel@tonic-gate if ((tokp = strtok(NULL, " \t")) != NULL && tokp[0] != '#')
407*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too many values, line %d of input file\n",
408*7c478bd9Sstevel@tonic-gate basenm, linenum);
409*7c478bd9Sstevel@tonic-gate }
410*7c478bd9Sstevel@tonic-gate
411*7c478bd9Sstevel@tonic-gate /*
412*7c478bd9Sstevel@tonic-gate * We've read enough lines to fill the table. We fail
413*7c478bd9Sstevel@tonic-gate * if the input file contains any more.
414*7c478bd9Sstevel@tonic-gate */
415*7c478bd9Sstevel@tonic-gate while (fgets(buf, sizeof (buf), fp) != NULL) {
416*7c478bd9Sstevel@tonic-gate if (buf[0] != '#' && buf[0] != '\0' &&
417*7c478bd9Sstevel@tonic-gate (wslength = strspn(buf, " \t\n")) != strlen(buf) &&
418*7c478bd9Sstevel@tonic-gate strchr(buf, '#') != buf + wslength)
419*7c478bd9Sstevel@tonic-gate fatalerr("%s: Too many lines in input table\n",
420*7c478bd9Sstevel@tonic-gate basenm);
421*7c478bd9Sstevel@tonic-gate }
422*7c478bd9Sstevel@tonic-gate
423*7c478bd9Sstevel@tonic-gate iaadmin.ia_dpents = ia_dptbl;
424*7c478bd9Sstevel@tonic-gate iaadmin.ia_cmd = IA_SETDPTBL;
425*7c478bd9Sstevel@tonic-gate if (priocntl(0, 0, PC_ADMIN, (caddr_t)&pcadmin) == -1)
426*7c478bd9Sstevel@tonic-gate fatalerr("%s: Can't set ia_dptbl, priocntl system call \
427*7c478bd9Sstevel@tonic-gate failed with errno %d\n", basenm, errno);
428*7c478bd9Sstevel@tonic-gate }
429