MySQL数据库

开发平台：
Visual C++

autoupdate.c：源码内容
							/*
 * Copyright (C) 2000 Rob Crittenden (rcrit@greyoak.com)
 * Copyright (C) 2002 Gianluigi Tiesi (sherpya@netfarm.it)
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version 2
 * of the License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 */
#define AUTOUPDATE_INTERNAL_ACCESS
#include "common/setup_before.h"
#include <stdio.h>
#ifdef HAVE_STDDEF_H
# include <stddef.h>
#else
# ifndef NULL
#  define NULL ((void *)0)
# endif
#endif
#ifdef STDC_HEADERS
# include <stdlib.h>
#else
# ifdef HAVE_MALLOC_H
#  include <malloc.h>
# endif
#endif
#include "compat/strtoul.h"
#ifdef HAVE_STRING_H
# include <string.h>
#else
# ifdef HAVE_STRINGS_H
#  include <strings.h>
# endif
#endif
#include "compat/strchr.h"
#include "compat/strdup.h"
#include <errno.h>
#include "compat/strerror.h"
#include "common/eventlog.h"
#include "common/list.h"
#include "common/util.h"
#include "common/proginfo.h"
#include "autoupdate.h"
#include "common/setup_after.h"
static t_list * autoupdate_head=NULL;
static FILE * fp = NULL;
/*
 * Open the autoupdate configuration file, create a linked list of the
 * clienttag and the update file for it.  The format of the file is:
 * archtag<tab>clienttag<tab>versiontag<tab>update file
 *
 * Comments begin with # and are ignored.
 *
 * The server assumes that the update file is in the "files" directory
 * so do not include "/" in the filename - it won't be sent
 * (because it is a security risk).
 */
extern int autoupdate_load(char const * filename)
{
    unsigned int   line;
    unsigned int   pos;
    char *         buff;
    char *         temp;
    char const *   archtag;
    char const *   clienttag;
    char const *   mpqfile;
    char const *   versiontag;
    t_autoupdate * entry;
    
    if (!filename) {
	eventlog(eventlog_level_error,"autoupdate_load","got NULL filename");
	return -1;
    }
    
    if (!(autoupdate_head = list_create())) {
	eventlog(eventlog_level_error,"autoupdate_load","could create list");
	return -1;
    }
    
    if (!(fp = fopen(filename,"r"))) {
	eventlog(eventlog_level_error,"autoupdate_load","could not open file "%s" for reading (fopen: %s)",filename,strerror(errno));
	list_destroy(autoupdate_head);
	autoupdate_head = NULL;
	return -1;
    }
    
    for (line=1; (buff = file_get_line(fp)); line++) {
	for (pos=0; buff[pos]=='t' || buff[pos]==' '; pos++);
	
	if (buff[pos]=='' || buff[pos]=='#') {
	    free(buff);
	    continue;
	}
	
	if ((temp = strrchr(buff,'#'))) {
	    unsigned int len;
	    unsigned int endpos;
	    
	    *temp = '';
	    len = strlen(buff)+1;
	    for (endpos=len-1;  buff[endpos]=='t' || buff[endpos]==' '; endpos--);
	    buff[endpos+1] = '';
	}
	
	/* FIXME: use next_token instead of strtok */
	if (!(archtag = strtok(buff, " t"))) { /* strtok modifies the string it is passed */
	    eventlog(eventlog_level_error,"autoupdate_load","missing archtag on line %u of file "%s"",line,filename);
	    free(buff);
	    continue;
	}
	if (!(clienttag = strtok(NULL," t"))) {
	    eventlog(eventlog_level_error,"autoupdate_load","missing clienttag on line %u of file "%s"",line,filename);
	    free(buff);
	    continue;
	}
        if (!(versiontag = strtok(NULL, " t"))) {
	    eventlog(eventlog_level_error,"autoupdate_load","missing versiontag on line %u of file "%s"",line,filename);
	    free(buff);
	    continue;
	}
	if (!(mpqfile = strtok(NULL," t"))) {
	    eventlog(eventlog_level_error,"autoupdate_load","missing mpqfile on line %u of file "%s"",line,filename);
	    free(buff);
	    continue;
	}
	
	if (!(entry = malloc(sizeof(t_autoupdate)))) {
	    eventlog(eventlog_level_error,"autoupdate_load","could not allocate memory for entry");
	    free(buff);
	    continue;
	}
	
	if (!(entry->archtag = strdup(archtag))) {
	    eventlog(eventlog_level_error,"autoupdate_load","could not allocate memory for archtag");
	    free(entry);
	    free(buff);
	    continue;
	}
	if (!(entry->clienttag = strdup(clienttag))) {
	    eventlog(eventlog_level_error,"autoupdate_load","could not allocate memory for clienttag");
	    free((void *)entry->archtag);
	    free(entry);
	    free(buff);
	    continue;
	}
	if ((!(entry->versiontag = strdup(versiontag)))) {
	    eventlog(eventlog_level_error,"autoupdate_load","could not allocate memory for versiontag");
	    free((void *)entry->clienttag);
	    free((void *)entry->archtag);
	    free(entry);
	    free(buff);
	    continue;
	}
	if (!(entry->mpqfile = strdup(mpqfile))) {
	    eventlog(eventlog_level_error,"autoupdate_load","could not allocate memory for mpqfile");
	    free((void *)entry->versiontag);
	    free((void *)entry->clienttag);
	    free((void *)entry->archtag);
	    free(entry);
	    free(buff);
	    continue;
	}
	
	eventlog(eventlog_level_debug,"autoupdate_load","update '%s' version '%s' with file %s",clienttag,versiontag,mpqfile);
	free(buff);
	
	if (list_append_data(autoupdate_head,entry)<0) {
	    eventlog(eventlog_level_error,"autoupdate_load","could not append item");
	    free((void *)entry->versiontag);
	    free((void *)entry->clienttag);
	    free((void *)entry->archtag);
	    free((void *)entry->mpqfile);
	    free(entry);
	    continue;
	}
    }
    fclose(fp);
    return 0;
}
/*
 * Free up all of the elements in the linked list
 */
