Herb's warning fixes. Also the POSIX locking fix.
[samba.git] / source / rpc_server / srv_spoolss_nt.c
index 9d465ca145217f8a70da477f92950d965d646a85..5a724d6ab6487fbd701f21203a5530eb3b645b8a 100644 (file)
@@ -1,3 +1,4 @@
+#define OLD_NTDOMAIN 1
 /* 
  *  Unix SMB/Netbios implementation.
  *  Version 1.9.
@@ -21,9 +22,7 @@
  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  */
 
-
 #include "includes.h"
-#include "nterr.h"
 
 extern int DEBUGLEVEL;
 extern pstring global_myname;
@@ -46,15 +45,11 @@ typedef struct _Printer{
        BOOL open;
        BOOL document_started;
        BOOL page_started;
-       uint32 current_jobid;
-       uint32 document_fd;
-       uint32 document_lastwritten;
-       pstring document_name;
-       pstring job_name;
+       int jobid; /* jobid in printing backend */
        POLICY_HND printer_hnd;
        BOOL printer_type;
        union {
-               fstring printername;
+               fstring handlename;
                fstring printerservername;
        } dev;
        uint32 type;
@@ -65,6 +60,8 @@ typedef struct _Printer{
                fstring localmachine; 
                uint32 printerlocal;
                SPOOL_NOTIFY_OPTION *option;
+               POLICY_HND client_hnd;
+               uint32 client_connected;
        } notify;
        struct {
                fstring machine;
@@ -72,9 +69,49 @@ typedef struct _Printer{
        } client;
 } Printer_entry;
 
+typedef struct _counter_printer_0 {
+       ubi_dlNode Next;
+       ubi_dlNode Prev;
+       
+       int snum;
+       uint32 counter;
+} counter_printer_0;
+
 static ubi_dlList Printer_list;
+static ubi_dlList counter_list;
+
+static struct cli_state cli;
+static uint32 smb_connections=0;
+
+#define OPEN_HANDLE(pnum)    ((pnum!=NULL) && (pnum->open!=False) && (IVAL(pnum->printer_hnd.data,16)==(uint32)sys_getpid()))
+#define OUR_HANDLE(pnum) ((pnum==NULL)?"NULL":(IVAL(pnum->data,16)==sys_getpid()?"OURS":"OTHER"))
 
-#define OPEN_HANDLE(pnum)    ((pnum!=NULL) && (pnum->open!=False))
+/* translate between internal status numbers and NT status numbers */
+static int nt_printj_status(int v)
+{
+       switch (v) {
+       case LPQ_PAUSED:
+               return PRINTER_STATUS_PAUSED;
+       case LPQ_QUEUED:
+       case LPQ_SPOOLING:
+       case LPQ_PRINTING:
+               return 0;
+       }
+       return 0;
+}
+
+static int nt_printq_status(int v)
+{
+       switch (v) {
+       case LPQ_PAUSED:
+               return PRINTER_STATUS_PAUSED;
+       case LPQ_QUEUED:
+       case LPQ_SPOOLING:
+       case LPQ_PRINTING:
+               return 0;
+       }
+       return 0;
+}
 
 /****************************************************************************
   initialise printer handle states...
@@ -82,6 +119,7 @@ static ubi_dlList Printer_list;
 void init_printer_hnd(void)
 {
        ubi_dlInitList(&Printer_list);
+       ubi_dlInitList(&counter_list);
 }
 
 /****************************************************************************
@@ -102,7 +140,7 @@ static void create_printer_hnd(POLICY_HND *hnd)
        SIVAL(hnd->data, 4 , prt_hnd_low ); /* second bit is incrementing */
        SIVAL(hnd->data, 8 , prt_hnd_high); /* second bit is incrementing */
        SIVAL(hnd->data, 12, time(NULL));   /* something random */
-       SIVAL(hnd->data, 16, getpid());     /* something more random */
+       SIVAL(hnd->data, 16, sys_getpid());     /* something more random */
 }
 
 /****************************************************************************
@@ -116,8 +154,7 @@ static Printer_entry *find_printer_index_by_hnd(const POLICY_HND *hnd)
 
        for(; find_printer; find_printer = (Printer_entry *)ubi_dlNext(find_printer)) {
 
-               if (memcmp(&(find_printer->printer_hnd), hnd, sizeof(*hnd)) == 0)
-               {
+               if (memcmp(&(find_printer->printer_hnd), hnd, sizeof(*hnd)) == 0) {
                        DEBUG(4,("Found printer handle \n"));
                        /*dump_data(4, hnd->data, sizeof(hnd->data));*/
                        return find_printer;
@@ -134,7 +171,36 @@ static Printer_entry *find_printer_index_by_hnd(const POLICY_HND *hnd)
 ****************************************************************************/
 static void clear_handle(POLICY_HND *hnd)
 {
-       memset(hnd->data, 0, POLICY_HND_SIZE);
+       ZERO_STRUCTP(hnd);
+}
+
+/***************************************************************************
+ Disconnect from the client
+****************************************************************************/
+static BOOL srv_spoolss_replycloseprinter(POLICY_HND *handle)
+{
+       uint32 status;
+
+       /* weird if the test succeds !!! */
+       if (smb_connections==0) {
+               DEBUG(0,("srv_spoolss_replycloseprinter:Trying to close non-existant notify backchannel !\n"));
+               return False;
+       }
+
+       if(!cli_spoolss_reply_close_printer(&cli, handle, &status))
+               return False;
+
+       /* if it's the last connection, deconnect the IPC$ share */
+       if (smb_connections==1) {
+               if(!spoolss_disconnect_from_client(&cli))
+                       return False;
+
+               message_deregister(MSG_PRINTER_NOTIFY);
+       }
+
+       smb_connections--;
+
+       return True;
 }
 
 /****************************************************************************
@@ -144,12 +210,15 @@ static BOOL close_printer_handle(POLICY_HND *hnd)
 {
        Printer_entry *Printer = find_printer_index_by_hnd(hnd);
 
-       if (!OPEN_HANDLE(Printer))
-       {
-               DEBUG(3,("Error closing printer handle\n"));
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("close_printer_handle: Invalid handle (%s)\n", OUR_HANDLE(hnd)));
                return False;
        }
 
+       if (Printer->notify.client_connected==True)
+               if(!srv_spoolss_replycloseprinter(&Printer->notify.client_hnd))
+                       return ERROR_INVALID_HANDLE;
+
        Printer->open=False;
        Printer->notify.flags=0;
        Printer->notify.options=0;
@@ -157,7 +226,8 @@ static BOOL close_printer_handle(POLICY_HND *hnd)
        Printer->notify.printerlocal=0;
        safe_free(Printer->notify.option);
        Printer->notify.option=NULL;
-       
+       Printer->notify.client_connected=False;
+
        clear_handle(hnd);
 
        ubi_dlRemThis(&Printer_list, Printer);
@@ -167,68 +237,92 @@ static BOOL close_printer_handle(POLICY_HND *hnd)
        return True;
 }      
 
+/****************************************************************************
+  delete a printer given a handle
+****************************************************************************/
+static BOOL delete_printer_handle(POLICY_HND *hnd)
+{
+       Printer_entry *Printer = find_printer_index_by_hnd(hnd);
+
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("delete_printer_handle: Invalid handle (%s)\n", OUR_HANDLE(hnd)));
+               return False;
+       }
+
+       if (del_a_printer(Printer->dev.handlename) != 0) {
+               DEBUG(3,("Error deleting printer %s\n", Printer->dev.handlename));
+               return False;
+       }
+
+       if (*lp_deleteprinter_cmd()) {
+
+               pid_t local_pid = sys_getpid();
+               char *cmd = lp_deleteprinter_cmd();
+               char *path;
+               pstring tmp_file;
+               pstring command;
+               int ret;
+               int i;
+
+               if (*lp_pathname(lp_servicenumber(PRINTERS_NAME)))
+                       path = lp_pathname(lp_servicenumber(PRINTERS_NAME));
+               else
+                       path = tmpdir();
+               
+               /* Printer->dev.handlename equals portname equals sharename */
+               slprintf(command, sizeof(command), "%s \"%s\"", cmd,
+                                       Printer->dev.handlename);
+               slprintf(tmp_file, sizeof(tmp_file), "%s/smbcmd.%d", path, local_pid);
+
+               unlink(tmp_file);
+               DEBUG(10,("Running [%s > %s]\n", command,tmp_file));
+               ret = smbrun(command, tmp_file, False);
+               if (ret != 0) {
+                       unlink(tmp_file);
+                       return False;
+               }
+               DEBUGADD(10,("returned [%d]\n", ret));
+               DEBUGADD(10,("Unlinking output file [%s]\n", tmp_file));
+               unlink(tmp_file);
+
+               /* Send SIGHUP to process group... is there a better way? */
+               kill(0, SIGHUP);
+
+               if ( ( i = lp_servicenumber( Printer->dev.handlename ) ) >= 0 ) {
+                       lp_remove_service( i );
+                       lp_killservice( i );
+                       return True;
+               } else
+                       return False;
+       }
+
+       return True;
+}      
+
 /****************************************************************************
   return the snum of a printer corresponding to an handle
 ****************************************************************************/
-static BOOL get_printer_snum(const POLICY_HND *hnd, int *number)
+static BOOL get_printer_snum(POLICY_HND *hnd, int *number)
 {
-       int snum;
        Printer_entry *Printer = find_printer_index_by_hnd(hnd);
-       int n_services=lp_numservices();
                
-       if (!OPEN_HANDLE(Printer))      {
-               DEBUG(3,("Error getting printer - take a nap quickly !\n"));
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("get_printer_snum: Invalid handle (%s)\n", OUR_HANDLE(hnd)));
                return False;
        }
        
        switch (Printer->printer_type) {
        case PRINTER_HANDLE_IS_PRINTER:            
-               DEBUG(4,("short name:%s\n", Printer->dev.printername));                 
-               for (snum=0;snum<n_services; snum++) {
-                       if (lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) ) {
-                               DEBUG(4,("share:%s\n",lp_servicename(snum)));
-                               if (   ( strlen(lp_servicename(snum)) == strlen( Printer->dev.printername ) ) 
-                                   && ( !strncasecmp(lp_servicename(snum), 
-                                                     Printer->dev.printername,
-                                                     strlen( lp_servicename(snum) ))) ) {
-                                       DEBUG(4,("Printer found: %s[%x]\n",lp_servicename(snum),snum));
-                                       *number=snum;
-                                       return True;
-                                       break;  
-                               }
-                       }
-               }
-               return False;
-               break;          
+               DEBUG(4,("short name:%s\n", Printer->dev.handlename));                  
+               *number = print_queue_snum(Printer->dev.handlename);
+               return (*number != -1);
        case PRINTER_HANDLE_IS_PRINTSERVER:
                return False;
-               break;
        default:
                return False;
-               break;
        }
 }
 
-/****************************************************************************
-  find first available printer slot. creates a printer handle for you.
- ****************************************************************************/
-static BOOL open_printer_hnd(POLICY_HND *hnd)
-{
-       Printer_entry *new_printer;
-
-       new_printer=(Printer_entry *)malloc(sizeof(Printer_entry));
-       ZERO_STRUCTP(new_printer);
-       
-       new_printer->open = True;
-       new_printer->notify.option=NULL;
-                               
-       memcpy(&(new_printer->printer_hnd), hnd, sizeof(*hnd));
-       
-       ubi_dlAddHead( &Printer_list, (ubi_dlNode *)new_printer);
-
-       return True;
-}
-
 /****************************************************************************
   set printer handle type.
 ****************************************************************************/
@@ -237,7 +331,7 @@ static BOOL set_printer_hnd_accesstype(POLICY_HND *hnd, uint32 access_required)
        Printer_entry *Printer = find_printer_index_by_hnd(hnd);
 
        if (!OPEN_HANDLE(Printer)) {
-               DEBUG(4,("Error setting printer type=%x", access_required));
+               DEBUG(0,("set_printer_hnd_accesstype: Invalid handle (%s)", OUR_HANDLE(hnd)));
                return False;
        }
 
@@ -247,74 +341,61 @@ static BOOL set_printer_hnd_accesstype(POLICY_HND *hnd, uint32 access_required)
 }
 
 /****************************************************************************
 set printer handle type.
 check if it's \\server or \\server\printer
Set printer handle type.
Check if it's \\server or \\server\printer
 ****************************************************************************/
