/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/* ***** BEGIN LICENSE BLOCK *****
 * Version: NPL 1.1/GPL 2.0/LGPL 2.1
 *
 * The contents of this file are subject to the Netscape Public License
 * Version 1.1 (the "License"); you may not use this file except in
 * compliance with the License. You may obtain a copy of the License at
 * http://www.mozilla.org/NPL/
 *
 * Software distributed under the License is distributed on an "AS IS" basis,
 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
 * for the specific language governing rights and limitations under the
 * License.
 *
 * The Original Code is mozilla.org code.
 *
 * The Initial Developer of the Original Code is 
 * Netscape Communications Corporation.
 * Portions created by the Initial Developer are Copyright (C) 1998
 * the Initial Developer. All Rights Reserved.
 *
 * Contributor(s):
 *   Alec Flett <alecf@netscape.com>
 *
 * Alternatively, the contents of this file may be used under the terms of
 * either the GNU General Public License Version 2 or later (the "GPL"), or 
 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
 * in which case the provisions of the GPL or the LGPL are applicable instead
 * of those above. If you wish to allow use of your version of this file only
 * under the terms of either the GPL or the LGPL, and not to allow others to
 * use your version of this file under the terms of the NPL, indicate your
 * decision by deleting the provisions above and replace them with the notice
 * and other provisions required by the GPL or the LGPL. If you do not delete
 * the provisions above, a recipient may use your version of this file under
 * the terms of any one of the NPL, the GPL or the LGPL.
 *
 * ***** END LICENSE BLOCK ***** */

/* OS/2-specific local file uri parsing */

#include "nsIOService.h"
#include "nsEscape.h"
#include "nsPrintfCString.h"
//#define INCL_DOSFILEMGR
//#define INCL_DOSERRORS
//#define INCL_DOSPROCESS
//#define INCL_DOSSESMGR
//#define INCL_DOSMODULEMGR
//#define INCL_DOSNLS
//#define INCL_WINCOUNTRY
//#define INCL_WINWORKPLACE
#include <os2.h>

static int isleadbyte(int c);

NS_IMETHODIMP
nsIOService::GetURLSpecFromFile(nsIFile *aFile, char * *aURL)
{
    NS_ENSURE_ARG_POINTER(aURL);
    *aURL = nsnull;

    nsresult rv;
    char* ePath = nsnull;
    nsCAutoString escPath;

    rv = aFile->GetPath(&ePath);
    if (NS_SUCCEEDED(rv)) {

        // Replace \ with / to convert to an url
        char* s = ePath;
        while (*s)
        {
            // We need to call isleadbyte because
            // Japanese windows can have 0x5C in the sencond byte 
            // of a Japanese character, for example 0x8F 0x5C is
            // one Japanese character
            if(isleadbyte(*s) && *(s+1) != nsnull) {
                s++;
            }
            else if (*s == '\\')
                *s = '/';
            s++;
        }

        // Escape the path with the directory mask
        rv = nsStdEscape(ePath, esc_Directory+esc_Forced, escPath);
        if (NS_SUCCEEDED(rv)) {
        
            if (escPath[escPath.Length() - 1] != '/') {
                PRBool dir;
                rv = aFile->IsDirectory(&dir);
                
                if (NS_FAILED(rv))
                    NS_WARNING(nsPrintfCString("Cannot tell if %s is a directory or file", escPath.get()).get());
                
                if (NS_SUCCEEDED(rv) && dir)
                    // make sure we have a trailing slash
                    escPath += "/";
            }
            
            escPath.Insert("file:///", 0);
            *aURL = ToNewCString(escPath);
            rv = *aURL ? NS_OK : NS_ERROR_OUT_OF_MEMORY;
        }    
      }
    CRTFREEIF(ePath);
    return rv;

}

NS_IMETHODIMP
nsIOService::InitFileFromURLSpec(nsIFile *aFile, const char * aURL)
{
    NS_ENSURE_ARG(aURL);
    nsresult rv;
    
    nsCOMPtr<nsILocalFile> localFile = do_QueryInterface(aFile, &rv);
    NS_ASSERTION(NS_SUCCEEDED(rv), "Only nsILocalFile supported right now");
    if (NS_FAILED(rv)) return rv;
    
    nsXPIDLCString host, directory, fileBaseName, fileExtension;
    
    rv = ParseFileURL(aURL, getter_Copies(host), getter_Copies(directory),
                      getter_Copies(fileBaseName), getter_Copies(fileExtension));
    if (NS_FAILED(rv)) return rv;

    nsCAutoString path;
    nsCAutoString component;

    if (host)
    {
        // We can end up with a host when given: file://C|/ instead of file:///
        if (strlen((const char *)host) == 2 && ((const char *)host)[1] == '|')
        {
            path += host;
            path.SetCharAt(':', 1);
        }
    }
    if (directory)
    {
        nsStdEscape(directory, esc_Directory, component);
        if (!host && component.Length() > 2 && component.CharAt(2) == '|')
            component.SetCharAt(':', 2);
        component.ReplaceChar('/', '\\');
        path += component;
    }    
    if (fileBaseName)
    {
        nsStdEscape(fileBaseName, esc_FileBaseName, component);
        path += component;
    }
    if (fileExtension)
    {
        nsStdEscape(fileExtension, esc_FileExtension, component);
        path += '.';
        path += component;
    }
    
    nsUnescape((char*)path.get());

    // remove leading '\'
    if (path.CharAt(0) == '\\')
        path.Cut(0, 1);

    rv = localFile->InitWithPath(path.get());
    
    return rv;
}

static int isleadbyte(int c)
{
  static BOOL bDBCSFilled=FALSE;
  static BYTE DBCSInfo[12] = { 0 };  /* According to the Control Program Guide&Ref,
                                             12 bytes is sufficient */
  BYTE *curr;
  BOOL retval = FALSE;

  if( !bDBCSFilled ) {
    COUNTRYCODE ctrycodeInfo = { 0 };
    APIRET rc = NO_ERROR;
    ctrycodeInfo.country = 0;     /* Current Country */
    ctrycodeInfo.codepage = 0;    /* Current Codepage */

    rc = DosQueryDBCSEnv( sizeof( DBCSInfo ),
                          &ctrycodeInfo,
                          DBCSInfo );
    if( rc != NO_ERROR ) {
      /* we had an error, do something? */
      return FALSE;
    }
    bDBCSFilled=TRUE;
  }

  curr = DBCSInfo;
  /* DBCSInfo returned by DosQueryDBCSEnv is terminated with two '0' bytes in a row */
  while(( *curr != 0 ) && ( *(curr+1) != 0)) {
    if(( c >= *curr ) && ( c <= *(curr+1) )) {
      retval=TRUE;
      break;
    }
    curr+=2;
  }

  return retval;
}