yaffsfs.c

嵌入式linux yaffs文件系统源代码

	{
		yaffsfs_SetError(-ENOTDIR);
	}
	else if(!obj)
	{
		yaffsfs_SetError(-ENOENT);
	}
	else if(!isDirectory && obj->variantType == YAFFS_OBJECT_TYPE_DIRECTORY)
	{
		yaffsfs_SetError(-EISDIR);
	}
	else if(isDirectory && obj->variantType != YAFFS_OBJECT_TYPE_DIRECTORY)
	{
		yaffsfs_SetError(-ENOTDIR);
	}
	else if(isDirectory && obj->variantType != YAFFS_OBJECT_TYPE_DIRECTORY)
	{
		yaffsfs_SetError(-ENOTDIR);
	}
	else
	{
		result = yaffs_Unlink(dir,name);
		
		if(result == YAFFS_FAIL && isDirectory)
		{
			yaffsfs_SetError(-ENOTEMPTY);
		}
	}
	
	yaffsfs_Unlock();
	
	// todo error
	
	return (result == YAFFS_FAIL) ? -1 : 0;
}
int yaffs_rmdir(const char *path) 
{
	return yaffsfs_DoUnlink(path,1);
}

int yaffs_unlink(const char *path) 
{
	return yaffsfs_DoUnlink(path,0);
}

int yaffs_rename(const char *oldPath, const char *newPath)
{
	yaffs_Object *olddir = NULL;
	yaffs_Object *newdir = NULL;
	yaffs_Object *obj = NULL;
	char *oldname;
	char *newname;
	int result= YAFFS_FAIL;
	int renameAllowed = 1;
	
	yaffsfs_Lock();
	
	olddir = yaffsfs_FindDirectory(NULL,oldPath,&oldname,0);
	newdir = yaffsfs_FindDirectory(NULL,newPath,&newname,0);
	obj = yaffsfs_FindObject(NULL,oldPath,0);
	
	if(!olddir || !newdir || !obj)
	{
		// bad file
		yaffsfs_SetError(-EBADF);	
		renameAllowed = 0;	
	}
	else if(olddir->myDev != newdir->myDev)
	{
		// oops must be on same device
		// todo error
		yaffsfs_SetError(-EXDEV);
		renameAllowed = 0;	
	}
	else if(obj && obj->variantType == YAFFS_OBJECT_TYPE_DIRECTORY)
	{
		// It is a directory, check that it is not being renamed to 
		// being its own decendent.
		// Do this by tracing from the new directory back to the root, checking for obj
		
		yaffs_Object *xx = newdir;
		
		while( renameAllowed && xx)
		{
			if(xx == obj)
			{
				renameAllowed = 0;
			}
			xx = xx->parent;
		}
		if(!renameAllowed) yaffsfs_SetError(-EACCESS);
	}
	
	if(renameAllowed)
	{
		result = yaffs_RenameObject(olddir,oldname,newdir,newname);
	}
	
	yaffsfs_Unlock();
	
	return (result == YAFFS_FAIL) ? -1 : 0;	
}


static int yaffsfs_DoStat(yaffs_Object *obj,struct yaffs_stat *buf)
{
	int retVal = -1;

	if(obj)
	{
		obj = yaffs_GetEquivalentObject(obj);
	}

	if(obj && buf)
	{
    	buf->st_dev = (int)obj->myDev->genericDevice;
    	buf->st_ino = obj->objectId;
    	buf->st_mode = obj->st_mode & ~S_IFMT; // clear out file type bits
	
		if(obj->variantType == YAFFS_OBJECT_TYPE_DIRECTORY) 
		{
			buf->st_mode |= S_IFDIR;
		}
		else if(obj->variantType == YAFFS_OBJECT_TYPE_SYMLINK) 
		{
			buf->st_mode |= S_IFLNK;
		}
		else if(obj->variantType == YAFFS_OBJECT_TYPE_FILE)
		{
			buf->st_mode |= S_IFREG;
		}
		
    	buf->st_nlink = yaffs_GetObjectLinkCount(obj);
    	buf->st_uid = 0;    
    	buf->st_gid = 0;;     
    	buf->st_rdev = obj->st_rdev;
    	buf->st_size = yaffs_GetObjectFileLength(obj);
		buf->st_blksize = YAFFS_BYTES_PER_CHUNK;
    	buf->st_blocks = (buf->st_size + YAFFS_BYTES_PER_CHUNK -1)/YAFFS_BYTES_PER_CHUNK;
    	buf->st_atime = obj->st_atime; 
    	buf->st_ctime = obj->st_ctime; 
    	buf->st_mtime = obj->st_mtime; 
		retVal = 0;
	}
	return retVal;
}

