/* * Unix SMB/Netbios implementation. * Version 1.9. * RPC Pipe client / server routines * Copyright (C) Andrew Tridgell 1992-2000, * Copyright (C) Luke Kenneth Casson Leighton 1996-2000, * Copyright (C) Jean François Micouleau 1998-2000. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #include "includes.h" #include "nterr.h" extern int DEBUGLEVEL; extern pstring global_myname; #ifndef MAX_OPEN_PRINTER_EXS #define MAX_OPEN_PRINTER_EXS 50 #endif #define PRINTER_HANDLE_IS_PRINTER 0 #define PRINTER_HANDLE_IS_PRINTSERVER 1 /* structure to store the printer handles */ /* and a reference to what it's pointing to */ /* and the notify info asked about */ /* that's the central struct */ typedef struct _Printer{ ubi_dlNode Next; ubi_dlNode Prev; BOOL open; BOOL document_started; BOOL page_started; uint32 current_jobid; uint32 document_fd; uint32 document_lastwritten; pstring document_name; pstring job_name; POLICY_HND printer_hnd; BOOL printer_type; union { fstring printername; fstring printerservername; } dev; uint32 type; uint32 access; struct { uint32 flags; uint32 options; fstring localmachine; uint32 printerlocal; SPOOL_NOTIFY_OPTION *option; } notify; struct { fstring machine; fstring user; } 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; #define OPEN_HANDLE(pnum) ((pnum!=NULL) && (pnum->open!=False)) /**************************************************************************** initialise printer handle states... ****************************************************************************/ void init_printer_hnd(void) { ubi_dlInitList(&Printer_list); ubi_dlInitList(&counter_list); } /**************************************************************************** create a unique printer handle ****************************************************************************/ static void create_printer_hnd(POLICY_HND *hnd) { static uint32 prt_hnd_low = 0; static uint32 prt_hnd_high = 0; if (hnd == NULL) return; /* i severely doubt that prt_hnd_high will ever be non-zero... */ prt_hnd_low++; if (prt_hnd_low == 0) prt_hnd_high++; SIVAL(hnd->data, 0 , 0x0); /* first bit must be null */ 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 */ } /**************************************************************************** find printer index by handle ****************************************************************************/ static Printer_entry *find_printer_index_by_hnd(const POLICY_HND *hnd) { Printer_entry *find_printer; find_printer = (Printer_entry *)ubi_dlFirst(&Printer_list); for(; find_printer; find_printer = (Printer_entry *)ubi_dlNext(find_printer)) { 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; } } DEBUG(3,("Whoops, Printer handle not found: ")); /*dump_data(4, hnd->data, sizeof(hnd->data));*/ return NULL; } /**************************************************************************** clear an handle ****************************************************************************/ static void clear_handle(POLICY_HND *hnd) { memset(hnd->data, 0, POLICY_HND_SIZE); } /**************************************************************************** close printer index by handle ****************************************************************************/ 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")); return False; } Printer->open=False; Printer->notify.flags=0; Printer->notify.options=0; Printer->notify.localmachine[0]='\0'; Printer->notify.printerlocal=0; safe_free(Printer->notify.option); Printer->notify.option=NULL; clear_handle(hnd); ubi_dlRemThis(&Printer_list, Printer); safe_free(Printer); return True; } /**************************************************************************** return the snum of a printer corresponding to an handle ****************************************************************************/ static BOOL get_printer_snum(const 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")); return False; } switch (Printer->printer_type) { case PRINTER_HANDLE_IS_PRINTER: DEBUG(4,("short name:%s\n", Printer->dev.printername)); for (snum=0;snumdev.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; 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. ****************************************************************************/ 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)); return False; } DEBUG(4,("Setting printer access=%x\n", access_required)); Printer->access = access_required; return True; } /**************************************************************************** set printer handle type. check if it's \\server or \\server\printer ****************************************************************************/ static BOOL set_printer_hnd_printertype(POLICY_HND *hnd, char *printername) { 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)); if ( strlen(printername) < 3 ) { DEBUGADD(4,("A print server must have at least 1 char ! %s\n", printername)); return False; } /* it's a print server */ if (!strchr(printername+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; } /**************************************************************************** set printer handle printername. ****************************************************************************/ static BOOL set_printer_hnd_printername(POLICY_HND *hnd, char *printername) { Printer_entry *Printer = find_printer_index_by_hnd(hnd); NT_PRINTER_INFO_LEVEL printer; 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))); if (Printer->printer_type==PRINTER_HANDLE_IS_PRINTSERVER) { ZERO_STRUCT(Printer->dev.printerservername); strncpy(Printer->dev.printerservername, printername, strlen(printername)); return True; } if (Printer->printer_type!=PRINTER_HANDLE_IS_PRINTER) return False; aprinter=strchr(printername+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 * need to iterate all the snum and do a * get_a_printer each time to find the printer * faster to do it here than later. */ for (snum=0;snumprintername) != strlen(aprinter) ) { free_a_printer(printer, 2); continue; } if ( strncasecmp(printer.info_2->printername, 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); return True; } /******************************************************************** Return True is the handle is a print server. ********************************************************************/ static BOOL handle_is_printserver(const POLICY_HND *handle) { Printer_entry *Printer=find_printer_index_by_hnd(handle); if (!OPEN_HANDLE(Printer)) return False; if (Printer->printer_type != PRINTER_HANDLE_IS_PRINTSERVER) return False; return True; } /**************************************************************************** allocate more memory for a BUFFER. ****************************************************************************/ static BOOL alloc_buffer_size(NEW_BUFFER *buffer, uint32 buffer_size) { prs_struct *ps; uint32 extra_space; uint32 old_offset; ps=&(buffer->prs); /* damn, I'm doing the reverse operation of prs_grow() :) */ if (buffer_size < prs_data_size(ps)) extra_space=0; else extra_space = buffer_size - prs_data_size(ps); /* * save the offset and move to the end of the buffer * prs_grow() checks the extra_space against the offset */ old_offset=prs_offset(ps); prs_set_offset(ps, prs_data_size(ps)); if (!prs_grow(ps, extra_space)) return False; prs_set_offset(ps, old_offset); buffer->string_at_end=prs_data_size(ps); return True; } /******************************************************************** * spoolss_open_printer * * called from the spoolss dispatcher ********************************************************************/ uint32 _spoolss_open_printer_ex( const UNISTR2 *printername, const PRINTER_DEFAULT *printer_default, uint32 user_switch, SPOOL_USER_CTR user_ctr, POLICY_HND *handle) { fstring name; clear_handle(handle); if (printername == NULL) return NT_STATUS_ACCESS_DENIED; /* some sanity check because you can open a printer or a print server */ /* aka: \\server\printer or \\server */ unistr2_to_ascii(name, printername, sizeof(name)-1); 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 (!set_printer_hnd_printername(handle, name)) { close_printer_handle(handle); return NT_STATUS_ACCESS_DENIED; } /* if (printer_default->datatype_ptr != NULL) { unistr2_to_ascii(datatype, printer_default->datatype, sizeof(datatype)-1); set_printer_hnd_datatype(handle, datatype); } else set_printer_hnd_datatype(handle, ""); */ if (!set_printer_hnd_accesstype(handle, printer_default->access_required)) { close_printer_handle(handle); return NT_STATUS_ACCESS_DENIED; } return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ static BOOL convert_printer_info(const SPOOL_PRINTER_INFO_LEVEL *uni, NT_PRINTER_INFO_LEVEL *printer, uint32 level) { switch (level) { case 2: uni_2_asc_printer_info_2(uni->info_2, &(printer->info_2)); break; default: break; } return True; } static BOOL convert_printer_driver_info(const SPOOL_PRINTER_DRIVER_INFO_LEVEL *uni, NT_PRINTER_DRIVER_INFO_LEVEL *printer, uint32 level) { switch (level) { case 3: printer->info_3=NULL; uni_2_asc_printer_driver_3(uni->info_3, &(printer->info_3)); break; default: break; } 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) { /* 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); } return True; } /******************************************************************** * api_spoolss_closeprinter ********************************************************************/ uint32 _spoolss_closeprinter(POLICY_HND *handle) { if (!close_printer_handle(handle)) return NT_STATUS_INVALID_HANDLE; return NT_STATUS_NO_PROBLEMO; } /******************************************************************** GetPrinterData on a printer server Handle. ********************************************************************/ static BOOL getprinterdata_printer_server(fstring value, uint32 *type, uint8 **data, uint32 *needed, uint32 in_size) { int i; DEBUG(8,("getprinterdata_printer_server:%s\n", value)); if (!strcmp(value, "BeepEnabled")) { *type = 0x4; *data = (uint8 *)malloc( 4*sizeof(uint8) ); SIVAL(*data, 0, 0x01); *needed = 0x4; return True; } if (!strcmp(value, "EventLog")) { *type = 0x4; *data = (uint8 *)malloc( 4*sizeof(uint8) ); SIVAL(*data, 0, 0x1B); *needed = 0x4; return True; } if (!strcmp(value, "NetPopup")) { *type = 0x4; *data = (uint8 *)malloc( 4*sizeof(uint8) ); SIVAL(*data, 0, 0x01); *needed = 0x4; return True; } if (!strcmp(value, "MajorVersion")) { *type = 0x4; *data = (uint8 *)malloc( 4*sizeof(uint8) ); SIVAL(*data, 0, 0x02); *needed = 0x4; return True; } 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)); memset(*data, 0, (*needed > in_size) ? *needed:in_size); /* it's done by hand ready to go on the wire */ for (i=0; i in_size) ? *needed:in_size) *sizeof(uint8)); memset(*data, 0, (*needed > in_size) ? *needed:in_size); for (i=0; iin_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); } free_a_printer(printer, 2); } return (False); } /******************************************************************** * spoolss_getprinterdata ********************************************************************/ uint32 _spoolss_getprinterdata(const POLICY_HND *handle, UNISTR2 *valuename, uint32 in_size, uint32 *type, uint32 *out_size, uint8 **data, uint32 *needed) { fstring value; BOOL found=False; Printer_entry *Printer = find_printer_index_by_hnd(handle); /* * Reminder: when it's a string, the length is in BYTES * even if UNICODE is negociated. * * JFM, 4/19/1999 */ *out_size=in_size; /* in case of problem, return some default values */ *needed=0; *type=0; DEBUG(4,("_spoolss_getprinterdata\n")); if (!OPEN_HANDLE(Printer)) { *data=(uint8 *)malloc(4*sizeof(uint8)); return NT_STATUS_INVALID_HANDLE; } unistr2_to_ascii(value, valuename, sizeof(value)-1); if (handle_is_printserver(handle)) found=getprinterdata_printer_server(value, type, data, needed, *out_size); else found=getprinterdata_printer(handle, value, type, data, needed, *out_size); if (found==False) { /* reply this param doesn't exist */ *data=(uint8 *)malloc(4*sizeof(uint8)); memset(*data, 0x0, 4); return ERROR_INVALID_PARAMETER; } if (*needed > *out_size) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; } /******************************************************************** * _spoolss_rffpcnex * ReplyFindFirstPrinterChangeNotifyEx * * jfmxxxx: before replying OK: status=0 * should do a rpc call to the workstation asking ReplyOpenPrinter * have to code it, later. * * 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, const UNISTR2 *localmachine, uint32 printerlocal, SPOOL_NOTIFY_OPTION *option) { /* store the notify value in the printer struct */ Printer_entry *Printer=find_printer_index_by_hnd(handle); if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; Printer->notify.flags=flags; Printer->notify.options=options; Printer->notify.printerlocal=printerlocal; Printer->notify.option=option; unistr2_to_ascii(Printer->notify.localmachine, localmachine, sizeof(Printer->notify.localmachine)-1); 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) { pstring temp_name; snprintf(temp_name, sizeof(temp_name), "\\\\%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); } /******************************************************************* * 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) { /* 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=strlen(printer->info_2->printername); ascii_to_unistr(data->notify_data.data.string, printer->info_2->printername, sizeof(data->notify_data.data.string)-1); } /******************************************************************* * fill a notify_info_data with the servicename ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the port name ********************************************************************/ static void spoolss_notify_port_name(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { /* 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); } /******************************************************************* * fill a notify_info_data with the printername * jfmxxxx: it's incorrect, should be lp_printerdrivername() * but it doesn't exist, have to see what to do ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the comment ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the comment * jfm:xxxx incorrect, have to create a new smb.conf option * location = "Room 1, floor 2, building 3" ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the device mode * jfm:xxxx don't to it for know but that's a real problem !!! ********************************************************************/ static void spoolss_notify_devmode(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { } /******************************************************************* * fill a notify_info_data with the separator file name * jfm:xxxx just return no file could add an option to smb.conf * separator file = "separator.txt" ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the print processor * jfm:xxxx return always winprint to indicate we don't do anything to it ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the print processor options * jfm:xxxx send an empty string ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the data type * jfm:xxxx always send RAW as data type ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with the security descriptor * jfm:xxxx send an null pointer to say no security desc * have to implement security before ! ********************************************************************/ static void spoolss_notify_security_desc(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.data.length=0; data->notify_data.data.string[0]=0x00; } /******************************************************************* * fill a notify_info_data with the attributes * jfm:xxxx a samba printer is always shared ********************************************************************/ 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_RAW_ONLY ; } /******************************************************************* * fill a notify_info_data with the priority ********************************************************************/ static void spoolss_notify_priority(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.value[0] = printer->info_2->priority; } /******************************************************************* * fill a notify_info_data with the default priority ********************************************************************/ static void spoolss_notify_default_priority(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.value[0] = printer->info_2->default_priority; } /******************************************************************* * fill a notify_info_data with the start time ********************************************************************/ static void spoolss_notify_start_time(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.value[0] = printer->info_2->starttime; } /******************************************************************* * fill a notify_info_data with the until time ********************************************************************/ static void spoolss_notify_until_time(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.value[0] = printer->info_2->untiltime; } /******************************************************************* * fill a notify_info_data with the status ********************************************************************/ static void spoolss_notify_status(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { int count; print_queue_struct *q=NULL; print_status_struct status; memset(&status, 0, sizeof(status)); count=get_printqueue(snum, NULL, &q, &status); data->notify_data.value[0]=(uint32) status.status; if (q) free(q); } /******************************************************************* * fill a notify_info_data with the number of jobs queued ********************************************************************/ static void spoolss_notify_cjobs(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { print_queue_struct *q=NULL; print_status_struct status; memset(&status, 0, sizeof(status)); data->notify_data.value[0]=get_printqueue(snum, NULL, &q, &status); if (q) free(q); } /******************************************************************* * fill a notify_info_data with the average ppm ********************************************************************/ static void spoolss_notify_average_ppm(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { /* always respond 8 pages per minutes */ /* a little hard ! */ data->notify_data.value[0] = printer->info_2->averageppm; } /******************************************************************* * fill a notify_info_data with ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with ********************************************************************/ 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; } /******************************************************************* * fill a notify_info_data with ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with ********************************************************************/ 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); } /******************************************************************* * fill a notify_info_data with ********************************************************************/ static void spoolss_notify_job_time(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.value[0]=0x0; } /******************************************************************* * fill a notify_info_data with ********************************************************************/ static void spoolss_notify_job_size(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.value[0]=queue->size; } /******************************************************************* * fill a notify_info_data with ********************************************************************/ static void spoolss_notify_job_position(int snum, SPOOL_NOTIFY_INFO_DATA *data, print_queue_struct *queue, NT_PRINTER_INFO_LEVEL *printer) { data->notify_data.value[0]=queue->job; } #define END 65535 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 }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_PRINTER_NAME, "PRINTER_NOTIFY_PRINTER_NAME", POINTER, spoolss_notify_printer_name }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_SHARE_NAME, "PRINTER_NOTIFY_SHARE_NAME", POINTER, spoolss_notify_share_name }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_PORT_NAME, "PRINTER_NOTIFY_PORT_NAME", POINTER, spoolss_notify_port_name }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_DRIVER_NAME, "PRINTER_NOTIFY_DRIVER_NAME", POINTER, spoolss_notify_driver_name }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_COMMENT, "PRINTER_NOTIFY_COMMENT", POINTER, spoolss_notify_comment }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_LOCATION, "PRINTER_NOTIFY_LOCATION", POINTER, spoolss_notify_location }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_DEVMODE, "PRINTER_NOTIFY_DEVMODE", POINTER, spoolss_notify_devmode }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_SEPFILE, "PRINTER_NOTIFY_SEPFILE", POINTER, spoolss_notify_sepfile }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_PRINT_PROCESSOR, "PRINTER_NOTIFY_PRINT_PROCESSOR", POINTER, spoolss_notify_print_processor }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_PARAMETERS, "PRINTER_NOTIFY_PARAMETERS", POINTER, spoolss_notify_parameters }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_DATATYPE, "PRINTER_NOTIFY_DATATYPE", POINTER, spoolss_notify_datatype }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_SECURITY_DESCRIPTOR, "PRINTER_NOTIFY_SECURITY_DESCRIPTOR", POINTER, spoolss_notify_security_desc }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_ATTRIBUTES, "PRINTER_NOTIFY_ATTRIBUTES", ONE_VALUE, spoolss_notify_attributes }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_PRIORITY, "PRINTER_NOTIFY_PRIORITY", ONE_VALUE, spoolss_notify_priority }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_DEFAULT_PRIORITY, "PRINTER_NOTIFY_DEFAULT_PRIORITY", ONE_VALUE, spoolss_notify_default_priority }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_START_TIME, "PRINTER_NOTIFY_START_TIME", ONE_VALUE, spoolss_notify_start_time }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_UNTIL_TIME, "PRINTER_NOTIFY_UNTIL_TIME", ONE_VALUE, spoolss_notify_until_time }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_STATUS, "PRINTER_NOTIFY_STATUS", ONE_VALUE, spoolss_notify_status }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_STATUS_STRING, "PRINTER_NOTIFY_STATUS_STRING", POINTER, NULL }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_CJOBS, "PRINTER_NOTIFY_CJOBS", ONE_VALUE, spoolss_notify_cjobs }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_AVERAGE_PPM, "PRINTER_NOTIFY_AVERAGE_PPM", ONE_VALUE, spoolss_notify_average_ppm }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_TOTAL_PAGES, "PRINTER_NOTIFY_TOTAL_PAGES", POINTER, NULL }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_PAGES_PRINTED, "PRINTER_NOTIFY_PAGES_PRINTED", POINTER, NULL }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_TOTAL_BYTES, "PRINTER_NOTIFY_TOTAL_BYTES", POINTER, NULL }, { PRINTER_NOTIFY_TYPE, PRINTER_NOTIFY_BYTES_PRINTED, "PRINTER_NOTIFY_BYTES_PRINTED", POINTER, NULL }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_PRINTER_NAME, "JOB_NOTIFY_PRINTER_NAME", POINTER, spoolss_notify_printer_name }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_MACHINE_NAME, "JOB_NOTIFY_MACHINE_NAME", POINTER, spoolss_notify_server_name }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_PORT_NAME, "JOB_NOTIFY_PORT_NAME", POINTER, spoolss_notify_port_name }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_USER_NAME, "JOB_NOTIFY_USER_NAME", POINTER, spoolss_notify_username }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_NOTIFY_NAME, "JOB_NOTIFY_NOTIFY_NAME", POINTER, spoolss_notify_username }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_DATATYPE, "JOB_NOTIFY_DATATYPE", POINTER, spoolss_notify_datatype }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_PRINT_PROCESSOR, "JOB_NOTIFY_PRINT_PROCESSOR", POINTER, spoolss_notify_print_processor }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_PARAMETERS, "JOB_NOTIFY_PARAMETERS", POINTER, spoolss_notify_parameters }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_DRIVER_NAME, "JOB_NOTIFY_DRIVER_NAME", POINTER, spoolss_notify_driver_name }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_DEVMODE, "JOB_NOTIFY_DEVMODE", POINTER, spoolss_notify_devmode }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_STATUS, "JOB_NOTIFY_STATUS", ONE_VALUE, spoolss_notify_job_status }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_STATUS_STRING, "JOB_NOTIFY_STATUS_STRING", POINTER, spoolss_notify_job_status_string }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_SECURITY_DESCRIPTOR, "JOB_NOTIFY_SECURITY_DESCRIPTOR", POINTER, NULL }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_DOCUMENT, "JOB_NOTIFY_DOCUMENT", POINTER, spoolss_notify_job_name }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_PRIORITY, "JOB_NOTIFY_PRIORITY", ONE_VALUE, spoolss_notify_priority }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_POSITION, "JOB_NOTIFY_POSITION", ONE_VALUE, spoolss_notify_job_position }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_SUBMITTED, "JOB_NOTIFY_SUBMITTED", POINTER, NULL }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_START_TIME, "JOB_NOTIFY_START_TIME", ONE_VALUE, spoolss_notify_start_time }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_UNTIL_TIME, "JOB_NOTIFY_UNTIL_TIME", ONE_VALUE, spoolss_notify_until_time }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_TIME, "JOB_NOTIFY_TIME", ONE_VALUE, spoolss_notify_job_time }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_TOTAL_PAGES, "JOB_NOTIFY_TOTAL_PAGES", ONE_VALUE, NULL }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_PAGES_PRINTED, "JOB_NOTIFY_PAGES_PRINTED", ONE_VALUE, NULL }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_TOTAL_BYTES, "JOB_NOTIFY_TOTAL_BYTES", ONE_VALUE, spoolss_notify_job_size }, { JOB_NOTIFY_TYPE, JOB_NOTIFY_BYTES_PRINTED, "JOB_NOTIFY_BYTES_PRINTED", ONE_VALUE, NULL }, { END, END, "", END, NULL } }; /******************************************************************* return the size of info_data structure ********************************************************************/ static uint32 size_of_notify_info_data(uint16 type, uint16 field) { int i=0; while (notify_info_data_table[i].type != END) { if ( (notify_info_data_table[i].type == type ) && (notify_info_data_table[i].field == field ) ) { return (notify_info_data_table[i].size); continue; } i++; } return (65535); } /******************************************************************* return the type of notify_info_data ********************************************************************/ static BOOL type_of_notify_info_data(uint16 type, uint16 field) { int i=0; while (notify_info_data_table[i].type != END) { if ( (notify_info_data_table[i].type == type ) && (notify_info_data_table[i].field == field ) ) { if (notify_info_data_table[i].size == POINTER) { return (False); } else { return (True); } continue; } i++; } return (False); } /**************************************************************************** ****************************************************************************/ static int search_notify(uint16 type, uint16 field, int *value) { int j; BOOL found; for (j=0, found=False; found==False && notify_info_data_table[j].type != END ; j++) { if ( (notify_info_data_table[j].type == type ) && (notify_info_data_table[j].field == field ) ) found=True; } *value=--j; if ( found && (notify_info_data_table[j].fn != NULL) ) return True; else return False; } /**************************************************************************** ****************************************************************************/ static void construct_info_data(SPOOL_NOTIFY_INFO_DATA *info_data, uint16 type, uint16 field, int id) { info_data->type = type; info_data->field = field; info_data->reserved = 0; info_data->id = id; info_data->size = size_of_notify_info_data(type, field); info_data->enc_type = type_of_notify_info_data(type, field); } /******************************************************************* * * fill a notify_info struct with info asked * ********************************************************************/ static BOOL construct_notify_printer_info(SPOOL_NOTIFY_INFO *info, int snum, SPOOL_NOTIFY_OPTION_TYPE *option_type, uint32 id) { int field_num,j; uint16 type; uint16 field; SPOOL_NOTIFY_INFO_DATA *current_data; NT_PRINTER_INFO_LEVEL printer; print_queue_struct *queue=NULL; DEBUG(4,("construct_notify_printer_info\n")); type=option_type->type; DEBUGADD(4,("Notify type: [%s], number of notify info: [%d] on printer: [%s]\n", (option_type->type==PRINTER_NOTIFY_TYPE?"PRINTER_NOTIFY_TYPE":"JOB_NOTIFY_TYPE"), option_type->count, lp_servicename(snum))); if (get_a_printer(&printer, 2, lp_servicename(snum))!=0) { return False; } for(field_num=0; field_numcount; 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]); construct_info_data(current_data, type, field, id); notify_info_data_table[j].fn(snum, current_data, queue, &printer); info->count++; } free_a_printer(printer, 2); return True; } /******************************************************************* * * fill a notify_info struct with info asked * ********************************************************************/ static BOOL construct_notify_jobs_info(print_queue_struct *queue, SPOOL_NOTIFY_INFO *info, int snum, SPOOL_NOTIFY_OPTION_TYPE *option_type, uint32 id) { int field_num,j; uint16 type; uint16 field; SPOOL_NOTIFY_INFO_DATA *current_data; NT_PRINTER_INFO_LEVEL printer; DEBUG(4,("construct_notify_jobs_info\n")); type = option_type->type; DEBUGADD(4,("Notify type: [%s], number of notify info: [%d]\n", (option_type->type==PRINTER_NOTIFY_TYPE?"PRINTER_NOTIFY_TYPE":"JOB_NOTIFY_TYPE"), option_type->count)); if (get_a_printer(&printer, 2, lp_servicename(snum))!=0) { return False; } for(field_num=0; field_numcount; 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)); 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); info->count++; } free_a_printer(printer, 2); return True; } /* * JFM: The enumeration is not that simple, it's even non obvious. * * let's take an example: I want to monitor the PRINTER SERVER for * the printer's name and the number of jobs currently queued. * So in the NOTIFY_OPTION, I have one NOTIFY_OPTION_TYPE structure. * Its type is PRINTER_NOTIFY_TYPE and it has 2 fields NAME and CJOBS. * * I have 3 printers on the back of my server. * * Now the response is a NOTIFY_INFO structure, with 6 NOTIFY_INFO_DATA * structures. * Number Data Id * 1 printer 1 name 1 * 2 printer 1 cjob 1 * 3 printer 2 name 2 * 4 printer 2 cjob 2 * 5 printer 3 name 3 * 6 printer 3 name 3 * * that's the print server case, the printer case is even worse. */ /******************************************************************* * * enumerate all printers on the printserver * fill a notify_info struct with info asked * ********************************************************************/ static uint32 printserver_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *info) { int snum; Printer_entry *Printer=find_printer_index_by_hnd(hnd); int n_services=lp_numservices(); int i; uint32 id; SPOOL_NOTIFY_OPTION *option; SPOOL_NOTIFY_OPTION_TYPE *option_type; DEBUG(4,("printserver_notify_info\n")); option=Printer->notify.option; id=1; info->version=2; info->data=NULL; info->count=0; for (i=0; icount; i++) { option_type=&(option->ctr.type[i]); if (option_type->type!=PRINTER_NOTIFY_TYPE) continue; for (snum=0; snumversion:[%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; icount; 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)); } */ return NT_STATUS_NO_PROBLEMO; } /******************************************************************* * * fill a notify_info struct with info asked * ********************************************************************/ static uint32 printer_notify_info(const POLICY_HND *hnd, SPOOL_NOTIFY_INFO *info) { int snum; Printer_entry *Printer=find_printer_index_by_hnd(hnd); int i; uint32 id; SPOOL_NOTIFY_OPTION *option; SPOOL_NOTIFY_OPTION_TYPE *option_type; int count,j; print_queue_struct *queue=NULL; print_status_struct status; DEBUG(4,("printer_notify_info\n")); option=Printer->notify.option; id=1; info->version=2; info->data=NULL; info->count=0; get_printer_snum(hnd, &snum); for (i=0; icount; 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++; break; case JOB_NOTIFY_TYPE: memset(&status, 0, sizeof(status)); count=get_printqueue(snum, NULL, &queue, &status); for (j=0; jversion:[%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; icount; 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)); } */ return NT_STATUS_NO_PROBLEMO; } /******************************************************************** * spoolss_rfnpcnex ********************************************************************/ uint32 _spoolss_rfnpcnex( const 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; DEBUG(4,("Printer type %x\n",Printer->printer_type)); /* jfm: the change value isn't used right now. * we will honour it when * a) we'll be able to send notification to the client * b) we'll have a way to communicate between the spoolss process. * * same thing for option->flags * I should check for PRINTER_NOTIFY_OPTIONS_REFRESH but as * I don't have a global notification system, I'm sending back all the * informations even when _NOTHING_ has changed. */ /* just discard the SPOOL_NOTIFY_OPTION */ 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; } /******************************************************************** * construct_printer_info_0 * fill a printer_info_1 struct ********************************************************************/ static BOOL construct_printer_info_0(PRINTER_INFO_0 *printer, int snum, pstring servername) { pstring chaine; int count; NT_PRINTER_INFO_LEVEL ntprinter; counter_printer_0 *session_counter; uint32 global_counter; struct tm *t; 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; count=get_printqueue(snum, NULL, &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; } /* it's the first time, add it to the list */ if (session_counter==NULL) { session_counter=(counter_printer_0 *)malloc(sizeof(counter_printer_0)); 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", servername); init_unistr(&(printer->servername), chaine); printer->cjobs = count; printer->total_jobs = 0; printer->total_bytes = 0; t=gmtime(&ntprinter.info_2->setuptime); 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 = 0x2; 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 = 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); return (True); } /******************************************************************** * construct_printer_info_1 * fill a printer_info_1 struct ********************************************************************/ 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; if (get_a_printer(&ntprinter, 2, lp_servicename(snum)) != 0) return False; printer->flags=flags; snprintf(chaine,sizeof(chaine)-1,"%s%s,%s,%s",server, ntprinter.info_2->printername, ntprinter.info_2->drivername, lp_comment(snum)); snprintf(chaine2,sizeof(chaine)-1,"%s%s", server, ntprinter.info_2->printername); init_unistr(&printer->description, chaine); init_unistr(&printer->name, chaine2); init_unistr(&printer->comment, lp_comment(snum)); free_a_printer(ntprinter, 2); return True; } /**************************************************************************** ****************************************************************************/ static void construct_dev_mode(DEVICEMODE *devmode, int snum, char *servername) { char adevice[32]; char aform[32]; NT_PRINTER_INFO_LEVEL printer; NT_DEVICEMODE *ntdevmode; 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; DEBUGADD(8,("loading DEVICEMODE\n")); 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); devmode->specversion = ntdevmode->specversion; devmode->driverversion = ntdevmode->driverversion; devmode->size = ntdevmode->size; devmode->driverextra = ntdevmode->driverextra; devmode->fields = ntdevmode->fields; devmode->orientation = ntdevmode->orientation; devmode->papersize = ntdevmode->papersize; devmode->paperlength = ntdevmode->paperlength; devmode->paperwidth = ntdevmode->paperwidth; devmode->scale = ntdevmode->scale; devmode->copies = ntdevmode->copies; devmode->defaultsource = ntdevmode->defaultsource; devmode->printquality = ntdevmode->printquality; devmode->color = ntdevmode->color; devmode->duplex = ntdevmode->duplex; devmode->yresolution = ntdevmode->yresolution; devmode->ttoption = ntdevmode->ttoption; devmode->collate = ntdevmode->collate; devmode->icmmethod = ntdevmode->icmmethod; devmode->icmintent = ntdevmode->icmintent; 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); } free_a_printer(printer, 2); } /******************************************************************** * construct_printer_info_2 * fill a printer_info_2 struct ********************************************************************/ static BOOL construct_printer_info_2(pstring servername, PRINTER_INFO_2 *printer, int snum) { pstring chaine; pstring chaine2; pstring sl; int count; DEVICEMODE *devmode; NT_PRINTER_INFO_LEVEL ntprinter; 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; memset(&status, 0, sizeof(status)); count=get_printqueue(snum, NULL, &queue, &status); snprintf(chaine, sizeof(chaine)-1, "%s", servername); if (strlen(servername)!=0) fstrcpy(sl, "\\"); else fstrcpy(sl, '\0'); snprintf(chaine2, sizeof(chaine)-1, "%s%s%s", servername, sl, ntprinter.info_2->printername); init_unistr(&printer->servername, chaine); /* servername*/ init_unistr(&printer->printername, chaine2); /* printername*/ init_unistr(&printer->sharename, lp_servicename(snum)); /* sharename */ init_unistr(&printer->portname, lp_servicename(snum)); /* port */ init_unistr(&printer->drivername, ntprinter.info_2->drivername); /* drivername */ init_unistr(&printer->comment, lp_comment(snum)); /* 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_LOCAL \ | 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 */ devmode=(DEVICEMODE *)malloc(sizeof(DEVICEMODE)); ZERO_STRUCTP(devmode); construct_dev_mode(devmode, snum, servername); printer->devmode=devmode; safe_free(queue); free_a_printer(ntprinter, 2); return True; } /******************************************************************** 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 *printers=NULL; PRINTER_INFO_1 current_prt; DEBUG(4,("enum_all_printers_info_1\n")); for (snum=0; snum offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /******************************************************************** 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) { fstring temp; DEBUG(4,("enum_all_printers_info_1_local\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")); 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 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. */ printer=(PRINTER_INFO_1 *)malloc(sizeof(PRINTER_INFO_1)); *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. */ *needed += spoolss_size_printer_info_1(printer); 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); /* clear memory */ safe_free(printer); if (*needed > offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else 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(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 current_prt; for (snum=0; snum offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /******************************************************************** * handle enumeration of printers at level 1 ********************************************************************/ static uint32 enumprinters_level1( uint32 flags, fstring name, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { /* Not all the flags are equals */ 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 */ } /******************************************************************** * handle enumeration of printers at level 2 ********************************************************************/ static uint32 enumprinters_level2( uint32 flags, fstring servername, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *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; } /******************************************************************** * handle enumeration of printers at level 5 ********************************************************************/ static uint32 enumprinters_level5( uint32 flags, fstring servername, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { /* return enum_all_printers_info_5(buffer, offered, needed, returned);*/ return NT_STATUS_NO_PROBLEMO; } /******************************************************************** * api_spoolss_enumprinters * * called from api_spoolss_enumprinters (see this to understand) ********************************************************************/ uint32 _spoolss_enumprinters( uint32 flags, const UNISTR2 *servername, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { fstring name; DEBUG(4,("_spoolss_enumprinters\n")); *needed=0; *returned=0; /* * Level 1: * flags==PRINTER_ENUM_NAME * if name=="" then enumerates all printers * if name!="" then enumerate the printer * flags==PRINTER_ENUM_REMOTE * name is NULL, enumerate printers * Level 2: name!="" enumerates printers, name can't be NULL * Level 3: doesn't exist * Level 4: does a local registry lookup * Level 5: same as Level 2 */ 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; } } /**************************************************************************** ****************************************************************************/ static uint32 getprinter_level_0(pstring servername, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed) { PRINTER_INFO_0 *printer=NULL; printer=(PRINTER_INFO_0*)malloc(sizeof(PRINTER_INFO_0)); construct_printer_info_0(printer, snum, servername); /* check the required size. */ *needed += spoolss_size_printer_info_0(printer); 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); /* clear memory */ safe_free(printer); if (*needed > offered) { return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ static uint32 getprinter_level_1(pstring 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(servername, PRINTER_ENUM_ICON8, printer, snum); /* check the required size. */ *needed += spoolss_size_printer_info_1(printer); 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); /* clear memory */ safe_free(printer); if (*needed > offered) { return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ static uint32 getprinter_level_2(pstring 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)); 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)) { safe_free(printer); return ERROR_INSUFFICIENT_BUFFER; } /* fill the buffer with the structures */ new_smb_io_printer_info_2("", buffer, printer, 0); /* clear memory */ safe_free(printer); if (*needed > offered) { return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_getprinter(POLICY_HND *handle, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed) { int snum; pstring servername; *needed=0; pstrcpy(servername, global_myname); if (!get_printer_snum(handle, &snum)) return NT_STATUS_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; default: return ERROR_INVALID_LEVEL; break; } } /******************************************************************** * construct_printer_driver_info_1 * fill a construct_printer_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) { 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) { NT_PRINTER_INFO_LEVEL printer; 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_1(info, driver, servername, architecture); free_a_printer_driver(driver, 3); free_a_printer(printer, 2); } /******************************************************************** * 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) { 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 ); 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 ); } /******************************************************************** * 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) { NT_PRINTER_INFO_LEVEL printer; 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); free_a_printer_driver(driver, 3); free_a_printer(printer, 2); } /******************************************************************** * copy a strings array and convert to UNICODE ********************************************************************/ static void init_unistr_array(UNISTR ***uni_array, char **char_array, char *where) { int i=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")); i++; } DEBUGADD(7,("last one\n")); *uni_array=(UNISTR **)Realloc(*uni_array, sizeof(UNISTR *)*(i+1)); (*uni_array)[i]=0x0000; DEBUGADD(6,("last one:done\n")); } /******************************************************************** * 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) { 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); 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->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); } /******************************************************************** * 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) { NT_PRINTER_INFO_LEVEL printer; 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_3(info, driver, servername, architecture); free_a_printer_driver(driver, 3); free_a_printer(printer, 2); } /**************************************************************************** ****************************************************************************/ static uint32 getprinterdriver2_level1(pstring servername, pstring architecture, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed) { DRIVER_INFO_1 *info=NULL; info=(DRIVER_INFO_1 *)malloc(sizeof(DRIVER_INFO_1)); construct_printer_driver_info_1(info, snum, servername, architecture); /* check the required size. */ *needed += spoolss_size_printer_driver_info_1(info); 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); /* clear memory */ safe_free(info); 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) { DRIVER_INFO_2 *info=NULL; info=(DRIVER_INFO_2 *)malloc(sizeof(DRIVER_INFO_2)); construct_printer_driver_info_2(info, snum, servername, architecture); /* check the required size. */ *needed += spoolss_size_printer_driver_info_2(info); 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); /* clear memory */ safe_free(info); 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) { DRIVER_INFO_3 *info=NULL; info=(DRIVER_INFO_3 *)malloc(sizeof(DRIVER_INFO_3)); construct_printer_driver_info_3(info, snum, servername, architecture); /* check the required size. */ *needed += spoolss_size_printer_driver_info_3(info); 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_3("", buffer, info, 0); /* clear memory */ safe_free(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 clientmajorversion, uint32 clientminorversion, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *servermajorversion, uint32 *serverminorversion) { pstring servername; fstring architecture; int snum; DEBUG(4,("_spoolss_getprinterdriver2\n")); *needed=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; switch (level) { case 1: return getprinterdriver2_level1(servername, architecture, snum, buffer, offered, needed); break; case 2: return getprinterdriver2_level2(servername, architecture, snum, buffer, offered, needed); break; case 3: return getprinterdriver2_level3(servername, architecture, snum, buffer, offered, needed); break; default: return NT_STATUS_INVALID_LEVEL; break; } } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_startpageprinter(const POLICY_HND *handle) { Printer_entry *Printer = find_printer_index_by_hnd(handle); if (OPEN_HANDLE(Printer)) { Printer->page_started=True; return 0x0; } DEBUG(3,("Error in startpageprinter printer handle\n")); return NT_STATUS_INVALID_HANDLE; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_endpageprinter(const 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; } Printer->page_started=False; return NT_STATUS_NO_PROBLEMO; } /******************************************************************** * api_spoolss_getprinter * called from the spoolss dispatcher * ********************************************************************/ uint32 _spoolss_startdocprinter( const POLICY_HND *handle, uint32 level, 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; Printer_entry *Printer = find_printer_index_by_hnd(handle); if (!OPEN_HANDLE(Printer)) { return NT_STATUS_INVALID_HANDLE; } /* * 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 * in EMF format. * * So I add checks like in NT Server ... * * lkclXXXX jean-francois, i love this kind of thing. oh, well, * there's a bug in NT client-side code, so we'll fix it in the * server-side code. *nnnnnggggh!* */ if (info_1->p_datatype != 0) { unistr2_to_ascii(datatype, &(info_1->docname), sizeof(datatype)); if (strcmp(datatype, "RAW") != 0) { (*jobid)=0; return ERROR_INVALID_DATATYPE; } } /* get the share number of the printer */ if (!get_printer_snum(handle, &snum)) { return NT_STATUS_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)); fd=open(fname, O_WRONLY|O_CREAT|O_TRUNC|O_EXCL, S_IRUSR|S_IWUSR ); DEBUG(4,("Temp spool file created: [%s]\n", fname)); Printer->current_jobid=fd; pstrcpy(Printer->document_name, fname); unistr2_to_ascii(Printer->job_name, &info_1->docname, sizeof(Printer->job_name)); Printer->document_fd=fd; Printer->document_started=True; (*jobid) = Printer->current_jobid; return 0x0; } /******************************************************************** * api_spoolss_getprinter * called from the spoolss dispatcher * ********************************************************************/ uint32 _spoolss_enddocprinter(const 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; } Printer->document_started=False; close(Printer->document_fd); DEBUG(4,("Temp spool file closed, printing now ...\n")); pstrcpy(filename1, Printer->document_name); pstrcpy(job_name, Printer->job_name); if (!get_printer_snum(handle,&snum)) { return NT_STATUS_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))); } if (strstr(syscmd,"%s")) { pstrcpy(filename,filename1); pstring_sub(syscmd, "%s", filename); } pstring_sub(syscmd, "%f", filename1); /* 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. */ tstr = lp_printername(snum); if (tstr == NULL || tstr[0] == '\0') { DEBUG(3,( "No printer name - using %s.\n", SERVICE(snum))); tstr = SERVICE(snum); } pstring_sub(syscmd, "%p", tstr); /* If the lpr command support the 'Job' option replace here */ pstring_sub(syscmd, "%j", job_name); 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; } } else { DEBUG(0,("Null print command?\n")); lpq_reset(snum); return NT_STATUS_ACCESS_DENIED; } lpq_reset(snum); return 0x0; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_writeprinter( const POLICY_HND *handle, uint32 buffer_size, const uint8 *buffer, uint32 *buffer_written) { int fd; 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; } fd = Printer->document_fd; (*buffer_written) = write(fd, buffer, buffer_size); Printer->document_lastwritten = (*buffer_written); return 0x0; } /******************************************************************** * api_spoolss_getprinter * called from the spoolss dispatcher * ********************************************************************/ static uint32 control_printer(const POLICY_HND *handle, uint32 command) { int snum; Printer_entry *Printer = find_printer_index_by_hnd(handle); if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; if (!get_printer_snum(handle, &snum) ) return NT_STATUS_INVALID_HANDLE; 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; } return NT_STATUS_INVALID_INFO_CLASS; } /******************************************************************** * called by spoolss_api_setprinter * when updating a printer description ********************************************************************/ static uint32 update_printer(const POLICY_HND *handle, uint32 level, const SPOOL_PRINTER_INFO_LEVEL *info, const DEVICEMODE *devmode) { int snum; NT_PRINTER_INFO_LEVEL printer; NT_DEVICEMODE *nt_devmode; Printer_entry *Printer = find_printer_index_by_hnd(handle); nt_devmode=NULL; DEBUG(8,("update_printer\n")); if (level!=2) { DEBUG(0,("Send a mail to jfm@samba.org\n")); DEBUGADD(0,("with the following message: update_printer: level!=2\n")); return NT_STATUS_INVALID_INFO_CLASS; } if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; if (!get_printer_snum(handle, &snum) ) return NT_STATUS_INVALID_HANDLE; get_a_printer(&printer, 2, lp_servicename(snum)); DEBUGADD(8,("Converting info_2 struct\n")); convert_printer_info(info, &printer, level); 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 */ DEBUGADD(8,("Converting the devicemode struct\n")); nt_devmode=printer.info_2->devmode; init_devicemode(nt_devmode); convert_devicemode(*devmode, nt_devmode); } else { if (printer.info_2->devmode != NULL) free(printer.info_2->devmode); printer.info_2->devmode=NULL; } if (add_a_printer(printer, 2)!=0) { free_a_printer(printer, 2); /* I don't really know what to return here !!! */ return NT_STATUS_INVALID_INFO_CLASS; } free_a_printer(printer, 2); return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_setprinter(const POLICY_HND *handle, uint32 level, const SPOOL_PRINTER_INFO_LEVEL *info, const DEVMODE_CTR devmode_ctr, uint32 command) { Printer_entry *Printer = find_printer_index_by_hnd(handle); if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; /* check the level */ switch (level) { case 0: return control_printer(handle, command); break; case 2: return update_printer(handle, level, info, devmode_ctr.devmode); break; } return NT_STATUS_INVALID_INFO_CLASS; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_fcpn(const POLICY_HND *handle) { Printer_entry *Printer= find_printer_index_by_hnd(handle); if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; Printer->notify.flags=0; Printer->notify.options=0; Printer->notify.localmachine[0]='\0'; Printer->notify.printerlocal=0; safe_free(Printer->notify.option); Printer->notify.option=NULL; return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_addjob(const POLICY_HND *handle, uint32 level, NEW_BUFFER *buffer, uint32 offered) { return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ static void fill_job_info_1(JOB_INFO_1 *job_info, print_queue_struct *queue, int position, int snum) { pstring temp_name; struct tm *t; time_t unixdate = time(NULL); t=gmtime(&unixdate); 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; job_info->priority=queue->priority; job_info->position=position; job_info->totalpages=0; job_info->pagesprinted=0; make_systemtime(&(job_info->submitted), t); } /**************************************************************************** ****************************************************************************/ 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; pstring chaine; struct tm *t; time_t unixdate = time(NULL); if (get_a_printer(&ntprinter, 2, lp_servicename(snum)) !=0 ) { 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); 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), ""); /* and here the security descriptor */ job_info->status=queue->status; job_info->priority=queue->priority; job_info->position=position; job_info->starttime=0; job_info->untiltime=0; job_info->totalpages=0; job_info->size=queue->size; make_systemtime(&(job_info->submitted), t); 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; free_a_printer(ntprinter, 2); return (True); } /**************************************************************************** Enumjobs at level 1. ****************************************************************************/ static uint32 enumjobs_level1(print_queue_struct *queue, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { JOB_INFO_1 *info; int i; info=(JOB_INFO_1 *)malloc(*returned*sizeof(JOB_INFO_1)); for (i=0; i<*returned; i++) { fill_job_info_1(&(info[i]), &(queue[i]), i, snum); } /* check the required size. */ for (i=0; i<*returned; i++) (*needed) += spoolss_size_job_info_1(&(info[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_job_info_1("", buffer, &(info[i]), 0); /* clear memory */ safe_free(queue); safe_free(info); if (*needed > offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** Enumjobs at level 2. ****************************************************************************/ static uint32 enumjobs_level2(print_queue_struct *queue, int snum, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { JOB_INFO_2 *info; int i; info=(JOB_INFO_2 *)malloc(*returned*sizeof(JOB_INFO_2)); for (i=0; i<*returned; i++) { fill_job_info_2(&(info[i]), &(queue[i]), i, snum); } /* check the required size. */ for (i=0; i<*returned; i++) (*needed) += spoolss_size_job_info_2(&(info[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_job_info_2("", buffer, &(info[i]), 0); /* clear memory */ safe_free(queue); safe_free(info); if (*needed > offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** Enumjobs. ****************************************************************************/ uint32 _spoolss_enumjobs( POLICY_HND *handle, uint32 firstjob, uint32 numofjobs, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { int snum; print_queue_struct *queue=NULL; print_status_struct prt_status; DEBUG(4,("_spoolss_enumjobs\n")); ZERO_STRUCT(prt_status); *needed=0; *returned=0; if (!get_printer_snum(handle, &snum)) { return NT_STATUS_INVALID_HANDLE; } *returned = get_printqueue(snum, NULL, &queue, &prt_status); DEBUGADD(4,("count:[%d], status:[%d], [%s]\n", *returned, prt_status.status, prt_status.message)); 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; } } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_schedulejob( const POLICY_HND *handle, uint32 jobid) { return 0x0; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_setjob( const POLICY_HND *handle, uint32 jobid, uint32 level, JOB_INFO *ctr, uint32 command) { 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; } count=get_printqueue(snum, NULL, &queue, &prt_status); while ( (i offered) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** 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) { int i; 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); } /* check the required size. */ 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)) return ERROR_INSUFFICIENT_BUFFER; /* fill the buffer with the form structures */ 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); if (*needed > offered) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** 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) { int i; 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); } /* check the required size. */ 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])); } if (!alloc_buffer_size(buffer, *needed)) 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); } safe_free(list); if (*needed > offered) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** Enumerates all printer drivers. ****************************************************************************/ uint32 _spoolss_enumprinterdrivers( UNISTR2 *name, UNISTR2 *environment, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { int i; fstring *list; fstring servername; fstring architecture; DEBUG(4,("_spoolss_enumprinterdrivers\n")); fstrcpy(servername, global_myname); *needed=0; *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; case 2: return enumprinterdrivers_level2(list, servername, architecture, buffer, offered, needed, returned); break; case 3: return enumprinterdrivers_level3(list, servername, architecture, buffer, offered, needed, returned); break; default: return NT_STATUS_INVALID_INFO_CLASS; break; } } /**************************************************************************** ****************************************************************************/ static void fill_form_1(FORM_1 *form, nt_forms_struct *list, int position) { form->flag=list->flag; init_unistr(&(form->name), list->name); form->width=list->width; form->length=list->length; form->left=list->left; form->top=list->top; form->right=list->right; form->bottom=list->bottom; } /**************************************************************************** ****************************************************************************/ uint32 _new_spoolss_enumforms( const POLICY_HND *handle, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *numofforms) { nt_forms_struct *list=NULL; 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)); 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 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(list); 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(list); if (*needed > offered) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; default: safe_free(list); return ERROR_INVALID_LEVEL; } } /**************************************************************************** ****************************************************************************/ static void fill_port_1(PORT_INFO_1 *port, char *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"); #define PORT_TYPE_WRITE 1 port->port_type=PORT_TYPE_WRITE; port->reserved=0x0; } /**************************************************************************** enumports level 1. ****************************************************************************/ 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; for (snum=0; snum offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else 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; for (snum=0; snum offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** enumports. ****************************************************************************/ uint32 _spoolss_enumports( UNISTR2 *name, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { DEBUG(4,("_spoolss_enumports\n")); *returned=0; *needed=0; 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; } } /**************************************************************************** ****************************************************************************/ 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) { NT_PRINTER_INFO_LEVEL printer; fstring name; fstring share_name; 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; /* convert from UNICODE to ASCII */ convert_printer_info(info, &printer, level); unistr2_to_ascii(share_name, &((info->info_2)->portname), sizeof(share_name)-1); slprintf(name, sizeof(name)-1, "\\\\%s\\%s", global_myname, share_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 (!set_printer_hnd_printername(handle, name)) { close_printer_handle(handle); return NT_STATUS_ACCESS_DENIED; } /* write the ASCII on disk */ if (add_a_printer(printer, level) != 0x0) { close_printer_handle(handle); return NT_STATUS_ACCESS_DENIED; } return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_addprinterdriver( const UNISTR2 *server_name, uint32 level, const SPOOL_PRINTER_DRIVER_INFO_LEVEL *info) { NT_PRINTER_DRIVER_INFO_LEVEL driver; convert_printer_driver_info(info, &driver, level); if (add_a_printer_driver(driver, level)!=0) return NT_STATUS_ACCESS_DENIED; return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ static void fill_driverdir_1(DRIVER_DIRECTORY_1 *info, char *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 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)); fill_driverdir_1(info, chaine); *needed += spoolss_size_driverdir_info_1(info); if (!alloc_buffer_size(buffer, *needed)) { safe_free(info); return ERROR_INSUFFICIENT_BUFFER; } new_smb_io_driverdir_1("", buffer, info, 0); safe_free(info); if (*needed > offered) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_getprinterdriverdirectory(UNISTR2 *name, UNISTR2 *uni_environment, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed) { DEBUG(4,("_spoolss_getprinterdriverdirectory\n")); *needed=0; switch(level) { case 1: return getprinterdriverdir_level_1(name, uni_environment, buffer, offered, needed); break; default: return ERROR_INVALID_LEVEL; break; } } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_enumprinterdata(const 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 **data_out, uint32 *out_data_len) { NT_PRINTER_INFO_LEVEL printer; fstring value; uint32 param_index; uint32 biggest_valuesize; uint32 biggest_datasize; uint32 data_len; Printer_entry *Printer = find_printer_index_by_hnd(handle); int snum; uint8 *data=NULL; uint32 type; ZERO_STRUCT(printer); *out_max_value_len=0; *out_value=NULL; *out_value_len=0; *out_type=0; *out_max_data_len=0; *data_out=NULL; *out_data_len=0; DEBUG(5,("spoolss_enumprinterdata\n")); if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; if (!get_printer_snum(handle, &snum)) return NT_STATUS_INVALID_HANDLE; if (get_a_printer(&printer, 2, lp_servicename(snum)) != 0x0) return NT_STATUS_INVALID_HANDLE; /* * The NT machine wants to know the biggest size of value and data * * cf: MSDN EnumPrinterData remark section */ if ( (in_value_len==0) && (in_data_len==0) ) { DEBUGADD(6,("Activating NT mega-hack to find sizes\n")); param_index=0; biggest_valuesize=0; biggest_datasize=0; 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); param_index++; } /* 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); return NT_STATUS_NO_PROBLEMO; } /* * 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, idx, value, &data, &type, &data_len)) { free_a_printer(printer, 2); return ERROR_NO_MORE_ITEMS; } /* * the value is: * - counted in bytes in the request * - counted in UNICODE chars in the max reply * - counted in bytes in the real size * * 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_type=type; /* the data is counted in bytes */ *out_max_data_len=in_data_len; *data_out=(uint8 *)malloc(in_data_len*sizeof(uint8)); memcpy(*data_out, data, 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, const UNISTR2 *value, uint32 type, uint32 max_len, const uint8 *data, uint32 real_len, uint32 numeric_data) { NT_PRINTER_INFO_LEVEL printer; NT_PRINTER_PARAM *param = NULL; int snum=0; uint32 status = 0x0; Printer_entry *Printer=find_printer_index_by_hnd(handle); DEBUG(5,("spoolss_setprinterdata\n")); if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; if (!get_printer_snum(handle, &snum)) return NT_STATUS_INVALID_HANDLE; status = get_a_printer(&printer, 2, lp_servicename(snum)); if (status != 0x0) return status; convert_specific_param(¶m, value , type, data, real_len); unlink_specific_param_if_exist(printer.info_2, param); if (!add_a_specific_param(printer.info_2, param)) { status = NT_STATUS_INVALID_PARAMETER; } else { status = add_a_printer(printer, 2); } free_a_printer(printer, 2); return status; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_addform( const POLICY_HND *handle, uint32 level, const FORM *form) { int count=0; nt_forms_struct *list=NULL; Printer_entry *Printer = find_printer_index_by_hnd(handle); DEBUG(5,("spoolss_addform\n")); if (!OPEN_HANDLE(Printer)) return NT_STATUS_INVALID_HANDLE; count=get_ntforms(&list); add_a_form(&list, form, &count); write_ntforms(&list, count); safe_free(list); return 0x0; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_setform( const POLICY_HND *handle, const UNISTR2 *uni_name, uint32 level, const FORM *form) { int count=0; nt_forms_struct *list=NULL; Printer_entry *Printer = find_printer_index_by_hnd(handle); DEBUG(5,("spoolss_setform\n")); if (!OPEN_HANDLE(Printer)) { return NT_STATUS_INVALID_HANDLE; } count=get_ntforms(&list); update_a_form(&list, form, count); write_ntforms(&list, count); safe_free(list); return 0x0; } /**************************************************************************** enumprintprocessors level 1. ****************************************************************************/ static uint32 enumprintprocessors_level_1(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { PRINTPROCESSOR_1 *info_1=NULL; info_1 = (PRINTPROCESSOR_1 *)malloc(sizeof(PRINTPROCESSOR_1)); (*returned) = 0x1; init_unistr(&(info_1->name), "winprint"); *needed += spoolss_size_printprocessor_info_1(info_1); if (!alloc_buffer_size(buffer, *needed)) return ERROR_INSUFFICIENT_BUFFER; smb_io_printprocessor_info_1("", buffer, info_1, 0); safe_free(info_1); if (*needed > offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_enumprintprocessors(UNISTR2 *name, UNISTR2 *environment, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { DEBUG(5,("spoolss_enumprintprocessors\n")); /* * Enumerate the print processors ... * * Just reply with "winprint", to keep NT happy * and I can use my nice printer checker. */ *returned=0; *needed=0; switch (level) { case 1: return enumprintprocessors_level_1(buffer, offered, needed, returned); break; default: return NT_STATUS_INVALID_INFO_CLASS; break; } } /**************************************************************************** enumprintprocdatatypes level 1. ****************************************************************************/ static uint32 enumprintprocdatatypes_level_1(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { PRINTPROCDATATYPE_1 *info_1=NULL; info_1 = (PRINTPROCDATATYPE_1 *)malloc(sizeof(PRINTPROCDATATYPE_1)); (*returned) = 0x1; init_unistr(&(info_1->name), "RAW"); *needed += spoolss_size_printprocdatatype_info_1(info_1); if (!alloc_buffer_size(buffer, *needed)) return ERROR_INSUFFICIENT_BUFFER; smb_io_printprocdatatype_info_1("", buffer, info_1, 0); safe_free(info_1); if (*needed > offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_enumprintprocdatatypes(UNISTR2 *name, UNISTR2 *processor, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { DEBUG(5,("_spoolss_enumprintprocdatatypes\n")); *returned=0; *needed=0; switch (level) { case 1: return enumprintprocdatatypes_level_1(buffer, offered, needed, returned); break; default: return NT_STATUS_INVALID_INFO_CLASS; break; } } /**************************************************************************** enumprintmonitors level 1. ****************************************************************************/ static uint32 enumprintmonitors_level_1(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { PRINTMONITOR_1 *info_1=NULL; info_1 = (PRINTMONITOR_1 *)malloc(sizeof(PRINTMONITOR_1)); (*returned) = 0x1; init_unistr(&(info_1->name), "Local Port"); *needed += spoolss_size_printmonitor_info_1(info_1); if (!alloc_buffer_size(buffer, *needed)) return ERROR_INSUFFICIENT_BUFFER; smb_io_printmonitor_info_1("", buffer, info_1, 0); safe_free(info_1); if (*needed > offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** enumprintmonitors level 2. ****************************************************************************/ static uint32 enumprintmonitors_level_2(NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { PRINTMONITOR_2 *info_2=NULL; info_2 = (PRINTMONITOR_2 *)malloc(sizeof(PRINTMONITOR_2)); (*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"); *needed += spoolss_size_printmonitor_info_2(info_2); if (!alloc_buffer_size(buffer, *needed)) return ERROR_INSUFFICIENT_BUFFER; smb_io_printmonitor_info_2("", buffer, info_2, 0); safe_free(info_2); if (*needed > offered) { *returned=0; return ERROR_INSUFFICIENT_BUFFER; } else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ uint32 _spoolss_enumprintmonitors(UNISTR2 *name,uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed, uint32 *returned) { DEBUG(5,("spoolss_enumprintmonitors\n")); /* * Enumerate the print monitors ... * * Just reply with "Local Port", to keep NT happy * and I can use my nice printer checker. */ *returned=0; *needed=0; 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; } } /**************************************************************************** ****************************************************************************/ static uint32 getjob_level_1(print_queue_struct *queue, int count, int snum, uint32 jobid, NEW_BUFFER *buffer, uint32 offered, uint32 *needed) { 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; } for (i=0; i offered) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; } /**************************************************************************** ****************************************************************************/ #if 0 ... Not yet used... static uint32 getjob_level_2(print_queue_struct *queue, int count, int snum, uint32 jobid, NEW_BUFFER *buffer, uint32 offered, uint32 *needed) { int i=0; BOOL found=False; JOB_INFO_2 *info_2=NULL; info_2=(JOB_INFO_2 *)malloc(sizeof(JOB_INFO_2)); if (info_2 == NULL) { safe_free(queue); return NT_STATUS_NO_MEMORY; } for (i=0; i offered) return ERROR_INSUFFICIENT_BUFFER; else return NT_STATUS_NO_PROBLEMO; } #endif /**************************************************************************** ****************************************************************************/ uint32 _spoolss_getjob( POLICY_HND *handle, uint32 jobid, uint32 level, NEW_BUFFER *buffer, uint32 offered, uint32 *needed) { int snum; int count; print_queue_struct *queue=NULL; print_status_struct prt_status; DEBUG(5,("spoolss_getjob\n")); memset(&prt_status, 0, sizeof(prt_status)); *needed=0; if (!get_printer_snum(handle, &snum)) { return NT_STATUS_INVALID_HANDLE; } count=get_printqueue(snum, NULL, &queue, &prt_status); DEBUGADD(4,("count:[%d], prt_status:[%d], [%s]\n", count, prt_status.status, prt_status.message)); 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; default: safe_free(queue); return NT_STATUS_INVALID_INFO_CLASS; break; } }