Ziele Untersuchung
mit Columbo Integrität von
Datenbanken Interaktion und
Portierbarkeit Ergonomie der
Schnittstellen

Angebot Produkte Projekt Beratung

Mittel Analytik Modellierung Sprachen Algebra Logik Hardware Thinking Intellekt

Zusammenhänge Gesellschaft Wirtschaft Branche Firma


products/sources/formale Sprachen/C/Lyx/src/

Quellcode-Bibliothek

^© Kompilation durch diese Firma

[Weder Korrektheit noch Funktionsfähigkeit der Software werden zugesichert.]

Datei: subterm.pvs Sprache: C

Original von: Lyx^©

#include <config.h>

#include <stdio.h>

#ifdef __GNUG__
#pragma implementation "trans.h"
#endif

#include "LyXView.h"
#include "trans.h"
#include "filetools.h"
#include "tex-strings.h"
#include "lyxlex.h"
#include "error.h"
#include "trans_mgr.h"

// KmodInfo
KmodInfo::KmodInfo()
{
exception_list=NULL;
}

KmodInfo::KmodInfo(const KmodInfo& o)
{
(*this)=o;
}

KmodInfo& KmodInfo::operator=(const KmodInfo& o)
{
if (this!=&o) {
  allowed=o.allowed;
  accent=o.accent;
  data=o.data;
  exception_list=o.exception_list;
}

return *this;
}


// Default Trans
bool DefaultTrans::init_=false;

DefaultTrans::DefaultTrans()
{
if (init_==false) {
  // Do initialization
  init_=true;
}
}

LString DefaultTrans::process(char c,TransManager& k)
{
char dummy[2]="?";
dummy[0]=c;

return k.normalkey(c,dummy);
}

// Trans class

Trans::Trans()
{
int i;

for(i=0; i<256; i++)
  keymap_[i]=NULL;

for(i=0; i<TEX_MAX_ACCENT+1; i++)
  kmod_list_[i]=0;
}

Trans::~Trans()
{
FreeKeymap();
}

void Trans::InsertException(Trans::keyexc& exclist, char c,
       const LString& data,bool flag,tex_accent accent)
{
keyexc p;

p = new Keyexc;
p -> next = exclist;
p -> c = c;

p->data = data;
p->combined=flag;
p->accent=accent;

exclist = p;
}

void Trans::FreeException(Trans::keyexc& exclist)
{
Trans::keyexc p;

p = exclist;
while (p) {
  p = exclist->next;
  delete exclist;
  exclist = p;
}
}

void Trans::FreeKeymap()
{
int i;

for(i=0; i<256; i++)
  if (keymap_[i]) {
   delete keymap_[i];
   keymap_[i]=NULL;
  }
for(i=0; i<TEX_MAX_ACCENT+1; i++)
  if (kmod_list_[i]) {
   FreeException(kmod_list_[i]->exception_list);
   delete kmod_list_[i];
   kmod_list_[i]=0;
  }
}

bool Trans::IsDefined()
{
return !name_.empty();
}

const LString& Trans::GetName()
{
return name_;
}

enum _kmaptags {
KCOMB=1,
KMOD,
KMAP,
KXMOD,
K_LAST
};

struct keyword_item kmapTags[K_LAST-1] = {
{"\\kcomb",KCOMB },
{ "\\kmap", KMAP },
{ "\\kmod", KMOD },
{ "\\kxmod", KXMOD }
};

tex_accent getkeymod(const LString&);

void Trans::AddDeadkey(tex_accent accent,const LString& keys,
         const LString& allowed)
{
if (kmod_list_[accent]) {
  FreeException(kmod_list_[accent]->exception_list);

  delete kmod_list_[accent];
}

kmod_list_[accent] = new kmod_list_decl;
kmod_list_[accent]->data = keys;
kmod_list_[accent]->accent = accent;
if (allowed=="all") {
  kmod_list_[accent]->allowed=lyx_accent_table[accent].native;
} else {
  kmod_list_[accent]->allowed = allowed;
}

for(int i=0;i<keys.length();i++) {
  char *temp;
  temp=keymap_[(unsigned char)keys[i]]=new char[2];
  temp[0]=0; temp[1]=accent;
}
kmod_list_[accent]->exception_list=NULL;
}

