activegs-ios/Common.osx/ActiveDownloadMac.cpp
2017-11-09 23:28:16 +01:00

355 lines
8.2 KiB
C++
Raw Permalink Blame History

/*
ActiveGS, Copyright 2004-2016 Olivier Goguel, https://github.com/ogoguel/ActiveGS
Based on Kegs, Copyright 2004 Kent Dickey, https://kegs.sourceforge.net
This code is covered by the GNU GPL licence
*/
#include "../Common.osx/cemulatorctrlmac.h"
#include "ActiveDownload.h"
#include <sys/types.h>
#include <dirent.h>
#include "../Common/ki.h"
#include "../kegs/Src/sim65816.h"
#ifdef DRIVER_IOS
#include <CFNetwork/CFHTTPMessage.h>
#include <CoreFoundation/CoreFoundation.h>
#include <CFNetwork/CFHTTPStream.h>
#endif
#ifdef _DEBUG
#define new DEBUG_NEW
#endif
#define ACTIVEGSDOMAIN kUserDomain
MyString homePath;
extern const char * activegsdownloaddir;
extern const char * activegspersistentdir;
#define MAX_PATH 1024
bool CDownload::GetFile( const char *url, const char *filename)
{
bool bSuccess=false;
CFStringRef rawCFString=NULL;
CFStringRef normalizedCFString=NULL;
CFStringRef escapedCFString=NULL;
CFURLRef urlRef=NULL;
CFHTTPMessageRef messageRef = NULL;
CFReadStreamRef readStreamRef = NULL;
#define HTTPBUFLEN 4096
UInt8 httpbuff[HTTPBUFLEN];
CFIndex numbytes ;
FILE* f = NULL;
int nbread=0;
int dwLength = 0 ;
int pourcent=0;
MyString str;
if (filename)
showProgress(url,0);
if ( strlen( url ) < 12 )
goto Bail;
rawCFString = CFStringCreateWithCString( NULL, url, CFStringGetSystemEncoding() );
if ( rawCFString == NULL ) goto Bail;
normalizedCFString = CFURLCreateStringByReplacingPercentEscapes( NULL, rawCFString, CFSTR("") );
if ( normalizedCFString == NULL ) goto Bail;
escapedCFString = CFURLCreateStringByAddingPercentEscapes( NULL, normalizedCFString, NULL, NULL, kCFStringEncodingUTF8 );
if ( escapedCFString == NULL ) goto Bail;
urlRef= CFURLCreateWithString( kCFAllocatorDefault, escapedCFString, NULL );
CFRelease( rawCFString );
CFRelease( normalizedCFString );
CFRelease( escapedCFString );
if ( urlRef == NULL )
{
goto Bail;
}
messageRef = CFHTTPMessageCreateRequest( kCFAllocatorDefault, CFSTR("GET"), urlRef, kCFHTTPVersion1_1 );
if ( messageRef == NULL ) goto Bail;
CFRelease(urlRef);
urlRef = NULL;
// Create the stream for the request.
readStreamRef = CFReadStreamCreateForHTTPRequest( kCFAllocatorDefault, messageRef );
if ( readStreamRef == NULL ) goto Bail;
if (!CFReadStreamOpen(readStreamRef))
goto Bail;
/*
tr = (CFHTTPMessageRef)CFReadStreamCopyProperty(readStreamRef, kCFStreamPropertyHTTPResponseHeader);
if (tr)
{
sizeStr = CFHTTPMessageCopyHeaderFieldValue (tr, CFSTR("Content-Length"));
if (sizeStr)
str = CFStringGetCStringPtr(sizeStr,CFStringGetSystemEncoding());
}
*/
if (filename)
{
f =fopen(filename,"wb");
if (!f)
{
printf("cannot write file %s\n",filename);
goto Bail;
}
}
while ( (numbytes = CFReadStreamRead (readStreamRef,httpbuff,HTTPBUFLEN ) ) != 0 )
{
/*
tr = (CFHTTPMessageRef)CFReadStreamCopyProperty(readStreamRef, kCFStreamPropertyHTTPResponseHeader);
if (tr)
{
dic = CFHTTPMessageCopyAllHeaderFields (tr);
char *the_pcKeys[50],*the_pcValues[50];
CFDictionaryGetKeysAndValues(dic, (const void
**)&the_pcKeys, (const void **)&the_pcValues);
sizeStr = CFHTTPMessageCopyHeaderFieldValue (tr, CFSTR("Content-Length"));
if (sizeStr)
str = CFStringGetCStringPtr(sizeStr,CFStringGetSystemEncoding());
}
*/
if (numbytes<0)
{
// CFErrorRef err = CFReadStreamCopyError (readStreamRef);
goto Bail;
}
nbread+=numbytes;
if (f)
fwrite(httpbuff,1,numbytes,f);
if (dwLength)
pourcent = (nbread*100)/dwLength;
else
pourcent = -nbread ; //(pourcent+5)%100;
if (filename)
showProgress(url,pourcent);
if (r_sim65816.should_emulator_terminate())
{
outputInfo("Download aborted (%s)\n",url);
goto Bail;
}
//usleep(2000);
}
if (nbread)
bSuccess=true;
{
Bail:
{
if (f) fclose(f);
if (filename && !bSuccess) deleteFile(filename);
if ( messageRef != NULL ) CFRelease( messageRef );
if ( readStreamRef != NULL )
{
//CFReadStreamSetClient( readStreamRef, kCFStreamEventNone, NULL, NULL );
//CFReadStreamUnscheduleFromRunLoop( readStreamRef, CFRunLoopGetCurrent(), kCFRunLoopCommonModes );
CFReadStreamClose( readStreamRef );
CFRelease( readStreamRef );
}
if ( urlRef != NULL )
CFRelease( urlRef );
}
}
#ifdef DRIVER_IOS
if (!bSuccess && bNotifyDownloadFailure)
{
extern void x_notify_download_failure(const char*);
x_notify_download_failure(url);
}
#endif
return bSuccess;
}
bool CDownload::retrievePersistentZippedFile(const char* url,int _order,MyString& _path, MyString& _short)
{
MyString dir = getPersistentDir(url);
DIR* pdir = opendir(dir.c_str());
if (!pdir)
return false;
struct dirent* dp;
MyString search;
search.Format("%d_",_order);
while( (dp=readdir(pdir)) != NULL )
{
if (strstr(dp->d_name,search.c_str())==dp->d_name)
{
_path = dir;
_path += ACTIVEGS_DIRECTORY_SEPARATOR ;
_path += dp->d_name ;
_short = dp->d_name;
closedir(pdir);
return true;
}
}
closedir(pdir);
return false;
}
void CDownload::deleteFile(const char* _dir)
{
remove(_dir);
}
void CDownload::deleteDirectory(const char* _dir,int keepdir)
{
DIR* pdir = opendir(_dir);
if (!pdir)
return ;
struct dirent* dp;
while( (dp=readdir(pdir)) != NULL )
{
MyString name=_dir;
name+=ACTIVEGS_DIRECTORY_SEPARATOR;
name+=dp->d_name;
printf("delete file:%s\n",name.c_str());
deleteFile(name.c_str());
}
closedir(pdir);
if (!keepdir)
rmdir(_dir);
}
void CDownload::createDirectory(const char *_subdir)
{
#ifdef DRIVER_IOS
// rend le chemin absolu
if (strstr(_subdir,homePath.c_str())==_subdir)
_subdir += homePath.length()+1;
MyString fullpath(homePath.c_str());
fullpath+='/';
fullpath+=_subdir;
if (mkdir(fullpath.c_str(),0777))
{
// printf("cannot create %s\n",fullpath.c_str());
}
#else
UniChar nameData[1024];
OSStatus err;
FSRef domain;
// <20>limine le chemin absolu
if (strstr(_subdir,homePath.c_str())==_subdir)
_subdir += homePath.length()+1;
err = FSFindFolder(kUserDomain, kDomainTopLevelFolderType ,kDontCreateFolder, &domain);
const char* file = getfile(_subdir);
// cherche le chemin parent
if (file!=_subdir)
{
MyString dir;
UniChar ename[1024];
FSRef subdomain;
getdir(_subdir,dir);
CFStringRef ed = __CFStringMakeConstantString(dir.c_str());
int l = CFStringGetLength(ed);
CFStringGetCharacters(ed, CFRangeMake(0, l), ename);
err = FSMakeFSRefUnicode (&domain, l, (const UniChar*)ename,0,&subdomain);
domain = subdomain;
_subdir = file;
}
CFStringRef sd = __CFStringMakeConstantString(_subdir);
int lend = CFStringGetLength(sd);
CFStringGetCharacters(sd, CFRangeMake(0, lend), nameData);
err = FSCreateDirectoryUnicode(&domain, lend, nameData, 0, NULL, NULL, NULL, NULL);
if (err !=0)
printf("cannot create %s\n",_subdir);
else
printf("%s created\n",_subdir);
#endif
}
void CDownload::initPersistentSystemPath(MyString& path)
{
extern void x_init_persistent_path(MyString& hp);
x_init_persistent_path(homePath);
if (homePath.GetAt(homePath.GetLength()-1)=='/')
{
MyString tmp (homePath.Left(homePath.GetLength()-1));
homePath = tmp;
}
path = homePath;
/*
CDownload::createDirectory(activegspersistentdir);
MyString c;
c = activegspersistentdir;
c +='/';
c += activegsdownloaddir ;
CDownload::createDirectory(c.c_str());
persistentPath = homePath.c_str() ;
persistentPath += '/';
persistentPath += activegspersistentdir;
printf("mac persistent directory :%s\n",persistentPath.c_str());
// CDownload::setPersistentPath(persistentPath.c_str());
*/
}
#ifndef DRIVER_IOS
void x_init_persistent_path(MyString& hp)
{
OSStatus err;
FSRef homeDir;
err = FSFindFolder(ACTIVEGSDOMAIN, kDomainTopLevelFolderType,kDontCreateFolder, &homeDir);
CFURLRef url = CFURLCreateFromFSRef (NULL,&homeDir);
CFStringRef fullpath = CFURLCopyFileSystemPath (url,kCFURLPOSIXPathStyle);
hp = CFStringGetCStringPtr(fullpath,CFStringGetSystemEncoding());
}
#endif