hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
hyung-hwan
2006-12-10 16:13:50 +00:00
parent da68173eb2
commit 2ab6aca24e
8 changed files with 282 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files

53
ase/com/Awk.cpp
View File

@ -1,5 +1,5 @@
/*
* $Id: Awk.cpp,v 1.3 2006-12-10 05:59:52 bacon Exp $
* $Id: Awk.cpp,v 1.4 2006-12-10 16:13:50 bacon Exp $
*/
#include "stdafx.h"
@ -193,24 +193,16 @@ MessageBox (NULL, _T("COCREATEINSTANCE FAILED"), _T("FUCK"), MB_OK);
{
INT n = awk->Fire_ReadSource (awk->read_source_buf);
if (n <= 0) return (ase_ssize_t)n;
//if (n > (INT)tmp->str.Length()) return -1;
if (n > (INT)SysStringLen(tmp->str)) return -1;
if (SysStringLen(tmp->str) < (UINT)n) return -1;
awk->read_source_pos = 0;
awk->read_source_len = n;
}
BSTR str = tmp->str;
if (str == NULL)
{
/* it can't be emptry here ... */
return -1;
}
ASE_AWK_ASSERT (awk->handle,
awk->read_source_pos < awk->read_source_len);
BSTR str = tmp->str;
INT left = awk->read_source_len - awk->read_source_pos;
if (left > (ase_ssize_t)count)
{
@ -263,16 +255,15 @@ MessageBox (NULL, _T("COCREATEINSTANCE FAILED"), _T("FUCK"), MB_OK);
}
}
/*
BSTR bstr = SysAllocStringLen (data, count);
if (bstr == NULL) return -1; /* TODO: bettter error handling */
if (bstr == NULL) return -1;
hr = awk->write_source_buf->put_Value (bstr);
SysFreeString (bstr);
if (FAILED(hr))
{
//SysFreeString (bstr);
return -1;
}
SysFreeString (bstr);
if (FAILED(hr)) return -1;
*/
CBuffer* tmp = (CBuffer*)awk->write_source_buf;
if (tmp->PutValue (data, count) == FALSE) return -1; /* TODO: better error handling */
INT n = awk->Fire_WriteSource (awk->write_source_buf);
if (n > (INT)count) return -1;
@ -370,19 +361,14 @@ static ase_ssize_t __process_extio (
IID_IAwkExtio, (void**)&extio);
if (FAILED(hr)) return -1; /* TODO: better error handling.. */
BSTR bstr = SysAllocString (epa->name);
if (bstr == NULL)
extio2 = (CAwkExtio*)extio;
if (extio2->PutName (epa->name) == FALSE)
{
extio->Release ();
return -1; /* TODO: better error handling */
}
extio2 = (CAwkExtio*)extio;
extio2->name.Empty ();
extio2->name.Attach (bstr);
extio2->type = epa->type & 0xFF;
extio2->mode = epa->mode;
VariantClear (&extio2->handle);
INT n = awk->Fire_OpenExtio (extio);
if (n >= 0)
@ -440,16 +426,15 @@ static ase_ssize_t __process_extio (
if (FAILED(hr)) return -1;
}
/*
BSTR bstr = SysAllocStringLen (data, size);
if (bstr == NULL) return -1; /* TODO: error code */
if (bstr == NULL) return -1;
hr = awk->write_extio_buf->put_Value (bstr);
SysFreeString (bstr);
if (FAILED(hr))
{
// SysFreeString (bstr);
return -1;
}
SysFreeString (bstr);
if (FAILED(hr)) return -1;
*/
CBuffer* tmp = (CBuffer*)awk->write_extio_buf;
if (tmp->PutValue (data, size) == FALSE) return -1; /* TODO: better error handling */
INT n = awk->Fire_WriteExtio (extio, awk->write_extio_buf);
if (n > (INT)size) return -1;

25
ase/com/AwkExtio.cpp
View File