int Trans::Load(LyXLex &lex)
{
bool error = false;

while (lex.IsOK() && !error) {
  switch(lex.lex()) {
  case KMOD:
  {
   if (lyxerr.debugging(Error::KBMAP))
    fprintf(stderr,"KMOD: %s\n",lex.text());
   if (lex.next(true)) {
    if (lyxerr.debugging(Error::KBMAP))
     fprintf(stderr, "key `%s'\n", lex.text());
   } else
    return -1;

   LString keys = lex.GetString();

   if (lex.next(true)) {
    if ( lyxerr.debugging(Error::KBMAP))
     fprintf(stderr, "accent `%s'\n", lex.text());
   } else
    return -1;

   tex_accent accent = getkeymod(lex.GetString());

   if (accent==TEX_NOACCENT)
    return -1;

   if (lex.next(true)) {
    if (lyxerr.debugging(Error::KBMAP))
     fprintf(stderr,
      "allowed `%s'\n",
      lex.text());
   } else
    return -1;

   LString allowed = lex.GetString();

   AddDeadkey(accent, keys, allowed);
   break;
  }
  case KCOMB: {
   const char *str;

   lyxerr.debug("KCOMB:",Error::KBMAP);
   if (lex.next(true)) {
    str=lex.text();
    lyxerr.debug(str,Error::KBMAP);
   } else
    return -1;

   tex_accent accent_1=getkeymod(str);
   if (accent_1==TEX_NOACCENT) return -1;

   if (lex.next(true)) {
    str=lex.text();
    lyxerr.debug(str,Error::KBMAP);
   } else
    return -1;

   tex_accent accent_2=getkeymod(str);
   if (accent_2==TEX_NOACCENT) return -1;

   if (kmod_list_[accent_1]==NULL || kmod_list_[accent_2]==NULL)
    return -1;

   // Find what key accent_2 is on - should check about accent_1 also
   int key;

   for(key=0;key<256;key++)
    if (keymap_[key] && keymap_[key][0]==0 && keymap_[key][1]==accent_2)
     break;

   LString allowed;

   if (lex.next()) {
    allowed=lex.GetString();
    lyxerr.debug("allowed: "+allowed,Error::KBMAP);
   } else
    return -1;

   InsertException(kmod_list_[accent_1]->exception_list,(char)key,allowed,true,accent_2);
  }
  break;
  case KMAP: {
   char key_from;
   char *string_to;

   if (lyxerr.debugging(Error::KBMAP))
    fprintf(stderr, "KMAP: %s\n", lex.text());
   if (lex.next(true)) {
    key_from=lex.text()[0];
    if (lyxerr.debugging(Error::KBMAP))
     fprintf(stderr, " `%s'\n", lex.text());
   } else
    return -1;

   if (lex.next(true)) {
    char const *t = lex.text();
    string_to = strcpy(new char[strlen(t)+1],t);
    keymap_[(unsigned char)key_from]=string_to;
    if (lyxerr.debugging(Error::KBMAP))
     fprintf(stderr, " `%s'\n", string_to);
   } else
    return -1;

   break;
  }
  case KXMOD: {
   tex_accent accent;
   char key;
   const char *str;

   if (lyxerr.debugging(Error::KBMAP))
    fprintf(stderr, "KXMOD: %s\n", lex.text());
   if (lex.next(true)) {
    if (lyxerr.debugging(Error::KBMAP))
     fprintf(stderr, " `%s'\n", lex.text());
    accent = getkeymod(lex.GetString());
   } else
    return -1;

   if (lex.next(true)) {
    if (lyxerr.debugging(Error::KBMAP))
     fprintf(stderr, " `%s'\n", lex.text());
    key=lex.text()[0];
   } else
    return -1;

   if (lex.next(true)) {
    if (lyxerr.debugging(Error::KBMAP))
     fprintf(stderr, " `%s'\n", lex.text());
    str=lex.text();
   } else
    return -1;

   InsertException(kmod_list_[accent]->exception_list,key,str);
   break;
  }
  case LyXLex::LEX_FEOF:
   lyxerr.debug("End of parsing",Error::LEX_PARSER);
   break;
  default:
   lex.printError("ParseKeymapFile: "
           "Unknown tag: `$$Token'");
   return -1;
  }
}
return 0;
}

bool Trans::isAccentDefined(tex_accent accent,KmodInfo& i)
{
if (kmod_list_[accent]!=NULL) {
  i=*kmod_list_[accent];
  return true;
}
return false;
}

LString Trans::process(char c,TransManager& k)
{
char dummy[2]="?";
char *dt=dummy;
char *t=Match(c);


if ((t==NULL && (*dt=c)) || (t[0]!=0 && (dt=t)) ){
  return k.normalkey(c,dt);
} else {
  return k.deadkey(c,*kmod_list_[(tex_accent)t[1]]);
}
}

int Trans::Load(LString const &language)
{
LString filename = LibFileSearch("kbd", language, "kmap");
if (filename.empty())
  return -1;

FreeKeymap();
LyXLex lex(kmapTags, K_LAST-1);
lex.setFile(filename);

int res=Load(lex);

if (res==0) {
  name_=language;
} else
  name_.clean();

return res;
}

tex_accent getkeymod(LString const &p)
/* return modifier - decoded from p and update p */
{
for (int i = 1; i <= TEX_MAX_ACCENT; i++) {
  if (lyxerr.debugging(Error::KBMAP))
   fprintf(stderr,
    "p = %s, lyx_accent_table[%d].name = `%s'\n",
    p.c_str(), i, lyx_accent_table[i].name);

  if ( lyx_accent_table[i].name && p.contains(lyx_accent_table[i].name)) {
   lyxerr.debug("Found it!",Error::KBMAP);
   return (tex_accent)i;
  }
}
return TEX_NOACCENT;
}

¤ Dauer der Verarbeitung: 1.97 Sekunden (vorverarbeitet) ¤

Download des Quellennavigators
Download des sprechenden Kalenders
in der Quellcodebibliothek suchen

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.