1#! /bin/sh
2# Embed an SPU ELF executable into a PowerPC object file.
3#
4# Copyright (C) 2006-2017 Free Software Foundation, Inc.
5#
6# This file is part of GNU Binutils.
7#
8# This program is free software; you can redistribute it and/or modify
9# it under the terms of the GNU General Public License as published by
10# the Free Software Foundation; either version 3 of the License, or
11# (at your option) any later version.
12#
13# This program is distributed in the hope that it will be useful,
14# but WITHOUT ANY WARRANTY; without even the implied warranty of
15# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16# GNU General Public License for more details.
17#
18# You should have received a copy of the GNU General Public License
19# along with this program; if not, write to the Free Software
20# Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
21# 02110-1301, USA.
22
23usage ()
24{
25  echo "Usage: embedspu [flags] symbol_name input_filename output_filename"
26  echo
27  echo "        input_filename:  SPU ELF executable to be embedded"
28  echo "        output_filename: Resulting PowerPC object file"
29  echo "        symbol_name:     Name of program handle struct to be defined"
30  echo "        flags:           GCC flags defining PowerPC object file format"
31  echo "                         (e.g. -m32 or -m64)"
32  exit 1
33}
34
35program_transform_name=
36mydir=`dirname "$0"`
37
38find_prog ()
39{
40  prog=`echo $1 | sed "$program_transform_name"`
41  prog="$mydir/$prog"
42  test -x "$prog" && return 0
43  prog="$mydir/$1"
44  test -x "$prog" && return 0
45  prog=`echo $1 | sed "$program_transform_name"`
46  which $prog > /dev/null 2> /dev/null && return 0
47  return 1
48}
49
50SYMBOL=
51INFILE=
52OUTFILE=
53FLAGS=
54
55parse_args ()
56{
57  while test -n "$1"; do
58    case "$1" in
59      -*) FLAGS="${FLAGS} $1" ;;
60      *)  if test -z "$SYMBOL"; then
61	    SYMBOL="$1"
62	  elif test -z "$INFILE"; then
63	    INFILE="$1"
64	  elif test -z "$OUTFILE"; then
65	    OUTFILE="$1"
66	  else
67	    echo "Too many arguments!"
68	    usage
69	  fi ;;
70    esac
71    shift
72  done
73  if test -z "$OUTFILE"; then
74    usage
75  fi
76  if test ! -r "$INFILE"; then
77    echo "${INFILE}: File not found"
78    usage
79  fi
80}
81
82main ()
83{
84  parse_args "$@"
85
86  # Find a powerpc gcc.  Support running from a combined tree build.
87  if test -x "$mydir/../gcc/xgcc"; then
88    CC="$mydir/../gcc/xgcc -B$mydir/../gcc/"
89  else
90    find_prog gcc
91    if test $? -ne 0; then
92      echo "Cannot find $prog"
93      exit 1
94    fi
95    CC="$prog"
96  fi
97
98  # Find readelf.  Any old readelf should do.
99  find_prog readelf
100  if test $? -ne 0; then
101    if which readelf > /dev/null 2> /dev/null; then
102      prog=readelf
103    else
104      echo "Cannot find $prog"
105      exit 1
106    fi
107  fi
108  READELF="$prog"
109
110  # Sanity check the input file
111  if ! ${READELF} -h ${INFILE} | grep 'Class:.*ELF32' >/dev/null 2>/dev/null \
112     || ! ${READELF} -h ${INFILE} | grep 'Type:.*EXEC' >/dev/null 2>/dev/null \
113     || ! ${READELF} -h ${INFILE} | egrep 'Machine:.*(SPU|17)' >/dev/null 2>/dev/null
114  then
115    echo "${INFILE}: Does not appear to be an SPU executable"
116    exit 1
117  fi
118
119  toe=`${READELF} -S ${INFILE} | sed -n -e 's, *\[ *\([0-9]*\)\] *\.toe *[PROGN]*BITS *\([0-9a-f]*\).*,\1 \2,p'`
120  toe_addr=`echo $toe | sed -n -e 's,.* ,,p'`
121  toe=`echo $toe | sed -n -e 's, .*,,p'`
122  has_ea=`${READELF} -S ${INFILE} | sed -n -e 's, *\[ *\([0-9]*\)\] *\._ea *PROGBITS.*,\1,p'`
123  # For loaded sections, pick off section number, address, and file offset
124  sections=`${READELF} -S ${INFILE} | sed -n -e 's, *\[ *\([0-9]*\)\] *[^ ]* *PROGBITS *\([0-9a-f]*\) *\([0-9a-f]*\).*,\1 \2 \3,p'`
125  sections=`echo ${sections}`
126  # For relocation sections, pick off file offset and info (points to
127  # section where relocs apply)
128  relas=`${READELF} -S ${INFILE} | sed -n -e 's, *\[ *[0-9]*\] *[^ ]* *RELA *[0-9a-f]* *0*\([0-9a-f][0-9a-f]*\).* \([0-9a-f][0-9a-f]*\) *[0-9a-f][0-9a-f]*$,\1 \2,p'`
129  relas=`echo ${relas}`
130
131  # Build embedded SPU image.
132  # 1. The whole SPU ELF file is written to .rodata.speelf
133  # 2. Symbols starting with the string "_EAR_" in the SPU ELF image are
134  #    special.  They allow an SPU program to access corresponding symbols
135  #    (ie. minus the _EAR_ prefix), in the PowerPC program.  _EAR_ without
136  #    a suffix is used to refer to the addrress of the SPU image in
137  #    PowerPC address space.  _EAR_* symbols must all be defined in .toe
138  #    at 16 byte intervals, or they must be defined in other non-bss
139  #    sections.
140  #    Find all _EAR_ symbols in .toe using readelf, sort by address, and
141  #    write the address of the corresponding PowerPC symbol in a table
142  #    built in .data.spetoe.  For _EAR_ symbols not in .toe, create
143  #    .reloc commands to relocate their location directly.
144  # 3. Look for R_SPU_PPU32 and R_SPU_PPU64 relocations in the SPU ELF image
145  #    and create .reloc commands for them.
146  # 4. Write a struct spe_program_handle to .data.
147  # 5. Write a table of _SPUEAR_ symbols.
148  ${CC} ${FLAGS} -x assembler-with-cpp -nostartfiles -nostdlib \
149	-Wa,-mbig -Wa,-noexecstack -Wl,-r -Wl,-x -o ${OUTFILE} - <<EOF
150 .section .data.spetoe,"aw",@progbits
151 .p2align 7
152__spetoe__:
153`${READELF} -s -W ${INFILE} | grep ' _EAR_' | sort -k 2 | awk \
154'BEGIN { \
155	addr = strtonum ("0x" "'${toe_addr:-0}'"); \
156	split ("'"${sections}"'", s, " "); \
157	for (i = 1; i in s; i += 3) { \
158	    sec_off[s[i]] = strtonum ("0x" s[i+2]) - strtonum ("0x" s[i+1]); \
159	} \
160} \
161$7 == "'${toe}'" && strtonum ("0x" $2) != addr { \
162	print "#error Symbol " $8 " not in 16 byte element toe array!"; \
163} \
164$7 == "'${toe}'" { \
165	addr = addr + 16; \
166} \
167$7 == "'${toe}'" { \
168	print "#ifdef _LP64"; \
169	print " .quad " ($8 == "_EAR_" ? "__speelf__" : substr($8, 6)) ", 0"; \
170	print "#else"; \
171	print " .int 0, " ($8 == "_EAR_" ? "__speelf__" : substr($8, 6)) ", 0, 0"; \
172	print "#endif"; \
173} \
174$7 != "'${toe}'" && $7 in sec_off { \
175	print "#ifdef _LP64"; \
176	print " .reloc __speelf__+" strtonum ("0x" $2) + sec_off[$7] ", R_PPC64_ADDR64, " ($8 == "_EAR_" ? "__speelf__" : substr($8, 6)); \
177	print "#else"; \
178	print " .reloc __speelf__+" strtonum ("0x" $2) + sec_off[$7] + 4 ", R_PPC_ADDR32, " ($8 == "_EAR_" ? "__speelf__" : substr($8, 6)); \
179	print "#endif"; \
180	if (!donedef) { print "#define HAS_RELOCS 1"; donedef = 1; }; \
181} \
182$7 != "'${toe}'" && ! $7 in sec_off { \
183	print "#error Section not found for " $8; \
184} \
185'`
186`test -z "${relas}" || ${READELF} -r -W ${INFILE} | awk \
187'BEGIN { \
188	split ("'"${sections}"'", s, " "); \
189	for (i = 1; i in s; i += 3) { \
190	    sec_off[s[i]] = strtonum ("0x" s[i+2]) - strtonum ("0x" s[i+1]); \
191	} \
192	split ("'"${relas}"'", s, " "); \
193	for (i = 1; i in s; i += 2) { \
194	    rela[s[i]] = strtonum (s[i+1]); \
195	} \
196} \
197/^Relocation section/ { \
198	sec = substr($6, 3); \
199} \
200$3 ~ /R_SPU_PPU/ { \
201	print "#ifdef _LP64"; \
202	print " .reloc __speelf__+" strtonum ("0x" $1) + sec_off[rela[sec]] ", R_PPC64_ADDR" substr($3, 10) ", " ($5 != "" ? $5 "+0x" $7 : "__speelf__ + 0x" $4); \
203	print "#else"; \
204	print " .reloc __speelf__+" strtonum ("0x" $1) + sec_off[rela[sec]] + (substr($3, 10) == "64" ? 4 : 0)", R_PPC_ADDR32, " ($5 != "" ? $5 "+0x" $7 : "__speelf__ + 0x" $4); \
205	print "#endif"; \
206	if (!donedef) { print "#define HAS_RELOCS 1"; donedef = 1; }; \
207} \
208$3 ~ /unrecognized:/ { \
209	print "#ifdef _LP64"; \
210	print " .reloc __speelf__+" strtonum ("0x" $1) + sec_off[rela[sec]] ", R_PPC64_ADDR" ($4 == "f" ? "64" : "32") ", " ($6 != "" ? $6 "+0x" $8 : "__speelf__ + 0x" $5); \
211	print "#else"; \
212	print " .reloc __speelf__+" strtonum ("0x" $1) + sec_off[rela[sec]] + ($4 == "f" ? 4 : 0)", R_PPC_ADDR32, " ($6 != "" ? $6 "+0x" $8 : "__speelf__ + 0x" $5); \
213	print "#endif"; \
214	if (!donedef) { print "#define HAS_RELOCS 1"; donedef = 1; }; \
215} \
216'`
217#if ${has_ea:-0}
218 .section .data.speelf,"aw",@progbits
219#elif defined (HAS_RELOCS) && (defined (__PIC__) || defined (__PIE__))
220 .section .data.rel.ro.speelf,"a",@progbits
221#else
222 .section .rodata.speelf,"a",@progbits
223#endif
224 .p2align 7
225__speelf__:
226 .incbin "${INFILE}"
227
228 .section .data.spehandle,"aw",@progbits
229 .globl ${SYMBOL}
230 .type ${SYMBOL}, @object
231# fill in a struct spe_program_handle
232#ifdef _LP64
233 .p2align 3
234${SYMBOL}:
235 .int 24
236 .int 0
237 .quad __speelf__
238 .quad __spetoe__
239#else
240 .p2align 2
241${SYMBOL}:
242 .int 12
243 .int __speelf__
244 .int __spetoe__
245#endif
246 .size ${SYMBOL}, . - ${SYMBOL}
247
248`${READELF} -s -W ${INFILE} | grep ' _SPUEAR_' | sort -k 2 | awk \
249'{ \
250	print " .globl '${SYMBOL}'_" substr($8, 9); \
251	print " .type '${SYMBOL}'_" substr($8, 9) ", @object"; \
252	print " .size '${SYMBOL}'_" substr($8, 9) ", 4"; \
253	print "'${SYMBOL}'_" substr($8, 9) ":"; \
254	print " .int 0x" $2; \
255} \
256'`
257EOF
258}
259
260main "$@"
261