src/modules.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  Inspire is copyright (C) 2002-2004 ChatSpike-Dev.
   6  *                       E-mail:
   7  *                <brain@chatspike.net>
   8  *                <Craig@chatspike.net>
   9  *
  10  * Written by Craig Edwards, Craig McLure, and others.
  11  * This program is free but copyrighted software; see
  12  *            the file COPYING for details.
  13  *
  14  * ---------------------------------------------------
  15  */
  16
  17 #include "inspircd.h"
  18 #include "inspircd_io.h"
  19 #include "inspircd_util.h"
  20 #include "inspircd_config.h"
  21 #include <unistd.h>
  22 #include <fcntl.h>
  23 #include <sys/errno.h>
  24 #include <sys/ioctl.h>
  25 #include <sys/utsname.h>
  26 #include <cstdio>
  27 #include <time.h>
  28 #include <string>
  29 #ifdef GCC3
  30 #include <ext/hash_map>
  31 #else
  32 #include <hash_map>
  33 #endif
  34 #include <map>
  35 #include <sstream>
  36 #include <vector>
  37 #include <errno.h>
  38 #include <deque>
  39 #include <errno.h>
  40 #include <unistd.h>
  41 #include <sched.h>
  42 #include "connection.h"
  43 #include "users.h"
  44 #include "servers.h"
  45 #include "ctables.h"
  46 #include "globals.h"
  47 #include "modules.h"
  48 #include "dynamic.h"
  49 #include "wildcard.h"
  50 #include "message.h"
  51 #include "mode.h"
  52 #include "xline.h"
  53 #include "commands.h"
  54
  55 #ifdef GCC3
  56 #define nspace __gnu_cxx
  57 #else
  58 #define nspace std
  59 #endif
  60
  61 using namespace std;
  62
  63 extern int MODCOUNT;
  64 extern std::vector<Module*> modules;
  65 extern std::vector<ircd_module*> factory;
  66
  67 extern int LogLevel;
  68 extern char ServerName[MAXBUF];
  69 extern char Network[MAXBUF];
  70 extern char ServerDesc[MAXBUF];
  71 extern char AdminName[MAXBUF];
  72 extern char AdminEmail[MAXBUF];
  73 extern char AdminNick[MAXBUF];
  74 extern char diepass[MAXBUF];
  75 extern char restartpass[MAXBUF];
  76 extern char motd[MAXBUF];
  77 extern char rules[MAXBUF];
  78 extern char list[MAXBUF];
  79 extern char PrefixQuit[MAXBUF];
  80 extern char DieValue[MAXBUF];
  81
  82 extern int debugging;
  83 extern int WHOWAS_STALE;
  84 extern int WHOWAS_MAX;
  85 extern int DieDelay;
  86 extern time_t startup_time;
  87 extern int NetBufferSize;
  88 extern int MaxWhoResults;
  89 extern time_t nb_start;
  90
  91 extern std::vector<int> fd_reap;
  92 extern std::vector<std::string> module_names;
  93
  94 extern int boundPortCount;
  95 extern int portCount;
  96 extern int UDPportCount;
  97 extern int ports[MAXSOCKS];
  98 extern int defaultRoute;
  99
 100 extern std::vector<long> auth_cookies;
 101 extern std::stringstream config_f;
 102
 103 extern serverrec* me[32];
 104
 105 extern FILE *log_file;
 106
 107
 108 namespace nspace
 109 {
 110 #ifdef GCC34
 111         template<> struct hash<in_addr>
 112 #else
 113         template<> struct nspace::hash<in_addr>
 114 #endif
 115         {
 116                 size_t operator()(const struct in_addr &a) const
 117                 {
 118                         size_t q;
 119                         memcpy(&q,&a,sizeof(size_t));
 120                         return q;
 121                 }
 122         };
 123 #ifdef GCC34
 124         template<> struct hash<string>
 125 #else
 126         template<> struct nspace::hash<string>
 127 #endif
 128         {
 129                 size_t operator()(const string &s) const
 130                 {
 131                         char a[MAXBUF];
 132                         static struct hash<const char *> strhash;
 133                         strlcpy(a,s.c_str(),MAXBUF);
 134                         strlower(a);
 135                         return strhash(a);
 136                 }
 137         };
 138 }
 139
 140 struct StrHashComp
 141 {
 142
 143         bool operator()(const string& s1, const string& s2) const
 144         {
 145                 char a[MAXBUF],b[MAXBUF];
 146                 strlcpy(a,s1.c_str(),MAXBUF);
 147                 strlcpy(b,s2.c_str(),MAXBUF);
 148                 return (strcasecmp(a,b) == 0);
 149         }
 150
 151 };
 152
 153 struct InAddr_HashComp
 154 {
 155
 156         bool operator()(const in_addr &s1, const in_addr &s2) const
 157         {
 158                 size_t q;
 159                 size_t p;
 160
 161                 memcpy(&q,&s1,sizeof(size_t));
 162                 memcpy(&p,&s2,sizeof(size_t));
 163
 164                 return (q == p);
 165         }
 166
 167 };
 168
 169
 170 typedef nspace::hash_map<std::string, userrec*, nspace::hash<string>, StrHashComp> user_hash;
 171 typedef nspace::hash_map<std::string, chanrec*, nspace::hash<string>, StrHashComp> chan_hash;
 172 typedef nspace::hash_map<in_addr,string*, nspace::hash<in_addr>, InAddr_HashComp> address_cache;
 173 typedef std::deque<command_t> command_table;
 174
 175
 176 extern user_hash clientlist;
 177 extern chan_hash chanlist;
 178 extern user_hash whowas;
 179 extern command_table cmdlist;
 180 extern file_cache MOTD;
 181 extern file_cache RULES;
 182 extern address_cache IP;
 183
 184
 185 // class type for holding an extended mode character - internal to core
 186
 187 class ExtMode : public classbase
 188 {
 189 public:
 190         char modechar;
 191         int type;
 192         int params_when_on;
 193         int params_when_off;
 194         bool needsoper;
 195         bool list;
 196         ExtMode(char mc, int ty, bool oper, int p_on, int p_off) : modechar(mc), type(ty), needsoper(oper), params_when_on(p_on), params_when_off(p_off) { };
 197 };
 198
 199 typedef std::vector<ExtMode> ExtModeList;
 200 typedef ExtModeList::iterator ExtModeListIter;
 201
 202
 203 ExtModeList EMode;
 204
 205 // returns true if an extended mode character is in use
 206 bool ModeDefined(char modechar, int type)
 207 {
 208         log(DEBUG,"Size of extmodes vector is %d",EMode.size());
 209         for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++)
 210         {
 211                 if ((i->modechar == modechar) && (i->type == type))
 212                 {
 213                         return true;
 214                 }
 215         }
 216         return false;
 217 }
 218
 219 bool ModeIsListMode(char modechar, int type)
 220 {
 221         log(DEBUG,"Size of extmodes vector is %d",EMode.size());
 222         for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++)
 223         {
 224                 if ((i->modechar == modechar) && (i->type == type) && (i->list == true))
 225                 {
 226                         return true;
 227                 }
 228         }
 229         return false;
 230 }
 231
 232 bool ModeDefinedOper(char modechar, int type)
 233 {
 234         log(DEBUG,"Size of extmodes vector is %d",EMode.size());
 235         for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++)
 236         {
 237                 if ((i->modechar == modechar) && (i->type == type) && (i->needsoper == true))
 238                 {
 239                         return true;
 240                 }
 241         }
 242         return false;
 243 }
 244
 245 // returns number of parameters for a custom mode when it is switched on
 246 int ModeDefinedOn(char modechar, int type)
 247 {
 248         for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++)
 249         {
 250                 if ((i->modechar == modechar) && (i->type == type))
 251                 {
 252                         return i->params_when_on;
 253                 }
 254         }
 255         return 0;
 256 }
 257
 258 // returns number of parameters for a custom mode when it is switched on
 259 int ModeDefinedOff(char modechar, int type)
 260 {
 261         for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++)
 262         {
 263                 if ((i->modechar == modechar) && (i->type == type))
 264                 {
 265                         return i->params_when_off;
 266                 }
 267         }
 268         return 0;
 269 }
 270
 271 // returns true if an extended mode character is in use
 272 bool DoAddExtendedMode(char modechar, int type, bool requires_oper, int params_on, int params_off)
 273 {
 274         if (ModeDefined(modechar,type)) {
 275                 return false;
 276         }
 277         EMode.push_back(ExtMode(modechar,type,requires_oper,params_on,params_off));
 278         return true;
 279 }
 280
 281 // turns a mode into a listmode
 282 void ModeMakeList(char modechar)
 283 {
 284         for (ExtModeListIter i = EMode.begin(); i < EMode.end(); i++)
 285         {
 286                 if ((i->modechar == modechar) && (i->type == MT_CHANNEL))
 287                 {
 288                         i->list = true;
 289                         return;
 290                 }
 291         }
 292         return;
 293 }
 294
 295 // version is a simple class for holding a modules version number
 296
 297 Version::Version(int major, int minor, int revision, int build) : Major(major), Minor(minor), Revision(revision), Build(build) { };
 298
 299 // admin is a simple class for holding a server's administrative info
 300
 301 Admin::Admin(std::string name, std::string email, std::string nick) : Name(name), Email(email), Nick(nick) { };
 302
 303 Module::Module() { }
 304 Module::~Module() { }
 305 void Module::OnUserConnect(userrec* user) { }
 306 void Module::OnUserQuit(userrec* user) { }
 307 void Module::OnUserJoin(userrec* user, chanrec* channel) { }
 308 void Module::OnUserPart(userrec* user, chanrec* channel) { }
 309 void Module::OnPacketTransmit(char *p) { }
 310 void Module::OnPacketReceive(char *p) { }
 311 void Module::OnRehash() { }
 312 void Module::OnServerRaw(std::string &raw, bool inbound, userrec* user) { }
 313 int Module::OnUserPreJoin(userrec* user, chanrec* chan, const char* cname) { return 0; }
 314 int Module::OnExtendedMode(userrec* user, void* target, char modechar, int type, bool mode_on, string_list &params) { return false; }
 315 Version Module::GetVersion() { return Version(1,0,0,0); }
 316 void Module::OnOper(userrec* user) { };
 317 void Module::OnInfo(userrec* user) { };
 318 void Module::OnWhois(userrec* source, userrec* dest) { };
 319 int Module::OnUserPreInvite(userrec* source,userrec* dest,chanrec* channel) { return 0; };
 320 int Module::OnUserPreMessage(userrec* user,void* dest,int target_type, std::string &text) { return 0; };
 321 int Module::OnUserPreNotice(userrec* user,void* dest,int target_type, std::string &text) { return 0; };
 322 int Module::OnUserPreNick(userrec* user, std::string newnick) { return 0; };
 323 int Module::OnAccessCheck(userrec* source,userrec* dest,chanrec* channel,int access_type) { return ACR_DEFAULT; };
 324 string_list Module::OnUserSync(userrec* user) { string_list empty; return empty; }
 325 string_list Module::OnChannelSync(chanrec* chan) { string_list empty; return empty; }
 326
 327
 328 // server is a wrapper class that provides methods to all of the C-style
 329 // exports in the core
 330 //
 331
 332 Server::Server()
 333 {
 334 }
 335
 336 Server::~Server()
 337 {
 338 }
 339
 340 void Server::SendOpers(std::string s)
 341 {
 342         WriteOpers("%s",s.c_str());
 343 }
 344
 345 bool Server::MatchText(std::string sliteral, std::string spattern)
 346 {
 347         char literal[MAXBUF],pattern[MAXBUF];
 348         strlcpy(literal,sliteral.c_str(),MAXBUF);
 349         strlcpy(pattern,spattern.c_str(),MAXBUF);
 350         return match(literal,pattern);
 351 }
 352
 353 void Server::SendToModeMask(std::string modes, int flags, std::string text)
 354 {
 355         WriteMode(modes.c_str(),flags,"%s",text.c_str());
 356 }
 357
 358 chanrec* Server::JoinUserToChannel(userrec* user, std::string cname, std::string key)
 359 {
 360         return add_channel(user,cname.c_str(),key.c_str(),true);
 361 }
 362
 363 chanrec* Server::PartUserFromChannel(userrec* user, std::string cname, std::string reason)
 364 {
 365         return del_channel(user,cname.c_str(),reason.c_str(),false);
 366 }
 367
 368 chanuserlist Server::GetUsers(chanrec* chan)
 369 {
 370         chanuserlist userl;
 371         userl.clear();
 372         for (user_hash::const_iterator i = clientlist.begin(); i != clientlist.end(); i++)
 373         {
 374                 if (i->second)
 375                 {
 376                         if (has_channel(i->second,chan))
 377                         {
 378                                 if (isnick(i->second->nick))
 379                                 {
 380                                         userl.push_back(i->second);
 381                                 }
 382                         }
 383                 }
 384         }
 385         return userl;
 386 }
 387 void Server::ChangeUserNick(userrec* user, std::string nickname)
 388 {
 389         force_nickchange(user,nickname.c_str());
 390 }
 391
 392 void Server::QuitUser(userrec* user, std::string reason)
 393 {
 394         send_network_quit(user->nick,reason.c_str());
 395         kill_link(user,reason.c_str());
 396 }
 397
 398 bool Server::IsUlined(std::string server)
 399 {
 400         return is_uline(server.c_str());
 401 }
 402
 403 void Server::CallCommandHandler(std::string commandname, char** parameters, int pcnt, userrec* user)
 404 {
 405         call_handler(commandname.c_str(),parameters,pcnt,user);
 406 }
 407
 408 void Server::Log(int level, std::string s)
 409 {
 410         log(level,"%s",s.c_str());
 411 }
 412
 413 void Server::AddCommand(char* cmd, handlerfunc f, char flags, int minparams)
 414 {
 415         createcommand(cmd,f,flags,minparams);
 416 }
 417
 418 void Server::SendMode(char **parameters, int pcnt, userrec *user)
 419 {
 420         server_mode(parameters,pcnt,user);
 421 }
 422
 423 void Server::Send(int Socket, std::string s)
 424 {
 425         Write(Socket,"%s",s.c_str());
 426 }
 427
 428 void Server::SendServ(int Socket, std::string s)
 429 {
 430         WriteServ(Socket,"%s",s.c_str());
 431 }
 432
 433 void Server::SendFrom(int Socket, userrec* User, std::string s)
 434 {
 435         WriteFrom(Socket,User,"%s",s.c_str());
 436 }
 437
 438 void Server::SendTo(userrec* Source, userrec* Dest, std::string s)
 439 {
 440         if (!Source)
 441         {
 442                 // if source is NULL, then the message originates from the local server
 443                 Write(Dest->fd,":%s %s",this->GetServerName().c_str(),s.c_str());
 444         }
 445         else
 446         {
 447                 // otherwise it comes from the user specified
 448                 WriteTo(Source,Dest,"%s",s.c_str());
 449         }
 450 }
 451
 452 void Server::SendChannel(userrec* User, chanrec* Channel, std::string s,bool IncludeSender)
 453 {
 454         if (IncludeSender)
 455         {
 456                 WriteChannel(Channel,User,"%s",s.c_str());
 457         }
 458         else
 459         {
 460                 ChanExceptSender(Channel,User,"%s",s.c_str());
 461         }
 462 }
 463
 464 bool Server::CommonChannels(userrec* u1, userrec* u2)
 465 {
 466         return (common_channels(u1,u2) != 0);
 467 }
 468
 469 void Server::SendCommon(userrec* User, std::string text,bool IncludeSender)
 470 {
 471         if (IncludeSender)
 472         {
 473                 WriteCommon(User,"%s",text.c_str());
 474         }
 475         else
 476         {
 477                 WriteCommonExcept(User,"%s",text.c_str());
 478         }
 479 }
 480
 481 void Server::SendWallops(userrec* User, std::string text)
 482 {
 483         WriteWallOps(User,false,"%s",text.c_str());
 484 }
 485
 486 void Server::ChangeHost(userrec* user, std::string host)
 487 {
 488         ChangeDisplayedHost(user,host.c_str());
 489 }
 490
 491 void Server::ChangeGECOS(userrec* user, std::string gecos)
 492 {
 493         ChangeName(user,gecos.c_str());
 494 }
 495
 496 bool Server::IsNick(std::string nick)
 497 {
 498         return (isnick(nick.c_str()) != 0);
 499 }
 500
 501 userrec* Server::FindNick(std::string nick)
 502 {
 503         return Find(nick);
 504 }
 505
 506 chanrec* Server::FindChannel(std::string channel)
 507 {
 508         return FindChan(channel.c_str());
 509 }
 510
 511 std::string Server::ChanMode(userrec* User, chanrec* Chan)
 512 {
 513         return cmode(User,Chan);
 514 }
 515
 516 bool Server::IsOnChannel(userrec* User, chanrec* Chan)
 517 {
 518         return has_channel(User,Chan);
 519 }
 520
 521 std::string Server::GetServerName()
 522 {
 523         return getservername();
 524 }
 525
 526 std::string Server::GetNetworkName()
 527 {
 528         return getnetworkname();
 529 }
 530
 531 Admin Server::GetAdmin()
 532 {
 533         return Admin(getadminname(),getadminemail(),getadminnick());
 534 }
 535
 536
 537
 538 bool Server::AddExtendedMode(char modechar, int type, bool requires_oper, int params_when_on, int params_when_off)
 539 {
 540         if (type == MT_SERVER)
 541         {
 542                 log(DEBUG,"*** API ERROR *** Modes of type MT_SERVER are reserved for future expansion");
 543                 return false;
 544         }
 545         if (((params_when_on>0) || (params_when_off>0)) && (type == MT_CLIENT))
 546         {
 547                 log(DEBUG,"*** API ERROR *** Parameters on MT_CLIENT modes are not supported");
 548                 return false;
 549         }
 550         if ((params_when_on>1) || (params_when_off>1))
 551         {
 552                 log(DEBUG,"*** API ERROR *** More than one parameter for an MT_CHANNEL mode is not yet supported");
 553                 return false;
 554         }
 555         return DoAddExtendedMode(modechar,type,requires_oper,params_when_on,params_when_off);
 556 }
 557
 558 bool Server::AddExtendedListMode(char modechar)
 559 {
 560         bool res = DoAddExtendedMode(modechar,MT_CHANNEL,false,1,1);
 561         if (res)
 562                 ModeMakeList(modechar);
 563         return res;
 564 }
 565
 566 int Server::CountUsers(chanrec* c)
 567 {
 568         return usercount(c);
 569 }
 570
 571
 572 ConfigReader::ConfigReader()
 573 {
 574         this->cache = new std::stringstream(std::stringstream::in | std::stringstream::out);
 575         this->errorlog = new std::stringstream(std::stringstream::in | std::stringstream::out);
 576         this->readerror = LoadConf(CONFIG_FILE,this->cache,this->errorlog);
 577         if (!this->readerror)
 578                 this->error = CONF_FILE_NOT_FOUND;
 579 }
 580
 581
 582 ConfigReader::~ConfigReader()
 583 {
 584         if (this->cache)
 585                 delete this->cache;
 586         if (this->errorlog)
 587                 delete this->errorlog;
 588 }
 589
 590
 591 ConfigReader::ConfigReader(std::string filename)
 592 {
 593         this->cache = new std::stringstream(std::stringstream::in | std::stringstream::out);
 594         this->errorlog = new std::stringstream(std::stringstream::in | std::stringstream::out);
 595         this->readerror = LoadConf(filename.c_str(),this->cache,this->errorlog);
 596         if (!this->readerror)
 597                 this->error = CONF_FILE_NOT_FOUND;
 598 };
 599
 600 std::string ConfigReader::ReadValue(std::string tag, std::string name, int index)
 601 {
 602         char val[MAXBUF];
 603         char t[MAXBUF];
 604         char n[MAXBUF];
 605         strlcpy(t,tag.c_str(),MAXBUF);
 606         strlcpy(n,name.c_str(),MAXBUF);
 607         int res = ReadConf(cache,t,n,index,val);
 608         if (!res)
 609         {
 610                 this->error = CONF_VALUE_NOT_FOUND;
 611                 return "";
 612         }
 613         return std::string(val);
 614 }
 615
 616 bool ConfigReader::ReadFlag(std::string tag, std::string name, int index)
 617 {
 618         char val[MAXBUF];
 619         char t[MAXBUF];
 620         char n[MAXBUF];
 621         strlcpy(t,tag.c_str(),MAXBUF);
 622         strlcpy(n,name.c_str(),MAXBUF);
 623         int res = ReadConf(cache,t,n,index,val);
 624         if (!res)
 625         {
 626                 this->error = CONF_VALUE_NOT_FOUND;
 627                 return false;
 628         }
 629         std::string s = val;
 630         return ((s == "yes") || (s == "YES") || (s == "true") || (s == "TRUE") || (s == "1"));
 631 }
 632
 633 long ConfigReader::ReadInteger(std::string tag, std::string name, int index, bool needs_unsigned)
 634 {
 635         char val[MAXBUF];
 636         char t[MAXBUF];
 637         char n[MAXBUF];
 638         strlcpy(t,tag.c_str(),MAXBUF);
 639         strlcpy(n,name.c_str(),MAXBUF);
 640         int res = ReadConf(cache,t,n,index,val);
 641         if (!res)
 642         {
 643                 this->error = CONF_VALUE_NOT_FOUND;
 644                 return 0;
 645         }
 646         for (int i = 0; i < strlen(val); i++)
 647         {
 648                 if (!isdigit(val[i]))
 649                 {
 650                         this->error = CONF_NOT_A_NUMBER;
 651                         return 0;
 652                 }
 653         }
 654         if ((needs_unsigned) && (atoi(val)<0))
 655         {
 656                 this->error = CONF_NOT_UNSIGNED;
 657                 return 0;
 658         }
 659         return atoi(val);
 660 }
 661
 662 long ConfigReader::GetError()
 663 {
 664         long olderr = this->error;
 665         this->error = 0;
 666         return olderr;
 667 }
 668
 669 void ConfigReader::DumpErrors(bool bail, userrec* user)
 670 {
 671         if (bail)
 672         {
 673                 printf("There were errors in your configuration:\n%s",errorlog->str().c_str());
 674                 exit(0);
 675         }
 676         else
 677         {
 678                 char dataline[1024];
 679                 if (user)
 680                 {
 681                         WriteServ(user->fd,"NOTICE %s :There were errors in the configuration file:",user->nick);
 682                         while (!errorlog->eof())
 683                         {
 684                                 errorlog->getline(dataline,1024);
 685                                 WriteServ(user->fd,"NOTICE %s :%s",user->nick,dataline);
 686                         }
 687                 }
 688                 else
 689                 {
 690                         WriteOpers("There were errors in the configuration file:",user->nick);
 691                         while (!errorlog->eof())
 692                         {
 693                                 errorlog->getline(dataline,1024);
 694                                 WriteOpers(dataline);
 695                         }
 696                 }
 697                 return;
 698         }
 699 }
 700
 701
 702 int ConfigReader::Enumerate(std::string tag)
 703 {
 704         return EnumConf(cache,tag.c_str());
 705 }
 706
 707 int ConfigReader::EnumerateValues(std::string tag, int index)
 708 {
 709         return EnumValues(cache, tag.c_str(), index);
 710 }
 711
 712 bool ConfigReader::Verify()
 713 {
 714         return this->readerror;
 715 }
 716
 717
 718 FileReader::FileReader(std::string filename)
 719 {
 720         file_cache c;
 721         readfile(c,filename.c_str());
 722         this->fc = c;
 723 }
 724
 725 FileReader::FileReader()
 726 {
 727 }
 728
 729 void FileReader::LoadFile(std::string filename)
 730 {
 731         file_cache c;
 732         readfile(c,filename.c_str());
 733         this->fc = c;
 734 }
 735
 736
 737 FileReader::~FileReader()
 738 {
 739 }
 740
 741 bool FileReader::Exists()
 742 {
 743         if (fc.size() == 0)
 744         {
 745                 return(false);
 746         }
 747         else
 748         {
 749                 return(true);
 750         }
 751 }
 752
 753 std::string FileReader::GetLine(int x)
 754 {
 755         if ((x<0) || (x>fc.size()))
 756                 return "";
 757         return fc[x];
 758 }
 759
 760 int FileReader::FileSize()
 761 {
 762         return fc.size();
 763 }
 764
 765
 766 std::vector<Module*> modules(255);
 767 std::vector<ircd_module*> factory(255);
 768
 769 int MODCOUNT  = -1;
 770
 771