Pic32 Assembler: Unterschied zwischen den Versionen

Aus Wiki CCC Göttingen
Zur Navigation springen Zur Suche springen
Zeile 23: Zeile 23:


  <nowiki>
  <nowiki>
  #include "xc.h"
.text            # Text-Segment
.globl dot32x16 # Symbol exportieren


        .text            /* Text-Segment */
# Funktion
        .global dot32x16  /* Symbol dot32x16 exportieren */
#   int64_t dot32x16(int n, const int32_t x[], const int16_t y[]);
 
# mit Eingabe
/* Funktion
#   a0 = n, die Dimension
  *   int64_t dot32x16(int n, const int32_t x[], const int16_t y[]);
#   a1 = Adresse des ersten Elements vom "x-Vektor"
  * mit Eingabe
#   a2 = Adresse des ersten Elements vom "y-Vektor"
  *   a0 = n, die Dimension
# und erwarteter Ausgabe
  *   a1 = Adresse des ersten Elements vom "x-Vektor"
#   v0 = niederwertiges Wort des Rueckgabewertes
  *   a2 = Adresse des ersten Elements vom "y-Vektor"
#   v1 = hoeherwertiges Wort des Rueckgabewertes
  * und erwarteter Ausgabe
# nach O32 mit Little-Endian-Konvention bzgl Aufteilung von
  *   v0 = niederwertiges Wort des Rueckgabewertes
# 64-Bit-Werten auf zwei 32-Bit-Register.
  *   v1 = hoeherwertiges Wort des Rueckgabewertes
.ent dot32x16
  * nach O32 mit Little-Endian-Konvention bzgl Aufteilung von
dot32x16:
  * 64-Bit-Werten auf zwei 32-Bit-Register.
mtlo  $zero             # LO = 0;
  */
mthi  $zero             # HI = 0;
        .ent dot32x16
beqz  $a0, .L_loopEnd   # if (a0==0) goto .L_loopEnd;
dot32x16:
.L_loopStart:
        mtlo  zero             /* LO = 0; */
lh    $t2, 0($a2)        # t2 = *(uint16_t*)(a2+0);
        mthi  zero             /* HI = 0; */
lw    $t1, 0($a1)        # t1 = *( int32_t*)(a1+0);
        beqz  a0, .L_loopEnd   /* if (a0==0) goto .L_loopEnd */
addiu $a0, $a0, -1      # a0--;
.L_loopStart:
addiu $a2, $a2,  2      # a2+=2;
        lh    t2, 0(a2)        /* t2 = *(uint16_t*)(a2+0); */
addiu $a1, $a1,  4      # a1+=4;
        lw    t1, 0(a1)        /* t1 = *( int32_t*)(a1+0); */
madd  $t1, $t2          # HI::LO += t1*t2;
        seh  t2, t2          /* t2 = sign_extend_half(t2); */
bnez  $a0, .L_loopStart # if (a0!=0) goto .L_loopStart;
        addiu a0, a0, -1      /* a0--; */
.L_loopEnd:
        addiu a2, a2,  2      /* a2+=2; */
mflo  $v0               # v0 = LO;
        addiu a1, a1,  4      /* a1+=4; */
mfhi  $v1               # v1 = HI;
        madd  t1, t2          /* HI::LO += t1*t2; */
jr    $ra               # goto ra (Ruecksprungadresse);
        bnez  a0, .L_loopStart /* if (a0!=0) goto .L_loopStart */
.end dot32x16
.L_loopEnd:
        mflo  v0               /* v0 = LO; */
        mfhi  v1               /* v1 = HI; */
        jr    ra               /* goto ra (Ruecksprungadresse) */
        .end dot32x16
  </nowiki>
  </nowiki>


Zeile 72: Zeile 68:


  <nowiki>
  <nowiki>
sebi@laptop ~/Documents/ccpp/pic32tests/audio-pwm-asmtest
sebi@laptop ~/Documents/ccpp/pic32tests/audio-pwm-asmtest
$ xc32-gcc -c dot32x16.S
$ xc32-gcc -c dot32x16.S
 
sebi@laptop ~/Documents/ccpp/pic32tests/audio-pwm-asmtest
$ xc32-objdump -d dot32x16.o
 
dot32x16.o:    file format elf32-tradlittlemips
 
 
Disassembly of section .text:


sebi@laptop ~/Documents/ccpp/pic32tests/audio-pwm-asmtest
00000000 <dot32x16>:
$ xc32-objdump -d dot32x16.o
  0:  00000013        mtlo    zero
  4:  10800008       beqz    a0,28 <dot32x16+0x28>
