482 lines
12 KiB
C
482 lines
12 KiB
C
#include "version.h"
|
||
#include <sys/stat.h>
|
||
|
||
#include <stdio.h>
|
||
#include <string.h>
|
||
#include <stdlib.h>
|
||
#include <dirent.h>
|
||
|
||
#include "handletime.h"
|
||
|
||
#include "common.h"
|
||
#include "object.h"
|
||
#include "char_base.h"
|
||
#include "char.h"
|
||
#include "item.h"
|
||
#include "buf.h"
|
||
#include "readmap.h"
|
||
#include "pet.h"
|
||
|
||
static Object *obj;
|
||
static int objnum;
|
||
|
||
#ifdef _PET_ITEM
|
||
static int Restored = FALSE;
|
||
#endif
|
||
|
||
BOOL initObjectArray( int num )
|
||
{
|
||
int i;
|
||
objnum = num;
|
||
obj = allocateMemory( sizeof( Object ) * objnum );
|
||
|
||
if( obj == NULL ) return FALSE;
|
||
for( i = 0 ; i < objnum ; i ++ ){
|
||
memset( &obj[i], 0 , sizeof( Object ));
|
||
obj[i].type = OBJTYPE_NOUSE;
|
||
}
|
||
print( "分配 %.2f MB MB 空间...", sizeof( Object ) * objnum / 1024.0 / 1024.0 );
|
||
return TRUE;
|
||
}
|
||
|
||
|
||
BOOL endObjectArray( void )
|
||
{
|
||
freeMemory( obj );
|
||
return TRUE;
|
||
}
|
||
|
||
INLINE int _initObjectOne( char *file, int line, Object* ob )
|
||
{
|
||
static int allocobjnum = 0;
|
||
int i;
|
||
BOOL first;
|
||
|
||
i = allocobjnum;
|
||
first = TRUE;
|
||
while( 1 ) {
|
||
if( !first && i >= allocobjnum ) {
|
||
fprint( "Can't allocate an object\n" );
|
||
return -1;
|
||
}
|
||
if( obj[i].type == OBJTYPE_NOUSE ) {
|
||
if( MAP_addNewObj( ob->floor ,ob->x, ob->y, i ) == 1 ){
|
||
memcpy( &obj[i] , ob , sizeof( Object ) );
|
||
allocobjnum = ( i+1 >= objnum) ? 0:i+1;
|
||
return i;
|
||
}else{
|
||
allocobjnum = ( i+1 >= objnum) ? 0:i+1;
|
||
fprint( "MAP_addNewObj error\n" );
|
||
return -1;
|
||
}
|
||
}else {
|
||
if( ++i >= objnum ) {
|
||
i = 0;
|
||
first = FALSE;
|
||
}
|
||
}
|
||
}
|
||
|
||
fprint( "Can't allocate an object\n" );
|
||
return -1;
|
||
}
|
||
|
||
void endObjectOne( int index )
|
||
{
|
||
if(objnum <= index || index < 0 )return;
|
||
|
||
if( MAP_removeObj(obj[index].floor,obj[index].x, obj[index].y,
|
||
index) == FALSE){
|
||
// fprint( "REMOVE OBJ ERROR floor:%d x:%d y:%d\n",obj[index].floor,obj[index].x, obj[index].y );
|
||
}
|
||
obj[index].type = OBJTYPE_NOUSE;
|
||
}
|
||
|
||
BOOL CHECKOBJECT( int index )
|
||
{
|
||
if( 0<=index && index<objnum )return TRUE;
|
||
return FALSE;
|
||
}
|
||
|
||
BOOL CHECKOBJECTUSE( int index )
|
||
{
|
||
if( CHECKOBJECT(index) == FALSE )return FALSE;
|
||
if( obj[index].type == OBJTYPE_NOUSE )return FALSE;
|
||
return TRUE;
|
||
}
|
||
|
||
INLINE int OBJECT_getType( int index )
|
||
{
|
||
return obj[index].type;
|
||
}
|
||
|
||
INLINE int OBJECT_getchartype( int index )
|
||
{
|
||
return obj[index].chartype;
|
||
}
|
||
INLINE void OBJECT_setchartype( int index, int flg)
|
||
{
|
||
obj[index].chartype = flg;
|
||
}
|
||
|
||
INLINE int OBJECT_setType( int index, int newvalue )
|
||
{
|
||
int old;
|
||
old = obj[index].type;
|
||
obj[index].type = newvalue;
|
||
return old;
|
||
}
|
||
|
||
INLINE int OBJECT_getFloor( int index )
|
||
{
|
||
return obj[index].floor;
|
||
}
|
||
|
||
INLINE int OBJECT_setFloor( int index, int newvalue )
|
||
{
|
||
int old;
|
||
old = obj[index].floor;
|
||
obj[index].floor = newvalue;
|
||
return old;
|
||
}
|
||
|
||
INLINE int OBJECT_getX( int index )
|
||
{
|
||
return obj[index].x;
|
||
}
|
||
|
||
INLINE int OBJECT_setX( int index, int newvalue )
|
||
{
|
||
int old;
|
||
old = obj[index].x;
|
||
obj[index].x = newvalue;
|
||
return old;
|
||
}
|
||
|
||
INLINE int OBJECT_getY( int index )
|
||
{
|
||
return obj[index].y;
|
||
}
|
||
|
||
INLINE int OBJECT_setY( int index, int newvalue )
|
||
{
|
||
int old;
|
||
old = obj[index].y;
|
||
obj[index].y = newvalue;
|
||
return old;
|
||
}
|
||
|
||
#ifdef _DEL_DROP_GOLD
|
||
INLINE int OBJECT_getTime( int index )
|
||
{
|
||
return obj[index].time;
|
||
}
|
||
|
||
INLINE int OBJECT_setTime( int index, int newvalue )
|
||
{
|
||
int old;
|
||
old = obj[index].time;
|
||
obj[index].time = newvalue;
|
||
return old;
|
||
}
|
||
#endif
|
||
|
||
|
||
/*------------------------------------------------------------
|
||
* index 毛 月
|
||
* 娄醒
|
||
* index int 奶件犯永弁旦
|
||
* 忒曰袄
|
||
* int
|
||
------------------------------------------------------------*/
|
||
INLINE int OBJECT_getIndex( int index )
|
||
{
|
||
return obj[index].index;
|
||
}
|
||
/*------------------------------------------------------------
|
||
* y 毛涩烂允月
|
||
* 娄醒
|
||
* index int 奶件犯永弁旦
|
||
* newvalue int 蕙仄中袄
|
||
* 忒曰袄
|
||
* int 樯及袄
|
||
------------------------------------------------------------*/
|
||
INLINE int OBJECT_setIndex( int index, int newvalue )
|
||
{
|
||
int old;
|
||
old = obj[index].index;
|
||
obj[index].index = newvalue;
|
||
return old;
|
||
}
|
||
|
||
|
||
/*------------------------------------------------------------
|
||
* 左皮斥尼弁玄及 醒毛菲户月
|
||
* 娄醒
|
||
* 卅仄
|
||
* 忒曰袄
|
||
* int
|
||
------------------------------------------------------------*/
|
||
INLINE int OBJECT_getNum( void )
|
||
{
|
||
return objnum;
|
||
}
|
||
|
||
/*------------------------------------------------------------
|
||
* 左皮斥尼弁玄厌瞻 及丢件田毛蝈 娄醒卞 匀化
|
||
* 左皮斥尼弁玄厌瞻 毛综曰请仄化｝瓒 允月［
|
||
*
|
||
* 娄醒
|
||
* type OBJTYPE 左皮斥尼弁玄及正奶皿
|
||
* index int 公木冗木及 匹及index
|
||
* x int x甄
|
||
* y int y甄
|
||
* floor int floorid
|
||
* 忒曰袄
|
||
* int 喃曰癫化木凶index, 撩 及凛反｝ -1
|
||
------------------------------------------------------------*/
|
||
int initObjectFromObjectMember(
|
||
OBJTYPE type, int index, int x, int y , int floor )
|
||
{
|
||
Object obj;
|
||
obj.type = type;
|
||
obj.index = index;
|
||
obj.x = x;
|
||
obj.y = y;
|
||
obj.floor = floor;
|
||
|
||
return initObjectOne( &obj );
|
||
}
|
||
|
||
int searchObjectFromCharaIndex( int index )
|
||
{
|
||
int i;
|
||
for( i = 0 ; i < objnum ; i ++ )
|
||
if( obj[i].type == OBJTYPE_CHARA && obj[i].index == index )
|
||
return i;
|
||
return -1;
|
||
}
|
||
|
||
#define ITEMGOLDSTOREFILENAME "itemgold"
|
||
|
||
#define STOREITEMID "ITEM"
|
||
#define STOREGOLDID "GOLD"
|
||
#define STORECHARID "CHAR"
|
||
|
||
#ifdef _PET_ITEM
|
||
static BOOL checkObjectStoreFile( char* line, Object* one, char** stringstart)
|
||
{
|
||
char token[16];
|
||
int ret;
|
||
int i;
|
||
|
||
ret = getStringFromIndexWithDelim(line,"|" ,1 , token, sizeof( token ) );
|
||
if( ret == FALSE )return FALSE;
|
||
if( strcmp( token , STOREITEMID ) == 0 )
|
||
one->type = OBJTYPE_ITEM;
|
||
else if( strcmp( token , STOREGOLDID ) == 0 )
|
||
one->type = OBJTYPE_GOLD;
|
||
else if( strcmp( token, STORECHARID) == 0 )
|
||
one->type = OBJTYPE_CHARA;
|
||
for( i = 2 ; i < 5 ; i ++ ){
|
||
char first[64];
|
||
char second[64];
|
||
ret = getStringFromIndexWithDelim(line,"|" ,i,
|
||
token,sizeof( token ));
|
||
if( ret == FALSE )return FALSE;
|
||
|
||
ret = getStringFromIndexWithDelim(token,"=" ,1, first,sizeof( first ));
|
||
if( ret == FALSE )return FALSE;
|
||
ret = getStringFromIndexWithDelim(token,"=" ,2, second,sizeof( second ));
|
||
if( ret == FALSE )return FALSE;
|
||
|
||
if( strcmp( first , "x" ) == 0 )
|
||
one->x = atoi( second );
|
||
else if( strcmp( first , "y" ) == 0 )
|
||
one->y = atoi( second );
|
||
else if( strcmp( first , "floor" ) == 0 )
|
||
one->floor = atoi( second );
|
||
}
|
||
{
|
||
char* findex = nindex( line , '|' , 4);
|
||
*stringstart = findex + 1;
|
||
}
|
||
return TRUE;
|
||
}
|
||
|
||
BOOL storeObjects( char* dirname )
|
||
{
|
||
int i;
|
||
FILE* igfile;
|
||
char igfilename[256];
|
||
|
||
if( Restored == TRUE ){
|
||
snprintf( igfilename ,sizeof( igfilename ) ,"%s/%s" ,dirname ,
|
||
ITEMGOLDSTOREFILENAME );
|
||
}else{
|
||
snprintf( igfilename ,sizeof( igfilename ) ,"%s/%s_extra" ,dirname ,
|
||
ITEMGOLDSTOREFILENAME );
|
||
|
||
print( "\n---- 数据保存中，请别关闭GMSV ----- \n");
|
||
}
|
||
igfile = fopen( igfilename , "w" );
|
||
if( igfile == NULL ){
|
||
print( "\n\n---- 不能打开 (%s) 备份物品文件. ----- \n\n", igfilename );
|
||
return FALSE;
|
||
}
|
||
|
||
print( "在线数据保存...");
|
||
for( i = 0 ; i < objnum ; i ++ ){
|
||
switch( obj[i].type ){
|
||
case OBJTYPE_ITEM:
|
||
{
|
||
fprintf( igfile , STOREITEMID "|x=%d|y=%d|floor=%d|%s\n" ,
|
||
obj[i].x , obj[i].y ,obj[i].floor,
|
||
ITEM_makeStringFromItemIndex( obj[i].index,0 ) );
|
||
break;
|
||
}
|
||
case OBJTYPE_GOLD:
|
||
{
|
||
fprintf( igfile , STOREGOLDID "|x=%d|y=%d|floor=%d|%d\n" ,
|
||
obj[i].x , obj[i].y ,obj[i].floor, obj[i].index );
|
||
break;
|
||
}
|
||
case OBJTYPE_CHARA:
|
||
{
|
||
int petindex = obj[i].index;
|
||
if( CHAR_CHECKINDEX( petindex) ) {
|
||
if( CHAR_getInt( obj[i].index, CHAR_WHICHTYPE) == CHAR_TYPEPET){
|
||
fprintf( igfile , STORECHARID "|x=%d|y=%d|floor=%d|%s\n" ,
|
||
obj[i].x , obj[i].y ,obj[i].floor,
|
||
CHAR_makePetStringFromPetIndex( obj[i].index ) );
|
||
}
|
||
}
|
||
break;
|
||
}
|
||
default:
|
||
break;
|
||
}
|
||
}
|
||
fclose( igfile );
|
||
print( "完成\n");
|
||
// system( "./itemda.pl" );
|
||
print( "数据保存结束\n");
|
||
return TRUE;
|
||
}
|
||
#endif
|
||
|
||
int detectStoreFile( char* filename )
|
||
{
|
||
FILE* f;
|
||
char buffer[10];
|
||
f = fopen ( filename ,"r" );
|
||
if( f == NULL )return 3;
|
||
|
||
if( fgets( buffer, sizeof( buffer ), f ) == NULL ){
|
||
fclose(f);
|
||
return 3;
|
||
}
|
||
|
||
if( strncmp(buffer,STOREITEMID,sizeof(STOREITEMID) ) == 0 ||
|
||
strncmp(buffer,STOREGOLDID,sizeof(STOREGOLDID) ) == 0 ){
|
||
fclose(f);
|
||
return 2;
|
||
}
|
||
|
||
fclose(f);
|
||
return 3;
|
||
}
|
||
|
||
#ifdef _PET_ITEM
|
||
BOOL restoreObjects( char* dirname )
|
||
{
|
||
char igfilename[512];
|
||
FILE* file;
|
||
char line[2048];
|
||
|
||
snprintf( igfilename, sizeof(igfilename), "%s/%s", dirname, ITEMGOLDSTOREFILENAME );
|
||
file = fopen( igfilename , "r" );
|
||
if( file == NULL ){
|
||
Restored = TRUE;
|
||
return FALSE;
|
||
}
|
||
while( fgets( line, sizeof( line ), file ) != NULL ){
|
||
Object one;
|
||
char *string;
|
||
chomp( line );
|
||
if( checkObjectStoreFile( line, &one ,&string ) == FALSE )
|
||
continue;
|
||
switch( one.type ){
|
||
case OBJTYPE_ITEM:
|
||
{
|
||
ITEM_Item itmone;
|
||
BOOL ret;
|
||
int objindex;
|
||
ret = ITEM_makeExistItemsFromStringToArg( string, &itmone, 0 );
|
||
if( ret == TRUE ){
|
||
one.index = ITEM_initExistItemsOne( &itmone );
|
||
if( one.index == -1 )
|
||
break;
|
||
objindex = initObjectOne( &one );
|
||
ITEM_setWorkInt(one.index,ITEM_WORKCHARAINDEX,-1);
|
||
ITEM_setWorkInt(one.index,ITEM_WORKOBJINDEX,objindex);
|
||
}
|
||
break;
|
||
}
|
||
case OBJTYPE_GOLD:
|
||
one.index = atoi( string );
|
||
initObjectOne( &one );
|
||
break;
|
||
case OBJTYPE_CHARA:
|
||
{
|
||
Char ch;
|
||
int ret;
|
||
ret = CHAR_makePetFromStringToArg(string,&ch, -1);
|
||
if( ret ) {
|
||
Object object;
|
||
int objindex;
|
||
int petindex = PET_initCharOneArray( &ch );
|
||
if( petindex < 0 ) {
|
||
print( "宠物制作失败。\n");
|
||
}
|
||
object.type = OBJTYPE_CHARA;
|
||
object.index = petindex;
|
||
object.x = ch.data[CHAR_X];
|
||
object.y = ch.data[CHAR_Y];
|
||
object.floor = ch.data[CHAR_FLOOR];
|
||
objindex = initObjectOne( &object );
|
||
if( objindex == -1 ) {
|
||
CHAR_endCharOneArray( petindex );
|
||
}else {
|
||
CHAR_setWorkInt( petindex,CHAR_WORKOBJINDEX,objindex );
|
||
}
|
||
}
|
||
break;
|
||
}
|
||
default:
|
||
break;
|
||
}
|
||
}
|
||
fclose( file );
|
||
Restored = TRUE;
|
||
|
||
return TRUE;
|
||
}
|
||
#endif
|
||
|
||
#ifdef _CAX_LNS_MAPSUOXU
|
||
INLINE int get_mappointindex( int fl,int x, int y)//找出地图传送点索引
|
||
{
|
||
int i;
|
||
for(i=0;i<objnum;i++)
|
||
{
|
||
if (obj[i].type == OBJTYPE_WARPPOINT)
|
||
if (obj[i].floor == fl)
|
||
if (obj[i].x == x)
|
||
if (obj[i].y == y) return i;
|
||
}
|
||
return -1;
|
||
}
|
||
#endif
|
||
|