Tekst źródłowy strony Programowanie: Parsowanie zawartości zmiennej środowiskowej

[[SpartaDOS X]] jest jednym z nielicznych DOS-ów pozwalających przekazywać parametry do wywoływanego programu (patrz rozdział 5 [http://sdx.atari8.info/index.php?show=en_docs podręcznika programowania]). Niestety, rozmiar linii poleceń ograniczony jest wewnętrznie do 64 znaków. Jeśli pisany program pozwala na użycie przełączników konfigurujących jego działanie, wtedy rychło okazać się może, że linia poleceń jest za krótka i część parametrów po prostu zostanie obcięta.
Przykładowo

<pre>SIDPLAYH /V PAL /O EVIE /A $D2C0 /R /F LINEAR /T 10:23 A:&gt;MUSIC&gt;SID&gt;LAST 6
</pre>

będzie widziane przez SDX jako

<pre>SIDPLAYH /V PAL /O EVIE /A $D2C0 /R /F LINEAR /T 10:23 A:&gt;MUSIC&gt;SID&gt;
</pre>

Ponieważ SDX jest też jedynym DOS-em pozwalającym na używanie zmiennych środowiskowych (patrz rozdział 7 [http://sdx.atari8.info/index.php?show=en_docs podręcznika programowania]), to problem ten można obejść definiując zmienną środowiskową, w której zostaną umieszczone często występujące parametry, np.

<pre>SET SIDPLAYH=/O EVIE /A $D2C0 /R /F LINEAR
</pre>

i przetwarzać je zanim jeszcze przejdziemy do interpretacji parametrów w linii poleceń. Wywołanie programu może już wtedy wyglądać tak:

<pre>SIDPLAYH /V PAL /T 10:23 A:&gt;MUSIC&gt;SID&gt;LAST 6
</pre>

Szkopuł polega jednak na tym, że użyteczne procedury U_GETADR, U_SLASH, U_GETNUM, U_TOKEN i inne parsują wyłącznie zawartość bufora linii poleceń.

Można jednak przekonać DOS-a, że przetwarza wiersz komend, podczas gdy faktycznie rzeczone procedury operować będą na zawartości zmiennej środowiskowej. Aby tego dokonać, należy:

1. Zachować zawartość bufora linii poleceń LBUF i offset aktualnie przetwarzanego parametru BUFOFF w buforze tymczasowym.

<pre>  ldy #64
  lda BUFOFF
  sta store,y
?copy:
  dey
  lda LBUF,y
  sta store,y
  tya
  bne ?copy

store .ds 64+1
</pre>

2. Pobrać zmienną środowiskową.

<pre>  lda ?envad
  ldx ?envad+1
  jsr GETENV
  bmi ?noenv   ;nie ma - należy więc odtworzyć zawartość linii poleceń (patrz p.5)

?envad .dw ?env
?env .db 'SIDPLAYH',$9B
</pre>

3. Przepisać ją z bufora liczb zmiennoprzecinkowych (BUF580 = $580) do LBUF zerując offset przetwarzanego parametru.

<pre>  ldy #64
?copy:
  dey
  lda BUF580,y
  sta LBUF,y
  tya
  bne ?copy
  sty BUFOFF
</pre>

4. Używać do woli U_GETADR, U_SLASH i innych wraz z całym dobrodziejstwem inwentarza ustawiając wartości zmiennych programu.

5. Po wszystkim odtworzyć bufor linii poleceń i indeks przetwarzanego parametru.

<pre>  ldy #64
  lda store,y
  sta BUFOFF
?copy:
  dey
  lda store,y
  sta LBUF,y
  tya
  bne ?copy
</pre>

6. Używać do woli U_GETADR, U_SLASH i reszty ale tym razem do przetworzenia parametrów przekazanych w wierszu komend.

Jak wspomniano wcześniej, zarówno zawartość zmiennej środowiskowej, jak i linii poleceń można przetwarzać '''tą samą procedurą'''.

'''UWAGA!''' Należy zwrócić uwagę, iż rozmiar zmiennej środowiskowej ograniczony jest przez rozmiar bufora poleceń również do 64 znaków (łącznie ze znakiem końca linii).

== Uwagi ==

Podobny przykład przedstawiony został w rozdziale 18.1 [http://sdx.atari8.info/index.php?show=en_docs podręcznika programowania].

[[Kategoria:Programowanie Atari 8-bit]]
[[Kategoria:Niezbędnik kodera]]