extern int autoupdate_unload(void)
{
    if (autoupdate_head) {
	t_elem *       curr;
	t_autoupdate * entry;
	LIST_TRAVERSE(autoupdate_head,curr)
	{
	    if (!(entry = elem_get_data(curr)))
		eventlog(eventlog_level_error,"autoupdate_unload","found NULL entry in list");
	    else {
		free((void *)entry->versiontag);	/* avoid warning */
		free((void *)entry->mpqfile);		/* avoid warning */
		free((void *)entry->clienttag);		/* avoid warning */
		free((void *)entry->archtag);		/* avoid warning */
		free(entry);
	    }
	    list_remove_elem(autoupdate_head,curr);
	}
	
	if (list_destroy(autoupdate_head)<0) return -1;
	autoupdate_head = NULL;
    }
    return 0;
}
/*
 *  Check to see if an update exists for the clients version
 *  return file name if there is one
 *  retrun NULL if no update exists
 */
extern char * autoupdate_check(char const * archtag, char const * clienttag, unsigned int gamelang, char const * versiontag)
{
    if (autoupdate_head) {
	t_elem const * curr;
	t_autoupdate * entry;
	char * temp;
	
	LIST_TRAVERSE_CONST(autoupdate_head,curr)
	{
	    if (!(entry = elem_get_data(curr))) {
		eventlog(eventlog_level_error,"autoupdate_file","found NULL entry in list");
		continue;
	    }
	    
	    if (strcmp(entry->archtag, archtag) != 0)
		continue;
	    if (strcmp(entry->clienttag, clienttag) != 0)
		continue;
	    if (strcmp(entry->versiontag, versiontag) != 0)
		continue;
	    
	    /* if we have a gamelang then add to mpq file, unless enUS */
	    if (gamelang) {
		char gltag[5];
		
		gltag[0] = ((unsigned char)(gamelang>>24)     );
		gltag[1] = ((unsigned char)(gamelang>>16)&0xff);
		gltag[2] = ((unsigned char)(gamelang>> 8)&0xff);
		gltag[3] = ((unsigned char)(gamelang    )&0xff);
		gltag[4] = '';
		
		if (strcmp(gltag, "enUS") != 0) {
		    char * tempmpq;
		    char * extention;
		    
		    tempmpq = strdup(entry->mpqfile);
		    if (!(temp = malloc(strlen(tempmpq)+6))) {
	        	eventlog(eventlog_level_error,"autoupdate_load","could not allocate memory for mpq file name");
			return NULL;
		    }
		    extention = strrchr(tempmpq,'.');
		    *extention = '';
		    extention++;
		    
		    sprintf(temp, "%s_%s.%s", tempmpq, gltag, extention);
		    
		    free((void *)tempmpq);
		    return temp;
		}
	    }
	    temp = strdup(entry->mpqfile);
	    return temp;
	}
    }
    return NULL;
}

						