static int yaffsfs_DoStatOrLStat(const char *path, struct yaffs_stat *buf,int doLStat)
{
	yaffs_Object *obj;
	
	int retVal = -1;
	
	yaffsfs_Lock();
	obj = yaffsfs_FindObject(NULL,path,0);
	
	if(!doLStat && obj)
	{
		obj = yaffsfs_FollowLink(obj,0);
	}
	
	if(obj)
	{
		retVal = yaffsfs_DoStat(obj,buf);
	}
	else
	{
		// todo error not found
		yaffsfs_SetError(-ENOENT);
	}
	
	yaffsfs_Unlock();
	
	return retVal;
	
}

int yaffs_stat(const char *path, struct yaffs_stat *buf)
{
	return yaffsfs_DoStatOrLStat(path,buf,0);
}

int yaffs_lstat(const char *path, struct yaffs_stat *buf)
{
	return yaffsfs_DoStatOrLStat(path,buf,1);
}

int yaffs_fstat(int fd, struct yaffs_stat *buf)
{
	yaffs_Object *obj;
	
	int retVal = -1;
	
	yaffsfs_Lock();
	obj = yaffsfs_GetHandleObject(fd);
	
	if(obj)
	{
		retVal = yaffsfs_DoStat(obj,buf);
	}
	else
	{
		// bad handle
		yaffsfs_SetError(-EBADF);		
	}
	
	yaffsfs_Unlock();
	
	return retVal;
}

static int yaffsfs_DoChMod(yaffs_Object *obj,mode_t mode)
{
	int result;

	if(obj)
	{
		obj = yaffs_GetEquivalentObject(obj);
	}
	
	if(obj)
	{
		obj->st_mode = mode;
		obj->dirty = 1;
		result = yaffs_FlushFile(obj,0);
	}
	
	return result == YAFFS_OK ? 0 : -1;
}


int yaffs_chmod(const char *path, mode_t mode)
{
	yaffs_Object *obj;
	
	int retVal = -1;
	
	yaffsfs_Lock();
	obj = yaffsfs_FindObject(NULL,path,0);
	
	if(obj)
	{
		retVal = yaffsfs_DoChMod(obj,mode);
	}
	else
	{
		// todo error not found
		yaffsfs_SetError(-ENOENT);
	}
	
	yaffsfs_Unlock();
	
	return retVal;
	
}


int yaffs_fchmod(int fd, mode_t mode)
{
	yaffs_Object *obj;
	
	int retVal = -1;
	
	yaffsfs_Lock();
	obj = yaffsfs_GetHandleObject(fd);
	
	if(obj)
	{
		retVal = yaffsfs_DoChMod(obj,mode);
	}
	else
	{
		// bad handle
		yaffsfs_SetError(-EBADF);		
	}
	
	yaffsfs_Unlock();
	
	return retVal;
}


int yaffs_mkdir(const char *path, mode_t mode)
{
	yaffs_Object *parent = NULL;
	yaffs_Object *dir;
	char *name;
	int retVal= -1;
	
	yaffsfs_Lock();
	parent = yaffsfs_FindDirectory(NULL,path,&name,0);
	dir = yaffs_MknodDirectory(parent,name,mode,0,0);
	if(dir)
	{
		retVal = 0;
	}
	else
	{
		yaffsfs_SetError(-ENOSPC); // just assume no space for now
		retVal = -1;
	}
	
	yaffsfs_Unlock();
	
	return retVal;
}

int yaffs_mount(const char *path)
{
	int retVal=-1;
	int result=YAFFS_FAIL;
	yaffs_Device *dev=NULL;
	char *dummy;
	
	yaffsfs_Lock();
	dev = yaffsfs_FindDevice(path,&dummy);
	if(dev)
	{
		if(!dev->isMounted)
		{
			result = yaffs_GutsInitialise(dev);
			if(result == YAFFS_FAIL)
			{
				// todo error - mount failed
				yaffsfs_SetError(-ENOMEM);
			}
			retVal = result ? 0 : -1;
			
		}
		else
		{
			//todo error - already mounted.
			yaffsfs_SetError(-EBUSY);
		}
	}
	else
	{
		// todo error - no device
		yaffsfs_SetError(-ENODEV);
	}
	yaffsfs_Unlock();
	return retVal;
	
}