dot32x16.o:    file format elf32-tradlittlemips
  8:  00000011        mthi    zero
  c:  84ca0000        lh      t2,0(a2)
  10:  8ca90000        lw      t1,0(a1)
Disassembly of section .text:
  14:  2484ffff        addiu  a0,a0,-1
  18:  24c60002        addiu  a2,a2,2
00000000 <dot32x16>:
  1c:  24a50004        addiu  a1,a1,4
    0:  00000013        mtlo    zero
  201480fffa       bnez    a0,c <dot32x16+0xc>
    4:  10800009       beqz    a0,2c <dot32x16+0x2c>
  24:  712a0000        madd    t1,t2
    8:  00000011        mthi    zero
  28:  00001012        mflo    v0
    c:  84ca0000        lh      t2,0(a2)
  2c:  03e00008        jr      ra
  10:  8ca90000        lw      t1,0(a1)
  30:  00001810        mfhi    v1
  14:  7c0a5620        seh    t2,t2
  18:  2484ffff        addiu  a0,a0,-1
  1c:  24c60002        addiu  a2,a2,2
  20:  24a50004        addiu  a1,a1,4
  241480fff9       bnez    a0,c <dot32x16+0xc>
  28:  712a0000        madd    t1,t2
  2c:  00001012        mflo    v0
  30:  03e00008        jr      ra
  34:  00001810        mfhi    v1
  </nowiki>
  </nowiki>



Version vom 13. Oktober 2012, 19:50 Uhr

Ressourcen

Interessiert einen die Assemblerprogrammierung für den PIC32 sind erst mal folgende Ressourcen von großem Wert:

Folgendes scheint auf den ersten Blick noch interessant zu sein. Es dürfte leichter lesbar als die Befehlssatzreferenz sein:

Bisher Gelerntes

To assemble or not to assemble

Für einige Dinge ist es gar nicht notwendig, sich die Hände dreckig zu machen. Beispielsweise bietet der Header <xc.h> so einiges an Makros für schon fertige Inline-Assembler Schnipsel oder __builtin-Funktionen (Intrinsics). Auch sollte man sich mal schlau machen, was Microchip so an Bibliotheken schon anbietet. Da gibt es zum Beispiel die DSP-Bibliothek, die praktische Funktionen für die digitale Signalverarbeitung anbietet. Es steht zwar nicht direkt dabei, aber ich würde mal davon ausgehen, dass die Funktionen handoptimiert wurden und, wo sinnvoll, Gebrauch von den madd/msub-Befehlen (multiply-accumulate mit einem 64-Bit Akkumulator) machen, die der MIPS32-Befehlssatz bietet. So ein 64-Bit Akkumulator ist echt super, wenn man auf Fließkommazahlen verzichten und dafür Festkommazahlen einsetzen will.

Andererseits entsteht mit der Nutzung dieser Bibliotheken natürlich auch eine PIC32-Abhängigkeit wohingegen selbst geschriebener MIPS32 Code relativ universellt ist; denn den versteht ja nicht nur der PIC32. Und ein bisschen Hände schmutzig machen kann ja auch Spaß machen. :D

Register Konventionen

Die 32 Register können seitens der CPU eigentlich nahezu beliebig verwendet werden. Das kann man schon daran erkennen, dass sie $0, $1, ..., $31 heißen. Es gibt aber ein paar Konventionen, was die Verwendung dieser Register angeht, an die man sich spätestens dann halten sollte, falls man mit C/C++ Code interagieren will. Die von der XC32-Toolchain verwendete Konvention heißt "O32". Sie legt alternative Registernamen fest und wie diese Register bzgl Funktionsparameterübergabe, Wertrückgabe, Stackbenutzung etc verwendet werden. Die oben verlinkte Befehlskurzreferenz beschreibt dies auch kurz. Der entsprechende Teil des Wikibuchs ist hier. Hier und da ist sicherlich noch mehr Information dazu zu finden. Wichtig ist: Die Register $at, $k0, $k1 fasst man am Besten gar nicht an. $at ist für ein temporäres, für den Assembler reserviertes Register, mit dem er Pseudo-Instruktionen übersetzen kann, die ein solches zusätzliches Register benötigen. $k0 und $k1 sind Register, die für den Kernel reserviert sind. Also, wenn man User-Land Code schreibt, hat man mit denen nix anzustellen. Die Register $s0 bis $s7 sind die, die man selbst zu sichern hat, weil die aufrufende Funktion Änderungen an diesen Registern nicht erwartet. Die Register $t0 bis $t9 sind die temporären Register, die eine aufgerufene Funktion einfach verändern darf. Die Register $a0, $a1, $a2 und $a3 speichern biszu vier Funktionsparameter. Der Rest wird dann über den Stack erledigt. Den Stack manipuliert man über den "stack pointer" $sp, wobei der Stack von "oben nach unten wächst". Das Register $ra speichert die Rücksprungadresse. Wenn man selbst Funktionen aufruft (oft per jal-Befehl), speichert man typischerweise die alte Rücksprungadresse sowie die alten $s?-Werte vom Aufrufer auf dem Stack, damit man sich selbst in $s? etwas merken kann.

