/* dbmsgreader.m - this file is part of SOGo
 *
 * Copyright (C) 2011-2012 Inverse inc
 *               2015 Enrique J. Hernandez
 *
 *
 * This file 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 3, or (at your option)
 * any later version.
 *
 * This file 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; see the file COPYING.  If not, write to
 * the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */

/* A format-agnostic property list readerer.
   Usage: dbmsgreader [username] [filename] */

#import <Foundation/NSArray.h>
#import <Foundation/NSBundle.h>
#import <Foundation/NSAutoreleasePool.h>
#import <Foundation/NSProcessInfo.h>
#import <Foundation/NSUserDefaults.h>
#import <NGExtensions/NGBase64Coding.h>
#import <NGObjWeb/SoProductRegistry.h>
#import <SOGo/SOGoProductLoader.h>
#import <SOGo/SOGoSystemDefaults.h>

#import <libmapi/libmapi.h>

#import "MAPIStoreUserContext.h"
#import <SOGo/SOGoCacheGCSObject.h>

#import <SOGo/BSONCodec.h>
#import "NSObject+PropertyList.h"


Class MAPIStoreUserContextK, SOGoCacheGCSObjectK, NSStringK;

static void
DumpBSONData(NSData *data)
{
  id key, value;
  NSEnumerator *dictEnum;
  NSDictionary *dvalue;
  NSMutableString *outStr;
  NSUInteger max;

  dvalue = [data BSONValue];
  max = [dvalue count];
  dictEnum = [dvalue keyEnumerator];
  NSStringK = [NSString class];
  outStr = [NSMutableString stringWithFormat: @"{ %d items\n", max];
  while ((key = [dictEnum nextObject]))
    {
      uint32_t proptag = 0;
      if ([key isKindOfClass: NSStringK] && [(NSString *)key intValue] > 0)
        proptag = [(NSString *)key intValue];

      if (proptag > 0)
        {
          const char *propTagName = get_proptag_name (proptag);
          NSString *propName;

          if (propTagName)
            propName = [NSString stringWithCString: propTagName
                                          encoding: NSUTF8StringEncoding];
          else
            propName = [NSString stringWithFormat: @"0x%.4x", [key unsignedLongValue]];

          [outStr appendFormat: @"  %@ = ", propName];
        }
      else
        [outStr appendFormat: @"  %@ = ", key];

      value = [dvalue objectForKey: key];
      [outStr appendFormat: @"(%@) %@,\n", NSStringFromClass ([value class]), value];
    }
  [outStr appendFormat: @"}\n"];
  printf ("%s\n", [outStr UTF8String]);
}

static void
DbDumpObject (NSString *username, NSString *path)
{
  id ctx;
  NSData *content;
  id dbobject;
  NSDictionary *record;

  ctx = [MAPIStoreUserContextK userContextWithUsername: username
                                        andTDBIndexing: NULL];
  dbobject = [SOGoCacheGCSObjectK new];
  [dbobject setTableUrl: [ctx folderTableURL]];
  record = [dbobject lookupRecord: path newerThanVersion: -1];
  if (record)
    {
      printf("record found: %p\n", record);
      content = [[record objectForKey: @"c_content"] dataByDecodingBase64];
      DumpBSONData (content);
    }
  else
    NSLog (@"record not found");

  [dbobject release];
}

int main (int argc, char *argv[], char *envp[])
{
  NSAutoreleasePool *pool;
  SOGoProductLoader *loader;
  NSUserDefaults *ud;
  SoProductRegistry *registry;
  NSArray *arguments;

  /* Here we work around a bug in GNUstep which decodes XML user
     defaults using the system encoding rather than honouring
     the encoding specified in the file. */
  putenv ("GNUSTEP_STRING_ENCODING=NSUTF8StringEncoding");

  pool = [NSAutoreleasePool new];

  [SOGoSystemDefaults sharedSystemDefaults];

  /* We force the plugin to base its configuration on the SOGo tree. */
  ud = [NSUserDefaults standardUserDefaults];
  [ud registerDefaults: [ud persistentDomainForName: @"sogod"]];

  [NSProcessInfo initializeWithArguments: argv
                                   count: argc
                             environment: envp];

  registry = [SoProductRegistry sharedProductRegistry];
  [registry scanForProductsInDirectory: SOGO_BUNDLES_DIR];

  loader = [SOGoProductLoader productLoader];
  [loader loadProducts: [NSArray arrayWithObject: BACKEND_BUNDLE_NAME]];

  MAPIStoreUserContextK = NSClassFromString (@"MAPIStoreUserContext");
  SOGoCacheGCSObjectK = NSClassFromString (@"SOGoCacheGCSObject");

  arguments = [[NSProcessInfo processInfo] arguments];
  if ([arguments count] > 2) {
    DbDumpObject ([arguments objectAtIndex: 1],
                  [arguments objectAtIndex: 2]);
  } else if ([arguments count] > 1) {
    DumpBSONData([[arguments objectAtIndex:1] dataByDecodingBase64]);
  }

  [pool release];

  return 0;
}