[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Gibt es eigentlich eine Möglichkeit sowas über das System zu konvertieren?

---

Zitat:

---

Oder muß man es doch selbst über Tabellen lösen? Also Konvertieren zum "normalen" ansehn.

---

Ein etwas genauere Problembeschreibung wäre hilfreich

Die codesets.library konvertiert zwischen diversen Code-Tabellen (ISO-8859-#?, AmigaPL, Amiga-1251, KOI8-R, UTF-8):

http://aminet.net/package/util/libs/codesets
--
Gutjahrs Amiga Seiten

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Also die Codeset.lib sieht recht gut aus. Ich hab mir mal die Beschreibung durchgelesen(nunja, nur die entsprechenden Befehle die ich brauchen werden und das sind genau zwei ) und somit sieht die Sache für mich recht einfach aus.

Aber dennoch, wie immer, gibt es da für mich ein kleines Problem:
Ich schreib ja leider als noch in MaxonBasic und muß also erst mal ein paar Dateien konvertieren. Eine bmap-Datei konnte ich bereits aus der .fd-Datei konvertieren. Eine .bd-Datei ist auch kein großes Problem, allerdings macht mir die .bc-Datei mit den Konstanten doch große Probleme. Ich hab die entsprechende Stelle mit den Konstanten bei der codeset.lib gefunden (include/library/codesets.h), allerdings komme ich da nicht so ganz klar was da die eigentlich Werte dastellen sollen :
Z.b.

code:

---

#define CODESETSLIB_TAG(n)     ((ULONG)0xfec901f4+(n))

#define CSA_Base                CODESETSLIB_TAG(0)

#define CSA_SourceLen           CODESETSLIB_TAG(1)
#define CSA_Source              CODESETSLIB_TAG(2)
#define CSA_Dest                CODESETSLIB_TAG(3)
#define CSA_DestLen             CODESETSLIB_TAG(4)
#define CSA_DestHook            CODESETSLIB_TAG(5)
#define CSA_DestLenPtr          CODESETSLIB_TAG(6)
#define CSA_SourceCodeset       CODESETSLIB_TAG(7)
#define CSA_Pool                CODESETSLIB_TAG(8)
#define CSA_PoolSem             CODESETSLIB_TAG(9)
#define CSA_AllocIfNeeded       CODESETSLIB_TAG(10)
#define CSA_Save                CODESETSLIB_TAG(11)
#define CSA_FallbackToDefault   CODESETSLIB_TAG(12)
#define CSA_DestCodeset         CODESETSLIB_TAG(13)
#define CSA_CodesetDir          CODESETSLIB_TAG(14)
#define CSA_CodesetFile         CODESETSLIB_TAG(15)
#define CSA_CodesetList         CODESETSLIB_TAG(16)
#define CSA_FreeCodesets        CODESETSLIB_TAG(17)
#define CSA_CodesetFamily       CODESETSLIB_TAG(18)
#define CSA_ErrPtr              CODESETSLIB_TAG(19)

#define CSA_B64SourceString     CODESETSLIB_TAG(20)
#define CSA_B64SourceLen        CODESETSLIB_TAG(21)
#define CSA_B64SourceFile       CODESETSLIB_TAG(22)
#define CSA_B64DestPtr          CODESETSLIB_TAG(23)
#define CSA_B64DestFile         CODESETSLIB_TAG(24)
#define CSA_B64MaxLineLen       CODESETSLIB_TAG(25)
#define CSA_B64Unix             CODESETSLIB_TAG(26)
#define CSA_B64FLG_NtCheckErr   CODESETSLIB_TAG(27)

---

[ - Antworten - Zitieren - Direktlink - ]

code:

---

srcCodeset&=CodesetsFindA&(SADD("ISO-8859-1"+CHR$(0)),NULL&)
dstCodeset&=CodesetsFindA&(SADD("Amiga-1251"+CHR$(0)),NULL&)

---

Er meint, es wären die falsche Anzahl an Parametern, aber irgendwie sollte das doch so stimmen, wenn ich die Doku verstanden habe.

Die Lib ist auch mit declare function CodeSetsFindA& library gekennzeichnet.

Ne Idee? Achja, wenn ich Spaßhalber einen parameter dazu gebe (z.b. 0), dann läuft der Compiler weiter... ja, mir ist schon klar... murkscompiler... jo.
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Frage: Wieso macht man das denn so kompliziert?

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Holger:

Zitat:

---

Original von Ralf27:
Frage: Wieso macht man das denn so kompliziert?

---

Jeder Programmierer nimmt nach und nach die Denkweise der Programmiersprache an, mit der er ständig arbeitet. Wenn diese also total verdreht und unnötig kompliziert ist, wird er mit der Zeit auch immer verdrehteren und unnötig verkomplizierten Code schreiben.

---

Ich denke, hier liegt das Problem eher bei der Makro-Wut von Unix-Codern und weniger bei der Programmiersprache an sich. Wer Teile eines oftmals in C entwickelten Programms mit (meist auch noch mehreren unterschiedlichen) Makro-Prozessoren erstellen läßt, kennts halt nicht anders und macht das dann überall so, auch da, wo es nicht angebracht ist. Willkommen in der schönen Welt der Ports und des Formalismus.

@Ralf: Schau Dir mal z.B. die Definition von Window-Tags an und vergleiche das mal mit der, die Du hier nicht so ganz verstanden hast. Im Groben ist das hier der gleiche "Mechanismus", nur aus Schreibfaulheit etwas verkürzt und mit Makro-Parametern "gewürzt".

Das ist also keine Funktion im herkömmlichen Sinn da ganz am Anfang sondern ein Präprozessor-Makro mit Parameter, aus dem dann die weiteren Tag-Definitionen entstehen.

Setz einfach in Gedanken bei jedem Tag statt "CODESETSLIB_TAG" "((ULONG)0xfec901f4+(n))" ein und bau in die "Rechnung" den Parameter aus der Klammer hinter CODESETSLIB_TAG ein und Du solltest verstehen, was da passiert.

Nichts anderes macht der Präprozessor des C-Compilers auch, und zwar bei jedem Auftreten von CODESETSLIB_TAG im Quelltext, egal wo (!). Da ersetzt er dann z.B. den Text CODESETSLIB_TAG(1) mit dem Text ((ULONG)0xfec901f4 + (1)), also simplem C-Code.

Grüße

--
---

µA1 PPC 750GX-800
A4000 PPC 604e-233

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

code:

---

srcCodeset&=CodesetsFindA&(SADD("ISO-8859-1"+CHR$(0)),NULL&)
 dstCodeset&=CodesetsFindA&(SADD("Amiga-1251"+CHR$(0)),NULL&)

---

[ - Antworten - Zitieren - Direktlink - ]

Hab eben denn Fehler gefunden. War ein peinlicher Fehler meinerseits: Variable falsch geschrieben... scr.. src...

Mir ist klar das andere Compiler das wohl bemerkt hätten...

Aber, jetzt läufts! *freu*
--
http://www.alternativercomputerclub.de.vu

[ Dieser Beitrag wurde von Ralf27 am 24.06.2007 um 11:15 Uhr geändert. ]

[ - Antworten - Zitieren - Direktlink - ]

code:

---

... ohne Anfang mit Libs, etc.
 
 scrCodeset&=CodesetsFindA&(SADD("ISO-8859-1"+CHR$(0)),NULL&)
 dstCodeset&=CodesetsFindA&(SADD("Amiga-1251"+CHR$(0)),NULL&)
 
 IF scrCodeset&=0 OR dstCodeset&=0 THEN
  PRINT"Problem beim Codeset"
 ELSE
  TAGLIST tagsl&,_
  CSA_SourceCodeset&, scrCodeset&,_
  CSA_DestCodeset&,   dstCodeset&,_
  CSA_Source&,        SADD(text$),_
  CSA_Len&,           LEN(text$),_
  TAG_DONE& 
  dst&=CodesetsConvertStrA&(tagsl&)
  IF dst& THEN PRINT PEEK$(dst&) ELSE PRINT "Fehler!!"
 END IF
 PRINT "Programm Ende"
Ende:
 IF dst& THEN CodesetsFreeA dst&, NULL&

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Aber der Text ist nach dem konvertieren noch der gleich?

Ich hatte vor Text von ISO-8859-1 nach Amiga-1251 zu konvertieren.

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

von "Amiga-1251" hab ich bislang nichts gehört

---

Zitat:

---

Aber der Text ist nach dem konvertieren noch der gleich?

Ich hatte vor Text von ISO-8859-1 nach Amiga-1251 zu konvertieren.

---

[ - Antworten - Zitieren - Direktlink - ]

code:

---

& # 252 ;

---

code:

---

& # 223 ;

---

code:

---

EXAMPLE
    To convert an ISO-8859-1 encoded string 'src' into an Amiga-1251
    equivalent 'dst' string:
    -- cut here --
    STRPTR src, dst;
    struct codeset *srcCodeset, *dstCodeset;

    srcCodeset = CodesetsFindA("ISO-8859-1", NULL);
    dstCodeset = CodesetsFindA("Amiga-1251", NULL);

    if((dst = CodesetsConvertStr(CSA_SourceCodeset, srcCodeset,
                                 CSA_DestCodeset,   dstCodeset,
                                 CSA_Source,        src,
                                 TAG_DONE)))
    {
      ....

      CodesetsFreeA(dst, NULL);
    }
    -- cut here --

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Mit Steuerzeichen meine ich z.b.

code:

---

& # 252 ;

---

oder

code:

---

& # 223 ;

---

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]