开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 模拟服务器 > 查看源码
char.c
资源名称：saac.tar.gz　[点击查看]
上传用户：qys8201
上传日期：2021-12-11
资源大小：978k
文件大小：26k
源码类别：

模拟服务器

开发平台：

C/C++

char.c：源码内容
  1. #define _CHAR_C_
  3. // Spock +1 2000/12/6
  4. #include <time.h>
  5. #include <stdio.h>
  6. #include <sys/types.h>
  7. #include <sys/stat.h>
  8. #include <fcntl.h>
  9. #include <unistd.h>
  11. #include "main.h"
  12. #include "char.h"
  13. #include "saacproto_serv.h"
  14. #include "util.h"
  16. // CoolFish: Family 2001/6/12
  17. #include "acfamily.h"
  18. #include "version.h"
  20. // Arminius 7.17 memory lock
  21. #include "lock.h"
  22. #include "recv.h"
  24. #ifdef _SASQL
  25. #include "sasql.h"
  26. #endif
  28. static void getCharNameFromString(char *str ,char *out );
  29. static void getCharOptionFromString( char *str , char *out );
  30. static void makeCharFileName( char *idstring ,char *output, int outlen,int num);
  31. // Nuke *1*1
  32. static int makeSaveCharString( char *out , int outlen ,
  33. char *nm , char *opt , char *info );
  34. static int findBlankCharIndex( char *id  );
  36. static int unlinkCharFile( char *id , int num );
  37. #ifdef _SLEEP_CHAR // 取得非活跃人物档名
  38. static void makeSleepCharFileName( char *id,char *output, int outlen, int num);
  39. static void makeSleepCharPoolItemFileName( char *id,char *output, int outlen);
  40. static void makeSleepCharPoolPetFileName( char *id,char *output, int outlen);
  41. static void makeCharPoolPetFileName( char *id,char *output, int outlen);
  42. #endif
  43. #ifdef _CHAR_POOLITEM
  44. static void makeCharPoolItemFileName( char *id,char *output, int outlen);
  45. #endif
  46. #define SPACE '|'
  47. #define SPACESTRING "|"
  49. #define IS_2BYTEWORD( _a_ ) ( (char)(0x80) <= (_a_) && (_a_) <= (char)(0xFF) )
  52. #define USERLOG( id , format, args...)    
  53. {
  54. char body[1000];
  55. char fn[1000];
  56. if(id[0]){
  57. snprintf( body ,sizeof(body), "%s.log.%d" , id ,get_rotate_count() );
  58. makeDirFilename( fn , sizeof(fn),logdir, getHash(id), body);
  59. LOGBASE( fn , "%u " , (unsigned int ) time(NULL) );
  60. LOGBASE( fn , format , ## args );
  61. }
  62. }
  64. #ifdef _ANGEL_SUMMON
  65. struct MissionTable missiontable[MAXMISSIONTABLE];
  66. #endif
  68. /*
  71. 仇及白央奶伙匹烂聒今木化中月楮醒反兮氏少  据毛勾井丹［
  74. char *c0 : ID
  75. char *c1 : Passwd  手丹  据允氏匹月井日银歹卅中
  76. char *c2 : Charname
  77. char *c3 : opt
  78. Spock fixed, opt change to process
  79. char *c3 : process
  80. char *c4 : 勾井歹氏
  81. int i0 : lock  
  82. int i1 : mesgid 
  83. */
  85. void charLoadCallback( int ti , int auth , char *c0, char* c1 ,
  86. char *c2 , char *c3, char *c4, int i0 , int i1 )
  87. {
  88. // Spock deleted 2000/11/2
  89. //static int process_id = 0;
  90. // CoolFish: Init charindex 2001/10/16
  91. #ifdef _NewSave
  92. int charindex = -1;
  93. #else
  94. int charindex;
  95. #endif
  96. char loadbuf[CHARDATASIZE];
  97. char infobuf[CHARDATASIZE];
  98. int lock = i0;
  99. char *process = c3;
  100. char *id = c0;
  101. char *passwd = c1;
  102. char *charname = c2;
  103. int mesgid = i1;
  105. char *deadline = c4;
  107. // Spock deleted 2000/11/2
  108. //process_id++;
  110. if( auth != 0 ){
  111. char data[100];
  113. snprintf( data,  sizeof( data ), "%d" , auth );
  114. #ifdef _NewSave
  115. saacproto_ACCharLoad_send( ti , FAILED , data, mesgid, charindex );
  116. #else
  117. saacproto_ACCharLoad_send( ti , FAILED , data, mesgid );
  118. #endif
  119. return;
  120. }
  121.     if( isLocked( id ) ){
  122. int process=atoi(c3);
  123. #ifdef _NewSave
  124. saacproto_ACCharLoad_send( ti , FAILED , "locked" , mesgid, charindex );
  125. #else
  126. saacproto_ACCharLoad_send( ti , FAILED , "locked" , mesgid );
  127. #endif
  128. DeleteMemLock(getHash(id) & 0xff, id, &process); // 如果AP无锁则AC解锁
  129. log("n (%s) AC同一星系重覆登入，踢人!! ", id );
  130. saacproto_ACKick_recv( ti, id, 1, -1); //踢人
  132. checkGSUCheck(id);
  133. return;
  134.     }
  136.     charindex = getCharIndexByName( id , charname );
  137. #ifdef _NewSave
  138.     //log("n档案装载序号:%d 账号:%s 名字:%sn", charindex, id, charname);
  139. #endif
  141.     if( charindex < 0 ){
  142. /* 平乓仿互绣箕仄卅中及匹巨仿□卅及分 */
  143. #ifdef _NewSave
  144. saacproto_ACCharLoad_send( ti , FAILED ,
  145. "char nonexistent" , mesgid , charindex );
  146. #else
  147. saacproto_ACCharLoad_send( ti , FAILED ,
  148. "char nonexistent" , mesgid );
  149. #endif
  150. return;
  151.     }
  154. //    log( "loadCharOne: id:[%s] char:[%s]n", id, charname );
  155.     
  156.     if( loadCharOne( id , charindex ,  loadbuf ,sizeof( loadbuf ))<0){
  157. #ifdef _NewSave
  158. saacproto_ACCharLoad_send( ti , FAILED ,
  159. "cannot load ( disk i/o error?)", mesgid, charindex );
  160. #else
  161. saacproto_ACCharLoad_send( ti , FAILED ,
  162. "cannot load ( disk i/o error?)", mesgid );
  163. #endif
  164. return;
  165.     }else{
  166. #ifdef _CHAR_POOLITEM
  167. checkCharPoolItem( id);
  168. #endif
  169. #ifdef _CHAR_POOLITEM
  170. checkCharPoolPet( id);
  171. #endif
  173. }
  174.     {//ttom
  175. char *c_ptr;
  176. c_ptr=loadbuf;
  177. while(*c_ptr!=''){
  178. if( IS_2BYTEWORD(*c_ptr) ){
  179. if(*(c_ptr+1)==' '){
  180. *(c_ptr+1)=0x41;
  181. }
  182. c_ptr++;
  183. if(*c_ptr=='') break;
  184. }
  185. c_ptr++;
  186. }
  187.     }//ttom
  189.     if( lock ){
  190. char result[100];
  191. char retdata[100];
  193. #ifdef _LOCK_ADD_NAME
  194. if( lockUser( getGSName(ti) , id , charname, passwd , 1 , result , sizeof( result ) ,
  195. retdata , sizeof( retdata ) , process , deadline) <0 ){
  196. #else
  197. // Spock 2000/11/2
  198. if( lockUser( getGSName(ti) , id , passwd , 1 , result , sizeof( result ) ,
  199. retdata , sizeof( retdata ) , process , deadline) <0 ){
  200. #endif
  201. saacproto_ACCharLoad_send( ti , FAILED, "lock FAIL!!" , mesgid , charindex );
  202. return;
  203. }
  204.     }
  205. memset( infobuf , 0 , sizeof( infobuf ));
  206. getCharInfoFromString( loadbuf , infobuf );
  207. makeStringFromEscaped( infobuf );
  208. #ifdef _NewSave
  209.     saacproto_ACCharLoad_send( ti ,  SUCCESSFUL , infobuf , mesgid, charindex );
  210. #else
  211.     saacproto_ACCharLoad_send( ti ,  SUCCESSFUL , infobuf , mesgid);
  212. #endif
  214. #ifdef _WAEI_KICK
  215. saacproto_ACKick_recv( ti, id, 10, -1); //踢其他星系
  216. #endif
  217. }
  219. #ifdef _NewSave
  220. int charSave( int ti ,  char *id , 
  221.  char *charname , char *opt , char *charinfo,
  222.  int unlock , int mesgid , int charindex)
  223. #else
  224. int charSave( int ti ,  char *id , 
  225.  char *charname , char *opt , char *charinfo,
  226.  int unlock , int mesgid )
  227. #endif
  228. {
  229. #ifdef _NewSave
  230. #else
  231. int charindex;
  232. #endif
  233. char savebuf[CHARDATASIZE];
  234. int ret = -1;
  237. memset(savebuf, 0, sizeof(savebuf));
  239. //andy_log
  240. if( strstr( charinfo, "DATAEND=") == NULL ){
  241. FILE *fp;
  242. if( (fp=fopen( "badpetstring.txt", "a+")) != NULL ){
  243. fprintf( fp, "%sn", charinfo);
  244. fclose( fp);
  245. }
  246. log( "err add batpetstring.txt:%s[%s] !n", id, charname);
  247. }
  249. if( unlock ){
  250. char result[100];
  251. char retdata[100];    
  252. #ifdef _LOCK_ADD_NAME    
  253. if( (ret = lockUser(  getGSName(ti), id , "" , "0" , 0 , result , sizeof( result ) ,
  254. retdata , sizeof( retdata ) , "0" , "0")) < 0 ){
  255. #else
  256. if( (ret = lockUser(  getGSName(ti), id , "0" , 0 , result , sizeof( result ) ,
  257. retdata , sizeof( retdata ) , "0" , "0")) < 0 ){
  258. #endif
  259. log( "解锁:%s 失败!!n", id);
  260. }
  261. }
  262. // Nuke *1 add escape
  263. if( makeSaveCharString( savebuf , sizeof( savebuf ) ,
  264. charname, opt , charinfo )<0){
  265. log("n AC存档:太长  ");
  266. saacproto_ACCharSave_send( ti , FAILED , "too long" , mesgid );
  267. // Spock fixed 2000/11/1
  268. return ret;
  269. }
  270. #ifdef _NewSave
  271. if (charindex == -1)
  272. charindex = getCharIndexByName( id , charname );
  273. #else
  274. // Nuke *1-
  275. charindex = getCharIndexByName( id , charname );
  276. #endif
  277. if( charindex < 0 ){
  278. int blankind = findBlankCharIndex( id );
  279. if( blankind < 0 ){
  280. log("n ACCharSave:char full  ");
  281. saacproto_ACCharSave_send( ti , FAILED , "char full" ,mesgid);
  282. return ret;
  283. } else {
  284. charindex = blankind;
  285. }
  286. }
  288. log( "账号:[%s] 人物:[%s]n", id, charname );
  289. if( saveCharOne( id , charindex , savebuf ) < 0 ){
  290. log("n ACCharSave:disk I/O error or a bug  ");
  291. saacproto_ACCharSave_send( ti , FAILED , "disk I/O error or a bug", mesgid );
  292. return ret;
  293. }
  295. saacproto_ACCharSave_send( ti ,  SUCCESSFUL , "" , mesgid);
  296. return ret;
  297. }
  299. void  charListCallback( int ti , int auth , char *c0 , char *c1 ,
  300.  char *c2 , char *c3 , char *c4 , int i0 , int i1 )
  301. {
  302. char listbuf[CHARDATASIZE];
  303. char *id = c0;
  304. int mesgid = i0;
  306. //log(" 档案列表回溯:%s:%d n", id, auth);
  308. if( auth != 0 ){
  309. char data[100];
  310. snprintf( data, sizeof( data ) , "%d" , auth );
  311. saacproto_ACCharList_send( ti , FAILED , data , mesgid );
  312. total_ng_charlist++;
  313. return;
  314. }
  315. // 取消下列 unlock 动作
  316.     if( isLocked( id ) ){
  317. saacproto_ACCharList_send( ti , FAILED , "locked" , mesgid );
  318. checkGSUCheck( id );
  319. total_ng_charlist++;
  320. return;
  321.     }
  322. #ifdef _SLEEP_CHAR // 如果无新档, 将旧档移至新档
  323. {
  324. char fn_old[256], fn_new[256];
  325. FILE *fp_old, *fp_new;
  326. int i;
  328. // 移人物档
  329. for( i=0; i<MAXCHAR_PER_USER; i++) {
  330. makeCharFileName( id, fn_new, sizeof(fn_new), i);
  331. fp_new = fopen( fn_new, "r");
  332. if( fp_new == NULL ) {
  333. makeSleepCharFileName( id, fn_old, sizeof(fn_old), i);
  334. fp_old = fopen( fn_old, "r");
  335. if( fp_old != NULL ) {
  336. fclose( fp_old);
  337. rename( fn_old, fn_new); // 搬移
  338. //filecopy( fn_old, fn_new); // 复制
  339. log(" 移档_%s ", fn_new);
  340. }
  341. }
  342. else {
  343. fclose( fp_new);
  344. }
  345. }
  347. // 移仓物品库档
  348. makeCharPoolItemFileName( id, fn_new, sizeof(fn_new));
  349. fp_new = fopen( fn_new, "r");
  350. if( fp_new == NULL ) {
  351. makeSleepCharPoolItemFileName( id, fn_old, sizeof(fn_old));
  352. fp_old = fopen( fn_old, "r");
  353. if( fp_old != NULL ) {
  354. fclose( fp_old);
  355. rename( fn_old, fn_new); // 搬移
  356. //filecopy( fn_old, fn_new); // 复制
  357. log(" 移档_%s ", fn_new);
  358. }
  359. }
  360. else {
  361. fclose( fp_new);
  362. }
  364. // 移仓宠物库档
  365. makeCharPoolPetFileName( id, fn_new, sizeof(fn_new));
  366. fp_new = fopen( fn_new, "r");
  367. if( fp_new == NULL ) {
  368. makeSleepCharPoolPetFileName( id, fn_old, sizeof(fn_old));
  369. fp_old = fopen( fn_old, "r");
  370. if( fp_old != NULL ) {
  371. fclose( fp_old);
  372. rename( fn_old, fn_new); // 搬移
  373. //filecopy( fn_old, fn_new); // 复制
  374. log(" 移档_%s ", fn_new);
  375. }
  376. }
  377. else {
  378. fclose( fp_new);
  379. }
  381. }
  382. #endif
  384.     loadCharNameAndOption( id , listbuf,sizeof(listbuf));
  385.     // Arminius
  386.     saacproto_ACCharList_send( ti ,  SUCCESSFUL , listbuf , mesgid);
  387.     total_ok_charlist++;
  388. }
  390. void charDeleteCallback( int ti , int auth ,
  391. char *c0 , char *c1 , char *c2 , char *c3 ,
  392. char *c4 , int i0 , int i1 )
  393. {
  394. int charindex;
  395. char *id = c0;
  396. char *charname = c2;
  397. int mesgid = i0;
  398. struct tm *now;
  399. time_t timenow;
  400. char logfile[128];
  402. if( auth != 0 ){
  403. char data[100];
  404. snprintf( data, sizeof( data ) , "%d" , auth );
  405. saacproto_ACCharDelete_send( ti , FAILED , data, mesgid );
  406. return;
  407. }        
  410. charindex = getCharIndexByName( id , charname );
  411. if( charindex < 0 ){
  412. saacproto_ACCharDelete_send( ti , FAILED , "nochar",  mesgid );
  413. return;
  414. }   
  415. if( unlinkCharFile( id , charindex ) < 0 ){
  416. saacproto_ACCharDelete_send( ti , FAILED , "fileI/O" , mesgid);
  417. return;
  418. }
  419. #ifdef _FAMILY
  420. // CoolFish: Family 2001/6/12
  421. {
  422. int index = 0, fmindex = 0, fmcharindex = 0;
  423. char fmname[32];
  424. index = ACgetFMInfoFromChar(fmname, &fmindex, charname, id, &fmcharindex);
  425. if (index != -1)
  426. {
  427. if (fmcharindex == 0)
  428. {
  429. #ifdef _FMVER21
  430. if (ChangeFMLeader(index, fmname, fmindex) >= 0)
  431. {
  432. if (ACDelFM(index, fmname, fmindex) >= 0)
  433. log("删除家族成员:%d 家族名:%s 家族索引:%d 人物:%s, 账号:%s, 家族人物索引:%dn",
  434. index, fmname, fmindex, charname, id, fmcharindex);
  435. }
  436. log("ChangeFMLeader_3 index:%d fmname:%s fmindex:%dn", index, fmname, fmindex);
  437. #else
  438. if (ACDelFM(index, fmname, fmindex) >= 0)
  439. log("删除家族成员:%d 家族名:%s 家族索引:%d 人物:%s, 账号:%s, 家族人物索引:%dn",
  440. index, fmname, fmindex, charname, id, fmcharindex);
  441. #endif
  442. }
  443. else 
  444. {
  445. #ifdef _FMVER21
  446. if (ACMemberLeaveFM(index, fmname, fmindex, charname, 0, 0, fmcharindex) >= 0)
  447. log("ACMemberLeaveFM index:%d 家族名:%s 家族索引:%d 人物:%s, 账号:%s, 家族人物索引:%dn",
  448. index, fmname, fmindex, charname, id, fmcharindex);
  449. #else
  450. if (ACMemberLeaveFM(index, fmname, fmindex, charname, 0, fmcharindex) >= 0)
  451. log("ACMemberLeaveFM index:%d 家族名:%s 家族索引:%d 人物:%s, 账号:%s, 家族人物索引:%dn",
  452. index, fmname, fmindex, charname, id, fmcharindex);
  453. #endif
  454. }
  455. }
  456. }
  457. #endif    
  458. // Spock 2000/12/6
  459. time( &timenow );
  460. now = localtime( &timenow );
  461. sprintf( logfile , "log/chardel/%04d%02d%02d.log" ,
  462. now->tm_year + 1900 , now->tm_mon + 1 , now->tm_mday );
  463. LOGBASE( logfile , "%04d/%02d/%02d %02d:%02d:%02d id:[%s] char:[%s] index:[%d]n" ,
  464. now->tm_year + 1900 , now->tm_mon + 1 , now->tm_mday ,
  465. now->tm_hour , now->tm_min , now->tm_sec ,
  466. id , charname , charindex );
  467. // Spock end
  468. USERLOG( id , "账号删除: 成功n" );
  469. saacproto_ACCharDelete_send( ti ,  SUCCESSFUL , "ok" , mesgid);
  470. }
  472. void dummyCallback( int ti , int auth ,
  473.  char *c0 , char *c1 , char *c2 , char *c3 ,
  474.  char *c4 , int i0 , int i1 )
  475. {
  476. return;
  477. }
  479. static void getCharNameFromString(char *str ,char *out )
  480. {
  481. int c;
  483. out[0]='';
  484. for(c=0;;c++){
  485. if( IS_2BYTEWORD( str[c] ) ){
  486. out[c] = str[c];
  487. c ++ ; // 戚及  侬尺
  488. out[c] = str[c];
  489. continue;
  490. }
  492. out[c] = str[c];
  493. if( str[c] == '' )break;
  495. if( str[c] == SPACE ){
  496. out[c] = '';
  497. break;
  498. }
  499. }
  500. }
  502. static void getCharOptionFromString( char *str , char *out )
  503. {
  504. int c;
  505. int outc = 0;
  506. out[outc] = '';
  507. for(c=0;;c++){
  508. if( str[c]=='')break;
  509. if( IS_2BYTEWORD( str[c] ) ){
  510. c++;
  511. if( str[c] == '' )break; // 公及  侬互允匹卞NULL卅日蔽  
  512. continue;
  513. }
  515. if( str[c]== SPACE ){
  516. c++;
  517. for(;;c++){
  519. if( str[c] == '' ){ // 蔽  分匀凶日 NULL   木化蔽歹月
  520. out[outc] = '';
  521. break;
  522. }
  524. // 仇仇手ㄡ田奶玄  侬及ㄠ田奶玄  卅日手丹域田奶玄戊疋□允月
  525. //----   For 2Byte Code ----
  526. if( IS_2BYTEWORD( str[c] ) ){
  527. out[outc++] = str[c++]; // ㄠ田奶玄  戊疋□
  528. out[outc++] = str[c]; // ㄡ田奶玄  戊疋□
  529. if( str[c] == '' )break; // 公及  侬互允匹卞NULL卅日蔽  
  530. continue;
  531. }
  533. // 骚橘  侬反ㄠ田奶玄戊疋□
  534. out[outc] = str[c]; // 引内戊疋□
  535. if( str[c] == '' )break; // 蔽  分匀凶日蔽歹月
  537. if( str[c] == SPACE ){
  538. out[outc] = '';
  539. break;
  540. }
  541. outc++;
  542. }
  543. return;
  544. }
  545. }
  546. }
  548. void getCharInfoFromString( char *str , char *out )
  549. {
  550. int c=0,outc=0;
  551. int space_counter=0;
  553. out[outc] = '';
  554. for(c=0;;c++){
  555. if( str[c]=='')break;
  556. if( IS_2BYTEWORD( str[c] ) ){
  557. c++;
  558. continue;
  559. }else
  560. if( str[c]== SPACE ){
  561. space_counter++;
  562. }
  563. if( space_counter==2 && str[c]== SPACE ){
  564. c++;
  565. for(;;c++){
  566. if( IS_2BYTEWORD( str[c] ) ){
  567. out[outc++] = str[c++];
  568. out[outc++] = str[c];
  569. if( str[c] == '' ){
  570. out[outc] = '';
  571. break;
  572. }
  573. continue;
  574. }
  576. out[outc] = str[c];
  577. if( str[c] == '' )break;
  578. if( str[c] == SPACE ){
  579. out[outc] = '';
  580. break;
  581. }
  582. outc++;
  583. }
  584. return;
  585. }
  586. }
  587. }
  589. static void makeCharFileName( char *id,char *output, int outlen, int num)
  590. {
  591. char body[1024];
  592. if ( strlen( id) < 1)return;
  594. snprintf(body , sizeof(body ) , "%s.%d.char" , id , num );
  595. makeDirFilename(output , outlen, chardir , getHash(id) ,body);
  596. }
  598. #ifdef _SLEEP_CHAR // 取得非活跃人物档名
  599. static void makeSleepCharFileName( char *id,char *output, int outlen, int num)
  600. {
  601. char body[1024];
  602. if ( strlen( id) < 1)return;
  604. snprintf(body , sizeof(body ) , "%s.%d.char" , id , num );
  605. makeDirFilename(output , outlen, sleepchardir , getHash(id) ,body);
  606. }
  607. #endif
  609. int loadCharNameAndOption( char *id , char *output , int outlen)
  610. {
  611. char chbuf[MAXCHAR_PER_USER][CHARDATASIZE];
  612. char namework[CHARDATASIZE];
  613. char optionwork[CHARDATASIZE];
  614. char nm_work[CHARDATASIZE];
  616. int i,count=0;
  617. int so_far_bytes = 0;
  618. output[0] = 0;
  620. for(i=0;i<MAXCHAR_PER_USER;i++){
  621. int l;
  622. char delim[2];
  624. chbuf[i][0] = 0;
  625. loadCharOne( id , i , chbuf[i] , sizeof( chbuf[i] ));
  627. getCharNameFromString( chbuf[i] , namework );
  628. getCharOptionFromString( chbuf[i] , optionwork );
  630. if( chbuf[i][0] == 0 )continue;
  631. if( strlen( output ) > 0 ){
  632. delim[0] = SPACE;
  633. delim[1] = 0;
  634. } else {
  635. delim[0] = 0;
  636. }
  638. snprintf( nm_work , sizeof( nm_work ),
  639. "%s%s|%s" , delim,namework , optionwork );
  640. l = strlen( nm_work );
  642. if( ( so_far_bytes + l ) < outlen ){
  643. strcat( output , nm_work );
  644. so_far_bytes += l;
  645. count++;
  646. }
  647. }
  649. return count;
  650. }
  652. int loadCharOne( char *id , int num, char *output , int outlen )
  653. {
  654. char fn[1024];
  655. FILE *fp;
  656. char c_temp,*c_ptr;
  657. c_ptr=output;
  659. makeCharFileName( id , fn , sizeof(fn),num );    
  660. fp  = fopen( fn , "r" );
  661. if( fp == NULL ){
  662. return -1;
  663. }
  665. do{
  666. c_temp = fgetc(fp);
  667. *c_ptr=c_temp;
  668. c_ptr++;
  669. }while(c_temp != EOF);
  670. *c_ptr='';
  672. if( output[0]=='|' && output[1]=='|' ){
  673. return -1;
  674. }
  675. fclose(fp);
  676. return 0;
  677. }
  679. int saveCharOne( char *id , int num , char *input )
  680. {
  681. char fn[1024];
  682. FILE *fp;
  683. char *strp;
  684. char *strp1;     // Won 修正 hp 为负的人
  686. makeCharFileName( id , fn , sizeof(fn),num );
  687. fp= fopen( fn , "w" );
  688. if( fp == NULL ) {
  689. log( "save error 01: %d",errno );//Change add errno
  690. return -1;
  691. }
  693. // Won 修正 hp 为负的人
  694. if ((strp=strstr(input,"\nhp=-"))!=NULL) {
  695. strp1=strstr(input,"\nmp="); 
  696. *(strp+5)='1';
  697. strcpy((strp+6), strp1);  
  698. }
  700. // Arminius
  701. if ((strp=strstr(input,"\nhp=0\n"))!=NULL) *(strp+5)='1';
  703. fprintf( fp , "%s" , input );
  704. fclose(fp);
  706. log( "写入 %s 档案文件:%sn",id , fn );
  707. chmod(fn,0777);
  708. return 0;
  710. }
  712. static int makeSaveCharString( char *out , int outlen ,
  713. char *nm , char *opt , char *info )
  714. {
  715. char nmwork[CHARDATASIZE];
  716. char optwork[CHARDATASIZE];
  717. char infowork[CHARDATASIZE];
  718. char outwork[CHARDATASIZE];
  719. char *nmwork_p , *optwork_p , *infowork_p;
  720. int l;
  722. /* 戊疋□仄化 */
  724. strncpy( nmwork , nm , sizeof( nmwork ));
  725. nmwork[strlen( nm)]=0;
  727. strncpy( optwork , opt , sizeof( optwork ));
  728. optwork[strlen(opt)]=0;
  730. strncpy( infowork , info , sizeof( infowork ));
  731. infowork[strlen(info)]=0;
  733. /* 巨旦弗□皿仄 */
  734. /*    if ( esc ) {
  735. nmwork_p = makeEscapeString1( nm , nmwork ,sizeof( nmwork ));
  736. optwork_p = makeEscapeString1( opt , optwork , sizeof( optwork ));
  737. infowork_p = makeEscapeString1( info , infowork , sizeof( infowork ));
  738. } else {*/
  740. nmwork_p = makeEscapeString( nm , nmwork ,sizeof( nmwork ));
  741. optwork_p = makeEscapeString( opt , optwork , sizeof( optwork ));
  742. infowork_p = makeEscapeString( info , infowork , sizeof( infowork ));
  744. //    }
  745. /* 勾卅仆月［赞中互巨仿□腹请及凶户卞域荚伐□弁卞中木月［ */
  746. snprintf( outwork ,sizeof( outwork ) ,
  747. "%s" SPACESTRING "%s" SPACESTRING "%s" ,
  748. nmwork_p , optwork_p , infowork_p );
  750. l = strlen( outwork );
  751. if( l >= (outlen-1)){
  752. return -1;
  753. }
  755. /* NULL   侬互    卞丐月井日0毛中木氏午中井氏及分［ */
  756. memcpy( out , outwork , l + 1);
  758. return 0;
  759. }
  761. int getCharIndexByName( char *id , char *charname )
  762. {
  763. int i;
  764. for(i=0;i<MAXCHAR_PER_USER;i++){
  765. char output[CHARDATASIZE];
  766. if( loadCharOne( id , i , output , sizeof( output )) < 0 ){
  767. /* 丐中化中月″ */
  768. continue;
  769. } else {
  770. /* 平乓仿互绣箕仄凶 */
  771. char cn[CHARDATASIZE];
  772. getCharNameFromString( output , cn );
  774. /* Escape毛荸仁 */
  775. if( strcmp( charname , makeStringFromEscaped(cn) ) == 0 ){
  776. return i;
  777. }else{
  778. }
  779. }
  780. }
  781. return -1;
  782. }
  784. /*
  786.   平乓仿及丐中化中月旦夫永玄毛腹绸允月
  788.   卅日丐中化中卅中［0动晓卅日丐五旦夫永玄及index.
  791. 签卞夫□玉匹五卅井匀凶日公木毛井尹允分仃［
  792. 手匀午切扎氏午匹五月支欠仃升手［
  794. */
  795. static int findBlankCharIndex( char *id  )
  796. {
  797. int i;
  798. char output[CHARDATASIZE];
  799. for(i=0;i<MAXCHAR_PER_USER;i++){
  800. if( loadCharOne( id , i , output , sizeof( output ) ) < 0 ){
  801. return i;
  802. }
  803. }
  804. return -1;
  805. }
  807. static int unlinkCharFile( char *id , int num )
  808. {
  809. char fname[1024];
  810. #ifdef _SLEEP_CHAR //删除人物时旧档也删
  811. makeSleepCharFileName( id, fname, sizeof(fname),num );
  812. unlink( fname );
  813. #endif
  814. makeCharFileName( id, fname, sizeof(fname),num );
  815. return unlink( fname );
  816. }
  818. #ifdef _LOCK_ADD_NAME
  819. int lockUser(  char *gmsvname , char *id , char *name, char *passwd , int lock , 
  820.  char *result, int resultlen,
  821.  char *retdata , int retdatalen , char *process , char *deadline)
  822. #else
  823. int lockUser(  char *gmsvname , char *id , char *passwd , int lock , 
  824.  char *result, int resultlen,
  825.  char *retdata , int retdatalen , char *process , char *deadline)
  826. #endif
  827. {
  828. char fname[1024];
  830. int ret = -1;
  833. if(!id[0]){
  834. snprintf(result , resultlen , FAILED);
  835. snprintf(retdata , retdatalen , "bad id");
  836. return -1;
  837. }
  839. retdata[0] = 0;
  841. if( lock ){
  842. if (isLocked(id)) {
  843. snprintf( result , resultlen, FAILED );
  844. snprintf( retdata , retdatalen, "already locked" );
  845. log( "写入内存信息: 用户:%x/%s 已经同意锁定 !!n", getHash(id), id);
  846. return -1;
  847. } else {
  848. #ifdef _LOCK_ADD_NAME
  849. if( InsertMemLock( getHash(id) & 0xff, id, name, passwd, gmsvname, atoi(process), deadline ) )
  850. #else
  851. if( InsertMemLock( getHash(id) & 0xff, id, passwd, gmsvname, atoi(process), deadline ) )
  852. #endif
  853. return 0;
  854. else
  855. return -1;
  856. }
  857. } else {
  858. if( !isLocked( id) ) {
  859. log( "删除内存信息: 用户:%x/%s 没有锁定!!n", getHash(id), id);
  860. }
  861. if( DeleteMemLock( getHash(id) & 0xff, id, &ret) ) {
  862. snprintf( result , resultlen, SUCCESSFUL );
  863. snprintf( retdata , retdatalen, "removed" );
  864. return ret;
  865. } else {
  866. snprintf( result , resultlen, FAILED );
  867. snprintf( retdata , retdatalen, "不能移除锁定" );
  869. log( "不能解锁 %x:%s !n", getHash(id), id);
  870. return ret;
  871. }
  872. }
  873. }
  875. int isLocked( char *id )
  876. {
  877. if (!id[0]) return 1; // invalid id: lock it
  878. return isMemLocked(getHash(id) & 0xff, id);
  879. }
  881. int checkValidCharName( char *a)
  882. {
  883. int i;
  884. for(i=0;;i++){
  885. if( a[i] == 0 )break;
  886. if( a[i] == SPACE )return -1;
  887. }
  888. return 0;
  889. }
  891. #ifdef _CHAR_POOLITEM
  892. static void makeCharPoolItemFileName( char *id,char *output, int outlen)
  893. {
  894. char poolitem[256];
  895. if ( strlen( id) < 1)return;
  896. snprintf( poolitem , sizeof( poolitem ) , "%s.item" , id);
  897. makeDirFilename(output , outlen, chardir , getHash(id) ,poolitem);
  898. }
  900. #ifdef _SLEEP_CHAR // 取得非活跃人物仓库档名
  901. static void makeSleepCharPoolItemFileName( char *id,char *output, int outlen)
  902. {
  903. char poolitem[256];
  904. if ( strlen( id) < 1)return;
  905. snprintf( poolitem , sizeof( poolitem ) , "%s.item" , id);
  906. makeDirFilename(output , outlen, sleepchardir , getHash(id) ,poolitem);
  907. }
  908. #endif
  910. int InsertCharPoolItem( char *id , char *input, int sizes)
  911. {
  912. char fn[256];
  913. FILE *fp;
  915. if( sizes <= 0 ) return sizes;
  916. makeCharPoolItemFileName( id , fn , sizeof(fn));
  918. fp= fopen( fn , "a+" );
  919. if( fp == NULL ) {
  920. fp= fopen( fn , "w" );
  921. if( fp == NULL ) {
  922. log( "保存 %s 错误.n", fn);
  923. return -1;
  924. }
  925. }
  927. fprintf( fp , "%s" , input );
  928. fclose(fp);
  930. log( "添加 %s 物品仓库文件:%sn", id , fn );
  931. return sizes;
  932. }
  934. int saveCharPoolItem( char *id , char *input, int sizes)
  935. {
  936. char fn[256];
  937. FILE *fp;
  939. if( sizes < 0 ) return sizes;
  940. if( input == NULL ) return -1;
  941. makeCharPoolItemFileName( id , fn , sizeof(fn));
  943. fp= fopen( fn , "w" );
  944. if( fp == NULL ) {
  945. log( "保存 %s 错误.n", fn);
  946. return -1;
  947. }
  949. fprintf( fp , "%s" , input );
  950. fclose(fp);
  952. log( "写入 %s 道具档案文件:%sn", id , fn );
  953. return sizes;
  954. }
  956. int loadCharPoolItemOne( char *id , char *output , int outlen)
  957. {
  958. char fn[256];
  959. FILE *fp;
  960.   char c_temp,*c_ptr;
  961. int sizes=0;
  962. c_ptr=output;
  964. makeCharPoolItemFileName( id , fn , sizeof(fn));
  966. fp  = fopen( fn , "r" );
  967. if( fp == NULL ){
  968. if( (fp = fopen( fn , "w" )) == NULL)
  969. return -1;
  970. return 0;
  971. }
  973. do{
  974. c_temp = fgetc(fp);
  975. *c_ptr=c_temp;
  976. c_ptr++;
  977.    sizes++;
  978.  if( sizes >= (outlen-1) ) break;
  979. }while(c_temp != EOF);
  980. *c_ptr='';
  981. fclose(fp);
  982. return sizes;
  983. }
  985. int checkCharPoolItem( char *id)
  986. {
  987. char fn[256];
  988. FILE *fp;
  990. makeCharPoolItemFileName( id , fn , sizeof(fn));
  991. fp = fopen( fn , "r" );
  992. if( fp == NULL ) {
  993. if( saveCharPoolItem( id , "", 0) < 0 ){
  994. log("n 无法建立档案:%s 物品仓库文件!!", id);
  995. return -1;
  996. }
  997. }else{
  998. fclose(fp);
  999. }
  1001. return 1;
  1002. }
  1003. #endif
  1006. #ifdef _CHAR_POOLPET
  1007. static void makeCharPoolPetFileName( char *id,char *output, int outlen)
  1008. {
  1009. char poolpet[256];
  1010. if ( strlen( id) < 1)return;
  1011. snprintf( poolpet , sizeof( poolpet ) , "%s.pet" , id);
  1012. makeDirFilename(output , outlen, chardir , getHash(id) ,poolpet);
  1013. }
  1015. #ifdef _SLEEP_CHAR // 取得非活跃人物仓库档名
  1016. static void makeSleepCharPoolPetFileName( char *id,char *output, int outlen)
  1017. {
  1018. char poolpet[256];
  1019. if ( strlen( id) < 1)return;
  1020. snprintf( poolpet , sizeof( poolpet ) , "%s.pet" , id);
  1021. makeDirFilename(output , outlen, sleepchardir , getHash(id) ,poolpet);
  1022. }
  1023. #endif
  1025. int InsertCharPoolPet( char *id , char *input, int sizes)
  1026. {
  1027. char fn[256];
  1028. FILE *fp;
  1030. if( sizes <= 0 ) return sizes;
  1031. makeCharPoolPetFileName( id , fn , sizeof(fn));
  1033. fp= fopen( fn , "a+" );
  1034. if( fp == NULL ) {
  1035. fp= fopen( fn , "w" );
  1036. if( fp == NULL ) {
  1037. log( "保存 %s 错误.n", fn);
  1038. return -1;
  1039. }
  1040. }
  1042. fprintf( fp , "%s" , input );
  1043. fclose(fp);
  1045. log( "添加 %s 宠物仓库文件:%sn", id , fn );
  1046. return sizes;
  1047. }
  1049. int saveCharPoolPet( char *id , char *input, int sizes)
  1050. {
  1051. char fn[256];
  1052. FILE *fp;
  1054. if( sizes < 0 ) return sizes;
  1055. if( input == NULL ) return -1;
  1056. makeCharPoolPetFileName( id , fn , sizeof(fn));
  1058. fp= fopen( fn , "w" );
  1059. if( fp == NULL ) {
  1060. log( "保存 %s 错误.n", fn);
  1061. return -1;
  1062. }
  1064. fprintf( fp , "%s" , input );
  1065. fclose(fp);
  1067. log( "写入 %s 宠物档案文件:%sn", id , fn );
  1068. return sizes;
  1069. }
  1071. int loadCharPoolPetOne( char *id , char *output , int outlen)
  1072. {
  1073. char fn[256];
  1074. FILE *fp;
  1076. char c_temp,*c_ptr;
  1077. int sizes=0;
  1078. c_ptr=output;
  1080. makeCharPoolPetFileName( id , fn , sizeof(fn));
  1082. fp  = fopen( fn , "r" );
  1083. if( fp == NULL ){
  1084. if( (fp = fopen( fn , "w" )) == NULL)
  1085. return -1;
  1086. return 0;
  1087. }
  1089. do{
  1090. c_temp = fgetc(fp);
  1091. *c_ptr=c_temp;
  1092. c_ptr++;
  1093.    sizes++;
  1094.  if( sizes >= (outlen-1) ) break;
  1095. }while(c_temp != EOF);
  1096. *c_ptr='';
  1097. fclose(fp);
  1098. return sizes;
  1099. }
  1101. int checkCharPoolPet( char *id)
  1102. {
  1103. char fn[256];
  1104. FILE *fp;
  1106. makeCharPoolPetFileName( id , fn , sizeof(fn));
  1107. fp = fopen( fn , "r" );
  1108. if( fp == NULL ) {
  1109. if( saveCharPoolPet( id , "", 0) < 0 ){
  1110. log("n 无法建立档案:%s 宠物仓库文件!!", id);
  1111. return -1;
  1112. }
  1113. }else{
  1114. fclose(fp);
  1115. }
  1117. return 1;
  1118. }
  1119. #endif
  1121. int filecopy( char *oldfilename, char *newfilename)
  1122. {
  1123. FILE *oldfile;
  1124. FILE *newfile;
  1125. char c_temp;
  1127. if( (oldfile = fopen( oldfilename, "r") ) == NULL ) {
  1128. return -1;
  1129. }
  1130. if( (newfile = fopen( newfilename, "w") ) == NULL ) {
  1131. return -1;
  1132. }
  1134. while(1) {
  1135. c_temp = fgetc( oldfile);
  1136. if( c_temp == EOF)
  1137. break;
  1138. fputc( c_temp, newfile);
  1139. };
  1141. fclose( oldfile);
  1142. fclose( newfile);
  1144. return 0;
  1145. }