@ -1,5 +1,5 @@
/*
* $Id: AwkExtio.cpp,v 1.2 2006-12-09 17:36:27 bacon Exp $
* $Id: AwkExtio.cpp,v 1.3 2006-12-10 16:13:50 bacon Exp $
*/
#include "stdafx.h"
@ -10,7 +10,7 @@
/////////////////////////////////////////////////////////////////////////////
// CAwkExtio
CAwkExtio::CAwkExtio ()
CAwkExtio::CAwkExtio (): name (NULL)
{
#ifdef _DEBUG
TCHAR x[128];
@ -26,15 +26,29 @@ CAwkExtio::~CAwkExtio ()
_sntprintf (x, 128, _T("CAwkExtio::~CAwkExtio %p"), this);
MessageBox (NULL, x, x, MB_OK);
#endif
if (name != NULL) SysFreeString (name);
}
STDMETHODIMP CAwkExtio::get_Name(BSTR *pVal)
STDMETHODIMP CAwkExtio::get_Name (BSTR *pVal)
{
if (name == NULL) *pVal = name;
else
{
BSTR tmp = SysAllocStringLen (name, SysStringLen(name));
if (tmp = NULL) return E_OUTOFMEMORY;
*pVal = tmp;
}
*pVal = name;
return S_OK;
}
BOOL CAwkExtio::PutName (const TCHAR* val)
{
if (name != NULL) SysFreeString (name);
name = SysAllocString (val);
return (name == NULL)? FALSE: TRUE;
}
STDMETHODIMP CAwkExtio::get_Type(int *pVal)
{
*pVal = type;
@ -43,8 +57,7 @@ STDMETHODIMP CAwkExtio::get_Type(int *pVal)
STDMETHODIMP CAwkExtio::get_Mode(int *pVal)
{
// TODO: Add your implementation code here
*pVal = mode;
return S_OK;
}

6
ase/com/AwkExtio.h
View File

@ -1,5 +1,5 @@
/*
* $Id: AwkExtio.h,v 1.3 2006-12-09 17:36:27 bacon Exp $
* $Id: AwkExtio.h,v 1.4 2006-12-10 16:13:50 bacon Exp $
*/
#ifndef _ASE_COM_AWKEXTIO_H_
@ -15,11 +15,13 @@ class ATL_NO_VTABLE CAwkExtio :
public IDispatchImpl<IAwkExtio, &IID_IAwkExtio, &LIBID_ASELib>
{
public:
CComBSTR name;
BSTR name;
int type;
int mode;
CComVariant handle;
BOOL PutName (const TCHAR* val);
CAwkExtio ();
~CAwkExtio ();

10
ase/com/Buffer.cpp
View File

@ -1,5 +1,5 @@
/*
* $Id: Buffer.cpp,v 1.3 2006-12-10 05:59:52 bacon Exp $
* $Id: Buffer.cpp,v 1.4 2006-12-10 16:13:50 bacon Exp $
*/
#include "stdafx.h"
@ -40,7 +40,6 @@ STDMETHODIMP CBuffer::get_Value (BSTR *pVal)
STDMETHODIMP CBuffer::put_Value (BSTR newVal)
{
if (str != NULL) SysFreeString (str);
if (newVal == NULL) str = newVal;
else
@ -51,3 +50,10 @@ STDMETHODIMP CBuffer::put_Value (BSTR newVal)
return S_OK;
}
BOOL CBuffer::PutValue (const TCHAR* val, SIZE_T len)
{
if (str != NULL) SysFreeString (str);
str = SysAllocStringLen (val, len);
return (str == NULL)? FALSE: TRUE;
}

4
ase/com/Buffer.h
View File

@ -1,5 +1,5 @@
/*
* $Id: Buffer.h,v 1.3 2006-12-10 05:59:52 bacon Exp $
* $Id: Buffer.h,v 1.4 2006-12-10 16:13:50 bacon Exp $
*/
#ifndef _ASE_COM_BUFFER_H_
@ -14,8 +14,8 @@ class ATL_NO_VTABLE CBuffer :
public IDispatchImpl<IBuffer, &IID_IBuffer, &LIBID_ASELib>
{
public:
//CComBSTR str;
BSTR str;
BOOL PutValue (const TCHAR* val, SIZE_T len);
public:
CBuffer ();