package com.planet_ink.coffee_mud.Abilities.Languages;
import com.planet_ink.coffee_mud.Abilities.StdAbility;
import com.planet_ink.coffee_mud.core.interfaces.*;
import com.planet_ink.coffee_mud.core.*;
import com.planet_ink.coffee_mud.core.collections.*;
import com.planet_ink.coffee_mud.Abilities.Common.CommonSkill;
import com.planet_ink.coffee_mud.Abilities.interfaces.*;
import com.planet_ink.coffee_mud.Areas.interfaces.*;
import com.planet_ink.coffee_mud.Behaviors.interfaces.*;
import com.planet_ink.coffee_mud.CharClasses.interfaces.*;
import com.planet_ink.coffee_mud.Commands.interfaces.*;
import com.planet_ink.coffee_mud.Common.interfaces.*;
import com.planet_ink.coffee_mud.Exits.interfaces.*;
import com.planet_ink.coffee_mud.Items.interfaces.*;
import com.planet_ink.coffee_mud.Libraries.interfaces.*;
import com.planet_ink.coffee_mud.Locales.interfaces.*;
import com.planet_ink.coffee_mud.MOBS.interfaces.*;
import com.planet_ink.coffee_mud.Races.interfaces.*;
import java.util.*;
/*
Copyright 2008-2016 Bo Zimmerman
Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.
*/
@SuppressWarnings({"unchecked","rawtypes"})
public class StdLanguage extends StdAbility implements Language
{
@Override
public String ID()
{
return "StdLanguage";
}
private final static String localizedName = CMLib.lang().L("Languages");
@Override
public String name()
{
return localizedName;
}
@Override
public String writtenName()
{
return name();
}
private static final String[] triggerStrings = I(new String[] { "SPEAK" });
@Override
public String[] triggerStrings()
{
return triggerStrings;
}
@Override
public int abstractQuality()
{
return Ability.QUALITY_OK_SELF;
}
@Override
protected int canAffectCode()
{
return Ability.CAN_MOBS;
}
@Override
protected int canTargetCode()
{
return 0;
}
@Override
public boolean isAutoInvoked()
{
return true;
}
@Override
public boolean canBeUninvoked()
{
return false;
}
@Override
protected ExpertiseLibrary.SkillCostDefinition getRawTrainingCost()
{
return CMProps.getLangSkillGainCost(ID());
}
@Override
public int classificationCode()
{
return Ability.ACODE_LANGUAGE;
}
protected static final String CANCEL_WORD = "CANCEL";
private static Map<String, String> emptyHash = new Hashtable<String, String>();
private static List<String[]> emptyVector = new Vector<String[]>();
protected boolean spoken = false;
private final static String consonants = "bcdfghjklmnpqrstvwxz";
private final static String vowels = "aeiouy";
@Override
public boolean beingSpoken(String language)
{
return spoken;
}
@Override
public void setBeingSpoken(String language, boolean beingSpoken)
{
spoken = beingSpoken;
}
@Override
public Map<String, String> translationHash(String language)
{
return emptyHash;
}
@Override
public List<String[]> translationVector(String language)
{
return emptyVector;
}
@Override
public List<String> languagesSupported()
{
return new XVector(ID());
}
@Override
public boolean translatesLanguage(String language)
{
return ID().equalsIgnoreCase(language);
}
@Override
public int getProficiency(String language)
{
if (ID().equalsIgnoreCase(language))
return proficiency();
return 0;
}
@Override
public String displayText()
{
if(beingSpoken(ID()))
return "(Speaking "+name()+")";
return "";
}
protected String fixCase(String like,String make)
{
final StringBuffer s=new StringBuffer(make);
char lastLike=' ';
for(int x=0;x<make.length();x++)
{
if(x<like.length())
lastLike=like.charAt(x);
s.setCharAt(x,fixCase(lastLike,make.charAt(x)));
}
return s.toString();
}
protected char fixCase(char like,char make)
{
if(Character.isUpperCase(like))
return Character.toUpperCase(make);
return Character.toLowerCase(make);
}
@Override
public String translate(String language, String word)
{
if(translationHash(language).containsKey(word.toUpperCase()))
return fixCase(word,translationHash(language).get(word.toUpperCase()));
final MOB M=CMLib.players().getPlayer(word);
if(M!=null)
return word;
final List<String[]> translationVector=translationVector(language);
if(translationVector.size()>0)
{
String[] choices=null;
try
{
choices = translationVector.get(word.length() - 1);
}
catch (final Exception e)
{
}
if(choices==null)
choices=translationVector.get(translationVector.size()-1);
return choices[CMath.abs(word.toLowerCase().hashCode()) % choices.length];
}
return word;
}
protected int numChars(String words)
{
int num=0;
for(int i=0;i<words.length();i++)
{
if(Character.isLetter(words.charAt(i)))
num++;
}
return num;
}
public String messChars(String language, String words, int numToMess)
{
numToMess=numToMess/2;
if(numToMess==0)
return words;
final StringBuffer w=new StringBuffer(words);
while(numToMess>0)
{
final int x=CMLib.dice().roll(1,words.length(),-1);
final char c=words.charAt(x);
if(Character.isLetter(c))
{
if(vowels.indexOf(c)>=0)
w.setCharAt(x,fixCase(c,vowels.charAt(CMLib.dice().roll(1,vowels.length(),-1))));
else
w.setCharAt(x,fixCase(c,consonants.charAt(CMLib.dice().roll(1,consonants.length(),-1))));
numToMess--;
}
}
return w.toString();
}
public String scrambleAll(String language, String str, int numToMess)
{
final StringBuffer newStr=new StringBuffer("");
int start=0;
int end=0;
int state=-1;
while(start<=str.length())
{
char c='\0';
if(end>=str.length())
c=' ';
else
c=str.charAt(end);
switch(state)
{
case -1:
if(Character.isLetter(c))
{
state = 0;
end++;
}
else
{
newStr.append(c);
end++;
start = end;
}
break;
case 0:
if(Character.isLetter(c))
end++;
else
if(Character.isDigit(c))
{
newStr.append(str.substring(start, end + 1));
end++;
start = end;
state = 1;
}
else
{
newStr.append(translate(language, str.substring(start, end)) + c);
end++;
start = end;
state = -1;
}
break;
case 1:
if(Character.isLetterOrDigit(c))
{
newStr.append(c);
end++;
start = end;
}
else
{
newStr.append(c);
end++;
start = end;
state = -1;
}
break;
}
}
return newStr.toString();
}
protected Language getMyTranslator(String id, Physical P, Language winner)
{
if(P==null)
return winner;
for(final Enumeration<Ability> a=P.effects();a.hasMoreElements();)
{
final Ability A=a.nextElement();
if((A instanceof Language)
&& ((Language)A).translatesLanguage(id)
&& ((winner==null)
||((Language)A).getProficiency(id) > winner.getProficiency(id)))
{
winner = (Language)A;
}
}
return winner;
}
protected Language getAnyTranslator(String id, MOB mob)
{
Language winner = null;
winner = getMyTranslator(id,mob,winner);
winner = getMyTranslator(id,mob.location(),winner);
for(int i=0;i<mob.numItems();i++)
winner=getMyTranslator(id,mob.getItem(i),winner);
return winner;
}
protected boolean processSourceMessage(CMMsg msg, String str, int numToMess)
{
String smsg=CMStrings.getSayFromMessage(msg.sourceMessage());
if(smsg != null)
{
if(numToMess>0)
smsg=messChars(ID(),smsg,numToMess);
msg.modify(msg.source(),
msg.target(),
this,
msg.sourceCode(),
CMStrings.substituteSayInMessage(msg.sourceMessage(),smsg),
msg.targetCode(),
msg.targetMessage(),
msg.othersCode(),
msg.othersMessage());
}
return true;
}
protected boolean processNonSourceMessages(CMMsg msg, String str, int numToMess)
{
str=scrambleAll(ID(),str,numToMess);
msg.modify(msg.source(),
msg.target(),
this,
msg.sourceCode(),
msg.sourceMessage(),
msg.targetCode(),
CMStrings.substituteSayInMessage(msg.targetMessage(),str),
msg.othersCode(),
CMStrings.substituteSayInMessage(msg.othersMessage(),str));
return true;
}
protected boolean tryLinguisticWriting(CMMsg msg)
{
if(msg.target() instanceof Physical)
{
final Physical P = (Physical)msg.target();
for(final Enumeration<Ability> a=P.effects();a.hasMoreElements();)
{
final Ability A=a.nextElement();
if((A instanceof Language)&&(!A.ID().equals(ID())))
{
msg.source().tell(L("@x1 is already written in @x2 and can not have @x3 writing added.",P.name(msg.source()),A.name(),writtenName()));
return false;
}
}
}
return true;
}
@Override
public boolean okMessage(final Environmental myHost, final CMMsg msg)
{
if((affected instanceof MOB)
&&(beingSpoken(ID())))
{
if((msg.source()==affected)
&&(msg.sourceMessage()!=null)
&&(msg.tool()==null)
&&((msg.sourceMinor()==CMMsg.TYP_SPEAK)
||(msg.sourceMinor()==CMMsg.TYP_TELL)
||(CMath.bset(msg.sourceMajor(),CMMsg.MASK_CHANNEL))))
{
String str=CMStrings.getSayFromMessage(msg.othersMessage());
if(str==null)
str=CMStrings.getSayFromMessage(msg.targetMessage());
if(str!=null)
{
final int numToMess=(int)Math.round(CMath.mul(numChars(str),CMath.div(100-getProficiency(ID()),100)));
if(!processSourceMessage(msg, str, numToMess))
return false;
if(!processNonSourceMessages(msg,str,numToMess))
return false;
if(CMLib.flags().isAliveAwakeMobile((MOB)affected,true))
helpProficiency((MOB)affected, 0);
}
}
else
if((msg.sourceMinor()==CMMsg.TYP_WRITE)
&&(msg.source()==affected)
&&(msg.target() instanceof Item)
&&(((Item)msg.target()).isReadable())
&&(msg.targetMessage()!=null)
&&(msg.targetMessage().length()>0))
{
if(!tryLinguisticWriting(msg))
return false;
}
else
if((msg.target()==affected)&&(msg.source()!=affected))
{
switch(msg.targetMinor())
{
case CMMsg.TYP_ORDER:
case CMMsg.TYP_BUY:
case CMMsg.TYP_BID:
case CMMsg.TYP_SELL:
case CMMsg.TYP_LIST:
case CMMsg.TYP_VIEW:
case CMMsg.TYP_WITHDRAW:
case CMMsg.TYP_DEPOSIT:
{
// yes, this means that a mob speaking Common to a marketing player will get failed,
// however, remember that the LISTer language doesn't matter, only the responding (this) language.
// also, think about muds where there is no Common (an interesting mud!)
if((!CMSecurity.isAllowed(msg.source(),msg.source().location(),CMSecurity.SecFlag.ORDER))
&&(!CMSecurity.isAllowed(msg.source(),msg.source().location(),CMSecurity.SecFlag.CMDMOBS)||(!((MOB)msg.target()).isMonster()))
&&(!CMSecurity.isAllowed(msg.source(),msg.source().location(),CMSecurity.SecFlag.CMDROOMS)||(!((MOB)msg.target()).isMonster())))
{
final Language L;
if((msg.tool() instanceof Language)&&(msg.tool().ID().equals(ID())))
L=(Language)msg.tool();
else
L=getAnyTranslator(ID(),msg.source());
if((L==null)
||(!L.beingSpoken(ID()))
||((CMLib.dice().rollPercentage()*2)>(L.getProficiency(ID())+getProficiency(ID()))))
{
msg.setTargetCode(CMMsg.TYP_SPEAK);
msg.setSourceCode(CMMsg.TYP_SPEAK);
msg.setOthersCode(CMMsg.TYP_SPEAK);
String reply=null;
if((L==null)||(!L.beingSpoken(ID())))
reply="<S-NAME> <S-IS-ARE> speaking "+name()+" and <T-NAME> would not understand <S-HIM-HER>.";
else
reply="<T-NAME> <T-IS-ARE> having trouble understanding <S-YOUPOSS> pronunciation.";
msg.addTrailerMsg(CMClass.getMsg((MOB)msg.target(),msg.source(),null,CMMsg.MSG_OK_VISUAL,reply));
}
}
break;
}
default:
break;
}
}
}
return super.okMessage(myHost,msg);
}
private int numLanguagesKnown(MOB student)
{
int numLanguages=0;
if(student==null)
return Integer.MAX_VALUE;
final CharClass C=student.charStats().getCurrentClass();
final PairVector<String,Integer> culturalAbilitiesDV = student.baseCharStats().getMyRace().culturalAbilities();
final HashSet<String> culturalAbilities=new HashSet<String>();
for(int i=0;i<culturalAbilitiesDV.size();i++)
culturalAbilities.add(culturalAbilitiesDV.getFirst(i).toLowerCase());
for(int a=0;a<student.numAbilities();a++)
{
final Ability A=student.fetchAbility(a);
if(((A.classificationCode()&Ability.ALL_ACODES)==Ability.ACODE_LANGUAGE)
&&(!(A instanceof Common))
&&(!culturalAbilities.contains(A.ID())))
{
if((CMLib.ableMapper().getQualifyingLevel(C.ID(), false, A.ID())>=0)
||(culturalAbilities.contains(A.ID().toLowerCase())))
continue;
numLanguages++;
}
}
return numLanguages;
}
private int getMaxLanguages(final MOB student)
{
if(student==null)
return 0;
final CharClass C=student.charStats().getCurrentClass();
int maxLanguages = C.maxLanguages();
final PlayerStats pStats = student.playerStats();
if((pStats != null) && (maxLanguages < Integer.MAX_VALUE))
{
maxLanguages += pStats.getBonusLanguageLimits();
if(pStats.getAccount() != null)
maxLanguages += pStats.getAccount().getBonusLanguageLimits();
}
return maxLanguages;
}
@Override
public boolean canBeLearnedBy(MOB teacher, MOB student)
{
if(!super.canBeLearnedBy(teacher,student))
return false;
if(student==null)
return true;
final CharClass C=student.charStats().getCurrentClass();
final int maxLanguages = getMaxLanguages(student);
if(maxLanguages==0)
return true;
if(CMLib.ableMapper().getQualifyingLevel(C.ID(), false, ID())>=0)
return true;
final int numLanguages=numLanguagesKnown(student);
if((maxLanguages>0)&&(maxLanguages<=numLanguages))
{
teacher.tell(L("@x1 can not learn any more languages.",student.name()));
student.tell(L("You may only learn @x1 languages.",""+maxLanguages));
return false;
}
return true;
}
@Override
public void teach(MOB teacher, MOB student)
{
super.teach(teacher, student);
if((student!=null)&&(student.fetchAbility(ID())!=null))
{
final CharClass C=student.charStats().getCurrentClass();
final int maxLanguages = getMaxLanguages(student);
if(maxLanguages==0)
return;
if(CMLib.ableMapper().getQualifyingLevel(C.ID(), false, ID())>=0)
return;
final int numLanguages=numLanguagesKnown(student);
final int remaining = maxLanguages - numLanguages;
if(remaining<=0)
student.tell(L("@x1 may not learn any more languages.",student.name()));
else
if(remaining<Integer.MAX_VALUE/2)
student.tell(L("@x1 may learn @x2 more languages.",student.name(),""+remaining));
}
}
@Override
public boolean invoke(MOB mob, List<String> commands, Physical givenTarget, boolean auto, int asLevel)
{
if(!auto)
{
for(final Enumeration<Ability> a=mob.effects();a.hasMoreElements();)
{
final Ability A=a.nextElement();
if((A!=null)&&(A instanceof Language))
{
if(mob.isMonster())
A.setProficiency(100);
if(A.ID().equals(ID()))
((Language)A).setBeingSpoken(ID(),true);
else
((Language)A).setBeingSpoken(ID(),false);
}
}
isAnAutoEffect=false;
mob.tell(L("You are now speaking @x1.",name()));
}
else
setBeingSpoken(ID(),true);
return true;
}
protected boolean translateOthersMessage(CMMsg msg, String sourceWords)
{
if((msg.othersMessage()!=null)&&(msg.othersMessage().indexOf('\'')>0))
{
String otherMes=msg.othersMessage();
if(msg.target()!=null)
otherMes=CMLib.coffeeFilter().fullOutFilter(null,(MOB)affected,msg.source(),msg.target(),msg.tool(),otherMes,false);
msg.addTrailerMsg(CMClass.getMsg(msg.source(),affected,null,CMMsg.NO_EFFECT,null,msg.othersCode(),L("@x1 (translated from @x2)",CMStrings.substituteSayInMessage(otherMes,sourceWords),name()),CMMsg.NO_EFFECT,null));
return true;
}
return false;
}
protected boolean translateTargetMessage(CMMsg msg, String sourceWords)
{
if(msg.amITarget(affected)&&(msg.targetMessage()!=null))
{
String otherMes=msg.targetMessage();
if(msg.target()!=null)
otherMes=CMLib.coffeeFilter().fullOutFilter(null,(MOB)affected,msg.source(),msg.target(),msg.tool(),otherMes,false);
msg.addTrailerMsg(CMClass.getMsg(msg.source(),affected,null,CMMsg.NO_EFFECT,null,msg.targetCode(),L("@x1 (translated from @x2)",CMStrings.substituteSayInMessage(otherMes,sourceWords),name()),CMMsg.NO_EFFECT,null));
return true;
}
return false;
}
protected boolean translateChannelMessage(CMMsg msg, String sourceWords)
{
if(CMath.bset(msg.sourceMajor(),CMMsg.MASK_CHANNEL))
{
msg.addTrailerMsg(CMClass.getMsg(msg.source(),null,null,CMMsg.NO_EFFECT,CMMsg.NO_EFFECT,msg.othersCode(),L("@x1 (translated from @x2)",CMStrings.substituteSayInMessage(msg.othersMessage(),sourceWords),name())));
return true;
}
return false;
}
@Override
public void executeMsg(final Environmental myHost, final CMMsg msg)
{
super.executeMsg(myHost,msg);
if((affected instanceof MOB)
&&(!msg.amISource((MOB)affected))
&&((msg.sourceMinor()==CMMsg.TYP_SPEAK)
||(msg.sourceMinor()==CMMsg.TYP_TELL)
||(CMath.bset(msg.sourceMajor(),CMMsg.MASK_CHANNEL)))
&&(msg.sourceMessage()!=null)
&&(msg.tool() instanceof Language)
&&(msg.tool().ID().equals(ID())))
{
String str=CMStrings.getSayFromMessage(msg.sourceMessage());
if(str!=null)
{
final int numToMess=(int)Math.round(CMath.mul(numChars(str),CMath.div(100-getProficiency(ID()),100)));
if(numToMess>0)
str=messChars(ID(),str,numToMess);
if(!translateChannelMessage(msg,str))
{
if(!translateTargetMessage(msg,str))
translateOthersMessage(msg, str);
}
}
}
else
if((affected instanceof MOB)
&&(msg.source()==affected)
&&(beingSpoken(ID()))
&&(msg.target() instanceof Item)
&&(msg.sourceMinor()==CMMsg.TYP_WRITE)
&&(((Item)msg.target()).isReadable())
&&(msg.targetMessage()!=null)
&&(msg.targetMessage().length()>0))
{
final Item I = (Item)msg.target();
Ability L=null;
for(int i=I.numEffects()-1;i>=0;i--) // reverse enumeration
{
L=I.fetchEffect(i);
if(L instanceof Language)
{
I.delEffect(L);
break;
}
}
I.addNonUninvokableEffect((Ability)this.copyOf());
}
else
if((affected instanceof Item)
&&(!canBeUninvoked())
&&(msg.target()==affected)
&&(msg.targetMinor()==CMMsg.TYP_READ)
&&((msg.targetMessage()==null)||(!msg.targetMessage().equals(CANCEL_WORD)))
&&(!(affected instanceof LandTitle))
&&(CMLib.flags().canBeSeenBy(this,msg.source()))
&&(((Item)affected).isReadable())
&&(((Item)affected).readableText()!=null)
&&(((Item)affected).readableText().length()>0))
{
// first make sure the Item does not handle it,
// since THIS item is in another language.
msg.modify(msg.source(),
msg.target(),
msg.tool(),
msg.sourceCode(),
msg.sourceMessage(),
msg.targetCode(),
CANCEL_WORD,
msg.othersCode(),
msg.othersMessage());
final Language L=(Language)msg.source().fetchEffect(ID());
String str=((Item)affected).readableText();
if(str.startsWith("FILE=")
||str.startsWith("FILE="))
{
final StringBuffer buf=Resources.getFileResource(str.substring(5),true);
if((buf!=null)&&(buf.length()>0))
str=buf.toString();
else
str="";
}
int numToMess=numChars(str);
if(numToMess==0)
msg.source().tell(L("There is nothing written on @x1.",affected.name()));
else
{
if(L!=null)
numToMess=(int)Math.round(CMath.mul(numChars(str),CMath.div(100-L.getProficiency(ID()),100)));
final String original=messChars(ID(),str,numToMess);
str=scrambleAll(ID(),str,numToMess);
msg.source().tell(L("It says '@x1'",str));
if((L!=null)&&(!original.equals(str)))
msg.source().tell(L("It says '@x1' (translated from @x2).",original,L.writtenName()));
}
}
}
}