Dateiendung, Assemblieren mit Präprozessor

Der oben verlinkten Dokumentation kann man entnehmen, dass man seine Assembler-Dateien eine Endung mit einem großen S spendieren solle. Das erlaubt, im Gegensatz zu Assembler-Dateien mit einem kleinen s als Endung die Verwendung des C-Präprozessors. Die von der Toolchain mitgelieferten Header-Dateien sind sogar teilweise dafür gedacht, in solche Assembler-Dateien eingefügt zu werden. So darf man z.B. den <xc.h>-Header einbinden. Dieser Header enthält unter anderem Makro-Definitionen, die es erlauben, die alternativen Registernamen ohne das Dollarzeichen zu verwenden oder eben auch die SFRs (special function registers) zu nutzen. Hier mal ein Beispiel, wie so etwas aussehen könnte:

	.text            # Text-Segment
	.globl dot32x16  # Symbol exportieren

# Funktion
#   int64_t dot32x16(int n, const int32_t x[], const int16_t y[]);
# mit Eingabe
#   a0 = n, die Dimension
#   a1 = Adresse des ersten Elements vom "x-Vektor"
#   a2 = Adresse des ersten Elements vom "y-Vektor"
# und erwarteter Ausgabe
#   v0 = niederwertiges Wort des Rueckgabewertes
#   v1 = hoeherwertiges Wort des Rueckgabewertes
# nach O32 mit Little-Endian-Konvention bzgl Aufteilung von
# 64-Bit-Werten auf zwei 32-Bit-Register.
	.ent dot32x16
dot32x16:
	mtlo  $zero              # LO = 0;
	mthi  $zero              # HI = 0;
	beqz  $a0, .L_loopEnd    # if (a0==0) goto .L_loopEnd;
.L_loopStart:
	lh    $t2, 0($a2)        # t2 = *(uint16_t*)(a2+0);
	lw    $t1, 0($a1)        # t1 = *( int32_t*)(a1+0);
	addiu $a0, $a0, -1       # a0--;
	addiu $a2, $a2,  2       # a2+=2;
	addiu $a1, $a1,  4       # a1+=4;
	madd  $t1, $t2           # HI::LO += t1*t2;
	bnez  $a0, .L_loopStart  # if (a0!=0) goto .L_loopStart;
.L_loopEnd:
	mflo  $v0                # v0 = LO;
	mfhi  $v1                # v1 = HI;
	jr    $ra                # goto ra (Ruecksprungadresse);
	.end dot32x16
 

(Diesen Code habe ich bisher nicht getestet, nur durch den Assembler gejagt. Er mag also falsch sein.)

Allerdings funktioniert die Verwendung der alternativen Namen auch ohne das Einbinden der Headerdatei. Nur dann muss den Namen das Dollarzeichen vorangestellt werden, also $v0 statt v0 beispielsweise.

Lokale Sprungmarken, die nicht als Symbole in der Objektdatei landen, kann man mit dem .L-Präfix erzeugen.

Das geübte Auge mag hier entdeckt haben, dass ich (sg) mich bei dem vorangegangenen Beispiel gar nicht um die Branch Delay Slots gekümmert habe, die das Nachvollziehen von MIPS32-Assembler etwas erschweren. So, wie ich das aktuell verstehe, ist das ein Feature des GNU Assemblers, der, wenn man ihm nicht explizit .set noreorder sagt, die Jumps automatisch gegebenenfalls vorverlegt oder ein Nop dahinter einfügt. Das, was der Assembler hier aus diesem Code macht, wird weiter unten gezeigt.

Kompilieren tut man das Ganze dann einfach mit dem C-Driver, also xc32-gcc und nicht xc32-as. Letzterer wird wahrscheinlich automatisch vom GCC aufgerufen, nachdem der Präprozessor seinen Dienst getan hat. Wenn man den Präprozessor nicht braucht, sollte es aber auch mit dem xc32-as direkt gehen. Allerdings sind die Optionen des xc32-as ganz anders. Ein "-c" zum Generieren der Objektdatei versteht das Ding nicht. Man muss ihm manuell sagen, wie die Objektdatei, die er erzeugen kann, heißen soll.

