cap.c revision 330968
1/*-
2 * SPDX-License-Identifier: BSD-3-Clause
3 *
4 * Copyright (c) 2007 Yahoo!, Inc.
5 * All rights reserved.
6 * Written by: John Baldwin <jhb@FreeBSD.org>
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the author nor the names of any co-contributors
17 *    may be used to endorse or promote products derived from this software
18 *    without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33#ifndef lint
34static const char rcsid[] =
35  "$FreeBSD: stable/11/usr.sbin/pciconf/cap.c 330968 2018-03-15 05:04:46Z eadler $";
36#endif /* not lint */
37
38#include <sys/types.h>
39
40#include <err.h>
41#include <stdio.h>
42#include <strings.h>
43#include <sys/agpio.h>
44#include <sys/pciio.h>
45
46#include <dev/agp/agpreg.h>
47#include <dev/pci/pcireg.h>
48
49#include "pciconf.h"
50
51static void	list_ecaps(int fd, struct pci_conf *p);
52
53static void
54cap_power(int fd, struct pci_conf *p, uint8_t ptr)
55{
56	uint16_t cap, status;
57
58	cap = read_config(fd, &p->pc_sel, ptr + PCIR_POWER_CAP, 2);
59	status = read_config(fd, &p->pc_sel, ptr + PCIR_POWER_STATUS, 2);
60	printf("powerspec %d  supports D0%s%s D3  current D%d",
61	    cap & PCIM_PCAP_SPEC,
62	    cap & PCIM_PCAP_D1SUPP ? " D1" : "",
63	    cap & PCIM_PCAP_D2SUPP ? " D2" : "",
64	    status & PCIM_PSTAT_DMASK);
65}
66
67static void
68cap_agp(int fd, struct pci_conf *p, uint8_t ptr)
69{
70	uint32_t status, command;
71
72	status = read_config(fd, &p->pc_sel, ptr + AGP_STATUS, 4);
73	command = read_config(fd, &p->pc_sel, ptr + AGP_CAPID, 4);
74	printf("AGP ");
75	if (AGP_MODE_GET_MODE_3(status)) {
76		printf("v3 ");
77		if (AGP_MODE_GET_RATE(status) & AGP_MODE_V3_RATE_8x)
78			printf("8x ");
79		if (AGP_MODE_GET_RATE(status) & AGP_MODE_V3_RATE_4x)
80			printf("4x ");
81	} else {
82		if (AGP_MODE_GET_RATE(status) & AGP_MODE_V2_RATE_4x)
83			printf("4x ");
84		if (AGP_MODE_GET_RATE(status) & AGP_MODE_V2_RATE_2x)
85			printf("2x ");
86		if (AGP_MODE_GET_RATE(status) & AGP_MODE_V2_RATE_1x)
87			printf("1x ");
88	}
89	if (AGP_MODE_GET_SBA(status))
90		printf("SBA ");
91	if (AGP_MODE_GET_AGP(command)) {
92		printf("enabled at ");
93		if (AGP_MODE_GET_MODE_3(command)) {
94			printf("v3 ");
95			switch (AGP_MODE_GET_RATE(command)) {
96			case AGP_MODE_V3_RATE_8x:
97				printf("8x ");
98				break;
99			case AGP_MODE_V3_RATE_4x:
100				printf("4x ");
101				break;
102			}
103		} else
104			switch (AGP_MODE_GET_RATE(command)) {
105			case AGP_MODE_V2_RATE_4x:
106				printf("4x ");
107				break;
108			case AGP_MODE_V2_RATE_2x:
109				printf("2x ");
110				break;
111			case AGP_MODE_V2_RATE_1x:
112				printf("1x ");
113				break;
114			}
115		if (AGP_MODE_GET_SBA(command))
116			printf("SBA ");
117	} else
118		printf("disabled");
119}
120
121static void
122cap_vpd(int fd __unused, struct pci_conf *p __unused, uint8_t ptr __unused)
123{
124
125	printf("VPD");
126}
127
128static void
129cap_msi(int fd, struct pci_conf *p, uint8_t ptr)
130{
131	uint16_t ctrl;
132	int msgnum;
133
134	ctrl = read_config(fd, &p->pc_sel, ptr + PCIR_MSI_CTRL, 2);
135	msgnum = 1 << ((ctrl & PCIM_MSICTRL_MMC_MASK) >> 1);
136	printf("MSI supports %d message%s%s%s ", msgnum,
137	    (msgnum == 1) ? "" : "s",
138	    (ctrl & PCIM_MSICTRL_64BIT) ? ", 64 bit" : "",
139	    (ctrl & PCIM_MSICTRL_VECTOR) ? ", vector masks" : "");
140	if (ctrl & PCIM_MSICTRL_MSI_ENABLE) {
141		msgnum = 1 << ((ctrl & PCIM_MSICTRL_MME_MASK) >> 4);
142		printf("enabled with %d message%s", msgnum,
143		    (msgnum == 1) ? "" : "s");
144	}
145}
146
147static void
148cap_pcix(int fd, struct pci_conf *p, uint8_t ptr)
149{
150	uint32_t status;
151	int comma, max_splits, max_burst_read;
152
153	status = read_config(fd, &p->pc_sel, ptr + PCIXR_STATUS, 4);
154	printf("PCI-X ");
155	if (status & PCIXM_STATUS_64BIT)
156		printf("64-bit ");
157	if ((p->pc_hdr & PCIM_HDRTYPE) == 1)
158		printf("bridge ");
159	if ((p->pc_hdr & PCIM_HDRTYPE) != 1 || (status & (PCIXM_STATUS_133CAP |
160	    PCIXM_STATUS_266CAP | PCIXM_STATUS_533CAP)) != 0)
161		printf("supports");
162	comma = 0;
163	if (status & PCIXM_STATUS_133CAP) {
164		printf(" 133MHz");
165		comma = 1;
166	}
167	if (status & PCIXM_STATUS_266CAP) {
168		printf("%s 266MHz", comma ? "," : "");
169		comma = 1;
170	}
171	if (status & PCIXM_STATUS_533CAP) {
172		printf("%s 533MHz", comma ? "," : "");
173		comma = 1;
174	}
175	if ((p->pc_hdr & PCIM_HDRTYPE) == 1)
176		return;
177	max_burst_read = 0;
178	switch (status & PCIXM_STATUS_MAX_READ) {
179	case PCIXM_STATUS_MAX_READ_512:
180		max_burst_read = 512;
181		break;
182	case PCIXM_STATUS_MAX_READ_1024:
183		max_burst_read = 1024;
184		break;
185	case PCIXM_STATUS_MAX_READ_2048:
186		max_burst_read = 2048;
187		break;
188	case PCIXM_STATUS_MAX_READ_4096:
189		max_burst_read = 4096;
190		break;
191	}
192	max_splits = 0;
193	switch (status & PCIXM_STATUS_MAX_SPLITS) {
194	case PCIXM_STATUS_MAX_SPLITS_1:
195		max_splits = 1;
196		break;
197	case PCIXM_STATUS_MAX_SPLITS_2:
198		max_splits = 2;
199		break;
200	case PCIXM_STATUS_MAX_SPLITS_3:
201		max_splits = 3;
202		break;
203	case PCIXM_STATUS_MAX_SPLITS_4:
204		max_splits = 4;
205		break;
206	case PCIXM_STATUS_MAX_SPLITS_8:
207		max_splits = 8;
208		break;
209	case PCIXM_STATUS_MAX_SPLITS_12:
210		max_splits = 12;
211		break;
212	case PCIXM_STATUS_MAX_SPLITS_16:
213		max_splits = 16;
214		break;
215	case PCIXM_STATUS_MAX_SPLITS_32:
216		max_splits = 32;
217		break;
218	}
219	printf("%s %d burst read, %d split transaction%s", comma ? "," : "",
220	    max_burst_read, max_splits, max_splits == 1 ? "" : "s");
221}
222
223static void
224cap_ht(int fd, struct pci_conf *p, uint8_t ptr)
225{
226	uint32_t reg;
227	uint16_t command;
228
229	command = read_config(fd, &p->pc_sel, ptr + PCIR_HT_COMMAND, 2);
230	printf("HT ");
231	if ((command & 0xe000) == PCIM_HTCAP_SLAVE)
232		printf("slave");
233	else if ((command & 0xe000) == PCIM_HTCAP_HOST)
234		printf("host");
235	else
236		switch (command & PCIM_HTCMD_CAP_MASK) {
237		case PCIM_HTCAP_SWITCH:
238			printf("switch");
239			break;
240		case PCIM_HTCAP_INTERRUPT:
241			printf("interrupt");
242			break;
243		case PCIM_HTCAP_REVISION_ID:
244			printf("revision ID");
245			break;
246		case PCIM_HTCAP_UNITID_CLUMPING:
247			printf("unit ID clumping");
248			break;
249		case PCIM_HTCAP_EXT_CONFIG_SPACE:
250			printf("extended config space");
251			break;
252		case PCIM_HTCAP_ADDRESS_MAPPING:
253			printf("address mapping");
254			break;
255		case PCIM_HTCAP_MSI_MAPPING:
256			printf("MSI %saddress window %s at 0x",
257			    command & PCIM_HTCMD_MSI_FIXED ? "fixed " : "",
258			    command & PCIM_HTCMD_MSI_ENABLE ? "enabled" :
259			    "disabled");
260			if (command & PCIM_HTCMD_MSI_FIXED)
261				printf("fee00000");
262			else {
263				reg = read_config(fd, &p->pc_sel,
264				    ptr + PCIR_HTMSI_ADDRESS_HI, 4);
265				if (reg != 0)
266					printf("%08x", reg);
267				reg = read_config(fd, &p->pc_sel,
268				    ptr + PCIR_HTMSI_ADDRESS_LO, 4);
269				printf("%08x", reg);
270			}
271			break;
272		case PCIM_HTCAP_DIRECT_ROUTE:
273			printf("direct route");
274			break;
275		case PCIM_HTCAP_VCSET:
276			printf("VC set");
277			break;
278		case PCIM_HTCAP_RETRY_MODE:
279			printf("retry mode");
280			break;
281		case PCIM_HTCAP_X86_ENCODING:
282			printf("X86 encoding");
283			break;
284		case PCIM_HTCAP_GEN3:
285			printf("Gen3");
286			break;
287		case PCIM_HTCAP_FLE:
288			printf("function-level extension");
289			break;
290		case PCIM_HTCAP_PM:
291			printf("power management");
292			break;
293		case PCIM_HTCAP_HIGH_NODE_COUNT:
294			printf("high node count");
295			break;
296		default:
297			printf("unknown %02x", command);
298			break;
299		}
300}
301
302static void
303cap_vendor(int fd, struct pci_conf *p, uint8_t ptr)
304{
305	uint8_t length;
306
307	length = read_config(fd, &p->pc_sel, ptr + PCIR_VENDOR_LENGTH, 1);
308	printf("vendor (length %d)", length);
309	if (p->pc_vendor == 0x8086) {
310		/* Intel */
311		uint8_t version;
312
313		version = read_config(fd, &p->pc_sel, ptr + PCIR_VENDOR_DATA,
314		    1);
315		printf(" Intel cap %d version %d", version >> 4, version & 0xf);
316		if (version >> 4 == 1 && length == 12) {
317			/* Feature Detection */
318			uint32_t fvec;
319			int comma;
320
321			comma = 0;
322			fvec = read_config(fd, &p->pc_sel, ptr +
323			    PCIR_VENDOR_DATA + 5, 4);
324			printf("\n\t\t features:");
325			if (fvec & (1 << 0)) {
326				printf(" AMT");
327				comma = 1;
328			}
329			fvec = read_config(fd, &p->pc_sel, ptr +
330			    PCIR_VENDOR_DATA + 1, 4);
331			if (fvec & (1 << 21)) {
332				printf("%s Quick Resume", comma ? "," : "");
333				comma = 1;
334			}
335			if (fvec & (1 << 18)) {
336				printf("%s SATA RAID-5", comma ? "," : "");
337				comma = 1;
338			}
339			if (fvec & (1 << 9)) {
340				printf("%s Mobile", comma ? "," : "");
341				comma = 1;
342			}
343			if (fvec & (1 << 7)) {
344				printf("%s 6 PCI-e x1 slots", comma ? "," : "");
345				comma = 1;
346			} else {
347				printf("%s 4 PCI-e x1 slots", comma ? "," : "");
348				comma = 1;
349			}
350			if (fvec & (1 << 5)) {
351				printf("%s SATA RAID-0/1/10", comma ? "," : "");
352				comma = 1;
353			}
354			if (fvec & (1 << 3))
355				printf(", SATA AHCI");
356		}
357	}
358}
359
360static void
361cap_debug(int fd, struct pci_conf *p, uint8_t ptr)
362{
363	uint16_t debug_port;
364
365	debug_port = read_config(fd, &p->pc_sel, ptr + PCIR_DEBUG_PORT, 2);
366	printf("EHCI Debug Port at offset 0x%x in map 0x%x", debug_port &
367	    PCIM_DEBUG_PORT_OFFSET, PCIR_BAR(debug_port >> 13));
368}
369
370static void
371cap_subvendor(int fd, struct pci_conf *p, uint8_t ptr)
372{
373	uint32_t id;
374
375	id = read_config(fd, &p->pc_sel, ptr + PCIR_SUBVENDCAP_ID, 4);
376	printf("PCI Bridge card=0x%08x", id);
377}
378
379#define	MAX_PAYLOAD(field)		(128 << (field))
380
381static const char *
382link_speed_string(uint8_t speed)
383{
384
385	switch (speed) {
386	case 1:
387		return ("2.5");
388	case 2:
389		return ("5.0");
390	case 3:
391		return ("8.0");
392	default:
393		return ("undef");
394	}
395}
396
397static const char *
398aspm_string(uint8_t aspm)
399{
400
401	switch (aspm) {
402	case 1:
403		return ("L0s");
404	case 2:
405		return ("L1");
406	case 3:
407		return ("L0s/L1");
408	default:
409		return ("disabled");
410	}
411}
412
413static int
414slot_power(uint32_t cap)
415{
416	int mwatts;
417
418	mwatts = (cap & PCIEM_SLOT_CAP_SPLV) >> 7;
419	switch (cap & PCIEM_SLOT_CAP_SPLS) {
420	case 0x0:
421		mwatts *= 1000;
422		break;
423	case 0x1:
424		mwatts *= 100;
425		break;
426	case 0x2:
427		mwatts *= 10;
428		break;
429	default:
430		break;
431	}
432	return (mwatts);
433}
434
435static void
436cap_express(int fd, struct pci_conf *p, uint8_t ptr)
437{
438	uint32_t cap;
439	uint16_t ctl, flags, sta;
440	unsigned int version;
441
442	flags = read_config(fd, &p->pc_sel, ptr + PCIER_FLAGS, 2);
443	version = flags & PCIEM_FLAGS_VERSION;
444	printf("PCI-Express %u ", version);
445	switch (flags & PCIEM_FLAGS_TYPE) {
446	case PCIEM_TYPE_ENDPOINT:
447		printf("endpoint");
448		break;
449	case PCIEM_TYPE_LEGACY_ENDPOINT:
450		printf("legacy endpoint");
451		break;
452	case PCIEM_TYPE_ROOT_PORT:
453		printf("root port");
454		break;
455	case PCIEM_TYPE_UPSTREAM_PORT:
456		printf("upstream port");
457		break;
458	case PCIEM_TYPE_DOWNSTREAM_PORT:
459		printf("downstream port");
460		break;
461	case PCIEM_TYPE_PCI_BRIDGE:
462		printf("PCI bridge");
463		break;
464	case PCIEM_TYPE_PCIE_BRIDGE:
465		printf("PCI to PCIe bridge");
466		break;
467	case PCIEM_TYPE_ROOT_INT_EP:
468		printf("root endpoint");
469		break;
470	case PCIEM_TYPE_ROOT_EC:
471		printf("event collector");
472		break;
473	default:
474		printf("type %d", (flags & PCIEM_FLAGS_TYPE) >> 4);
475		break;
476	}
477	if (flags & PCIEM_FLAGS_IRQ)
478		printf(" MSI %d", (flags & PCIEM_FLAGS_IRQ) >> 9);
479	cap = read_config(fd, &p->pc_sel, ptr + PCIER_DEVICE_CAP, 4);
480	ctl = read_config(fd, &p->pc_sel, ptr + PCIER_DEVICE_CTL, 2);
481	printf(" max data %d(%d)",
482	    MAX_PAYLOAD((ctl & PCIEM_CTL_MAX_PAYLOAD) >> 5),
483	    MAX_PAYLOAD(cap & PCIEM_CAP_MAX_PAYLOAD));
484	if ((cap & PCIEM_CAP_FLR) != 0)
485		printf(" FLR");
486	if (ctl & PCIEM_CTL_RELAXED_ORD_ENABLE)
487		printf(" RO");
488	if (ctl & PCIEM_CTL_NOSNOOP_ENABLE)
489		printf(" NS");
490	if (version >= 2) {
491		cap = read_config(fd, &p->pc_sel, ptr + PCIER_DEVICE_CAP2, 4);
492		if ((cap & PCIEM_CAP2_ARI) != 0) {
493			ctl = read_config(fd, &p->pc_sel,
494			    ptr + PCIER_DEVICE_CTL2, 4);
495			printf(" ARI %s",
496			    (ctl & PCIEM_CTL2_ARI) ? "enabled" : "disabled");
497		}
498	}
499	cap = read_config(fd, &p->pc_sel, ptr + PCIER_LINK_CAP, 4);
500	sta = read_config(fd, &p->pc_sel, ptr + PCIER_LINK_STA, 2);
501	if (cap == 0 && sta == 0)
502		return;
503	printf("\n                ");
504	printf(" link x%d(x%d)", (sta & PCIEM_LINK_STA_WIDTH) >> 4,
505	    (cap & PCIEM_LINK_CAP_MAX_WIDTH) >> 4);
506	if ((cap & PCIEM_LINK_CAP_MAX_WIDTH) != 0) {
507		printf(" speed %s(%s)", (sta & PCIEM_LINK_STA_WIDTH) == 0 ?
508		    "0.0" : link_speed_string(sta & PCIEM_LINK_STA_SPEED),
509	    	    link_speed_string(cap & PCIEM_LINK_CAP_MAX_SPEED));
510	}
511	if ((cap & PCIEM_LINK_CAP_ASPM) != 0) {
512		ctl = read_config(fd, &p->pc_sel, ptr + PCIER_LINK_CTL, 2);
513		printf(" ASPM %s(%s)", aspm_string(ctl & PCIEM_LINK_CTL_ASPMC),
514		    aspm_string((cap & PCIEM_LINK_CAP_ASPM) >> 10));
515	}
516	if (!(flags & PCIEM_FLAGS_SLOT))
517		return;
518	cap = read_config(fd, &p->pc_sel, ptr + PCIER_SLOT_CAP, 4);
519	sta = read_config(fd, &p->pc_sel, ptr + PCIER_SLOT_STA, 2);
520	ctl = read_config(fd, &p->pc_sel, ptr + PCIER_SLOT_CTL, 2);
521	printf("\n                ");
522	printf(" slot %d", (cap & PCIEM_SLOT_CAP_PSN) >> 19);
523	printf(" power limit %d mW", slot_power(cap));
524	if (cap & PCIEM_SLOT_CAP_HPC)
525		printf(" HotPlug(%s)", sta & PCIEM_SLOT_STA_PDS ? "present" :
526		    "empty");
527	if (cap & PCIEM_SLOT_CAP_HPS)
528		printf(" surprise");
529	if (cap & PCIEM_SLOT_CAP_APB)
530		printf(" Attn Button");
531	if (cap & PCIEM_SLOT_CAP_PCP)
532		printf(" PC(%s)", ctl & PCIEM_SLOT_CTL_PCC ? "off" : "on");
533	if (cap & PCIEM_SLOT_CAP_MRLSP)
534		printf(" MRL(%s)", sta & PCIEM_SLOT_STA_MRLSS ? "open" :
535		    "closed");
536	if (cap & PCIEM_SLOT_CAP_EIP)
537		printf(" EI(%s)", sta & PCIEM_SLOT_STA_EIS ? "engaged" :
538		    "disengaged");
539}
540
541static void
542cap_msix(int fd, struct pci_conf *p, uint8_t ptr)
543{
544	uint32_t pba_offset, table_offset, val;
545	int msgnum, pba_bar, table_bar;
546	uint16_t ctrl;
547
548	ctrl = read_config(fd, &p->pc_sel, ptr + PCIR_MSIX_CTRL, 2);
549	msgnum = (ctrl & PCIM_MSIXCTRL_TABLE_SIZE) + 1;
550
551	val = read_config(fd, &p->pc_sel, ptr + PCIR_MSIX_TABLE, 4);
552	table_bar = PCIR_BAR(val & PCIM_MSIX_BIR_MASK);
553	table_offset = val & ~PCIM_MSIX_BIR_MASK;
554
555	val = read_config(fd, &p->pc_sel, ptr + PCIR_MSIX_PBA, 4);
556	pba_bar = PCIR_BAR(val & PCIM_MSIX_BIR_MASK);
557	pba_offset = val & ~PCIM_MSIX_BIR_MASK;
558
559	printf("MSI-X supports %d message%s%s\n", msgnum,
560	    (msgnum == 1) ? "" : "s",
561	    (ctrl & PCIM_MSIXCTRL_MSIX_ENABLE) ? ", enabled" : "");
562
563	printf("                 ");
564	printf("Table in map 0x%x[0x%x], PBA in map 0x%x[0x%x]",
565	    table_bar, table_offset, pba_bar, pba_offset);
566}
567
568static void
569cap_sata(int fd __unused, struct pci_conf *p __unused, uint8_t ptr __unused)
570{
571
572	printf("SATA Index-Data Pair");
573}
574
575static void
576cap_pciaf(int fd, struct pci_conf *p, uint8_t ptr)
577{
578	uint8_t cap;
579
580	cap = read_config(fd, &p->pc_sel, ptr + PCIR_PCIAF_CAP, 1);
581	printf("PCI Advanced Features:%s%s",
582	    cap & PCIM_PCIAFCAP_FLR ? " FLR" : "",
583	    cap & PCIM_PCIAFCAP_TP  ? " TP"  : "");
584}
585
586static const char *
587ea_bei_to_name(int bei)
588{
589	static const char *barstr[] = {
590		"BAR0", "BAR1", "BAR2", "BAR3", "BAR4", "BAR5"
591	};
592	static const char *vfbarstr[] = {
593		"VFBAR0", "VFBAR1", "VFBAR2", "VFBAR3", "VFBAR4", "VFBAR5"
594	};
595
596	if ((bei >= PCIM_EA_BEI_BAR_0) && (bei <= PCIM_EA_BEI_BAR_5))
597		return (barstr[bei - PCIM_EA_BEI_BAR_0]);
598	if ((bei >= PCIM_EA_BEI_VF_BAR_0) && (bei <= PCIM_EA_BEI_VF_BAR_5))
599		return (vfbarstr[bei - PCIM_EA_BEI_VF_BAR_0]);
600
601	switch (bei) {
602	case PCIM_EA_BEI_BRIDGE:
603		return "BRIDGE";
604	case PCIM_EA_BEI_ENI:
605		return "ENI";
606	case PCIM_EA_BEI_ROM:
607		return "ROM";
608	case PCIM_EA_BEI_RESERVED:
609	default:
610		return "RSVD";
611	}
612}
613
614static const char *
615ea_prop_to_name(uint8_t prop)
616{
617
618	switch (prop) {
619	case PCIM_EA_P_MEM:
620		return "Non-Prefetchable Memory";
621	case PCIM_EA_P_MEM_PREFETCH:
622		return "Prefetchable Memory";
623	case PCIM_EA_P_IO:
624		return "I/O Space";
625	case PCIM_EA_P_VF_MEM_PREFETCH:
626		return "VF Prefetchable Memory";
627	case PCIM_EA_P_VF_MEM:
628		return "VF Non-Prefetchable Memory";
629	case PCIM_EA_P_BRIDGE_MEM:
630		return "Bridge Non-Prefetchable Memory";
631	case PCIM_EA_P_BRIDGE_MEM_PREFETCH:
632		return "Bridge Prefetchable Memory";
633	case PCIM_EA_P_BRIDGE_IO:
634		return "Bridge I/O Space";
635	case PCIM_EA_P_MEM_RESERVED:
636		return "Reserved Memory";
637	case PCIM_EA_P_IO_RESERVED:
638		return "Reserved I/O Space";
639	case PCIM_EA_P_UNAVAILABLE:
640		return "Unavailable";
641	default:
642		return "Reserved";
643	}
644}
645
646static void
647cap_ea(int fd, struct pci_conf *p, uint8_t ptr)
648{
649	int num_ent;
650	int a, b;
651	uint32_t bei;
652	uint32_t val;
653	int ent_size;
654	uint32_t dw[4];
655	uint32_t flags, flags_pp, flags_sp;
656	uint64_t base, max_offset;
657	uint8_t fixed_sub_bus_nr, fixed_sec_bus_nr;
658
659	/* Determine the number of entries */
660	num_ent = read_config(fd, &p->pc_sel, ptr + PCIR_EA_NUM_ENT, 2);
661	num_ent &= PCIM_EA_NUM_ENT_MASK;
662
663	printf("PCI Enhanced Allocation (%d entries)", num_ent);
664
665	/* Find the first entry to care of */
666	ptr += PCIR_EA_FIRST_ENT;
667
668	/* Print BUS numbers for bridges */
669	if ((p->pc_hdr & PCIM_HDRTYPE) == PCIM_HDRTYPE_BRIDGE) {
670		val = read_config(fd, &p->pc_sel, ptr, 4);
671
672		fixed_sec_bus_nr = PCIM_EA_SEC_NR(val);
673		fixed_sub_bus_nr = PCIM_EA_SUB_NR(val);
674
675		printf("\n\t\t BRIDGE, sec bus [%d], sub bus [%d]",
676		    fixed_sec_bus_nr, fixed_sub_bus_nr);
677		ptr += 4;
678	}
679
680	for (a = 0; a < num_ent; a++) {
681		/* Read a number of dwords in the entry */
682		val = read_config(fd, &p->pc_sel, ptr, 4);
683		ptr += 4;
684		ent_size = (val & PCIM_EA_ES);
685
686		for (b = 0; b < ent_size; b++) {
687			dw[b] = read_config(fd, &p->pc_sel, ptr, 4);
688			ptr += 4;
689		}
690
691		flags = val;
692		flags_pp = (flags & PCIM_EA_PP) >> PCIM_EA_PP_OFFSET;
693		flags_sp = (flags & PCIM_EA_SP) >> PCIM_EA_SP_OFFSET;
694		bei = (PCIM_EA_BEI & val) >> PCIM_EA_BEI_OFFSET;
695
696		base = dw[0] & PCIM_EA_FIELD_MASK;
697		max_offset = dw[1] | ~PCIM_EA_FIELD_MASK;
698		b = 2;
699		if (((dw[0] & PCIM_EA_IS_64) != 0) && (b < ent_size)) {
700			base |= (uint64_t)dw[b] << 32UL;
701			b++;
702		}
703		if (((dw[1] & PCIM_EA_IS_64) != 0)
704			&& (b < ent_size)) {
705			max_offset |= (uint64_t)dw[b] << 32UL;
706			b++;
707		}
708
709		printf("\n\t\t [%d] %s, %s, %s, base [0x%jx], size [0x%jx]"
710		    "\n\t\t\tPrimary properties [0x%x] (%s)"
711		    "\n\t\t\tSecondary properties [0x%x] (%s)",
712		    bei, ea_bei_to_name(bei),
713		    (flags & PCIM_EA_ENABLE ? "Enabled" : "Disabled"),
714		    (flags & PCIM_EA_WRITABLE ? "Writable" : "Read-only"),
715		    (uintmax_t)base, (uintmax_t)(max_offset + 1),
716		    flags_pp, ea_prop_to_name(flags_pp),
717		    flags_sp, ea_prop_to_name(flags_sp));
718	}
719}
720
721void
722list_caps(int fd, struct pci_conf *p)
723{
724	int express;
725	uint16_t sta;
726	uint8_t ptr, cap;
727
728	/* Are capabilities present for this device? */
729	sta = read_config(fd, &p->pc_sel, PCIR_STATUS, 2);
730	if (!(sta & PCIM_STATUS_CAPPRESENT))
731		return;
732
733	switch (p->pc_hdr & PCIM_HDRTYPE) {
734	case PCIM_HDRTYPE_NORMAL:
735	case PCIM_HDRTYPE_BRIDGE:
736		ptr = PCIR_CAP_PTR;
737		break;
738	case PCIM_HDRTYPE_CARDBUS:
739		ptr = PCIR_CAP_PTR_2;
740		break;
741	default:
742		errx(1, "list_caps: bad header type");
743	}
744
745	/* Walk the capability list. */
746	express = 0;
747	ptr = read_config(fd, &p->pc_sel, ptr, 1);
748	while (ptr != 0 && ptr != 0xff) {
749		cap = read_config(fd, &p->pc_sel, ptr + PCICAP_ID, 1);
750		printf("    cap %02x[%02x] = ", cap, ptr);
751		switch (cap) {
752		case PCIY_PMG:
753			cap_power(fd, p, ptr);
754			break;
755		case PCIY_AGP:
756			cap_agp(fd, p, ptr);
757			break;
758		case PCIY_VPD:
759			cap_vpd(fd, p, ptr);
760			break;
761		case PCIY_MSI:
762			cap_msi(fd, p, ptr);
763			break;
764		case PCIY_PCIX:
765			cap_pcix(fd, p, ptr);
766			break;
767		case PCIY_HT:
768			cap_ht(fd, p, ptr);
769			break;
770		case PCIY_VENDOR:
771			cap_vendor(fd, p, ptr);
772			break;
773		case PCIY_DEBUG:
774			cap_debug(fd, p, ptr);
775			break;
776		case PCIY_SUBVENDOR:
777			cap_subvendor(fd, p, ptr);
778			break;
779		case PCIY_EXPRESS:
780			express = 1;
781			cap_express(fd, p, ptr);
782			break;
783		case PCIY_MSIX:
784			cap_msix(fd, p, ptr);
785			break;
786		case PCIY_SATA:
787			cap_sata(fd, p, ptr);
788			break;
789		case PCIY_PCIAF:
790			cap_pciaf(fd, p, ptr);
791			break;
792		case PCIY_EA:
793			cap_ea(fd, p, ptr);
794			break;
795		default:
796			printf("unknown");
797			break;
798		}
799		printf("\n");
800		ptr = read_config(fd, &p->pc_sel, ptr + PCICAP_NEXTPTR, 1);
801	}
802
803	if (express)
804		list_ecaps(fd, p);
805}
806
807/* From <sys/systm.h>. */
808static __inline uint32_t
809bitcount32(uint32_t x)
810{
811
812	x = (x & 0x55555555) + ((x & 0xaaaaaaaa) >> 1);
813	x = (x & 0x33333333) + ((x & 0xcccccccc) >> 2);
814	x = (x + (x >> 4)) & 0x0f0f0f0f;
815	x = (x + (x >> 8));
816	x = (x + (x >> 16)) & 0x000000ff;
817	return (x);
818}
819
820static void
821ecap_aer(int fd, struct pci_conf *p, uint16_t ptr, uint8_t ver)
822{
823	uint32_t sta, mask;
824
825	printf("AER %d", ver);
826	if (ver < 1)
827		return;
828	sta = read_config(fd, &p->pc_sel, ptr + PCIR_AER_UC_STATUS, 4);
829	mask = read_config(fd, &p->pc_sel, ptr + PCIR_AER_UC_SEVERITY, 4);
830	printf(" %d fatal", bitcount32(sta & mask));
831	printf(" %d non-fatal", bitcount32(sta & ~mask));
832	sta = read_config(fd, &p->pc_sel, ptr + PCIR_AER_COR_STATUS, 4);
833	printf(" %d corrected\n", bitcount32(sta));
834}
835
836static void
837ecap_vc(int fd, struct pci_conf *p, uint16_t ptr, uint8_t ver)
838{
839	uint32_t cap1;
840
841	printf("VC %d", ver);
842	if (ver < 1)
843		return;
844	cap1 = read_config(fd, &p->pc_sel, ptr + PCIR_VC_CAP1, 4);
845	printf(" max VC%d", cap1 & PCIM_VC_CAP1_EXT_COUNT);
846	if ((cap1 & PCIM_VC_CAP1_LOWPRI_EXT_COUNT) != 0)
847		printf(" lowpri VC0-VC%d",
848		    (cap1 & PCIM_VC_CAP1_LOWPRI_EXT_COUNT) >> 4);
849	printf("\n");
850}
851
852static void
853ecap_sernum(int fd, struct pci_conf *p, uint16_t ptr, uint8_t ver)
854{
855	uint32_t high, low;
856
857	printf("Serial %d", ver);
858	if (ver < 1)
859		return;
860	low = read_config(fd, &p->pc_sel, ptr + PCIR_SERIAL_LOW, 4);
861	high = read_config(fd, &p->pc_sel, ptr + PCIR_SERIAL_HIGH, 4);
862	printf(" %08x%08x\n", high, low);
863}
864
865static void
866ecap_vendor(int fd, struct pci_conf *p, uint16_t ptr, uint8_t ver)
867{
868	uint32_t val;
869
870	printf("Vendor %d", ver);
871	if (ver < 1)
872		return;
873	val = read_config(fd, &p->pc_sel, ptr + 4, 4);
874	printf(" ID %d\n", val & 0xffff);
875}
876
877static void
878ecap_sec_pcie(int fd, struct pci_conf *p, uint16_t ptr, uint8_t ver)
879{
880	uint32_t val;
881
882	printf("PCIe Sec %d", ver);
883	if (ver < 1)
884		return;
885	val = read_config(fd, &p->pc_sel, ptr + 8, 4);
886	printf(" lane errors %#x\n", val);
887}
888
889static const char *
890check_enabled(int value)
891{
892
893	return (value ? "enabled" : "disabled");
894}
895
896static void
897ecap_sriov(int fd, struct pci_conf *p, uint16_t ptr, uint8_t ver)
898{
899	const char *comma, *enabled;
900	uint16_t iov_ctl, total_vfs, num_vfs, vf_offset, vf_stride, vf_did;
901	uint32_t page_caps, page_size, page_shift, size;
902	int i;
903
904	printf("SR-IOV %d ", ver);
905
906	iov_ctl = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_CTL, 2);
907	printf("IOV %s, Memory Space %s, ARI %s\n",
908	    check_enabled(iov_ctl & PCIM_SRIOV_VF_EN),
909	    check_enabled(iov_ctl & PCIM_SRIOV_VF_MSE),
910	    check_enabled(iov_ctl & PCIM_SRIOV_ARI_EN));
911
912	total_vfs = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_TOTAL_VFS, 2);
913	num_vfs = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_NUM_VFS, 2);
914	printf("                     ");
915	printf("%d VFs configured out of %d supported\n", num_vfs, total_vfs);
916
917	vf_offset = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_VF_OFF, 2);
918	vf_stride = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_VF_STRIDE, 2);
919	printf("                     ");
920	printf("First VF RID Offset 0x%04x, VF RID Stride 0x%04x\n", vf_offset,
921	    vf_stride);
922
923	vf_did = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_VF_DID, 2);
924	printf("                     VF Device ID 0x%04x\n", vf_did);
925
926	page_caps = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_PAGE_CAP, 4);
927	page_size = read_config(fd, &p->pc_sel, ptr + PCIR_SRIOV_PAGE_SIZE, 4);
928	printf("                     ");
929	printf("Page Sizes: ");
930	comma = "";
931	while (page_caps != 0) {
932		page_shift = ffs(page_caps) - 1;
933
934		if (page_caps & page_size)
935			enabled = " (enabled)";
936		else
937			enabled = "";
938
939		size = (1 << (page_shift + PCI_SRIOV_BASE_PAGE_SHIFT));
940		printf("%s%d%s", comma, size, enabled);
941		comma = ", ";
942
943		page_caps &= ~(1 << page_shift);
944	}
945	printf("\n");
946
947	for (i = 0; i <= PCIR_MAX_BAR_0; i++)
948		print_bar(fd, p, "iov bar  ", ptr + PCIR_SRIOV_BAR(i));
949}
950
951static struct {
952	uint16_t id;
953	const char *name;
954} ecap_names[] = {
955	{ PCIZ_PWRBDGT, "Power Budgeting" },
956	{ PCIZ_RCLINK_DCL, "Root Complex Link Declaration" },
957	{ PCIZ_RCLINK_CTL, "Root Complex Internal Link Control" },
958	{ PCIZ_RCEC_ASSOC, "Root Complex Event Collector ASsociation" },
959	{ PCIZ_MFVC, "MFVC" },
960	{ PCIZ_RCRB, "RCRB" },
961	{ PCIZ_ACS, "ACS" },
962	{ PCIZ_ARI, "ARI" },
963	{ PCIZ_ATS, "ATS" },
964	{ PCIZ_MULTICAST, "Multicast" },
965	{ PCIZ_RESIZE_BAR, "Resizable BAR" },
966	{ PCIZ_DPA, "DPA" },
967	{ PCIZ_TPH_REQ, "TPH Requester" },
968	{ PCIZ_LTR, "LTR" },
969	{ 0, NULL }
970};
971
972static void
973list_ecaps(int fd, struct pci_conf *p)
974{
975	const char *name;
976	uint32_t ecap;
977	uint16_t ptr;
978	int i;
979
980	ptr = PCIR_EXTCAP;
981	ecap = read_config(fd, &p->pc_sel, ptr, 4);
982	if (ecap == 0xffffffff || ecap == 0)
983		return;
984	for (;;) {
985		printf("    ecap %04x[%03x] = ", PCI_EXTCAP_ID(ecap), ptr);
986		switch (PCI_EXTCAP_ID(ecap)) {
987		case PCIZ_AER:
988			ecap_aer(fd, p, ptr, PCI_EXTCAP_VER(ecap));
989			break;
990		case PCIZ_VC:
991			ecap_vc(fd, p, ptr, PCI_EXTCAP_VER(ecap));
992			break;
993		case PCIZ_SERNUM:
994			ecap_sernum(fd, p, ptr, PCI_EXTCAP_VER(ecap));
995			break;
996		case PCIZ_VENDOR:
997			ecap_vendor(fd, p, ptr, PCI_EXTCAP_VER(ecap));
998			break;
999		case PCIZ_SEC_PCIE:
1000			ecap_sec_pcie(fd, p, ptr, PCI_EXTCAP_VER(ecap));
1001			break;
1002		case PCIZ_SRIOV:
1003			ecap_sriov(fd, p, ptr, PCI_EXTCAP_VER(ecap));
1004			break;
1005		default:
1006			name = "unknown";
1007			for (i = 0; ecap_names[i].name != NULL; i++)
1008				if (ecap_names[i].id == PCI_EXTCAP_ID(ecap)) {
1009					name = ecap_names[i].name;
1010					break;
1011				}
1012			printf("%s %d\n", name, PCI_EXTCAP_VER(ecap));
1013			break;
1014		}
1015		ptr = PCI_EXTCAP_NEXTPTR(ecap);
1016		if (ptr == 0)
1017			break;
1018		ecap = read_config(fd, &p->pc_sel, ptr, 4);
1019	}
1020}
1021
1022/* Find offset of a specific capability.  Returns 0 on failure. */
1023uint8_t
1024pci_find_cap(int fd, struct pci_conf *p, uint8_t id)
1025{
1026	uint16_t sta;
1027	uint8_t ptr, cap;
1028
1029	/* Are capabilities present for this device? */
1030	sta = read_config(fd, &p->pc_sel, PCIR_STATUS, 2);
1031	if (!(sta & PCIM_STATUS_CAPPRESENT))
1032		return (0);
1033
1034	switch (p->pc_hdr & PCIM_HDRTYPE) {
1035	case PCIM_HDRTYPE_NORMAL:
1036	case PCIM_HDRTYPE_BRIDGE:
1037		ptr = PCIR_CAP_PTR;
1038		break;
1039	case PCIM_HDRTYPE_CARDBUS:
1040		ptr = PCIR_CAP_PTR_2;
1041		break;
1042	default:
1043		return (0);
1044	}
1045
1046	ptr = read_config(fd, &p->pc_sel, ptr, 1);
1047	while (ptr != 0 && ptr != 0xff) {
1048		cap = read_config(fd, &p->pc_sel, ptr + PCICAP_ID, 1);
1049		if (cap == id)
1050			return (ptr);
1051		ptr = read_config(fd, &p->pc_sel, ptr + PCICAP_NEXTPTR, 1);
1052	}
1053	return (0);
1054}
1055
1056/* Find offset of a specific extended capability.  Returns 0 on failure. */
1057uint16_t
1058pcie_find_cap(int fd, struct pci_conf *p, uint16_t id)
1059{
1060	uint32_t ecap;
1061	uint16_t ptr;
1062
1063	ptr = PCIR_EXTCAP;
1064	ecap = read_config(fd, &p->pc_sel, ptr, 4);
1065	if (ecap == 0xffffffff || ecap == 0)
1066		return (0);
1067	for (;;) {
1068		if (PCI_EXTCAP_ID(ecap) == id)
1069			return (ptr);
1070		ptr = PCI_EXTCAP_NEXTPTR(ecap);
1071		if (ptr == 0)
1072			break;
1073		ecap = read_config(fd, &p->pc_sel, ptr, 4);
1074	}
1075	return (0);
1076}
1077