historical/m0-applesillicon.git/xnu-qemu-arm64-5.1.0/roms/skiboot/external/xscom-utils/getsram.c
2024-01-16 11:20:27 -06:00

141 lines
3.1 KiB
C

/* Copyright 2014-2016 IBM Corp.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
* implied.
* See the License for the specific language governing permissions and
* imitations under the License.
*/
#include <stdio.h>
#include <stdlib.h>
#include <getopt.h>
#include <stdint.h>
#include <stdbool.h>
#include <inttypes.h>
#include "xscom.h"
#include "sram.h"
static void print_usage(int code)
{
printf("usage: getsram [opts] addr\n");
printf(" -c|--chip <chip-id>\n");
printf(" -l|--length <size to read>\n");
printf(" -n|--occ-channel <chan>\n");
printf(" -f|--file <filename>\n");
printf(" -v|--version\n");
exit(code);
}
extern const char version[];
int main(int argc, char *argv[])
{
uint64_t val, addr = -1ull, length = 8;
uint32_t def_chip, chip_id = 0xffffffff;
int rc;
int occ_channel = 0;
char *filename = NULL;
FILE *f = stdout;
while(1) {
static struct option long_opts[] = {
{"chip", required_argument, NULL, 'c'},
{"occ-channel", required_argument, NULL, 'n'},
{"help", no_argument, NULL, 'h'},
{"version", no_argument, NULL, 'v'},
{"length", required_argument, NULL, 'l'},
{"file", required_argument, NULL, 'f'},
};
int c, oidx = 0;
c = getopt_long(argc, argv, "-c:n:hl:vf:", long_opts, &oidx);
if (c == EOF)
break;
switch(c) {
case 1:
addr = strtoull(optarg, NULL, 16);
break;
case 'c':
chip_id = strtoul(optarg, NULL, 16);
break;
case 'n':
occ_channel = strtoul(optarg, NULL, 0);
if (occ_channel < 0 || occ_channel > 3) {
fprintf(stderr, "occ-channel out of range 0 <= c <= 3\n");
exit(1);
}
break;
case 'h':
print_usage(0);
break;
case 'v':
printf("xscom utils version %s\n", version);
exit(0);
case 'f':
filename = optarg;
break;
case 'l':
length = strtoul(optarg, NULL, 0);
length = (length + 7) & ~0x7; /* round up to an eight byte interval */
break;
default:
exit(1);
}
}
if (addr == -1ull) {
fprintf(stderr, "Invalid or missing address\n");
print_usage(1);
}
def_chip = xscom_init();
if (def_chip == 0xffffffff) {
fprintf(stderr, "No valid XSCOM chip found\n");
exit(1);
}
if (chip_id == 0xffffffff)
chip_id = def_chip;
if (filename) {
f = fopen(filename, "wb");
if (!f) {
fprintf(stderr, "unable to open %s for writing\n", filename);
exit(1);
}
}
rc = 0;
while (length) {
rc = sram_read(chip_id, occ_channel, addr, &val);
if (rc)
break;
if (f) {
int i;
/* make sure we write it out big endian */
for (i = 1; i <= 8; i++)
fputc((val >> (64 - i * 8)) & 0xff, f);
} else {
printf("OCC%d: %" PRIx64 "\n", occ_channel, val);
}
length -= 8;
addr += 8;
}
if (rc) {
fprintf(stderr,"Error %d reading XSCOM\n", rc);
exit(1);
}
return 0;
}