r16367: Missed one, Klocwork #915.
[Samba/gebeck_regimport.git] / source / printing / nt_printing.c
blob6a7fd4d3986466203194482373f24a34d3e68c87
1 /*
2 * Unix SMB/CIFS implementation.
3 * RPC Pipe client / server routines
4 * Copyright (C) Andrew Tridgell 1992-2000,
5 * Copyright (C) Jean François Micouleau 1998-2000.
6 * Copyright (C) Gerald Carter 2002-2005.
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 #include "includes.h"
25 extern struct current_user current_user;
27 static TDB_CONTEXT *tdb_forms; /* used for forms files */
28 static TDB_CONTEXT *tdb_drivers; /* used for driver files */
29 static TDB_CONTEXT *tdb_printers; /* used for printers files */
31 #define FORMS_PREFIX "FORMS/"
32 #define DRIVERS_PREFIX "DRIVERS/"
33 #define DRIVER_INIT_PREFIX "DRIVER_INIT/"
34 #define PRINTERS_PREFIX "PRINTERS/"
35 #define SECDESC_PREFIX "SECDESC/"
36 #define GLOBAL_C_SETPRINTER "GLOBALS/c_setprinter"
38 #define NTDRIVERS_DATABASE_VERSION_1 1
39 #define NTDRIVERS_DATABASE_VERSION_2 2
40 #define NTDRIVERS_DATABASE_VERSION_3 3 /* little endian version of v2 */
41 #define NTDRIVERS_DATABASE_VERSION_4 4 /* fix generic bits in security descriptors */
42 #define NTDRIVERS_DATABASE_VERSION_5 5 /* normalize keys in ntprinters.tdb */
44 /* Map generic permissions to printer object specific permissions */
46 GENERIC_MAPPING printer_generic_mapping = {
47 PRINTER_READ,
48 PRINTER_WRITE,
49 PRINTER_EXECUTE,
50 PRINTER_ALL_ACCESS
53 STANDARD_MAPPING printer_std_mapping = {
54 PRINTER_READ,
55 PRINTER_WRITE,
56 PRINTER_EXECUTE,
57 PRINTER_ALL_ACCESS
60 /* Map generic permissions to print server object specific permissions */
62 GENERIC_MAPPING printserver_generic_mapping = {
63 SERVER_READ,
64 SERVER_WRITE,
65 SERVER_EXECUTE,
66 SERVER_ALL_ACCESS
69 STANDARD_MAPPING printserver_std_mapping = {
70 SERVER_READ,
71 SERVER_WRITE,
72 SERVER_EXECUTE,
73 SERVER_ALL_ACCESS
76 /* We need one default form to support our default printer. Msoft adds the
77 forms it wants and in the ORDER it wants them (note: DEVMODE papersize is an
78 array index). Letter is always first, so (for the current code) additions
79 always put things in the correct order. */
80 static const nt_forms_struct default_forms[] = {
81 {"Letter",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
82 {"Letter Small",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
83 {"Tabloid",0x1,0x44368,0x696b8,0x0,0x0,0x44368,0x696b8},
84 {"Ledger",0x1,0x696b8,0x44368,0x0,0x0,0x696b8,0x44368},
85 {"Legal",0x1,0x34b5c,0x56d10,0x0,0x0,0x34b5c,0x56d10},
86 {"Statement",0x1,0x221b4,0x34b5c,0x0,0x0,0x221b4,0x34b5c},
87 {"Executive",0x1,0x2cf56,0x411cc,0x0,0x0,0x2cf56,0x411cc},
88 {"A3",0x1,0x48828,0x668a0,0x0,0x0,0x48828,0x668a0},
89 {"A4",0x1,0x33450,0x48828,0x0,0x0,0x33450,0x48828},
90 {"A4 Small",0x1,0x33450,0x48828,0x0,0x0,0x33450,0x48828},
91 {"A5",0x1,0x24220,0x33450,0x0,0x0,0x24220,0x33450},
92 {"B4 (JIS)",0x1,0x3ebe8,0x58de0,0x0,0x0,0x3ebe8,0x58de0},
93 {"B5 (JIS)",0x1,0x2c6f0,0x3ebe8,0x0,0x0,0x2c6f0,0x3ebe8},
94 {"Folio",0x1,0x34b5c,0x509d8,0x0,0x0,0x34b5c,0x509d8},
95 {"Quarto",0x1,0x347d8,0x43238,0x0,0x0,0x347d8,0x43238},
96 {"10x14",0x1,0x3e030,0x56d10,0x0,0x0,0x3e030,0x56d10},
97 {"11x17",0x1,0x44368,0x696b8,0x0,0x0,0x44368,0x696b8},
98 {"Note",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
99 {"Envelope #9",0x1,0x18079,0x37091,0x0,0x0,0x18079,0x37091},
100 {"Envelope #10",0x1,0x19947,0x3ae94,0x0,0x0,0x19947,0x3ae94},
101 {"Envelope #11",0x1,0x1be7c,0x40565,0x0,0x0,0x1be7c,0x40565},
102 {"Envelope #12",0x1,0x1d74a,0x44368,0x0,0x0,0x1d74a,0x44368},
103 {"Envelope #14",0x1,0x1f018,0x47504,0x0,0x0,0x1f018,0x47504},
104 {"C size sheet",0x1,0x696b8,0x886d0,0x0,0x0,0x696b8,0x886d0},
105 {"D size sheet",0x1,0x886d0,0xd2d70,0x0,0x0,0x886d0,0xd2d70},
106 {"E size sheet",0x1,0xd2d70,0x110da0,0x0,0x0,0xd2d70,0x110da0},
107 {"Envelope DL",0x1,0x1adb0,0x35b60,0x0,0x0,0x1adb0,0x35b60},
108 {"Envelope C5",0x1,0x278d0,0x37e88,0x0,0x0,0x278d0,0x37e88},
109 {"Envelope C3",0x1,0x4f1a0,0x6fd10,0x0,0x0,0x4f1a0,0x6fd10},
110 {"Envelope C4",0x1,0x37e88,0x4f1a0,0x0,0x0,0x37e88,0x4f1a0},
111 {"Envelope C6",0x1,0x1bd50,0x278d0,0x0,0x0,0x1bd50,0x278d0},
112 {"Envelope C65",0x1,0x1bd50,0x37e88,0x0,0x0,0x1bd50,0x37e88},
113 {"Envelope B4",0x1,0x3d090,0x562e8,0x0,0x0,0x3d090,0x562e8},
114 {"Envelope B5",0x1,0x2af80,0x3d090,0x0,0x0,0x2af80,0x3d090},
115 {"Envelope B6",0x1,0x2af80,0x1e848,0x0,0x0,0x2af80,0x1e848},
116 {"Envelope",0x1,0x1adb0,0x38270,0x0,0x0,0x1adb0,0x38270},
117 {"Envelope Monarch",0x1,0x18079,0x2e824,0x0,0x0,0x18079,0x2e824},
118 {"6 3/4 Envelope",0x1,0x167ab,0x284ec,0x0,0x0,0x167ab,0x284ec},
119 {"US Std Fanfold",0x1,0x5c3e1,0x44368,0x0,0x0,0x5c3e1,0x44368},
120 {"German Std Fanfold",0x1,0x34b5c,0x4a6a0,0x0,0x0,0x34b5c,0x4a6a0},
121 {"German Legal Fanfold",0x1,0x34b5c,0x509d8,0x0,0x0,0x34b5c,0x509d8},
122 {"B4 (ISO)",0x1,0x3d090,0x562e8,0x0,0x0,0x3d090,0x562e8},
123 {"Japanese Postcard",0x1,0x186a0,0x24220,0x0,0x0,0x186a0,0x24220},
124 {"9x11",0x1,0x37cf8,0x44368,0x0,0x0,0x37cf8,0x44368},
125 {"10x11",0x1,0x3e030,0x44368,0x0,0x0,0x3e030,0x44368},
126 {"15x11",0x1,0x5d048,0x44368,0x0,0x0,0x5d048,0x44368},
127 {"Envelope Invite",0x1,0x35b60,0x35b60,0x0,0x0,0x35b60,0x35b60},
128 {"Reserved48",0x1,0x1,0x1,0x0,0x0,0x1,0x1},
129 {"Reserved49",0x1,0x1,0x1,0x0,0x0,0x1,0x1},
130 {"Letter Extra",0x1,0x3ae94,0x4a6a0,0x0,0x0,0x3ae94,0x4a6a0},
131 {"Legal Extra",0x1,0x3ae94,0x5d048,0x0,0x0,0x3ae94,0x5d048},
132 {"Tabloid Extra",0x1,0x4a6a0,0x6f9f0,0x0,0x0,0x4a6a0,0x6f9f0},
133 {"A4 Extra",0x1,0x397c2,0x4eb16,0x0,0x0,0x397c2,0x4eb16},
134 {"Letter Transverse",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
135 {"A4 Transverse",0x1,0x33450,0x48828,0x0,0x0,0x33450,0x48828},
136 {"Letter Extra Transverse",0x1,0x3ae94,0x4a6a0,0x0,0x0,0x3ae94,0x4a6a0},
137 {"Super A",0x1,0x376b8,0x56ea0,0x0,0x0,0x376b8,0x56ea0},
138 {"Super B",0x1,0x4a768,0x76e58,0x0,0x0,0x4a768,0x76e58},
139 {"Letter Plus",0x1,0x34b5c,0x4eb16,0x0,0x0,0x34b5c,0x4eb16},
140 {"A4 Plus",0x1,0x33450,0x50910,0x0,0x0,0x33450,0x50910},
141 {"A5 Transverse",0x1,0x24220,0x33450,0x0,0x0,0x24220,0x33450},
142 {"B5 (JIS) Transverse",0x1,0x2c6f0,0x3ebe8,0x0,0x0,0x2c6f0,0x3ebe8},
143 {"A3 Extra",0x1,0x4e9d0,0x6ca48,0x0,0x0,0x4e9d0,0x6ca48},
144 {"A5 Extra",0x1,0x2a7b0,0x395f8,0x0,0x0,0x2a7b0,0x395f8},
145 {"B5 (ISO) Extra",0x1,0x31128,0x43620,0x0,0x0,0x31128,0x43620},
146 {"A2",0x1,0x668a0,0x91050,0x0,0x0,0x668a0,0x91050},
147 {"A3 Transverse",0x1,0x48828,0x668a0,0x0,0x0,0x48828,0x668a0},
148 {"A3 Extra Transverse",0x1,0x4e9d0,0x6ca48,0x0,0x0,0x4e9d0,0x6ca48},
149 {"Japanese Double Postcard",0x1,0x30d40,0x24220,0x0,0x0,0x30d40,0x24220},
150 {"A6",0x1,0x19a28,0x24220,0x0,0x0,0x19a28,0x24220},
151 {"Japanese Envelope Kaku #2",0x1,0x3a980,0x510e0,0x0,0x0,0x3a980,0x510e0},
152 {"Japanese Envelope Kaku #3",0x1,0x34bc0,0x43a08,0x0,0x0,0x34bc0,0x43a08},
153 {"Japanese Envelope Chou #3",0x1,0x1d4c0,0x395f8,0x0,0x0,0x1d4c0,0x395f8},
154 {"Japanese Envelope Chou #4",0x1,0x15f90,0x320c8,0x0,0x0,0x15f90,0x320c8},
155 {"Letter Rotated",0x1,0x44368,0x34b5c,0x0,0x0,0x44368,0x34b5c},
156 {"A3 Rotated",0x1,0x668a0,0x48828,0x0,0x0,0x668a0,0x48828},
157 {"A4 Rotated",0x1,0x48828,0x33450,0x0,0x0,0x48828,0x33450},
158 {"A5 Rotated",0x1,0x33450,0x24220,0x0,0x0,0x33450,0x24220},
159 {"B4 (JIS) Rotated",0x1,0x58de0,0x3ebe8,0x0,0x0,0x58de0,0x3ebe8},
160 {"B5 (JIS) Rotated",0x1,0x3ebe8,0x2c6f0,0x0,0x0,0x3ebe8,0x2c6f0},
161 {"Japanese Postcard Rotated",0x1,0x24220,0x186a0,0x0,0x0,0x24220,0x186a0},
162 {"Double Japan Postcard Rotated",0x1,0x24220,0x30d40,0x0,0x0,0x24220,0x30d40},
163 {"A6 Rotated",0x1,0x24220,0x19a28,0x0,0x0,0x24220,0x19a28},
164 {"Japan Envelope Kaku #2 Rotated",0x1,0x510e0,0x3a980,0x0,0x0,0x510e0,0x3a980},
165 {"Japan Envelope Kaku #3 Rotated",0x1,0x43a08,0x34bc0,0x0,0x0,0x43a08, 0x34bc0},
166 {"Japan Envelope Chou #3 Rotated",0x1,0x395f8,0x1d4c0,0x0,0x0,0x395f8,0x1d4c0},
167 {"Japan Envelope Chou #4 Rotated",0x1,0x320c8,0x15f90,0x0,0x0,0x320c8,0x15f90},
168 {"B6 (JIS)",0x1,0x1f400,0x2c6f0,0x0,0x0,0x1f400,0x2c6f0},
169 {"B6 (JIS) Rotated",0x1,0x2c6f0,0x1f400,0x0,0x0,0x2c6f0,0x1f400},
170 {"12x11",0x1,0x4a724,0x443e1,0x0,0x0,0x4a724,0x443e1},
171 {"Japan Envelope You #4",0x1,0x19a28,0x395f8,0x0,0x0,0x19a28,0x395f8},
172 {"Japan Envelope You #4 Rotated",0x1,0x395f8,0x19a28,0x0,0x0,0x395f8,0x19a28},
173 {"PRC 16K",0x1,0x2de60,0x3f7a0,0x0,0x0,0x2de60,0x3f7a0},
174 {"PRC 32K",0x1,0x1fbd0,0x2cec0,0x0,0x0,0x1fbd0,0x2cec0},
175 {"PRC 32K(Big)",0x1,0x222e0,0x318f8,0x0,0x0,0x222e0,0x318f8},
176 {"PRC Envelope #1",0x1,0x18e70,0x28488,0x0,0x0,0x18e70,0x28488},
177 {"PRC Envelope #2",0x1,0x18e70,0x2af80,0x0,0x0,0x18e70,0x2af80},
178 {"PRC Envelope #3",0x1,0x1e848,0x2af80,0x0,0x0,0x1e848,0x2af80},
179 {"PRC Envelope #4",0x1,0x1adb0,0x32c80,0x0,0x0,0x1adb0,0x32c80},
180 {"PRC Envelope #5",0x1,0x1adb0,0x35b60,0x0,0x0,0x1adb0,0x35b60},
181 {"PRC Envelope #6",0x1,0x1d4c0,0x38270,0x0,0x0,0x1d4c0,0x38270},
182 {"PRC Envelope #7",0x1,0x27100,0x38270,0x0,0x0,0x27100,0x38270},
183 {"PRC Envelope #8",0x1,0x1d4c0,0x4b708,0x0,0x0,0x1d4c0,0x4b708},
184 {"PRC Envelope #9",0x1,0x37e88,0x4f1a0,0x0,0x0,0x37e88,0x4f1a0},
185 {"PRC Envelope #10",0x1,0x4f1a0,0x6fd10,0x0,0x0,0x4f1a0,0x6fd10},
186 {"PRC 16K Rotated",0x1,0x3f7a0,0x2de60,0x0,0x0,0x3f7a0,0x2de60},
187 {"PRC 32K Rotated",0x1,0x2cec0,0x1fbd0,0x0,0x0,0x2cec0,0x1fbd0},
188 {"PRC 32K(Big) Rotated",0x1,0x318f8,0x222e0,0x0,0x0,0x318f8,0x222e0},
189 {"PRC Envelope #1 Rotated",0x1,0x28488,0x18e70,0x0,0x0,0x28488,0x18e70},
190 {"PRC Envelope #2 Rotated",0x1,0x2af80,0x18e70,0x0,0x0,0x2af80,0x18e70},
191 {"PRC Envelope #3 Rotated",0x1,0x2af80,0x1e848,0x0,0x0,0x2af80,0x1e848},
192 {"PRC Envelope #4 Rotated",0x1,0x32c80,0x1adb0,0x0,0x0,0x32c80,0x1adb0},
193 {"PRC Envelope #5 Rotated",0x1,0x35b60,0x1adb0,0x0,0x0,0x35b60,0x1adb0},
194 {"PRC Envelope #6 Rotated",0x1,0x38270,0x1d4c0,0x0,0x0,0x38270,0x1d4c0},
195 {"PRC Envelope #7 Rotated",0x1,0x38270,0x27100,0x0,0x0,0x38270,0x27100},
196 {"PRC Envelope #8 Rotated",0x1,0x4b708,0x1d4c0,0x0,0x0,0x4b708,0x1d4c0},
197 {"PRC Envelope #9 Rotated",0x1,0x4f1a0,0x37e88,0x0,0x0,0x4f1a0,0x37e88},
198 {"PRC Envelope #10 Rotated",0x1,0x6fd10,0x4f1a0,0x0,0x0,0x6fd10,0x4f1a0}
201 struct table_node {
202 const char *long_archi;
203 const char *short_archi;
204 int version;
207 #define SPL_ARCH_WIN40 "WIN40"
208 #define SPL_ARCH_W32X86 "W32X86"
209 #define SPL_ARCH_W32MIPS "W32MIPS"
210 #define SPL_ARCH_W32ALPHA "W32ALPHA"
211 #define SPL_ARCH_W32PPC "W32PPC"
212 #define SPL_ARCH_IA64 "IA64"
213 #define SPL_ARCH_X64 "x64"
215 static const struct table_node archi_table[]= {
217 {"Windows 4.0", SPL_ARCH_WIN40, 0 },
218 {"Windows NT x86", SPL_ARCH_W32X86, 2 },
219 {"Windows NT R4000", SPL_ARCH_W32MIPS, 2 },
220 {"Windows NT Alpha_AXP", SPL_ARCH_W32ALPHA, 2 },
221 {"Windows NT PowerPC", SPL_ARCH_W32PPC, 2 },
222 {"Windows IA64", SPL_ARCH_IA64, 3 },
223 {"Windows x64", SPL_ARCH_X64, 3 },
224 {NULL, "", -1 }
228 /****************************************************************************
229 generate a new TDB_DATA key for storing a printer
230 ****************************************************************************/
232 static TDB_DATA make_printer_tdbkey( const char *sharename )
234 fstring share;
235 static pstring keystr;
236 TDB_DATA key;
238 fstrcpy( share, sharename );
239 strlower_m( share );
241 pstr_sprintf( keystr, "%s%s", PRINTERS_PREFIX, share );
243 key.dptr = keystr;
244 key.dsize = strlen(keystr)+1;
246 return key;
249 /****************************************************************************
250 generate a new TDB_DATA key for storing a printer security descriptor
251 ****************************************************************************/
253 static char *make_printers_secdesc_tdbkey( const char* sharename )
255 fstring share;
256 static pstring keystr;
258 fstrcpy( share, sharename );
259 strlower_m( share );
261 pstr_sprintf( keystr, "%s%s", SECDESC_PREFIX, share );
263 return keystr;
266 /****************************************************************************
267 ****************************************************************************/
269 static BOOL upgrade_to_version_3(void)
271 TDB_DATA kbuf, newkey, dbuf;
273 DEBUG(0,("upgrade_to_version_3: upgrading print tdb's to version 3\n"));
275 for (kbuf = tdb_firstkey(tdb_drivers); kbuf.dptr;
276 newkey = tdb_nextkey(tdb_drivers, kbuf), safe_free(kbuf.dptr), kbuf=newkey) {
278 dbuf = tdb_fetch(tdb_drivers, kbuf);
280 if (strncmp(kbuf.dptr, FORMS_PREFIX, strlen(FORMS_PREFIX)) == 0) {
281 DEBUG(0,("upgrade_to_version_3:moving form\n"));
282 if (tdb_store(tdb_forms, kbuf, dbuf, TDB_REPLACE) != 0) {
283 SAFE_FREE(dbuf.dptr);
284 DEBUG(0,("upgrade_to_version_3: failed to move form. Error (%s).\n", tdb_errorstr(tdb_forms)));
285 return False;
287 if (tdb_delete(tdb_drivers, kbuf) != 0) {
288 SAFE_FREE(dbuf.dptr);
289 DEBUG(0,("upgrade_to_version_3: failed to delete form. Error (%s)\n", tdb_errorstr(tdb_drivers)));
290 return False;
294 if (strncmp(kbuf.dptr, PRINTERS_PREFIX, strlen(PRINTERS_PREFIX)) == 0) {
295 DEBUG(0,("upgrade_to_version_3:moving printer\n"));
296 if (tdb_store(tdb_printers, kbuf, dbuf, TDB_REPLACE) != 0) {
297 SAFE_FREE(dbuf.dptr);
298 DEBUG(0,("upgrade_to_version_3: failed to move printer. Error (%s)\n", tdb_errorstr(tdb_printers)));
299 return False;
301 if (tdb_delete(tdb_drivers, kbuf) != 0) {
302 SAFE_FREE(dbuf.dptr);
303 DEBUG(0,("upgrade_to_version_3: failed to delete printer. Error (%s)\n", tdb_errorstr(tdb_drivers)));
304 return False;
308 if (strncmp(kbuf.dptr, SECDESC_PREFIX, strlen(SECDESC_PREFIX)) == 0) {
309 DEBUG(0,("upgrade_to_version_3:moving secdesc\n"));
310 if (tdb_store(tdb_printers, kbuf, dbuf, TDB_REPLACE) != 0) {
311 SAFE_FREE(dbuf.dptr);
312 DEBUG(0,("upgrade_to_version_3: failed to move secdesc. Error (%s)\n", tdb_errorstr(tdb_printers)));
313 return False;
315 if (tdb_delete(tdb_drivers, kbuf) != 0) {
316 SAFE_FREE(dbuf.dptr);
317 DEBUG(0,("upgrade_to_version_3: failed to delete secdesc. Error (%s)\n", tdb_errorstr(tdb_drivers)));
318 return False;
322 SAFE_FREE(dbuf.dptr);
325 return True;
328 /*******************************************************************
329 Fix an issue with security descriptors. Printer sec_desc must
330 use more than the generic bits that were previously used
331 in <= 3.0.14a. They must also have a owner and group SID assigned.
332 Otherwise, any printers than have been migrated to a Windows
333 host using printmig.exe will not be accessible.
334 *******************************************************************/
336 static int sec_desc_upg_fn( TDB_CONTEXT *the_tdb, TDB_DATA key,
337 TDB_DATA data, void *state )
339 prs_struct ps;
340 SEC_DESC_BUF *sd_orig = NULL;
341 SEC_DESC_BUF *sd_new, *sd_store;
342 SEC_DESC *sec, *new_sec;
343 TALLOC_CTX *ctx = state;
344 int result, i;
345 uint32 sd_size;
346 size_t size_new_sec;
347 DOM_SID sid;
349 if (!data.dptr || data.dsize == 0) {
350 return 0;
353 if ( strncmp( key.dptr, SECDESC_PREFIX, strlen(SECDESC_PREFIX) ) != 0 ) {
354 return 0;
357 /* upgrade the security descriptor */
359 ZERO_STRUCT( ps );
361 prs_init( &ps, 0, ctx, UNMARSHALL );
362 prs_give_memory( &ps, data.dptr, data.dsize, False );
364 if ( !sec_io_desc_buf( "sec_desc_upg_fn", &sd_orig, &ps, 1 ) ) {
365 /* delete bad entries */
366 DEBUG(0,("sec_desc_upg_fn: Failed to parse original sec_desc for %si. Deleting....\n", key.dptr ));
367 tdb_delete( tdb_printers, key );
368 prs_mem_free( &ps );
369 return 0;
372 if (!sd_orig) {
373 prs_mem_free( &ps );
374 return 0;
376 sec = sd_orig->sec;
378 /* is this even valid? */
380 if ( !sec->dacl ) {
381 prs_mem_free( &ps );
382 return 0;
385 /* update access masks */
387 for ( i=0; i<sec->dacl->num_aces; i++ ) {
388 switch ( sec->dacl->ace[i].info.mask ) {
389 case (GENERIC_READ_ACCESS | GENERIC_WRITE_ACCESS | GENERIC_EXECUTE_ACCESS):
390 sec->dacl->ace[i].info.mask = PRINTER_ACE_PRINT;
391 break;
393 case GENERIC_ALL_ACCESS:
394 sec->dacl->ace[i].info.mask = PRINTER_ACE_FULL_CONTROL;
395 break;
397 case READ_CONTROL_ACCESS:
398 sec->dacl->ace[i].info.mask = PRINTER_ACE_MANAGE_DOCUMENTS;
400 default: /* no change */
401 break;
405 /* create a new SEC_DESC with the appropriate owner and group SIDs */
407 string_to_sid(&sid, "S-1-5-32-544" );
408 new_sec = make_sec_desc( ctx, SEC_DESC_REVISION, SEC_DESC_SELF_RELATIVE,
409 &sid, &sid,
410 NULL, NULL, &size_new_sec );
411 if (!new_sec) {
412 prs_mem_free( &ps );
413 return 0;
415 sd_new = make_sec_desc_buf( ctx, size_new_sec, new_sec );
416 if (!sd_new) {
417 prs_mem_free( &ps );
418 return 0;
421 if ( !(sd_store = sec_desc_merge( ctx, sd_new, sd_orig )) ) {
422 DEBUG(0,("sec_desc_upg_fn: Failed to update sec_desc for %s\n", key.dptr ));
423 prs_mem_free( &ps );
424 return 0;
427 prs_mem_free( &ps );
429 /* store it back */
431 sd_size = sec_desc_size(sd_store->sec) + sizeof(SEC_DESC_BUF);
432 prs_init(&ps, sd_size, ctx, MARSHALL);
434 if ( !sec_io_desc_buf( "sec_desc_upg_fn", &sd_store, &ps, 1 ) ) {
435 DEBUG(0,("sec_desc_upg_fn: Failed to parse new sec_desc for %s\n", key.dptr ));
436 prs_mem_free( &ps );
437 return 0;
440 data.dptr = prs_data_p( &ps );
441 data.dsize = sd_size;
443 result = tdb_store( tdb_printers, key, data, TDB_REPLACE );
445 prs_mem_free( &ps );
447 /* 0 to continue and non-zero to stop traversal */
449 return (result == -1);
452 /*******************************************************************
453 *******************************************************************/
455 static BOOL upgrade_to_version_4(void)
457 TALLOC_CTX *ctx;
458 int result;
460 DEBUG(0,("upgrade_to_version_4: upgrading printer security descriptors\n"));
462 if ( !(ctx = talloc_init( "upgrade_to_version_4" )) )
463 return False;
465 result = tdb_traverse( tdb_printers, sec_desc_upg_fn, ctx );
467 talloc_destroy( ctx );
469 return ( result != -1 );
472 /*******************************************************************
473 Fix an issue with security descriptors. Printer sec_desc must
474 use more than the generic bits that were previously used
475 in <= 3.0.14a. They must also have a owner and group SID assigned.
476 Otherwise, any printers than have been migrated to a Windows
477 host using printmig.exe will not be accessible.
478 *******************************************************************/
480 static int normalize_printers_fn( TDB_CONTEXT *the_tdb, TDB_DATA key,
481 TDB_DATA data, void *state )
483 TDB_DATA new_key;
485 if (!data.dptr || data.dsize == 0)
486 return 0;
488 /* upgrade printer records and security descriptors */
490 if ( strncmp( key.dptr, PRINTERS_PREFIX, strlen(PRINTERS_PREFIX) ) == 0 ) {
491 new_key = make_printer_tdbkey( key.dptr+strlen(PRINTERS_PREFIX) );
493 else if ( strncmp( key.dptr, SECDESC_PREFIX, strlen(SECDESC_PREFIX) ) == 0 ) {
494 new_key.dptr = make_printers_secdesc_tdbkey( key.dptr+strlen(SECDESC_PREFIX) );
495 new_key.dsize = strlen( new_key.dptr ) + 1;
497 else {
498 /* ignore this record */
499 return 0;
502 /* delete the original record and store under the normalized key */
504 if ( tdb_delete( the_tdb, key ) != 0 ) {
505 DEBUG(0,("normalize_printers_fn: tdb_delete for [%s] failed!\n",
506 key.dptr));
507 return 1;
510 if ( tdb_store( the_tdb, new_key, data, TDB_REPLACE) != 0 ) {
511 DEBUG(0,("normalize_printers_fn: failed to store new record for [%s]!\n",
512 key.dptr));
513 return 1;
516 return 0;
519 /*******************************************************************
520 *******************************************************************/
522 static BOOL upgrade_to_version_5(void)
524 TALLOC_CTX *ctx;
525 int result;
527 DEBUG(0,("upgrade_to_version_5: normalizing printer keys\n"));
529 if ( !(ctx = talloc_init( "upgrade_to_version_5" )) )
530 return False;
532 result = tdb_traverse( tdb_printers, normalize_printers_fn, NULL );
534 talloc_destroy( ctx );
536 return ( result != -1 );
539 /****************************************************************************
540 Open the NT printing tdbs. Done once before fork().
541 ****************************************************************************/
543 BOOL nt_printing_init(void)
545 const char *vstring = "INFO/version";
546 WERROR win_rc;
547 int32 vers_id;
549 if ( tdb_drivers && tdb_printers && tdb_forms )
550 return True;
552 if (tdb_drivers)
553 tdb_close(tdb_drivers);
554 tdb_drivers = tdb_open_log(lock_path("ntdrivers.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
555 if (!tdb_drivers) {
556 DEBUG(0,("nt_printing_init: Failed to open nt drivers database %s (%s)\n",
557 lock_path("ntdrivers.tdb"), strerror(errno) ));
558 return False;
561 if (tdb_printers)
562 tdb_close(tdb_printers);
563 tdb_printers = tdb_open_log(lock_path("ntprinters.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
564 if (!tdb_printers) {
565 DEBUG(0,("nt_printing_init: Failed to open nt printers database %s (%s)\n",
566 lock_path("ntprinters.tdb"), strerror(errno) ));
567 return False;
570 if (tdb_forms)
571 tdb_close(tdb_forms);
572 tdb_forms = tdb_open_log(lock_path("ntforms.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
573 if (!tdb_forms) {
574 DEBUG(0,("nt_printing_init: Failed to open nt forms database %s (%s)\n",
575 lock_path("ntforms.tdb"), strerror(errno) ));
576 return False;
579 /* handle a Samba upgrade */
581 vers_id = tdb_fetch_int32(tdb_drivers, vstring);
582 if (vers_id == -1) {
583 DEBUG(10, ("Fresh database\n"));
584 tdb_store_int32( tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_5 );
585 vers_id = NTDRIVERS_DATABASE_VERSION_5;
588 if ( vers_id != NTDRIVERS_DATABASE_VERSION_5 ) {
590 if ((vers_id == NTDRIVERS_DATABASE_VERSION_1) || (IREV(vers_id) == NTDRIVERS_DATABASE_VERSION_1)) {
591 if (!upgrade_to_version_3())
592 return False;
593 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_3);
594 vers_id = NTDRIVERS_DATABASE_VERSION_3;
597 if ((vers_id == NTDRIVERS_DATABASE_VERSION_2) || (IREV(vers_id) == NTDRIVERS_DATABASE_VERSION_2)) {
598 /* Written on a bigendian machine with old fetch_int code. Save as le. */
599 /* The only upgrade between V2 and V3 is to save the version in little-endian. */
600 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_3);
601 vers_id = NTDRIVERS_DATABASE_VERSION_3;
604 if (vers_id == NTDRIVERS_DATABASE_VERSION_3 ) {
605 if ( !upgrade_to_version_4() )
606 return False;
607 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_4);
608 vers_id = NTDRIVERS_DATABASE_VERSION_4;
611 if (vers_id == NTDRIVERS_DATABASE_VERSION_4 ) {
612 if ( !upgrade_to_version_5() )
613 return False;
614 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_5);
615 vers_id = NTDRIVERS_DATABASE_VERSION_5;
619 if ( vers_id != NTDRIVERS_DATABASE_VERSION_5 ) {
620 DEBUG(0,("nt_printing_init: Unknown printer database version [%d]\n", vers_id));
621 return False;
625 update_c_setprinter(True);
628 * register callback to handle updating printers as new
629 * drivers are installed
632 message_register( MSG_PRINTER_DRVUPGRADE, do_drv_upgrade_printer );
635 * register callback to handle updating printer data
636 * when a driver is initialized
639 message_register( MSG_PRINTERDATA_INIT_RESET, reset_all_printerdata );
641 /* of course, none of the message callbacks matter if you don't
642 tell messages.c that you interested in receiving PRINT_GENERAL
643 msgs. This is done in claim_connection() */
646 if ( lp_security() == SEC_ADS ) {
647 win_rc = check_published_printers();
648 if (!W_ERROR_IS_OK(win_rc))
649 DEBUG(0, ("nt_printing_init: error checking published printers: %s\n", dos_errstr(win_rc)));
652 return True;
655 /*******************************************************************
656 Function to allow filename parsing "the old way".
657 ********************************************************************/
659 static BOOL driver_unix_convert(char *name,connection_struct *conn,
660 char *saved_last_component, BOOL *bad_path, SMB_STRUCT_STAT *pst)
662 unix_format(name);
663 unix_clean_name(name);
664 trim_string(name,"/","/");
665 return unix_convert(name, conn, saved_last_component, bad_path, pst);
668 /*******************************************************************
669 tdb traversal function for counting printers.
670 ********************************************************************/
672 static int traverse_counting_printers(TDB_CONTEXT *t, TDB_DATA key,
673 TDB_DATA data, void *context)
675 int *printer_count = (int*)context;
677 if (memcmp(PRINTERS_PREFIX, key.dptr, sizeof(PRINTERS_PREFIX)-1) == 0) {
678 (*printer_count)++;
679 DEBUG(10,("traverse_counting_printers: printer = [%s] printer_count = %d\n", key.dptr, *printer_count));
682 return 0;
685 /*******************************************************************
686 Update the spooler global c_setprinter. This variable is initialized
687 when the parent smbd starts with the number of existing printers. It
688 is monotonically increased by the current number of printers *after*
689 each add or delete printer RPC. Only Microsoft knows why... JRR020119
690 ********************************************************************/
692 uint32 update_c_setprinter(BOOL initialize)
694 int32 c_setprinter;
695 int32 printer_count = 0;
697 tdb_lock_bystring(tdb_printers, GLOBAL_C_SETPRINTER);
699 /* Traverse the tdb, counting the printers */
700 tdb_traverse(tdb_printers, traverse_counting_printers, (void *)&printer_count);
702 /* If initializing, set c_setprinter to current printers count
703 * otherwise, bump it by the current printer count
705 if (!initialize)
706 c_setprinter = tdb_fetch_int32(tdb_printers, GLOBAL_C_SETPRINTER) + printer_count;
707 else
708 c_setprinter = printer_count;
710 DEBUG(10,("update_c_setprinter: c_setprinter = %u\n", (unsigned int)c_setprinter));
711 tdb_store_int32(tdb_printers, GLOBAL_C_SETPRINTER, c_setprinter);
713 tdb_unlock_bystring(tdb_printers, GLOBAL_C_SETPRINTER);
715 return (uint32)c_setprinter;
718 /*******************************************************************
719 Get the spooler global c_setprinter, accounting for initialization.
720 ********************************************************************/
722 uint32 get_c_setprinter(void)
724 int32 c_setprinter = tdb_fetch_int32(tdb_printers, GLOBAL_C_SETPRINTER);
726 if (c_setprinter == (int32)-1)
727 c_setprinter = update_c_setprinter(True);
729 DEBUG(10,("get_c_setprinter: c_setprinter = %d\n", c_setprinter));
731 return (uint32)c_setprinter;
734 /****************************************************************************
735 Get builtin form struct list.
736 ****************************************************************************/
738 int get_builtin_ntforms(nt_forms_struct **list)
740 *list = (nt_forms_struct *)memdup(&default_forms[0], sizeof(default_forms));
741 return sizeof(default_forms) / sizeof(default_forms[0]);
744 /****************************************************************************
745 get a builtin form struct
746 ****************************************************************************/
748 BOOL get_a_builtin_ntform(UNISTR2 *uni_formname,nt_forms_struct *form)
750 int i,count;
751 fstring form_name;
752 unistr2_to_ascii(form_name, uni_formname, sizeof(form_name)-1);
753 DEBUGADD(6,("Looking for builtin form %s \n", form_name));
754 count = sizeof(default_forms) / sizeof(default_forms[0]);
755 for (i=0;i<count;i++) {
756 if (strequal(form_name,default_forms[i].name)) {
757 DEBUGADD(6,("Found builtin form %s \n", form_name));
758 memcpy(form,&default_forms[i],sizeof(*form));
759 break;
763 return (i !=count);
766 /****************************************************************************
767 get a form struct list.
768 ****************************************************************************/
770 int get_ntforms(nt_forms_struct **list)
772 TDB_DATA kbuf, newkey, dbuf;
773 nt_forms_struct form;
774 int ret;
775 int i;
776 int n = 0;
778 *list = NULL;
780 for (kbuf = tdb_firstkey(tdb_forms);
781 kbuf.dptr;
782 newkey = tdb_nextkey(tdb_forms, kbuf), safe_free(kbuf.dptr), kbuf=newkey)
784 if (strncmp(kbuf.dptr, FORMS_PREFIX, strlen(FORMS_PREFIX)) != 0)
785 continue;
787 dbuf = tdb_fetch(tdb_forms, kbuf);
788 if (!dbuf.dptr)
789 continue;
791 fstrcpy(form.name, kbuf.dptr+strlen(FORMS_PREFIX));
792 ret = tdb_unpack(dbuf.dptr, dbuf.dsize, "dddddddd",
793 &i, &form.flag, &form.width, &form.length, &form.left,
794 &form.top, &form.right, &form.bottom);
795 SAFE_FREE(dbuf.dptr);
796 if (ret != dbuf.dsize)
797 continue;
799 *list = SMB_REALLOC_ARRAY(*list, nt_forms_struct, n+1);
800 if (!*list) {
801 DEBUG(0,("get_ntforms: Realloc fail.\n"));
802 return 0;
804 (*list)[n] = form;
805 n++;
809 return n;
812 /****************************************************************************
813 write a form struct list
814 ****************************************************************************/
815 int write_ntforms(nt_forms_struct **list, int number)
817 pstring buf, key;
818 int len;
819 TDB_DATA kbuf,dbuf;
820 int i;
822 for (i=0;i<number;i++) {
823 /* save index, so list is rebuilt in correct order */
824 len = tdb_pack(buf, sizeof(buf), "dddddddd",
825 i, (*list)[i].flag, (*list)[i].width, (*list)[i].length,
826 (*list)[i].left, (*list)[i].top, (*list)[i].right,
827 (*list)[i].bottom);
828 if (len > sizeof(buf)) break;
829 slprintf(key, sizeof(key)-1, "%s%s", FORMS_PREFIX, (*list)[i].name);
830 kbuf.dsize = strlen(key)+1;
831 kbuf.dptr = key;
832 dbuf.dsize = len;
833 dbuf.dptr = buf;
834 if (tdb_store(tdb_forms, kbuf, dbuf, TDB_REPLACE) != 0) break;
837 return i;
840 /****************************************************************************
841 add a form struct at the end of the list
842 ****************************************************************************/
843 BOOL add_a_form(nt_forms_struct **list, const FORM *form, int *count)
845 int n=0;
846 BOOL update;
847 fstring form_name;
850 * NT tries to add forms even when
851 * they are already in the base
852 * only update the values if already present
855 update=False;
857 unistr2_to_ascii(form_name, &form->name, sizeof(form_name)-1);
858 for (n=0; n<*count; n++) {
859 if ( strequal((*list)[n].name, form_name) ) {
860 update=True;
861 break;
865 if (update==False) {
866 if((*list=SMB_REALLOC_ARRAY(*list, nt_forms_struct, n+1)) == NULL) {
867 DEBUG(0,("add_a_form: failed to enlarge forms list!\n"));
868 return False;
870 unistr2_to_ascii((*list)[n].name, &form->name, sizeof((*list)[n].name)-1);
871 (*count)++;
874 (*list)[n].flag=form->flags;
875 (*list)[n].width=form->size_x;
876 (*list)[n].length=form->size_y;
877 (*list)[n].left=form->left;
878 (*list)[n].top=form->top;
879 (*list)[n].right=form->right;
880 (*list)[n].bottom=form->bottom;
882 DEBUG(6,("add_a_form: Successfully %s form [%s]\n",
883 update ? "updated" : "added", form_name));
885 return True;
888 /****************************************************************************
889 Delete a named form struct.
890 ****************************************************************************/
892 BOOL delete_a_form(nt_forms_struct **list, UNISTR2 *del_name, int *count, WERROR *ret)
894 pstring key;
895 TDB_DATA kbuf;
896 int n=0;
897 fstring form_name;
899 *ret = WERR_OK;
901 unistr2_to_ascii(form_name, del_name, sizeof(form_name)-1);
903 for (n=0; n<*count; n++) {
904 if (!strncmp((*list)[n].name, form_name, strlen(form_name))) {
905 DEBUG(103, ("delete_a_form, [%s] in list\n", form_name));
906 break;
910 if (n == *count) {
911 DEBUG(10,("delete_a_form, [%s] not found\n", form_name));
912 *ret = WERR_INVALID_PARAM;
913 return False;
916 slprintf(key, sizeof(key)-1, "%s%s", FORMS_PREFIX, (*list)[n].name);
917 kbuf.dsize = strlen(key)+1;
918 kbuf.dptr = key;
919 if (tdb_delete(tdb_forms, kbuf) != 0) {
920 *ret = WERR_NOMEM;
921 return False;
924 return True;
927 /****************************************************************************
928 Update a form struct.
929 ****************************************************************************/
931 void update_a_form(nt_forms_struct **list, const FORM *form, int count)
933 int n=0;
934 fstring form_name;
935 unistr2_to_ascii(form_name, &(form->name), sizeof(form_name)-1);
937 DEBUG(106, ("[%s]\n", form_name));
938 for (n=0; n<count; n++) {
939 DEBUGADD(106, ("n [%d]:[%s]\n", n, (*list)[n].name));
940 if (!strncmp((*list)[n].name, form_name, strlen(form_name)))
941 break;
944 if (n==count) return;
946 (*list)[n].flag=form->flags;
947 (*list)[n].width=form->size_x;
948 (*list)[n].length=form->size_y;
949 (*list)[n].left=form->left;
950 (*list)[n].top=form->top;
951 (*list)[n].right=form->right;
952 (*list)[n].bottom=form->bottom;
955 /****************************************************************************
956 Get the nt drivers list.
957 Traverse the database and look-up the matching names.
958 ****************************************************************************/
959 int get_ntdrivers(fstring **list, const char *architecture, uint32 version)
961 int total=0;
962 const char *short_archi;
963 pstring key;
964 TDB_DATA kbuf, newkey;
966 short_archi = get_short_archi(architecture);
967 if (!short_archi) {
968 return 0;
971 slprintf(key, sizeof(key)-1, "%s%s/%d/", DRIVERS_PREFIX, short_archi, version);
973 for (kbuf = tdb_firstkey(tdb_drivers);
974 kbuf.dptr;
975 newkey = tdb_nextkey(tdb_drivers, kbuf), safe_free(kbuf.dptr), kbuf=newkey) {
977 if (strncmp(kbuf.dptr, key, strlen(key)) != 0)
978 continue;
980 if((*list = SMB_REALLOC_ARRAY(*list, fstring, total+1)) == NULL) {
981 DEBUG(0,("get_ntdrivers: failed to enlarge list!\n"));
982 return -1;
985 fstrcpy((*list)[total], kbuf.dptr+strlen(key));
986 total++;
989 return(total);
992 /****************************************************************************
993 Function to do the mapping between the long architecture name and
994 the short one.
995 ****************************************************************************/
997 const char *get_short_archi(const char *long_archi)
999 int i=-1;
1001 DEBUG(107,("Getting architecture dependant directory\n"));
1002 do {
1003 i++;
1004 } while ( (archi_table[i].long_archi!=NULL ) &&
1005 StrCaseCmp(long_archi, archi_table[i].long_archi) );
1007 if (archi_table[i].long_archi==NULL) {
1008 DEBUGADD(10,("Unknown architecture [%s] !\n", long_archi));
1009 return NULL;
1012 /* this might be client code - but shouldn't this be an fstrcpy etc? */
1014 DEBUGADD(108,("index: [%d]\n", i));
1015 DEBUGADD(108,("long architecture: [%s]\n", archi_table[i].long_archi));
1016 DEBUGADD(108,("short architecture: [%s]\n", archi_table[i].short_archi));
1018 return archi_table[i].short_archi;
1021 /****************************************************************************
1022 Version information in Microsoft files is held in a VS_VERSION_INFO structure.
1023 There are two case to be covered here: PE (Portable Executable) and NE (New
1024 Executable) files. Both files support the same INFO structure, but PE files
1025 store the signature in unicode, and NE files store it as !unicode.
1026 returns -1 on error, 1 on version info found, and 0 on no version info found.
1027 ****************************************************************************/
1029 static int get_file_version(files_struct *fsp, char *fname,uint32 *major, uint32 *minor)
1031 int i;
1032 char *buf = NULL;
1033 ssize_t byte_count;
1035 if ((buf=SMB_MALLOC(PE_HEADER_SIZE)) == NULL) {
1036 DEBUG(0,("get_file_version: PE file [%s] PE Header malloc failed bytes = %d\n",
1037 fname, PE_HEADER_SIZE));
1038 goto error_exit;
1041 /* Note: DOS_HEADER_SIZE < malloc'ed PE_HEADER_SIZE */
1042 if ((byte_count = vfs_read_data(fsp, buf, DOS_HEADER_SIZE)) < DOS_HEADER_SIZE) {
1043 DEBUG(3,("get_file_version: File [%s] DOS header too short, bytes read = %lu\n",
1044 fname, (unsigned long)byte_count));
1045 goto no_version_info;
1048 /* Is this really a DOS header? */
1049 if (SVAL(buf,DOS_HEADER_MAGIC_OFFSET) != DOS_HEADER_MAGIC) {
1050 DEBUG(6,("get_file_version: File [%s] bad DOS magic = 0x%x\n",
1051 fname, SVAL(buf,DOS_HEADER_MAGIC_OFFSET)));
1052 goto no_version_info;
1055 /* Skip OEM header (if any) and the DOS stub to start of Windows header */
1056 if (SMB_VFS_LSEEK(fsp, fsp->fh->fd, SVAL(buf,DOS_HEADER_LFANEW_OFFSET), SEEK_SET) == (SMB_OFF_T)-1) {
1057 DEBUG(3,("get_file_version: File [%s] too short, errno = %d\n",
1058 fname, errno));
1059 /* Assume this isn't an error... the file just looks sort of like a PE/NE file */
1060 goto no_version_info;
1063 if ((byte_count = vfs_read_data(fsp, buf, PE_HEADER_SIZE)) < PE_HEADER_SIZE) {
1064 DEBUG(3,("get_file_version: File [%s] Windows header too short, bytes read = %lu\n",
1065 fname, (unsigned long)byte_count));
1066 /* Assume this isn't an error... the file just looks sort of like a PE/NE file */
1067 goto no_version_info;
1070 /* The header may be a PE (Portable Executable) or an NE (New Executable) */
1071 if (IVAL(buf,PE_HEADER_SIGNATURE_OFFSET) == PE_HEADER_SIGNATURE) {
1072 unsigned int num_sections;
1073 unsigned int section_table_bytes;
1075 if (SVAL(buf,PE_HEADER_MACHINE_OFFSET) != PE_HEADER_MACHINE_I386) {
1076 DEBUG(3,("get_file_version: PE file [%s] wrong machine = 0x%x\n",
1077 fname, SVAL(buf,PE_HEADER_MACHINE_OFFSET)));
1078 /* At this point, we assume the file is in error. It still could be somthing
1079 * else besides a PE file, but it unlikely at this point.
1081 goto error_exit;
1084 /* get the section table */
1085 num_sections = SVAL(buf,PE_HEADER_NUMBER_OF_SECTIONS);
1086 section_table_bytes = num_sections * PE_HEADER_SECT_HEADER_SIZE;
1087 if (section_table_bytes == 0)
1088 goto error_exit;
1090 SAFE_FREE(buf);
1091 if ((buf=SMB_MALLOC(section_table_bytes)) == NULL) {
1092 DEBUG(0,("get_file_version: PE file [%s] section table malloc failed bytes = %d\n",
1093 fname, section_table_bytes));
1094 goto error_exit;
1097 if ((byte_count = vfs_read_data(fsp, buf, section_table_bytes)) < section_table_bytes) {
1098 DEBUG(3,("get_file_version: PE file [%s] Section header too short, bytes read = %lu\n",
1099 fname, (unsigned long)byte_count));
1100 goto error_exit;
1103 /* Iterate the section table looking for the resource section ".rsrc" */
1104 for (i = 0; i < num_sections; i++) {
1105 int sec_offset = i * PE_HEADER_SECT_HEADER_SIZE;
1107 if (strcmp(".rsrc", &buf[sec_offset+PE_HEADER_SECT_NAME_OFFSET]) == 0) {
1108 unsigned int section_pos = IVAL(buf,sec_offset+PE_HEADER_SECT_PTR_DATA_OFFSET);
1109 unsigned int section_bytes = IVAL(buf,sec_offset+PE_HEADER_SECT_SIZE_DATA_OFFSET);
1111 if (section_bytes == 0)
1112 goto error_exit;
1114 SAFE_FREE(buf);
1115 if ((buf=SMB_MALLOC(section_bytes)) == NULL) {
1116 DEBUG(0,("get_file_version: PE file [%s] version malloc failed bytes = %d\n",
1117 fname, section_bytes));
1118 goto error_exit;
1121 /* Seek to the start of the .rsrc section info */
1122 if (SMB_VFS_LSEEK(fsp, fsp->fh->fd, section_pos, SEEK_SET) == (SMB_OFF_T)-1) {
1123 DEBUG(3,("get_file_version: PE file [%s] too short for section info, errno = %d\n",
1124 fname, errno));
1125 goto error_exit;
1128 if ((byte_count = vfs_read_data(fsp, buf, section_bytes)) < section_bytes) {
1129 DEBUG(3,("get_file_version: PE file [%s] .rsrc section too short, bytes read = %lu\n",
1130 fname, (unsigned long)byte_count));
1131 goto error_exit;
1134 if (section_bytes < VS_VERSION_INFO_UNICODE_SIZE)
1135 goto error_exit;
1137 for (i=0; i<section_bytes-VS_VERSION_INFO_UNICODE_SIZE; i++) {
1138 /* Scan for 1st 3 unicoded bytes followed by word aligned magic value */
1139 if (buf[i] == 'V' && buf[i+1] == '\0' && buf[i+2] == 'S') {
1140 /* Align to next long address */
1141 int pos = (i + sizeof(VS_SIGNATURE)*2 + 3) & 0xfffffffc;
1143 if (IVAL(buf,pos) == VS_MAGIC_VALUE) {
1144 *major = IVAL(buf,pos+VS_MAJOR_OFFSET);
1145 *minor = IVAL(buf,pos+VS_MINOR_OFFSET);
1147 DEBUG(6,("get_file_version: PE file [%s] Version = %08x:%08x (%d.%d.%d.%d)\n",
1148 fname, *major, *minor,
1149 (*major>>16)&0xffff, *major&0xffff,
1150 (*minor>>16)&0xffff, *minor&0xffff));
1151 SAFE_FREE(buf);
1152 return 1;
1159 /* Version info not found, fall back to origin date/time */
1160 DEBUG(10,("get_file_version: PE file [%s] has no version info\n", fname));
1161 SAFE_FREE(buf);
1162 return 0;
1164 } else if (SVAL(buf,NE_HEADER_SIGNATURE_OFFSET) == NE_HEADER_SIGNATURE) {
1165 if (CVAL(buf,NE_HEADER_TARGET_OS_OFFSET) != NE_HEADER_TARGOS_WIN ) {
1166 DEBUG(3,("get_file_version: NE file [%s] wrong target OS = 0x%x\n",
1167 fname, CVAL(buf,NE_HEADER_TARGET_OS_OFFSET)));
1168 /* At this point, we assume the file is in error. It still could be somthing
1169 * else besides a NE file, but it unlikely at this point. */
1170 goto error_exit;
1173 /* Allocate a bit more space to speed up things */
1174 SAFE_FREE(buf);
1175 if ((buf=SMB_MALLOC(VS_NE_BUF_SIZE)) == NULL) {
1176 DEBUG(0,("get_file_version: NE file [%s] malloc failed bytes = %d\n",
1177 fname, PE_HEADER_SIZE));
1178 goto error_exit;
1181 /* This is a HACK! I got tired of trying to sort through the messy
1182 * 'NE' file format. If anyone wants to clean this up please have at
1183 * it, but this works. 'NE' files will eventually fade away. JRR */
1184 while((byte_count = vfs_read_data(fsp, buf, VS_NE_BUF_SIZE)) > 0) {
1185 /* Cover case that should not occur in a well formed 'NE' .dll file */
1186 if (byte_count-VS_VERSION_INFO_SIZE <= 0) break;
1188 for(i=0; i<byte_count; i++) {
1189 /* Fast skip past data that can't possibly match */
1190 if (buf[i] != 'V') continue;
1192 /* Potential match data crosses buf boundry, move it to beginning
1193 * of buf, and fill the buf with as much as it will hold. */
1194 if (i>byte_count-VS_VERSION_INFO_SIZE) {
1195 int bc;
1197 memcpy(buf, &buf[i], byte_count-i);
1198 if ((bc = vfs_read_data(fsp, &buf[byte_count-i], VS_NE_BUF_SIZE-
1199 (byte_count-i))) < 0) {
1201 DEBUG(0,("get_file_version: NE file [%s] Read error, errno=%d\n",
1202 fname, errno));
1203 goto error_exit;
1206 byte_count = bc + (byte_count - i);
1207 if (byte_count<VS_VERSION_INFO_SIZE) break;
1209 i = 0;
1212 /* Check that the full signature string and the magic number that
1213 * follows exist (not a perfect solution, but the chances that this
1214 * occurs in code is, well, remote. Yes I know I'm comparing the 'V'
1215 * twice, as it is simpler to read the code. */
1216 if (strcmp(&buf[i], VS_SIGNATURE) == 0) {
1217 /* Compute skip alignment to next long address */
1218 int skip = -(SMB_VFS_LSEEK(fsp, fsp->fh->fd, 0, SEEK_CUR) - (byte_count - i) +
1219 sizeof(VS_SIGNATURE)) & 3;
1220 if (IVAL(buf,i+sizeof(VS_SIGNATURE)+skip) != 0xfeef04bd) continue;
1222 *major = IVAL(buf,i+sizeof(VS_SIGNATURE)+skip+VS_MAJOR_OFFSET);
1223 *minor = IVAL(buf,i+sizeof(VS_SIGNATURE)+skip+VS_MINOR_OFFSET);
1224 DEBUG(6,("get_file_version: NE file [%s] Version = %08x:%08x (%d.%d.%d.%d)\n",
1225 fname, *major, *minor,
1226 (*major>>16)&0xffff, *major&0xffff,
1227 (*minor>>16)&0xffff, *minor&0xffff));
1228 SAFE_FREE(buf);
1229 return 1;
1234 /* Version info not found, fall back to origin date/time */
1235 DEBUG(0,("get_file_version: NE file [%s] Version info not found\n", fname));
1236 SAFE_FREE(buf);
1237 return 0;
1239 } else
1240 /* Assume this isn't an error... the file just looks sort of like a PE/NE file */
1241 DEBUG(3,("get_file_version: File [%s] unknown file format, signature = 0x%x\n",
1242 fname, IVAL(buf,PE_HEADER_SIGNATURE_OFFSET)));
1244 no_version_info:
1245 SAFE_FREE(buf);
1246 return 0;
1248 error_exit:
1249 SAFE_FREE(buf);
1250 return -1;
1253 /****************************************************************************
1254 Drivers for Microsoft systems contain multiple files. Often, multiple drivers
1255 share one or more files. During the MS installation process files are checked
1256 to insure that only a newer version of a shared file is installed over an
1257 older version. There are several possibilities for this comparison. If there
1258 is no previous version, the new one is newer (obviously). If either file is
1259 missing the version info structure, compare the creation date (on Unix use
1260 the modification date). Otherwise chose the numerically larger version number.
1261 ****************************************************************************/
1263 static int file_version_is_newer(connection_struct *conn, fstring new_file, fstring old_file)
1265 BOOL use_version = True;
1266 pstring filepath;
1268 uint32 new_major;
1269 uint32 new_minor;
1270 time_t new_create_time;
1272 uint32 old_major;
1273 uint32 old_minor;
1274 time_t old_create_time;
1276 files_struct *fsp = NULL;
1277 SMB_STRUCT_STAT st;
1278 SMB_STRUCT_STAT stat_buf;
1279 BOOL bad_path;
1281 SET_STAT_INVALID(st);
1282 SET_STAT_INVALID(stat_buf);
1283 new_create_time = (time_t)0;
1284 old_create_time = (time_t)0;
1286 /* Get file version info (if available) for previous file (if it exists) */
1287 pstrcpy(filepath, old_file);
1289 driver_unix_convert(filepath,conn,NULL,&bad_path,&stat_buf);
1291 fsp = open_file_ntcreate(conn, filepath, &stat_buf,
1292 FILE_GENERIC_READ,
1293 FILE_SHARE_READ|FILE_SHARE_WRITE,
1294 FILE_OPEN,
1296 FILE_ATTRIBUTE_NORMAL,
1297 INTERNAL_OPEN_ONLY,
1298 NULL);
1300 if (!fsp) {
1301 /* Old file not found, so by definition new file is in fact newer */
1302 DEBUG(10,("file_version_is_newer: Can't open old file [%s], errno = %d\n",
1303 filepath, errno));
1304 return True;
1306 } else {
1307 int ret = get_file_version(fsp, old_file, &old_major, &old_minor);
1308 if (ret == -1) {
1309 goto error_exit;
1312 if (!ret) {
1313 DEBUG(6,("file_version_is_newer: Version info not found [%s], use mod time\n",
1314 old_file));
1315 use_version = False;
1316 if (SMB_VFS_FSTAT(fsp, fsp->fh->fd, &st) == -1) goto error_exit;
1317 old_create_time = st.st_mtime;
1318 DEBUGADD(6,("file_version_is_newer: mod time = %ld sec\n", old_create_time));
1321 close_file(fsp, NORMAL_CLOSE);
1323 /* Get file version info (if available) for new file */
1324 pstrcpy(filepath, new_file);
1325 driver_unix_convert(filepath,conn,NULL,&bad_path,&stat_buf);
1327 fsp = open_file_ntcreate(conn, filepath, &stat_buf,
1328 FILE_GENERIC_READ,
1329 FILE_SHARE_READ|FILE_SHARE_WRITE,
1330 FILE_OPEN,
1332 FILE_ATTRIBUTE_NORMAL,
1333 INTERNAL_OPEN_ONLY,
1334 NULL);
1336 if (!fsp) {
1337 /* New file not found, this shouldn't occur if the caller did its job */
1338 DEBUG(3,("file_version_is_newer: Can't open new file [%s], errno = %d\n",
1339 filepath, errno));
1340 goto error_exit;
1342 } else {
1343 int ret = get_file_version(fsp, new_file, &new_major, &new_minor);
1344 if (ret == -1) {
1345 goto error_exit;
1348 if (!ret) {
1349 DEBUG(6,("file_version_is_newer: Version info not found [%s], use mod time\n",
1350 new_file));
1351 use_version = False;
1352 if (SMB_VFS_FSTAT(fsp, fsp->fh->fd, &st) == -1) goto error_exit;
1353 new_create_time = st.st_mtime;
1354 DEBUGADD(6,("file_version_is_newer: mod time = %ld sec\n", new_create_time));
1357 close_file(fsp, NORMAL_CLOSE);
1359 if (use_version && (new_major != old_major || new_minor != old_minor)) {
1360 /* Compare versions and choose the larger version number */
1361 if (new_major > old_major ||
1362 (new_major == old_major && new_minor > old_minor)) {
1364 DEBUG(6,("file_version_is_newer: Replacing [%s] with [%s]\n", old_file, new_file));
1365 return True;
1367 else {
1368 DEBUG(6,("file_version_is_newer: Leaving [%s] unchanged\n", old_file));
1369 return False;
1372 } else {
1373 /* Compare modification time/dates and choose the newest time/date */
1374 if (new_create_time > old_create_time) {
1375 DEBUG(6,("file_version_is_newer: Replacing [%s] with [%s]\n", old_file, new_file));
1376 return True;
1378 else {
1379 DEBUG(6,("file_version_is_newer: Leaving [%s] unchanged\n", old_file));
1380 return False;
1384 error_exit:
1385 if(fsp)
1386 close_file(fsp, NORMAL_CLOSE);
1387 return -1;
1390 /****************************************************************************
1391 Determine the correct cVersion associated with an architecture and driver
1392 ****************************************************************************/
1393 static uint32 get_correct_cversion(const char *architecture, fstring driverpath_in,
1394 struct current_user *user, WERROR *perr)
1396 int cversion;
1397 NTSTATUS nt_status;
1398 pstring driverpath;
1399 DATA_BLOB null_pw;
1400 fstring res_type;
1401 files_struct *fsp = NULL;
1402 BOOL bad_path;
1403 SMB_STRUCT_STAT st;
1404 connection_struct *conn;
1406 SET_STAT_INVALID(st);
1408 *perr = WERR_INVALID_PARAM;
1410 /* If architecture is Windows 95/98/ME, the version is always 0. */
1411 if (strcmp(architecture, SPL_ARCH_WIN40) == 0) {
1412 DEBUG(10,("get_correct_cversion: Driver is Win9x, cversion = 0\n"));
1413 *perr = WERR_OK;
1414 return 0;
1417 /* If architecture is Windows x64, the version is always 3. */
1418 if (strcmp(architecture, SPL_ARCH_X64) == 0) {
1419 DEBUG(10,("get_correct_cversion: Driver is x64, cversion = 3\n"));
1420 *perr = WERR_OK;
1421 return 3;
1425 * Connect to the print$ share under the same account as the user connected
1426 * to the rpc pipe. Note we must still be root to do this.
1429 /* Null password is ok - we are already an authenticated user... */
1430 null_pw = data_blob(NULL, 0);
1431 fstrcpy(res_type, "A:");
1432 become_root();
1433 conn = make_connection_with_chdir("print$", null_pw, res_type, user->vuid, &nt_status);
1434 unbecome_root();
1436 if (conn == NULL) {
1437 DEBUG(0,("get_correct_cversion: Unable to connect\n"));
1438 *perr = ntstatus_to_werror(nt_status);
1439 return -1;
1442 /* We are temporarily becoming the connection user. */
1443 if (!become_user(conn, user->vuid)) {
1444 DEBUG(0,("get_correct_cversion: Can't become user!\n"));
1445 *perr = WERR_ACCESS_DENIED;
1446 return -1;
1449 /* Open the driver file (Portable Executable format) and determine the
1450 * deriver the cversion. */
1451 slprintf(driverpath, sizeof(driverpath)-1, "%s/%s", architecture, driverpath_in);
1453 driver_unix_convert(driverpath,conn,NULL,&bad_path,&st);
1455 if ( !vfs_file_exist( conn, driverpath, &st ) ) {
1456 *perr = WERR_BADFILE;
1457 goto error_exit;
1460 fsp = open_file_ntcreate(conn, driverpath, &st,
1461 FILE_GENERIC_READ,
1462 FILE_SHARE_READ|FILE_SHARE_WRITE,
1463 FILE_OPEN,
1465 FILE_ATTRIBUTE_NORMAL,
1466 INTERNAL_OPEN_ONLY,
1467 NULL);
1469 if (!fsp) {
1470 DEBUG(3,("get_correct_cversion: Can't open file [%s], errno = %d\n",
1471 driverpath, errno));
1472 *perr = WERR_ACCESS_DENIED;
1473 goto error_exit;
1474 } else {
1475 uint32 major;
1476 uint32 minor;
1477 int ret = get_file_version(fsp, driverpath, &major, &minor);
1478 if (ret == -1) goto error_exit;
1480 if (!ret) {
1481 DEBUG(6,("get_correct_cversion: Version info not found [%s]\n", driverpath));
1482 goto error_exit;
1486 * This is a Microsoft'ism. See references in MSDN to VER_FILEVERSION
1487 * for more details. Version in this case is not just the version of the
1488 * file, but the version in the sense of kernal mode (2) vs. user mode
1489 * (3) drivers. Other bits of the version fields are the version info.
1490 * JRR 010716
1492 cversion = major & 0x0000ffff;
1493 switch (cversion) {
1494 case 2: /* WinNT drivers */
1495 case 3: /* Win2K drivers */
1496 break;
1498 default:
1499 DEBUG(6,("get_correct_cversion: cversion invalid [%s] cversion = %d\n",
1500 driverpath, cversion));
1501 goto error_exit;
1504 DEBUG(10,("get_correct_cversion: Version info found [%s] major = 0x%x minor = 0x%x\n",
1505 driverpath, major, minor));
1508 DEBUG(10,("get_correct_cversion: Driver file [%s] cversion = %d\n",
1509 driverpath, cversion));
1511 close_file(fsp, NORMAL_CLOSE);
1512 close_cnum(conn, user->vuid);
1513 unbecome_user();
1514 *perr = WERR_OK;
1515 return cversion;
1518 error_exit:
1520 if(fsp)
1521 close_file(fsp, NORMAL_CLOSE);
1523 close_cnum(conn, user->vuid);
1524 unbecome_user();
1525 return -1;
1528 /****************************************************************************
1529 ****************************************************************************/
1530 static WERROR clean_up_driver_struct_level_3(NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver,
1531 struct current_user *user)
1533 const char *architecture;
1534 fstring new_name;
1535 char *p;
1536 int i;
1537 WERROR err;
1539 /* clean up the driver name.
1540 * we can get .\driver.dll
1541 * or worse c:\windows\system\driver.dll !
1543 /* using an intermediate string to not have overlaping memcpy()'s */
1544 if ((p = strrchr(driver->driverpath,'\\')) != NULL) {
1545 fstrcpy(new_name, p+1);
1546 fstrcpy(driver->driverpath, new_name);
1549 if ((p = strrchr(driver->datafile,'\\')) != NULL) {
1550 fstrcpy(new_name, p+1);
1551 fstrcpy(driver->datafile, new_name);
1554 if ((p = strrchr(driver->configfile,'\\')) != NULL) {
1555 fstrcpy(new_name, p+1);
1556 fstrcpy(driver->configfile, new_name);
1559 if ((p = strrchr(driver->helpfile,'\\')) != NULL) {
1560 fstrcpy(new_name, p+1);
1561 fstrcpy(driver->helpfile, new_name);
1564 if (driver->dependentfiles) {
1565 for (i=0; *driver->dependentfiles[i]; i++) {
1566 if ((p = strrchr(driver->dependentfiles[i],'\\')) != NULL) {
1567 fstrcpy(new_name, p+1);
1568 fstrcpy(driver->dependentfiles[i], new_name);
1573 architecture = get_short_archi(driver->environment);
1574 if (!architecture) {
1575 return WERR_UNKNOWN_PRINTER_DRIVER;
1578 /* jfm:7/16/2000 the client always sends the cversion=0.
1579 * The server should check which version the driver is by reading
1580 * the PE header of driver->driverpath.
1582 * For Windows 95/98 the version is 0 (so the value sent is correct)
1583 * For Windows NT (the architecture doesn't matter)
1584 * NT 3.1: cversion=0
1585 * NT 3.5/3.51: cversion=1
1586 * NT 4: cversion=2
1587 * NT2K: cversion=3
1589 if ((driver->cversion = get_correct_cversion( architecture, driver->driverpath, user, &err)) == -1)
1590 return err;
1592 return WERR_OK;
1595 /****************************************************************************
1596 ****************************************************************************/
1597 static WERROR clean_up_driver_struct_level_6(NT_PRINTER_DRIVER_INFO_LEVEL_6 *driver, struct current_user *user)
1599 const char *architecture;
1600 fstring new_name;
1601 char *p;
1602 int i;
1603 WERROR err;
1605 /* clean up the driver name.
1606 * we can get .\driver.dll
1607 * or worse c:\windows\system\driver.dll !
1609 /* using an intermediate string to not have overlaping memcpy()'s */
1610 if ((p = strrchr(driver->driverpath,'\\')) != NULL) {
1611 fstrcpy(new_name, p+1);
1612 fstrcpy(driver->driverpath, new_name);
1615 if ((p = strrchr(driver->datafile,'\\')) != NULL) {
1616 fstrcpy(new_name, p+1);
1617 fstrcpy(driver->datafile, new_name);
1620 if ((p = strrchr(driver->configfile,'\\')) != NULL) {
1621 fstrcpy(new_name, p+1);
1622 fstrcpy(driver->configfile, new_name);
1625 if ((p = strrchr(driver->helpfile,'\\')) != NULL) {
1626 fstrcpy(new_name, p+1);
1627 fstrcpy(driver->helpfile, new_name);
1630 if (driver->dependentfiles) {
1631 for (i=0; *driver->dependentfiles[i]; i++) {
1632 if ((p = strrchr(driver->dependentfiles[i],'\\')) != NULL) {
1633 fstrcpy(new_name, p+1);
1634 fstrcpy(driver->dependentfiles[i], new_name);
1639 architecture = get_short_archi(driver->environment);
1640 if (!architecture) {
1641 return WERR_UNKNOWN_PRINTER_DRIVER;
1644 /* jfm:7/16/2000 the client always sends the cversion=0.
1645 * The server should check which version the driver is by reading
1646 * the PE header of driver->driverpath.
1648 * For Windows 95/98 the version is 0 (so the value sent is correct)
1649 * For Windows NT (the architecture doesn't matter)
1650 * NT 3.1: cversion=0
1651 * NT 3.5/3.51: cversion=1
1652 * NT 4: cversion=2
1653 * NT2K: cversion=3
1656 if ((driver->version = get_correct_cversion(architecture, driver->driverpath, user, &err)) == -1)
1657 return err;
1659 return WERR_OK;
1662 /****************************************************************************
1663 ****************************************************************************/
1664 WERROR clean_up_driver_struct(NT_PRINTER_DRIVER_INFO_LEVEL driver_abstract,
1665 uint32 level, struct current_user *user)
1667 switch (level) {
1668 case 3:
1670 NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver;
1671 driver=driver_abstract.info_3;
1672 return clean_up_driver_struct_level_3(driver, user);
1674 case 6:
1676 NT_PRINTER_DRIVER_INFO_LEVEL_6 *driver;
1677 driver=driver_abstract.info_6;
1678 return clean_up_driver_struct_level_6(driver, user);
1680 default:
1681 return WERR_INVALID_PARAM;
1685 /****************************************************************************
1686 This function sucks and should be replaced. JRA.
1687 ****************************************************************************/
1689 static void convert_level_6_to_level3(NT_PRINTER_DRIVER_INFO_LEVEL_3 *dst, NT_PRINTER_DRIVER_INFO_LEVEL_6 *src)
1691 dst->cversion = src->version;
1693 fstrcpy( dst->name, src->name);
1694 fstrcpy( dst->environment, src->environment);
1695 fstrcpy( dst->driverpath, src->driverpath);
1696 fstrcpy( dst->datafile, src->datafile);
1697 fstrcpy( dst->configfile, src->configfile);
1698 fstrcpy( dst->helpfile, src->helpfile);
1699 fstrcpy( dst->monitorname, src->monitorname);
1700 fstrcpy( dst->defaultdatatype, src->defaultdatatype);
1701 dst->dependentfiles = src->dependentfiles;
1704 #if 0 /* Debugging function */
1706 static char* ffmt(unsigned char *c){
1707 int i;
1708 static char ffmt_str[17];
1710 for (i=0; i<16; i++) {
1711 if ((c[i] < ' ') || (c[i] > '~'))
1712 ffmt_str[i]='.';
1713 else
1714 ffmt_str[i]=c[i];
1716 ffmt_str[16]='\0';
1717 return ffmt_str;
1720 #endif
1722 /****************************************************************************
1723 ****************************************************************************/
1724 WERROR move_driver_to_download_area(NT_PRINTER_DRIVER_INFO_LEVEL driver_abstract, uint32 level,
1725 struct current_user *user, WERROR *perr)
1727 NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver;
1728 NT_PRINTER_DRIVER_INFO_LEVEL_3 converted_driver;
1729 const char *architecture;
1730 pstring new_dir;
1731 pstring old_name;
1732 pstring new_name;
1733 DATA_BLOB null_pw;
1734 connection_struct *conn;
1735 NTSTATUS nt_status;
1736 pstring inbuf;
1737 pstring outbuf;
1738 fstring res_type;
1739 BOOL bad_path;
1740 SMB_STRUCT_STAT st;
1741 int ver = 0;
1742 int i;
1743 int err;
1745 memset(inbuf, '\0', sizeof(inbuf));
1746 memset(outbuf, '\0', sizeof(outbuf));
1747 *perr = WERR_OK;
1749 if (level==3)
1750 driver=driver_abstract.info_3;
1751 else if (level==6) {
1752 convert_level_6_to_level3(&converted_driver, driver_abstract.info_6);
1753 driver = &converted_driver;
1754 } else {
1755 DEBUG(0,("move_driver_to_download_area: Unknown info level (%u)\n", (unsigned int)level ));
1756 return WERR_UNKNOWN_LEVEL;
1759 architecture = get_short_archi(driver->environment);
1760 if (!architecture) {
1761 return WERR_UNKNOWN_PRINTER_DRIVER;
1765 * Connect to the print$ share under the same account as the user connected to the rpc pipe.
1766 * Note we must be root to do this.
1769 null_pw = data_blob(NULL, 0);
1770 fstrcpy(res_type, "A:");
1771 become_root();
1772 conn = make_connection_with_chdir("print$", null_pw, res_type, user->vuid, &nt_status);
1773 unbecome_root();
1775 if (conn == NULL) {
1776 DEBUG(0,("move_driver_to_download_area: Unable to connect\n"));
1777 *perr = ntstatus_to_werror(nt_status);
1778 return WERR_NO_SUCH_SHARE;
1782 * Save who we are - we are temporarily becoming the connection user.
1785 if (!become_user(conn, conn->vuid)) {
1786 DEBUG(0,("move_driver_to_download_area: Can't become user!\n"));
1787 return WERR_ACCESS_DENIED;
1791 * make the directories version and version\driver_name
1792 * under the architecture directory.
1794 DEBUG(5,("Creating first directory\n"));
1795 slprintf(new_dir, sizeof(new_dir)-1, "%s/%d", architecture, driver->cversion);
1796 driver_unix_convert(new_dir, conn, NULL, &bad_path, &st);
1797 mkdir_internal(conn, new_dir, bad_path);
1799 /* For each driver file, archi\filexxx.yyy, if there is a duplicate file
1800 * listed for this driver which has already been moved, skip it (note:
1801 * drivers may list the same file name several times. Then check if the
1802 * file already exists in archi\cversion\, if so, check that the version
1803 * info (or time stamps if version info is unavailable) is newer (or the
1804 * date is later). If it is, move it to archi\cversion\filexxx.yyy.
1805 * Otherwise, delete the file.
1807 * If a file is not moved to archi\cversion\ because of an error, all the
1808 * rest of the 'unmoved' driver files are removed from archi\. If one or
1809 * more of the driver's files was already moved to archi\cversion\, it
1810 * potentially leaves the driver in a partially updated state. Version
1811 * trauma will most likely occur if an client attempts to use any printer
1812 * bound to the driver. Perhaps a rewrite to make sure the moves can be
1813 * done is appropriate... later JRR
1816 DEBUG(5,("Moving files now !\n"));
1818 if (driver->driverpath && strlen(driver->driverpath)) {
1819 slprintf(new_name, sizeof(new_name)-1, "%s/%s", architecture, driver->driverpath);
1820 slprintf(old_name, sizeof(old_name)-1, "%s/%s", new_dir, driver->driverpath);
1821 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
1822 driver_unix_convert(new_name, conn, NULL, &bad_path, &st);
1823 if ( !copy_file(new_name, old_name, conn, OPENX_FILE_EXISTS_TRUNCATE|
1824 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False, &err) ) {
1825 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
1826 new_name, old_name));
1827 *perr = WERR_ACCESS_DENIED;
1828 ver = -1;
1833 if (driver->datafile && strlen(driver->datafile)) {
1834 if (!strequal(driver->datafile, driver->driverpath)) {
1835 slprintf(new_name, sizeof(new_name)-1, "%s/%s", architecture, driver->datafile);
1836 slprintf(old_name, sizeof(old_name)-1, "%s/%s", new_dir, driver->datafile);
1837 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
1838 driver_unix_convert(new_name, conn, NULL, &bad_path, &st);
1839 if ( !copy_file(new_name, old_name, conn, OPENX_FILE_EXISTS_TRUNCATE|
1840 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False, &err) ) {
1841 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
1842 new_name, old_name));
1843 *perr = WERR_ACCESS_DENIED;
1844 ver = -1;
1850 if (driver->configfile && strlen(driver->configfile)) {
1851 if (!strequal(driver->configfile, driver->driverpath) &&
1852 !strequal(driver->configfile, driver->datafile)) {
1853 slprintf(new_name, sizeof(new_name)-1, "%s/%s", architecture, driver->configfile);
1854 slprintf(old_name, sizeof(old_name)-1, "%s/%s", new_dir, driver->configfile);
1855 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
1856 driver_unix_convert(new_name, conn, NULL, &bad_path, &st);
1857 if ( !copy_file(new_name, old_name, conn, OPENX_FILE_EXISTS_TRUNCATE|
1858 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False, &err) ) {
1859 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
1860 new_name, old_name));
1861 *perr = WERR_ACCESS_DENIED;
1862 ver = -1;
1868 if (driver->helpfile && strlen(driver->helpfile)) {
1869 if (!strequal(driver->helpfile, driver->driverpath) &&
1870 !strequal(driver->helpfile, driver->datafile) &&
1871 !strequal(driver->helpfile, driver->configfile)) {
1872 slprintf(new_name, sizeof(new_name)-1, "%s/%s", architecture, driver->helpfile);
1873 slprintf(old_name, sizeof(old_name)-1, "%s/%s", new_dir, driver->helpfile);
1874 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
1875 driver_unix_convert(new_name, conn, NULL, &bad_path, &st);
1876 if ( !copy_file(new_name, old_name, conn, OPENX_FILE_EXISTS_TRUNCATE|
1877 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False, &err) ) {
1878 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
1879 new_name, old_name));
1880 *perr = WERR_ACCESS_DENIED;
1881 ver = -1;
1887 if (driver->dependentfiles) {
1888 for (i=0; *driver->dependentfiles[i]; i++) {
1889 if (!strequal(driver->dependentfiles[i], driver->driverpath) &&
1890 !strequal(driver->dependentfiles[i], driver->datafile) &&
1891 !strequal(driver->dependentfiles[i], driver->configfile) &&
1892 !strequal(driver->dependentfiles[i], driver->helpfile)) {
1893 int j;
1894 for (j=0; j < i; j++) {
1895 if (strequal(driver->dependentfiles[i], driver->dependentfiles[j])) {
1896 goto NextDriver;
1900 slprintf(new_name, sizeof(new_name)-1, "%s/%s", architecture, driver->dependentfiles[i]);
1901 slprintf(old_name, sizeof(old_name)-1, "%s/%s", new_dir, driver->dependentfiles[i]);
1902 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
1903 driver_unix_convert(new_name, conn, NULL, &bad_path, &st);
1904 if ( !copy_file(new_name, old_name, conn,
1905 OPENX_FILE_EXISTS_TRUNCATE|
1906 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False, &err) ) {
1907 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
1908 new_name, old_name));
1909 *perr = WERR_ACCESS_DENIED;
1910 ver = -1;
1914 NextDriver: ;
1918 close_cnum(conn, user->vuid);
1919 unbecome_user();
1921 return ver != -1 ? WERR_OK : WERR_UNKNOWN_PRINTER_DRIVER;
1924 /****************************************************************************
1925 ****************************************************************************/
1926 static uint32 add_a_printer_driver_3(NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver)
1928 int len, buflen;
1929 const char *architecture;
1930 pstring directory;
1931 fstring temp_name;
1932 pstring key;
1933 char *buf;
1934 int i, ret;
1935 TDB_DATA kbuf, dbuf;
1937 architecture = get_short_archi(driver->environment);
1938 if (!architecture) {
1939 return (uint32)-1;
1942 /* The names are relative. We store them in the form: \print$\arch\version\driver.xxx
1943 * \\server is added in the rpc server layer.
1944 * It does make sense to NOT store the server's name in the printer TDB.
1947 slprintf(directory, sizeof(directory)-1, "\\print$\\%s\\%d\\", architecture, driver->cversion);
1949 /* .inf files do not always list a file for each of the four standard files.
1950 * Don't prepend a path to a null filename, or client claims:
1951 * "The server on which the printer resides does not have a suitable
1952 * <printer driver name> printer driver installed. Click OK if you
1953 * wish to install the driver on your local machine."
1955 if (strlen(driver->driverpath)) {
1956 fstrcpy(temp_name, driver->driverpath);
1957 slprintf(driver->driverpath, sizeof(driver->driverpath)-1, "%s%s", directory, temp_name);
1960 if (strlen(driver->datafile)) {
1961 fstrcpy(temp_name, driver->datafile);
1962 slprintf(driver->datafile, sizeof(driver->datafile)-1, "%s%s", directory, temp_name);
1965 if (strlen(driver->configfile)) {
1966 fstrcpy(temp_name, driver->configfile);
1967 slprintf(driver->configfile, sizeof(driver->configfile)-1, "%s%s", directory, temp_name);
1970 if (strlen(driver->helpfile)) {
1971 fstrcpy(temp_name, driver->helpfile);
1972 slprintf(driver->helpfile, sizeof(driver->helpfile)-1, "%s%s", directory, temp_name);
1975 if (driver->dependentfiles) {
1976 for (i=0; *driver->dependentfiles[i]; i++) {
1977 fstrcpy(temp_name, driver->dependentfiles[i]);
1978 slprintf(driver->dependentfiles[i], sizeof(driver->dependentfiles[i])-1, "%s%s", directory, temp_name);
1982 slprintf(key, sizeof(key)-1, "%s%s/%d/%s", DRIVERS_PREFIX, architecture, driver->cversion, driver->name);
1984 DEBUG(5,("add_a_printer_driver_3: Adding driver with key %s\n", key ));
1986 buf = NULL;
1987 len = buflen = 0;
1989 again:
1990 len = 0;
1991 len += tdb_pack(buf+len, buflen-len, "dffffffff",
1992 driver->cversion,
1993 driver->name,
1994 driver->environment,
1995 driver->driverpath,
1996 driver->datafile,
1997 driver->configfile,
1998 driver->helpfile,
1999 driver->monitorname,
2000 driver->defaultdatatype);
2002 if (driver->dependentfiles) {
2003 for (i=0; *driver->dependentfiles[i]; i++) {
2004 len += tdb_pack(buf+len, buflen-len, "f",
2005 driver->dependentfiles[i]);
2009 if (len != buflen) {
2010 buf = (char *)SMB_REALLOC(buf, len);
2011 if (!buf) {
2012 DEBUG(0,("add_a_printer_driver_3: failed to enlarge buffer\n!"));
2013 ret = -1;
2014 goto done;
2016 buflen = len;
2017 goto again;
2021 kbuf.dptr = key;
2022 kbuf.dsize = strlen(key)+1;
2023 dbuf.dptr = buf;
2024 dbuf.dsize = len;
2026 ret = tdb_store(tdb_drivers, kbuf, dbuf, TDB_REPLACE);
2028 done:
2029 if (ret)
2030 DEBUG(0,("add_a_printer_driver_3: Adding driver with key %s failed.\n", key ));
2032 SAFE_FREE(buf);
2033 return ret;
2036 /****************************************************************************
2037 ****************************************************************************/
2038 static uint32 add_a_printer_driver_6(NT_PRINTER_DRIVER_INFO_LEVEL_6 *driver)
2040 NT_PRINTER_DRIVER_INFO_LEVEL_3 info3;
2042 ZERO_STRUCT(info3);
2043 info3.cversion = driver->version;
2044 fstrcpy(info3.name,driver->name);
2045 fstrcpy(info3.environment,driver->environment);
2046 fstrcpy(info3.driverpath,driver->driverpath);
2047 fstrcpy(info3.datafile,driver->datafile);
2048 fstrcpy(info3.configfile,driver->configfile);
2049 fstrcpy(info3.helpfile,driver->helpfile);
2050 fstrcpy(info3.monitorname,driver->monitorname);
2051 fstrcpy(info3.defaultdatatype,driver->defaultdatatype);
2052 info3.dependentfiles = driver->dependentfiles;
2054 return add_a_printer_driver_3(&info3);
2058 /****************************************************************************
2059 ****************************************************************************/
2060 static WERROR get_a_printer_driver_3_default(NT_PRINTER_DRIVER_INFO_LEVEL_3 **info_ptr, const char *driver, const char *arch)
2062 NT_PRINTER_DRIVER_INFO_LEVEL_3 info;
2064 ZERO_STRUCT(info);
2066 fstrcpy(info.name, driver);
2067 fstrcpy(info.defaultdatatype, "RAW");
2069 fstrcpy(info.driverpath, "");
2070 fstrcpy(info.datafile, "");
2071 fstrcpy(info.configfile, "");
2072 fstrcpy(info.helpfile, "");
2074 if ((info.dependentfiles= SMB_MALLOC_ARRAY(fstring, 2)) == NULL)
2075 return WERR_NOMEM;
2077 memset(info.dependentfiles, '\0', 2*sizeof(fstring));
2078 fstrcpy(info.dependentfiles[0], "");
2080 *info_ptr = memdup(&info, sizeof(info));
2082 return WERR_OK;
2085 /****************************************************************************
2086 ****************************************************************************/
2087 static WERROR get_a_printer_driver_3(NT_PRINTER_DRIVER_INFO_LEVEL_3 **info_ptr, fstring drivername, const char *arch, uint32 version)
2089 NT_PRINTER_DRIVER_INFO_LEVEL_3 driver;
2090 TDB_DATA kbuf, dbuf;
2091 const char *architecture;
2092 int len = 0;
2093 int i;
2094 pstring key;
2096 ZERO_STRUCT(driver);
2098 architecture = get_short_archi(arch);
2099 if ( !architecture ) {
2100 return WERR_UNKNOWN_PRINTER_DRIVER;
2103 /* Windows 4.0 (i.e. win9x) should always use a version of 0 */
2105 if ( strcmp( architecture, SPL_ARCH_WIN40 ) == 0 )
2106 version = 0;
2108 DEBUG(8,("get_a_printer_driver_3: [%s%s/%d/%s]\n", DRIVERS_PREFIX, architecture, version, drivername));
2110 slprintf(key, sizeof(key)-1, "%s%s/%d/%s", DRIVERS_PREFIX, architecture, version, drivername);
2112 kbuf.dptr = key;
2113 kbuf.dsize = strlen(key)+1;
2115 dbuf = tdb_fetch(tdb_drivers, kbuf);
2116 if (!dbuf.dptr)
2117 return WERR_UNKNOWN_PRINTER_DRIVER;
2119 len += tdb_unpack(dbuf.dptr, dbuf.dsize, "dffffffff",
2120 &driver.cversion,
2121 driver.name,
2122 driver.environment,
2123 driver.driverpath,
2124 driver.datafile,
2125 driver.configfile,
2126 driver.helpfile,
2127 driver.monitorname,
2128 driver.defaultdatatype);
2130 i=0;
2131 while (len < dbuf.dsize) {
2132 driver.dependentfiles = SMB_REALLOC_ARRAY(driver.dependentfiles, fstring, i+2);
2133 if ( !driver.dependentfiles ) {
2134 DEBUG(0,("get_a_printer_driver_3: failed to enlarge buffer!\n"));
2135 break;
2138 len += tdb_unpack(dbuf.dptr+len, dbuf.dsize-len, "f",
2139 &driver.dependentfiles[i]);
2140 i++;
2143 if ( driver.dependentfiles )
2144 fstrcpy( driver.dependentfiles[i], "" );
2146 SAFE_FREE(dbuf.dptr);
2148 if (len != dbuf.dsize) {
2149 SAFE_FREE(driver.dependentfiles);
2151 return get_a_printer_driver_3_default(info_ptr, drivername, arch);
2154 *info_ptr = (NT_PRINTER_DRIVER_INFO_LEVEL_3 *)memdup(&driver, sizeof(driver));
2156 return WERR_OK;
2159 /****************************************************************************
2160 Debugging function, dump at level 6 the struct in the logs.
2161 ****************************************************************************/
2163 static uint32 dump_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL driver, uint32 level)
2165 uint32 result;
2166 NT_PRINTER_DRIVER_INFO_LEVEL_3 *info3;
2167 int i;
2169 DEBUG(20,("Dumping printer driver at level [%d]\n", level));
2171 switch (level)
2173 case 3:
2175 if (driver.info_3 == NULL)
2176 result=5;
2177 else {
2178 info3=driver.info_3;
2180 DEBUGADD(20,("version:[%d]\n", info3->cversion));
2181 DEBUGADD(20,("name:[%s]\n", info3->name));
2182 DEBUGADD(20,("environment:[%s]\n", info3->environment));
2183 DEBUGADD(20,("driverpath:[%s]\n", info3->driverpath));
2184 DEBUGADD(20,("datafile:[%s]\n", info3->datafile));
2185 DEBUGADD(20,("configfile:[%s]\n", info3->configfile));
2186 DEBUGADD(20,("helpfile:[%s]\n", info3->helpfile));
2187 DEBUGADD(20,("monitorname:[%s]\n", info3->monitorname));
2188 DEBUGADD(20,("defaultdatatype:[%s]\n", info3->defaultdatatype));
2190 for (i=0; info3->dependentfiles &&
2191 *info3->dependentfiles[i]; i++) {
2192 DEBUGADD(20,("dependentfile:[%s]\n",
2193 info3->dependentfiles[i]));
2195 result=0;
2197 break;
2199 default:
2200 DEBUGADD(20,("dump_a_printer_driver: Level %u not implemented\n", (unsigned int)level));
2201 result=1;
2202 break;
2205 return result;
2208 /****************************************************************************
2209 ****************************************************************************/
2210 int pack_devicemode(NT_DEVICEMODE *nt_devmode, char *buf, int buflen)
2212 int len = 0;
2214 len += tdb_pack(buf+len, buflen-len, "p", nt_devmode);
2216 if (!nt_devmode)
2217 return len;
2219 len += tdb_pack(buf+len, buflen-len, "ffwwwwwwwwwwwwwwwwwwddddddddddddddp",
2220 nt_devmode->devicename,
2221 nt_devmode->formname,
2223 nt_devmode->specversion,
2224 nt_devmode->driverversion,
2225 nt_devmode->size,
2226 nt_devmode->driverextra,
2227 nt_devmode->orientation,
2228 nt_devmode->papersize,
2229 nt_devmode->paperlength,
2230 nt_devmode->paperwidth,
2231 nt_devmode->scale,
2232 nt_devmode->copies,
2233 nt_devmode->defaultsource,
2234 nt_devmode->printquality,
2235 nt_devmode->color,
2236 nt_devmode->duplex,
2237 nt_devmode->yresolution,
2238 nt_devmode->ttoption,
2239 nt_devmode->collate,
2240 nt_devmode->logpixels,
2242 nt_devmode->fields,
2243 nt_devmode->bitsperpel,
2244 nt_devmode->pelswidth,
2245 nt_devmode->pelsheight,
2246 nt_devmode->displayflags,
2247 nt_devmode->displayfrequency,
2248 nt_devmode->icmmethod,
2249 nt_devmode->icmintent,
2250 nt_devmode->mediatype,
2251 nt_devmode->dithertype,
2252 nt_devmode->reserved1,
2253 nt_devmode->reserved2,
2254 nt_devmode->panningwidth,
2255 nt_devmode->panningheight,
2256 nt_devmode->nt_dev_private);
2259 if (nt_devmode->nt_dev_private) {
2260 len += tdb_pack(buf+len, buflen-len, "B",
2261 nt_devmode->driverextra,
2262 nt_devmode->nt_dev_private);
2265 DEBUG(8,("Packed devicemode [%s]\n", nt_devmode->formname));
2267 return len;
2270 /****************************************************************************
2271 Pack all values in all printer keys
2272 ***************************************************************************/
2274 static int pack_values(NT_PRINTER_DATA *data, char *buf, int buflen)
2276 int len = 0;
2277 int i, j;
2278 REGISTRY_VALUE *val;
2279 REGVAL_CTR *val_ctr;
2280 pstring path;
2281 int num_values;
2283 if ( !data )
2284 return 0;
2286 /* loop over all keys */
2288 for ( i=0; i<data->num_keys; i++ ) {
2289 val_ctr = data->keys[i].values;
2290 num_values = regval_ctr_numvals( val_ctr );
2292 /* pack the keyname followed by a empty value */
2294 len += tdb_pack(buf+len, buflen-len, "pPdB",
2295 &data->keys[i].name,
2296 data->keys[i].name,
2297 REG_NONE,
2299 NULL);
2301 /* now loop over all values */
2303 for ( j=0; j<num_values; j++ ) {
2304 /* pathname should be stored as <key>\<value> */
2306 val = regval_ctr_specific_value( val_ctr, j );
2307 pstrcpy( path, data->keys[i].name );
2308 pstrcat( path, "\\" );
2309 pstrcat( path, regval_name(val) );
2311 len += tdb_pack(buf+len, buflen-len, "pPdB",
2312 val,
2313 path,
2314 regval_type(val),
2315 regval_size(val),
2316 regval_data_p(val) );
2318 DEBUG(8,("specific: [%s], len: %d\n", regval_name(val), regval_size(val)));
2323 /* terminator */
2325 len += tdb_pack(buf+len, buflen-len, "p", NULL);
2327 return len;
2331 /****************************************************************************
2332 Delete a printer - this just deletes the printer info file, any open
2333 handles are not affected.
2334 ****************************************************************************/
2336 uint32 del_a_printer(const char *sharename)
2338 TDB_DATA kbuf;
2339 pstring printdb_path;
2341 kbuf = make_printer_tdbkey( sharename );
2342 tdb_delete(tdb_printers, kbuf);
2344 kbuf.dptr = make_printers_secdesc_tdbkey( sharename );
2345 kbuf.dsize = strlen(kbuf.dptr) + 1;
2346 tdb_delete(tdb_printers, kbuf);
2348 close_all_print_db();
2350 if (geteuid() == 0) {
2351 pstrcpy(printdb_path, lock_path("printing/"));
2352 pstrcat(printdb_path, sharename);
2353 pstrcat(printdb_path, ".tdb");
2355 unlink(printdb_path);
2358 return 0;
2361 /****************************************************************************
2362 ****************************************************************************/
2363 static WERROR update_a_printer_2(NT_PRINTER_INFO_LEVEL_2 *info)
2365 char *buf;
2366 int buflen, len;
2367 WERROR ret;
2368 TDB_DATA kbuf, dbuf;
2371 * in addprinter: no servername and the printer is the name
2372 * in setprinter: servername is \\server
2373 * and printer is \\server\\printer
2375 * Samba manages only local printers.
2376 * we currently don't support things like i
2377 * path=\\other_server\printer
2379 * We only store the printername, not \\server\printername
2382 if ( info->servername[0] != '\0' ) {
2383 trim_string(info->printername, info->servername, NULL);
2384 trim_char(info->printername, '\\', '\0');
2385 info->servername[0]='\0';
2389 * JFM: one day I'll forget.
2390 * below that's info->portname because that's the SAMBA sharename
2391 * and I made NT 'thinks' it's the portname
2392 * the info->sharename is the thing you can name when you add a printer
2393 * that's the short-name when you create shared printer for 95/98
2394 * So I've made a limitation in SAMBA: you can only have 1 printer model
2395 * behind a SAMBA share.
2398 buf = NULL;
2399 buflen = 0;
2401 again:
2402 len = 0;
2403 len += tdb_pack(buf+len, buflen-len, "dddddddddddfffffPfffff",
2404 info->attributes,
2405 info->priority,
2406 info->default_priority,
2407 info->starttime,
2408 info->untiltime,
2409 info->status,
2410 info->cjobs,
2411 info->averageppm,
2412 info->changeid,
2413 info->c_setprinter,
2414 info->setuptime,
2415 info->servername,
2416 info->printername,
2417 info->sharename,
2418 info->portname,
2419 info->drivername,
2420 info->comment,
2421 info->location,
2422 info->sepfile,
2423 info->printprocessor,
2424 info->datatype,
2425 info->parameters);
2427 len += pack_devicemode(info->devmode, buf+len, buflen-len);
2429 len += pack_values( info->data, buf+len, buflen-len );
2431 if (buflen != len) {
2432 buf = (char *)SMB_REALLOC(buf, len);
2433 if (!buf) {
2434 DEBUG(0,("update_a_printer_2: failed to enlarge buffer!\n"));
2435 ret = WERR_NOMEM;
2436 goto done;
2438 buflen = len;
2439 goto again;
2443 kbuf = make_printer_tdbkey( info->sharename );
2445 dbuf.dptr = buf;
2446 dbuf.dsize = len;
2448 ret = (tdb_store(tdb_printers, kbuf, dbuf, TDB_REPLACE) == 0? WERR_OK : WERR_NOMEM);
2450 done:
2451 if (!W_ERROR_IS_OK(ret))
2452 DEBUG(8, ("error updating printer to tdb on disk\n"));
2454 SAFE_FREE(buf);
2456 DEBUG(8,("packed printer [%s] with driver [%s] portname=[%s] len=%d\n",
2457 info->sharename, info->drivername, info->portname, len));
2459 return ret;
2463 /****************************************************************************
2464 Malloc and return an NT devicemode.
2465 ****************************************************************************/
2467 NT_DEVICEMODE *construct_nt_devicemode(const fstring default_devicename)
2470 char adevice[MAXDEVICENAME];
2471 NT_DEVICEMODE *nt_devmode = SMB_MALLOC_P(NT_DEVICEMODE);
2473 if (nt_devmode == NULL) {
2474 DEBUG(0,("construct_nt_devicemode: malloc fail.\n"));
2475 return NULL;
2478 ZERO_STRUCTP(nt_devmode);
2480 slprintf(adevice, sizeof(adevice), "%s", default_devicename);
2481 fstrcpy(nt_devmode->devicename, adevice);
2483 fstrcpy(nt_devmode->formname, "Letter");
2485 nt_devmode->specversion = 0x0401;
2486 nt_devmode->driverversion = 0x0400;
2487 nt_devmode->size = 0x00DC;
2488 nt_devmode->driverextra = 0x0000;
2489 nt_devmode->fields = FORMNAME | TTOPTION | PRINTQUALITY |
2490 DEFAULTSOURCE | COPIES | SCALE |
2491 PAPERSIZE | ORIENTATION;
2492 nt_devmode->orientation = 1;
2493 nt_devmode->papersize = PAPER_LETTER;
2494 nt_devmode->paperlength = 0;
2495 nt_devmode->paperwidth = 0;
2496 nt_devmode->scale = 0x64;
2497 nt_devmode->copies = 1;
2498 nt_devmode->defaultsource = BIN_FORMSOURCE;
2499 nt_devmode->printquality = RES_HIGH; /* 0x0258 */
2500 nt_devmode->color = COLOR_MONOCHROME;
2501 nt_devmode->duplex = DUP_SIMPLEX;
2502 nt_devmode->yresolution = 0;
2503 nt_devmode->ttoption = TT_SUBDEV;
2504 nt_devmode->collate = COLLATE_FALSE;
2505 nt_devmode->icmmethod = 0;
2506 nt_devmode->icmintent = 0;
2507 nt_devmode->mediatype = 0;
2508 nt_devmode->dithertype = 0;
2510 /* non utilisés par un driver d'imprimante */
2511 nt_devmode->logpixels = 0;
2512 nt_devmode->bitsperpel = 0;
2513 nt_devmode->pelswidth = 0;
2514 nt_devmode->pelsheight = 0;
2515 nt_devmode->displayflags = 0;
2516 nt_devmode->displayfrequency = 0;
2517 nt_devmode->reserved1 = 0;
2518 nt_devmode->reserved2 = 0;
2519 nt_devmode->panningwidth = 0;
2520 nt_devmode->panningheight = 0;
2522 nt_devmode->nt_dev_private = NULL;
2523 return nt_devmode;
2526 /****************************************************************************
2527 Deepcopy an NT devicemode.
2528 ****************************************************************************/
2530 NT_DEVICEMODE *dup_nt_devicemode(NT_DEVICEMODE *nt_devicemode)
2532 NT_DEVICEMODE *new_nt_devicemode = NULL;
2534 if ( !nt_devicemode )
2535 return NULL;
2537 if ((new_nt_devicemode = (NT_DEVICEMODE *)memdup(nt_devicemode, sizeof(NT_DEVICEMODE))) == NULL) {
2538 DEBUG(0,("dup_nt_devicemode: malloc fail.\n"));
2539 return NULL;
2542 new_nt_devicemode->nt_dev_private = NULL;
2543 if (nt_devicemode->nt_dev_private != NULL) {
2544 if ((new_nt_devicemode->nt_dev_private = memdup(nt_devicemode->nt_dev_private, nt_devicemode->driverextra)) == NULL) {
2545 SAFE_FREE(new_nt_devicemode);
2546 DEBUG(0,("dup_nt_devicemode: malloc fail.\n"));
2547 return NULL;
2551 return new_nt_devicemode;
2554 /****************************************************************************
2555 Clean up and deallocate a (maybe partially) allocated NT_DEVICEMODE.
2556 ****************************************************************************/
2558 void free_nt_devicemode(NT_DEVICEMODE **devmode_ptr)
2560 NT_DEVICEMODE *nt_devmode = *devmode_ptr;
2562 if(nt_devmode == NULL)
2563 return;
2565 DEBUG(106,("free_nt_devicemode: deleting DEVMODE\n"));
2567 SAFE_FREE(nt_devmode->nt_dev_private);
2568 SAFE_FREE(*devmode_ptr);
2571 /****************************************************************************
2572 Clean up and deallocate a (maybe partially) allocated NT_PRINTER_INFO_LEVEL_2.
2573 ****************************************************************************/
2575 static void free_nt_printer_info_level_2(NT_PRINTER_INFO_LEVEL_2 **info_ptr)
2577 NT_PRINTER_INFO_LEVEL_2 *info = *info_ptr;
2579 if ( !info )
2580 return;
2582 free_nt_devicemode(&info->devmode);
2584 TALLOC_FREE( *info_ptr );
2588 /****************************************************************************
2589 ****************************************************************************/
2590 int unpack_devicemode(NT_DEVICEMODE **nt_devmode, char *buf, int buflen)
2592 int len = 0;
2593 int extra_len = 0;
2594 NT_DEVICEMODE devmode;
2596 ZERO_STRUCT(devmode);
2598 len += tdb_unpack(buf+len, buflen-len, "p", nt_devmode);
2600 if (!*nt_devmode) return len;
2602 len += tdb_unpack(buf+len, buflen-len, "ffwwwwwwwwwwwwwwwwwwddddddddddddddp",
2603 devmode.devicename,
2604 devmode.formname,
2606 &devmode.specversion,
2607 &devmode.driverversion,
2608 &devmode.size,
2609 &devmode.driverextra,
2610 &devmode.orientation,
2611 &devmode.papersize,
2612 &devmode.paperlength,
2613 &devmode.paperwidth,
2614 &devmode.scale,
2615 &devmode.copies,
2616 &devmode.defaultsource,
2617 &devmode.printquality,
2618 &devmode.color,
2619 &devmode.duplex,
2620 &devmode.yresolution,
2621 &devmode.ttoption,
2622 &devmode.collate,
2623 &devmode.logpixels,
2625 &devmode.fields,
2626 &devmode.bitsperpel,
2627 &devmode.pelswidth,
2628 &devmode.pelsheight,
2629 &devmode.displayflags,
2630 &devmode.displayfrequency,
2631 &devmode.icmmethod,
2632 &devmode.icmintent,
2633 &devmode.mediatype,
2634 &devmode.dithertype,
2635 &devmode.reserved1,
2636 &devmode.reserved2,
2637 &devmode.panningwidth,
2638 &devmode.panningheight,
2639 &devmode.nt_dev_private);
2641 if (devmode.nt_dev_private) {
2642 /* the len in tdb_unpack is an int value and
2643 * devmode.driverextra is only a short
2645 len += tdb_unpack(buf+len, buflen-len, "B", &extra_len, &devmode.nt_dev_private);
2646 devmode.driverextra=(uint16)extra_len;
2648 /* check to catch an invalid TDB entry so we don't segfault */
2649 if (devmode.driverextra == 0) {
2650 devmode.nt_dev_private = NULL;
2654 *nt_devmode = (NT_DEVICEMODE *)memdup(&devmode, sizeof(devmode));
2656 DEBUG(8,("Unpacked devicemode [%s](%s)\n", devmode.devicename, devmode.formname));
2657 if (devmode.nt_dev_private)
2658 DEBUG(8,("with a private section of %d bytes\n", devmode.driverextra));
2660 return len;
2663 /****************************************************************************
2664 Allocate and initialize a new slot.
2665 ***************************************************************************/
2667 int add_new_printer_key( NT_PRINTER_DATA *data, const char *name )
2669 NT_PRINTER_KEY *d;
2670 int key_index;
2672 if ( !name || !data )
2673 return -1;
2675 /* allocate another slot in the NT_PRINTER_KEY array */
2677 if ( !(d = TALLOC_REALLOC_ARRAY( data, data->keys, NT_PRINTER_KEY, data->num_keys+1)) ) {
2678 DEBUG(0,("add_new_printer_key: Realloc() failed!\n"));
2679 return -1;
2682 data->keys = d;
2684 key_index = data->num_keys;
2686 /* initialze new key */
2688 data->keys[key_index].name = talloc_strdup( data, name );
2690 if ( !(data->keys[key_index].values = TALLOC_ZERO_P( data, REGVAL_CTR )) )
2691 return -1;
2693 data->num_keys++;
2695 DEBUG(10,("add_new_printer_key: Inserted new data key [%s]\n", name ));
2697 return key_index;
2700 /****************************************************************************
2701 search for a registry key name in the existing printer data
2702 ***************************************************************************/
2704 int delete_printer_key( NT_PRINTER_DATA *data, const char *name )
2706 int i;
2708 for ( i=0; i<data->num_keys; i++ ) {
2709 if ( strequal( data->keys[i].name, name ) ) {
2711 /* cleanup memory */
2713 TALLOC_FREE( data->keys[i].name );
2714 TALLOC_FREE( data->keys[i].values );
2716 /* if not the end of the array, move remaining elements down one slot */
2718 data->num_keys--;
2719 if ( data->num_keys && (i < data->num_keys) )
2720 memmove( &data->keys[i], &data->keys[i+1], sizeof(NT_PRINTER_KEY)*(data->num_keys-i) );
2722 break;
2727 return data->num_keys;
2730 /****************************************************************************
2731 search for a registry key name in the existing printer data
2732 ***************************************************************************/
2734 int lookup_printerkey( NT_PRINTER_DATA *data, const char *name )
2736 int key_index = -1;
2737 int i;
2739 if ( !data || !name )
2740 return -1;
2742 DEBUG(12,("lookup_printerkey: Looking for [%s]\n", name));
2744 /* loop over all existing keys */
2746 for ( i=0; i<data->num_keys; i++ ) {
2747 if ( strequal(data->keys[i].name, name) ) {
2748 DEBUG(12,("lookup_printerkey: Found [%s]!\n", name));
2749 key_index = i;
2750 break;
2755 return key_index;
2758 /****************************************************************************
2759 ***************************************************************************/
2761 int get_printer_subkeys( NT_PRINTER_DATA *data, const char* key, fstring **subkeys )
2763 int i, j;
2764 int key_len;
2765 int num_subkeys = 0;
2766 char *p;
2767 fstring *subkeys_ptr = NULL;
2768 fstring subkeyname;
2770 if ( !data )
2771 return 0;
2773 if ( !key )
2774 return -1;
2776 /* special case of asking for the top level printer data registry key names */
2778 if ( strlen(key) == 0 ) {
2779 for ( i=0; i<data->num_keys; i++ ) {
2781 /* found a match, so allocate space and copy the name */
2783 if ( !(subkeys_ptr = SMB_REALLOC_ARRAY( subkeys_ptr, fstring, num_subkeys+2)) ) {
2784 DEBUG(0,("get_printer_subkeys: Realloc failed for [%d] entries!\n",
2785 num_subkeys+1));
2786 return -1;
2789 fstrcpy( subkeys_ptr[num_subkeys], data->keys[i].name );
2790 num_subkeys++;
2793 goto done;
2796 /* asking for the subkeys of some key */
2797 /* subkey paths are stored in the key name using '\' as the delimiter */
2799 for ( i=0; i<data->num_keys; i++ ) {
2800 if ( StrnCaseCmp(data->keys[i].name, key, strlen(key)) == 0 ) {
2802 /* if we found the exact key, then break */
2803 key_len = strlen( key );
2804 if ( strlen(data->keys[i].name) == key_len )
2805 break;
2807 /* get subkey path */
2809 p = data->keys[i].name + key_len;
2810 if ( *p == '\\' )
2811 p++;
2812 fstrcpy( subkeyname, p );
2813 if ( (p = strchr( subkeyname, '\\' )) )
2814 *p = '\0';
2816 /* don't add a key more than once */
2818 for ( j=0; j<num_subkeys; j++ ) {
2819 if ( strequal( subkeys_ptr[j], subkeyname ) )
2820 break;
2823 if ( j != num_subkeys )
2824 continue;
2826 /* found a match, so allocate space and copy the name */
2828 if ( !(subkeys_ptr = SMB_REALLOC_ARRAY( subkeys_ptr, fstring, num_subkeys+2)) ) {
2829 DEBUG(0,("get_printer_subkeys: Realloc failed for [%d] entries!\n",
2830 num_subkeys+1));
2831 return 0;
2834 fstrcpy( subkeys_ptr[num_subkeys], subkeyname );
2835 num_subkeys++;
2840 /* return error if the key was not found */
2842 if ( i == data->num_keys ) {
2843 SAFE_FREE(subkeys_ptr);
2844 return -1;
2847 done:
2848 /* tag off the end */
2850 if (num_subkeys)
2851 fstrcpy(subkeys_ptr[num_subkeys], "" );
2853 *subkeys = subkeys_ptr;
2855 return num_subkeys;
2858 #ifdef HAVE_ADS
2859 static void map_sz_into_ctr(REGVAL_CTR *ctr, const char *val_name,
2860 const char *sz)
2862 smb_ucs2_t conv_str[1024];
2863 size_t str_size;
2865 regval_ctr_delvalue(ctr, val_name);
2866 str_size = push_ucs2(NULL, conv_str, sz, sizeof(conv_str),
2867 STR_TERMINATE | STR_NOALIGN);
2868 regval_ctr_addvalue(ctr, val_name, REG_SZ,
2869 (char *) conv_str, str_size);
2872 static void map_dword_into_ctr(REGVAL_CTR *ctr, const char *val_name,
2873 uint32 dword)
2875 regval_ctr_delvalue(ctr, val_name);
2876 regval_ctr_addvalue(ctr, val_name, REG_DWORD,
2877 (char *) &dword, sizeof(dword));
2880 static void map_bool_into_ctr(REGVAL_CTR *ctr, const char *val_name,
2881 BOOL b)
2883 uint8 bin_bool = (b ? 1 : 0);
2884 regval_ctr_delvalue(ctr, val_name);
2885 regval_ctr_addvalue(ctr, val_name, REG_BINARY,
2886 (char *) &bin_bool, sizeof(bin_bool));
2889 static void map_single_multi_sz_into_ctr(REGVAL_CTR *ctr, const char *val_name,
2890 const char *multi_sz)
2892 smb_ucs2_t *conv_strs = NULL;
2893 size_t str_size;
2895 /* a multi-sz has to have a null string terminator, i.e., the last
2896 string must be followed by two nulls */
2897 str_size = strlen(multi_sz) + 2;
2898 conv_strs = SMB_CALLOC_ARRAY(smb_ucs2_t, str_size);
2899 if (!conv_strs) {
2900 return;
2903 /* Change to byte units. */
2904 str_size *= sizeof(smb_ucs2_t);
2905 push_ucs2(NULL, conv_strs, multi_sz, str_size,
2906 STR_TERMINATE | STR_NOALIGN);
2908 regval_ctr_delvalue(ctr, val_name);
2909 regval_ctr_addvalue(ctr, val_name, REG_MULTI_SZ,
2910 (char *) conv_strs, str_size);
2911 safe_free(conv_strs);
2915 /****************************************************************************
2916 * Map the NT_PRINTER_INFO_LEVEL_2 data into DsSpooler keys for publishing.
2918 * @param info2 NT_PRINTER_INFO_LEVEL_2 describing printer - gets modified
2919 * @return BOOL indicating success or failure
2920 ***************************************************************************/
2922 static BOOL map_nt_printer_info2_to_dsspooler(NT_PRINTER_INFO_LEVEL_2 *info2)
2924 REGVAL_CTR *ctr = NULL;
2925 fstring longname;
2926 fstring dnssuffix;
2927 char *allocated_string = NULL;
2928 const char *ascii_str;
2929 int i;
2931 if ((i = lookup_printerkey(info2->data, SPOOL_DSSPOOLER_KEY)) < 0)
2932 i = add_new_printer_key(info2->data, SPOOL_DSSPOOLER_KEY);
2933 ctr = info2->data->keys[i].values;
2935 map_sz_into_ctr(ctr, SPOOL_REG_PRINTERNAME, info2->sharename);
2936 map_sz_into_ctr(ctr, SPOOL_REG_SHORTSERVERNAME, global_myname());
2938 /* we make the assumption that the netbios name is the same
2939 as the DNS name sinc ethe former will be what we used to
2940 join the domain */
2942 if ( get_mydnsdomname( dnssuffix ) )
2943 fstr_sprintf( longname, "%s.%s", global_myname(), dnssuffix );
2944 else
2945 fstrcpy( longname, global_myname() );
2947 map_sz_into_ctr(ctr, SPOOL_REG_SERVERNAME, longname);
2949 asprintf(&allocated_string, "\\\\%s\\%s", longname, info2->sharename);
2950 map_sz_into_ctr(ctr, SPOOL_REG_UNCNAME, allocated_string);
2951 SAFE_FREE(allocated_string);
2953 map_dword_into_ctr(ctr, SPOOL_REG_VERSIONNUMBER, 4);
2954 map_sz_into_ctr(ctr, SPOOL_REG_DRIVERNAME, info2->drivername);
2955 map_sz_into_ctr(ctr, SPOOL_REG_LOCATION, info2->location);
2956 map_sz_into_ctr(ctr, SPOOL_REG_DESCRIPTION, info2->comment);
2957 map_single_multi_sz_into_ctr(ctr, SPOOL_REG_PORTNAME, info2->portname);
2958 map_sz_into_ctr(ctr, SPOOL_REG_PRINTSEPARATORFILE, info2->sepfile);
2959 map_dword_into_ctr(ctr, SPOOL_REG_PRINTSTARTTIME, info2->starttime);
2960 map_dword_into_ctr(ctr, SPOOL_REG_PRINTENDTIME, info2->untiltime);
2961 map_dword_into_ctr(ctr, SPOOL_REG_PRIORITY, info2->priority);
2963 map_bool_into_ctr(ctr, SPOOL_REG_PRINTKEEPPRINTEDJOBS,
2964 (info2->attributes &
2965 PRINTER_ATTRIBUTE_KEEPPRINTEDJOBS));
2967 switch (info2->attributes & 0x3) {
2968 case 0:
2969 ascii_str = SPOOL_REGVAL_PRINTWHILESPOOLING;
2970 break;
2971 case 1:
2972 ascii_str = SPOOL_REGVAL_PRINTAFTERSPOOLED;
2973 break;
2974 case 2:
2975 ascii_str = SPOOL_REGVAL_PRINTDIRECT;
2976 break;
2977 default:
2978 ascii_str = "unknown";
2980 map_sz_into_ctr(ctr, SPOOL_REG_PRINTSPOOLING, ascii_str);
2982 return True;
2985 static void store_printer_guid(NT_PRINTER_INFO_LEVEL_2 *info2,
2986 struct uuid guid)
2988 int i;
2989 REGVAL_CTR *ctr=NULL;
2991 /* find the DsSpooler key */
2992 if ((i = lookup_printerkey(info2->data, SPOOL_DSSPOOLER_KEY)) < 0)
2993 i = add_new_printer_key(info2->data, SPOOL_DSSPOOLER_KEY);
2994 ctr = info2->data->keys[i].values;
2996 regval_ctr_delvalue(ctr, "objectGUID");
2997 regval_ctr_addvalue(ctr, "objectGUID", REG_BINARY,
2998 (char *) &guid, sizeof(struct uuid));
3001 static WERROR nt_printer_publish_ads(ADS_STRUCT *ads,
3002 NT_PRINTER_INFO_LEVEL *printer)
3004 ADS_STATUS ads_rc;
3005 void *res;
3006 char *prt_dn = NULL, *srv_dn, *srv_cn_0;
3007 char *srv_dn_utf8, **srv_cn_utf8;
3008 TALLOC_CTX *ctx;
3009 ADS_MODLIST mods;
3010 const char *attrs[] = {"objectGUID", NULL};
3011 struct uuid guid;
3012 WERROR win_rc = WERR_OK;
3014 DEBUG(5, ("publishing printer %s\n", printer->info_2->printername));
3016 /* figure out where to publish */
3017 ads_find_machine_acct(ads, &res, global_myname());
3019 /* We use ldap_get_dn here as we need the answer
3020 * in utf8 to call ldap_explode_dn(). JRA. */
3022 srv_dn_utf8 = ldap_get_dn(ads->ld, res);
3023 if (!srv_dn_utf8) {
3024 ads_destroy(&ads);
3025 return WERR_SERVER_UNAVAILABLE;
3027 ads_msgfree(ads, res);
3028 srv_cn_utf8 = ldap_explode_dn(srv_dn_utf8, 1);
3029 if (!srv_cn_utf8) {
3030 ldap_memfree(srv_dn_utf8);
3031 ads_destroy(&ads);
3032 return WERR_SERVER_UNAVAILABLE;
3034 /* Now convert to CH_UNIX. */
3035 if (pull_utf8_allocate(&srv_dn, srv_dn_utf8) == (size_t)-1) {
3036 ldap_memfree(srv_dn_utf8);
3037 ldap_memfree(srv_cn_utf8);
3038 ads_destroy(&ads);
3039 return WERR_SERVER_UNAVAILABLE;
3041 if (pull_utf8_allocate(&srv_cn_0, srv_cn_utf8[0]) == (size_t)-1) {
3042 ldap_memfree(srv_dn_utf8);
3043 ldap_memfree(srv_cn_utf8);
3044 ads_destroy(&ads);
3045 SAFE_FREE(srv_dn);
3046 return WERR_SERVER_UNAVAILABLE;
3049 ldap_memfree(srv_dn_utf8);
3050 ldap_memfree(srv_cn_utf8);
3052 asprintf(&prt_dn, "cn=%s-%s,%s", srv_cn_0,
3053 printer->info_2->sharename, srv_dn);
3055 SAFE_FREE(srv_dn);
3056 SAFE_FREE(srv_cn_0);
3058 /* build the ads mods */
3059 ctx = talloc_init("nt_printer_publish_ads");
3060 if (ctx == NULL) {
3061 SAFE_FREE(prt_dn);
3062 return WERR_NOMEM;
3065 mods = ads_init_mods(ctx);
3067 if (mods == NULL) {
3068 SAFE_FREE(prt_dn);
3069 talloc_destroy(ctx);
3070 return WERR_NOMEM;
3073 get_local_printer_publishing_data(ctx, &mods, printer->info_2->data);
3074 ads_mod_str(ctx, &mods, SPOOL_REG_PRINTERNAME,
3075 printer->info_2->sharename);
3077 /* publish it */
3078 ads_rc = ads_mod_printer_entry(ads, prt_dn, ctx, &mods);
3079 if (ads_rc.err.rc == LDAP_NO_SUCH_OBJECT)
3080 ads_rc = ads_add_printer_entry(ads, prt_dn, ctx, &mods);
3082 if (!ADS_ERR_OK(ads_rc))
3083 DEBUG(3, ("error publishing %s: %s\n", printer->info_2->sharename, ads_errstr(ads_rc)));
3085 talloc_destroy(ctx);
3087 /* retreive the guid and store it locally */
3088 if (ADS_ERR_OK(ads_search_dn(ads, &res, prt_dn, attrs))) {
3089 ZERO_STRUCT(guid);
3090 ads_pull_guid(ads, res, &guid);
3091 ads_msgfree(ads, res);
3092 store_printer_guid(printer->info_2, guid);
3093 win_rc = mod_a_printer(printer, 2);
3096 SAFE_FREE(prt_dn);
3097 return win_rc;
3100 static WERROR nt_printer_unpublish_ads(ADS_STRUCT *ads,
3101 NT_PRINTER_INFO_LEVEL *printer)
3103 ADS_STATUS ads_rc;
3104 void *res;
3105 char *prt_dn = NULL;
3107 DEBUG(5, ("unpublishing printer %s\n", printer->info_2->printername));
3109 /* remove the printer from the directory */
3110 ads_rc = ads_find_printer_on_server(ads, &res,
3111 printer->info_2->sharename, global_myname());
3113 if (ADS_ERR_OK(ads_rc) && ads_count_replies(ads, res)) {
3114 prt_dn = ads_get_dn(ads, res);
3115 if (!prt_dn) {
3116 ads_msgfree(ads, res);
3117 return WERR_NOMEM;
3119 ads_rc = ads_del_dn(ads, prt_dn);
3120 ads_memfree(ads, prt_dn);
3123 ads_msgfree(ads, res);
3124 return WERR_OK;
3127 /****************************************************************************
3128 * Publish a printer in the directory
3130 * @param snum describing printer service
3131 * @return WERROR indicating status of publishing
3132 ***************************************************************************/
3134 WERROR nt_printer_publish(Printer_entry *print_hnd, int snum, int action)
3136 ADS_STATUS ads_rc;
3137 ADS_STRUCT *ads = NULL;
3138 NT_PRINTER_INFO_LEVEL *printer = NULL;
3139 WERROR win_rc;
3141 win_rc = get_a_printer(print_hnd, &printer, 2, lp_servicename(snum));
3142 if (!W_ERROR_IS_OK(win_rc))
3143 goto done;
3145 switch (action) {
3146 case SPOOL_DS_PUBLISH:
3147 case SPOOL_DS_UPDATE:
3148 /* set the DsSpooler info and attributes */
3149 if (!(map_nt_printer_info2_to_dsspooler(printer->info_2))) {
3150 win_rc = WERR_NOMEM;
3151 goto done;
3154 printer->info_2->attributes |= PRINTER_ATTRIBUTE_PUBLISHED;
3155 break;
3156 case SPOOL_DS_UNPUBLISH:
3157 printer->info_2->attributes ^= PRINTER_ATTRIBUTE_PUBLISHED;
3158 break;
3159 default:
3160 win_rc = WERR_NOT_SUPPORTED;
3161 goto done;
3164 win_rc = mod_a_printer(printer, 2);
3165 if (!W_ERROR_IS_OK(win_rc)) {
3166 DEBUG(3, ("err %d saving data\n", W_ERROR_V(win_rc)));
3167 goto done;
3170 ads = ads_init(NULL, NULL, NULL);
3171 if (!ads) {
3172 DEBUG(3, ("ads_init() failed\n"));
3173 win_rc = WERR_SERVER_UNAVAILABLE;
3174 goto done;
3176 setenv(KRB5_ENV_CCNAME, "MEMORY:prtpub_cache", 1);
3177 SAFE_FREE(ads->auth.password);
3178 ads->auth.password = secrets_fetch_machine_password(lp_workgroup(),
3179 NULL, NULL);
3181 /* ads_connect() will find the DC for us */
3182 ads_rc = ads_connect(ads);
3183 if (!ADS_ERR_OK(ads_rc)) {
3184 DEBUG(3, ("ads_connect failed: %s\n", ads_errstr(ads_rc)));
3185 win_rc = WERR_ACCESS_DENIED;
3186 goto done;
3189 switch (action) {
3190 case SPOOL_DS_PUBLISH:
3191 case SPOOL_DS_UPDATE:
3192 win_rc = nt_printer_publish_ads(ads, printer);
3193 break;
3194 case SPOOL_DS_UNPUBLISH:
3195 win_rc = nt_printer_unpublish_ads(ads, printer);
3196 break;
3199 done:
3200 free_a_printer(&printer, 2);
3201 ads_destroy(&ads);
3202 return win_rc;
3205 WERROR check_published_printers(void)
3207 ADS_STATUS ads_rc;
3208 ADS_STRUCT *ads = NULL;
3209 int snum;
3210 int n_services = lp_numservices();
3211 NT_PRINTER_INFO_LEVEL *printer = NULL;
3213 ads = ads_init(lp_realm(), lp_workgroup(), NULL);
3214 if (!ads) {
3215 DEBUG(3, ("ads_init() failed\n"));
3216 return WERR_SERVER_UNAVAILABLE;
3218 setenv(KRB5_ENV_CCNAME, "MEMORY:prtpub_cache", 1);
3219 SAFE_FREE(ads->auth.password);
3220 ads->auth.password = secrets_fetch_machine_password(lp_workgroup(),
3221 NULL, NULL);
3223 /* ads_connect() will find the DC for us */
3224 ads_rc = ads_connect(ads);
3225 if (!ADS_ERR_OK(ads_rc)) {
3226 DEBUG(3, ("ads_connect failed: %s\n", ads_errstr(ads_rc)));
3227 ads_destroy(&ads);
3228 return WERR_ACCESS_DENIED;
3231 for (snum = 0; snum < n_services; snum++) {
3232 if (!(lp_snum_ok(snum) && lp_print_ok(snum)))
3233 continue;
3235 if (W_ERROR_IS_OK(get_a_printer(NULL, &printer, 2,
3236 lp_servicename(snum))) &&
3237 (printer->info_2->attributes & PRINTER_ATTRIBUTE_PUBLISHED))
3238 nt_printer_publish_ads(ads, printer);
3240 free_a_printer(&printer, 2);
3243 ads_destroy(&ads);
3244 return WERR_OK;
3247 BOOL is_printer_published(Printer_entry *print_hnd, int snum,
3248 struct uuid *guid)
3250 NT_PRINTER_INFO_LEVEL *printer = NULL;
3251 REGVAL_CTR *ctr;
3252 REGISTRY_VALUE *guid_val;
3253 WERROR win_rc;
3254 int i;
3256 win_rc = get_a_printer(print_hnd, &printer, 2, lp_servicename(snum));
3258 if (!W_ERROR_IS_OK(win_rc) ||
3259 !(printer->info_2->attributes & PRINTER_ATTRIBUTE_PUBLISHED) ||
3260 ((i = lookup_printerkey(printer->info_2->data, SPOOL_DSSPOOLER_KEY)) < 0) ||
3261 !(ctr = printer->info_2->data->keys[i].values) ||
3262 !(guid_val = regval_ctr_getvalue(ctr, "objectGUID")))
3264 free_a_printer(&printer, 2);
3265 return False;
3268 /* fetching printer guids really ought to be a separate function.. */
3269 if (guid && regval_size(guid_val) == sizeof(struct uuid))
3270 memcpy(guid, regval_data_p(guid_val), sizeof(struct uuid));
3272 free_a_printer(&printer, 2);
3273 return True;
3275 #else
3276 WERROR nt_printer_publish(Printer_entry *print_hnd, int snum, int action)
3278 return WERR_OK;
3281 WERROR check_published_printers(void)
3283 return WERR_OK;
3286 BOOL is_printer_published(Printer_entry *print_hnd, int snum,
3287 struct uuid *guid)
3289 return False;
3291 #endif /* HAVE_ADS */
3293 /****************************************************************************
3294 ***************************************************************************/
3296 WERROR delete_all_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key )
3298 NT_PRINTER_DATA *data;
3299 int i;
3300 int removed_keys = 0;
3301 int empty_slot;
3303 data = p2->data;
3304 empty_slot = data->num_keys;
3306 if ( !key )
3307 return WERR_INVALID_PARAM;
3309 /* remove all keys */
3311 if ( !strlen(key) ) {
3313 TALLOC_FREE( data );
3315 p2->data = NULL;
3317 DEBUG(8,("delete_all_printer_data: Removed all Printer Data from printer [%s]\n",
3318 p2->printername ));
3320 return WERR_OK;
3323 /* remove a specific key (and all subkeys) */
3325 for ( i=0; i<data->num_keys; i++ ) {
3326 if ( StrnCaseCmp( data->keys[i].name, key, strlen(key)) == 0 ) {
3327 DEBUG(8,("delete_all_printer_data: Removed all Printer Data from key [%s]\n",
3328 data->keys[i].name));
3330 TALLOC_FREE( data->keys[i].name );
3331 TALLOC_FREE( data->keys[i].values );
3333 /* mark the slot as empty */
3335 ZERO_STRUCTP( &data->keys[i] );
3339 /* find the first empty slot */
3341 for ( i=0; i<data->num_keys; i++ ) {
3342 if ( !data->keys[i].name ) {
3343 empty_slot = i;
3344 removed_keys++;
3345 break;
3349 if ( i == data->num_keys )
3350 /* nothing was removed */
3351 return WERR_INVALID_PARAM;
3353 /* move everything down */
3355 for ( i=empty_slot+1; i<data->num_keys; i++ ) {
3356 if ( data->keys[i].name ) {
3357 memcpy( &data->keys[empty_slot], &data->keys[i], sizeof(NT_PRINTER_KEY) );
3358 ZERO_STRUCTP( &data->keys[i] );
3359 empty_slot++;
3360 removed_keys++;
3364 /* update count */
3366 data->num_keys -= removed_keys;
3368 /* sanity check to see if anything is left */
3370 if ( !data->num_keys ) {
3371 DEBUG(8,("delete_all_printer_data: No keys left for printer [%s]\n", p2->printername ));
3373 SAFE_FREE( data->keys );
3374 ZERO_STRUCTP( data );
3377 return WERR_OK;
3380 /****************************************************************************
3381 ***************************************************************************/
3383 WERROR delete_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key, const char *value )
3385 WERROR result = WERR_OK;
3386 int key_index;
3388 /* we must have names on non-zero length */
3390 if ( !key || !*key|| !value || !*value )
3391 return WERR_INVALID_NAME;
3393 /* find the printer key first */
3395 key_index = lookup_printerkey( p2->data, key );
3396 if ( key_index == -1 )
3397 return WERR_OK;
3399 /* make sure the value exists so we can return the correct error code */
3401 if ( !regval_ctr_getvalue( p2->data->keys[key_index].values, value ) )
3402 return WERR_BADFILE;
3404 regval_ctr_delvalue( p2->data->keys[key_index].values, value );
3406 DEBUG(8,("delete_printer_data: Removed key => [%s], value => [%s]\n",
3407 key, value ));
3409 return result;
3412 /****************************************************************************
3413 ***************************************************************************/
3415 WERROR add_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key, const char *value,
3416 uint32 type, uint8 *data, int real_len )
3418 WERROR result = WERR_OK;
3419 int key_index;
3421 /* we must have names on non-zero length */
3423 if ( !key || !*key|| !value || !*value )
3424 return WERR_INVALID_NAME;
3426 /* find the printer key first */
3428 key_index = lookup_printerkey( p2->data, key );
3429 if ( key_index == -1 )
3430 key_index = add_new_printer_key( p2->data, key );
3432 if ( key_index == -1 )
3433 return WERR_NOMEM;
3435 regval_ctr_addvalue( p2->data->keys[key_index].values, value,
3436 type, (const char *)data, real_len );
3438 DEBUG(8,("add_printer_data: Added key => [%s], value => [%s], type=> [%d], size => [%d]\n",
3439 key, value, type, real_len ));
3441 return result;
3444 /****************************************************************************
3445 ***************************************************************************/
3447 REGISTRY_VALUE* get_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key, const char *value )
3449 int key_index;
3451 if ( (key_index = lookup_printerkey( p2->data, key )) == -1 )
3452 return NULL;
3454 DEBUG(8,("get_printer_data: Attempting to lookup key => [%s], value => [%s]\n",
3455 key, value ));
3457 return regval_ctr_getvalue( p2->data->keys[key_index].values, value );
3460 /****************************************************************************
3461 Unpack a list of registry values frem the TDB
3462 ***************************************************************************/
3464 static int unpack_values(NT_PRINTER_DATA *printer_data, char *buf, int buflen)
3466 int len = 0;
3467 uint32 type;
3468 pstring string, valuename, keyname;
3469 char *str;
3470 int size;
3471 uint8 *data_p;
3472 REGISTRY_VALUE *regval_p;
3473 int key_index;
3475 /* add the "PrinterDriverData" key first for performance reasons */
3477 add_new_printer_key( printer_data, SPOOL_PRINTERDATA_KEY );
3479 /* loop and unpack the rest of the registry values */
3481 while ( True ) {
3483 /* check to see if there are any more registry values */
3485 regval_p = NULL;
3486 len += tdb_unpack(buf+len, buflen-len, "p", &regval_p);
3487 if ( !regval_p )
3488 break;
3490 /* unpack the next regval */
3492 len += tdb_unpack(buf+len, buflen-len, "fdB",
3493 string,
3494 &type,
3495 &size,
3496 &data_p);
3498 /* lookup for subkey names which have a type of REG_NONE */
3499 /* there's no data with this entry */
3501 if ( type == REG_NONE ) {
3502 if ( (key_index=lookup_printerkey( printer_data, string)) == -1 )
3503 add_new_printer_key( printer_data, string );
3504 continue;
3508 * break of the keyname from the value name.
3509 * Valuenames can have embedded '\'s so be careful.
3510 * only support one level of keys. See the
3511 * "Konica Fiery S300 50C-K v1.1. enu" 2k driver.
3512 * -- jerry
3515 str = strchr_m( string, '\\');
3517 /* Put in "PrinterDriverData" is no key specified */
3519 if ( !str ) {
3520 pstrcpy( keyname, SPOOL_PRINTERDATA_KEY );
3521 pstrcpy( valuename, string );
3523 else {
3524 *str = '\0';
3525 pstrcpy( keyname, string );
3526 pstrcpy( valuename, str+1 );
3529 /* see if we need a new key */
3531 if ( (key_index=lookup_printerkey( printer_data, keyname )) == -1 )
3532 key_index = add_new_printer_key( printer_data, keyname );
3534 if ( key_index == -1 ) {
3535 DEBUG(0,("unpack_values: Failed to allocate a new key [%s]!\n",
3536 keyname));
3537 break;
3540 /* add the new value */
3542 regval_ctr_addvalue( printer_data->keys[key_index].values, valuename, type, (const char *)data_p, size );
3544 SAFE_FREE(data_p); /* 'B' option to tdbpack does a malloc() */
3546 DEBUG(8,("specific: [%s:%s], len: %d\n", keyname, valuename, size));
3549 return len;
3552 /****************************************************************************
3553 ***************************************************************************/
3555 static void map_to_os2_driver(fstring drivername)
3557 static BOOL initialised=False;
3558 static fstring last_from,last_to;
3559 char *mapfile = lp_os2_driver_map();
3560 char **lines = NULL;
3561 int numlines = 0;
3562 int i;
3564 if (!strlen(drivername))
3565 return;
3567 if (!*mapfile)
3568 return;
3570 if (!initialised) {
3571 *last_from = *last_to = 0;
3572 initialised = True;
3575 if (strequal(drivername,last_from)) {
3576 DEBUG(3,("Mapped Windows driver %s to OS/2 driver %s\n",drivername,last_to));
3577 fstrcpy(drivername,last_to);
3578 return;
3581 lines = file_lines_load(mapfile, &numlines,0);
3582 if (numlines == 0 || lines == NULL) {
3583 DEBUG(0,("No entries in OS/2 driver map %s\n",mapfile));
3584 SAFE_FREE(lines);
3585 return;
3588 DEBUG(4,("Scanning OS/2 driver map %s\n",mapfile));
3590 for( i = 0; i < numlines; i++) {
3591 char *nt_name = lines[i];
3592 char *os2_name = strchr(nt_name,'=');
3594 if (!os2_name)
3595 continue;
3597 *os2_name++ = 0;
3599 while (isspace(*nt_name))
3600 nt_name++;
3602 if (!*nt_name || strchr("#;",*nt_name))
3603 continue;
3606 int l = strlen(nt_name);
3607 while (l && isspace(nt_name[l-1])) {
3608 nt_name[l-1] = 0;
3609 l--;
3613 while (isspace(*os2_name))
3614 os2_name++;
3617 int l = strlen(os2_name);
3618 while (l && isspace(os2_name[l-1])) {
3619 os2_name[l-1] = 0;
3620 l--;
3624 if (strequal(nt_name,drivername)) {
3625 DEBUG(3,("Mapped windows driver %s to os2 driver%s\n",drivername,os2_name));
3626 fstrcpy(last_from,drivername);
3627 fstrcpy(last_to,os2_name);
3628 fstrcpy(drivername,os2_name);
3629 file_lines_free(lines);
3630 return;
3634 file_lines_free(lines);
3637 /****************************************************************************
3638 Get a default printer info 2 struct.
3639 ****************************************************************************/
3640 static WERROR get_a_printer_2_default(NT_PRINTER_INFO_LEVEL_2 *info, const char *servername, const char* sharename)
3642 int snum;
3644 snum = lp_servicenumber(sharename);
3646 slprintf(info->servername, sizeof(info->servername)-1, "\\\\%s", servername);
3647 slprintf(info->printername, sizeof(info->printername)-1, "\\\\%s\\%s",
3648 servername, sharename);
3649 fstrcpy(info->sharename, sharename);
3650 fstrcpy(info->portname, SAMBA_PRINTER_PORT_NAME);
3652 /* by setting the driver name to an empty string, a local NT admin
3653 can now run the **local** APW to install a local printer driver
3654 for a Samba shared printer in 2.2. Without this, drivers **must** be
3655 installed on the Samba server for NT clients --jerry */
3656 #if 0 /* JERRY --do not uncomment-- */
3657 if (!*info->drivername)
3658 fstrcpy(info->drivername, "NO DRIVER AVAILABLE FOR THIS PRINTER");
3659 #endif
3662 DEBUG(10,("get_a_printer_2_default: driver name set to [%s]\n", info->drivername));
3664 pstrcpy(info->comment, "");
3665 fstrcpy(info->printprocessor, "winprint");
3666 fstrcpy(info->datatype, "RAW");
3668 info->attributes = PRINTER_ATTRIBUTE_SAMBA;
3670 info->starttime = 0; /* Minutes since 12:00am GMT */
3671 info->untiltime = 0; /* Minutes since 12:00am GMT */
3672 info->priority = 1;
3673 info->default_priority = 1;
3674 info->setuptime = (uint32)time(NULL);
3677 * I changed this as I think it is better to have a generic
3678 * DEVMODE than to crash Win2k explorer.exe --jerry
3679 * See the HP Deskjet 990c Win2k drivers for an example.
3681 * However the default devmode appears to cause problems
3682 * with the HP CLJ 8500 PCL driver. Hence the addition of
3683 * the "default devmode" parameter --jerry 22/01/2002
3686 if (lp_default_devmode(snum)) {
3687 if ((info->devmode = construct_nt_devicemode(info->printername)) == NULL) {
3688 goto fail;
3690 } else {
3691 info->devmode = NULL;
3694 if (!nt_printing_getsec(info, sharename, &info->secdesc_buf)) {
3695 goto fail;
3698 return WERR_OK;
3700 fail:
3701 if (info->devmode)
3702 free_nt_devicemode(&info->devmode);
3704 return WERR_ACCESS_DENIED;
3707 /****************************************************************************
3708 ****************************************************************************/
3709 static WERROR get_a_printer_2(NT_PRINTER_INFO_LEVEL_2 *info, const char *servername, const char *sharename)
3711 int len = 0;
3712 int snum = lp_servicenumber(sharename);
3713 TDB_DATA kbuf, dbuf;
3714 fstring printername;
3715 char adevice[MAXDEVICENAME];
3717 kbuf = make_printer_tdbkey( sharename );
3719 dbuf = tdb_fetch(tdb_printers, kbuf);
3720 if (!dbuf.dptr) {
3721 return get_a_printer_2_default(info, servername, sharename);
3724 len += tdb_unpack(dbuf.dptr+len, dbuf.dsize-len, "dddddddddddfffffPfffff",
3725 &info->attributes,
3726 &info->priority,
3727 &info->default_priority,
3728 &info->starttime,
3729 &info->untiltime,
3730 &info->status,
3731 &info->cjobs,
3732 &info->averageppm,
3733 &info->changeid,
3734 &info->c_setprinter,
3735 &info->setuptime,
3736 info->servername,
3737 info->printername,
3738 info->sharename,
3739 info->portname,
3740 info->drivername,
3741 info->comment,
3742 info->location,
3743 info->sepfile,
3744 info->printprocessor,
3745 info->datatype,
3746 info->parameters);
3748 /* Samba has to have shared raw drivers. */
3749 info->attributes |= PRINTER_ATTRIBUTE_SAMBA;
3750 info->attributes &= ~PRINTER_ATTRIBUTE_NOT_SAMBA;
3752 /* Restore the stripped strings. */
3753 slprintf(info->servername, sizeof(info->servername)-1, "\\\\%s", servername);
3755 if ( lp_force_printername(snum) ) {
3756 slprintf(printername, sizeof(printername)-1, "\\\\%s\\%s", servername, sharename );
3757 } else {
3758 slprintf(printername, sizeof(printername)-1, "\\\\%s\\%s", servername, info->printername);
3761 fstrcpy(info->printername, printername);
3763 len += unpack_devicemode(&info->devmode,dbuf.dptr+len, dbuf.dsize-len);
3766 * Some client drivers freak out if there is a NULL devmode
3767 * (probably the driver is not checking before accessing
3768 * the devmode pointer) --jerry
3770 * See comments in get_a_printer_2_default()
3773 if (lp_default_devmode(snum) && !info->devmode) {
3774 DEBUG(8,("get_a_printer_2: Constructing a default device mode for [%s]\n",
3775 printername));
3776 info->devmode = construct_nt_devicemode(printername);
3779 slprintf( adevice, sizeof(adevice), "%s", info->printername );
3780 if (info->devmode) {
3781 fstrcpy(info->devmode->devicename, adevice);
3784 if ( !(info->data = TALLOC_ZERO_P( info, NT_PRINTER_DATA )) ) {
3785 DEBUG(0,("unpack_values: talloc() failed!\n"));
3786 SAFE_FREE(dbuf.dptr);
3787 return WERR_NOMEM;
3789 len += unpack_values( info->data, dbuf.dptr+len, dbuf.dsize-len );
3791 /* This will get the current RPC talloc context, but we should be
3792 passing this as a parameter... fixme... JRA ! */
3794 if (!nt_printing_getsec(info, sharename, &info->secdesc_buf)) {
3795 SAFE_FREE(dbuf.dptr);
3796 return WERR_NOMEM;
3799 /* Fix for OS/2 drivers. */
3801 if (get_remote_arch() == RA_OS2) {
3802 map_to_os2_driver(info->drivername);
3805 SAFE_FREE(dbuf.dptr);
3807 DEBUG(9,("Unpacked printer [%s] name [%s] running driver [%s]\n",
3808 sharename, info->printername, info->drivername));
3810 return WERR_OK;
3813 /****************************************************************************
3814 Debugging function, dump at level 6 the struct in the logs.
3815 ****************************************************************************/
3816 static uint32 dump_a_printer(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
3818 uint32 result;
3819 NT_PRINTER_INFO_LEVEL_2 *info2;
3821 DEBUG(106,("Dumping printer at level [%d]\n", level));
3823 switch (level) {
3824 case 2:
3826 if (printer->info_2 == NULL)
3827 result=5;
3828 else
3830 info2=printer->info_2;
3832 DEBUGADD(106,("attributes:[%d]\n", info2->attributes));
3833 DEBUGADD(106,("priority:[%d]\n", info2->priority));
3834 DEBUGADD(106,("default_priority:[%d]\n", info2->default_priority));
3835 DEBUGADD(106,("starttime:[%d]\n", info2->starttime));
3836 DEBUGADD(106,("untiltime:[%d]\n", info2->untiltime));
3837 DEBUGADD(106,("status:[%d]\n", info2->status));
3838 DEBUGADD(106,("cjobs:[%d]\n", info2->cjobs));
3839 DEBUGADD(106,("averageppm:[%d]\n", info2->averageppm));
3840 DEBUGADD(106,("changeid:[%d]\n", info2->changeid));
3841 DEBUGADD(106,("c_setprinter:[%d]\n", info2->c_setprinter));
3842 DEBUGADD(106,("setuptime:[%d]\n", info2->setuptime));
3844 DEBUGADD(106,("servername:[%s]\n", info2->servername));
3845 DEBUGADD(106,("printername:[%s]\n", info2->printername));
3846 DEBUGADD(106,("sharename:[%s]\n", info2->sharename));
3847 DEBUGADD(106,("portname:[%s]\n", info2->portname));
3848 DEBUGADD(106,("drivername:[%s]\n", info2->drivername));
3849 DEBUGADD(106,("comment:[%s]\n", info2->comment));
3850 DEBUGADD(106,("location:[%s]\n", info2->location));
3851 DEBUGADD(106,("sepfile:[%s]\n", info2->sepfile));
3852 DEBUGADD(106,("printprocessor:[%s]\n", info2->printprocessor));
3853 DEBUGADD(106,("datatype:[%s]\n", info2->datatype));
3854 DEBUGADD(106,("parameters:[%s]\n", info2->parameters));
3855 result=0;
3857 break;
3859 default:
3860 DEBUGADD(106,("dump_a_printer: Level %u not implemented\n", (unsigned int)level ));
3861 result=1;
3862 break;
3865 return result;
3868 /****************************************************************************
3869 Update the changeid time.
3870 This is SO NASTY as some drivers need this to change, others need it
3871 static. This value will change every second, and I must hope that this
3872 is enough..... DON'T CHANGE THIS CODE WITHOUT A TEST MATRIX THE SIZE OF
3873 UTAH ! JRA.
3874 ****************************************************************************/
3876 static uint32 rev_changeid(void)
3878 struct timeval tv;
3880 get_process_uptime(&tv);
3882 #if 1 /* JERRY */
3883 /* Return changeid as msec since spooler restart */
3884 return tv.tv_sec * 1000 + tv.tv_usec / 1000;
3885 #else
3887 * This setting seems to work well but is too untested
3888 * to replace the above calculation. Left in for experiementation
3889 * of the reader --jerry (Tue Mar 12 09:15:05 CST 2002)
3891 return tv.tv_sec * 10 + tv.tv_usec / 100000;
3892 #endif
3897 * The function below are the high level ones.
3898 * only those ones must be called from the spoolss code.
3899 * JFM.
3902 /****************************************************************************
3903 Modify a printer. This is called from SETPRINTERDATA/DELETEPRINTERDATA.
3904 ****************************************************************************/
3906 WERROR mod_a_printer(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
3908 WERROR result;
3910 dump_a_printer(printer, level);
3912 switch (level) {
3913 case 2:
3916 * Update the changestamp. Emperical tests show that the
3917 * ChangeID is always updated,but c_setprinter is
3918 * global spooler variable (not per printer).
3921 /* ChangeID **must** be increasing over the lifetime
3922 of client's spoolss service in order for the
3923 client's cache to show updates */
3925 printer->info_2->changeid = rev_changeid();
3928 * Because one day someone will ask:
3929 * NT->NT An admin connection to a remote
3930 * printer show changes imeediately in
3931 * the properities dialog
3933 * A non-admin connection will only show the
3934 * changes after viewing the properites page
3935 * 2 times. Seems to be related to a
3936 * race condition in the client between the spooler
3937 * updating the local cache and the Explorer.exe GUI
3938 * actually displaying the properties.
3940 * This is fixed in Win2k. admin/non-admin
3941 * connections both display changes immediately.
3943 * 14/12/01 --jerry
3946 result=update_a_printer_2(printer->info_2);
3948 break;
3950 default:
3951 result=WERR_UNKNOWN_LEVEL;
3952 break;
3955 return result;
3958 /****************************************************************************
3959 Initialize printer devmode & data with previously saved driver init values.
3960 ****************************************************************************/
3962 static BOOL set_driver_init_2( NT_PRINTER_INFO_LEVEL_2 *info_ptr )
3964 int len = 0;
3965 pstring key;
3966 TDB_DATA kbuf, dbuf;
3967 NT_PRINTER_INFO_LEVEL_2 info;
3970 ZERO_STRUCT(info);
3973 * Delete any printer data 'values' already set. When called for driver
3974 * replace, there will generally be some, but during an add printer, there
3975 * should not be any (if there are delete them).
3978 if ( info_ptr->data )
3979 delete_all_printer_data( info_ptr, "" );
3981 slprintf(key, sizeof(key)-1, "%s%s", DRIVER_INIT_PREFIX, info_ptr->drivername);
3983 kbuf.dptr = key;
3984 kbuf.dsize = strlen(key)+1;
3986 dbuf = tdb_fetch(tdb_drivers, kbuf);
3987 if (!dbuf.dptr) {
3989 * When changing to a driver that has no init info in the tdb, remove
3990 * the previous drivers init info and leave the new on blank.
3992 free_nt_devicemode(&info_ptr->devmode);
3993 return False;
3997 * Get the saved DEVMODE..
4000 len += unpack_devicemode(&info.devmode,dbuf.dptr+len, dbuf.dsize-len);
4003 * The saved DEVMODE contains the devicename from the printer used during
4004 * the initialization save. Change it to reflect the new printer.
4007 if ( info.devmode ) {
4008 ZERO_STRUCT(info.devmode->devicename);
4009 fstrcpy(info.devmode->devicename, info_ptr->printername);
4013 * NT/2k does not change out the entire DeviceMode of a printer
4014 * when changing the driver. Only the driverextra, private, &
4015 * driverversion fields. --jerry (Thu Mar 14 08:58:43 CST 2002)
4017 * Later examination revealed that Windows NT/2k does reset the
4018 * the printer's device mode, bit **only** when you change a
4019 * property of the device mode such as the page orientation.
4020 * --jerry
4024 /* Bind the saved DEVMODE to the new the printer */
4026 free_nt_devicemode(&info_ptr->devmode);
4027 info_ptr->devmode = info.devmode;
4029 DEBUG(10,("set_driver_init_2: Set printer [%s] init %s DEVMODE for driver [%s]\n",
4030 info_ptr->printername, info_ptr->devmode?"VALID":"NULL", info_ptr->drivername));
4032 /* Add the printer data 'values' to the new printer */
4034 if ( !(info_ptr->data = TALLOC_ZERO_P( info_ptr, NT_PRINTER_DATA )) ) {
4035 DEBUG(0,("set_driver_init_2: talloc() failed!\n"));
4036 return False;
4039 len += unpack_values( info_ptr->data, dbuf.dptr+len, dbuf.dsize-len );
4042 SAFE_FREE(dbuf.dptr);
4044 return True;
4047 /****************************************************************************
4048 Initialize printer devmode & data with previously saved driver init values.
4049 When a printer is created using AddPrinter, the drivername bound to the
4050 printer is used to lookup previously saved driver initialization info, which
4051 is bound to the new printer.
4052 ****************************************************************************/
4054 BOOL set_driver_init(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
4056 BOOL result = False;
4058 switch (level) {
4059 case 2:
4060 result = set_driver_init_2(printer->info_2);
4061 break;
4063 default:
4064 DEBUG(0,("set_driver_init: Programmer's error! Unknown driver_init level [%d]\n",
4065 level));
4066 break;
4069 return result;
4072 /****************************************************************************
4073 Delete driver init data stored for a specified driver
4074 ****************************************************************************/
4076 BOOL del_driver_init(char *drivername)
4078 pstring key;
4079 TDB_DATA kbuf;
4081 if (!drivername || !*drivername) {
4082 DEBUG(3,("del_driver_init: No drivername specified!\n"));
4083 return False;
4086 slprintf(key, sizeof(key)-1, "%s%s", DRIVER_INIT_PREFIX, drivername);
4088 kbuf.dptr = key;
4089 kbuf.dsize = strlen(key)+1;
4091 DEBUG(6,("del_driver_init: Removing driver init data for [%s]\n", drivername));
4093 return (tdb_delete(tdb_drivers, kbuf) == 0);
4096 /****************************************************************************
4097 Pack up the DEVMODE and values for a printer into a 'driver init' entry
4098 in the tdb. Note: this is different from the driver entry and the printer
4099 entry. There should be a single driver init entry for each driver regardless
4100 of whether it was installed from NT or 2K. Technically, they should be
4101 different, but they work out to the same struct.
4102 ****************************************************************************/
4104 static uint32 update_driver_init_2(NT_PRINTER_INFO_LEVEL_2 *info)
4106 pstring key;
4107 char *buf;
4108 int buflen, len, ret;
4109 TDB_DATA kbuf, dbuf;
4111 buf = NULL;
4112 buflen = 0;
4114 again:
4115 len = 0;
4116 len += pack_devicemode(info->devmode, buf+len, buflen-len);
4118 len += pack_values( info->data, buf+len, buflen-len );
4120 if (buflen < len) {
4121 buf = (char *)SMB_REALLOC(buf, len);
4122 if (!buf) {
4123 DEBUG(0, ("update_driver_init_2: failed to enlarge buffer!\n"));
4124 ret = -1;
4125 goto done;
4127 buflen = len;
4128 goto again;
4131 slprintf(key, sizeof(key)-1, "%s%s", DRIVER_INIT_PREFIX, info->drivername);
4133 kbuf.dptr = key;
4134 kbuf.dsize = strlen(key)+1;
4135 dbuf.dptr = buf;
4136 dbuf.dsize = len;
4138 ret = tdb_store(tdb_drivers, kbuf, dbuf, TDB_REPLACE);
4140 done:
4141 if (ret == -1)
4142 DEBUG(8, ("update_driver_init_2: error updating printer init to tdb on disk\n"));
4144 SAFE_FREE(buf);
4146 DEBUG(10,("update_driver_init_2: Saved printer [%s] init DEVMODE & values for driver [%s]\n",
4147 info->sharename, info->drivername));
4149 return ret;
4152 /****************************************************************************
4153 Update (i.e. save) the driver init info (DEVMODE and values) for a printer
4154 ****************************************************************************/
4156 static uint32 update_driver_init(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
4158 uint32 result;
4160 dump_a_printer(printer, level);
4162 switch (level) {
4163 case 2:
4164 result = update_driver_init_2(printer->info_2);
4165 break;
4166 default:
4167 result = 1;
4168 break;
4171 return result;
4174 /****************************************************************************
4175 Convert the printer data value, a REG_BINARY array, into an initialization
4176 DEVMODE. Note: the array must be parsed as if it was a DEVMODE in an rpc...
4177 got to keep the endians happy :).
4178 ****************************************************************************/
4180 static BOOL convert_driver_init( TALLOC_CTX *ctx, NT_DEVICEMODE *nt_devmode, uint8 *data, uint32 data_len )
4182 BOOL result = False;
4183 prs_struct ps;
4184 DEVICEMODE devmode;
4186 ZERO_STRUCT(devmode);
4188 prs_init(&ps, 0, ctx, UNMARSHALL);
4189 ps.data_p = (char *)data;
4190 ps.buffer_size = data_len;
4192 if (spoolss_io_devmode("phantom DEVMODE", &ps, 0, &devmode))
4193 result = convert_devicemode("", &devmode, &nt_devmode);
4194 else
4195 DEBUG(10,("convert_driver_init: error parsing DEVMODE\n"));
4197 return result;
4200 /****************************************************************************
4201 Set the DRIVER_INIT info in the tdb. Requires Win32 client code that:
4203 1. Use the driver's config DLL to this UNC printername and:
4204 a. Call DrvPrintEvent with PRINTER_EVENT_INITIALIZE
4205 b. Call DrvConvertDevMode with CDM_DRIVER_DEFAULT to get default DEVMODE
4206 2. Call SetPrinterData with the 'magic' key and the DEVMODE as data.
4208 The last step triggers saving the "driver initialization" information for
4209 this printer into the tdb. Later, new printers that use this driver will
4210 have this initialization information bound to them. This simulates the
4211 driver initialization, as if it had run on the Samba server (as it would
4212 have done on NT).
4214 The Win32 client side code requirement sucks! But until we can run arbitrary
4215 Win32 printer driver code on any Unix that Samba runs on, we are stuck with it.
4217 It would have been easier to use SetPrinter because all the UNMARSHALLING of
4218 the DEVMODE is done there, but 2K/XP clients do not set the DEVMODE... think
4219 about it and you will realize why. JRR 010720
4220 ****************************************************************************/
4222 static WERROR save_driver_init_2(NT_PRINTER_INFO_LEVEL *printer, uint8 *data, uint32 data_len )
4224 WERROR status = WERR_OK;
4225 TALLOC_CTX *ctx = NULL;
4226 NT_DEVICEMODE *nt_devmode = NULL;
4227 NT_DEVICEMODE *tmp_devmode = printer->info_2->devmode;
4230 * When the DEVMODE is already set on the printer, don't try to unpack it.
4232 DEBUG(8,("save_driver_init_2: Enter...\n"));
4234 if ( !printer->info_2->devmode && data_len ) {
4236 * Set devmode on printer info, so entire printer initialization can be
4237 * saved to tdb.
4240 if ((ctx = talloc_init("save_driver_init_2")) == NULL)
4241 return WERR_NOMEM;
4243 if ((nt_devmode = SMB_MALLOC_P(NT_DEVICEMODE)) == NULL) {
4244 status = WERR_NOMEM;
4245 goto done;
4248 ZERO_STRUCTP(nt_devmode);
4251 * The DEVMODE is held in the 'data' component of the param in raw binary.
4252 * Convert it to to a devmode structure
4254 if ( !convert_driver_init( ctx, nt_devmode, data, data_len )) {
4255 DEBUG(10,("save_driver_init_2: error converting DEVMODE\n"));
4256 status = WERR_INVALID_PARAM;
4257 goto done;
4260 printer->info_2->devmode = nt_devmode;
4264 * Pack up and add (or update) the DEVMODE and any current printer data to
4265 * a 'driver init' element in the tdb
4269 if ( update_driver_init(printer, 2) != 0 ) {
4270 DEBUG(10,("save_driver_init_2: error updating DEVMODE\n"));
4271 status = WERR_NOMEM;
4272 goto done;
4276 * If driver initialization info was successfully saved, set the current
4277 * printer to match it. This allows initialization of the current printer
4278 * as well as the driver.
4280 status = mod_a_printer(printer, 2);
4281 if (!W_ERROR_IS_OK(status)) {
4282 DEBUG(10,("save_driver_init_2: error setting DEVMODE on printer [%s]\n",
4283 printer->info_2->printername));
4286 done:
4287 talloc_destroy(ctx);
4288 free_nt_devicemode( &nt_devmode );
4290 printer->info_2->devmode = tmp_devmode;
4292 return status;
4295 /****************************************************************************
4296 Update the driver init info (DEVMODE and specifics) for a printer
4297 ****************************************************************************/
4299 WERROR save_driver_init(NT_PRINTER_INFO_LEVEL *printer, uint32 level, uint8 *data, uint32 data_len)
4301 WERROR status = WERR_OK;
4303 switch (level) {
4304 case 2:
4305 status = save_driver_init_2( printer, data, data_len );
4306 break;
4307 default:
4308 status = WERR_UNKNOWN_LEVEL;
4309 break;
4312 return status;
4315 /****************************************************************************
4316 Get a NT_PRINTER_INFO_LEVEL struct. It returns malloced memory.
4318 Previously the code had a memory allocation problem because it always
4319 used the TALLOC_CTX from the Printer_entry*. This context lasts
4320 as a long as the original handle is open. So if the client made a lot
4321 of getprinter[data]() calls, the memory usage would climb. Now we use
4322 a short lived TALLOC_CTX for printer_info_2 objects returned. We
4323 still use the Printer_entry->ctx for maintaining the cache copy though
4324 since that object must live as long as the handle by definition.
4325 --jerry
4327 ****************************************************************************/
4329 WERROR get_a_printer( Printer_entry *print_hnd, NT_PRINTER_INFO_LEVEL **pp_printer, uint32 level,
4330 const char *sharename)
4332 WERROR result;
4333 fstring servername;
4335 DEBUG(10,("get_a_printer: [%s] level %u\n", sharename, (unsigned int)level));
4337 if ( !(*pp_printer = TALLOC_ZERO_P(NULL, NT_PRINTER_INFO_LEVEL)) ) {
4338 DEBUG(0,("get_a_printer: talloc() fail.\n"));
4339 return WERR_NOMEM;
4342 switch (level) {
4343 case 2:
4344 if ( !((*pp_printer)->info_2 = TALLOC_ZERO_P(*pp_printer, NT_PRINTER_INFO_LEVEL_2)) ) {
4345 DEBUG(0,("get_a_printer: talloc() fail.\n"));
4346 TALLOC_FREE( *pp_printer );
4347 return WERR_NOMEM;
4350 if ( print_hnd )
4351 fstrcpy( servername, print_hnd->servername );
4352 else {
4353 fstrcpy( servername, "%L" );
4354 standard_sub_basic( "", servername, sizeof(servername)-1 );
4357 result = get_a_printer_2( (*pp_printer)->info_2, servername, sharename );
4360 /* we have a new printer now. Save it with this handle */
4362 if ( !W_ERROR_IS_OK(result) ) {
4363 TALLOC_FREE( *pp_printer );
4364 DEBUG(10,("get_a_printer: [%s] level %u returning %s\n",
4365 sharename, (unsigned int)level, dos_errstr(result)));
4366 return result;
4369 dump_a_printer( *pp_printer, level);
4371 break;
4373 default:
4374 TALLOC_FREE( *pp_printer );
4375 return WERR_UNKNOWN_LEVEL;
4378 return WERR_OK;
4381 /****************************************************************************
4382 Deletes a NT_PRINTER_INFO_LEVEL struct.
4383 ****************************************************************************/
4385 uint32 free_a_printer(NT_PRINTER_INFO_LEVEL **pp_printer, uint32 level)
4387 NT_PRINTER_INFO_LEVEL *printer = *pp_printer;
4389 if ( !printer )
4390 return 0;
4392 switch (level) {
4393 case 2:
4394 if ( printer->info_2 )
4395 free_nt_printer_info_level_2(&printer->info_2);
4396 break;
4398 default:
4399 DEBUG(0,("free_a_printer: unknown level! [%d]\n", level ));
4400 return 1;
4403 TALLOC_FREE(*pp_printer);
4405 return 0;
4408 /****************************************************************************
4409 ****************************************************************************/
4410 uint32 add_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL driver, uint32 level)
4412 uint32 result;
4413 DEBUG(104,("adding a printer at level [%d]\n", level));
4414 dump_a_printer_driver(driver, level);
4416 switch (level) {
4417 case 3:
4418 result=add_a_printer_driver_3(driver.info_3);
4419 break;
4421 case 6:
4422 result=add_a_printer_driver_6(driver.info_6);
4423 break;
4425 default:
4426 result=1;
4427 break;
4430 return result;
4432 /****************************************************************************
4433 ****************************************************************************/
4435 WERROR get_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL *driver, uint32 level,
4436 fstring drivername, const char *architecture, uint32 version)
4438 WERROR result;
4440 switch (level) {
4441 case 3:
4442 /* Sometime we just want any version of the driver */
4444 if ( version == DRIVER_ANY_VERSION ) {
4445 /* look for Win2k first and then for NT4 */
4446 result = get_a_printer_driver_3(&driver->info_3, drivername,
4447 architecture, 3);
4449 if ( !W_ERROR_IS_OK(result) ) {
4450 result = get_a_printer_driver_3( &driver->info_3,
4451 drivername, architecture, 2 );
4453 } else {
4454 result = get_a_printer_driver_3(&driver->info_3, drivername,
4455 architecture, version);
4457 break;
4459 default:
4460 result=W_ERROR(1);
4461 break;
4464 if (W_ERROR_IS_OK(result))
4465 dump_a_printer_driver(*driver, level);
4467 return result;
4470 /****************************************************************************
4471 ****************************************************************************/
4472 uint32 free_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL driver, uint32 level)
4474 uint32 result;
4476 switch (level) {
4477 case 3:
4479 NT_PRINTER_DRIVER_INFO_LEVEL_3 *info3;
4480 if (driver.info_3 != NULL)
4482 info3=driver.info_3;
4483 SAFE_FREE(info3->dependentfiles);
4484 ZERO_STRUCTP(info3);
4485 SAFE_FREE(info3);
4486 result=0;
4487 } else {
4488 result=4;
4490 break;
4492 case 6:
4494 NT_PRINTER_DRIVER_INFO_LEVEL_6 *info6;
4495 if (driver.info_6 != NULL) {
4496 info6=driver.info_6;
4497 SAFE_FREE(info6->dependentfiles);
4498 SAFE_FREE(info6->previousnames);
4499 ZERO_STRUCTP(info6);
4500 SAFE_FREE(info6);
4501 result=0;
4502 } else {
4503 result=4;
4505 break;
4507 default:
4508 result=1;
4509 break;
4511 return result;
4515 /****************************************************************************
4516 Determine whether or not a particular driver is currently assigned
4517 to a printer
4518 ****************************************************************************/
4520 BOOL printer_driver_in_use ( NT_PRINTER_DRIVER_INFO_LEVEL_3 *info_3 )
4522 int snum;
4523 int n_services = lp_numservices();
4524 NT_PRINTER_INFO_LEVEL *printer = NULL;
4525 BOOL in_use = False;
4527 if ( !info_3 )
4528 return False;
4530 DEBUG(10,("printer_driver_in_use: Beginning search through ntprinters.tdb...\n"));
4532 /* loop through the printers.tdb and check for the drivername */
4534 for (snum=0; snum<n_services && !in_use; snum++) {
4535 if ( !(lp_snum_ok(snum) && lp_print_ok(snum) ) )
4536 continue;
4538 if ( !W_ERROR_IS_OK(get_a_printer(NULL, &printer, 2, lp_servicename(snum))) )
4539 continue;
4541 if ( strequal(info_3->name, printer->info_2->drivername) )
4542 in_use = True;
4544 free_a_printer( &printer, 2 );
4547 DEBUG(10,("printer_driver_in_use: Completed search through ntprinters.tdb...\n"));
4549 if ( in_use ) {
4550 NT_PRINTER_DRIVER_INFO_LEVEL d;
4551 WERROR werr;
4553 DEBUG(5,("printer_driver_in_use: driver \"%s\" is currently in use\n", info_3->name));
4555 /* we can still remove the driver if there is one of
4556 "Windows NT x86" version 2 or 3 left */
4558 if ( !strequal( "Windows NT x86", info_3->environment ) ) {
4559 werr = get_a_printer_driver( &d, 3, info_3->name, "Windows NT x86", DRIVER_ANY_VERSION );
4561 else {
4562 switch ( info_3->cversion ) {
4563 case 2:
4564 werr = get_a_printer_driver( &d, 3, info_3->name, "Windows NT x86", 3 );
4565 break;
4566 case 3:
4567 werr = get_a_printer_driver( &d, 3, info_3->name, "Windows NT x86", 2 );
4568 break;
4569 default:
4570 DEBUG(0,("printer_driver_in_use: ERROR! unknown driver version (%d)\n",
4571 info_3->cversion));
4572 werr = WERR_UNKNOWN_PRINTER_DRIVER;
4573 break;
4577 /* now check the error code */
4579 if ( W_ERROR_IS_OK(werr) ) {
4580 /* it's ok to remove the driver, we have other architctures left */
4581 in_use = False;
4582 free_a_printer_driver( d, 3 );
4586 /* report that the driver is not in use by default */
4588 return in_use;
4592 /**********************************************************************
4593 Check to see if a ogiven file is in use by *info
4594 *********************************************************************/
4596 static BOOL drv_file_in_use( char* file, NT_PRINTER_DRIVER_INFO_LEVEL_3 *info )
4598 int i = 0;
4600 if ( !info )
4601 return False;
4603 if ( strequal(file, info->driverpath) )
4604 return True;
4606 if ( strequal(file, info->datafile) )
4607 return True;
4609 if ( strequal(file, info->configfile) )
4610 return True;
4612 if ( strequal(file, info->helpfile) )
4613 return True;
4615 /* see of there are any dependent files to examine */
4617 if ( !info->dependentfiles )
4618 return False;
4620 while ( *info->dependentfiles[i] ) {
4621 if ( strequal(file, info->dependentfiles[i]) )
4622 return True;
4623 i++;
4626 return False;
4630 /**********************************************************************
4631 Utility function to remove the dependent file pointed to by the
4632 input parameter from the list
4633 *********************************************************************/
4635 static void trim_dependent_file( fstring files[], int idx )
4638 /* bump everything down a slot */
4640 while( *files[idx+1] ) {
4641 fstrcpy( files[idx], files[idx+1] );
4642 idx++;
4645 *files[idx] = '\0';
4647 return;
4650 /**********************************************************************
4651 Check if any of the files used by src are also used by drv
4652 *********************************************************************/
4654 static BOOL trim_overlap_drv_files( NT_PRINTER_DRIVER_INFO_LEVEL_3 *src,
4655 NT_PRINTER_DRIVER_INFO_LEVEL_3 *drv )
4657 BOOL in_use = False;
4658 int i = 0;
4660 if ( !src || !drv )
4661 return False;
4663 /* check each file. Remove it from the src structure if it overlaps */
4665 if ( drv_file_in_use(src->driverpath, drv) ) {
4666 in_use = True;
4667 DEBUG(10,("Removing driverfile [%s] from list\n", src->driverpath));
4668 fstrcpy( src->driverpath, "" );
4671 if ( drv_file_in_use(src->datafile, drv) ) {
4672 in_use = True;
4673 DEBUG(10,("Removing datafile [%s] from list\n", src->datafile));
4674 fstrcpy( src->datafile, "" );
4677 if ( drv_file_in_use(src->configfile, drv) ) {
4678 in_use = True;
4679 DEBUG(10,("Removing configfile [%s] from list\n", src->configfile));
4680 fstrcpy( src->configfile, "" );
4683 if ( drv_file_in_use(src->helpfile, drv) ) {
4684 in_use = True;
4685 DEBUG(10,("Removing helpfile [%s] from list\n", src->helpfile));
4686 fstrcpy( src->helpfile, "" );
4689 /* are there any dependentfiles to examine? */
4691 if ( !src->dependentfiles )
4692 return in_use;
4694 while ( *src->dependentfiles[i] ) {
4695 if ( drv_file_in_use(src->dependentfiles[i], drv) ) {
4696 in_use = True;
4697 DEBUG(10,("Removing [%s] from dependent file list\n", src->dependentfiles[i]));
4698 trim_dependent_file( src->dependentfiles, i );
4699 } else
4700 i++;
4703 return in_use;
4706 /****************************************************************************
4707 Determine whether or not a particular driver files are currently being
4708 used by any other driver.
4710 Return value is True if any files were in use by other drivers
4711 and False otherwise.
4713 Upon return, *info has been modified to only contain the driver files
4714 which are not in use
4715 ****************************************************************************/
4717 BOOL printer_driver_files_in_use ( NT_PRINTER_DRIVER_INFO_LEVEL_3 *info )
4719 int i;
4720 int ndrivers;
4721 uint32 version;
4722 fstring *list = NULL;
4723 NT_PRINTER_DRIVER_INFO_LEVEL driver;
4725 if ( !info )
4726 return False;
4728 version = info->cversion;
4730 /* loop over all driver versions */
4732 DEBUG(5,("printer_driver_files_in_use: Beginning search through ntdrivers.tdb...\n"));
4734 /* get the list of drivers */
4736 list = NULL;
4737 ndrivers = get_ntdrivers(&list, info->environment, version);
4739 DEBUGADD(4,("we have:[%d] drivers in environment [%s] and version [%d]\n",
4740 ndrivers, info->environment, version));
4742 /* check each driver for overlap in files */
4744 for (i=0; i<ndrivers; i++) {
4745 DEBUGADD(5,("\tdriver: [%s]\n", list[i]));
4747 ZERO_STRUCT(driver);
4749 if ( !W_ERROR_IS_OK(get_a_printer_driver(&driver, 3, list[i], info->environment, version)) ) {
4750 SAFE_FREE(list);
4751 return True;
4754 /* check if d2 uses any files from d1 */
4755 /* only if this is a different driver than the one being deleted */
4757 if ( !strequal(info->name, driver.info_3->name) ) {
4758 if ( trim_overlap_drv_files(info, driver.info_3) ) {
4759 free_a_printer_driver(driver, 3);
4760 SAFE_FREE( list );
4761 return True;
4765 free_a_printer_driver(driver, 3);
4768 SAFE_FREE(list);
4770 DEBUG(5,("printer_driver_files_in_use: Completed search through ntdrivers.tdb...\n"));
4772 driver.info_3 = info;
4774 if ( DEBUGLEVEL >= 20 )
4775 dump_a_printer_driver( driver, 3 );
4777 return False;
4780 /****************************************************************************
4781 Actually delete the driver files. Make sure that
4782 printer_driver_files_in_use() return False before calling
4783 this.
4784 ****************************************************************************/
4786 static BOOL delete_driver_files( NT_PRINTER_DRIVER_INFO_LEVEL_3 *info_3, struct current_user *user )
4788 int i = 0;
4789 char *s;
4790 pstring file;
4791 connection_struct *conn;
4792 DATA_BLOB null_pw;
4793 NTSTATUS nt_status;
4794 fstring res_type;
4795 BOOL bad_path;
4796 SMB_STRUCT_STAT st;
4798 if ( !info_3 )
4799 return False;
4801 DEBUG(6,("delete_driver_files: deleting driver [%s] - version [%d]\n", info_3->name, info_3->cversion));
4804 * Connect to the print$ share under the same account as the
4805 * user connected to the rpc pipe. Note we must be root to
4806 * do this.
4809 null_pw = data_blob( NULL, 0 );
4810 fstrcpy(res_type, "A:");
4811 become_root();
4812 conn = make_connection_with_chdir( "print$", null_pw, res_type, user->vuid, &nt_status );
4813 unbecome_root();
4815 if ( !conn ) {
4816 DEBUG(0,("delete_driver_files: Unable to connect\n"));
4817 return False;
4820 if ( !CAN_WRITE(conn) ) {
4821 DEBUG(3,("delete_driver_files: Cannot delete print driver when [print$] is read-only\n"));
4822 return False;
4825 /* Save who we are - we are temporarily becoming the connection user. */
4827 if ( !become_user(conn, conn->vuid) ) {
4828 DEBUG(0,("delete_driver_files: Can't become user!\n"));
4829 return False;
4832 /* now delete the files; must strip the '\print$' string from
4833 fron of path */
4835 if ( *info_3->driverpath ) {
4836 if ( (s = strchr( &info_3->driverpath[1], '\\' )) != NULL ) {
4837 pstrcpy( file, s );
4838 driver_unix_convert(file, conn, NULL, &bad_path, &st);
4839 DEBUG(10,("deleting driverfile [%s]\n", s));
4840 unlink_internals(conn, 0, file, False);
4844 if ( *info_3->configfile ) {
4845 if ( (s = strchr( &info_3->configfile[1], '\\' )) != NULL ) {
4846 pstrcpy( file, s );
4847 driver_unix_convert(file, conn, NULL, &bad_path, &st);
4848 DEBUG(10,("deleting configfile [%s]\n", s));
4849 unlink_internals(conn, 0, file, False);
4853 if ( *info_3->datafile ) {
4854 if ( (s = strchr( &info_3->datafile[1], '\\' )) != NULL ) {
4855 pstrcpy( file, s );
4856 driver_unix_convert(file, conn, NULL, &bad_path, &st);
4857 DEBUG(10,("deleting datafile [%s]\n", s));
4858 unlink_internals(conn, 0, file, False);
4862 if ( *info_3->helpfile ) {
4863 if ( (s = strchr( &info_3->helpfile[1], '\\' )) != NULL ) {
4864 pstrcpy( file, s );
4865 driver_unix_convert(file, conn, NULL, &bad_path, &st);
4866 DEBUG(10,("deleting helpfile [%s]\n", s));
4867 unlink_internals(conn, 0, file, False);
4871 /* check if we are done removing files */
4873 if ( info_3->dependentfiles ) {
4874 while ( info_3->dependentfiles[i][0] ) {
4875 char *p;
4877 /* bypass the "\print$" portion of the path */
4879 if ( (p = strchr( info_3->dependentfiles[i]+1, '\\' )) != NULL ) {
4880 pstrcpy( file, p );
4881 driver_unix_convert(file, conn, NULL, &bad_path, &st);
4882 DEBUG(10,("deleting dependent file [%s]\n", file));
4883 unlink_internals(conn, 0, file, False);
4886 i++;
4890 unbecome_user();
4892 return True;
4895 /****************************************************************************
4896 Remove a printer driver from the TDB. This assumes that the the driver was
4897 previously looked up.
4898 ***************************************************************************/
4900 WERROR delete_printer_driver( NT_PRINTER_DRIVER_INFO_LEVEL_3 *info_3, struct current_user *user,
4901 uint32 version, BOOL delete_files )
4903 pstring key;
4904 const char *arch;
4905 TDB_DATA kbuf, dbuf;
4906 NT_PRINTER_DRIVER_INFO_LEVEL ctr;
4908 /* delete the tdb data first */
4910 arch = get_short_archi(info_3->environment);
4911 if (!arch) {
4912 return WERR_UNKNOWN_PRINTER_DRIVER;
4914 slprintf(key, sizeof(key)-1, "%s%s/%d/%s", DRIVERS_PREFIX,
4915 arch, version, info_3->name);
4917 DEBUG(5,("delete_printer_driver: key = [%s] delete_files = %s\n",
4918 key, delete_files ? "TRUE" : "FALSE" ));
4920 ctr.info_3 = info_3;
4921 dump_a_printer_driver( ctr, 3 );
4923 kbuf.dptr=key;
4924 kbuf.dsize=strlen(key)+1;
4926 /* check if the driver actually exists for this environment */
4928 dbuf = tdb_fetch( tdb_drivers, kbuf );
4929 if ( !dbuf.dptr ) {
4930 DEBUG(8,("delete_printer_driver: Driver unknown [%s]\n", key));
4931 return WERR_UNKNOWN_PRINTER_DRIVER;
4934 SAFE_FREE( dbuf.dptr );
4936 /* ok... the driver exists so the delete should return success */
4938 if (tdb_delete(tdb_drivers, kbuf) == -1) {
4939 DEBUG (0,("delete_printer_driver: fail to delete %s!\n", key));
4940 return WERR_ACCESS_DENIED;
4944 * now delete any associated files if delete_files == True
4945 * even if this part failes, we return succes because the
4946 * driver doesn not exist any more
4949 if ( delete_files )
4950 delete_driver_files( info_3, user );
4953 DEBUG(5,("delete_printer_driver: driver delete successful [%s]\n", key));
4955 return WERR_OK;
4958 /****************************************************************************
4959 Store a security desc for a printer.
4960 ****************************************************************************/
4962 WERROR nt_printing_setsec(const char *sharename, SEC_DESC_BUF *secdesc_ctr)
4964 SEC_DESC_BUF *new_secdesc_ctr = NULL;
4965 SEC_DESC_BUF *old_secdesc_ctr = NULL;
4966 prs_struct ps;
4967 TALLOC_CTX *mem_ctx = NULL;
4968 char *key;
4969 WERROR status;
4971 mem_ctx = talloc_init("nt_printing_setsec");
4972 if (mem_ctx == NULL)
4973 return WERR_NOMEM;
4975 /* The old owner and group sids of the security descriptor are not
4976 present when new ACEs are added or removed by changing printer
4977 permissions through NT. If they are NULL in the new security
4978 descriptor then copy them over from the old one. */
4980 if (!secdesc_ctr->sec->owner_sid || !secdesc_ctr->sec->grp_sid) {
4981 DOM_SID *owner_sid, *group_sid;
4982 SEC_ACL *dacl, *sacl;
4983 SEC_DESC *psd = NULL;
4984 size_t size;
4986 if (!nt_printing_getsec(mem_ctx, sharename, &old_secdesc_ctr)) {
4987 status = WERR_NOMEM;
4988 goto out;
4991 /* Pick out correct owner and group sids */
4993 owner_sid = secdesc_ctr->sec->owner_sid ?
4994 secdesc_ctr->sec->owner_sid :
4995 old_secdesc_ctr->sec->owner_sid;
4997 group_sid = secdesc_ctr->sec->grp_sid ?
4998 secdesc_ctr->sec->grp_sid :
4999 old_secdesc_ctr->sec->grp_sid;
5001 dacl = secdesc_ctr->sec->dacl ?
5002 secdesc_ctr->sec->dacl :
5003 old_secdesc_ctr->sec->dacl;
5005 sacl = secdesc_ctr->sec->sacl ?
5006 secdesc_ctr->sec->sacl :
5007 old_secdesc_ctr->sec->sacl;
5009 /* Make a deep copy of the security descriptor */
5011 psd = make_sec_desc(mem_ctx, secdesc_ctr->sec->revision, secdesc_ctr->sec->type,
5012 owner_sid, group_sid,
5013 sacl,
5014 dacl,
5015 &size);
5017 if (!psd) {
5018 status = WERR_NOMEM;
5019 goto out;
5022 new_secdesc_ctr = make_sec_desc_buf(mem_ctx, size, psd);
5025 if (!new_secdesc_ctr) {
5026 new_secdesc_ctr = secdesc_ctr;
5029 /* Store the security descriptor in a tdb */
5031 prs_init(&ps, (uint32)sec_desc_size(new_secdesc_ctr->sec) +
5032 sizeof(SEC_DESC_BUF), mem_ctx, MARSHALL);
5034 if (!sec_io_desc_buf("nt_printing_setsec", &new_secdesc_ctr,
5035 &ps, 1)) {
5036 status = WERR_BADFUNC;
5037 goto out;
5040 key = make_printers_secdesc_tdbkey( sharename );
5042 if (tdb_prs_store(tdb_printers, key, &ps)==0) {
5043 status = WERR_OK;
5044 } else {
5045 DEBUG(1,("Failed to store secdesc for %s\n", sharename));
5046 status = WERR_BADFUNC;
5049 /* Free malloc'ed memory */
5051 out:
5053 prs_mem_free(&ps);
5054 if (mem_ctx)
5055 talloc_destroy(mem_ctx);
5056 return status;
5059 /****************************************************************************
5060 Construct a default security descriptor buffer for a printer.
5061 ****************************************************************************/
5063 static SEC_DESC_BUF *construct_default_printer_sdb(TALLOC_CTX *ctx)
5065 SEC_ACE ace[5]; /* max number of ace entries */
5066 int i = 0;
5067 SEC_ACCESS sa;
5068 SEC_ACL *psa = NULL;
5069 SEC_DESC_BUF *sdb = NULL;
5070 SEC_DESC *psd = NULL;
5071 DOM_SID adm_sid;
5072 size_t sd_size;
5074 /* Create an ACE where Everyone is allowed to print */
5076 init_sec_access(&sa, PRINTER_ACE_PRINT);
5077 init_sec_ace(&ace[i++], &global_sid_World, SEC_ACE_TYPE_ACCESS_ALLOWED,
5078 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5080 /* Add the domain admins group if we are a DC */
5082 if ( IS_DC ) {
5083 DOM_SID domadmins_sid;
5085 sid_copy(&domadmins_sid, get_global_sam_sid());
5086 sid_append_rid(&domadmins_sid, DOMAIN_GROUP_RID_ADMINS);
5088 init_sec_access(&sa, PRINTER_ACE_FULL_CONTROL);
5089 init_sec_ace(&ace[i++], &domadmins_sid,
5090 SEC_ACE_TYPE_ACCESS_ALLOWED, sa,
5091 SEC_ACE_FLAG_OBJECT_INHERIT | SEC_ACE_FLAG_INHERIT_ONLY);
5092 init_sec_ace(&ace[i++], &domadmins_sid, SEC_ACE_TYPE_ACCESS_ALLOWED,
5093 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5095 else if (secrets_fetch_domain_sid(lp_workgroup(), &adm_sid)) {
5096 sid_append_rid(&adm_sid, DOMAIN_USER_RID_ADMIN);
5098 init_sec_access(&sa, PRINTER_ACE_FULL_CONTROL);
5099 init_sec_ace(&ace[i++], &adm_sid,
5100 SEC_ACE_TYPE_ACCESS_ALLOWED, sa,
5101 SEC_ACE_FLAG_OBJECT_INHERIT | SEC_ACE_FLAG_INHERIT_ONLY);
5102 init_sec_ace(&ace[i++], &adm_sid, SEC_ACE_TYPE_ACCESS_ALLOWED,
5103 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5106 /* add BUILTIN\Administrators as FULL CONTROL */
5108 init_sec_access(&sa, PRINTER_ACE_FULL_CONTROL);
5109 init_sec_ace(&ace[i++], &global_sid_Builtin_Administrators,
5110 SEC_ACE_TYPE_ACCESS_ALLOWED, sa,
5111 SEC_ACE_FLAG_OBJECT_INHERIT | SEC_ACE_FLAG_INHERIT_ONLY);
5112 init_sec_ace(&ace[i++], &global_sid_Builtin_Administrators,
5113 SEC_ACE_TYPE_ACCESS_ALLOWED,
5114 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5116 /* Make the security descriptor owned by the BUILTIN\Administrators */
5118 /* The ACL revision number in rpc_secdesc.h differs from the one
5119 created by NT when setting ACE entries in printer
5120 descriptors. NT4 complains about the property being edited by a
5121 NT5 machine. */
5123 if ((psa = make_sec_acl(ctx, NT4_ACL_REVISION, i, ace)) != NULL) {
5124 psd = make_sec_desc(ctx, SEC_DESC_REVISION, SEC_DESC_SELF_RELATIVE,
5125 &global_sid_Builtin_Administrators,
5126 &global_sid_Builtin_Administrators,
5127 NULL, psa, &sd_size);
5130 if (!psd) {
5131 DEBUG(0,("construct_default_printer_sd: Failed to make SEC_DESC.\n"));
5132 return NULL;
5135 sdb = make_sec_desc_buf(ctx, sd_size, psd);
5137 DEBUG(4,("construct_default_printer_sdb: size = %u.\n",
5138 (unsigned int)sd_size));
5140 return sdb;
5143 /****************************************************************************
5144 Get a security desc for a printer.
5145 ****************************************************************************/
5147 BOOL nt_printing_getsec(TALLOC_CTX *ctx, const char *sharename, SEC_DESC_BUF **secdesc_ctr)
5149 prs_struct ps;
5150 char *key;
5151 char *temp;
5153 if (strlen(sharename) > 2 && (temp = strchr(sharename + 2, '\\'))) {
5154 sharename = temp + 1;
5157 ZERO_STRUCT(ps);
5159 /* Fetch security descriptor from tdb */
5161 key = make_printers_secdesc_tdbkey( sharename );
5163 if (tdb_prs_fetch(tdb_printers, key, &ps, ctx)!=0 ||
5164 !sec_io_desc_buf("nt_printing_getsec", secdesc_ctr, &ps, 1)) {
5166 prs_mem_free(&ps);
5168 DEBUG(4,("using default secdesc for %s\n", sharename));
5170 if (!(*secdesc_ctr = construct_default_printer_sdb(ctx))) {
5171 return False;
5174 /* Save default security descriptor for later */
5176 prs_init(&ps, (uint32)sec_desc_size((*secdesc_ctr)->sec) +
5177 sizeof(SEC_DESC_BUF), ctx, MARSHALL);
5179 if (sec_io_desc_buf("nt_printing_getsec", secdesc_ctr, &ps, 1)) {
5180 tdb_prs_store(tdb_printers, key, &ps);
5183 prs_mem_free(&ps);
5185 return True;
5188 prs_mem_free(&ps);
5190 /* If security descriptor is owned by S-1-1-0 and winbindd is up,
5191 this security descriptor has been created when winbindd was
5192 down. Take ownership of security descriptor. */
5194 if (sid_equal((*secdesc_ctr)->sec->owner_sid, &global_sid_World)) {
5195 DOM_SID owner_sid;
5197 /* Change sd owner to workgroup administrator */
5199 if (secrets_fetch_domain_sid(lp_workgroup(), &owner_sid)) {
5200 SEC_DESC_BUF *new_secdesc_ctr = NULL;
5201 SEC_DESC *psd = NULL;
5202 size_t size;
5204 /* Create new sd */
5206 sid_append_rid(&owner_sid, DOMAIN_USER_RID_ADMIN);
5208 psd = make_sec_desc(ctx, (*secdesc_ctr)->sec->revision, (*secdesc_ctr)->sec->type,
5209 &owner_sid,
5210 (*secdesc_ctr)->sec->grp_sid,
5211 (*secdesc_ctr)->sec->sacl,
5212 (*secdesc_ctr)->sec->dacl,
5213 &size);
5215 if (!psd) {
5216 return False;
5219 new_secdesc_ctr = make_sec_desc_buf(ctx, size, psd);
5220 if (!new_secdesc_ctr) {
5221 return False;
5224 /* Swap with other one */
5226 *secdesc_ctr = new_secdesc_ctr;
5228 /* Set it */
5230 nt_printing_setsec(sharename, *secdesc_ctr);
5234 if (DEBUGLEVEL >= 10) {
5235 SEC_ACL *the_acl = (*secdesc_ctr)->sec->dacl;
5236 int i;
5238 DEBUG(10, ("secdesc_ctr for %s has %d aces:\n",
5239 sharename, the_acl->num_aces));
5241 for (i = 0; i < the_acl->num_aces; i++) {
5242 fstring sid_str;
5244 sid_to_string(sid_str, &the_acl->ace[i].trustee);
5246 DEBUG(10, ("%s %d %d 0x%08x\n", sid_str,
5247 the_acl->ace[i].type, the_acl->ace[i].flags,
5248 the_acl->ace[i].info.mask));
5252 return True;
5255 /* error code:
5256 0: everything OK
5257 1: level not implemented
5258 2: file doesn't exist
5259 3: can't allocate memory
5260 4: can't free memory
5261 5: non existant struct
5265 A printer and a printer driver are 2 different things.
5266 NT manages them separatelly, Samba does the same.
5267 Why ? Simply because it's easier and it makes sense !
5269 Now explanation: You have 3 printers behind your samba server,
5270 2 of them are the same make and model (laser A and B). But laser B
5271 has an 3000 sheet feeder and laser A doesn't such an option.
5272 Your third printer is an old dot-matrix model for the accounting :-).
5274 If the /usr/local/samba/lib directory (default dir), you will have
5275 5 files to describe all of this.
5277 3 files for the printers (1 by printer):
5278 NTprinter_laser A
5279 NTprinter_laser B
5280 NTprinter_accounting
5281 2 files for the drivers (1 for the laser and 1 for the dot matrix)
5282 NTdriver_printer model X
5283 NTdriver_printer model Y
5285 jfm: I should use this comment for the text file to explain
5286 same thing for the forms BTW.
5287 Je devrais mettre mes commentaires en francais, ca serait mieux :-)
5291 /* Convert generic access rights to printer object specific access rights.
5292 It turns out that NT4 security descriptors use generic access rights and
5293 NT5 the object specific ones. */
5295 void map_printer_permissions(SEC_DESC *sd)
5297 int i;
5299 for (i = 0; sd->dacl && i < sd->dacl->num_aces; i++) {
5300 se_map_generic(&sd->dacl->ace[i].info.mask,
5301 &printer_generic_mapping);
5305 /****************************************************************************
5306 Check a user has permissions to perform the given operation. We use the
5307 permission constants defined in include/rpc_spoolss.h to check the various
5308 actions we perform when checking printer access.
5310 PRINTER_ACCESS_ADMINISTER:
5311 print_queue_pause, print_queue_resume, update_printer_sec,
5312 update_printer, spoolss_addprinterex_level_2,
5313 _spoolss_setprinterdata
5315 PRINTER_ACCESS_USE:
5316 print_job_start
5318 JOB_ACCESS_ADMINISTER:
5319 print_job_delete, print_job_pause, print_job_resume,
5320 print_queue_purge
5322 Try access control in the following order (for performance reasons):
5323 1) root ans SE_PRINT_OPERATOR can do anything (easy check)
5324 2) check security descriptor (bit comparisons in memory)
5325 3) "printer admins" (may result in numerous calls to winbind)
5327 ****************************************************************************/
5328 BOOL print_access_check(struct current_user *user, int snum, int access_type)
5330 SEC_DESC_BUF *secdesc = NULL;
5331 uint32 access_granted;
5332 NTSTATUS status;
5333 BOOL result;
5334 const char *pname;
5335 TALLOC_CTX *mem_ctx = NULL;
5336 SE_PRIV se_printop = SE_PRINT_OPERATOR;
5338 /* If user is NULL then use the current_user structure */
5340 if (!user)
5341 user = &current_user;
5343 /* Always allow root or SE_PRINT_OPERATROR to do anything */
5345 if ( user->ut.uid == 0 || user_has_privileges(user->nt_user_token, &se_printop ) ) {
5346 return True;
5349 /* Get printer name */
5351 pname = PRINTERNAME(snum);
5353 if (!pname || !*pname) {
5354 errno = EACCES;
5355 return False;
5358 /* Get printer security descriptor */
5360 if(!(mem_ctx = talloc_init("print_access_check"))) {
5361 errno = ENOMEM;
5362 return False;
5365 if (!nt_printing_getsec(mem_ctx, pname, &secdesc)) {
5366 talloc_destroy(mem_ctx);
5367 errno = ENOMEM;
5368 return False;
5371 if (access_type == JOB_ACCESS_ADMINISTER) {
5372 SEC_DESC_BUF *parent_secdesc = secdesc;
5374 /* Create a child security descriptor to check permissions
5375 against. This is because print jobs are child objects
5376 objects of a printer. */
5378 secdesc = se_create_child_secdesc(mem_ctx, parent_secdesc->sec, False);
5380 if (!secdesc) {
5381 talloc_destroy(mem_ctx);
5382 errno = ENOMEM;
5383 return False;
5386 /* Now this is the bit that really confuses me. The access
5387 type needs to be changed from JOB_ACCESS_ADMINISTER to
5388 PRINTER_ACCESS_ADMINISTER for this to work. Something
5389 to do with the child (job) object becoming like a
5390 printer?? -tpot */
5392 access_type = PRINTER_ACCESS_ADMINISTER;
5395 /* Check access */
5397 map_printer_permissions(secdesc->sec);
5399 result = se_access_check(secdesc->sec, user->nt_user_token, access_type,
5400 &access_granted, &status);
5402 DEBUG(4, ("access check was %s\n", result ? "SUCCESS" : "FAILURE"));
5404 /* see if we need to try the printer admin list */
5406 if ((access_granted == 0) &&
5407 (token_contains_name_in_list(uidtoname(user->ut.uid), NULL,
5408 user->nt_user_token,
5409 lp_printer_admin(snum)))) {
5410 talloc_destroy(mem_ctx);
5411 return True;
5414 talloc_destroy(mem_ctx);
5416 if (!result) {
5417 errno = EACCES;
5420 return result;
5423 /****************************************************************************
5424 Check the time parameters allow a print operation.
5425 *****************************************************************************/
5427 BOOL print_time_access_check(int snum)
5429 NT_PRINTER_INFO_LEVEL *printer = NULL;
5430 BOOL ok = False;
5431 time_t now = time(NULL);
5432 struct tm *t;
5433 uint32 mins;
5435 if (!W_ERROR_IS_OK(get_a_printer(NULL, &printer, 2, lp_servicename(snum))))
5436 return False;
5438 if (printer->info_2->starttime == 0 && printer->info_2->untiltime == 0)
5439 ok = True;
5441 t = gmtime(&now);
5442 mins = (uint32)t->tm_hour*60 + (uint32)t->tm_min;
5444 if (mins >= printer->info_2->starttime && mins <= printer->info_2->untiltime)
5445 ok = True;
5447 free_a_printer(&printer, 2);
5449 if (!ok)
5450 errno = EACCES;
5452 return ok;
5455 /****************************************************************************
5456 Fill in the servername sent in the _spoolss_open_printer_ex() call
5457 ****************************************************************************/
5459 char* get_server_name( Printer_entry *printer )
5461 return printer->servername;