int yaffs_unmount(const char *path)
{
	int retVal=-1;
	yaffs_Device *dev=NULL;
	char *dummy;
	
	yaffsfs_Lock();
	dev = yaffsfs_FindDevice(path,&dummy);
	if(dev)
	{
		if(dev->isMounted)
		{
			int i;
			int inUse;
			for(i = inUse = 0; i < YAFFSFS_N_HANDLES && !inUse; i++)
			{
				if(yaffsfs_handle[i].inUse && yaffsfs_handle[i].obj->myDev == dev)
				{
					inUse = 1; // the device is in use, can't unmount
				}
			}
			
			if(!inUse)
			{
				yaffs_Deinitialise(dev);
					
				retVal = 0;
			}
			else
			{
				// todo error can't unmount as files are open
				yaffsfs_SetError(-EBUSY);
			}
			
		}
		else
		{
			//todo error - not mounted.
			yaffsfs_SetError(-EINVAL);
			
		}
	}
	else
	{
		// todo error - no device
		yaffsfs_SetError(-ENODEV);
	}	
	yaffsfs_Unlock();
	return retVal;
	
}

off_t yaffs_freespace(const char *path)
{
	off_t retVal=-1;
	yaffs_Device *dev=NULL;
	char *dummy;
	
	yaffsfs_Lock();
	dev = yaffsfs_FindDevice(path,&dummy);
	if(dev)
	{
		retVal = yaffs_GetNumberOfFreeChunks(dev);
		retVal *= YAFFS_BYTES_PER_CHUNK;
		
	}
	else
	{
		yaffsfs_SetError(-EINVAL);
	}
	
	yaffsfs_Unlock();
	return retVal;	
}

void yaffs_initialise(yaffsfs_DeviceConfiguration *cfgList)
{
	
	yaffsfs_DeviceConfiguration *cfg;
	
	yaffsfs_configurationList = cfgList;
	
	yaffsfs_InitHandles();
	
	cfg = yaffsfs_configurationList;
	
	while(cfg && cfg->prefix && cfg->dev)
	{
		cfg->dev->isMounted = 0;
		cfg++;
	}
	
	
}


//
// Directory search stuff.

yaffs_DIR *yaffs_opendir(const char *dirname)
{
	yaffs_DIR *dir = NULL;
 	yaffs_Object *obj = NULL;
	yaffsfs_DirectorySearchContext *dsc = NULL;
	
	yaffsfs_Lock();
	
	obj = yaffsfs_FindObject(NULL,dirname,0);
	
	if(obj && obj->variantType == YAFFS_OBJECT_TYPE_DIRECTORY)
	{
		
		dsc = YMALLOC(sizeof(yaffsfs_DirectorySearchContext));
		dir = (yaffs_DIR *)dsc;
		if(dsc)
		{
			dsc->magic = YAFFS_MAGIC;
			dsc->list = NULL;
			memset(dsc->name,0,NAME_MAX+1);
			strncpy(dsc->name,dirname,NAME_MAX);
		}
	
	}
	
	yaffsfs_Unlock();
	
	return dir;
}

struct yaffs_dirent *yaffs_readdir(yaffs_DIR *dirp)
{
	yaffsfs_DirectorySearchContext *dsc = (yaffsfs_DirectorySearchContext *)dirp;
	struct yaffs_dirent *retVal = NULL;
	struct list_head *i;	
	yaffs_Object *entry = NULL;
	int offset;
	yaffs_Object *obj = NULL;
	struct yaffsfs_ObjectListEntry *list = NULL;
	int inList = 0;
		
	yaffsfs_Lock();
	
	offset = -1;
	