sebi@laptop ~/Documents/ccpp/pic32tests/audio-pwm-asmtest
$ xc32-gcc -c dot32x16.S

sebi@laptop ~/Documents/ccpp/pic32tests/audio-pwm-asmtest
$ xc32-objdump -d dot32x16.o

dot32x16.o:     file format elf32-tradlittlemips


Disassembly of section .text:

00000000 <dot32x16>:
   0:   00000013        mtlo    zero
   4:   10800008        beqz    a0,28 <dot32x16+0x28>
   8:   00000011        mthi    zero
   c:   84ca0000        lh      t2,0(a2)
  10:   8ca90000        lw      t1,0(a1)
  14:   2484ffff        addiu   a0,a0,-1
  18:   24c60002        addiu   a2,a2,2
  1c:   24a50004        addiu   a1,a1,4
  20:   1480fffa        bnez    a0,c <dot32x16+0xc>
  24:   712a0000        madd    t1,t2
  28:   00001012        mflo    v0
  2c:   03e00008        jr      ra
  30:   00001810        mfhi    v1
 

Man kann hier auch schön sehen, wie der Assembler die Jumps alle vorgezogen hat. In diesem Fall ist er sogar ohne weitere Nops ausgekommen. Das kommt auch ein bisschen darauf an, wie man seine Befehle selbst sortiert. Man sollte vielleicht beim Schreiben darauf achten, dass der Compiler einen Jump auch vorziehen kann. Wenn es ein bedinger Sprung ist, und die Bedingung direkt von der vorhergehenden Anweisung beeinflusst wird, wird der Assembler den Sprung natürlich nicht vorziehen sondern stattdessen ein Nop einfügen. Die Umordnungsregeln scheinen also recht einfach zu sein. Ich (sg) denke, man sollte dieses Feature auch ausnutzen, weil der aufgeschriebene Code dadurch leichter nachvollziehbar ist. Um Nops zu sparen muss man lediglich dafür sorgen, dass die Sprungbedingung nicht direkt vorher beeinflusst wird.

Alternativ kümmert man sich selbst um den Branch-Delay-Slot und teilt dies dem Assembler über ein .set noreorder mit.

Branch-Delay-Instruction wird nicht immer ausgeführt!

Ich habe gerade gelernt, dass die Anweisung hinter einem Sprung, die Branch-Delay-Instruction, nicht immer ausgeführt wird, wie ich zunächst dachte. Es gibt einige bedingte Sprungbefehle, die gegebenenfalls die im Branch-Delay-Slot stehende Anweisung rausschmeißen. Das Beispiel, was mir vorhin untergekommen ist, sieht so aus

 5c80ffec    bgtzl   a0, irgendwohin
 8ca20000    lw      v0, 0(a1)
 

Das ist ein Branch-on-Greater-Than-Zero-Likely. Die darauf folgende Anweisung liegt im "Branch-Delay-Slot". Diese wird aber nicht immer ausgeführt. Sie wird nur bei einem Sprung ausgeführt. Falls die Sprungbedingung nicht zutrifft, wird sie aus dem "Branch-Delay-Slot" rausgeschmissen und quasi ignoriert.

Komisch

Was ich komisch finde, ist, dass der xc32-gcc aus

 int mul42(int x)
 {
     return x*42;
 }
 

mit -O2 so etwas macht:

 00000000 <mul42>:

   /* x = x*6 ... */
    0:   00041040        sll     v0,a0,0x1   /* v = x << 1; */
    4:   000420c0        sll     a0,a0,0x3   /* x <<= 3;    */
    8:   00822023        subu    a0,a0,v0    /* x -= v;     */

   /* v = x*7 ... */
    c:   000410c0        sll     v0,a0,0x3   /* v = x << 3; */
   14:   00441023        subu    v0,v0,a0    /* v -= x;     */

   /* return v;   */
   10:   03e00008        jr      ra
                         nop
 

Sind drei Shifts und zwei Subtraktionen wirklich "optimaler" als eine einfache Multiplikation? Eigentlich nicht! Denn laut Doku kann die CPU eine solche Multiplikation in einem Taktzyklus erledigen. Was übersehe ich da nur? Weiß der GCC auch, wieviele Taktzyklen die CPU so für diverse Operationen benötigt? Gibt es da noch irgend etwas zur Pipeline, was ich hier nicht berücksichtige? Ist der Austausch zwischen Excecution Unit und der MDU (Multiply Divide Unit) irgendwie besonders teuer? Ich raff das nicht. Bitte erklärt es mir ...