-static BOOL set_printer_hnd_printertype(POLICY_HND *hnd, char *printername)
+
+static BOOL set_printer_hnd_printertype(Printer_entry *Printer, char *handlename)
 {
-       Printer_entry *Printer = find_printer_index_by_hnd(hnd);
-               
-       if (!OPEN_HANDLE(Printer)) {
-               DEBUGADD(4,("Error setting printer name %s", printername));
-               return False;
-       }
-       
-       DEBUG(3,("Setting printer type=%s\n", printername));
+       DEBUG(3,("Setting printer type=%s\n", handlename));
 
-       if ( strlen(printername) < 3 ) {
-               DEBUGADD(4,("A print server must have at least 1 char ! %s\n", printername));
+       if ( strlen(handlename) < 3 ) {
+               DEBUGADD(4,("A print server must have at least 1 char ! %s\n", handlename));
                return False;
        }
 
        /* it's a print server */
-       if (!strchr(printername+2, '\\')) {
+       if (!strchr(handlename+2, '\\')) {
                DEBUGADD(4,("Printer is a print server\n"));
                Printer->printer_type = PRINTER_HANDLE_IS_PRINTSERVER;          
-               return True;
        }
        /* it's a printer */
        else {
                DEBUGADD(4,("Printer is a printer\n"));
                Printer->printer_type = PRINTER_HANDLE_IS_PRINTER;
-               return True;
        }
 
-       return False;
+       return True;
 }
 
 /****************************************************************************
 set printer handle printername.
Set printer handle name.
 ****************************************************************************/
-static BOOL set_printer_hnd_printername(POLICY_HND *hnd, char *printername)
+
+static BOOL set_printer_hnd_name(Printer_entry *Printer, char *handlename)
 {
-       Printer_entry *Printer = find_printer_index_by_hnd(hnd);
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        int snum;
        int n_services=lp_numservices();
        char *aprinter;
        BOOL found=False;
        
-       if (!OPEN_HANDLE(Printer))
-       {
-               DEBUG(0,("Error setting printer name=%s\n", printername));
-               return False;
-       }
-
-       DEBUG(4,("Setting printer name=%s (len=%d)\n", printername, strlen(printername)));
+       DEBUG(4,("Setting printer name=%s (len=%d)\n", handlename, strlen(handlename)));
 
        if (Printer->printer_type==PRINTER_HANDLE_IS_PRINTSERVER) {
                ZERO_STRUCT(Printer->dev.printerservername);
-               strncpy(Printer->dev.printerservername, printername, strlen(printername));
+               strncpy(Printer->dev.printerservername, handlename, strlen(handlename));
                return True;
        }
 
        if (Printer->printer_type!=PRINTER_HANDLE_IS_PRINTER)
                return False;
        
-       aprinter=strchr(printername+2, '\\');
+       aprinter=strchr(handlename+2, '\\');
        aprinter++;
 
        DEBUGADD(5,("searching for [%s] (len=%d)\n", aprinter, strlen(aprinter)));
+
        /*
         * store the Samba share name in it
         * in back we have the long printer name
@@ -325,7 +406,7 @@ static BOOL set_printer_hnd_printername(POLICY_HND *hnd, char *printername)
 
        for (snum=0;snum<n_services && found==False;snum++) {
        
-               if ( !(lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) ) )
+               if ( !(lp_snum_ok(snum) && lp_print_ok(snum) ) )
                        continue;
                
                DEBUGADD(5,("share:%s\n",lp_servicename(snum)));
@@ -333,31 +414,114 @@ static BOOL set_printer_hnd_printername(POLICY_HND *hnd, char *printername)
                if (get_a_printer(&printer, 2, lp_servicename(snum))!=0)
                        continue;
 
-               if ( strlen(printer.info_2->printername) != strlen(aprinter) ) {
-                       free_a_printer(printer, 2);
+               DEBUG(10,("set_printer_hnd_name: name [%s], aprinter [%s]\n", 
+                               printer->info_2->printername, aprinter ));
+
+               if ( strlen(printer->info_2->printername) != strlen(aprinter) ) {
+                       free_a_printer(&printer, 2);
                        continue;
                }
                
-               if ( strncasecmp(printer.info_2->printername, aprinter, strlen(aprinter)))  {
-                       free_a_printer(printer, 2);
+               if ( strncasecmp(printer->info_2->printername, aprinter, strlen(aprinter)))  {
+                       free_a_printer(&printer, 2);
                        continue;
                }
                
                found=True;
        }
 
-       if (found==False)
-       {
+       /* 
+        * if we haven't found a printer with the given handlename
+        * then it can be a share name as you can open both \\server\printer and
+        * \\server\share
+        */
+
+       /*
+        * we still check if the printer description file exists as NT won't be happy
+        * if we reply OK in the openprinter call and can't reply in the subsequent RPC calls
+        */
+
+       if (found==False) {
+               DEBUGADD(5,("Printer not found, checking for share now\n"));
+       
+               for (snum=0;snum<n_services && found==False;snum++) {
+       
+                       if ( !(lp_snum_ok(snum) && lp_print_ok(snum) ) )
+                               continue;
+               
+                       DEBUGADD(5,("set_printer_hnd_name: share:%s\n",lp_servicename(snum)));
+
+                       if (get_a_printer(&printer, 2, lp_servicename(snum))!=0)
+                               continue;
+
+                       DEBUG(10,("set_printer_hnd_name: printername [%s], aprinter [%s]\n", 
+                                       printer->info_2->printername, aprinter ));
+
+                       if ( strlen(lp_servicename(snum)) != strlen(aprinter) ) {
+                               free_a_printer(&printer, 2);
+                               continue;
+                       }
+               
+                       if ( strncasecmp(lp_servicename(snum), aprinter, strlen(aprinter)))  {
+                               free_a_printer(&printer, 2);
+                               continue;
+                       }
+               
+                       found=True;
+               }
+       }
+               
+       if (found==False) {
                DEBUGADD(4,("Printer not found\n"));
                return False;
        }
        
        snum--;
-       DEBUGADD(4,("Printer found: %s[%x]\n",lp_servicename(snum),snum));
-       ZERO_STRUCT(Printer->dev.printername);
-       strncpy(Printer->dev.printername, lp_servicename(snum), strlen(lp_servicename(snum)));
-       free_a_printer(printer, 2);
+       DEBUGADD(4,("set_printer_hnd_name: Printer found: %s -> %s[%x]\n",
+                       printer->info_2->printername, lp_servicename(snum),snum));
+
+       ZERO_STRUCT(Printer->dev.handlename);
+       strncpy(Printer->dev.handlename, lp_servicename(snum), strlen(lp_servicename(snum)));
+       
+       free_a_printer(&printer, 2);
+
+       return True;
+}
+
+/****************************************************************************
+  find first available printer slot. creates a printer handle for you.
+ ****************************************************************************/
+
+static BOOL open_printer_hnd(POLICY_HND *hnd, char *name)
+{
+       Printer_entry *new_printer;
+
+       DEBUG(10,("open_printer_hnd: name [%s]\n", name));
+       clear_handle(hnd);
+       create_printer_hnd(hnd);
+
+       if((new_printer=(Printer_entry *)malloc(sizeof(Printer_entry))) == NULL)
+               return False;
+
+       ZERO_STRUCTP(new_printer);
+       
+       new_printer->open = True;
+       new_printer->notify.option=NULL;
+                               
+       memcpy(&new_printer->printer_hnd, hnd, sizeof(*hnd));
+       
+       ubi_dlAddHead( &Printer_list, (ubi_dlNode *)new_printer);
+
+       if (!set_printer_hnd_printertype(new_printer, name)) {
+               close_printer_handle(hnd);
+               return False;
+       }
        
+       if (!set_printer_hnd_name(new_printer, name)) {
+               close_printer_handle(hnd);
+               return False;
+       }
+
        return True;
 }
 
@@ -386,7 +550,7 @@ static BOOL alloc_buffer_size(NEW_BUFFER *buffer, uint32 buffer_size)
        uint32 extra_space;
        uint32 old_offset;
        
-       ps=&(buffer->prs);
+       ps= &buffer->prs;
 
        /* damn, I'm doing the reverse operation of prs_grow() :) */
        if (buffer_size < prs_data_size(ps))
@@ -411,6 +575,72 @@ static BOOL alloc_buffer_size(NEW_BUFFER *buffer, uint32 buffer_size)
        return True;
 }
 
+/***************************************************************************
+ receive the notify message
+****************************************************************************/
+void srv_spoolss_receive_message(int msg_type, pid_t src, void *buf, size_t len)
+{      
+       fstring printer;
+       uint32 status;
+       Printer_entry *find_printer;
+
+       *printer = '\0';
+       fstrcpy(printer,buf);
+
+       if (len == 0) {
+               DEBUG(0,("srv_spoolss_receive_message: got null message !\n"));
+               return;
+       }
+
+       DEBUG(10,("srv_spoolss_receive_message: Got message about printer %s\n", printer ));
+
+       find_printer = (Printer_entry *)ubi_dlFirst(&Printer_list);
+
+       /* Iterate the printer list. */
+       for(; find_printer; find_printer = (Printer_entry *)ubi_dlNext(find_printer)) {
+
+               /* 
+                * if the entry is the given printer or if it's a printerserver
+                * we send the message
+                */
+
+               if (find_printer->printer_type==PRINTER_HANDLE_IS_PRINTER)
+                       if (strcmp(find_printer->dev.handlename, printer))
+                               continue;
+
+               if (find_printer->notify.client_connected==True)
+                       cli_spoolss_reply_rrpcn(&cli, &find_printer->notify.client_hnd, PRINTER_CHANGE_ALL, 0x0, &status);
+
+       }
+}
+
+/***************************************************************************
+ send a notify event
+****************************************************************************/
+static BOOL srv_spoolss_sendnotify(POLICY_HND *handle)
+{
+       fstring printer;
+
+       Printer_entry *Printer=find_printer_index_by_hnd(handle);
+
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("srv_spoolss_sendnotify: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return False;
+       }
+
+       if (Printer->printer_type==PRINTER_HANDLE_IS_PRINTER)
+               fstrcpy(printer, Printer->dev.handlename);
+       else
+               fstrcpy(printer, "");
+
+       /*srv_spoolss_receive_message(printer);*/
+       DEBUG(10,("srv_spoolss_sendnotify: Sending message about printer %s\n", printer ));
+
+       message_send_all(MSG_PRINTER_NOTIFY, printer, strlen(printer) + 1); /* Null terminate... */
+
+       return True;
+}      
+
 /********************************************************************
  * spoolss_open_printer
  *
@@ -423,10 +653,8 @@ uint32 _spoolss_open_printer_ex( const UNISTR2 *printername,
 {
        fstring name;
        
-       clear_handle(handle);
-       
        if (printername == NULL)
-               return NT_STATUS_ACCESS_DENIED;
+               return ERROR_INVALID_PRINTER_NAME;
 
        /* some sanity check because you can open a printer or a print server */
        /* aka: \\server\printer or \\server */
@@ -434,20 +662,9 @@ uint32 _spoolss_open_printer_ex( const UNISTR2 *printername,
 
        DEBUGADD(3,("checking name: %s\n",name));
 
-       create_printer_hnd(handle);
-
-       open_printer_hnd(handle);
-       
-       if (!set_printer_hnd_printertype(handle, name)) {
-               close_printer_handle(handle);
-               return NT_STATUS_ACCESS_DENIED;
-       }
+       if (!open_printer_hnd(handle, name))
+               return ERROR_INVALID_PRINTER_NAME;
        
-       if (!set_printer_hnd_printername(handle, name)) {
-               close_printer_handle(handle);
-               return NT_STATUS_ACCESS_DENIED;
-       }
-
 /*
        if (printer_default->datatype_ptr != NULL)
        {
@@ -460,9 +677,20 @@ uint32 _spoolss_open_printer_ex( const UNISTR2 *printername,
        
        if (!set_printer_hnd_accesstype(handle, printer_default->access_required)) {
                close_printer_handle(handle);
-               return NT_STATUS_ACCESS_DENIED;
+               return ERROR_ACCESS_DENIED;
        }
                
+       /* Disallow MS AddPrinterWizard if access rights are insufficient OR
+          if parameter disables it. The client tries an OpenPrinterEx with
+          SERVER_ALL_ACCESS(0xf0003), which we force to fail. It then tries
+          OpenPrinterEx with SERVER_READ(0x20002) which we allow. This lets
+          it see any printers there, but does not show the MSAPW */
+       if (handle_is_printserver(handle) &&
+               printer_default->access_required != (SERVER_READ) &&
+               !lp_ms_add_printer_wizard() ) {
+               return ERROR_ACCESS_DENIED;
+       }
+
        return NT_STATUS_NO_PROBLEMO;
 }
 
@@ -473,7 +701,7 @@ static BOOL convert_printer_info(const SPOOL_PRINTER_INFO_LEVEL *uni,
 {
        switch (level) {
                case 2: 
-                       uni_2_asc_printer_info_2(uni->info_2, &(printer->info_2));
+                       uni_2_asc_printer_info_2(uni->info_2, &printer->info_2);
                        break;
                default:
                        break;
@@ -488,7 +716,11 @@ static BOOL convert_printer_driver_info(const SPOOL_PRINTER_DRIVER_INFO_LEVEL *u
        switch (level) {
                case 3: 
                        printer->info_3=NULL;
-                       uni_2_asc_printer_driver_3(uni->info_3, &(printer->info_3));                                            
+                       uni_2_asc_printer_driver_3(uni->info_3, &printer->info_3);
+                       break;
+               case 6: 
+                       printer->info_6=NULL;
+                       uni_2_asc_printer_driver_6(uni->info_6, &printer->info_6);
                        break;
                default:
                        break;
@@ -497,52 +729,51 @@ static BOOL convert_printer_driver_info(const SPOOL_PRINTER_DRIVER_INFO_LEVEL *u
        return True;
 }
 
-static BOOL convert_devicemode(DEVICEMODE devmode, NT_DEVICEMODE *nt_devmode)
-{
-       unistr_to_ascii(nt_devmode->devicename, devmode.devicename.buffer, 31);
-       unistr_to_ascii(nt_devmode->formname, devmode.formname.buffer, 31);
-
-       nt_devmode->specversion=devmode.specversion;
-       nt_devmode->driverversion=devmode.driverversion;
-       nt_devmode->size=devmode.size;
-       nt_devmode->driverextra=devmode.driverextra;
-       nt_devmode->fields=devmode.fields;
-       nt_devmode->orientation=devmode.orientation;
-       nt_devmode->papersize=devmode.papersize;
-       nt_devmode->paperlength=devmode.paperlength;
-       nt_devmode->paperwidth=devmode.paperwidth;
-       nt_devmode->scale=devmode.scale;
-       nt_devmode->copies=devmode.copies;
-       nt_devmode->defaultsource=devmode.defaultsource;
-       nt_devmode->printquality=devmode.printquality;
-       nt_devmode->color=devmode.color;
-       nt_devmode->duplex=devmode.duplex;
-       nt_devmode->yresolution=devmode.yresolution;
-       nt_devmode->ttoption=devmode.ttoption;
-       nt_devmode->collate=devmode.collate;
-
-       nt_devmode->logpixels=devmode.logpixels;
-       nt_devmode->bitsperpel=devmode.bitsperpel;
-       nt_devmode->pelswidth=devmode.pelswidth;
-       nt_devmode->pelsheight=devmode.pelsheight;
-       nt_devmode->displayflags=devmode.displayflags;
-       nt_devmode->displayfrequency=devmode.displayfrequency;
-       nt_devmode->icmmethod=devmode.icmmethod;
-       nt_devmode->icmintent=devmode.icmintent;
-       nt_devmode->mediatype=devmode.mediatype;
-       nt_devmode->dithertype=devmode.dithertype;
-       nt_devmode->reserved1=devmode.reserved1;
-       nt_devmode->reserved2=devmode.reserved2;
-       nt_devmode->panningwidth=devmode.panningwidth;
-       nt_devmode->panningheight=devmode.panningheight;
-
-       if (nt_devmode->driverextra != 0) 
-       {
+static BOOL convert_devicemode(const DEVICEMODE *devmode, NT_DEVICEMODE *nt_devmode)
+{
+       unistr_to_dos(nt_devmode->devicename, (const char *)devmode->devicename.buffer, 31);
+       unistr_to_dos(nt_devmode->formname, (const char *)devmode->formname.buffer, 31);
+
+       nt_devmode->specversion=devmode->specversion;
+       nt_devmode->driverversion=devmode->driverversion;
+       nt_devmode->size=devmode->size;
+       nt_devmode->driverextra=devmode->driverextra;
+       nt_devmode->fields=devmode->fields;
+       nt_devmode->orientation=devmode->orientation;
+       nt_devmode->papersize=devmode->papersize;
+       nt_devmode->paperlength=devmode->paperlength;
+       nt_devmode->paperwidth=devmode->paperwidth;
+       nt_devmode->scale=devmode->scale;
+       nt_devmode->copies=devmode->copies;
+       nt_devmode->defaultsource=devmode->defaultsource;
+       nt_devmode->printquality=devmode->printquality;
+       nt_devmode->color=devmode->color;
+       nt_devmode->duplex=devmode->duplex;
+       nt_devmode->yresolution=devmode->yresolution;
+       nt_devmode->ttoption=devmode->ttoption;
+       nt_devmode->collate=devmode->collate;
+
+       nt_devmode->logpixels=devmode->logpixels;
+       nt_devmode->bitsperpel=devmode->bitsperpel;
+       nt_devmode->pelswidth=devmode->pelswidth;
+       nt_devmode->pelsheight=devmode->pelsheight;
+       nt_devmode->displayflags=devmode->displayflags;
+       nt_devmode->displayfrequency=devmode->displayfrequency;
+       nt_devmode->icmmethod=devmode->icmmethod;
+       nt_devmode->icmintent=devmode->icmintent;
+       nt_devmode->mediatype=devmode->mediatype;
+       nt_devmode->dithertype=devmode->dithertype;
+       nt_devmode->reserved1=devmode->reserved1;
+       nt_devmode->reserved2=devmode->reserved2;
+       nt_devmode->panningwidth=devmode->panningwidth;
+       nt_devmode->panningheight=devmode->panningheight;
+
+       if (nt_devmode->driverextra != 0) {
                /* if we had a previous private delete it and make a new one */
-               if (nt_devmode->private != NULL)
-                       free(nt_devmode->private);
-               nt_devmode->private=(uint8 *)malloc(nt_devmode->driverextra * sizeof(uint8));
-               memcpy(nt_devmode->private, devmode.private, nt_devmode->driverextra);
+               safe_free(nt_devmode->private);
+               if((nt_devmode->private=(uint8 *)malloc(nt_devmode->driverextra * sizeof(uint8))) == NULL)
+                       return False;
+               memcpy(nt_devmode->private, devmode->private, nt_devmode->driverextra);
        }
 
        return True;
@@ -553,8 +784,31 @@ static BOOL convert_devicemode(DEVICEMODE devmode, NT_DEVICEMODE *nt_devmode)
  ********************************************************************/
 uint32 _spoolss_closeprinter(POLICY_HND *handle)
 {
+       Printer_entry *Printer=find_printer_index_by_hnd(handle);
+
+       if (Printer && Printer->document_started)
+               _spoolss_enddocprinter(handle);          /* print job was not closed */
+
        if (!close_printer_handle(handle))
-               return NT_STATUS_INVALID_HANDLE;        
+               return ERROR_INVALID_HANDLE;    
+               
+       return NT_STATUS_NO_PROBLEMO;
+}
+
+/********************************************************************
+ * api_spoolss_deleteprinter
+ ********************************************************************/
+uint32 _spoolss_deleteprinter(POLICY_HND *handle)
+{
+       Printer_entry *Printer=find_printer_index_by_hnd(handle);
+
+       if (Printer && Printer->document_started)
+               _spoolss_enddocprinter(handle);          /* print job was not closed */
+
+       if (!delete_printer_handle(handle))
+               return ERROR_INVALID_HANDLE;    
+
+       srv_spoolss_sendnotify(handle);
                
        return NT_STATUS_NO_PROBLEMO;
 }
@@ -568,68 +822,66 @@ static BOOL getprinterdata_printer_server(fstring value, uint32 *type, uint8 **d
        
        DEBUG(8,("getprinterdata_printer_server:%s\n", value));
                
-       if (!strcmp(value, "BeepEnabled"))
-       {
+       if (!strcmp(value, "BeepEnabled")) {
                *type = 0x4;
-               *data = (uint8 *)malloc( 4*sizeof(uint8) );
+               if((*data = (uint8 *)malloc( 4*sizeof(uint8) )) == NULL)
+                       return False;
                SIVAL(*data, 0, 0x01);
                *needed = 0x4;                  
                return True;
        }
 
-       if (!strcmp(value, "EventLog"))
-       {
+       if (!strcmp(value, "EventLog")) {
                *type = 0x4;
-               *data = (uint8 *)malloc( 4*sizeof(uint8) );
+               if((*data = (uint8 *)malloc( 4*sizeof(uint8) )) == NULL)
+                       return False;
                SIVAL(*data, 0, 0x1B);
                *needed = 0x4;                  
                return True;
        }
 
-       if (!strcmp(value, "NetPopup"))
-       {
+       if (!strcmp(value, "NetPopup")) {
                *type = 0x4;
-               *data = (uint8 *)malloc( 4*sizeof(uint8) );
+               if((*data = (uint8 *)malloc( 4*sizeof(uint8) )) == NULL)
+                       return False;
                SIVAL(*data, 0, 0x01);
                *needed = 0x4;
                return True;
        }
 
-       if (!strcmp(value, "MajorVersion"))
-       {
+       if (!strcmp(value, "MajorVersion")) {
                *type = 0x4;
-               *data = (uint8 *)malloc( 4*sizeof(uint8) );
+               if((*data = (uint8 *)malloc( 4*sizeof(uint8) )) == NULL)
+                       return False;
                SIVAL(*data, 0, 0x02);
                *needed = 0x4;
                return True;
        }
 
-       if (!strcmp(value, "DefaultSpoolDirectory"))
-       {
+       if (!strcmp(value, "DefaultSpoolDirectory")) {
                pstring string="You are using a Samba server";
                *type = 0x1;                    
                *needed = 2*(strlen(string)+1);         
-               *data  = (uint8 *)malloc( ((*needed > in_size) ? *needed:in_size) *sizeof(uint8));
+               if((*data  = (uint8 *)malloc( ((*needed > in_size) ? *needed:in_size) *sizeof(uint8))) == NULL)
+                       return False;
                memset(*data, 0, (*needed > in_size) ? *needed:in_size);
                
                /* it's done by hand ready to go on the wire */
-               for (i=0; i<strlen(string); i++)
-               {
+               for (i=0; i<strlen(string); i++) {
                        (*data)[2*i]=string[i];
                        (*data)[2*i+1]='\0';
                }                       
                return True;
        }
 
-       if (!strcmp(value, "Architecture"))
-       {                       
+       if (!strcmp(value, "Architecture")) {                   
                pstring string="Windows NT x86";
                *type = 0x1;                    
                *needed = 2*(strlen(string)+1); 
-               *data  = (uint8 *)malloc( ((*needed > in_size) ? *needed:in_size) *sizeof(uint8));
+               if((*data  = (uint8 *)malloc( ((*needed > in_size) ? *needed:in_size) *sizeof(uint8))) == NULL)
+                       return False;
                memset(*data, 0, (*needed > in_size) ? *needed:in_size);
-               for (i=0; i<strlen(string); i++)
-               {
+               for (i=0; i<strlen(string); i++) {
                        (*data)[2*i]=string[i];
                        (*data)[2*i+1]='\0';
                }                       
@@ -642,11 +894,11 @@ static BOOL getprinterdata_printer_server(fstring value, uint32 *type, uint8 **d
 /********************************************************************
  GetPrinterData on a printer Handle.
 ********************************************************************/
-static BOOL getprinterdata_printer(const POLICY_HND *handle,
+static BOOL getprinterdata_printer(POLICY_HND *handle,
                                fstring value, uint32 *type, 
                                uint8 **data, uint32 *needed, uint32 in_size )
 {
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        int snum=0;
        uint8 *idata=NULL;
        uint32 len;
@@ -654,31 +906,51 @@ static BOOL getprinterdata_printer(const POLICY_HND *handle,
        
        DEBUG(5,("getprinterdata_printer\n"));
 
-       if (OPEN_HANDLE(Printer))
-       {
-               get_printer_snum(handle, &snum);                
-               get_a_printer(&printer, 2, lp_servicename(snum));
-               
-               if (get_specific_param(printer, 2, value, &idata, type, &len)) 
-               {
-                       *data  = (uint8 *)malloc( (len>in_size)?len:in_size *sizeof(uint8) );
-                       memset(*data, 0, sizeof(uint8)*len);
-                       memcpy(*data, idata, (len>in_size)?len:in_size);
-                       *needed = len;
-                       
-                       if (idata) free(idata);
-                       return (True);
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("getprinterdata_printer: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return False;
+       }
+
+       if(!get_printer_snum(handle, &snum))
+               return False;
+
+       if(get_a_printer(&printer, 2, lp_servicename(snum)) != 0)
+               return False;
+
+       if (!get_specific_param(*printer, 2, value, &idata, type, &len)) {
+               free_a_printer(&printer, 2);
+               return False;
+       }
+
+       free_a_printer(&printer, 2);
+
+       DEBUG(5,("getprinterdata_printer:allocating %d\n", in_size));
+
+       if (in_size) {
+               if((*data  = (uint8 *)malloc( in_size *sizeof(uint8) )) == NULL) {
+                       return False;
                }
-               free_a_printer(printer, 2);
+
+               memset(*data, 0, in_size *sizeof(uint8));
+               /* copy the min(in_size, len) */
+               memcpy(*data, idata, (len>in_size)?in_size:len *sizeof(uint8));
+       } else {
+               *data = NULL;
        }
 
-       return (False);
+       *needed = len;
+       
+       DEBUG(5,("getprinterdata_printer:copy done\n"));
+                       
+       safe_free(idata);
+       
+       return True;
 }      
 
 /********************************************************************
  * spoolss_getprinterdata
  ********************************************************************/
-uint32 _spoolss_getprinterdata(const POLICY_HND *handle, UNISTR2 *valuename,
+uint32 _spoolss_getprinterdata(POLICY_HND *handle, UNISTR2 *valuename,
                                uint32 in_size,
                                uint32 *type,
                                uint32 *out_size,
@@ -705,8 +977,10 @@ uint32 _spoolss_getprinterdata(const POLICY_HND *handle, UNISTR2 *valuename,
        DEBUG(4,("_spoolss_getprinterdata\n"));
        
        if (!OPEN_HANDLE(Printer)) {
-               *data=(uint8 *)malloc(4*sizeof(uint8));
-               return NT_STATUS_INVALID_HANDLE;
+               if((*data=(uint8 *)malloc(4*sizeof(uint8))) == NULL)
+                       return ERROR_NOT_ENOUGH_MEMORY;
+               DEBUG(0,("_spoolss_getprinterdata: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
        
        unistr2_to_ascii(value, valuename, sizeof(value)-1);
@@ -717,20 +991,53 @@ uint32 _spoolss_getprinterdata(const POLICY_HND *handle, UNISTR2 *valuename,
                found=getprinterdata_printer(handle, value, type, data, needed, *out_size);
 
        if (found==False) {
+               DEBUG(5, ("value not found, allocating %d\n", *out_size));
                /* reply this param doesn't exist */
-               *data=(uint8 *)malloc(4*sizeof(uint8));
-               memset(*data, 0x0, 4);
+               if (*out_size) {
+                       if((*data=(uint8 *)malloc(*out_size*sizeof(uint8))) == NULL)
+                               return ERROR_NOT_ENOUGH_MEMORY;
+                       memset(*data, '\0', *out_size*sizeof(uint8));
+               } else {
+                       *data = NULL;
+               }
+
                return ERROR_INVALID_PARAMETER;
        }
        
        if (*needed > *out_size)
-               return ERROR_INSUFFICIENT_BUFFER;
+               return ERROR_MORE_DATA;
        else
                return NT_STATUS_NO_PROBLEMO;
 }
 
-/********************************************************************
- * _spoolss_rffpcnex
+/***************************************************************************
+ connect to the client
+****************************************************************************/
+static BOOL srv_spoolss_replyopenprinter(char *printer, uint32 localprinter, uint32 type, POLICY_HND *handle)
+{
+       uint32 status;
+
+       /*
+        * If it's the first connection, contact the client 
+        * and connect to the IPC$ share anonumously
+        */
+       if (smb_connections==0) {
+               if(!spoolss_connect_to_client(&cli, printer+2)) /* the +2 is to strip the leading 2 backslashs */
+                       return False;
+               message_register(MSG_PRINTER_NOTIFY, srv_spoolss_receive_message);
+
+       }
+
+       smb_connections++;
+
+       if(!cli_spoolss_reply_open_printer(&cli, printer, localprinter, type, &status, handle))
+               return False;
+
+       return True;
+}
+
+/********************************************************************
+ * _spoolss_rffpcnex
  * ReplyFindFirstPrinterChangeNotifyEx
  *
  * jfmxxxx: before replying OK: status=0
@@ -740,7 +1047,7 @@ uint32 _spoolss_getprinterdata(const POLICY_HND *handle, UNISTR2 *valuename,
  * in fact ReplyOpenPrinter is the changenotify equivalent on the spoolss pipe
  * called from api_spoolss_rffpcnex 
  ********************************************************************/
-uint32 _spoolss_rffpcnex(const POLICY_HND *handle, uint32 flags, uint32 options,
+uint32 _spoolss_rffpcnex(POLICY_HND *handle, uint32 flags, uint32 options,
                         const UNISTR2 *localmachine, uint32 printerlocal,
                         SPOOL_NOTIFY_OPTION *option)
 {
@@ -748,8 +1055,10 @@ uint32 _spoolss_rffpcnex(const POLICY_HND *handle, uint32 flags, uint32 options,
 
        Printer_entry *Printer=find_printer_index_by_hnd(handle);
 
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_rffpcnex: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
 
        Printer->notify.flags=flags;
        Printer->notify.options=options;
@@ -757,36 +1066,42 @@ uint32 _spoolss_rffpcnex(const POLICY_HND *handle, uint32 flags, uint32 options,
        Printer->notify.option=option;
        unistr2_to_ascii(Printer->notify.localmachine, localmachine, sizeof(Printer->notify.localmachine)-1);
 
+       /* connect to the client machine and send a ReplyOpenPrinter */
+       if(srv_spoolss_replyopenprinter(Printer->notify.localmachine, 
+                                       Printer->notify.printerlocal, 1, 
+                                       &Printer->notify.client_hnd))
+               Printer->notify.client_connected=True;
+
        return NT_STATUS_NO_PROBLEMO;
 }
 
 /*******************************************************************
  * fill a notify_info_data with the servername
  ********************************************************************/
-static void spoolss_notify_server_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
+static void spoolss_notify_server_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue,
+                                                                               NT_PRINTER_INFO_LEVEL *printer)
 {
        pstring temp_name;
 
-       snprintf(temp_name, sizeof(temp_name), "\\\\%s", global_myname);
+       snprintf(temp_name, sizeof(temp_name)-1, "\\\\%s", global_myname);
 
-       data->notify_data.data.length=strlen(temp_name);
-       ascii_to_unistr(data->notify_data.data.string, temp_name, sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length= (uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                                       temp_name, sizeof(data->notify_data.data.string), True) - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
  * fill a notify_info_data with the servicename
  * jfmxxxx: it's incorrect should be long_printername
  ********************************************************************/
-static void spoolss_notify_printer_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
+static void spoolss_notify_printer_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue,
+                                                                               NT_PRINTER_INFO_LEVEL *printer)
 {
 /*
        data->notify_data.data.length=strlen(lp_servicename(snum));
-       ascii_to_unistr(data->notify_data.data.string, lp_servicename(snum), sizeof(data->notify_data.data.string)-1);
+       dos_PutUniCode(data->notify_data.data.string, lp_servicename(snum), sizeof(data->notify_data.data.string), True);
 */
-       data->notify_data.data.length=strlen(printer->info_2->printername);
-       ascii_to_unistr(data->notify_data.data.string, 
-                       printer->info_2->printername, 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                               printer->info_2->printername, sizeof(data->notify_data.data.string), True) - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -794,10 +1109,8 @@ static void spoolss_notify_printer_name(int snum, SPOOL_NOTIFY_INFO_DATA *data,
  ********************************************************************/
 static void spoolss_notify_share_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(lp_servicename(snum));
-       ascii_to_unistr(data->notify_data.data.string,
-                       lp_servicename(snum), 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       lp_servicename(snum), sizeof(data->notify_data.data.string),True) - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -807,10 +1120,8 @@ static void spoolss_notify_port_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, pri
 {
        /* even if it's strange, that's consistant in all the code */
 
-       data->notify_data.data.length=strlen(lp_servicename(snum));
-       ascii_to_unistr(data->notify_data.data.string,
-                       lp_servicename(snum), 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+               lp_servicename(snum), sizeof(data->notify_data.data.string), True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -820,10 +1131,8 @@ static void spoolss_notify_port_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, pri
  ********************************************************************/
 static void spoolss_notify_driver_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(printer->info_2->drivername);
-       ascii_to_unistr(data->notify_data.data.string, 
-                       printer->info_2->drivername, 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       printer->info_2->drivername, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -831,10 +1140,12 @@ static void spoolss_notify_driver_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, p
  ********************************************************************/
 static void spoolss_notify_comment(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(lp_comment(snum));
-       ascii_to_unistr(data->notify_data.data.string,
-                       lp_comment(snum),
-                       sizeof(data->notify_data.data.string)-1);
+       if (*printer->info_2->comment == '\0')
+               data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       lp_comment(snum), sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
+       else
+               data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       printer->info_2->comment, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -844,10 +1155,8 @@ static void spoolss_notify_comment(int snum, SPOOL_NOTIFY_INFO_DATA *data, print
  ********************************************************************/
 static void spoolss_notify_location(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(printer->info_2->location);
-       ascii_to_unistr(data->notify_data.data.string, 
-                       printer->info_2->location, 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       printer->info_2->location, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -865,10 +1174,8 @@ static void spoolss_notify_devmode(int snum, SPOOL_NOTIFY_INFO_DATA *data, print
  ********************************************************************/
 static void spoolss_notify_sepfile(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(printer->info_2->sepfile);
-       ascii_to_unistr(data->notify_data.data.string, 
-                       printer->info_2->sepfile, 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       printer->info_2->sepfile, sizeof(data->notify_data.data.string)-1,True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -877,10 +1184,8 @@ static void spoolss_notify_sepfile(int snum, SPOOL_NOTIFY_INFO_DATA *data, print
  ********************************************************************/
 static void spoolss_notify_print_processor(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(printer->info_2->printprocessor);
-       ascii_to_unistr(data->notify_data.data.string, 
-                       printer->info_2->printprocessor, 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       printer->info_2->printprocessor, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -889,10 +1194,8 @@ static void spoolss_notify_print_processor(int snum, SPOOL_NOTIFY_INFO_DATA *dat
  ********************************************************************/
 static void spoolss_notify_parameters(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(printer->info_2->parameters);
-       ascii_to_unistr(data->notify_data.data.string, 
-                       printer->info_2->parameters, 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       printer->info_2->parameters, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -901,10 +1204,8 @@ static void spoolss_notify_parameters(int snum, SPOOL_NOTIFY_INFO_DATA *data, pr
  ********************************************************************/
 static void spoolss_notify_datatype(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(printer->info_2->datatype);
-       ascii_to_unistr(data->notify_data.data.string, 
-                       printer->info_2->datatype, 
-                       sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       printer->info_2->datatype, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -925,7 +1226,7 @@ static void spoolss_notify_security_desc(int snum, SPOOL_NOTIFY_INFO_DATA *data,
 static void spoolss_notify_attributes(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
        data->notify_data.value[0] =   PRINTER_ATTRIBUTE_SHARED   \
-                                    | PRINTER_ATTRIBUTE_NETWORK  \
+                                    | PRINTER_ATTRIBUTE_LOCAL  \
                                     | PRINTER_ATTRIBUTE_RAW_ONLY ;
 }
 
@@ -971,9 +1272,9 @@ static void spoolss_notify_status(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_
        print_status_struct status;
 
        memset(&status, 0, sizeof(status));
-       count=get_printqueue(snum, NULL, &q, &status);
+       count = print_queue_status(snum, &q, &status);
        data->notify_data.value[0]=(uint32) status.status;
-       if (q) free(q);
+       safe_free(q);
 }
 
 /*******************************************************************
@@ -985,8 +1286,8 @@ static void spoolss_notify_cjobs(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_q
        print_status_struct status;
 
        memset(&status, 0, sizeof(status));
-       data->notify_data.value[0]=get_printqueue(snum, NULL, &q, &status);
-       if (q) free(q);
+       data->notify_data.value[0] = print_queue_status(snum, &q, &status);
+       safe_free(q);
 }
 
 /*******************************************************************
@@ -1004,8 +1305,8 @@ static void spoolss_notify_average_ppm(int snum, SPOOL_NOTIFY_INFO_DATA *data, p
  ********************************************************************/
 static void spoolss_notify_username(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(queue->user);
-       ascii_to_unistr(data->notify_data.data.string, queue->user, sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       queue->user, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -1013,7 +1314,7 @@ static void spoolss_notify_username(int snum, SPOOL_NOTIFY_INFO_DATA *data, prin
  ********************************************************************/
 static void spoolss_notify_job_status(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.value[0]=queue->status;
+       data->notify_data.value[0]=nt_printj_status(queue->status);
 }
 
 /*******************************************************************
@@ -1021,8 +1322,8 @@ static void spoolss_notify_job_status(int snum, SPOOL_NOTIFY_INFO_DATA *data, pr
  ********************************************************************/
 static void spoolss_notify_job_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen(queue->file);
-       ascii_to_unistr(data->notify_data.data.string, queue->file, sizeof(data->notify_data.data.string)-1);
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                       queue->file, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -1030,8 +1331,23 @@ static void spoolss_notify_job_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, prin
  ********************************************************************/
 static void spoolss_notify_job_status_string(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer)
 {
-       data->notify_data.data.length=strlen("En attente");
-       ascii_to_unistr(data->notify_data.data.string, "En attente", sizeof(data->notify_data.data.string)-1);
+       char *p = "unknown";
+       switch (queue->status) {
+       case LPQ_QUEUED:
+               p = "QUEUED";
+               break;
+       case LPQ_PAUSED:
+               p = "PAUSED";
+               break;
+       case LPQ_SPOOLING:
+               p = "SPOOLING";
+               break;
+       case LPQ_PRINTING:
+               p = "PRINTING";
+               break;
+       }
+       data->notify_data.data.length=(uint32)((dos_PutUniCode((char *)data->notify_data.data.string,
+                               p, sizeof(data->notify_data.data.string)-1, True)  - sizeof(uint16))/sizeof(uint16));
 }
 
 /*******************************************************************
@@ -1060,6 +1376,17 @@ static void spoolss_notify_job_position(int snum, SPOOL_NOTIFY_INFO_DATA *data,
 
 #define END 65535
 
+struct s_notify_info_data_table
+{
+       uint16 type;
+       uint16 field;
+       char *name;
+       uint32 size;
+       void (*fn) (int snum, SPOOL_NOTIFY_INFO_DATA *data,
+                   print_queue_struct *queue,
+                   NT_PRINTER_INFO_LEVEL *printer);
+};
+
 struct s_notify_info_data_table notify_info_data_table[] =
 {
 { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_SERVER_NAME,         "PRINTER_NOTIFY_SERVER_NAME",         POINTER,   spoolss_notify_server_name },
@@ -1128,7 +1455,6 @@ static uint32 size_of_notify_info_data(uint16 type, uint16 field)
                     (notify_info_data_table[i].field == field ) )
                {
                        return (notify_info_data_table[i].size);
-                       continue;
                }
                i++;
        }
@@ -1155,7 +1481,6 @@ static BOOL type_of_notify_info_data(uint16 type, uint16 field)
                        {
                                return (True);
                        }
-                       continue;
                }
                i++;
        }
@@ -1208,7 +1533,7 @@ static BOOL construct_notify_printer_info(SPOOL_NOTIFY_INFO *info, int snum, SPO
        uint16 field;
 
        SPOOL_NOTIFY_INFO_DATA *current_data;
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        print_queue_struct *queue=NULL;
        
        DEBUG(4,("construct_notify_printer_info\n"));
@@ -1220,28 +1545,27 @@ static BOOL construct_notify_printer_info(SPOOL_NOTIFY_INFO *info, int snum, SPO
                option_type->count, lp_servicename(snum)));
        
        if (get_a_printer(&printer, 2, lp_servicename(snum))!=0)
-       {
                return False;
-       }
 
-       for(field_num=0; field_num<option_type->count; field_num++)
-       {
+       for(field_num=0; field_num<option_type->count; field_num++) {
                field = option_type->fields[field_num];
                DEBUGADD(4,("notify [%d]: type [%x], field [%x]\n", field_num, type, field));
 
                if (!search_notify(type, field, &j) )
                        continue;
                
-               info->data=Realloc(info->data, (info->count+1)*sizeof(SPOOL_NOTIFY_INFO_DATA));
-               current_data=&(info->data[info->count]);
+               if((info->data=Realloc(info->data, (info->count+1)*sizeof(SPOOL_NOTIFY_INFO_DATA))) == NULL) {
+                       return False;
+               }
+               current_data=&info->data[info->count];
 
                construct_info_data(current_data, type, field, id);             
-               notify_info_data_table[j].fn(snum, current_data, queue, &printer);
+               notify_info_data_table[j].fn(snum, current_data, queue, printer);
 
                info->count++;
        }
 
-       free_a_printer(printer, 2);
+       free_a_printer(&printer, 2);
        return True;
 }
 
@@ -1257,7 +1581,7 @@ static BOOL construct_notify_jobs_info(print_queue_struct *queue, SPOOL_NOTIFY_I
        uint16 field;
 
        SPOOL_NOTIFY_INFO_DATA *current_data;
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        
        DEBUG(4,("construct_notify_jobs_info\n"));
        
@@ -1268,27 +1592,26 @@ static BOOL construct_notify_jobs_info(print_queue_struct *queue, SPOOL_NOTIFY_I
                option_type->count));
 
        if (get_a_printer(&printer, 2, lp_servicename(snum))!=0)
-       {       
                return False;
-       }
        
-       for(field_num=0; field_num<option_type->count; field_num++)
-       {
+       for(field_num=0; field_num<option_type->count; field_num++) {
                field = option_type->fields[field_num];
 
                if (!search_notify(type, field, &j) )
                        continue;
 
-               info->data=Realloc(info->data, (info->count+1)*sizeof(SPOOL_NOTIFY_INFO_DATA));
+               if((info->data=Realloc(info->data, (info->count+1)*sizeof(SPOOL_NOTIFY_INFO_DATA))) == NULL) {
+                       return False;
+               }
+
                current_data=&(info->data[info->count]);
 
                construct_info_data(current_data, type, field, id);
-               notify_info_data_table[j].fn(snum, current_data, queue, &printer);
+               notify_info_data_table[j].fn(snum, current_data, queue, printer);
                info->count++;
        }
-       
-       free_a_printer(printer, 2);
-       
+
+       free_a_printer(&printer, 2);    
        return True;
 }
 
@@ -1341,8 +1664,7 @@ static uint32 printserver_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *
        info->data=NULL;
        info->count=0;
 
-       for (i=0; i<option->count; i++)
-       {
+       for (i=0; i<option->count; i++) {
                option_type=&(option->ctr.type[i]);
                
                if (option_type->type!=PRINTER_NOTIFY_TYPE)
@@ -1362,8 +1684,7 @@ static uint32 printserver_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *
        DEBUGADD(1,("info->version:[%d], info->flags:[%d], info->count:[%d]\n", info->version, info->flags, info->count));
        DEBUGADD(1,("num\ttype\tfield\tres\tid\tsize\tenc_type\n"));
        
-       for (i=0; i<info->count; i++)
-       {
+       for (i=0; i<info->count; i++) {
                DEBUGADD(1,("[%d]\t[%d]\t[%d]\t[%d]\t[%d]\t[%d]\t[%d]\n",
                i, info->data[i].type, info->data[i].field, info->data[i].reserved,
                info->data[i].id, info->data[i].size, info->data[i].enc_type));
@@ -1378,7 +1699,7 @@ static uint32 printserver_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *
  * fill a notify_info struct with info asked
  * 
  ********************************************************************/
-static uint32 printer_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *info)
+static uint32 printer_notify_info(POLICY_HND *hnd, SPOOL_NOTIFY_INFO *info)
 {
        int snum;
        Printer_entry *Printer=find_printer_index_by_hnd(hnd);
@@ -1393,29 +1714,27 @@ static uint32 printer_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *info
        DEBUG(4,("printer_notify_info\n"));
 
        option=Printer->notify.option;
-       id=1;
+       id=0xffffffff;
        info->version=2;
        info->data=NULL;
        info->count=0;
 
        get_printer_snum(hnd, &snum);
 
-       for (i=0; i<option->count; i++)
-       {
-               option_type=&(option->ctr.type[i]);
+       for (i=0; i<option->count; i++) {
+               option_type=&option->ctr.type[i];
                
                switch ( option_type->type ) {
                case PRINTER_NOTIFY_TYPE:
                        if(construct_notify_printer_info(info, snum, option_type, id))
-                               id++;
+                               id--;
                        break;
                        
                case JOB_NOTIFY_TYPE:
                        memset(&status, 0, sizeof(status));     
-                       count=get_printqueue(snum, NULL, &queue, &status);
+                       count = print_queue_status(snum, &queue, &status);
                        for (j=0; j<count; j++)
-                               if (construct_notify_jobs_info(&(queue[j]), info, snum, option_type, id))
-                                       id++;
+                               construct_notify_jobs_info(&queue[j], info, snum, option_type, queue[j].job);
                        safe_free(queue);
                        break;
                }
@@ -1429,8 +1748,7 @@ static uint32 printer_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *info
        DEBUGADD(1,("info->version:[%d], info->flags:[%d], info->count:[%d]\n", info->version, info->flags, info->count));
        DEBUGADD(1,("num\ttype\tfield\tres\tid\tsize\tenc_type\n"));
        
-       for (i=0; i<info->count; i++)
-       {
+       for (i=0; i<info->count; i++) {
                DEBUGADD(1,("[%d]\t[%d]\t[%d]\t[%d]\t[%d]\t[%d]\t[%d]\n",
                i, info->data[i].type, info->data[i].field, info->data[i].reserved,
                info->data[i].id, info->data[i].size, info->data[i].enc_type));
@@ -1442,13 +1760,15 @@ static uint32 printer_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *info
 /********************************************************************
  * spoolss_rfnpcnex
  ********************************************************************/
-uint32 _spoolss_rfnpcnex( const POLICY_HND *handle, uint32 change,
+uint32 _spoolss_rfnpcnex( POLICY_HND *handle, uint32 change,
                          SPOOL_NOTIFY_OPTION *option, SPOOL_NOTIFY_INFO *info)
 {
        Printer_entry *Printer=find_printer_index_by_hnd(handle);
 
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_rfnpcnex: Invalid handle (%s).\n",OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
 
        DEBUG(4,("Printer type %x\n",Printer->printer_type));
 
@@ -1467,83 +1787,123 @@ uint32 _spoolss_rfnpcnex( const POLICY_HND *handle, uint32 change,
        if (option!=NULL)
                safe_free(option->ctr.type);
        
-       safe_free(option);
-
        switch (Printer->printer_type) {
                case PRINTER_HANDLE_IS_PRINTSERVER:
                        return printserver_notify_info(handle, info);
-                       break;
                case PRINTER_HANDLE_IS_PRINTER:
                        return printer_notify_info(handle, info);
-                       break;
        }
 
-       return NT_STATUS_INVALID_INFO_CLASS;
+       return ERROR_INVALID_HANDLE;
 }
 
 /********************************************************************
  * construct_printer_info_0
  * fill a printer_info_1 struct
  ********************************************************************/
-static BOOL construct_printer_info_0(PRINTER_INFO_0 *printer,int snum, pstring servername)
+static BOOL construct_printer_info_0(PRINTER_INFO_0 *printer, int snum, fstring servername)
 {
        pstring chaine;
        int count;
-       NT_PRINTER_INFO_LEVEL ntprinter;
-       
+       NT_PRINTER_INFO_LEVEL *ntprinter = NULL;
+       counter_printer_0 *session_counter;
+       uint32 global_counter;
+       struct tm *t;
+       time_t setup_time = time(NULL);
+
        print_queue_struct *queue=NULL;
        print_status_struct status;
+       
        memset(&status, 0, sizeof(status));     
 
        if (get_a_printer(&ntprinter, 2, lp_servicename(snum)) != 0)
-       {
-               return (False);
+               return False;
+
+       count = print_queue_status(snum, &queue, &status);
+
+       /* check if we already have a counter for this printer */       
+       session_counter = (counter_printer_0 *)ubi_dlFirst(&counter_list);
+
+       for(; session_counter; session_counter = (counter_printer_0 *)ubi_dlNext(session_counter)) {
+               if (session_counter->snum == snum)
+                       break;
        }
 
-       count=get_printqueue(snum, NULL, &queue, &status);
+       /* it's the first time, add it to the list */
+       if (session_counter==NULL) {
+               if((session_counter=(counter_printer_0 *)malloc(sizeof(counter_printer_0))) == NULL) {
+                       free_a_printer(&ntprinter, 2);
+                       return False;
+               }
+               ZERO_STRUCTP(session_counter);
+               session_counter->snum=snum;
+               session_counter->counter=0;
+               ubi_dlAddHead( &counter_list, (ubi_dlNode *)session_counter);
+       }
+       
+       /* increment it */
+       session_counter->counter++;
+       
+       /* JFM:
+        * the global_counter should be stored in a TDB as it's common to all the clients
+        * and should be zeroed on samba startup
+        */
+       global_counter=session_counter->counter;
        
        /* the description and the name are of the form \\server\share */
-       slprintf(chaine,sizeof(chaine)-1,"\\\\%s\\%s",servername, ntprinter.info_2->printername);
-                                                           
-       init_unistr(&(printer->printername), chaine);
+       slprintf(chaine,sizeof(chaine)-1,"\\\\%s\\%s",servername, ntprinter->info_2->printername);
+
+       init_unistr(&printer->printername, chaine);
        
        slprintf(chaine,sizeof(chaine)-1,"\\\\%s", servername);
-       init_unistr(&(printer->servername), chaine);
+       init_unistr(&printer->servername, chaine);
        
        printer->cjobs = count;
-       printer->attributes =   PRINTER_ATTRIBUTE_SHARED   \
-                             | PRINTER_ATTRIBUTE_NETWORK  \
-                             | PRINTER_ATTRIBUTE_RAW_ONLY ;
-       printer->unknown0     = 0x1; /* pointer */
-       printer->unknown1     = 0x000A07CE; /* don't known */
-       printer->unknown2     = 0x00020005;
-       printer->unknown3     = 0x0006000D;
-       printer->unknown4     = 0x02180026;
-       printer->unknown5     = 0x09;
-       printer->unknown6     = 0x36;
-       printer->majorversion = 0x0004; /* NT 4 */
-       printer->buildversion = 0x0565; /* build 1381 */
-       printer->unknown7     = 0x1;
-       printer->unknown8     = 0x0;
-       printer->unknown9     = 0x2;
-       printer->unknown10    = 0x3;
-       printer->unknown11    = 0x0;
-       printer->unknown12    = 0x0;
-       printer->unknown13    = 0x0;
-       printer->unknown14    = 0x1;
-       printer->unknown15    = 0x024a; /*586 Pentium ? */
-       printer->unknown16    = 0x0;
-       printer->unknown17    = 0x423ed444; /* CacheChangeID */
-       printer->unknown18    = 0x0;
-       printer->status       = status.status;
-       printer->unknown20    = 0x0;
-       printer->unknown21    = 0x0648;
-       printer->unknown22    = 0x0;
-       printer->unknown23    = 0x5;
-
+       printer->total_jobs = 0;
+       printer->total_bytes = 0;
+
+       t=gmtime(&setup_time);
+       ntprinter->info_2->setuptime = (uint32)setup_time; /* FIXME !! */
+
+       printer->year = t->tm_year+1900;
+       printer->month = t->tm_mon+1;
+       printer->dayofweek = t->tm_wday;
+       printer->day = t->tm_mday;
+       printer->hour = t->tm_hour;
+       printer->minute = t->tm_min;
+       printer->second = t->tm_sec;
+       printer->milliseconds = 0;
+
+       printer->global_counter = global_counter;
+       printer->total_pages = 0;
+       printer->major_version = 0x0004;        /* NT 4 */
+       printer->build_version = 0x0565;        /* build 1381 */
+       printer->unknown7 = 0x1;
+       printer->unknown8 = 0x0;
+       printer->unknown9 = 0x0;
+       printer->session_counter = session_counter->counter;
+       printer->unknown11 = 0x0;
+       printer->printer_errors = 0x0;          /* number of print failure */
+       printer->unknown13 = 0x0;
+       printer->unknown14 = 0x1;
+       printer->unknown15 = 0x024a;            /* 586 Pentium ? */
+       printer->unknown16 = 0x0;
+       printer->change_id = ntprinter->info_2->changeid; /* ChangeID in milliseconds*/
+       printer->unknown18 = 0x0;
+       printer->status = nt_printq_status(status.status);
+       printer->unknown20 = 0x0;
+       printer->c_setprinter = ntprinter->info_2->c_setprinter; /* how many times setprinter has been called */
+       printer->unknown22 = 0x0;
+       printer->unknown23 = 0x6;               /* 6  ???*/
+       printer->unknown24 = 0;                 /* unknown 24 to 26 are always 0 */
+       printer->unknown25 = 0;
+       printer->unknown26 = 0;
+       printer->unknown27 = 0;
+       printer->unknown28 = 0;
+       printer->unknown29 = 0;
+       
        safe_free(queue);
-
-       free_a_printer(ntprinter, 2);
+       free_a_printer(&ntprinter,2);
        return (True);  
 }
 
@@ -1551,63 +1911,92 @@ static BOOL construct_printer_info_0(PRINTER_INFO_0 *printer,int snum, pstring s
  * construct_printer_info_1
  * fill a printer_info_1 struct
  ********************************************************************/
-static BOOL construct_printer_info_1(PRINTER_INFO_1 *printer, int snum, pstring servername)
+static BOOL construct_printer_info_1(fstring server, uint32 flags, PRINTER_INFO_1 *printer, int snum)
 {
        pstring chaine;
        pstring chaine2;
-       NT_PRINTER_INFO_LEVEL ntprinter;
-       
+       NT_PRINTER_INFO_LEVEL *ntprinter = NULL;
+
        if (get_a_printer(&ntprinter, 2, lp_servicename(snum)) != 0)
-       {
-               return (False);
+               return False;
+
+       printer->flags=flags;
+
+       if (*ntprinter->info_2->comment == '\0') {
+               init_unistr(&printer->comment, lp_comment(snum));
+               snprintf(chaine,sizeof(chaine)-1,"%s%s,%s,%s",server, ntprinter->info_2->printername,
+                       ntprinter->info_2->drivername, lp_comment(snum));
+       }
+       else {
+               init_unistr(&printer->comment, ntprinter->info_2->comment); /* saved comment. */
+               snprintf(chaine,sizeof(chaine)-1,"%s%s,%s,%s",server, ntprinter->info_2->printername,
+                       ntprinter->info_2->drivername, ntprinter->info_2->comment);
        }
+               
+       snprintf(chaine2,sizeof(chaine)-1,"%s%s", server, ntprinter->info_2->printername);
+
+       init_unistr(&printer->description, chaine);
+       init_unistr(&printer->name, chaine2);   
        
-       printer->flags=PRINTER_ENUM_ICON8;
+       free_a_printer(&ntprinter,2);
 
-       /* the description and the name are of the form \\server\share */
+       return True;
+}
 
-       snprintf(chaine,sizeof(chaine)-1,"\\\\%s\\%s,%s,%s",servername,
-                                                           ntprinter.info_2->printername,
-                                                           ntprinter.info_2->drivername,
-                                                           lp_comment(snum));
-       init_unistr(&(printer->description), chaine);
-       
-       snprintf(chaine2,sizeof(chaine)-1,"\\\\%s\\%s", servername, ntprinter.info_2->printername);
-       init_unistr(&(printer->name), chaine2);
-       
-       init_unistr(&(printer->comment), lp_comment(snum));
-       
-       free_a_printer(ntprinter, 2);
+/****************************************************************************
+ Free a DEVMODE struct.
+****************************************************************************/
 
-       return (True);
+static void free_dev_mode(DEVICEMODE *dev)
+{
+       if (dev == NULL)
+               return;
+
+       if (dev->private)
+               safe_free(dev->private);
+
+       safe_free(dev); 
 }
 
 /****************************************************************************
+ Create a DEVMODE struct. Returns malloced memory.
 ****************************************************************************/
-static void construct_dev_mode(DEVICEMODE *devmode, int snum, char *servername)
+
+static DEVICEMODE *construct_dev_mode(int snum, char *servername)
 {
        char adevice[32];
        char aform[32];
-       NT_PRINTER_INFO_LEVEL printer;  
-       NT_DEVICEMODE *ntdevmode;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
+       NT_DEVICEMODE *ntdevmode = NULL;
+       DEVICEMODE *devmode = NULL;
 
        DEBUG(7,("construct_dev_mode\n"));
        
-       memset(&(devmode->devicename), 0, 2*sizeof(adevice));
-       memset(&(devmode->formname), 0, 2*sizeof(aform));
-
        DEBUGADD(8,("getting printer characteristics\n"));
 
-       get_a_printer(&printer, 2, lp_servicename(snum));
-       ntdevmode=(printer.info_2)->devmode;
+       if ((devmode = (DEVICEMODE *)malloc(sizeof(DEVICEMODE))) == NULL) {
+               DEBUG(0,("construct_dev_mode: malloc fail.\n"));
+               return NULL;
+       }
+
+       ZERO_STRUCTP(devmode);  
+
+       if(get_a_printer(&printer, 2, lp_servicename(snum)) != 0)
+               goto fail;
+
+       if (printer->info_2->devmode)
+               ntdevmode = dup_nt_devicemode(printer->info_2->devmode);
+
+       if (ntdevmode == NULL)
+               goto fail;
 
        DEBUGADD(8,("loading DEVICEMODE\n"));
-       snprintf(adevice, sizeof(adevice), "\\\\%s\\%s", global_myname, 
-                                                        printer.info_2->printername);
-       init_unistr(&(devmode->devicename), adevice);
+
+       snprintf(adevice, sizeof(adevice), "\\\\%s\\%s", global_myname, printer->info_2->printername);
+       init_unistr(&devmode->devicename, adevice);
 
        snprintf(aform, sizeof(aform), ntdevmode->formname);
-       init_unistr(&(devmode->formname), aform);
+       init_unistr(&devmode->formname, aform);
 
        devmode->specversion      = ntdevmode->specversion;
        devmode->driverversion    = ntdevmode->driverversion;
@@ -1633,156 +2022,203 @@ static void construct_dev_mode(DEVICEMODE *devmode, int snum, char *servername)
        devmode->mediatype        = ntdevmode->mediatype;
        devmode->dithertype       = ntdevmode->dithertype;
 
-       if (ntdevmode->private != NULL)
-       {
-               devmode->private=(uint8 *)malloc(devmode->driverextra*sizeof(uint8));
-               memcpy(devmode->private, ntdevmode->private, devmode->driverextra);
+       if (ntdevmode->private != NULL) {
+               if ((devmode->private=(uint8 *)memdup(ntdevmode->private, ntdevmode->driverextra)) == NULL)
+                       goto fail;
        }
 
-       free_a_printer(printer, 2);
+       free_nt_devicemode(&ntdevmode);
+       free_a_printer(&printer,2);
+
+       return devmode;
+
+  fail:
+
+       if (ntdevmode)
+               free_nt_devicemode(&ntdevmode);
+       if (printer)
+               free_a_printer(&printer,2);
+       free_dev_mode(devmode);
+
+       return NULL;
 }
 
 /********************************************************************
  * construct_printer_info_2
  * fill a printer_info_2 struct
  ********************************************************************/
-static BOOL construct_printer_info_2(PRINTER_INFO_2 *printer, int snum, pstring servername)
+
+static BOOL construct_printer_info_2(fstring servername, PRINTER_INFO_2 *printer, int snum)
 {
        pstring chaine;
+       pstring chaine2;
+       pstring sl;
        int count;
-       DEVICEMODE *devmode;
-       NT_PRINTER_INFO_LEVEL ntprinter;
-       
+       NT_PRINTER_INFO_LEVEL *ntprinter = NULL;
+
        print_queue_struct *queue=NULL;
        print_status_struct status;
        memset(&status, 0, sizeof(status));     
-       count=get_printqueue(snum, NULL, &queue, &status);
 
        if (get_a_printer(&ntprinter, 2, lp_servicename(snum)) !=0 )
-       {
-               return (False);
-       }       
+               return False;
+               
+       memset(&status, 0, sizeof(status));             
+       count = print_queue_status(snum, &queue, &status);
 
-       snprintf(chaine, sizeof(chaine)-1, "\\\\%s", servername);
-       init_unistr(&(printer->servername), chaine);                    /* servername*/
-       
-       snprintf(chaine, sizeof(chaine)-1, "\\\\%s\\%s", servername, ntprinter.info_2->printername);
-       init_unistr(&(printer->printername), chaine);                   /* printername*/
+       snprintf(chaine, sizeof(chaine)-1, "%s", servername);
+
+       if (strlen(servername)!=0)
+               fstrcpy(sl, "\\");
+       else
+               fstrcpy(sl, '\0');
 
-       init_unistr(&(printer->sharename),      lp_servicename(snum));  /* sharename */
+       snprintf(chaine2, sizeof(chaine)-1, "%s%s%s", servername, sl, ntprinter->info_2->printername);
 
-       init_unistr(&(printer->portname),       lp_servicename(snum));          /* port */      
-       init_unistr(&(printer->drivername),     ntprinter.info_2->drivername);  /* drivername */
-               
-       init_unistr(&(printer->comment),        ntprinter.info_2->comment);     /* comment */   
-       init_unistr(&(printer->location),       ntprinter.info_2->location);    /* location */  
-       init_unistr(&(printer->sepfile),        ntprinter.info_2->sepfile);     /* separator file */
-       init_unistr(&(printer->printprocessor), ntprinter.info_2->printprocessor);/* print processor */
-       init_unistr(&(printer->datatype),       ntprinter.info_2->datatype);    /* datatype */  
-       init_unistr(&(printer->parameters),     ntprinter.info_2->parameters);  /* parameters (of print processor) */   
-
-       printer->attributes =   PRINTER_ATTRIBUTE_SHARED   \
-                             | PRINTER_ATTRIBUTE_NETWORK  \
-                             | PRINTER_ATTRIBUTE_RAW_ONLY ;            /* attributes */
-
-       printer->priority        = ntprinter.info_2->priority;          /* priority */  
-       printer->defaultpriority = ntprinter.info_2->default_priority;  /* default priority */
-       printer->starttime       = ntprinter.info_2->starttime;         /* starttime */
-       printer->untiltime       = ntprinter.info_2->untiltime;         /* untiltime */
-       printer->status          = status.status;                       /* status */
-       printer->cjobs           = count;                               /* jobs */
-       printer->averageppm      = ntprinter.info_2->averageppm;        /* average pages per minute */
+       init_unistr(&printer->servername, chaine);                              /* servername*/
+       init_unistr(&printer->printername, chaine2);                            /* printername*/
+       init_unistr(&printer->sharename, lp_servicename(snum));                 /* sharename */
+       init_unistr(&printer->portname, ntprinter->info_2->portname);                   /* port */      
+       init_unistr(&printer->drivername, ntprinter->info_2->drivername);       /* drivername */
+
+       if (*ntprinter->info_2->comment == '\0')
+               init_unistr(&printer->comment, lp_comment(snum));                       /* comment */   
+       else
+               init_unistr(&printer->comment, ntprinter->info_2->comment); /* saved comment. */
+
+       init_unistr(&printer->location, ntprinter->info_2->location);           /* location */  
+       init_unistr(&printer->sepfile, ntprinter->info_2->sepfile);             /* separator file */
+       init_unistr(&printer->printprocessor, ntprinter->info_2->printprocessor);/* print processor */
+       init_unistr(&printer->datatype, ntprinter->info_2->datatype);           /* datatype */  
+       init_unistr(&printer->parameters, ntprinter->info_2->parameters);       /* parameters (of print processor) */   
+
+       printer->attributes = ntprinter->info_2->attributes;
+
+       printer->priority = ntprinter->info_2->priority;                                /* priority */  
+       printer->defaultpriority = ntprinter->info_2->default_priority;         /* default priority */
+       printer->starttime = ntprinter->info_2->starttime;                      /* starttime */
+       printer->untiltime = ntprinter->info_2->untiltime;                      /* untiltime */
+       printer->status = nt_printq_status(status.status);                      /* status */
+       printer->cjobs = count;                                                 /* jobs */
+       printer->averageppm = ntprinter->info_2->averageppm;                    /* average pages per minute */
                        
-       devmode=(DEVICEMODE *)malloc(sizeof(DEVICEMODE));
-       ZERO_STRUCTP(devmode);  
-       construct_dev_mode(devmode, snum, servername);                  
-       printer->devmode=devmode;
-       
+       if((printer->devmode = construct_dev_mode(snum, servername)) == NULL) {
+               DEBUG(8, ("Returning NULL Devicemode!\n"));
+       }
+
+       if (ntprinter->info_2->secdesc_buf && ntprinter->info_2->secdesc_buf->len != 0) {
+               /* steal the printer info sec_desc structure.  [badly done]. */
+               printer->secdesc = ntprinter->info_2->secdesc_buf->sec;
+               ntprinter->info_2->secdesc_buf->sec = NULL; /* Stolen memory. */
+               ntprinter->info_2->secdesc_buf->len = 0; /* Stolen memory. */
+               ntprinter->info_2->secdesc_buf->max_len = 0; /* Stolen memory. */
+       }
+       else {
+               printer->secdesc = NULL;
+       }
+
+       free_a_printer(&ntprinter, 2);
        safe_free(queue);
-       free_a_printer(ntprinter, 2);
-       return (True);
+       return True;
 }
 
 /********************************************************************
- * enum_printer_info_1
- * glue between spoolss_enumprinters and construct_printer_info_1
+ * construct_printer_info_3
+ * fill a printer_info_3 struct
  ********************************************************************/
-static BOOL get_printer_info_1(PRINTER_INFO_1 **printer, int snum, int number)
+static BOOL construct_printer_info_3(fstring servername,
+                       PRINTER_INFO_3 **pp_printer, int snum)
 {
-       pstring servername;
+       NT_PRINTER_INFO_LEVEL *ntprinter = NULL;
+       PRINTER_INFO_3 *printer = NULL;
 
-       *printer=(PRINTER_INFO_1 *)malloc(sizeof(PRINTER_INFO_1));
-       DEBUG(4,("Allocated memory for ONE PRINTER_INFO_1 at [%p]\n", *printer));       
-       pstrcpy(servername, global_myname);
-       if (!construct_printer_info_1(*printer, snum, servername)) {
-               free(*printer);
+       if (get_a_printer(&ntprinter, 2, lp_servicename(snum)) !=0 )
+               return False;
+
+       *pp_printer = NULL;
+       if ((printer = (PRINTER_INFO_3 *)malloc(sizeof(PRINTER_INFO_3))) == NULL) {
+               DEBUG(0,("construct_printer_info_3: malloc fail.\n"));
                return False;
        }
-       else
-               return True;
-}
 
-/********************************************************************
- * enum_printer_info_2
- * glue between spoolss_enumprinters and construct_printer_info_2
- ********************************************************************/
-static BOOL get_printer_info_2(PRINTER_INFO_2 **printer, int snum, int number)
-{
-       pstring servername;
+       ZERO_STRUCTP(printer);
+       
+       printer->flags = 4; /* These are the components of the SD we are returning. */
+       if (ntprinter->info_2->secdesc_buf && ntprinter->info_2->secdesc_buf->len != 0) {
+               /* steal the printer info sec_desc structure.  [badly done]. */
+               printer->secdesc = ntprinter->info_2->secdesc_buf->sec;
 
-       *printer=(PRINTER_INFO_2 *)malloc(sizeof(PRINTER_INFO_2));
-       DEBUG(4,("Allocated memory for ONE PRINTER_INFO_2 at [%p]\n", *printer));       
-       pstrcpy(servername, global_myname);
-       if (!construct_printer_info_2(*printer, snum, servername))
-       {
-               free(*printer);
-               return (False);
-       }
-       else
-       {
-               return (True);
+#if 0
+               /*
+                * Set the flags for the components we are returning.
+                */
+
+               if (printer->secdesc->owner_sid)
+                       printer->flags |= OWNER_SECURITY_INFORMATION;
+
+               if (printer->secdesc->grp_sid)
+                       printer->flags |= GROUP_SECURITY_INFORMATION;
+
+               if (printer->secdesc->dacl)
+                       printer->flags |= DACL_SECURITY_INFORMATION;
+
+               if (printer->secdesc->sacl)
+                       printer->flags |= SACL_SECURITY_INFORMATION;
+#endif
+
+               ntprinter->info_2->secdesc_buf->sec = NULL; /* Stolen the malloced memory. */
+               ntprinter->info_2->secdesc_buf->len = 0; /* Stolen the malloced memory. */
+               ntprinter->info_2->secdesc_buf->max_len = 0; /* Stolen the malloced memory. */
        }
+
+       free_a_printer(&ntprinter, 2);
+
+       *pp_printer = printer;
+       return True;
 }
 
 /********************************************************************
- * spoolss_enumprinters
- *
- * called from api_spoolss_enumprinters (see this to understand)
- ********************************************************************/
-static BOOL enum_printer_info_1(fstring name, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+ Spoolss_enumprinters.
+********************************************************************/
+static BOOL enum_all_printers_info_1(fstring server, uint32 flags, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
        int snum;
        int i;
        int n_services=lp_numservices();
-       PRINTER_INFO_1 *printer=NULL;
-DEBUG(1,("enum_printer_info_1\n"));
+       PRINTER_INFO_1 *printers=NULL;
+       PRINTER_INFO_1 current_prt;
+       
+       DEBUG(4,("enum_all_printers_info_1\n"));        
+
        for (snum=0; snum<n_services; snum++) {
                if (lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) ) {
                        DEBUG(4,("Found a printer in smb.conf: %s[%x]\n", lp_servicename(snum), snum));
-               
-                       /*
-                               JFM: here we should check the name
-                       
-                        */
                                
-                       if (get_printer_info_1(&printer , snum, *returned) )                    
+                       if (construct_printer_info_1(server, flags, &current_prt, snum)) {
+                               if((printers=Realloc(printers, (*returned +1)*sizeof(PRINTER_INFO_1))) == NULL) {
+                                       *returned=0;
+                                       return ERROR_NOT_ENOUGH_MEMORY;
+                               }
+                               DEBUG(4,("ReAlloced memory for [%d] PRINTER_INFO_1\n", *returned));             
+                               memcpy(&(printers[*returned]), &current_prt, sizeof(PRINTER_INFO_1));
                                (*returned)++;
+                       }
                }
        }
-       
+               
        /* check the required size. */  
        for (i=0; i<*returned; i++)
-               (*needed) += spoolss_size_printer_info_1(printer);
+               (*needed) += spoolss_size_printer_info_1(&(printers[i]));
 
        if (!alloc_buffer_size(buffer, *needed))
                return ERROR_INSUFFICIENT_BUFFER;
 
        /* fill the buffer with the structures */
-
        for (i=0; i<*returned; i++)
-               new_smb_io_printer_info_1("", buffer, printer, 0);      
-       
+               new_smb_io_printer_info_1("", buffer, &(printers[i]), 0);       
+
        /* clear memory */
+       safe_free(printers);
 
        if (*needed > offered) {
                *returned=0;
@@ -1793,49 +2229,88 @@ DEBUG(1,("enum_printer_info_1\n"));
 }
 
 /********************************************************************
Spoolss_enumprinters.
-********************************************************************/
-static BOOL enum_all_printers_info_1(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
enum_all_printers_info_1_local.
+*********************************************************************/
+static BOOL enum_all_printers_info_1_local(fstring name, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
-       int snum;
-       int i;
-       int n_services=lp_numservices();
-       PRINTER_INFO_1 *printers=NULL;
-       PRINTER_INFO_1 current_prt;
-       pstring servername;
+       fstring temp;
+       DEBUG(4,("enum_all_printers_info_1_local\n"));  
        
-       DEBUG(4,("enum_all_printers_info_1\n"));
+       fstrcpy(temp, "\\\\");
+       fstrcat(temp, global_myname);
+
+       if (!strcmp(name, temp)) {
+               fstrcat(temp, "\\");
+               return enum_all_printers_info_1(temp, PRINTER_ENUM_ICON8, buffer, offered, needed, returned);
+       }
+       else
+               return enum_all_printers_info_1("", PRINTER_ENUM_ICON8, buffer, offered, needed, returned);
+}
+
+/********************************************************************
+ enum_all_printers_info_1_name.
+*********************************************************************/
+static BOOL enum_all_printers_info_1_name(fstring name, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+{
+       fstring temp;
+       DEBUG(4,("enum_all_printers_info_1_name\n"));   
        
-       pstrcpy(servername, global_myname);
+       fstrcpy(temp, "\\\\");
+       fstrcat(temp, global_myname);
 
-       for (snum=0; snum<n_services; snum++) {
-               if (lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) ) {
-                       DEBUG(4,("Found a printer in smb.conf: %s[%x]\n", lp_servicename(snum), snum));
-                               
-                       if (construct_printer_info_1(&current_prt, snum, servername))
-                       {
-                               printers=Realloc(printers, (*returned +1)*sizeof(PRINTER_INFO_1));
-                               DEBUG(4,("ReAlloced memory for [%d] PRINTER_INFO_1\n", *returned));             
-                               memcpy(&(printers[*returned]), &current_prt, sizeof(PRINTER_INFO_1));
-                               (*returned)++;
-                       }
-               }
+       if (!strcmp(name, temp)) {
+               fstrcat(temp, "\\");
+               return enum_all_printers_info_1(temp, PRINTER_ENUM_ICON8, buffer, offered, needed, returned);
        }
+       else
+               return ERROR_INVALID_NAME;
+}
+
+/********************************************************************
+ enum_all_printers_info_1_remote.
+*********************************************************************/
+static BOOL enum_all_printers_info_1_remote(fstring name, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+{
+       PRINTER_INFO_1 *printer;
+       fstring printername;
+       fstring desc;
+       fstring comment;
+       DEBUG(4,("enum_all_printers_info_1_remote\n")); 
+
+       /* JFM: currently it's more a place holder than anything else.
+        * In the spooler world there is a notion of server registration.
+        * the print servers are registring (sp ?) on the PDC (in the same domain)
+        * 
+        * We should have a TDB here. The registration is done thru an undocumented RPC call.
+        */
+       
+       if((printer=(PRINTER_INFO_1 *)malloc(sizeof(PRINTER_INFO_1))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
+       *returned=1;
+       
+       snprintf(printername, sizeof(printername)-1,"Windows NT Remote Printers!!\\\\%s", global_myname);               
+       snprintf(desc, sizeof(desc)-1,"%s", global_myname);
+       snprintf(comment, sizeof(comment)-1, "Logged on Domain");
+
+       init_unistr(&printer->description, desc);
+       init_unistr(&printer->name, printername);       
+       init_unistr(&printer->comment, comment);
+       printer->flags=PRINTER_ENUM_ICON3|PRINTER_ENUM_CONTAINER;
                
        /* check the required size. */  
-       for (i=0; i<*returned; i++)
-               (*needed) += spoolss_size_printer_info_1(&(printers[i]));
+       *needed += spoolss_size_printer_info_1(printer);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(printer);
                return ERROR_INSUFFICIENT_BUFFER;
-
+       }
 
        /* fill the buffer with the structures */
-
-       for (i=0; i<*returned; i++)
-               new_smb_io_printer_info_1("", buffer, &(printers[i]), 0);       
+       new_smb_io_printer_info_1("", buffer, printer, 0);      
 
        /* clear memory */
+       safe_free(printer);
 
        if (*needed > offered) {
                *returned=0;
@@ -1845,46 +2320,70 @@ static BOOL enum_all_printers_info_1(NEW_BUFFER *buffer, uint32 offered, uint32
                return NT_STATUS_NO_PROBLEMO;
 }
 
+/********************************************************************
+ enum_all_printers_info_1_network.
+*********************************************************************/
+static BOOL enum_all_printers_info_1_network(fstring name, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+{
+       fstring temp;
+       DEBUG(4,("enum_all_printers_info_1_network\n"));        
+       
+       fstrcpy(temp, "\\\\");
+       fstrcat(temp, global_myname);
+       fstrcat(temp, "\\");
+       return enum_all_printers_info_1(temp, PRINTER_ENUM_UNKNOWN_8, buffer, offered, needed, returned);
+}
+
 /********************************************************************
  * api_spoolss_enumprinters
  *
  * called from api_spoolss_enumprinters (see this to understand)
  ********************************************************************/
-static BOOL enum_all_printers_info_2(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+static BOOL enum_all_printers_info_2(fstring servername, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
        int snum;
        int i;
        int n_services=lp_numservices();
-       PRINTER_INFO_2 **printers=NULL;
+       PRINTER_INFO_2 *printers=NULL;
+       PRINTER_INFO_2 current_prt;
 
        for (snum=0; snum<n_services; snum++) {
                if (lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) ) {
-               
                        DEBUG(4,("Found a printer in smb.conf: %s[%x]\n", lp_servicename(snum), snum));
-                       
-                       printers=Realloc(printers, ((*returned)+1)*sizeof(PRINTER_INFO_2 *));
-                                               
-                       DEBUG(4,("ReAlloced memory for [%d] PRINTER_INFO_2 pointers\n", (*returned)+1));                        
-
-                       if (get_printer_info_2( &(printers[*returned]), snum, *returned) )
+                               
+                       if (construct_printer_info_2(servername, &current_prt, snum)) {
+                               if((printers=Realloc(printers, (*returned +1)*sizeof(PRINTER_INFO_2))) == NULL)
+                                       return ERROR_NOT_ENOUGH_MEMORY;
+                               DEBUG(4,("ReAlloced memory for [%d] PRINTER_INFO_2\n", *returned));             
+                               memcpy(&printers[*returned], &current_prt, sizeof(PRINTER_INFO_2));
                                (*returned)++;
+                       }
                }
        }
        
        /* check the required size. */  
        for (i=0; i<*returned; i++)
-               (*needed) += spoolss_size_printer_info_2(printers[i]);
+               (*needed) += spoolss_size_printer_info_2(&printers[i]);
 
-       DEBUG(4,("we need [%d] bytes\n", *needed));
-
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               for (i=0; i<*returned; i++) {
+                       free_devmode(printers[i].devmode);
+                       free_sec_desc(&printers[i].secdesc);
+               }
+               safe_free(printers);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
        for (i=0; i<*returned; i++)
-               new_smb_io_printer_info_2("", buffer, printers[i], 0);  
+               new_smb_io_printer_info_2("", buffer, &(printers[i]), 0);       
        
        /* clear memory */
+       for (i=0; i<*returned; i++) {
+               free_devmode(printers[i].devmode);
+               free_sec_desc(&printers[i].secdesc);
+       }
+       safe_free(printers);
 
        if (*needed > offered) {
                *returned=0;
@@ -1901,20 +2400,21 @@ static uint32 enumprinters_level1( uint32 flags, fstring name,
                                 NEW_BUFFER *buffer, uint32 offered,
                                 uint32 *needed, uint32 *returned)
 {
-       if (flags && PRINTER_ENUM_NETWORK)
-               return enum_all_printers_info_1(buffer, offered, needed, returned);
-       
-       if (flags && PRINTER_ENUM_NAME) {
-               if (*name=='\0')
-                       return enum_all_printers_info_1(buffer, offered, needed, returned);
-               else
-                       return enum_printer_info_1(name, buffer, offered, needed, returned);
-       }
-       
-       if (flags && PRINTER_ENUM_REMOTE)
-               return enum_all_printers_info_1(buffer, offered, needed, returned);
+       /* Not all the flags are equals */
 
-       return NT_STATUS_INVALID_LEVEL;
+       if (flags & PRINTER_ENUM_LOCAL)
+               return enum_all_printers_info_1_local(name, buffer, offered, needed, returned);
+
+       if (flags & PRINTER_ENUM_NAME)
+               return enum_all_printers_info_1_name(name, buffer, offered, needed, returned);
+
+       if (flags & PRINTER_ENUM_REMOTE)
+               return enum_all_printers_info_1_remote(name, buffer, offered, needed, returned);
+
+       if (flags & PRINTER_ENUM_NETWORK)
+               return enum_all_printers_info_1_network(name, buffer, offered, needed, returned);
+
+       return NT_STATUS_NO_PROBLEMO; /* NT4sp5 does that */
 }
 
 /********************************************************************
@@ -1924,7 +2424,29 @@ static uint32 enumprinters_level2( uint32 flags, fstring servername,
                                 NEW_BUFFER *buffer, uint32 offered,
                                 uint32 *needed, uint32 *returned)
 {
-       return enum_all_printers_info_2(buffer, offered, needed, returned);
+       fstring temp;
+       
+       fstrcpy(temp, "\\\\");
+       fstrcat(temp, global_myname);
+
+       if (flags & PRINTER_ENUM_LOCAL) {
+               if (!strcmp(servername, temp))
+                       return enum_all_printers_info_2(temp, buffer, offered, needed, returned);
+               else
+                       return enum_all_printers_info_2("", buffer, offered, needed, returned);
+       }
+
+       if (flags & PRINTER_ENUM_NAME) {
+               if (!strcmp(servername, temp))
+                       return enum_all_printers_info_2(temp, buffer, offered, needed, returned);
+               else
+                       return ERROR_INVALID_NAME;
+       }
+
+       if (flags & PRINTER_ENUM_REMOTE)
+               return ERROR_INVALID_LEVEL;
+
+       return NT_STATUS_NO_PROBLEMO;
 }
 
 /********************************************************************
@@ -1968,39 +2490,40 @@ uint32 _spoolss_enumprinters( uint32 flags, const UNISTR2 *servername, uint32 le
         */
 
        unistr2_to_ascii(name, servername, sizeof(name)-1);
+       strupper(name);
 
        switch (level) {
        case 1:
                return enumprinters_level1(flags, name, buffer, offered, needed, returned);
-               break;
        case 2:
                return enumprinters_level2(flags, name, buffer, offered, needed, returned);
-               break;                          
        case 5:
                return enumprinters_level5(flags, name, buffer, offered, needed, returned);
-               break;                          
        case 3:
        case 4:
        default:
-               return NT_STATUS_INVALID_LEVEL;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
 
 /****************************************************************************
 ****************************************************************************/
-static uint32 getprinter_level_0(pstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+static uint32 getprinter_level_0(fstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
        PRINTER_INFO_0 *printer=NULL;
 
-       printer=(PRINTER_INFO_0*)malloc(sizeof(PRINTER_INFO_0));
+       if((printer=(PRINTER_INFO_0*)malloc(sizeof(PRINTER_INFO_0))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
        construct_printer_info_0(printer, snum, servername);
        
        /* check the required size. */  
        *needed += spoolss_size_printer_info_0(printer);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(printer);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
        new_smb_io_printer_info_0("", buffer, printer, 0);      
@@ -2017,18 +2540,22 @@ static uint32 getprinter_level_0(pstring servername, int snum, NEW_BUFFER *buffe
 
 /****************************************************************************
 ****************************************************************************/
-static uint32 getprinter_level_1(pstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+static uint32 getprinter_level_1(fstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
        PRINTER_INFO_1 *printer=NULL;
 
-       printer=(PRINTER_INFO_1*)malloc(sizeof(PRINTER_INFO_1));
-       construct_printer_info_1(printer, snum, servername);
+       if((printer=(PRINTER_INFO_1*)malloc(sizeof(PRINTER_INFO_1))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
+       construct_printer_info_1(servername, PRINTER_ENUM_ICON8, printer, snum);
        
        /* check the required size. */  
        *needed += spoolss_size_printer_info_1(printer);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(printer);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
        new_smb_io_printer_info_1("", buffer, printer, 0);      
@@ -2045,25 +2572,68 @@ static uint32 getprinter_level_1(pstring servername, int snum, NEW_BUFFER *buffe
 
 /****************************************************************************
 ****************************************************************************/
-static uint32 getprinter_level_2(pstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+static uint32 getprinter_level_2(fstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
        PRINTER_INFO_2 *printer=NULL;
+       fstring temp;
 
-       printer=(PRINTER_INFO_2*)malloc(sizeof(PRINTER_INFO_2));        
-       construct_printer_info_2(printer, snum, servername);
+       if((printer=(PRINTER_INFO_2*)malloc(sizeof(PRINTER_INFO_2)))==NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+       
+       fstrcpy(temp, "\\\\");
+       fstrcat(temp, servername);
+       construct_printer_info_2(temp, printer, snum);
        
        /* check the required size. */  
        *needed += spoolss_size_printer_info_2(printer);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               free_printer_info_2(printer);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
-       new_smb_io_printer_info_2("", buffer, printer, 0);      
+       if (!new_smb_io_printer_info_2("", buffer, printer, 0)) {
+               free_printer_info_2(printer);
+               return ERROR_NOT_ENOUGH_MEMORY;
+       }
        
        /* clear memory */
-       safe_free(printer);
+       free_printer_info_2(printer);
+
+       if (*needed > offered) {
+               return ERROR_INSUFFICIENT_BUFFER;
+       }
+       else
+               return NT_STATUS_NO_PROBLEMO;   
+}
+
+/****************************************************************************
+****************************************************************************/
+static uint32 getprinter_level_3(fstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+{
+       PRINTER_INFO_3 *printer=NULL;
+       fstring temp;
+
+       fstrcpy(temp, "\\\\");
+       fstrcat(temp, servername);
+       if (!construct_printer_info_3(temp, &printer, snum))
+               return ERROR_NOT_ENOUGH_MEMORY;
+       
+       /* check the required size. */  
+       *needed += spoolss_size_printer_info_3(printer);
+
+       if (!alloc_buffer_size(buffer, *needed)) {
+               free_printer_info_3(printer);
+               return ERROR_INSUFFICIENT_BUFFER;
+       }
 
+       /* fill the buffer with the structures */
+       new_smb_io_printer_info_3("", buffer, printer, 0);      
+       
+       /* clear memory */
+       free_printer_info_3(printer);
+       
        if (*needed > offered) {
                return ERROR_INSUFFICIENT_BUFFER;
        }
@@ -2077,146 +2647,147 @@ uint32 _spoolss_getprinter(POLICY_HND *handle, uint32 level,
                           NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
        int snum;
-       pstring servername;
+       fstring servername;
        
        *needed=0;
 
        pstrcpy(servername, global_myname);
 
        if (!get_printer_snum(handle, &snum))
-       {
-               return NT_STATUS_INVALID_HANDLE;
-       }
+               return ERROR_INVALID_HANDLE;
 
        switch (level) {
        case 0:
                return getprinter_level_0(servername, snum, buffer, offered, needed);
-               break;
        case 1:
                return getprinter_level_1(servername,snum, buffer, offered, needed);
-               break;
        case 2:         
                return getprinter_level_2(servername,snum, buffer, offered, needed);
-               break;
+       case 3:         
+               return getprinter_level_3(servername,snum, buffer, offered, needed);
        default:
-               return NT_STATUS_INVALID_LEVEL;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }      
                
 /********************************************************************
- * construct_printer_driver_info_1
- * fill a construct_printer_driver_info_1 struct
+ * fill a DRIVER_INFO_1 struct
  ********************************************************************/
-static void fill_printer_driver_info_1(DRIVER_INFO_1 *info, 
-                                       NT_PRINTER_DRIVER_INFO_LEVEL driver, 
-                                      pstring servername, fstring architecture)
+static void fill_printer_driver_info_1(DRIVER_INFO_1 *info, NT_PRINTER_DRIVER_INFO_LEVEL driver, fstring servername, fstring architecture)
 {
-       init_unistr( &(info->name), driver.info_3->name);
+       init_unistr( &info->name, driver.info_3->name);
 }
 
-static void construct_printer_driver_info_1(DRIVER_INFO_1 *info, int snum, 
-                                            pstring servername, fstring architecture)
+/********************************************************************
+ * construct_printer_driver_info_1
+ ********************************************************************/
+static uint32 construct_printer_driver_info_1(DRIVER_INFO_1 *info, int snum, fstring servername, fstring architecture, uint32 version)
 {      
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        NT_PRINTER_DRIVER_INFO_LEVEL driver;
 
-       get_a_printer(&printer, 2, lp_servicename(snum) );
-       get_a_printer_driver(&driver, 3, printer.info_2->drivername, architecture);     
-       
+       ZERO_STRUCT(driver);
+
+       if (get_a_printer(&printer, 2, lp_servicename(snum)) != 0)
+               return ERROR_INVALID_PRINTER_NAME;
+
+       if (get_a_printer_driver(&driver, 3, printer->info_2->drivername, architecture, version) != 0)
+               return ERROR_UNKNOWN_PRINTER_DRIVER;
+
        fill_printer_driver_info_1(info, driver, servername, architecture);
-       
-       free_a_printer_driver(driver, 3);
-       free_a_printer(printer, 2);
+
+       free_a_printer(&printer,2);
+
+       return NT_STATUS_NO_PROBLEMO;
 }
 
 /********************************************************************
  * construct_printer_driver_info_2
  * fill a printer_info_2 struct
  ********************************************************************/
-static void fill_printer_driver_info_2(DRIVER_INFO_2 *info, 
-                                       NT_PRINTER_DRIVER_INFO_LEVEL driver, 
-                                      pstring servername, fstring architecture)
+static void fill_printer_driver_info_2(DRIVER_INFO_2 *info, NT_PRINTER_DRIVER_INFO_LEVEL driver, fstring servername)
 {
-       pstring where;
        pstring temp_driverpath;
        pstring temp_datafile;
        pstring temp_configfile;
-       fstring short_archi;
-
-       get_short_archi(short_archi,architecture);
-       
-       snprintf(where,sizeof(where)-1,"\\\\%s\\print$\\%s\\", servername, short_archi);
 
        info->version=driver.info_3->cversion;
 
-       init_unistr( &(info->name),         driver.info_3->name );
-       init_unistr( &(info->architecture), architecture );
-       
-       snprintf(temp_driverpath, sizeof(temp_driverpath)-1, "%s%s", where, 
-                driver.info_3->driverpath);
-       init_unistr( &(info->driverpath),   temp_driverpath );
+       init_unistr( &info->name, driver.info_3->name );
+       init_unistr( &info->architecture, driver.info_3->environment );
 
-       snprintf(temp_datafile,   sizeof(temp_datafile)-1, "%s%s", where, 
-                driver.info_3->datafile);
-       init_unistr( &(info->datafile),     temp_datafile );
+       snprintf(temp_driverpath, sizeof(temp_driverpath)-1, "\\\\%s%s", servername, driver.info_3->driverpath);
+       init_unistr( &info->driverpath, temp_driverpath );
 
-       snprintf(temp_configfile, sizeof(temp_configfile)-1, "%s%s", where, 
-                driver.info_3->configfile);
-       init_unistr( &(info->configfile),   temp_configfile );  
+       snprintf(temp_datafile, sizeof(temp_datafile)-1, "\\\\%s%s", servername, driver.info_3->datafile);
+       init_unistr( &info->datafile, temp_datafile );
+
+       snprintf(temp_configfile, sizeof(temp_configfile)-1, "\\\\%s%s", servername, driver.info_3->configfile);
+       init_unistr( &info->configfile, temp_configfile );      
 }
 
 /********************************************************************
  * construct_printer_driver_info_2
  * fill a printer_info_2 struct
  ********************************************************************/
-static void construct_printer_driver_info_2(DRIVER_INFO_2 *info, int snum, 
-                                            pstring servername, fstring architecture)
+static uint32 construct_printer_driver_info_2(DRIVER_INFO_2 *info, int snum, fstring servername, fstring architecture, uint32 version)
 {
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        NT_PRINTER_DRIVER_INFO_LEVEL driver;
-       
-       get_a_printer(&printer, 2, lp_servicename(snum) );
-       get_a_printer_driver(&driver, 3, printer.info_2->drivername, architecture);     
 
-       fill_printer_driver_info_2(info, driver, servername, architecture);
+       ZERO_STRUCT(printer);
+       ZERO_STRUCT(driver);
+
+       if (!get_a_printer(&printer, 2, lp_servicename(snum)) != 0)
+               return ERROR_INVALID_PRINTER_NAME;
+
+       if (!get_a_printer_driver(&driver, 3, printer->info_2->drivername, architecture, version) != 0)
+               return ERROR_UNKNOWN_PRINTER_DRIVER;
+
+       fill_printer_driver_info_2(info, driver, servername);
 
-       free_a_printer_driver(driver, 3);
-       free_a_printer(printer, 2);
+       free_a_printer(&printer,2);
+
+       return NT_STATUS_NO_PROBLEMO;
 }
 
 /********************************************************************
  * copy a strings array and convert to UNICODE
+ *
+ * convert an array of ascii string to a UNICODE string
  ********************************************************************/
-static void init_unistr_array(UNISTR ***uni_array, char **char_array, char *where)
+static void init_unistr_array(uint16 **uni_array, fstring *char_array, char *servername)
 {
        int i=0;
+       int j=0;
        char *v;
        pstring line;
 
        DEBUG(6,("init_unistr_array\n"));
-
-       for (v=char_array[i]; *v!='\0'; v=char_array[i])
-       {
-               DEBUGADD(6,("i:%d:", i));
-               DEBUGADD(6,("%s:%d:", v, strlen(v)));
-       
-               *uni_array=(UNISTR **)Realloc(*uni_array, sizeof(UNISTR *)*(i+1));
-               DEBUGADD(7,("realloc:[%p],", *uni_array));
-                       
-               (*uni_array)[i]=(UNISTR *)malloc( sizeof(UNISTR) );
-               DEBUGADD(7,("alloc:[%p],", (*uni_array)[i]));
-
-               snprintf(line, sizeof(line)-1, "%s%s", where, v);
-               init_unistr( (*uni_array)[i], line );
-               DEBUGADD(7,("copy\n"));
-                       
+       *uni_array=NULL;
+
+       while (1) {
+               if (char_array == NULL)
+                       v = "";
+               else {
+                       v = char_array[i];
+                       if (!v) v = ""; /* hack to handle null lists */
+               }
+               if (strlen(v) == 0) break;
+               snprintf(line, sizeof(line)-1, "\\\\%s%s", servername, v);
+               DEBUGADD(6,("%d:%s:%d\n", i, line, strlen(line)));
+               if((*uni_array=Realloc(*uni_array, (j+strlen(line)+2)*sizeof(uint16))) == NULL) {
+                       DEBUG(0,("init_unistr_array: Realloc error\n" ));
+                       return;
+               }
+               j += (dos_PutUniCode((char *)(*uni_array+j), line , sizeof(uint16)*strlen(line), True) / sizeof(uint16) );
                i++;
        }
-       DEBUGADD(7,("last one\n"));
        
-       *uni_array=(UNISTR **)Realloc(*uni_array, sizeof(UNISTR *)*(i+1));
-       (*uni_array)[i]=0x0000;
+       if (*uni_array) {
+               (*uni_array)[j]=0x0000;
+       }
+       
        DEBUGADD(6,("last one:done\n"));
 }
 
@@ -2224,79 +2795,194 @@ static void init_unistr_array(UNISTR ***uni_array, char **char_array, char *wher
  * construct_printer_info_3
  * fill a printer_info_3 struct
  ********************************************************************/
-static void fill_printer_driver_info_3(DRIVER_INFO_3 *info, 
-                                       NT_PRINTER_DRIVER_INFO_LEVEL driver, 
-                                      pstring servername, fstring architecture)
+static void fill_printer_driver_info_3(DRIVER_INFO_3 *info, NT_PRINTER_DRIVER_INFO_LEVEL driver, fstring servername)
 {
-       pstring where;
        pstring temp_driverpath;
        pstring temp_datafile;
        pstring temp_configfile;
        pstring temp_helpfile;
-       fstring short_archi;
-       
-       get_short_archi(short_archi, architecture);
-       
-       snprintf(where,sizeof(where)-1,"\\\\%s\\print$\\%s\\", servername, short_archi);
-       
+
+       ZERO_STRUCTP(info);
+
        info->version=driver.info_3->cversion;
 
-       init_unistr( &(info->name),         driver.info_3->name );      
-       init_unistr( &(info->architecture), architecture );
-       
-       snprintf(temp_driverpath, sizeof(temp_driverpath)-1, "%s%s", where, driver.info_3->driverpath);          
-       init_unistr( &(info->driverpath), temp_driverpath );
-       
-       snprintf(temp_datafile,   sizeof(temp_datafile)-1,   "%s%s", where, driver.info_3->datafile); 
-       init_unistr( &(info->datafile), temp_datafile );
-       
-       snprintf(temp_configfile, sizeof(temp_configfile)-1, "%s%s", where, driver.info_3->configfile);
-       init_unistr( &(info->configfile), temp_configfile );    
-       
-       snprintf(temp_helpfile,   sizeof(temp_helpfile)-1,   "%s%s", where, driver.info_3->helpfile);
-       init_unistr( &(info->helpfile), temp_helpfile );
+       init_unistr( &info->name, driver.info_3->name );        
+       init_unistr( &info->architecture, driver.info_3->environment );
+
+       snprintf(temp_driverpath, sizeof(temp_driverpath)-1, "\\\\%s%s", servername, driver.info_3->driverpath);                 
+       init_unistr( &info->driverpath, temp_driverpath );
+
+       snprintf(temp_datafile, sizeof(temp_datafile)-1, "\\\\%s%s", servername, driver.info_3->datafile); 
+       init_unistr( &info->datafile, temp_datafile );
 
-       init_unistr( &(info->monitorname), driver.info_3->monitorname );        
-       init_unistr( &(info->defaultdatatype), driver.info_3->defaultdatatype );
+       snprintf(temp_configfile, sizeof(temp_configfile)-1, "\\\\%s%s", servername, driver.info_3->configfile);
+       init_unistr( &info->configfile, temp_configfile );      
+
+       snprintf(temp_helpfile, sizeof(temp_helpfile)-1, "\\\\%s%s", servername, driver.info_3->helpfile);
+       init_unistr( &info->helpfile, temp_helpfile );
+
+       init_unistr( &info->monitorname, driver.info_3->monitorname );
+       init_unistr( &info->defaultdatatype, driver.info_3->defaultdatatype );
 
        info->dependentfiles=NULL;
-       init_unistr_array(&(info->dependentfiles), driver.info_3->dependentfiles, where);
+       init_unistr_array(&info->dependentfiles, driver.info_3->dependentfiles, servername);
 }
 
 /********************************************************************
  * construct_printer_info_3
  * fill a printer_info_3 struct
  ********************************************************************/
-static void construct_printer_driver_info_3(DRIVER_INFO_3 *info, int snum, 
-                                            pstring servername, fstring architecture)
+static uint32 construct_printer_driver_info_3(DRIVER_INFO_3 *info, int snum, fstring servername, fstring architecture, uint32 version)
 {      
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        NT_PRINTER_DRIVER_INFO_LEVEL driver;
-       
-       get_a_printer(&printer, 2, lp_servicename(snum) );      
-       get_a_printer_driver(&driver, 3, printer.info_2->drivername, architecture);     
+       uint32 status=0;
+       ZERO_STRUCT(driver);
+
+       status=get_a_printer(&printer, 2, lp_servicename(snum) );
+       DEBUG(8,("construct_printer_driver_info_3: status: %d\n", status));
+       if (status != 0)
+               return ERROR_INVALID_PRINTER_NAME;
+
+       status=get_a_printer_driver(&driver, 3, printer->info_2->drivername, architecture, version);    
+       DEBUG(8,("construct_printer_driver_info_3: status: %d\n", status));
+       if (status != 0) {
+               free_a_printer(&printer,2);
+               return ERROR_UNKNOWN_PRINTER_DRIVER;
+       }
+
+       fill_printer_driver_info_3(info, driver, servername);
+
+       free_a_printer(&printer,2);
+
+       return NT_STATUS_NO_PROBLEMO;
+}
+
+/********************************************************************
+ * construct_printer_info_6
+ * fill a printer_info_6 struct - we know that driver is really level 3. This sucks. JRA.
+ ********************************************************************/
+
+static void fill_printer_driver_info_6(DRIVER_INFO_6 *info, NT_PRINTER_DRIVER_INFO_LEVEL driver, fstring servername)
+{
+       pstring temp_driverpath;
+       pstring temp_datafile;
+       pstring temp_configfile;
+       pstring temp_helpfile;
+       fstring nullstr;
+
+       ZERO_STRUCTP(info);
+       memset(&nullstr, '\0', sizeof(fstring));
+
+       info->version=driver.info_3->cversion;
+
+       init_unistr( &info->name, driver.info_3->name );        
+       init_unistr( &info->architecture, driver.info_3->environment );
+
+       snprintf(temp_driverpath, sizeof(temp_driverpath)-1, "\\\\%s%s", servername, driver.info_3->driverpath);                 
+       init_unistr( &info->driverpath, temp_driverpath );
+
+       snprintf(temp_datafile, sizeof(temp_datafile)-1, "\\\\%s%s", servername, driver.info_3->datafile); 
+       init_unistr( &info->datafile, temp_datafile );
+
+       snprintf(temp_configfile, sizeof(temp_configfile)-1, "\\\\%s%s", servername, driver.info_3->configfile);
+       init_unistr( &info->configfile, temp_configfile );      
+
+       snprintf(temp_helpfile, sizeof(temp_helpfile)-1, "\\\\%s%s", servername, driver.info_3->helpfile);
+       init_unistr( &info->helpfile, temp_helpfile );
 
-       fill_printer_driver_info_3(info, driver, servername, architecture);
+       init_unistr( &info->monitorname, driver.info_3->monitorname );
+       init_unistr( &info->defaultdatatype, driver.info_3->defaultdatatype );
 
-       free_a_printer_driver(driver, 3);
-       free_a_printer(printer, 2);
+       info->dependentfiles=NULL;
+       init_unistr_array(&info->dependentfiles, driver.info_3->dependentfiles, servername);
+
+       info->previousdrivernames=NULL;
+       init_unistr_array(&info->previousdrivernames, &nullstr, servername);
+
+       info->driver_date.low=0;
+       info->driver_date.high=0;
+
+       info->padding=0;
+       info->driver_version_low=0;
+       info->driver_version_high=0;
+
+       init_unistr( &info->mfgname, "");
+       init_unistr( &info->oem_url, "");
+       init_unistr( &info->hardware_id, "");
+       init_unistr( &info->provider, "");
+}
+
+/********************************************************************
+ * construct_printer_info_6
+ * fill a printer_info_6 struct
+ ********************************************************************/
+static uint32 construct_printer_driver_info_6(DRIVER_INFO_6 *info, int snum, fstring servername, fstring architecture, uint32 version)
+{      
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
+       NT_PRINTER_DRIVER_INFO_LEVEL driver;
+       uint32 status=0;
+       ZERO_STRUCT(driver);
+
+       status=get_a_printer(&printer, 2, lp_servicename(snum) );
+       DEBUG(8,("construct_printer_driver_info_6: status: %d\n", status));
+       if (status != 0)
+               return ERROR_INVALID_PRINTER_NAME;
+
+       status=get_a_printer_driver(&driver, 3, printer->info_2->drivername, architecture, version);    
+       DEBUG(8,("construct_printer_driver_info_6: status: %d\n", status));
+       if (status != 0) {
+               free_a_printer(&printer,2);
+               return ERROR_UNKNOWN_PRINTER_DRIVER;
+       }
+
+       fill_printer_driver_info_6(info, driver, servername);
+
+       free_a_printer(&printer,2);
+
+       return NT_STATUS_NO_PROBLEMO;
+}
+
+/****************************************************************************
+****************************************************************************/
+
+static void free_printer_driver_info_3(DRIVER_INFO_3 *info)
+{
+       safe_free(info->dependentfiles);
 }
 
 /****************************************************************************
 ****************************************************************************/
-static uint32 getprinterdriver2_level1(pstring servername, pstring architecture, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+
+static void free_printer_driver_info_6(DRIVER_INFO_6 *info)
+{
+       safe_free(info->dependentfiles);
+       
+}
+
+/****************************************************************************
+****************************************************************************/
+static uint32 getprinterdriver2_level1(fstring servername, fstring architecture, uint32 version, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
        DRIVER_INFO_1 *info=NULL;
+       uint32 status;
        
-       info=(DRIVER_INFO_1 *)malloc(sizeof(DRIVER_INFO_1));
+       if((info=(DRIVER_INFO_1 *)malloc(sizeof(DRIVER_INFO_1))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
        
-       construct_printer_driver_info_1(info, snum, servername, architecture);
+       status=construct_printer_driver_info_1(info, snum, servername, architecture, version);
+       if (status != NT_STATUS_NO_PROBLEMO) {
+               safe_free(info);
+               return status;
+       }
 
        /* check the required size. */  
        *needed += spoolss_size_printer_driver_info_1(info);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(info);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
        new_smb_io_printer_driver_info_1("", buffer, info, 0);  
@@ -2304,28 +2990,35 @@ static uint32 getprinterdriver2_level1(pstring servername, pstring architecture,
        /* clear memory */
        safe_free(info);
 
-       if (*needed > offered) {
+       if (*needed > offered)
                return ERROR_INSUFFICIENT_BUFFER;
-       }
        else
                return NT_STATUS_NO_PROBLEMO;
 }
 
 /****************************************************************************
 ****************************************************************************/
-static uint32 getprinterdriver2_level2(pstring servername, pstring architecture, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+static uint32 getprinterdriver2_level2(fstring servername, fstring architecture, uint32 version, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
        DRIVER_INFO_2 *info=NULL;
+       uint32 status;
        
-       info=(DRIVER_INFO_2 *)malloc(sizeof(DRIVER_INFO_2));
+       if((info=(DRIVER_INFO_2 *)malloc(sizeof(DRIVER_INFO_2))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
        
-       construct_printer_driver_info_2(info, snum, servername, architecture);
+       status=construct_printer_driver_info_2(info, snum, servername, architecture, version);
+       if (status != NT_STATUS_NO_PROBLEMO) {
+               safe_free(info);
+               return status;
+       }
 
        /* check the required size. */  
        *needed += spoolss_size_printer_driver_info_2(info);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(info);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
        new_smb_io_printer_driver_info_2("", buffer, info, 0);  
@@ -2333,108 +3026,139 @@ static uint32 getprinterdriver2_level2(pstring servername, pstring architecture,
        /* clear memory */
        safe_free(info);
 
-       if (*needed > offered) {
+       if (*needed > offered)
                return ERROR_INSUFFICIENT_BUFFER;
-       }
        else
                return NT_STATUS_NO_PROBLEMO;
 }
 
 /****************************************************************************
 ****************************************************************************/
-static uint32 getprinterdriver2_level3(pstring servername, pstring architecture, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+static uint32 getprinterdriver2_level3(fstring servername, fstring architecture, uint32 version, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
-       DRIVER_INFO_3 *info=NULL;
-       
-       info=(DRIVER_INFO_3 *)malloc(sizeof(DRIVER_INFO_3));
-       
-       construct_printer_driver_info_3(info, snum, servername, architecture);
+       DRIVER_INFO_3 info;
+       uint32 status;
+
+       ZERO_STRUCT(info);
+
+       status=construct_printer_driver_info_3(&info, snum, servername, architecture, version);
+       if (status != NT_STATUS_NO_PROBLEMO) {
+               return status;
+       }
 
        /* check the required size. */  
-       *needed += spoolss_size_printer_driver_info_3(info);
+       *needed += spoolss_size_printer_driver_info_3(&info);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               free_printer_driver_info_3(&info);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
-       new_smb_io_printer_driver_info_3("", buffer, info, 0);  
+       new_smb_io_printer_driver_info_3("", buffer, &info, 0);
 
-       /* clear memory */
-       safe_free(info);
+       free_printer_driver_info_3(&info);
 
-       if (*needed > offered) {
+       if (*needed > offered)
+               return ERROR_INSUFFICIENT_BUFFER;
+       else
+               return NT_STATUS_NO_PROBLEMO;
+}
+
+/****************************************************************************
+****************************************************************************/
+static uint32 getprinterdriver2_level6(fstring servername, fstring architecture, uint32 version, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+{
+       DRIVER_INFO_6 info;
+       uint32 status;
+
+       ZERO_STRUCT(info);
+
+       status=construct_printer_driver_info_6(&info, snum, servername, architecture, version);
+       if (status != NT_STATUS_NO_PROBLEMO) {
+               return status;
+       }
+
+       /* check the required size. */  
+       *needed += spoolss_size_printer_driver_info_6(&info);
+
+       if (!alloc_buffer_size(buffer, *needed)) {
+               free_printer_driver_info_6(&info);
                return ERROR_INSUFFICIENT_BUFFER;
        }
+
+       /* fill the buffer with the structures */
+       new_smb_io_printer_driver_info_6("", buffer, &info, 0);
+
+       free_printer_driver_info_6(&info);
+
+       if (*needed > offered)
+               return ERROR_INSUFFICIENT_BUFFER;
        else
                return NT_STATUS_NO_PROBLEMO;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_getprinterdriver2(const POLICY_HND *handle, const UNISTR2 *uni_arch, uint32 level, uint32 unknown,
+uint32 _spoolss_getprinterdriver2(POLICY_HND *handle, const UNISTR2 *uni_arch, uint32 level, 
+                               uint32 clientmajorversion, uint32 clientminorversion,
                                NEW_BUFFER *buffer, uint32 offered,
-                               uint32 *needed, uint32 *unknown0, uint32 *unknown1)
+                               uint32 *needed, uint32 *servermajorversion, uint32 *serverminorversion)
 {
-       pstring servername;
+       fstring servername;
        fstring architecture;
        int snum;
 
        DEBUG(4,("_spoolss_getprinterdriver2\n"));
 
        *needed=0;
-       *unknown0=0;
-       *unknown1=0;
+       *servermajorversion=0;
+       *serverminorversion=0;
 
        pstrcpy(servername, global_myname);
        unistr2_to_ascii(architecture, uni_arch, sizeof(architecture)-1);
 
        if (!get_printer_snum(handle, &snum))
-       {
-               return NT_STATUS_INVALID_HANDLE;
-       }
+               return ERROR_INVALID_HANDLE;
 
        switch (level) {
        case 1:
-               return getprinterdriver2_level1(servername, architecture, snum, buffer, offered, needed);
-               break;
+               return getprinterdriver2_level1(servername, architecture, clientmajorversion, snum, buffer, offered, needed);
        case 2:
-               return getprinterdriver2_level2(servername, architecture, snum, buffer, offered, needed);
-               break;                          
+               return getprinterdriver2_level2(servername, architecture, clientmajorversion, snum, buffer, offered, needed);
        case 3:
-               return getprinterdriver2_level3(servername, architecture, snum, buffer, offered, needed);
-               break;                          
+               return getprinterdriver2_level3(servername, architecture, clientmajorversion, snum, buffer, offered, needed);
+       case 6:
+               return getprinterdriver2_level6(servername, architecture, clientmajorversion, snum, buffer, offered, needed);
        default:
-               return NT_STATUS_INVALID_LEVEL;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_startpageprinter(const POLICY_HND *handle)
+uint32 _spoolss_startpageprinter(POLICY_HND *handle)
 {
        Printer_entry *Printer = find_printer_index_by_hnd(handle);
 
-       if (OPEN_HANDLE(Printer))
-       {
+       if (OPEN_HANDLE(Printer)) {
                Printer->page_started=True;
                return 0x0;
        }
 
        DEBUG(3,("Error in startpageprinter printer handle\n"));
-       return NT_STATUS_INVALID_HANDLE;
+       return ERROR_INVALID_HANDLE;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_endpageprinter(const POLICY_HND *handle)
+uint32 _spoolss_endpageprinter(POLICY_HND *handle)
 {
        Printer_entry *Printer = find_printer_index_by_hnd(handle);
 
-       if (!OPEN_HANDLE(Printer))
-       {
-               DEBUG(3,("Error in endpageprinter printer handle\n"));
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_endpageprinter: Invalid handle (%s).\n",OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
        
        Printer->page_started=False;
@@ -2442,29 +3166,45 @@ uint32 _spoolss_endpageprinter(const POLICY_HND *handle)
        return NT_STATUS_NO_PROBLEMO;
 }
 
+/****************************************************************************
+ Return a user struct for a pipe user.
+****************************************************************************/
+
+static struct current_user *get_current_user(struct current_user *user, pipes_struct *p)
+{
+       if (p->ntlmssp_auth_validated) {
+               memcpy(user, &p->pipe_user, sizeof(struct current_user));
+       } else {
+               extern struct current_user current_user;
+               memcpy(user, &current_user, sizeof(struct current_user));
+       }
+
+       return user;
+}
 
 /********************************************************************
  * api_spoolss_getprinter
  * called from the spoolss dispatcher
  *
  ********************************************************************/
-uint32 _spoolss_startdocprinter( const POLICY_HND *handle, uint32 level,
-                               DOC_INFO *docinfo, uint32 *jobid)
+uint32 _spoolss_startdocprinter(POLICY_HND *handle, uint32 level,
+                               pipes_struct *p, DOC_INFO *docinfo, 
+                               uint32 *jobid)
 {
        DOC_INFO_1 *info_1 = &docinfo->doc_info_1;
-       
-       pstring fname;
-       pstring tempname;
-       pstring datatype;
-       int fd = -1;
        int snum;
+       pstring jobname;
+       fstring datatype;
        Printer_entry *Printer = find_printer_index_by_hnd(handle);
+       struct current_user user;
 
-       if (!OPEN_HANDLE(Printer))
-       {
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_startdocprinter: Invalid handle (%s)\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
 
+       get_current_user(&user, p);
+
        /*
         * a nice thing with NT is it doesn't listen to what you tell it.
         * when asked to send _only_ RAW datas, it tries to send datas
@@ -2477,41 +3217,34 @@ uint32 _spoolss_startdocprinter( const POLICY_HND *handle, uint32 level,
         * server-side code. *nnnnnggggh!*
         */
        
-       if (info_1->p_datatype != 0)
-       {
-               unistr2_to_ascii(datatype, &(info_1->docname), sizeof(datatype));
-               if (strcmp(datatype, "RAW") != 0)
-               {
+       if (info_1->p_datatype != 0) {
+               unistr2_to_ascii(datatype, &info_1->datatype, sizeof(datatype));
+               if (strcmp(datatype, "RAW") != 0) {
                        (*jobid)=0;
-                       return STATUS_1804;
+                       return ERROR_INVALID_DATATYPE;
                }               
        }                
        
        /* get the share number of the printer */
-       if (!get_printer_snum(handle, &snum))
-       {
-               return NT_STATUS_INVALID_HANDLE;
+       if (!get_printer_snum(handle, &snum)) {
+               return ERROR_INVALID_HANDLE;
        }
 
-       /* Create a temporary file in the printer spool directory
-        * and open it
-        */
-
-       slprintf(tempname,sizeof(tempname)-1, "%s/smb_print.XXXXXX",lp_pathname(snum));  
-       pstrcpy(fname, (char *)mktemp(tempname));
+       unistr2_to_ascii(jobname, &info_1->docname, sizeof(jobname));
+       
+       Printer->jobid = print_job_start(&user, snum, jobname);
 
-       fd=open(fname, O_WRONLY|O_CREAT|O_TRUNC, S_IRUSR|S_IWUSR );
-       DEBUG(4,("Temp spool file created: [%s]\n", fname));
+       /* An error occured in print_job_start() so return an appropriate
+          NT error code. */
 
-       Printer->current_jobid=fd;
-       pstrcpy(Printer->document_name, fname);
-       
-       unistr2_to_ascii(Printer->job_name, &info_1->docname, sizeof(Printer->job_name));
+       if (Printer->jobid == -1) {
+               return map_nt_error_from_unix(errno);
+       }
        
-       Printer->document_fd=fd;
        Printer->document_started=True;
-       (*jobid) = Printer->current_jobid;
+       (*jobid) = Printer->jobid;
 
+       srv_spoolss_sendnotify(handle);
        return 0x0;
 }
 
@@ -2520,276 +3253,413 @@ uint32 _spoolss_startdocprinter( const POLICY_HND *handle, uint32 level,
  * called from the spoolss dispatcher
  *
  ********************************************************************/
-uint32 _spoolss_enddocprinter(const POLICY_HND *handle)
+uint32 _spoolss_enddocprinter(POLICY_HND *handle)
 {
-       int snum;
-       pstring filename;
-       pstring filename1;
-       pstring job_name;
-       pstring syscmd;
-       char *tstr;
        Printer_entry *Printer=find_printer_index_by_hnd(handle);
        
-       *syscmd=0;
-       
-       if (!OPEN_HANDLE(Printer))
-       {
-               DEBUG(3,("Error in enddocprinter handle\n"));
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_enddocprinter: Invalid handle (%s)\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
        
        Printer->document_started=False;
-       close(Printer->document_fd);
-       DEBUG(4,("Temp spool file closed, printing now ...\n"));
+       print_job_end(Printer->jobid);
+       /* error codes unhandled so far ... */
+
+       srv_spoolss_sendnotify(handle);
+
+       return 0x0;
+}
 
-       pstrcpy(filename1, Printer->document_name);
-       pstrcpy(job_name, Printer->job_name);
+/****************************************************************************
+****************************************************************************/
+uint32 _spoolss_writeprinter( POLICY_HND *handle,
+                               uint32 buffer_size,
+                               uint8 *buffer,
+                               uint32 *buffer_written)
+{
+       Printer_entry *Printer = find_printer_index_by_hnd(handle);
        
-       if (!get_printer_snum(handle,&snum))
-       {
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_writeprinter: Invalid handle (%s)\n",OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
-       
-       /* copy the command into the buffer for extensive meddling. */
-       StrnCpy(syscmd, lp_printcommand(snum), sizeof(pstring) - 1);
 
-       /* look for "%s" in the string. If there is no %s, we cannot print. */   
-       if (!strstr(syscmd, "%s") && !strstr(syscmd, "%f"))
-       {
-               DEBUG(2,("WARNING! No placeholder for the filename in the print command for service %s!\n", SERVICE(snum)));
-       }
+       (*buffer_written) = print_job_write(Printer->jobid, (char *)buffer, 
+                                           buffer_size);
 
-       if (strstr(syscmd,"%s"))
-       {
-               pstrcpy(filename,filename1);
-               pstring_sub(syscmd, "%s", filename);
-       }
+       return 0x0;
+}
 
-       pstring_sub(syscmd, "%f", filename1);
+/********************************************************************
+ * api_spoolss_getprinter
+ * called from the spoolss dispatcher
+ *
+ ********************************************************************/
+static uint32 control_printer(POLICY_HND *handle, uint32 command,
+                             pipes_struct *p)
+{
+       struct current_user user;
+       int snum;
+       int errcode = 0;
+       Printer_entry *Printer = find_printer_index_by_hnd(handle);
 
-       /* Does the service have a printername? If not, make a fake and empty
-        * printer name. That way a %p is treated sanely if no printer
-        * name was specified to replace it. This eventuality is logged.
-        */
+       get_current_user(&user, p);
 
-       tstr = lp_printername(snum);
-       if (tstr == NULL || tstr[0] == '\0')
-       {
-               DEBUG(3,( "No printer name - using %s.\n", SERVICE(snum)));
-               tstr = SERVICE(snum);
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("control_printer: Invalid handle (%s)\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
 
-       pstring_sub(syscmd, "%p", tstr);
-
-       /* If the lpr command support the 'Job' option replace here */
-       pstring_sub(syscmd, "%j", job_name);
+       if (!get_printer_snum(handle, &snum) )   
+               return ERROR_INVALID_HANDLE;
 
-       if ( *syscmd != '\0')
-       {
-         int ret = smbrun(syscmd, NULL, False);
-         DEBUG(3,("Running the command `%s' gave %d\n", syscmd, ret));
-         if (ret < 0)
-               {
-                       lpq_reset(snum);
-                       return NT_STATUS_ACCESS_DENIED;
+       switch (command) {
+       case PRINTER_CONTROL_PAUSE:
+               if (print_queue_pause(&user, snum, &errcode)) {
+                       srv_spoolss_sendnotify(handle);
+                       return 0;
                }
-       }
-       else
-               {
-         DEBUG(0,("Null print command?\n"));
-                       lpq_reset(snum);
-                       return NT_STATUS_ACCESS_DENIED;
+               break;
+       case PRINTER_CONTROL_RESUME:
+       case PRINTER_CONTROL_UNPAUSE:
+               if (print_queue_resume(&user, snum, &errcode)) {
+                       srv_spoolss_sendnotify(handle);
+                       return 0;
+               }
+               break;
+       case PRINTER_CONTROL_PURGE:
+               if (print_queue_purge(&user, snum, &errcode)) {
+                       srv_spoolss_sendnotify(handle);
+                       return 0;
                }
+               break;
+       }
 
-       lpq_reset(snum);
+       if (errcode)
+               return (uint32)errcode;
 
-       return 0x0;
+       return ERROR_INVALID_FUNCTION;
 }
 
-/****************************************************************************
-****************************************************************************/
-uint32 _spoolss_writeprinter( const POLICY_HND *handle,
-                               uint32 buffer_size,
-                               const uint8 *buffer,
-                               uint32 *buffer_written)
+/********************************************************************
+ * api_spoolss_abortprinter
+ ********************************************************************/
+
+uint32 _spoolss_abortprinter(POLICY_HND *handle, pipes_struct *p)
 {
-       int fd;
+       return control_printer(handle, PRINTER_CONTROL_PURGE, p);
+}
+
+/********************************************************************
+ * called by spoolss_api_setprinter
+ * when updating a printer description
+ ********************************************************************/
+static uint32 update_printer_sec(POLICY_HND *handle, uint32 level,
+                                const SPOOL_PRINTER_INFO_LEVEL *info,
+                                pipes_struct *p, SEC_DESC_BUF *secdesc_ctr)
+{
+       struct current_user user;
+       uint32 result;
+       int snum;
+
        Printer_entry *Printer = find_printer_index_by_hnd(handle);
-       
-       if (!OPEN_HANDLE(Printer))
-       {
-               DEBUG(3,("Error in writeprinter handle\n"));
-               return NT_STATUS_INVALID_HANDLE;
+
+       if (!OPEN_HANDLE(Printer) || !get_printer_snum(handle, &snum)) {
+               DEBUG(0,("update_printer_sec: Invalid handle (%s)\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
 
-       fd = Printer->document_fd;
-       (*buffer_written) = write(fd, buffer, buffer_size);
-       Printer->document_lastwritten = (*buffer_written);
+       /* Work out which user is performing the operation */
+       get_current_user(&user, p);
 
-       return 0x0;
+       /* Check the user has permissions to change the security
+          descriptor.  By experimentation with two NT machines, the user
+          requires Full Access to the printer to change security
+          information. */ 
+       if (!print_access_check(&user, snum, PRINTER_ACCESS_ADMINISTER)) {
+               result = ERROR_ACCESS_DENIED;
+               goto done;
+       }
+
+       result = nt_printing_setsec(Printer->dev.handlename, secdesc_ctr);
+
+ done:
+       return result;
 }
 
 /********************************************************************
- * api_spoolss_getprinter
- * called from the spoolss dispatcher
- *
+ Do Samba sanity checks on a printer info struct.
  ********************************************************************/
-static uint32 control_printer(const POLICY_HND *handle, uint32 command)
+
+static BOOL check_printer_ok(NT_PRINTER_INFO_LEVEL_2 *info, int snum)
 {
-       int snum;
-       Printer_entry *Printer = find_printer_index_by_hnd(handle);
+       /*
+        * Ensure that this printer is shared under the correct name
+        * as this is what Samba insists upon.
+        */
 
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!(info->attributes & PRINTER_ATTRIBUTE_SHARED)) {
+               DEBUG(10,("check_printer_ok: SHARED check failed (%x).\n", (unsigned int)info->attributes ));
+               return False;
+       }
 
-       if (!get_printer_snum(handle, &snum) )   
-               return NT_STATUS_INVALID_HANDLE;
+       if (!(info->attributes & PRINTER_ATTRIBUTE_RAW_ONLY)) {
+               /* NT forgets to set the raw attribute but sends the correct type. */
+               if (strequal(info->datatype, "RAW"))
+                       info->attributes |= PRINTER_ATTRIBUTE_RAW_ONLY;
+               else {
+                       DEBUG(10,("check_printer_ok: RAW check failed (%x).\n", (unsigned int)info->attributes ));
+                       return False;
+               }
+       }
 
-       switch (command) {
-               case PRINTER_CONTROL_PAUSE:
-                       /* pause the printer here */
-                       status_printqueue(NULL, snum, LPSTAT_STOPPED);
-                       return 0x0;
-                       break;
-               case PRINTER_CONTROL_RESUME:
-               case PRINTER_CONTROL_UNPAUSE:
-                       /* UN-pause the printer here */
-                       status_printqueue(NULL, snum, LPSTAT_OK);
-                       return 0x0;
-                       break;
-               case PRINTER_CONTROL_PURGE:
-                       /*
-                        * It's not handled by samba
-                        * we need a smb.conf param to do
-                        * lprm -P%p - on BSD
-                        * lprm -P%p all on LPRNG
-                        * I don't know on SysV
-                        * we could do it by looping in the job's list...
-                        */
-                       break;
+       if (!strequal(info->sharename, lp_servicename(snum))) {
+               DEBUG(10,("check_printer_ok: NAME check failed (%s) (%s).\n", info->sharename, lp_servicename(snum)));
+               return False;
+       }
+
+       return True;
+}
+
+/****************************************************************************
+****************************************************************************/
+static BOOL add_printer_hook(NT_PRINTER_INFO_LEVEL *printer)
+{
+       pid_t local_pid = sys_getpid();
+       char *cmd = lp_addprinter_cmd();
+       char *path;
+       char **qlines;
+       pstring tmp_file;
+       pstring command;
+       pstring driverlocation;
+       int numlines;
+       int ret;
+
+       if (*lp_pathname(lp_servicenumber(PRINTERS_NAME)))
+               path = lp_pathname(lp_servicenumber(PRINTERS_NAME));
+       else
+               path = tmpdir();
+
+       /* build driver path... only 9X architecture is needed for legacy reasons */
+       slprintf(driverlocation, sizeof(driverlocation)-1, "\\\\%s\\print$\\WIN40\\0",
+                       global_myname);
+       /* change \ to \\ for the shell */
+       all_string_sub(driverlocation,"\\","\\\\",sizeof(pstring));
+       
+       slprintf(tmp_file, sizeof(tmp_file), "%s/smbcmd.%d", path, local_pid);
+       slprintf(command, sizeof(command), "%s \"%s\" \"%s\" \"%s\" \"%s\" \"%s\" \"%s\"",
+                       cmd, printer->info_2->printername, printer->info_2->sharename,
+                       printer->info_2->portname, printer->info_2->drivername,
+                       printer->info_2->location, driverlocation);
+
+       unlink(tmp_file);
+       DEBUG(10,("Running [%s > %s]\n", command,tmp_file));
+       ret = smbrun(command, tmp_file, False);
+       DEBUGADD(10,("returned [%d]\n", ret));
+
+       if ( ret != 0 ) {
+               unlink(tmp_file);
+               return False;
        }
 
-       return NT_STATUS_INVALID_INFO_CLASS;
+       numlines = 0;
+       qlines = file_lines_load(tmp_file, &numlines);
+       DEBUGADD(10,("Lines returned = [%d]\n", numlines));
+       DEBUGADD(10,("Unlinking port file [%s]\n", tmp_file));
+       unlink(tmp_file);
+
+       if(numlines) {
+               /* Set the portname to what the script says the portname should be. */
+               strncpy(printer->info_2->portname, qlines[0], sizeof(printer->info_2->portname));
+               DEBUGADD(6,("Line[0] = [%s]\n", qlines[0]));
+
+               /* Send SIGHUP to process group... is there a better way? */
+               kill(0, SIGHUP);
+               add_all_printers();
+       }
+
+       file_lines_free(qlines);
+       return True;
 }
 
 /********************************************************************
  * called by spoolss_api_setprinter
  * when updating a printer description
  ********************************************************************/
-static uint32 update_printer(const POLICY_HND *handle, uint32 level,
+
+static uint32 update_printer(POLICY_HND *handle, uint32 level,
                            const SPOOL_PRINTER_INFO_LEVEL *info,
-                           const DEVICEMODE *devmode)
+                           DEVICEMODE *devmode)
 {
        int snum;
-       NT_PRINTER_INFO_LEVEL printer;
-       NT_DEVICEMODE *nt_devmode;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        Printer_entry *Printer = find_printer_index_by_hnd(handle);
+       uint32 result;
 
-       nt_devmode=NULL;
-       
        DEBUG(8,("update_printer\n"));
        
+       result = NT_STATUS_NO_PROBLEMO;
+
+       /* Check calling user has permission to update printer description */ 
+
        if (level!=2) {
-               DEBUG(0,("Send a mail to jfm@samba.org\n"));
+               DEBUG(0,("Send a mail to samba@samba.org\n"));
                DEBUGADD(0,("with the following message: update_printer: level!=2\n"));
-               return NT_STATUS_INVALID_INFO_CLASS;
+               result = ERROR_INVALID_LEVEL;
+               goto done;
        }
 
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               result = ERROR_INVALID_HANDLE;
+               goto done;
+       }
 
-       if (!get_printer_snum(handle, &snum) )
-               return NT_STATUS_INVALID_HANDLE;
+       if (!get_printer_snum(handle, &snum)) {
+               result = ERROR_INVALID_HANDLE;
+               goto done;
+       }
+
+       if (!print_access_check(NULL, snum, PRINTER_ACCESS_ADMINISTER)) {
+               DEBUG(3, ("printer property change denied by security "
+                         "descriptor\n"));
+               result = ERROR_ACCESS_DENIED;
+               goto done;
+       }
        
-       get_a_printer(&printer, 2, lp_servicename(snum));
+       if(get_a_printer(&printer, 2, lp_servicename(snum)) != 0) {
+               result = ERROR_INVALID_HANDLE;
+               goto done;
+       }
 
        DEBUGADD(8,("Converting info_2 struct\n"));
-       convert_printer_info(info, &printer, level);
+
+       /*
+        * convert_printer_info converts the incoming
+        * info from the client and overwrites the info
+        * just read from the tdb in the pointer 'printer'.
+        */
+
+       convert_printer_info(info, printer, level);
        
-       if ((info->info_2)->devmode_ptr != 0) {
+       if (info->info_2->devmode_ptr != 0) {
                /* we have a valid devmode
                   convert it and link it*/
-               
-               /* the nt_devmode memory is already alloced
-                * while doing the get_a_printer call
-                * but the devmode private part is not
-                * it's done by convert_devicemode
+
+               /*
+                * Ensure printer->info_2->devmode is a valid pointer 
+                * as we will be overwriting it in convert_devicemode().
                 */
-               DEBUGADD(8,("Converting the devicemode struct\n"));
-               nt_devmode=printer.info_2->devmode;
                
-               init_devicemode(nt_devmode);
-                               
-               convert_devicemode(*devmode, nt_devmode);
+               if (printer->info_2->devmode == NULL)
+                       printer->info_2->devmode = construct_nt_devicemode(printer->info_2->printername);
+
+               DEBUGADD(8,("Converting the devicemode struct\n"));
+               convert_devicemode(devmode, printer->info_2->devmode);
+
+       } else {
+               if (printer->info_2->devmode != NULL)
+                       free_nt_devicemode(&printer->info_2->devmode);
+               printer->info_2->devmode=NULL;
        }
-       else {
-               if (printer.info_2->devmode != NULL)
-                       free(printer.info_2->devmode);
-               printer.info_2->devmode=NULL;
+
+       /*
+        * Do sanity check on the requested changes for Samba.
+        */
+
+       if (!check_printer_ok(printer->info_2, snum)) {
+               result = ERROR_INVALID_PARAMETER;
+               goto done;
        }
-                       
-       if (add_a_printer(printer, 2)!=0) {
-               free_a_printer(printer, 2);
-               
+
+       if (*lp_addprinter_cmd() )
+               if ( !add_printer_hook(printer) ) {
+                       result = ERROR_ACCESS_DENIED;
+                       goto done;
+               }
+       
+       if (add_a_printer(*printer, 2)!=0) {
                /* I don't really know what to return here !!! */
-               return NT_STATUS_INVALID_INFO_CLASS;
+               result = ERROR_ACCESS_DENIED;
+               goto done;
        }
 
-       free_a_printer(printer, 2);
+ done:
+       free_a_printer(&printer, 2);
 
-       return NT_STATUS_NO_PROBLEMO;
+       srv_spoolss_sendnotify(handle);
+
+       return result;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_setprinter(const POLICY_HND *handle, uint32 level,
+uint32 _spoolss_setprinter(POLICY_HND *handle, uint32 level,
                           const SPOOL_PRINTER_INFO_LEVEL *info,
-                          const DEVMODE_CTR devmode_ctr,
-                          uint32 command)
+                          DEVMODE_CTR devmode_ctr,
+                          SEC_DESC_BUF *secdesc_ctr,
+                          uint32 command, pipes_struct *p)
 {
        Printer_entry *Printer = find_printer_index_by_hnd(handle);
        
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_setprinter: Invalid handle (%s)\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
 
        /* check the level */   
        switch (level) {
                case 0:
-                       return control_printer(handle, command);
-                       break;
+                       return control_printer(handle, command, p);
                case 2:
                        return update_printer(handle, level, info, devmode_ctr.devmode);
-                       break;
+               case 3:
+                       return update_printer_sec(handle, level, info, p,
+                                                 secdesc_ctr);
+               default:
+                       return ERROR_INVALID_LEVEL;
        }
-
-       return NT_STATUS_INVALID_INFO_CLASS;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_fcpn(const POLICY_HND *handle)
+uint32 _spoolss_fcpn(POLICY_HND *handle)
 {
        Printer_entry *Printer= find_printer_index_by_hnd(handle);
        
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
-       
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_fcpn: Invalid handle (%s)\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
+
+       if (Printer->notify.client_connected==True)
+               if(!srv_spoolss_replycloseprinter(&Printer->notify.client_hnd))
+                       return ERROR_INVALID_HANDLE;
+
        Printer->notify.flags=0;
        Printer->notify.options=0;
        Printer->notify.localmachine[0]='\0';
        Printer->notify.printerlocal=0;
+       if (Printer->notify.option)
+               safe_free(Printer->notify.option->ctr.type);
        safe_free(Printer->notify.option);
        Printer->notify.option=NULL;
-       
+       Printer->notify.client_connected=False;
+
        return NT_STATUS_NO_PROBLEMO;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_addjob(const POLICY_HND *handle, uint32 level,
-                       NEW_BUFFER *buffer, uint32 offered)
+uint32 _spoolss_addjob(POLICY_HND *handle, uint32 level,
+                      NEW_BUFFER *buffer, uint32 offered,
+                      uint32 *needed)
 {
-       return NT_STATUS_NO_PROBLEMO;
+       *needed = 0;
+       return ERROR_INVALID_PARAMETER; /* this is what a NT server
+                                           returns for AddJob. AddJob
+                                           must fail on non-local
+                                           printers */
 }
 
 /****************************************************************************
@@ -2806,19 +3676,19 @@ static void fill_job_info_1(JOB_INFO_1 *job_info, print_queue_struct *queue,
        snprintf(temp_name, sizeof(temp_name), "\\\\%s", global_myname);
 
        job_info->jobid=queue->job;     
-       init_unistr(&(job_info->printername), lp_servicename(snum));
-       init_unistr(&(job_info->machinename), temp_name);
-       init_unistr(&(job_info->username), queue->user);
-       init_unistr(&(job_info->document), queue->file);
-       init_unistr(&(job_info->datatype), "RAW");
-       init_unistr(&(job_info->text_status), "");
-       job_info->status=queue->status;
+       init_unistr(&job_info->printername, lp_servicename(snum));
+       init_unistr(&job_info->machinename, temp_name);
+       init_unistr(&job_info->username, queue->user);
+       init_unistr(&job_info->document, queue->file);
+       init_unistr(&job_info->datatype, "RAW");
+       init_unistr(&job_info->text_status, "");
+       job_info->status=nt_printj_status(queue->status);
        job_info->priority=queue->priority;
        job_info->position=position;
        job_info->totalpages=0;
        job_info->pagesprinted=0;
 
-       make_systemtime(&(job_info->submitted), t);
+       make_systemtime(&job_info->submitted, t);
 }
 
 /****************************************************************************
@@ -2827,38 +3697,37 @@ static BOOL fill_job_info_2(JOB_INFO_2 *job_info, print_queue_struct *queue,
                             int position, int snum)
 {
        pstring temp_name;
-       DEVICEMODE *devmode;
-       NT_PRINTER_INFO_LEVEL ntprinter;
+       NT_PRINTER_INFO_LEVEL *ntprinter = NULL;
        pstring chaine;
 
        struct tm *t;
        time_t unixdate = time(NULL);
 
        if (get_a_printer(&ntprinter, 2, lp_servicename(snum)) !=0 )
-       {
-               return (False);
-       }       
+               return False;
        
        t=gmtime(&unixdate);
        snprintf(temp_name, sizeof(temp_name), "\\\\%s", global_myname);
 
        job_info->jobid=queue->job;
        
-       snprintf(chaine, sizeof(chaine)-1, "\\\\%s\\%s", global_myname, ntprinter.info_2->printername);
-       init_unistr(&(job_info->printername), chaine);
+       snprintf(chaine, sizeof(chaine)-1, "\\\\%s\\%s", global_myname, ntprinter->info_2->printername);
+
+       init_unistr(&job_info->printername, chaine);
        
-       init_unistr(&(job_info->machinename), temp_name);
-       init_unistr(&(job_info->username), queue->user);
-       init_unistr(&(job_info->document), queue->file);
-       init_unistr(&(job_info->notifyname), queue->user);
-       init_unistr(&(job_info->datatype), "RAW");
-       init_unistr(&(job_info->printprocessor), "winprint");
-       init_unistr(&(job_info->parameters), "");
-       init_unistr(&(job_info->text_status), "");
+       init_unistr(&job_info->machinename, temp_name);
+       init_unistr(&job_info->username, queue->user);
+       init_unistr(&job_info->document, queue->file);
+       init_unistr(&job_info->notifyname, queue->user);
+       init_unistr(&job_info->datatype, "RAW");
+       init_unistr(&job_info->printprocessor, "winprint");
+       init_unistr(&job_info->parameters, "");
+       init_unistr(&job_info->drivername, ntprinter->info_2->drivername);
+       init_unistr(&job_info->text_status, "");
        
 /* and here the security descriptor */
 
-       job_info->status=queue->status;
+       job_info->status=nt_printj_status(queue->status);
        job_info->priority=queue->priority;
        job_info->position=position;
        job_info->starttime=0;
@@ -2869,12 +3738,12 @@ static BOOL fill_job_info_2(JOB_INFO_2 *job_info, print_queue_struct *queue,
        job_info->timeelapsed=0;
        job_info->pagesprinted=0;
 
-       devmode=(DEVICEMODE *)malloc(sizeof(DEVICEMODE));
-       ZERO_STRUCTP(devmode);  
-       construct_dev_mode(devmode, snum, global_myname);                       
-       job_info->devmode=devmode;
+       if((job_info->devmode = construct_dev_mode(snum, global_myname)) == NULL) {
+               free_a_printer(&ntprinter, 2);
+               return False;
+       }
 
-       free_a_printer(ntprinter, 2);
+       free_a_printer(&ntprinter, 2);
        return (True);
 }
 
@@ -2889,25 +3758,31 @@ static uint32 enumjobs_level1(print_queue_struct *queue, int snum,
        int i;
        
        info=(JOB_INFO_1 *)malloc(*returned*sizeof(JOB_INFO_1));
+       if (info==NULL) {
+               safe_free(queue);
+               *returned=0;
+               return ERROR_NOT_ENOUGH_MEMORY;
+       }
        
        for (i=0; i<*returned; i++)
-       {
-               fill_job_info_1(&(info[i]), &(queue[i]), i, snum);
-       }
+               fill_job_info_1(&info[i], &queue[i], i, snum);
+
+       safe_free(queue);
 
        /* check the required size. */  
        for (i=0; i<*returned; i++)
-               (*needed) += spoolss_size_job_info_1(&(info[i]));
+               (*needed) += spoolss_size_job_info_1(&info[i]);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(info);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
        for (i=0; i<*returned; i++)
-               new_smb_io_job_info_1("", buffer, &(info[i]), 0);       
+               new_smb_io_job_info_1("", buffer, &info[i], 0); 
 
        /* clear memory */
-       safe_free(queue);
        safe_free(info);
 
        if (*needed > offered) {
@@ -2929,25 +3804,31 @@ static uint32 enumjobs_level2(print_queue_struct *queue, int snum,
        int i;
        
        info=(JOB_INFO_2 *)malloc(*returned*sizeof(JOB_INFO_2));
+       if (info==NULL) {
+               safe_free(queue);
+               *returned=0;
+               return ERROR_NOT_ENOUGH_MEMORY;
+       }
        
        for (i=0; i<*returned; i++)
-       {
-               fill_job_info_2(&(info[i]), &(queue[i]), i, snum);
-       }
+               fill_job_info_2(&(info[i]), &queue[i], i, snum);
+
+       safe_free(queue);
 
        /* check the required size. */  
        for (i=0; i<*returned; i++)
-               (*needed) += spoolss_size_job_info_2(&(info[i]));
+               (*needed) += spoolss_size_job_info_2(&info[i]);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(info);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the structures */
        for (i=0; i<*returned; i++)
-               new_smb_io_job_info_2("", buffer, &(info[i]), 0);       
+               new_smb_io_job_info_2("", buffer, &info[i], 0); 
 
        /* clear memory */
-       safe_free(queue);
        safe_free(info);
 
        if (*needed > offered) {
@@ -2977,136 +3858,160 @@ uint32 _spoolss_enumjobs( POLICY_HND *handle, uint32 firstjob, uint32 numofjobs,
        *returned=0;
 
        if (!get_printer_snum(handle, &snum))
-       {
-               return NT_STATUS_INVALID_HANDLE;
-       }
+               return ERROR_INVALID_HANDLE;
 
-       *returned = get_printqueue(snum, NULL, &queue, &prt_status);
+       *returned = print_queue_status(snum, &queue, &prt_status);
        DEBUGADD(4,("count:[%d], status:[%d], [%s]\n", *returned, prt_status.status, prt_status.message));
 
+       if (*returned == 0) {
+               safe_free(queue);
+               return NT_STATUS_NO_PROBLEMO;
+       }
+
        switch (level) {
        case 1:
                return enumjobs_level1(queue, snum, buffer, offered, needed, returned);
-               break;
        case 2:
                return enumjobs_level2(queue, snum, buffer, offered, needed, returned);
-               break;                          
        default:
-               return NT_STATUS_INVALID_LEVEL;
-               break;
+               safe_free(queue);
+               *returned=0;
+               return ERROR_INVALID_LEVEL;
        }
 }
 
 
-
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_schedulejob( const POLICY_HND *handle, uint32 jobid)
+uint32 _spoolss_schedulejob( POLICY_HND *handle, uint32 jobid)
 {
        return 0x0;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_setjob( const POLICY_HND *handle,
+uint32 _spoolss_setjob( POLICY_HND *handle,
                                uint32 jobid,
                                uint32 level,
+                pipes_struct *p,
                                JOB_INFO *ctr,
                                uint32 command)
 
 {
+       struct current_user user;
        int snum;
-       print_queue_struct *queue=NULL;
        print_status_struct prt_status;
-       int i=0;
-       BOOL found=False;
-       int count;
                
        memset(&prt_status, 0, sizeof(prt_status));
 
-       if (!get_printer_snum(handle, &snum))
-       {
-               return NT_STATUS_INVALID_HANDLE;
+       if (!get_printer_snum(handle, &snum)) {
+               return ERROR_INVALID_HANDLE;
        }
 
-       count=get_printqueue(snum, NULL, &queue, &prt_status);          
+       if (!print_job_exists(jobid)) {
+               return ERROR_INVALID_PRINTER_NAME;
+       }
 
-       while ( (i<count) && found==False )
-       {
-               if ( jobid == queue[i].job )
-               {
-                       found=True;
+       get_current_user(&user, p);     
+
+       switch (command) {
+       case JOB_CONTROL_CANCEL:
+       case JOB_CONTROL_DELETE:
+               if (print_job_delete(&user, jobid)) {
+                       srv_spoolss_sendnotify(handle);
+                       return 0x0;
                }
-               i++;
-       }
-       
-       if (found==True)
-       {
-               switch (command)
-               {
-                       case JOB_CONTROL_CANCEL:
-                       case JOB_CONTROL_DELETE:
-                       {
-                               del_printqueue(NULL, snum, jobid);
-                               safe_free(queue);
-                               return 0x0;
-                       }
-                       case JOB_CONTROL_PAUSE:
-                       {
-                               status_printjob(NULL, snum, jobid, LPQ_PAUSED);
-                               safe_free(queue);
-                               return 0x0;
-                       }
-                       case JOB_CONTROL_RESUME:
-                       {
-                               status_printjob(NULL, snum, jobid, LPQ_QUEUED);
-                               safe_free(queue);
-                               return 0x0;
-                       }
+               break;
+       case JOB_CONTROL_PAUSE:
+               if (print_job_pause(&user, jobid)) {
+                       srv_spoolss_sendnotify(handle);
+                       return 0x0;
+               }               
+               break;
+       case JOB_CONTROL_RESUME:
+               if (print_job_resume(&user, jobid)) {
+                       srv_spoolss_sendnotify(handle);
+                       return 0x0;
                }
+               break;
+       default:
+               return ERROR_INVALID_LEVEL;
        }
-       safe_free(queue);
-       return NT_STATUS_INVALID_INFO_CLASS;
 
+       return ERROR_INVALID_HANDLE;
 }
 
 /****************************************************************************
  Enumerates all printer drivers at level 1.
 ****************************************************************************/
-static uint32 enumprinterdrivers_level1(fstring *list, fstring servername, fstring architecture, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+static uint32 enumprinterdrivers_level1(fstring servername, fstring architecture, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
        int i;
+       int ndrivers;
+       uint32 version;
+       fstring *list = NULL;
+
        NT_PRINTER_DRIVER_INFO_LEVEL driver;
        DRIVER_INFO_1 *driver_info_1=NULL;
-       driver_info_1=(DRIVER_INFO_1 *)malloc(*returned * sizeof(DRIVER_INFO_1));
 
-       for (i=0; i<*returned; i++) {
-               get_a_printer_driver(&driver, 3, list[i], architecture);
-               fill_printer_driver_info_1(&(driver_info_1[i]), driver, servername, architecture );
-               free_a_printer_driver(driver, 3);
+       *returned=0;
+
+#define MAX_VERSION 4
+
+       for (version=0; version<MAX_VERSION; version++) {
+               list=NULL;
+               ndrivers=get_ntdrivers(&list, architecture, version);
+               DEBUGADD(4,("we have:[%d] drivers in environment [%s] and version [%d]\n", ndrivers, architecture, version));
+
+               if(ndrivers == -1)
+                       return ERROR_NOT_ENOUGH_MEMORY;
+
+               if(ndrivers != 0) {
+                       if((driver_info_1=(DRIVER_INFO_1 *)Realloc(driver_info_1, (*returned+ndrivers) * sizeof(DRIVER_INFO_1))) == NULL) {
+                               safe_free(list);
+                               return ERROR_NOT_ENOUGH_MEMORY;
+                       }
+               }
+
+               for (i=0; i<ndrivers; i++) {
+                       uint32 status;
+                       DEBUGADD(5,("\tdriver: [%s]\n", list[i]));
+                       ZERO_STRUCT(driver);
+                       if ((status = get_a_printer_driver(&driver, 3, list[i], architecture, version)) != 0) {
+                               safe_free(list);
+                               return status;
+                       }
+                       fill_printer_driver_info_1(&driver_info_1[*returned+i], driver, servername, architecture );             
+                       free_a_printer_driver(driver, 3);
+               }       
+
+               *returned+=ndrivers;
+               safe_free(list);
        }
        
        /* check the required size. */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding driver [%d]'s size\n",i));
-               *needed += spoolss_size_printer_driver_info_1(&(driver_info_1[i]));
+               *needed += spoolss_size_printer_driver_info_1(&driver_info_1[i]);
        }
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(driver_info_1);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the form structures */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding driver [%d] to buffer\n",i));
-               new_smb_io_printer_driver_info_1("", buffer, &(driver_info_1[i]), 0);
+               new_smb_io_printer_driver_info_1("", buffer, &driver_info_1[i], 0);
        }
 
-       safe_free(list);
+       safe_free(driver_info_1);
 
-       if (*needed > offered)
+       if (*needed > offered) {
+               *returned=0;
                return ERROR_INSUFFICIENT_BUFFER;
+       }
        else
                return NT_STATUS_NO_PROBLEMO;
 }
@@ -3114,40 +4019,75 @@ static uint32 enumprinterdrivers_level1(fstring *list, fstring servername, fstri
 /****************************************************************************
  Enumerates all printer drivers at level 2.
 ****************************************************************************/
-static uint32 enumprinterdrivers_level2(fstring *list, fstring servername, fstring architecture, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+static uint32 enumprinterdrivers_level2(fstring servername, fstring architecture, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
        int i;
+       int ndrivers;
+       uint32 version;
+       fstring *list = NULL;
+
        NT_PRINTER_DRIVER_INFO_LEVEL driver;
        DRIVER_INFO_2 *driver_info_2=NULL;
-       driver_info_2=(DRIVER_INFO_2 *)malloc(*returned * sizeof(DRIVER_INFO_2));
 
-       for (i=0; i<*returned; i++) {
-               get_a_printer_driver(&driver, 3, list[i], architecture);
-               fill_printer_driver_info_2(&(driver_info_2[i]), driver, servername, architecture );
-               free_a_printer_driver(driver, 3);
+       *returned=0;
+
+#define MAX_VERSION 4
+
+       for (version=0; version<MAX_VERSION; version++) {
+               list=NULL;
+               ndrivers=get_ntdrivers(&list, architecture, version);
+               DEBUGADD(4,("we have:[%d] drivers in environment [%s] and version [%d]\n", ndrivers, architecture, version));
+
+               if(ndrivers == -1)
+                       return ERROR_NOT_ENOUGH_MEMORY;
+
+               if(ndrivers != 0) {
+                       if((driver_info_2=(DRIVER_INFO_2 *)Realloc(driver_info_2, (*returned+ndrivers) * sizeof(DRIVER_INFO_2))) == NULL) {
+                               safe_free(list);
+                               return ERROR_NOT_ENOUGH_MEMORY;
+                       }
+               }
+               
+               for (i=0; i<ndrivers; i++) {
+                       uint32 status;
+
+                       DEBUGADD(5,("\tdriver: [%s]\n", list[i]));
+                       ZERO_STRUCT(driver);
+                       if ((status = get_a_printer_driver(&driver, 3, list[i], architecture, version)) != 0) {
+                               safe_free(list);
+                               return status;
+                       }
+                       fill_printer_driver_info_2(&driver_info_2[*returned+i], driver, servername);            
+                       free_a_printer_driver(driver, 3);
+               }       
+
+               *returned+=ndrivers;
+               safe_free(list);
        }
        
        /* check the required size. */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding driver [%d]'s size\n",i));
                *needed += spoolss_size_printer_driver_info_2(&(driver_info_2[i]));
        }
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(driver_info_2);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the form structures */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding driver [%d] to buffer\n",i));
                new_smb_io_printer_driver_info_2("", buffer, &(driver_info_2[i]), 0);
        }
 
-       safe_free(list);
+       safe_free(driver_info_2);
 
-       if (*needed > offered)
+       if (*needed > offered) {
+               *returned=0;
                return ERROR_INSUFFICIENT_BUFFER;
+       }
        else
                return NT_STATUS_NO_PROBLEMO;
 }
@@ -3155,40 +4095,78 @@ static uint32 enumprinterdrivers_level2(fstring *list, fstring servername, fstri
 /****************************************************************************
  Enumerates all printer drivers at level 3.
 ****************************************************************************/
-static uint32 enumprinterdrivers_level3(fstring *list, fstring servername, fstring architecture, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
+static uint32 enumprinterdrivers_level3(fstring servername, fstring architecture, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
        int i;
+       int ndrivers;
+       uint32 version;
+       fstring *list = NULL;
+
        NT_PRINTER_DRIVER_INFO_LEVEL driver;
        DRIVER_INFO_3 *driver_info_3=NULL;
-       driver_info_3=(DRIVER_INFO_3 *)malloc((*returned)*sizeof(DRIVER_INFO_3));
 
-       for (i=0; i<*returned; i++) {
-               get_a_printer_driver(&driver, 3, list[i], architecture);
-               fill_printer_driver_info_3(&(driver_info_3[i]), driver, servername, architecture );
-               free_a_printer_driver(driver, 3);
+       *returned=0;
+
+#define MAX_VERSION 4
+
+       for (version=0; version<MAX_VERSION; version++) {
+               list=NULL;
+               ndrivers=get_ntdrivers(&list, architecture, version);
+               DEBUGADD(4,("we have:[%d] drivers in environment [%s] and version [%d]\n", ndrivers, architecture, version));
+
+               if(ndrivers == -1)
+                       return ERROR_NOT_ENOUGH_MEMORY;
+
+               if(ndrivers != 0) {
+                       if((driver_info_3=(DRIVER_INFO_3 *)Realloc(driver_info_3, (*returned+ndrivers) * sizeof(DRIVER_INFO_3))) == NULL) {
+                               safe_free(list);
+                               return ERROR_NOT_ENOUGH_MEMORY;
+                       }
+               }
+
+               for (i=0; i<ndrivers; i++) {
+                       uint32 status;
+
+                       DEBUGADD(5,("\tdriver: [%s]\n", list[i]));
+                       ZERO_STRUCT(driver);
+                       if ((status = get_a_printer_driver(&driver, 3, list[i], architecture, version)) != 0) {
+                               safe_free(list);
+                               return status;
+                       }
+                       fill_printer_driver_info_3(&driver_info_3[*returned+i], driver, servername);            
+                       free_a_printer_driver(driver, 3);
+               }       
+
+               *returned+=ndrivers;
+               safe_free(list);
        }
-       
+
        /* check the required size. */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding driver [%d]'s size\n",i));
-               *needed += spoolss_size_printer_driver_info_3(&(driver_info_3[i]));
+               *needed += spoolss_size_printer_driver_info_3(&driver_info_3[i]);
        }
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(driver_info_3);
                return ERROR_INSUFFICIENT_BUFFER;
-
-       /* fill the buffer with the form structures */
-       for (i=0; i<*returned; i++)
-       {
-               DEBUGADD(6,("adding form [%d] to buffer\n",i));
-               new_smb_io_printer_driver_info_3("", buffer, &(driver_info_3[i]), 0);
+       }
+       
+       /* fill the buffer with the driver structures */
+       for (i=0; i<*returned; i++) {
+               DEBUGADD(6,("adding driver [%d] to buffer\n",i));
+               new_smb_io_printer_driver_info_3("", buffer, &driver_info_3[i], 0);
        }
 
-       safe_free(list);
-
-       if (*needed > offered)
+       for (i=0; i<*returned; i++)
+               safe_free(driver_info_3[i].dependentfiles);
+       
+       safe_free(driver_info_3);
+       
+       if (*needed > offered) {
+               *returned=0;
                return ERROR_INSUFFICIENT_BUFFER;
+       }
        else
                return NT_STATUS_NO_PROBLEMO;
 }
@@ -3200,8 +4178,7 @@ uint32 _spoolss_enumprinterdrivers( UNISTR2 *name, UNISTR2 *environment, uint32
                                    NEW_BUFFER *buffer, uint32 offered,
                                    uint32 *needed, uint32 *returned)
 {
-       int i;
-       fstring *list;
+       fstring *list = NULL;
        fstring servername;
        fstring architecture;
 
@@ -3211,34 +4188,27 @@ uint32 _spoolss_enumprinterdrivers( UNISTR2 *name, UNISTR2 *environment, uint32
        *returned=0;
 
        unistr2_to_ascii(architecture, environment, sizeof(architecture)-1);
-       *returned=get_ntdrivers(&list, architecture);
 
-       DEBUGADD(4,("we have: [%d] drivers in environment [%s]\n", *returned, architecture));
-       for (i=0; i<*returned; i++)
-               DEBUGADD(5,("driver: [%s]\n", list[i]));
-       
        switch (level) {
        case 1:
-               return enumprinterdrivers_level1(list, servername, architecture, buffer, offered, needed, returned);
-               break;
+               return enumprinterdrivers_level1(servername, architecture, buffer, offered, needed, returned);
        case 2:
-               return enumprinterdrivers_level2(list, servername, architecture, buffer, offered, needed, returned);
-               break;
+               return enumprinterdrivers_level2(servername, architecture, buffer, offered, needed, returned);
        case 3:
-               return enumprinterdrivers_level3(list, servername, architecture, buffer, offered, needed, returned);
-               break;
+               return enumprinterdrivers_level3(servername, architecture, buffer, offered, needed, returned);
        default:
-               return NT_STATUS_INVALID_INFO_CLASS;
-               break;
+               *returned=0;
+               safe_free(list);
+               return ERROR_INVALID_LEVEL;
        }
 }
 
 /****************************************************************************
 ****************************************************************************/
-static void fill_form_1(FORM_1 *form, nt_forms_struct *list, int position)
+static void fill_form_1(FORM_1 *form, nt_forms_struct *list)
 {
        form->flag=list->flag;
-       init_unistr(&(form->name), list->name);
+       init_unistr(&form->name, list->name);
        form->width=list->width;
        form->length=list->length;
        form->left=list->left;
@@ -3249,80 +4219,151 @@ static void fill_form_1(FORM_1 *form, nt_forms_struct *list, int position)
        
 /****************************************************************************
 ****************************************************************************/
-uint32 _new_spoolss_enumforms( const POLICY_HND *handle, uint32 level, 
+uint32 _new_spoolss_enumforms( POLICY_HND *handle, uint32 level, 
                               NEW_BUFFER *buffer, uint32 offered, 
                               uint32 *needed, uint32 *numofforms)
 {
        nt_forms_struct *list=NULL;
-       FORM_1 *forms_1;
+       FORM_1 *forms_1;
+       int buffer_size=0;
+       int i;
+
+       DEBUG(4,("_new_spoolss_enumforms\n"));
+       DEBUGADD(5,("Offered buffer size [%d]\n", offered));
+       DEBUGADD(5,("Info level [%d]\n",          level));
+
+       *numofforms = get_ntforms(&list);
+       DEBUGADD(5,("Number of forms [%d]\n",     *numofforms));
+
+       if (*numofforms == 0) return ERROR_NO_MORE_ITEMS;
+
+       switch (level) {
+       case 1:
+               if ((forms_1=(FORM_1 *)malloc(*numofforms * sizeof(FORM_1))) == NULL) {
+                       *numofforms=0;
+                       return ERROR_NOT_ENOUGH_MEMORY;
+               }
+
+               /* construct the list of form structures */
+               for (i=0; i<*numofforms; i++) {
+                       DEBUGADD(6,("Filling form number [%d]\n",i));
+                       fill_form_1(&forms_1[i], &list[i]);
+               }
+               
+               safe_free(list);
+
+               /* check the required size. */
+               for (i=0; i<*numofforms; i++) {
+                       DEBUGADD(6,("adding form [%d]'s size\n",i));
+                       buffer_size += spoolss_size_form_1(&forms_1[i]);
+               }
+
+               *needed=buffer_size;            
+               
+               if (!alloc_buffer_size(buffer, buffer_size)){
+                       safe_free(forms_1);
+                       return ERROR_INSUFFICIENT_BUFFER;
+               }
+
+               /* fill the buffer with the form structures */
+               for (i=0; i<*numofforms; i++) {
+                       DEBUGADD(6,("adding form [%d] to buffer\n",i));
+                       new_smb_io_form_1("", buffer, &forms_1[i], 0);
+               }
+
+               safe_free(forms_1);
+
+               if (*needed > offered) {
+                       *numofforms=0;
+                       return ERROR_INSUFFICIENT_BUFFER;
+               }
+               else
+                       return NT_STATUS_NO_PROBLEMO;
+                       
+       default:
+               safe_free(list);
+               return ERROR_INVALID_LEVEL;
+       }
+
+}
+
+/****************************************************************************
+****************************************************************************/
+uint32 _spoolss_getform( POLICY_HND *handle, uint32 level, UNISTR2 *uni_formname, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
+{
+       nt_forms_struct *list=NULL;
+       FORM_1 form_1;
+       fstring form_name;
        int buffer_size=0;
-       int i;
+       int numofforms, i;
 
-       DEBUG(4,("_new_spoolss_enumforms\n"));
+       unistr2_to_ascii(form_name, uni_formname, sizeof(form_name)-1);
+
+       DEBUG(4,("_spoolss_getform\n"));
        DEBUGADD(5,("Offered buffer size [%d]\n", offered));
        DEBUGADD(5,("Info level [%d]\n",          level));
 
-       *numofforms = get_ntforms(&list);
-       DEBUGADD(5,("Number of forms [%d]\n",     *numofforms));
+       numofforms = get_ntforms(&list);
+       DEBUGADD(5,("Number of forms [%d]\n",     numofforms));
+
+       if (numofforms == 0)
+               return ERROR_NO_MORE_ITEMS;
 
        switch (level) {
        case 1:
-               forms_1=(FORM_1 *)malloc(*numofforms * sizeof(FORM_1));
 
-               /* construct the list of form structures */
-               for (i=0; i<*numofforms; i++)
-               {
-                       DEBUGADD(6,("Filling form number [%d]\n",i));
-                       fill_form_1(&(forms_1[i]), &(list[i]), i);
+               /* Check if the requested name is in the list of form structures */
+               for (i=0; i<numofforms; i++) {
+
+                       DEBUG(4,("_spoolss_getform: checking form %s (want %s)\n", list[i].name, form_name));
+
+                       if (strequal(form_name, list[i].name)) {
+                               DEBUGADD(6,("Found form %s number [%d]\n", form_name, i));
+                               fill_form_1(&form_1, &list[i]);
+                               break;
+                       }
                }
+               
+               safe_free(list);
 
                /* check the required size. */
-               for (i=0; i<*numofforms; i++)
-               {
-                       DEBUGADD(6,("adding form [%d]'s size\n",i));
-                       buffer_size += spoolss_size_form_1(&(forms_1[i]));
-               }
 
-               *needed=buffer_size;            
+               *needed=spoolss_size_form_1(&form_1);
                
-               if (!alloc_buffer_size(buffer, buffer_size))
+               if (!alloc_buffer_size(buffer, buffer_size)){
                        return ERROR_INSUFFICIENT_BUFFER;
+               }
 
-               /* fill the buffer with the form structures */
-               for (i=0; i<*numofforms; i++)
-               {
-                       DEBUGADD(6,("adding form [%d] to buffer\n",i));
-                       new_smb_io_form_1("", buffer, &(forms_1[i]), 0);
+               if (*needed > offered) {
+                       return ERROR_INSUFFICIENT_BUFFER;
                }
 
-               safe_free(list);
+               /* fill the buffer with the form structures */
+               DEBUGADD(6,("adding form %s [%d] to buffer\n", form_name, i));
+               new_smb_io_form_1("", buffer, &form_1, 0);
 
-               if (*needed > offered)
-                       return ERROR_INSUFFICIENT_BUFFER;
-               else
-                       return NT_STATUS_NO_PROBLEMO;
+               return NT_STATUS_NO_PROBLEMO;
                        
        default:
                safe_free(list);
-               return NT_STATUS_INVALID_INFO_CLASS;
+               return ERROR_INVALID_LEVEL;
        }
-
 }
 
 /****************************************************************************
 ****************************************************************************/
 static void fill_port_1(PORT_INFO_1 *port, char *name)
 {
-       init_unistr(&(port->port_name), name);
+       init_unistr(&port->port_name, name);
 }
 
 /****************************************************************************
 ****************************************************************************/
 static void fill_port_2(PORT_INFO_2 *port, char *name)
 {
-       init_unistr(&(port->port_name), name);
-       init_unistr(&(port->monitor_name), "Moniteur Local");
-       init_unistr(&(port->description), "Local Port");
+       init_unistr(&port->port_name, name);
+       init_unistr(&port->monitor_name, "Local Monitor");
+       init_unistr(&port->description, "Local Port");
 #define PORT_TYPE_WRITE 1
        port->port_type=PORT_TYPE_WRITE;
        port->reserved=0x0;     
@@ -3333,42 +4374,86 @@ static void fill_port_2(PORT_INFO_2 *port, char *name)
 ****************************************************************************/
 static uint32 enumports_level_1(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
-       int n_services=lp_numservices();
-       int snum;
-       int i=0;
-       
        PORT_INFO_1 *ports=NULL;
+       int i=0;
 
-       for (snum=0; snum<n_services; snum++)
-               if ( lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) )
-                       (*returned)++;
+       if (*lp_enumports_cmd()) {
+               pid_t local_pid = sys_getpid();
+               char *cmd = lp_enumports_cmd();
+               char *path;
+               char **qlines;
+               pstring tmp_file;
+               pstring command;
+               int numlines;
+               int ret;
+
+               if (*lp_pathname(lp_servicenumber(PRINTERS_NAME)))
+                       path = lp_pathname(lp_servicenumber(PRINTERS_NAME));
+               else
+                       path = tmpdir();
+
+               slprintf(tmp_file, sizeof(tmp_file), "%s/smbcmd.%d", path, local_pid);
+               slprintf(command, sizeof(command), "%s \"%d\"", cmd, 1);
+
+               unlink(tmp_file);
+               DEBUG(10,("Running [%s > %s]\n", command,tmp_file));
+               ret = smbrun(command, tmp_file, False);
+               DEBUG(10,("Returned [%d]\n", ret));
+               if (ret != 0) {
+                       unlink(tmp_file);
+                       /* Is this the best error to return here? */
+                       return ERROR_ACCESS_DENIED;
+               }
 
-       ports=(PORT_INFO_1 *)malloc( (*returned+1) * sizeof(PORT_INFO_1) );
-       
-       for (snum=0; snum<n_services; snum++)
-       {
-               if ( lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) ) {
-                       DEBUGADD(6,("Filling port number [%d]\n", i));
-                       fill_port_1(&(ports[i]), lp_servicename(snum));
-                       i++;
+               numlines = 0;
+               qlines = file_lines_load(tmp_file, &numlines);
+               DEBUGADD(10,("Lines returned = [%d]\n", numlines));
+               DEBUGADD(10,("Unlinking port file [%s]\n", tmp_file));
+               unlink(tmp_file);
+
+               if(numlines) {
+                       if((ports=(PORT_INFO_1 *)malloc( numlines * sizeof(PORT_INFO_1) )) == NULL) {
+                               DEBUG(10,("Returning ERROR_NOT_ENOUGH_MEMORY [%x]\n", ERROR_NOT_ENOUGH_MEMORY));
+                               file_lines_free(qlines);
+                               return ERROR_NOT_ENOUGH_MEMORY;
+                       }
+
+                       for (i=0; i<numlines; i++) {
+                               DEBUG(6,("Filling port number [%d] with port [%s]\n", i, qlines[i]));
+                               fill_port_1(&ports[i], qlines[i]);
+                       }
+
+                       file_lines_free(qlines);
                }
+
+               *returned = numlines;
+
+       } else {
+               *returned = 1; /* Sole Samba port returned. */
+
+               if((ports=(PORT_INFO_1 *)malloc( sizeof(PORT_INFO_1) )) == NULL)
+                       return ERROR_NOT_ENOUGH_MEMORY;
+       
+               DEBUG(10,("enumports_level_1: port name %s\n", SAMBA_PRINTER_PORT_NAME));
+
+               fill_port_1(&ports[0], SAMBA_PRINTER_PORT_NAME);
        }
 
        /* check the required size. */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding port [%d]'s size\n", i));
-               *needed += spoolss_size_port_info_1(&(ports[i]));
+               *needed += spoolss_size_port_info_1(&ports[i]);
        }
                
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(ports);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the ports structures */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding port [%d] to buffer\n", i));
-               new_smb_io_port_1("", buffer, &(ports[i]), 0);
+               new_smb_io_port_1("", buffer, &ports[i], 0);
        }
 
        safe_free(ports);
@@ -3381,48 +4466,93 @@ static uint32 enumports_level_1(NEW_BUFFER *buffer, uint32 offered, uint32 *need
                return NT_STATUS_NO_PROBLEMO;
 }
 
-
 /****************************************************************************
  enumports level 2.
 ****************************************************************************/
+
 static uint32 enumports_level_2(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned)
 {
-       int n_services=lp_numservices();
-       int snum;
-       int i=0;
-       
        PORT_INFO_2 *ports=NULL;
+       int i=0;
 
-       for (snum=0; snum<n_services; snum++)
-               if ( lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) )
-                       (*returned)++;
+       if (*lp_enumports_cmd()) {
+               pid_t local_pid = sys_getpid();
+               char *cmd = lp_enumports_cmd();
+               char *path;
+               char **qlines;
+               pstring tmp_file;
+               pstring command;
+               int numlines;
+               int ret;
+
+               if (*lp_pathname(lp_servicenumber(PRINTERS_NAME)))
+                       path = lp_pathname(lp_servicenumber(PRINTERS_NAME));
+               else
+                       path = tmpdir();
+
+               slprintf(tmp_file, sizeof(tmp_file), "%s/smbcmd.%d", path, local_pid);
+               slprintf(command, sizeof(command), "%s \"%d\"", cmd, 2);
+
+               unlink(tmp_file);
+               DEBUG(10,("Running [%s > %s]\n", command,tmp_file));
+               ret = smbrun(command, tmp_file, False);
+               DEBUGADD(10,("returned [%d]\n", ret));
+               if (ret != 0) {
+                       unlink(tmp_file);
+                       /* Is this the best error to return here? */
+                       return ERROR_ACCESS_DENIED;
+               }
 
-       ports=(PORT_INFO_2 *)malloc( (*returned+1) * sizeof(PORT_INFO_2) );
-       
-       for (snum=0; snum<n_services; snum++)
-       {
-               if ( lp_browseable(snum) && lp_snum_ok(snum) && lp_print_ok(snum) ) {
-                       DEBUGADD(6,("Filling port number [%d]\n", i));
-                       fill_port_2(&(ports[i]), lp_servicename(snum));
-                       i++;
+               numlines = 0;
+               qlines = file_lines_load(tmp_file, &numlines);
+               DEBUGADD(10,("Lines returned = [%d]\n", numlines));
+               DEBUGADD(10,("Unlinking port file [%s]\n", tmp_file));
+               unlink(tmp_file);
+
+               if(numlines) {
+                       if((ports=(PORT_INFO_2 *)malloc( numlines * sizeof(PORT_INFO_2) )) == NULL) {
+                               DEBUG(10,("Returning ERROR_NOT_ENOUGH_MEMORY [%x]\n", ERROR_NOT_ENOUGH_MEMORY));
+                               file_lines_free(qlines);
+                               return ERROR_NOT_ENOUGH_MEMORY;
+                       }
+
+                       for (i=0; i<numlines; i++) {
+                               DEBUG(6,("Filling port number [%d] with port [%s]\n", i, qlines[i]));
+                               fill_port_2(&(ports[i]), qlines[i]);
+                       }
+
+                       file_lines_free(qlines);
                }
+
+               *returned = numlines;
+
+       } else {
+
+               *returned = 1;
+
+               if((ports=(PORT_INFO_2 *)malloc( sizeof(PORT_INFO_2) )) == NULL)
+                       return ERROR_NOT_ENOUGH_MEMORY;
+       
+               DEBUG(10,("enumports_level_2: port name %s\n", SAMBA_PRINTER_PORT_NAME));
+
+               fill_port_2(&ports[0], SAMBA_PRINTER_PORT_NAME);
        }
 
        /* check the required size. */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding port [%d]'s size\n", i));
-               *needed += spoolss_size_port_info_2(&(ports[i]));
+               *needed += spoolss_size_port_info_2(&ports[i]);
        }
                
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(ports);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        /* fill the buffer with the ports structures */
-       for (i=0; i<*returned; i++)
-       {
+       for (i=0; i<*returned; i++) {
                DEBUGADD(6,("adding port [%d] to buffer\n", i));
-               new_smb_io_port_2("", buffer, &(ports[i]), 0);
+               new_smb_io_port_2("", buffer, &ports[i], 0);
        }
 
        safe_free(ports);
@@ -3450,116 +4580,177 @@ uint32 _spoolss_enumports( UNISTR2 *name, uint32 level,
        switch (level) {
        case 1:
                return enumports_level_1(buffer, offered, needed, returned);
-               break;
        case 2:
                return enumports_level_2(buffer, offered, needed, returned);
-               break;
        default:
-               return NT_STATUS_INVALID_INFO_CLASS;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_addprinterex( const UNISTR2 *uni_srv_name, uint32 level,
+static uint32 spoolss_addprinterex_level_2( const UNISTR2 *uni_srv_name,
                                const SPOOL_PRINTER_INFO_LEVEL *info,
                                uint32 unk0, uint32 unk1, uint32 unk2, uint32 unk3,
-                               uint32 user_switch, const  SPOOL_USER_CTR *user,
+                               uint32 user_switch, const SPOOL_USER_CTR *user,
                                POLICY_HND *handle)
 {
-       NT_PRINTER_INFO_LEVEL printer;  
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        fstring name;
-       fstring share_name;
+       int snum;
 
-       clear_handle(handle);
-       
-/* 
- * FIX: JFM: we need to check the user here !!!!
- *
- * as the code is running as root, anybody can add printers to the server
- */
-       /* NULLify info_2 here */
-       /* don't put it in convert_printer_info as it's used also with non-NULL values */
-       printer.info_2=NULL;
+       if ((printer = (NT_PRINTER_INFO_LEVEL *)malloc(sizeof(NT_PRINTER_INFO_LEVEL))) == NULL) {
+               DEBUG(0,("spoolss_addprinterex_level_2: malloc fail.\n"));
+               return ERROR_NOT_ENOUGH_MEMORY;
+       }
 
-       /* convert from UNICODE to ASCII */
-       convert_printer_info(info, &printer, level);
+       ZERO_STRUCTP(printer);
 
-       unistr2_to_ascii(share_name, &((info->info_2)->portname), sizeof(share_name)-1);
-       
-       slprintf(name, sizeof(name)-1, "\\\\%s\\%s", global_myname, share_name);
+       /* convert from UNICODE to ASCII - this allocates the info_2 struct inside *printer.*/
+       convert_printer_info(info, printer, 2);
 
-       create_printer_hnd(handle);
+       if (*lp_addprinter_cmd() )
+               if ( !add_printer_hook(printer) ) {
+                       free_a_printer(&printer,2);
+                       return ERROR_ACCESS_DENIED;
+       }
 
-       open_printer_hnd(handle);
+       slprintf(name, sizeof(name)-1, "\\\\%s\\%s", global_myname,
+             printer->info_2->sharename);
 
-       if (!set_printer_hnd_printertype(handle, name)) {
-               close_printer_handle(handle);
-               return NT_STATUS_ACCESS_DENIED;
+       if ((snum = print_queue_snum(printer->info_2->sharename)) == -1) {
+               free_a_printer(&printer,2);
+               return ERROR_ACCESS_DENIED;
+       }
+
+       /* you must be a printer admin to add a new printer */
+       if (!print_access_check(NULL, snum, PRINTER_ACCESS_ADMINISTER)) {
+               free_a_printer(&printer,2);
+               return ERROR_ACCESS_DENIED;             
        }
        
-       if (!set_printer_hnd_printername(handle, name)) {
-               close_printer_handle(handle);
-               return NT_STATUS_ACCESS_DENIED;
+       /*
+        * Do sanity check on the requested changes for Samba.
+        */
+
+       if (!check_printer_ok(printer->info_2, snum)) {
+               free_a_printer(&printer,2);
+               return ERROR_INVALID_PARAMETER;
        }
 
        /* write the ASCII on disk */
-       if (add_a_printer(printer, level) != 0x0) {
-               close_printer_handle(handle);
-               return NT_STATUS_ACCESS_DENIED;
+       if (add_a_printer(*printer, 2) != 0) {
+               free_a_printer(&printer,2);
+               return ERROR_ACCESS_DENIED;
        }
-       
+
+       if (!open_printer_hnd(handle, name)) {
+               /* Handle open failed - remove addition. */
+               del_a_printer(printer->info_2->sharename);
+               free_a_printer(&printer,2);
+               return ERROR_ACCESS_DENIED;
+       }
+
+       free_a_printer(&printer,2);
+
+       srv_spoolss_sendnotify(handle);
+
        return NT_STATUS_NO_PROBLEMO;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_addprinterdriver( const UNISTR2 *server_name,
-                               uint32 level,
-                               const SPOOL_PRINTER_DRIVER_INFO_LEVEL *info)
+uint32 _spoolss_addprinterex( const UNISTR2 *uni_srv_name, uint32 level,
+                               const SPOOL_PRINTER_INFO_LEVEL *info,
+                               uint32 unk0, uint32 unk1, uint32 unk2, uint32 unk3,
+                               uint32 user_switch, const SPOOL_USER_CTR *user,
+                               POLICY_HND *handle)
+{
+       switch (level) {
+               case 1:
+                       /* we don't handle yet */
+                       /* but I know what to do ... */
+                       return ERROR_INVALID_LEVEL;
+               case 2:
+                       return spoolss_addprinterex_level_2(uni_srv_name, info, 
+                                                           unk0, unk1, unk2, unk3,
+                                                           user_switch, user, handle);
+               default:
+                       return ERROR_INVALID_LEVEL;
+       }
+}
+
+/****************************************************************************
+****************************************************************************/
+uint32 _spoolss_addprinterdriver(pipes_struct *p, const UNISTR2 *server_name,
+                                uint32 level, const SPOOL_PRINTER_DRIVER_INFO_LEVEL *info)
 {
+       uint32 err = NT_STATUS_NO_PROBLEMO;
        NT_PRINTER_DRIVER_INFO_LEVEL driver;
+       struct current_user user;
+       
+       ZERO_STRUCT(driver);
+
+       get_current_user(&user, p);     
        
        convert_printer_driver_info(info, &driver, level);
 
-       if (add_a_printer_driver(driver, level)!=0)
-               return NT_STATUS_ACCESS_DENIED;
+       DEBUG(5,("Cleaning driver's information\n"));
+       clean_up_driver_struct(driver, level);
 
-       return NT_STATUS_NO_PROBLEMO;
+       DEBUG(5,("Moving driver to final destination\n"));
+       if(!move_driver_to_download_area(driver, level, &user, &err)) {
+               if (err == 0)
+                       err = ERROR_ACCESS_DENIED;
+               goto done;
+       }
+
+       if (add_a_printer_driver(driver, level)!=0) {
+               err = ERROR_ACCESS_DENIED;
+               goto done;
+       }
+
+ done:
+       free_a_printer_driver(driver, level);
+       return err;
 }
 
 /****************************************************************************
 ****************************************************************************/
 static void fill_driverdir_1(DRIVER_DIRECTORY_1 *info, char *name)
 {
-       init_unistr(&(info->name), name);
+       init_unistr(&info->name, name);
 }
 
 /****************************************************************************
 ****************************************************************************/
 static uint32 getprinterdriverdir_level_1(UNISTR2 *name, UNISTR2 *uni_environment, NEW_BUFFER *buffer, uint32 offered, uint32 *needed)
 {
-       pstring chaine;
+       pstring path;
        pstring long_archi;
        pstring short_archi;
        DRIVER_DIRECTORY_1 *info=NULL;
-       
-       info=(DRIVER_DIRECTORY_1 *)malloc(sizeof(DRIVER_DIRECTORY_1));
-       
+
        unistr2_to_ascii(long_archi, uni_environment, sizeof(long_archi)-1);
-       get_short_archi(short_archi, long_archi);
-               
-       slprintf(chaine, sizeof(chaine)-1, "\\\\%s\\print$\\%s", global_myname, short_archi);
 
-       DEBUG(4,("printer driver directory: [%s]\n", chaine));
+       if (get_short_archi(short_archi, long_archi)==FALSE)
+               return ERROR_INVALID_ENVIRONMENT;
 
-       fill_driverdir_1(info, chaine);
+       if((info=(DRIVER_DIRECTORY_1 *)malloc(sizeof(DRIVER_DIRECTORY_1))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
+       slprintf(path, sizeof(path)-1, "\\\\%s\\print$\\%s", global_myname, short_archi);
+
+       DEBUG(4,("printer driver directory: [%s]\n", path));
+
+       fill_driverdir_1(info, path);
        
-       *needed += spoolss_size_driverdir_info_1(info);                                                     
+       *needed += spoolss_size_driverdir_info_1(info);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(info);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        new_smb_io_driverdir_1("", buffer, info, 0);
 
@@ -3584,22 +4775,20 @@ uint32 _spoolss_getprinterdriverdirectory(UNISTR2 *name, UNISTR2 *uni_environmen
        switch(level) {
        case 1:
                return getprinterdriverdir_level_1(name, uni_environment, buffer, offered, needed);
-               break;
        default:
-               return NT_STATUS_INVALID_INFO_CLASS;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
        
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_enumprinterdata(const POLICY_HND *handle, uint32 index,
+uint32 _spoolss_enumprinterdata(POLICY_HND *handle, uint32 idx,
                                uint32 in_value_len, uint32 in_data_len,
                                uint32 *out_max_value_len, uint16 **out_value, uint32 *out_value_len,
                                uint32 *out_type,
-                               uint32 *out_max_data_len, uint8  **out_data, uint32 *out_data_len)
+                               uint32 *out_max_data_len, uint8  **data_out, uint32 *out_data_len)
 {
-       NT_PRINTER_INFO_LEVEL printer;
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
        
        fstring value;
        
@@ -3621,19 +4810,21 @@ uint32 _spoolss_enumprinterdata(const POLICY_HND *handle, uint32 index,
        *out_type=0;
 
        *out_max_data_len=0;
-       *out_data=NULL;
+       *data_out=NULL;
        *out_data_len=0;
 
        DEBUG(5,("spoolss_enumprinterdata\n"));
 
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_enumprinterdata: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
 
        if (!get_printer_snum(handle, &snum))
-               return NT_STATUS_INVALID_HANDLE;
+               return ERROR_INVALID_HANDLE;
        
-       if (get_a_printer(&printer, 2, lp_servicename(snum)) != 0x0)
-               return NT_STATUS_INVALID_HANDLE;
+       if (get_a_printer(&printer, 2, lp_servicename(snum)) != 0)
+               return ERROR_INVALID_HANDLE;
 
        /* 
         * The NT machine wants to know the biggest size of value and data
@@ -3642,28 +4833,61 @@ uint32 _spoolss_enumprinterdata(const POLICY_HND *handle, uint32 index,
         */
        if ( (in_value_len==0) && (in_data_len==0) ) {
                DEBUGADD(6,("Activating NT mega-hack to find sizes\n"));
-               
+
+#if 0
+               /*
+                * NT can ask for a specific parameter size - we need to return NO_MORE_ITEMS
+                * if this parameter size doesn't exist.
+                * Ok - my opinion here is that the client is not asking for the greatest
+                * possible size of all the parameters, but is asking specifically for the size needed
+                * for this specific parameter. In that case we can remove the loop below and
+                * simplify this lookup code considerably. JF - comments welcome. JRA.
+                */
+
+               if (!get_specific_param_by_index(*printer, 2, idx, value, &data, &type, &data_len)) {
+                       safe_free(data);
+                       free_a_printer(&printer, 2);
+                       return ERROR_NO_MORE_ITEMS;
+               }
+#endif
+
+               safe_free(data);
+               data = NULL;
+
                param_index=0;
                biggest_valuesize=0;
                biggest_datasize=0;
                
-               while (get_specific_param_by_index(printer, 2, param_index, value, &data, &type, &data_len)) {
+               while (get_specific_param_by_index(*printer, 2, param_index, value, &data, &type, &data_len)) {
                        if (strlen(value) > biggest_valuesize) biggest_valuesize=strlen(value);
                        if (data_len > biggest_datasize) biggest_datasize=data_len;
 
                        DEBUG(6,("current values: [%d], [%d]\n", biggest_valuesize, biggest_datasize));
 
                        safe_free(data);
+                       data = NULL;
                        param_index++;
                }
 
+               /*
+                * I think this is correct, it doesn't break APW and
+                * allows Gerald's Win32 test programs to work correctly,
+                * but may need altering.... JRA.
+                */
+
+               if (param_index == 0) {
+                       /* No parameters found. */
+                       free_a_printer(&printer, 2);
+                       return ERROR_NO_MORE_ITEMS;
+               }
+
                /* the value is an UNICODE string but realvaluesize is the length in bytes including the leading 0 */
                *out_value_len=2*(1+biggest_valuesize);
                *out_data_len=biggest_datasize;
 
                DEBUG(6,("final values: [%d], [%d]\n", *out_value_len, *out_data_len));
 
-               free_a_printer(printer, 2);             
+               free_a_printer(&printer, 2);
                return NT_STATUS_NO_PROBLEMO;
        }
        
@@ -3671,12 +4895,15 @@ uint32 _spoolss_enumprinterdata(const POLICY_HND *handle, uint32 index,
         * the value len is wrong in NT sp3
         * that's the number of bytes not the number of unicode chars
         */
-       if (!get_specific_param_by_index(printer, 2, index, value, &data, &type, &data_len)) {
-               free_a_printer(printer, 2);
-               return 0x0103; /* ERROR_NO_MORE_ITEMS */
+
+       if (!get_specific_param_by_index(*printer, 2, idx, value, &data, &type, &data_len)) {
+               safe_free(data);
+               free_a_printer(&printer, 2);
+               return ERROR_NO_MORE_ITEMS;
        }
-                       
+
+       free_a_printer(&printer, 2);
+
        /* 
         * the value is:
         * - counted in bytes in the request
@@ -3686,28 +4913,36 @@ uint32 _spoolss_enumprinterdata(const POLICY_HND *handle, uint32 index,
         * take a pause *before* coding not *during* coding
         */
         
-       *out_max_value_len=in_value_len/2;
-       *out_value=(uint16 *)malloc(in_value_len*sizeof(uint8));
-       ascii_to_unistr(*out_value, value, *out_max_value_len);
-       *out_value_len=2*(1+strlen(value));
+       *out_max_value_len=(in_value_len/sizeof(uint16));
+       if((*out_value=(uint16 *)malloc(in_value_len*sizeof(uint8))) == NULL) {
+               safe_free(data);
+               return ERROR_NOT_ENOUGH_MEMORY;
+       }
+       
+       ZERO_STRUCTP(*out_value);
+       *out_value_len = (uint32)dos_PutUniCode((char *)*out_value, value, in_value_len, True);
 
        *out_type=type;
 
        /* the data is counted in bytes */
        *out_max_data_len=in_data_len;
-       *out_data=(uint8 *)malloc(in_data_len*sizeof(uint8));
-       memcpy(*out_data, data, data_len);
+       if((*data_out=(uint8 *)malloc(in_data_len*sizeof(uint8))) == NULL) {
+               safe_free(data);
+               return ERROR_NOT_ENOUGH_MEMORY;
+       }
+       
+       ZERO_STRUCTP(*data_out);
+       memcpy(*data_out, data, (size_t)data_len);
        *out_data_len=data_len;
 
        safe_free(data);
        
-       free_a_printer(printer, 2);
        return NT_STATUS_NO_PROBLEMO;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_setprinterdata( const POLICY_HND *handle,
+uint32 _spoolss_setprinterdata( POLICY_HND *handle,
                                const UNISTR2 *value,
                                uint32 type,
                                uint32 max_len,
@@ -3715,9 +4950,8 @@ uint32 _spoolss_setprinterdata( const POLICY_HND *handle,
                                uint32 real_len,
                                uint32 numeric_data)
 {
-       NT_PRINTER_INFO_LEVEL printer;
-       NT_PRINTER_PARAM *param = NULL;
-               
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
+       NT_PRINTER_PARAM *param = NULL;         
        int snum=0;
        uint32 status = 0x0;
        Printer_entry *Printer=find_printer_index_by_hnd(handle);
@@ -3725,35 +4959,81 @@ uint32 _spoolss_setprinterdata( const POLICY_HND *handle,
        DEBUG(5,("spoolss_setprinterdata\n"));
 
        
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_setprinterdata: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
 
        if (!get_printer_snum(handle, &snum))
-               return NT_STATUS_INVALID_HANDLE;
+               return ERROR_INVALID_HANDLE;
+
+       if (!print_access_check(NULL, snum, PRINTER_ACCESS_ADMINISTER)) {
+               DEBUG(3, ("security descriptor change denied by existing "
+                         "security descriptor\n"));
+               return ERROR_ACCESS_DENIED;
+       }
 
        status = get_a_printer(&printer, 2, lp_servicename(snum));
        if (status != 0x0)
-               return status;
+               return ERROR_INVALID_NAME;
 
        convert_specific_param(&param, value , type, data, real_len);
-       unlink_specific_param_if_exist(printer.info_2, param);
+       unlink_specific_param_if_exist(printer->info_2, param);
        
-       if (!add_a_specific_param(printer.info_2, param))
-       {
-               status = NT_STATUS_INVALID_PARAMETER;
-       }
+       if (!add_a_specific_param(printer->info_2, param))
+               status = ERROR_INVALID_PARAMETER;
        else
-       {
-               status = add_a_printer(printer, 2);
-       }
-       free_a_printer(printer, 2);
+               status = add_a_printer(*printer, 2);
+
+       free_a_printer(&printer, 2);
+       return status;
+}
+
+/****************************************************************************
+****************************************************************************/
+uint32 _spoolss_deleteprinterdata( POLICY_HND *handle, const UNISTR2 *value)
+{
+       NT_PRINTER_INFO_LEVEL *printer = NULL;
+       NT_PRINTER_PARAM param;
+       int snum=0;
+       uint32 status = 0x0;
+       Printer_entry *Printer=find_printer_index_by_hnd(handle);
        
+       DEBUG(5,("spoolss_deleteprinterdata\n"));
+       
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_deleteprinterdata: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
+
+       if (!get_printer_snum(handle, &snum))
+               return ERROR_INVALID_HANDLE;
+
+       if (!print_access_check(NULL, snum, PRINTER_ACCESS_ADMINISTER)) {
+               DEBUG(3, ("_spoolss_deleteprinterdata: security descriptor change denied by existing "
+                         "security descriptor\n"));
+               return ERROR_ACCESS_DENIED;
+       }
+
+       status = get_a_printer(&printer, 2, lp_servicename(snum));
+       if (status != 0x0)
+               return ERROR_INVALID_NAME;
+
+       ZERO_STRUCTP(&param);
+       unistr2_to_ascii(param.value, value, sizeof(param.value)-1);
+
+       if(!unlink_specific_param_if_exist(printer->info_2, &param))
+               status = ERROR_INVALID_PARAMETER;
+       else
+               status = add_a_printer(*printer, 2);
+
+       free_a_printer(&printer, 2);
        return status;
 }
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_addform( const POLICY_HND *handle,
+uint32 _spoolss_addform( POLICY_HND *handle,
                                uint32 level,
                                const FORM *form)
 {
@@ -3763,11 +5043,14 @@ uint32 _spoolss_addform( const POLICY_HND *handle,
 
        DEBUG(5,("spoolss_addform\n"));
 
-       if (!OPEN_HANDLE(Printer))
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_addform: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
 
        count=get_ntforms(&list);
-       add_a_form(&list, form, &count);
+       if(!add_a_form(&list, form, &count))
+               return ERROR_NOT_ENOUGH_MEMORY;
        write_ntforms(&list, count);
 
        safe_free(list);
@@ -3777,7 +5060,32 @@ uint32 _spoolss_addform( const POLICY_HND *handle,
 
 /****************************************************************************
 ****************************************************************************/
-uint32 _spoolss_setform( const POLICY_HND *handle,
+uint32 _spoolss_deleteform( POLICY_HND *handle, UNISTR2 *form_name)
+{
+       int count=0;
+       uint32 ret = 0;
+       nt_forms_struct *list=NULL;
+       Printer_entry *Printer = find_printer_index_by_hnd(handle);
+
+       DEBUG(5,("spoolss_deleteform\n"));
+
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_deleteform: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
+       }
+
+       count = get_ntforms(&list);
+       if(!delete_a_form(&list, form_name, &count, &ret))
+               return ERROR_INVALID_PARAMETER;
+
+       safe_free(list);
+
+       return ret;
+}
+
+/****************************************************************************
+****************************************************************************/
+uint32 _spoolss_setform( POLICY_HND *handle,
                                const UNISTR2 *uni_name,
                                uint32 level,
                                const FORM *form)
@@ -3788,9 +5096,9 @@ uint32 _spoolss_setform( const POLICY_HND *handle,
 
        DEBUG(5,("spoolss_setform\n"));
 
-       if (!OPEN_HANDLE(Printer))
-       {
-               return NT_STATUS_INVALID_HANDLE;
+       if (!OPEN_HANDLE(Printer)) {
+               DEBUG(0,("_spoolss_setform: Invalid handle (%s).\n", OUR_HANDLE(handle)));
+               return ERROR_INVALID_HANDLE;
        }
        count=get_ntforms(&list);
        update_a_form(&list, form, count);
@@ -3808,10 +5116,12 @@ static uint32 enumprintprocessors_level_1(NEW_BUFFER *buffer, uint32 offered, ui
 {
        PRINTPROCESSOR_1 *info_1=NULL;
        
-       info_1 = (PRINTPROCESSOR_1 *)malloc(sizeof(PRINTPROCESSOR_1));
+       if((info_1 = (PRINTPROCESSOR_1 *)malloc(sizeof(PRINTPROCESSOR_1))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
        (*returned) = 0x1;
        
-       init_unistr(&(info_1->name), "winprint");
+       init_unistr(&info_1->name, "winprint");
 
        *needed += spoolss_size_printprocessor_info_1(info_1);
 
@@ -3851,10 +5161,8 @@ uint32 _spoolss_enumprintprocessors(UNISTR2 *name, UNISTR2 *environment, uint32
        switch (level) {
        case 1:
                return enumprintprocessors_level_1(buffer, offered, needed, returned);
-               break;
        default:
-               return NT_STATUS_INVALID_INFO_CLASS;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
 
@@ -3865,10 +5173,12 @@ static uint32 enumprintprocdatatypes_level_1(NEW_BUFFER *buffer, uint32 offered,
 {
        PRINTPROCDATATYPE_1 *info_1=NULL;
        
-       info_1 = (PRINTPROCDATATYPE_1 *)malloc(sizeof(PRINTPROCDATATYPE_1));
+       if((info_1 = (PRINTPROCDATATYPE_1 *)malloc(sizeof(PRINTPROCDATATYPE_1))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
        (*returned) = 0x1;
        
-       init_unistr(&(info_1->name), "RAW");
+       init_unistr(&info_1->name, "RAW");
 
        *needed += spoolss_size_printprocdatatype_info_1(info_1);
 
@@ -3901,10 +5211,8 @@ uint32 _spoolss_enumprintprocdatatypes(UNISTR2 *name, UNISTR2 *processor, uint32
        switch (level) {
        case 1:
                return enumprintprocdatatypes_level_1(buffer, offered, needed, returned);
-               break;
        default:
-               return NT_STATUS_INVALID_INFO_CLASS;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
 
@@ -3915,10 +5223,12 @@ static uint32 enumprintmonitors_level_1(NEW_BUFFER *buffer, uint32 offered, uint
 {
        PRINTMONITOR_1 *info_1=NULL;
        
-       info_1 = (PRINTMONITOR_1 *)malloc(sizeof(PRINTMONITOR_1));
+       if((info_1 = (PRINTMONITOR_1 *)malloc(sizeof(PRINTMONITOR_1))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
        (*returned) = 0x1;
        
-       init_unistr(&(info_1->name), "Local Port");
+       init_unistr(&info_1->name, "Local Port");
 
        *needed += spoolss_size_printmonitor_info_1(info_1);
 
@@ -3944,12 +5254,14 @@ static uint32 enumprintmonitors_level_2(NEW_BUFFER *buffer, uint32 offered, uint
 {
        PRINTMONITOR_2 *info_2=NULL;
        
-       info_2 = (PRINTMONITOR_2 *)malloc(sizeof(PRINTMONITOR_2));
+       if((info_2 = (PRINTMONITOR_2 *)malloc(sizeof(PRINTMONITOR_2))) == NULL)
+               return ERROR_NOT_ENOUGH_MEMORY;
+
        (*returned) = 0x1;
        
-       init_unistr(&(info_2->name), "Local Port");
-       init_unistr(&(info_2->environment), "Windows NT X86");
-       init_unistr(&(info_2->dll_name), "localmon.dll");
+       init_unistr(&info_2->name, "Local Port");
+       init_unistr(&info_2->environment, "Windows NT X86");
+       init_unistr(&info_2->dll_name, "localmon.dll");
 
        *needed += spoolss_size_printmonitor_info_2(info_2);
 
@@ -3989,13 +5301,10 @@ uint32 _spoolss_enumprintmonitors(UNISTR2 *name,uint32 level,
        switch (level) {
        case 1:
                return enumprintmonitors_level_1(buffer, offered, needed, returned);
-               break;          
        case 2:
                return enumprintmonitors_level_2(buffer, offered, needed, returned);
-               break;
        default:
-               return NT_STATUS_INVALID_INFO_CLASS;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
 
@@ -4006,11 +5315,12 @@ static uint32 getjob_level_1(print_queue_struct *queue, int count, int snum, uin
        int i=0;
        BOOL found=False;
        JOB_INFO_1 *info_1=NULL;
+
        info_1=(JOB_INFO_1 *)malloc(sizeof(JOB_INFO_1));
 
        if (info_1 == NULL) {
                safe_free(queue);
-               return NT_STATUS_NO_MEMORY;
+               return ERROR_NOT_ENOUGH_MEMORY;
        }
                
        for (i=0; i<count && found==False; i++) {
@@ -4020,16 +5330,21 @@ static uint32 getjob_level_1(print_queue_struct *queue, int count, int snum, uin
        
        if (found==False) {
                safe_free(queue);
+               safe_free(info_1);
                /* I shoud reply something else ... I can't find the good one */
                return NT_STATUS_NO_PROBLEMO;
        }
        
-       fill_job_info_1(info_1, &(queue[i]), i, snum);
+       fill_job_info_1(info_1, &(queue[i-1]), i, snum);
+       
+       safe_free(queue);
        
        *needed += spoolss_size_job_info_1(info_1);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(info_1);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        new_smb_io_job_info_1("", buffer, info_1, 0);
 
@@ -4048,12 +5363,14 @@ static uint32 getjob_level_2(print_queue_struct *queue, int count, int snum, uin
 {
        int i=0;
        BOOL found=False;
-       JOB_INFO_2 *info_2=NULL;
+       JOB_INFO_2 *info_2;
        info_2=(JOB_INFO_2 *)malloc(sizeof(JOB_INFO_2));
 
+       ZERO_STRUCTP(info_2);
+
        if (info_2 == NULL) {
                safe_free(queue);
-               return NT_STATUS_NO_MEMORY;
+               return ERROR_NOT_ENOUGH_MEMORY;
        }
 
        for (i=0; i<count && found==False; i++) {
@@ -4063,19 +5380,25 @@ static uint32 getjob_level_2(print_queue_struct *queue, int count, int snum, uin
        
        if (found==False) {
                safe_free(queue);
+               safe_free(info_2);
                /* I shoud reply something else ... I can't find the good one */
                return NT_STATUS_NO_PROBLEMO;
        }
        
-       fill_job_info_2(info_2, &(queue[i]), i, snum);
+       fill_job_info_2(info_2, &(queue[i-1]), i, snum);
+       
+       safe_free(queue);
        
        *needed += spoolss_size_job_info_2(info_2);
 
-       if (!alloc_buffer_size(buffer, *needed))
+       if (!alloc_buffer_size(buffer, *needed)) {
+               safe_free(info_2);
                return ERROR_INSUFFICIENT_BUFFER;
+       }
 
        new_smb_io_job_info_2("", buffer, info_2, 0);
 
+       free_dev_mode(info_2->devmode);
        safe_free(info_2);
 
        if (*needed > offered)
@@ -4102,11 +5425,9 @@ uint32 _spoolss_getjob( POLICY_HND *handle, uint32 jobid, uint32 level,
        *needed=0;
        
        if (!get_printer_snum(handle, &snum))
-       {
-               return NT_STATUS_INVALID_HANDLE;
-       }
+               return ERROR_INVALID_HANDLE;
        
-       count=get_printqueue(snum, NULL, &queue, &prt_status);
+       count = print_queue_status(snum, &queue, &prt_status);
        
        DEBUGADD(4,("count:[%d], prt_status:[%d], [%s]\n",
                     count, prt_status.status, prt_status.message));
@@ -4114,14 +5435,11 @@ uint32 _spoolss_getjob( POLICY_HND *handle, uint32 jobid, uint32 level,
        switch (level) {
        case 1:
                return getjob_level_1(queue, count, snum, jobid, buffer, offered, needed);
-               break;
        case 2:
-               return getjob_level_1(queue, count, snum, jobid, buffer, offered, needed);
-               break;
+               return getjob_level_2(queue, count, snum, jobid, buffer, offered, needed);
        default:
                safe_free(queue);
-               return NT_STATUS_INVALID_INFO_CLASS;
-               break;
+               return ERROR_INVALID_LEVEL;
        }
 }
-       
+#undef OLD_NTDOMAIN