	if(dsc && dsc->magic == YAFFS_MAGIC)
	{
		yaffsfs_SetError(0);
		
		obj = yaffsfs_FindObject(NULL,dsc->name,0);
	
		if(obj && obj->variantType == YAFFS_OBJECT_TYPE_DIRECTORY)
		{
			
			list_for_each(i,&obj->variant.directoryVariant.children)
			{		
					offset++;
					entry = (i) ?  list_entry(i, yaffs_Object,siblings) : NULL;
			
					if(entry)
					{
						list = dsc->list;
						inList = 0;
						while(list && !inList)
						{
							if(list->objectId == entry->objectId)
							{
								inList = 1;
							}
							list = list->next;
						}
						
						if(!inList) goto foundNew;
					}
				
			}
			
			foundNew:
			
			if(!inList && entry)
			{
				//This is the entry we're going to return;
				struct yaffsfs_ObjectListEntry *le;
				
				le = YMALLOC(sizeof(struct yaffsfs_ObjectListEntry));
				
				if(le)
				{
					le->next =  dsc->list;
					le->objectId = entry->objectId;
					dsc->list = le;
					
					dsc->de.d_ino = yaffs_GetEquivalentObject(entry)->objectId;
					dsc->de.d_off = offset;
					yaffs_GetObjectName(entry,dsc->de.d_name,NAME_MAX+1);
					dsc->de.d_reclen = sizeof(struct yaffs_dirent);
					
					retVal = &dsc->de;
				}
				
			}
		}

	}
	else
	{
		yaffsfs_SetError(-EBADF);
	}
	
	yaffsfs_Unlock();
	
	return retVal;
	
}

void yaffsfs_ListClear(yaffsfs_DirectorySearchContext *dsc) 
{
	
	struct yaffsfs_ObjectListEntry *le;
	
	if(dsc && dsc->magic == YAFFS_MAGIC)
	{
		while(dsc->list)
		{
			le = dsc->list;
			dsc->list = dsc->list->next;
			YFREE(le);
		}
	}
	
}

void yaffs_rewinddir(yaffs_DIR *dirp)
{
	yaffsfs_DirectorySearchContext *dsc = (yaffsfs_DirectorySearchContext *)dirp;
		
	yaffsfs_Lock();
	yaffsfs_ListClear(dsc);
	yaffsfs_Unlock();
}


int yaffs_closedir(yaffs_DIR *dirp)
{
	yaffsfs_DirectorySearchContext *dsc = (yaffsfs_DirectorySearchContext *)dirp;
		
	yaffsfs_Lock();
	yaffsfs_ListClear(dsc);
	dsc->magic = 0;
	YFREE(dsc);
	yaffsfs_Unlock();
	return 0;
}



int yaffs_symlink(const char *oldpath, const char *newpath)
{
	yaffs_Object *parent = NULL;
	yaffs_Object *obj;
	char *name;
	int retVal= -1;
	int mode = 0; // ignore for now
	
	yaffsfs_Lock();
	parent = yaffsfs_FindDirectory(NULL,newpath,&name,0);
	obj = yaffs_MknodSymLink(parent,name,mode,0,0,oldpath);
	if(obj)
	{
		retVal = 0;
	}
	else
	{
		yaffsfs_SetError(-ENOSPC); // just assume no space for now
		retVal = -1;
	}
	
	yaffsfs_Unlock();
	
	return retVal;
	
}

int yaffs_readlink(const char *path, char *buf, int bufsiz)
{
	yaffs_Object *obj = NULL;
	int retVal;

		
	yaffsfs_Lock();
	
	obj = yaffsfs_FindObject(NULL,path,0);
	
	if(!obj)
	{
		yaffsfs_SetError(-ENOENT);
		retVal = -1;
	}
	else if(obj->variantType != YAFFS_OBJECT_TYPE_SYMLINK)
	{
		yaffsfs_SetError(-EINVAL);
		retVal = -1;
	}
	else
	{
		char *alias = obj->variant.symLinkVariant.alias;
		memset(buf,0,bufsiz);
		strncpy(buf,alias,bufsiz - 1);
		retVal = 0;
	}
	yaffsfs_Unlock();
	return retVal;
}

int yaffs_link(const char *oldpath, const char *newpath); 
int yaffs_mknod(const char *pathname, mode_t mode, dev_t dev);

int yaffs_DumpDevStruct(const char *path)
{
	char *rest;
	
	yaffs_Object *obj = yaffsfs_FindRoot(path,&rest);
	
	if(obj)
	{
		yaffs_Device *dev = obj->myDev;
		
		printf("\n"
			   "nPageWrites.......... %d\n"
			   "nPageReads........... %d\n"
			   "nBlockErasures....... %d\n"
			   "nGCCopies............ %d\n"
			   "garbageCollections... %d\n"
			   "passiveGarbageColl'ns %d\n"
			   "\n",
				dev->nPageWrites,
				dev->nPageReads,
				dev->nBlockErasures,
				dev->nGCCopies,
				dev->garbageCollections,
				dev->passiveGarbageCollections
		);
	}
	return 0;
}