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 3 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, see <http://www.gnu.org/licenses/>.
24 static TDB_CONTEXT *tdb_forms; /* used for forms files */
25 static TDB_CONTEXT *tdb_drivers; /* used for driver files */
26 static TDB_CONTEXT *tdb_printers; /* used for printers files */
28 #define FORMS_PREFIX "FORMS/"
29 #define DRIVERS_PREFIX "DRIVERS/"
30 #define DRIVER_INIT_PREFIX "DRIVER_INIT/"
31 #define PRINTERS_PREFIX "PRINTERS/"
32 #define SECDESC_PREFIX "SECDESC/"
33 #define GLOBAL_C_SETPRINTER "GLOBALS/c_setprinter"
35 #define NTDRIVERS_DATABASE_VERSION_1 1
36 #define NTDRIVERS_DATABASE_VERSION_2 2
37 #define NTDRIVERS_DATABASE_VERSION_3 3 /* little endian version of v2 */
38 #define NTDRIVERS_DATABASE_VERSION_4 4 /* fix generic bits in security descriptors */
39 #define NTDRIVERS_DATABASE_VERSION_5 5 /* normalize keys in ntprinters.tdb */
41 /* Map generic permissions to printer object specific permissions */
43 const struct generic_mapping printer_generic_mapping = {
50 const struct standard_mapping printer_std_mapping = {
57 /* Map generic permissions to print server object specific permissions */
59 const struct generic_mapping printserver_generic_mapping = {
66 const struct generic_mapping printserver_std_mapping = {
73 /* Map generic permissions to job object specific permissions */
75 const struct generic_mapping job_generic_mapping = {
82 /* We need one default form to support our default printer. Msoft adds the
83 forms it wants and in the ORDER it wants them (note: DEVMODE papersize is an
84 array index). Letter is always first, so (for the current code) additions
85 always put things in the correct order. */
86 static const nt_forms_struct default_forms[] = {
87 {"Letter",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
88 {"Letter Small",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
89 {"Tabloid",0x1,0x44368,0x696b8,0x0,0x0,0x44368,0x696b8},
90 {"Ledger",0x1,0x696b8,0x44368,0x0,0x0,0x696b8,0x44368},
91 {"Legal",0x1,0x34b5c,0x56d10,0x0,0x0,0x34b5c,0x56d10},
92 {"Statement",0x1,0x221b4,0x34b5c,0x0,0x0,0x221b4,0x34b5c},
93 {"Executive",0x1,0x2cf56,0x411cc,0x0,0x0,0x2cf56,0x411cc},
94 {"A3",0x1,0x48828,0x668a0,0x0,0x0,0x48828,0x668a0},
95 {"A4",0x1,0x33450,0x48828,0x0,0x0,0x33450,0x48828},
96 {"A4 Small",0x1,0x33450,0x48828,0x0,0x0,0x33450,0x48828},
97 {"A5",0x1,0x24220,0x33450,0x0,0x0,0x24220,0x33450},
98 {"B4 (JIS)",0x1,0x3ebe8,0x58de0,0x0,0x0,0x3ebe8,0x58de0},
99 {"B5 (JIS)",0x1,0x2c6f0,0x3ebe8,0x0,0x0,0x2c6f0,0x3ebe8},
100 {"Folio",0x1,0x34b5c,0x509d8,0x0,0x0,0x34b5c,0x509d8},
101 {"Quarto",0x1,0x347d8,0x43238,0x0,0x0,0x347d8,0x43238},
102 {"10x14",0x1,0x3e030,0x56d10,0x0,0x0,0x3e030,0x56d10},
103 {"11x17",0x1,0x44368,0x696b8,0x0,0x0,0x44368,0x696b8},
104 {"Note",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
105 {"Envelope #9",0x1,0x18079,0x37091,0x0,0x0,0x18079,0x37091},
106 {"Envelope #10",0x1,0x19947,0x3ae94,0x0,0x0,0x19947,0x3ae94},
107 {"Envelope #11",0x1,0x1be7c,0x40565,0x0,0x0,0x1be7c,0x40565},
108 {"Envelope #12",0x1,0x1d74a,0x44368,0x0,0x0,0x1d74a,0x44368},
109 {"Envelope #14",0x1,0x1f018,0x47504,0x0,0x0,0x1f018,0x47504},
110 {"C size sheet",0x1,0x696b8,0x886d0,0x0,0x0,0x696b8,0x886d0},
111 {"D size sheet",0x1,0x886d0,0xd2d70,0x0,0x0,0x886d0,0xd2d70},
112 {"E size sheet",0x1,0xd2d70,0x110da0,0x0,0x0,0xd2d70,0x110da0},
113 {"Envelope DL",0x1,0x1adb0,0x35b60,0x0,0x0,0x1adb0,0x35b60},
114 {"Envelope C5",0x1,0x278d0,0x37e88,0x0,0x0,0x278d0,0x37e88},
115 {"Envelope C3",0x1,0x4f1a0,0x6fd10,0x0,0x0,0x4f1a0,0x6fd10},
116 {"Envelope C4",0x1,0x37e88,0x4f1a0,0x0,0x0,0x37e88,0x4f1a0},
117 {"Envelope C6",0x1,0x1bd50,0x278d0,0x0,0x0,0x1bd50,0x278d0},
118 {"Envelope C65",0x1,0x1bd50,0x37e88,0x0,0x0,0x1bd50,0x37e88},
119 {"Envelope B4",0x1,0x3d090,0x562e8,0x0,0x0,0x3d090,0x562e8},
120 {"Envelope B5",0x1,0x2af80,0x3d090,0x0,0x0,0x2af80,0x3d090},
121 {"Envelope B6",0x1,0x2af80,0x1e848,0x0,0x0,0x2af80,0x1e848},
122 {"Envelope",0x1,0x1adb0,0x38270,0x0,0x0,0x1adb0,0x38270},
123 {"Envelope Monarch",0x1,0x18079,0x2e824,0x0,0x0,0x18079,0x2e824},
124 {"6 3/4 Envelope",0x1,0x167ab,0x284ec,0x0,0x0,0x167ab,0x284ec},
125 {"US Std Fanfold",0x1,0x5c3e1,0x44368,0x0,0x0,0x5c3e1,0x44368},
126 {"German Std Fanfold",0x1,0x34b5c,0x4a6a0,0x0,0x0,0x34b5c,0x4a6a0},
127 {"German Legal Fanfold",0x1,0x34b5c,0x509d8,0x0,0x0,0x34b5c,0x509d8},
128 {"B4 (ISO)",0x1,0x3d090,0x562e8,0x0,0x0,0x3d090,0x562e8},
129 {"Japanese Postcard",0x1,0x186a0,0x24220,0x0,0x0,0x186a0,0x24220},
130 {"9x11",0x1,0x37cf8,0x44368,0x0,0x0,0x37cf8,0x44368},
131 {"10x11",0x1,0x3e030,0x44368,0x0,0x0,0x3e030,0x44368},
132 {"15x11",0x1,0x5d048,0x44368,0x0,0x0,0x5d048,0x44368},
133 {"Envelope Invite",0x1,0x35b60,0x35b60,0x0,0x0,0x35b60,0x35b60},
134 {"Reserved48",0x1,0x1,0x1,0x0,0x0,0x1,0x1},
135 {"Reserved49",0x1,0x1,0x1,0x0,0x0,0x1,0x1},
136 {"Letter Extra",0x1,0x3ae94,0x4a6a0,0x0,0x0,0x3ae94,0x4a6a0},
137 {"Legal Extra",0x1,0x3ae94,0x5d048,0x0,0x0,0x3ae94,0x5d048},
138 {"Tabloid Extra",0x1,0x4a6a0,0x6f9f0,0x0,0x0,0x4a6a0,0x6f9f0},
139 {"A4 Extra",0x1,0x397c2,0x4eb16,0x0,0x0,0x397c2,0x4eb16},
140 {"Letter Transverse",0x1,0x34b5c,0x44368,0x0,0x0,0x34b5c,0x44368},
141 {"A4 Transverse",0x1,0x33450,0x48828,0x0,0x0,0x33450,0x48828},
142 {"Letter Extra Transverse",0x1,0x3ae94,0x4a6a0,0x0,0x0,0x3ae94,0x4a6a0},
143 {"Super A",0x1,0x376b8,0x56ea0,0x0,0x0,0x376b8,0x56ea0},
144 {"Super B",0x1,0x4a768,0x76e58,0x0,0x0,0x4a768,0x76e58},
145 {"Letter Plus",0x1,0x34b5c,0x4eb16,0x0,0x0,0x34b5c,0x4eb16},
146 {"A4 Plus",0x1,0x33450,0x50910,0x0,0x0,0x33450,0x50910},
147 {"A5 Transverse",0x1,0x24220,0x33450,0x0,0x0,0x24220,0x33450},
148 {"B5 (JIS) Transverse",0x1,0x2c6f0,0x3ebe8,0x0,0x0,0x2c6f0,0x3ebe8},
149 {"A3 Extra",0x1,0x4e9d0,0x6ca48,0x0,0x0,0x4e9d0,0x6ca48},
150 {"A5 Extra",0x1,0x2a7b0,0x395f8,0x0,0x0,0x2a7b0,0x395f8},
151 {"B5 (ISO) Extra",0x1,0x31128,0x43620,0x0,0x0,0x31128,0x43620},
152 {"A2",0x1,0x668a0,0x91050,0x0,0x0,0x668a0,0x91050},
153 {"A3 Transverse",0x1,0x48828,0x668a0,0x0,0x0,0x48828,0x668a0},
154 {"A3 Extra Transverse",0x1,0x4e9d0,0x6ca48,0x0,0x0,0x4e9d0,0x6ca48},
155 {"Japanese Double Postcard",0x1,0x30d40,0x24220,0x0,0x0,0x30d40,0x24220},
156 {"A6",0x1,0x19a28,0x24220,0x0,0x0,0x19a28,0x24220},
157 {"Japanese Envelope Kaku #2",0x1,0x3a980,0x510e0,0x0,0x0,0x3a980,0x510e0},
158 {"Japanese Envelope Kaku #3",0x1,0x34bc0,0x43a08,0x0,0x0,0x34bc0,0x43a08},
159 {"Japanese Envelope Chou #3",0x1,0x1d4c0,0x395f8,0x0,0x0,0x1d4c0,0x395f8},
160 {"Japanese Envelope Chou #4",0x1,0x15f90,0x320c8,0x0,0x0,0x15f90,0x320c8},
161 {"Letter Rotated",0x1,0x44368,0x34b5c,0x0,0x0,0x44368,0x34b5c},
162 {"A3 Rotated",0x1,0x668a0,0x48828,0x0,0x0,0x668a0,0x48828},
163 {"A4 Rotated",0x1,0x48828,0x33450,0x0,0x0,0x48828,0x33450},
164 {"A5 Rotated",0x1,0x33450,0x24220,0x0,0x0,0x33450,0x24220},
165 {"B4 (JIS) Rotated",0x1,0x58de0,0x3ebe8,0x0,0x0,0x58de0,0x3ebe8},
166 {"B5 (JIS) Rotated",0x1,0x3ebe8,0x2c6f0,0x0,0x0,0x3ebe8,0x2c6f0},
167 {"Japanese Postcard Rotated",0x1,0x24220,0x186a0,0x0,0x0,0x24220,0x186a0},
168 {"Double Japan Postcard Rotated",0x1,0x24220,0x30d40,0x0,0x0,0x24220,0x30d40},
169 {"A6 Rotated",0x1,0x24220,0x19a28,0x0,0x0,0x24220,0x19a28},
170 {"Japan Envelope Kaku #2 Rotated",0x1,0x510e0,0x3a980,0x0,0x0,0x510e0,0x3a980},
171 {"Japan Envelope Kaku #3 Rotated",0x1,0x43a08,0x34bc0,0x0,0x0,0x43a08, 0x34bc0},
172 {"Japan Envelope Chou #3 Rotated",0x1,0x395f8,0x1d4c0,0x0,0x0,0x395f8,0x1d4c0},
173 {"Japan Envelope Chou #4 Rotated",0x1,0x320c8,0x15f90,0x0,0x0,0x320c8,0x15f90},
174 {"B6 (JIS)",0x1,0x1f400,0x2c6f0,0x0,0x0,0x1f400,0x2c6f0},
175 {"B6 (JIS) Rotated",0x1,0x2c6f0,0x1f400,0x0,0x0,0x2c6f0,0x1f400},
176 {"12x11",0x1,0x4a724,0x443e1,0x0,0x0,0x4a724,0x443e1},
177 {"Japan Envelope You #4",0x1,0x19a28,0x395f8,0x0,0x0,0x19a28,0x395f8},
178 {"Japan Envelope You #4 Rotated",0x1,0x395f8,0x19a28,0x0,0x0,0x395f8,0x19a28},
179 {"PRC 16K",0x1,0x2de60,0x3f7a0,0x0,0x0,0x2de60,0x3f7a0},
180 {"PRC 32K",0x1,0x1fbd0,0x2cec0,0x0,0x0,0x1fbd0,0x2cec0},
181 {"PRC 32K(Big)",0x1,0x222e0,0x318f8,0x0,0x0,0x222e0,0x318f8},
182 {"PRC Envelope #1",0x1,0x18e70,0x28488,0x0,0x0,0x18e70,0x28488},
183 {"PRC Envelope #2",0x1,0x18e70,0x2af80,0x0,0x0,0x18e70,0x2af80},
184 {"PRC Envelope #3",0x1,0x1e848,0x2af80,0x0,0x0,0x1e848,0x2af80},
185 {"PRC Envelope #4",0x1,0x1adb0,0x32c80,0x0,0x0,0x1adb0,0x32c80},
186 {"PRC Envelope #5",0x1,0x1adb0,0x35b60,0x0,0x0,0x1adb0,0x35b60},
187 {"PRC Envelope #6",0x1,0x1d4c0,0x38270,0x0,0x0,0x1d4c0,0x38270},
188 {"PRC Envelope #7",0x1,0x27100,0x38270,0x0,0x0,0x27100,0x38270},
189 {"PRC Envelope #8",0x1,0x1d4c0,0x4b708,0x0,0x0,0x1d4c0,0x4b708},
190 {"PRC Envelope #9",0x1,0x37e88,0x4f1a0,0x0,0x0,0x37e88,0x4f1a0},
191 {"PRC Envelope #10",0x1,0x4f1a0,0x6fd10,0x0,0x0,0x4f1a0,0x6fd10},
192 {"PRC 16K Rotated",0x1,0x3f7a0,0x2de60,0x0,0x0,0x3f7a0,0x2de60},
193 {"PRC 32K Rotated",0x1,0x2cec0,0x1fbd0,0x0,0x0,0x2cec0,0x1fbd0},
194 {"PRC 32K(Big) Rotated",0x1,0x318f8,0x222e0,0x0,0x0,0x318f8,0x222e0},
195 {"PRC Envelope #1 Rotated",0x1,0x28488,0x18e70,0x0,0x0,0x28488,0x18e70},
196 {"PRC Envelope #2 Rotated",0x1,0x2af80,0x18e70,0x0,0x0,0x2af80,0x18e70},
197 {"PRC Envelope #3 Rotated",0x1,0x2af80,0x1e848,0x0,0x0,0x2af80,0x1e848},
198 {"PRC Envelope #4 Rotated",0x1,0x32c80,0x1adb0,0x0,0x0,0x32c80,0x1adb0},
199 {"PRC Envelope #5 Rotated",0x1,0x35b60,0x1adb0,0x0,0x0,0x35b60,0x1adb0},
200 {"PRC Envelope #6 Rotated",0x1,0x38270,0x1d4c0,0x0,0x0,0x38270,0x1d4c0},
201 {"PRC Envelope #7 Rotated",0x1,0x38270,0x27100,0x0,0x0,0x38270,0x27100},
202 {"PRC Envelope #8 Rotated",0x1,0x4b708,0x1d4c0,0x0,0x0,0x4b708,0x1d4c0},
203 {"PRC Envelope #9 Rotated",0x1,0x4f1a0,0x37e88,0x0,0x0,0x4f1a0,0x37e88},
204 {"PRC Envelope #10 Rotated",0x1,0x6fd10,0x4f1a0,0x0,0x0,0x6fd10,0x4f1a0}
208 const char *long_archi;
209 const char *short_archi;
213 #define SPL_ARCH_WIN40 "WIN40"
214 #define SPL_ARCH_W32X86 "W32X86"
215 #define SPL_ARCH_W32MIPS "W32MIPS"
216 #define SPL_ARCH_W32ALPHA "W32ALPHA"
217 #define SPL_ARCH_W32PPC "W32PPC"
218 #define SPL_ARCH_IA64 "IA64"
219 #define SPL_ARCH_X64 "x64"
221 static const struct table_node archi_table[]= {
223 {"Windows 4.0", SPL_ARCH_WIN40, 0 },
224 {"Windows NT x86", SPL_ARCH_W32X86, 2 },
225 {"Windows NT R4000", SPL_ARCH_W32MIPS, 2 },
226 {"Windows NT Alpha_AXP", SPL_ARCH_W32ALPHA, 2 },
227 {"Windows NT PowerPC", SPL_ARCH_W32PPC, 2 },
228 {"Windows IA64", SPL_ARCH_IA64, 3 },
229 {"Windows x64", SPL_ARCH_X64, 3 },
234 /****************************************************************************
235 generate a new TDB_DATA key for storing a printer
236 ****************************************************************************/
238 static TDB_DATA make_printer_tdbkey(TALLOC_CTX *ctx, const char *sharename )
244 fstrcpy(share, sharename);
247 keystr = talloc_asprintf(ctx, "%s%s", PRINTERS_PREFIX, share);
248 key = string_term_tdb_data(keystr ? keystr : "");
253 /****************************************************************************
254 generate a new TDB_DATA key for storing a printer security descriptor
255 ****************************************************************************/
257 static TDB_DATA make_printers_secdesc_tdbkey(TALLOC_CTX *ctx,
258 const char* sharename )
264 fstrcpy(share, sharename );
267 keystr = talloc_asprintf(ctx, "%s%s", SECDESC_PREFIX, share);
268 key = string_term_tdb_data(keystr ? keystr : "");
273 /****************************************************************************
274 ****************************************************************************/
276 static bool upgrade_to_version_3(void)
278 TDB_DATA kbuf, newkey, dbuf;
280 DEBUG(0,("upgrade_to_version_3: upgrading print tdb's to version 3\n"));
282 for (kbuf = tdb_firstkey(tdb_drivers); kbuf.dptr;
283 newkey = tdb_nextkey(tdb_drivers, kbuf), free(kbuf.dptr), kbuf=newkey) {
285 dbuf = tdb_fetch(tdb_drivers, kbuf);
287 if (strncmp((const char *)kbuf.dptr, FORMS_PREFIX, strlen(FORMS_PREFIX)) == 0) {
288 DEBUG(0,("upgrade_to_version_3:moving form\n"));
289 if (tdb_store(tdb_forms, kbuf, dbuf, TDB_REPLACE) != 0) {
290 SAFE_FREE(dbuf.dptr);
291 DEBUG(0,("upgrade_to_version_3: failed to move form. Error (%s).\n", tdb_errorstr(tdb_forms)));
294 if (tdb_delete(tdb_drivers, kbuf) != 0) {
295 SAFE_FREE(dbuf.dptr);
296 DEBUG(0,("upgrade_to_version_3: failed to delete form. Error (%s)\n", tdb_errorstr(tdb_drivers)));
301 if (strncmp((const char *)kbuf.dptr, PRINTERS_PREFIX, strlen(PRINTERS_PREFIX)) == 0) {
302 DEBUG(0,("upgrade_to_version_3:moving printer\n"));
303 if (tdb_store(tdb_printers, kbuf, dbuf, TDB_REPLACE) != 0) {
304 SAFE_FREE(dbuf.dptr);
305 DEBUG(0,("upgrade_to_version_3: failed to move printer. Error (%s)\n", tdb_errorstr(tdb_printers)));
308 if (tdb_delete(tdb_drivers, kbuf) != 0) {
309 SAFE_FREE(dbuf.dptr);
310 DEBUG(0,("upgrade_to_version_3: failed to delete printer. Error (%s)\n", tdb_errorstr(tdb_drivers)));
315 if (strncmp((const char *)kbuf.dptr, SECDESC_PREFIX, strlen(SECDESC_PREFIX)) == 0) {
316 DEBUG(0,("upgrade_to_version_3:moving secdesc\n"));
317 if (tdb_store(tdb_printers, kbuf, dbuf, TDB_REPLACE) != 0) {
318 SAFE_FREE(dbuf.dptr);
319 DEBUG(0,("upgrade_to_version_3: failed to move secdesc. Error (%s)\n", tdb_errorstr(tdb_printers)));
322 if (tdb_delete(tdb_drivers, kbuf) != 0) {
323 SAFE_FREE(dbuf.dptr);
324 DEBUG(0,("upgrade_to_version_3: failed to delete secdesc. Error (%s)\n", tdb_errorstr(tdb_drivers)));
329 SAFE_FREE(dbuf.dptr);
335 /*******************************************************************
336 Fix an issue with security descriptors. Printer sec_desc must
337 use more than the generic bits that were previously used
338 in <= 3.0.14a. They must also have a owner and group SID assigned.
339 Otherwise, any printers than have been migrated to a Windows
340 host using printmig.exe will not be accessible.
341 *******************************************************************/
343 static int sec_desc_upg_fn( TDB_CONTEXT *the_tdb, TDB_DATA key,
344 TDB_DATA data, void *state )
347 SEC_DESC_BUF *sd_orig = NULL;
348 SEC_DESC_BUF *sd_new, *sd_store;
349 SEC_DESC *sec, *new_sec;
350 TALLOC_CTX *ctx = state;
355 if (!data.dptr || data.dsize == 0) {
359 if ( strncmp((const char *) key.dptr, SECDESC_PREFIX, strlen(SECDESC_PREFIX) ) != 0 ) {
363 /* upgrade the security descriptor */
367 prs_init_empty( &ps, ctx, UNMARSHALL );
368 prs_give_memory( &ps, (char *)data.dptr, data.dsize, False );
370 if ( !sec_io_desc_buf( "sec_desc_upg_fn", &sd_orig, &ps, 1 ) ) {
371 /* delete bad entries */
372 DEBUG(0,("sec_desc_upg_fn: Failed to parse original sec_desc for %si. Deleting....\n",
373 (const char *)key.dptr ));
374 tdb_delete( tdb_printers, key );
385 /* is this even valid? */
392 /* update access masks */
394 for ( i=0; i<sec->dacl->num_aces; i++ ) {
395 switch ( sec->dacl->aces[i].access_mask ) {
396 case (GENERIC_READ_ACCESS | GENERIC_WRITE_ACCESS | GENERIC_EXECUTE_ACCESS):
397 sec->dacl->aces[i].access_mask = PRINTER_ACE_PRINT;
400 case GENERIC_ALL_ACCESS:
401 sec->dacl->aces[i].access_mask = PRINTER_ACE_FULL_CONTROL;
404 case READ_CONTROL_ACCESS:
405 sec->dacl->aces[i].access_mask = PRINTER_ACE_MANAGE_DOCUMENTS;
407 default: /* no change */
412 /* create a new SEC_DESC with the appropriate owner and group SIDs */
414 new_sec = make_sec_desc( ctx, SEC_DESC_REVISION, SEC_DESC_SELF_RELATIVE,
415 &global_sid_Builtin_Administrators,
416 &global_sid_Builtin_Administrators,
417 NULL, NULL, &size_new_sec );
422 sd_new = make_sec_desc_buf( ctx, size_new_sec, new_sec );
428 if ( !(sd_store = sec_desc_merge( ctx, sd_new, sd_orig )) ) {
429 DEBUG(0,("sec_desc_upg_fn: Failed to update sec_desc for %s\n", key.dptr ));
438 sd_size = ndr_size_security_descriptor(sd_store->sd, NULL, 0)
439 + sizeof(SEC_DESC_BUF);
440 if ( !prs_init(&ps, sd_size, ctx, MARSHALL) ) {
441 DEBUG(0,("sec_desc_upg_fn: Failed to allocate prs memory for %s\n", key.dptr ));
445 if ( !sec_io_desc_buf( "sec_desc_upg_fn", &sd_store, &ps, 1 ) ) {
446 DEBUG(0,("sec_desc_upg_fn: Failed to parse new sec_desc for %s\n", key.dptr ));
451 data.dptr = (uint8 *)prs_data_p( &ps );
452 data.dsize = sd_size;
454 result = tdb_store( tdb_printers, key, data, TDB_REPLACE );
458 /* 0 to continue and non-zero to stop traversal */
460 return (result == -1);
463 /*******************************************************************
464 *******************************************************************/
466 static bool upgrade_to_version_4(void)
471 DEBUG(0,("upgrade_to_version_4: upgrading printer security descriptors\n"));
473 if ( !(ctx = talloc_init( "upgrade_to_version_4" )) )
476 result = tdb_traverse( tdb_printers, sec_desc_upg_fn, ctx );
478 talloc_destroy( ctx );
480 return ( result != -1 );
483 /*******************************************************************
484 Fix an issue with security descriptors. Printer sec_desc must
485 use more than the generic bits that were previously used
486 in <= 3.0.14a. They must also have a owner and group SID assigned.
487 Otherwise, any printers than have been migrated to a Windows
488 host using printmig.exe will not be accessible.
489 *******************************************************************/
491 static int normalize_printers_fn( TDB_CONTEXT *the_tdb, TDB_DATA key,
492 TDB_DATA data, void *state )
494 TALLOC_CTX *ctx = talloc_tos();
497 if (!data.dptr || data.dsize == 0)
500 /* upgrade printer records and security descriptors */
502 if ( strncmp((const char *) key.dptr, PRINTERS_PREFIX, strlen(PRINTERS_PREFIX) ) == 0 ) {
503 new_key = make_printer_tdbkey(ctx, (const char *)key.dptr+strlen(PRINTERS_PREFIX) );
505 else if ( strncmp((const char *) key.dptr, SECDESC_PREFIX, strlen(SECDESC_PREFIX) ) == 0 ) {
506 new_key = make_printers_secdesc_tdbkey(ctx, (const char *)key.dptr+strlen(SECDESC_PREFIX) );
509 /* ignore this record */
513 /* delete the original record and store under the normalized key */
515 if ( tdb_delete( the_tdb, key ) != 0 ) {
516 DEBUG(0,("normalize_printers_fn: tdb_delete for [%s] failed!\n",
521 if ( tdb_store( the_tdb, new_key, data, TDB_REPLACE) != 0 ) {
522 DEBUG(0,("normalize_printers_fn: failed to store new record for [%s]!\n",
530 /*******************************************************************
531 *******************************************************************/
533 static bool upgrade_to_version_5(void)
538 DEBUG(0,("upgrade_to_version_5: normalizing printer keys\n"));
540 if ( !(ctx = talloc_init( "upgrade_to_version_5" )) )
543 result = tdb_traverse( tdb_printers, normalize_printers_fn, NULL );
545 talloc_destroy( ctx );
547 return ( result != -1 );
550 /****************************************************************************
551 Open the NT printing tdbs. Done once before fork().
552 ****************************************************************************/
554 bool nt_printing_init(struct messaging_context *msg_ctx)
556 const char *vstring = "INFO/version";
560 if ( tdb_drivers && tdb_printers && tdb_forms )
564 tdb_close(tdb_drivers);
565 tdb_drivers = tdb_open_log(state_path("ntdrivers.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
567 DEBUG(0,("nt_printing_init: Failed to open nt drivers database %s (%s)\n",
568 state_path("ntdrivers.tdb"), strerror(errno) ));
573 tdb_close(tdb_printers);
574 tdb_printers = tdb_open_log(state_path("ntprinters.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
576 DEBUG(0,("nt_printing_init: Failed to open nt printers database %s (%s)\n",
577 state_path("ntprinters.tdb"), strerror(errno) ));
582 tdb_close(tdb_forms);
583 tdb_forms = tdb_open_log(state_path("ntforms.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
585 DEBUG(0,("nt_printing_init: Failed to open nt forms database %s (%s)\n",
586 state_path("ntforms.tdb"), strerror(errno) ));
590 /* handle a Samba upgrade */
592 vers_id = tdb_fetch_int32(tdb_drivers, vstring);
594 DEBUG(10, ("Fresh database\n"));
595 tdb_store_int32( tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_5 );
596 vers_id = NTDRIVERS_DATABASE_VERSION_5;
599 if ( vers_id != NTDRIVERS_DATABASE_VERSION_5 ) {
601 if ((vers_id == NTDRIVERS_DATABASE_VERSION_1) || (IREV(vers_id) == NTDRIVERS_DATABASE_VERSION_1)) {
602 if (!upgrade_to_version_3())
604 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_3);
605 vers_id = NTDRIVERS_DATABASE_VERSION_3;
608 if ((vers_id == NTDRIVERS_DATABASE_VERSION_2) || (IREV(vers_id) == NTDRIVERS_DATABASE_VERSION_2)) {
609 /* Written on a bigendian machine with old fetch_int code. Save as le. */
610 /* The only upgrade between V2 and V3 is to save the version in little-endian. */
611 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_3);
612 vers_id = NTDRIVERS_DATABASE_VERSION_3;
615 if (vers_id == NTDRIVERS_DATABASE_VERSION_3 ) {
616 if ( !upgrade_to_version_4() )
618 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_4);
619 vers_id = NTDRIVERS_DATABASE_VERSION_4;
622 if (vers_id == NTDRIVERS_DATABASE_VERSION_4 ) {
623 if ( !upgrade_to_version_5() )
625 tdb_store_int32(tdb_drivers, vstring, NTDRIVERS_DATABASE_VERSION_5);
626 vers_id = NTDRIVERS_DATABASE_VERSION_5;
630 if ( vers_id != NTDRIVERS_DATABASE_VERSION_5 ) {
631 DEBUG(0,("nt_printing_init: Unknown printer database version [%d]\n", vers_id));
636 update_c_setprinter(True);
639 * register callback to handle updating printers as new
640 * drivers are installed
643 messaging_register(msg_ctx, NULL, MSG_PRINTER_DRVUPGRADE,
644 do_drv_upgrade_printer);
647 * register callback to handle updating printer data
648 * when a driver is initialized
651 messaging_register(msg_ctx, NULL, MSG_PRINTERDATA_INIT_RESET,
652 reset_all_printerdata);
654 /* of course, none of the message callbacks matter if you don't
655 tell messages.c that you interested in receiving PRINT_GENERAL
656 msgs. This is done in claim_connection() */
659 if ( lp_security() == SEC_ADS ) {
660 win_rc = check_published_printers();
661 if (!W_ERROR_IS_OK(win_rc))
662 DEBUG(0, ("nt_printing_init: error checking published printers: %s\n", win_errstr(win_rc)));
668 /*******************************************************************
669 Function to allow filename parsing "the old way".
670 ********************************************************************/
672 static char *driver_unix_convert(connection_struct *conn,
673 const char *old_name,
674 SMB_STRUCT_STAT *pst)
676 TALLOC_CTX *ctx = talloc_tos();
677 char *name = talloc_strdup(ctx, old_name);
678 char *new_name = NULL;
684 name = unix_clean_name(ctx, name);
688 trim_string(name,"/","/");
689 unix_convert(ctx,conn, name, false, &new_name, NULL, pst);
693 /*******************************************************************
694 tdb traversal function for counting printers.
695 ********************************************************************/
697 static int traverse_counting_printers(TDB_CONTEXT *t, TDB_DATA key,
698 TDB_DATA data, void *context)
700 int *printer_count = (int*)context;
702 if (memcmp(PRINTERS_PREFIX, key.dptr, sizeof(PRINTERS_PREFIX)-1) == 0) {
704 DEBUG(10,("traverse_counting_printers: printer = [%s] printer_count = %d\n", key.dptr, *printer_count));
710 /*******************************************************************
711 Update the spooler global c_setprinter. This variable is initialized
712 when the parent smbd starts with the number of existing printers. It
713 is monotonically increased by the current number of printers *after*
714 each add or delete printer RPC. Only Microsoft knows why... JRR020119
715 ********************************************************************/
717 uint32 update_c_setprinter(bool initialize)
720 int32 printer_count = 0;
722 tdb_lock_bystring(tdb_printers, GLOBAL_C_SETPRINTER);
724 /* Traverse the tdb, counting the printers */
725 tdb_traverse(tdb_printers, traverse_counting_printers, (void *)&printer_count);
727 /* If initializing, set c_setprinter to current printers count
728 * otherwise, bump it by the current printer count
731 c_setprinter = tdb_fetch_int32(tdb_printers, GLOBAL_C_SETPRINTER) + printer_count;
733 c_setprinter = printer_count;
735 DEBUG(10,("update_c_setprinter: c_setprinter = %u\n", (unsigned int)c_setprinter));
736 tdb_store_int32(tdb_printers, GLOBAL_C_SETPRINTER, c_setprinter);
738 tdb_unlock_bystring(tdb_printers, GLOBAL_C_SETPRINTER);
740 return (uint32)c_setprinter;
743 /*******************************************************************
744 Get the spooler global c_setprinter, accounting for initialization.
745 ********************************************************************/
747 uint32 get_c_setprinter(void)
749 int32 c_setprinter = tdb_fetch_int32(tdb_printers, GLOBAL_C_SETPRINTER);
751 if (c_setprinter == (int32)-1)
752 c_setprinter = update_c_setprinter(True);
754 DEBUG(10,("get_c_setprinter: c_setprinter = %d\n", c_setprinter));
756 return (uint32)c_setprinter;
759 /****************************************************************************
760 Get builtin form struct list.
761 ****************************************************************************/
763 int get_builtin_ntforms(nt_forms_struct **list)
765 *list = (nt_forms_struct *)memdup(&default_forms[0], sizeof(default_forms));
769 return sizeof(default_forms) / sizeof(default_forms[0]);
772 /****************************************************************************
773 get a builtin form struct
774 ****************************************************************************/
776 bool get_a_builtin_ntform_by_string(const char *form_name, nt_forms_struct *form)
779 DEBUGADD(6,("Looking for builtin form %s \n", form_name));
780 count = sizeof(default_forms) / sizeof(default_forms[0]);
781 for (i=0;i<count;i++) {
782 if (strequal(form_name,default_forms[i].name)) {
783 DEBUGADD(6,("Found builtin form %s \n", form_name));
784 memcpy(form,&default_forms[i],sizeof(*form));
792 bool get_a_builtin_ntform(UNISTR2 *uni_formname,nt_forms_struct *form)
795 unistr2_to_ascii(form_name, uni_formname, sizeof(form_name));
796 return get_a_builtin_ntform_by_string(form_name, form);
799 /****************************************************************************
800 get a form struct list.
801 ****************************************************************************/
803 int get_ntforms(nt_forms_struct **list)
805 TDB_DATA kbuf, newkey, dbuf;
806 nt_forms_struct form;
813 for (kbuf = tdb_firstkey(tdb_forms);
815 newkey = tdb_nextkey(tdb_forms, kbuf), free(kbuf.dptr), kbuf=newkey)
817 if (strncmp((const char *)kbuf.dptr, FORMS_PREFIX, strlen(FORMS_PREFIX)) != 0)
820 dbuf = tdb_fetch(tdb_forms, kbuf);
824 fstrcpy(form.name, (const char *)kbuf.dptr+strlen(FORMS_PREFIX));
825 ret = tdb_unpack(dbuf.dptr, dbuf.dsize, "dddddddd",
826 &i, &form.flag, &form.width, &form.length, &form.left,
827 &form.top, &form.right, &form.bottom);
828 SAFE_FREE(dbuf.dptr);
829 if (ret != dbuf.dsize)
832 *list = SMB_REALLOC_ARRAY(*list, nt_forms_struct, n+1);
834 DEBUG(0,("get_ntforms: Realloc fail.\n"));
845 /****************************************************************************
846 write a form struct list
847 ****************************************************************************/
849 int write_ntforms(nt_forms_struct **list, int number)
851 TALLOC_CTX *ctx = talloc_tos();
858 for (i=0;i<number;i++) {
859 /* save index, so list is rebuilt in correct order */
860 len = tdb_pack(NULL, 0, "dddddddd",
861 i, (*list)[i].flag, (*list)[i].width, (*list)[i].length,
862 (*list)[i].left, (*list)[i].top, (*list)[i].right,
867 buf = TALLOC_ARRAY(ctx, char, len);
871 len = tdb_pack((uint8 *)buf, len, "dddddddd",
872 i, (*list)[i].flag, (*list)[i].width, (*list)[i].length,
873 (*list)[i].left, (*list)[i].top, (*list)[i].right,
875 key = talloc_asprintf(ctx, "%s%s", FORMS_PREFIX, (*list)[i].name);
880 dbuf.dptr = (uint8 *)buf;
881 if (tdb_store_bystring(tdb_forms, key, dbuf, TDB_REPLACE) != 0) {
893 /****************************************************************************
894 add a form struct at the end of the list
895 ****************************************************************************/
896 bool add_a_form(nt_forms_struct **list, struct spoolss_AddFormInfo1 *form, int *count)
902 * NT tries to add forms even when
903 * they are already in the base
904 * only update the values if already present
909 for (n=0; n<*count; n++) {
910 if ( strequal((*list)[n].name, form->form_name) ) {
917 if((*list=SMB_REALLOC_ARRAY(*list, nt_forms_struct, n+1)) == NULL) {
918 DEBUG(0,("add_a_form: failed to enlarge forms list!\n"));
921 fstrcpy((*list)[n].name, form->form_name);
925 (*list)[n].flag = form->flags;
926 (*list)[n].width = form->size.width;
927 (*list)[n].length = form->size.height;
928 (*list)[n].left = form->area.left;
929 (*list)[n].top = form->area.top;
930 (*list)[n].right = form->area.right;
931 (*list)[n].bottom = form->area.bottom;
933 DEBUG(6,("add_a_form: Successfully %s form [%s]\n",
934 update ? "updated" : "added", form->form_name));
939 /****************************************************************************
940 Delete a named form struct.
941 ****************************************************************************/
943 bool delete_a_form(nt_forms_struct **list, const char *del_name, int *count, WERROR *ret)
950 for (n=0; n<*count; n++) {
951 if (!strncmp((*list)[n].name, del_name, strlen(del_name))) {
952 DEBUG(103, ("delete_a_form, [%s] in list\n", del_name));
958 DEBUG(10,("delete_a_form, [%s] not found\n", del_name));
959 *ret = WERR_INVALID_PARAM;
963 if (asprintf(&key, "%s%s", FORMS_PREFIX, (*list)[n].name) < 0) {
967 if (tdb_delete_bystring(tdb_forms, key) != 0) {
976 /****************************************************************************
977 Update a form struct.
978 ****************************************************************************/
980 void update_a_form(nt_forms_struct **list, struct spoolss_AddFormInfo1 *form, int count)
984 DEBUG(106, ("[%s]\n", form->form_name));
985 for (n=0; n<count; n++) {
986 DEBUGADD(106, ("n [%d]:[%s]\n", n, (*list)[n].name));
987 if (!strncmp((*list)[n].name, form->form_name, strlen(form->form_name)))
991 if (n==count) return;
993 (*list)[n].flag = form->flags;
994 (*list)[n].width = form->size.width;
995 (*list)[n].length = form->size.height;
996 (*list)[n].left = form->area.left;
997 (*list)[n].top = form->area.top;
998 (*list)[n].right = form->area.right;
999 (*list)[n].bottom = form->area.bottom;
1002 /****************************************************************************
1003 Get the nt drivers list.
1004 Traverse the database and look-up the matching names.
1005 ****************************************************************************/
1006 int get_ntdrivers(fstring **list, const char *architecture, uint32 version)
1009 const char *short_archi;
1011 TDB_DATA kbuf, newkey;
1013 short_archi = get_short_archi(architecture);
1018 if (asprintf(&key, "%s%s/%d/", DRIVERS_PREFIX,
1019 short_archi, version) < 0) {
1023 for (kbuf = tdb_firstkey(tdb_drivers);
1025 newkey = tdb_nextkey(tdb_drivers, kbuf), free(kbuf.dptr), kbuf=newkey) {
1027 if (strncmp((const char *)kbuf.dptr, key, strlen(key)) != 0)
1030 if((*list = SMB_REALLOC_ARRAY(*list, fstring, total+1)) == NULL) {
1031 DEBUG(0,("get_ntdrivers: failed to enlarge list!\n"));
1036 fstrcpy((*list)[total], (const char *)kbuf.dptr+strlen(key));
1044 /****************************************************************************
1045 Function to do the mapping between the long architecture name and
1047 ****************************************************************************/
1049 const char *get_short_archi(const char *long_archi)
1053 DEBUG(107,("Getting architecture dependant directory\n"));
1056 } while ( (archi_table[i].long_archi!=NULL ) &&
1057 StrCaseCmp(long_archi, archi_table[i].long_archi) );
1059 if (archi_table[i].long_archi==NULL) {
1060 DEBUGADD(10,("Unknown architecture [%s] !\n", long_archi));
1064 /* this might be client code - but shouldn't this be an fstrcpy etc? */
1066 DEBUGADD(108,("index: [%d]\n", i));
1067 DEBUGADD(108,("long architecture: [%s]\n", archi_table[i].long_archi));
1068 DEBUGADD(108,("short architecture: [%s]\n", archi_table[i].short_archi));
1070 return archi_table[i].short_archi;
1073 /****************************************************************************
1074 Version information in Microsoft files is held in a VS_VERSION_INFO structure.
1075 There are two case to be covered here: PE (Portable Executable) and NE (New
1076 Executable) files. Both files support the same INFO structure, but PE files
1077 store the signature in unicode, and NE files store it as !unicode.
1078 returns -1 on error, 1 on version info found, and 0 on no version info found.
1079 ****************************************************************************/
1081 static int get_file_version(files_struct *fsp, char *fname,uint32 *major, uint32 *minor)
1087 if ((buf=(char *)SMB_MALLOC(DOS_HEADER_SIZE)) == NULL) {
1088 DEBUG(0,("get_file_version: PE file [%s] DOS Header malloc failed bytes = %d\n",
1089 fname, DOS_HEADER_SIZE));
1093 if ((byte_count = vfs_read_data(fsp, buf, DOS_HEADER_SIZE)) < DOS_HEADER_SIZE) {
1094 DEBUG(3,("get_file_version: File [%s] DOS header too short, bytes read = %lu\n",
1095 fname, (unsigned long)byte_count));
1096 goto no_version_info;
1099 /* Is this really a DOS header? */
1100 if (SVAL(buf,DOS_HEADER_MAGIC_OFFSET) != DOS_HEADER_MAGIC) {
1101 DEBUG(6,("get_file_version: File [%s] bad DOS magic = 0x%x\n",
1102 fname, SVAL(buf,DOS_HEADER_MAGIC_OFFSET)));
1103 goto no_version_info;
1106 /* Skip OEM header (if any) and the DOS stub to start of Windows header */
1107 if (SMB_VFS_LSEEK(fsp, SVAL(buf,DOS_HEADER_LFANEW_OFFSET), SEEK_SET) == (SMB_OFF_T)-1) {
1108 DEBUG(3,("get_file_version: File [%s] too short, errno = %d\n",
1110 /* Assume this isn't an error... the file just looks sort of like a PE/NE file */
1111 goto no_version_info;
1114 /* Note: DOS_HEADER_SIZE and NE_HEADER_SIZE are incidentally same */
1115 if ((byte_count = vfs_read_data(fsp, buf, NE_HEADER_SIZE)) < NE_HEADER_SIZE) {
1116 DEBUG(3,("get_file_version: File [%s] Windows header too short, bytes read = %lu\n",
1117 fname, (unsigned long)byte_count));
1118 /* Assume this isn't an error... the file just looks sort of like a PE/NE file */
1119 goto no_version_info;
1122 /* The header may be a PE (Portable Executable) or an NE (New Executable) */
1123 if (IVAL(buf,PE_HEADER_SIGNATURE_OFFSET) == PE_HEADER_SIGNATURE) {
1124 unsigned int num_sections;
1125 unsigned int section_table_bytes;
1127 /* Just skip over optional header to get to section table */
1128 if (SMB_VFS_LSEEK(fsp,
1129 SVAL(buf,PE_HEADER_OPTIONAL_HEADER_SIZE)-(NE_HEADER_SIZE-PE_HEADER_SIZE),
1130 SEEK_CUR) == (SMB_OFF_T)-1) {
1131 DEBUG(3,("get_file_version: File [%s] Windows optional header too short, errno = %d\n",
1136 /* get the section table */
1137 num_sections = SVAL(buf,PE_HEADER_NUMBER_OF_SECTIONS);
1138 section_table_bytes = num_sections * PE_HEADER_SECT_HEADER_SIZE;
1139 if (section_table_bytes == 0)
1143 if ((buf=(char *)SMB_MALLOC(section_table_bytes)) == NULL) {
1144 DEBUG(0,("get_file_version: PE file [%s] section table malloc failed bytes = %d\n",
1145 fname, section_table_bytes));
1149 if ((byte_count = vfs_read_data(fsp, buf, section_table_bytes)) < section_table_bytes) {
1150 DEBUG(3,("get_file_version: PE file [%s] Section header too short, bytes read = %lu\n",
1151 fname, (unsigned long)byte_count));
1155 /* Iterate the section table looking for the resource section ".rsrc" */
1156 for (i = 0; i < num_sections; i++) {
1157 int sec_offset = i * PE_HEADER_SECT_HEADER_SIZE;
1159 if (strcmp(".rsrc", &buf[sec_offset+PE_HEADER_SECT_NAME_OFFSET]) == 0) {
1160 unsigned int section_pos = IVAL(buf,sec_offset+PE_HEADER_SECT_PTR_DATA_OFFSET);
1161 unsigned int section_bytes = IVAL(buf,sec_offset+PE_HEADER_SECT_SIZE_DATA_OFFSET);
1163 if (section_bytes == 0)
1167 if ((buf=(char *)SMB_MALLOC(section_bytes)) == NULL) {
1168 DEBUG(0,("get_file_version: PE file [%s] version malloc failed bytes = %d\n",
1169 fname, section_bytes));
1173 /* Seek to the start of the .rsrc section info */
1174 if (SMB_VFS_LSEEK(fsp, section_pos, SEEK_SET) == (SMB_OFF_T)-1) {
1175 DEBUG(3,("get_file_version: PE file [%s] too short for section info, errno = %d\n",
1180 if ((byte_count = vfs_read_data(fsp, buf, section_bytes)) < section_bytes) {
1181 DEBUG(3,("get_file_version: PE file [%s] .rsrc section too short, bytes read = %lu\n",
1182 fname, (unsigned long)byte_count));
1186 if (section_bytes < VS_VERSION_INFO_UNICODE_SIZE)
1189 for (i=0; i<section_bytes-VS_VERSION_INFO_UNICODE_SIZE; i++) {
1190 /* Scan for 1st 3 unicoded bytes followed by word aligned magic value */
1191 if (buf[i] == 'V' && buf[i+1] == '\0' && buf[i+2] == 'S') {
1192 /* Align to next long address */
1193 int pos = (i + sizeof(VS_SIGNATURE)*2 + 3) & 0xfffffffc;
1195 if (IVAL(buf,pos) == VS_MAGIC_VALUE) {
1196 *major = IVAL(buf,pos+VS_MAJOR_OFFSET);
1197 *minor = IVAL(buf,pos+VS_MINOR_OFFSET);
1199 DEBUG(6,("get_file_version: PE file [%s] Version = %08x:%08x (%d.%d.%d.%d)\n",
1200 fname, *major, *minor,
1201 (*major>>16)&0xffff, *major&0xffff,
1202 (*minor>>16)&0xffff, *minor&0xffff));
1211 /* Version info not found, fall back to origin date/time */
1212 DEBUG(10,("get_file_version: PE file [%s] has no version info\n", fname));
1216 } else if (SVAL(buf,NE_HEADER_SIGNATURE_OFFSET) == NE_HEADER_SIGNATURE) {
1217 if (CVAL(buf,NE_HEADER_TARGET_OS_OFFSET) != NE_HEADER_TARGOS_WIN ) {
1218 DEBUG(3,("get_file_version: NE file [%s] wrong target OS = 0x%x\n",
1219 fname, CVAL(buf,NE_HEADER_TARGET_OS_OFFSET)));
1220 /* At this point, we assume the file is in error. It still could be somthing
1221 * else besides a NE file, but it unlikely at this point. */
1225 /* Allocate a bit more space to speed up things */
1227 if ((buf=(char *)SMB_MALLOC(VS_NE_BUF_SIZE)) == NULL) {
1228 DEBUG(0,("get_file_version: NE file [%s] malloc failed bytes = %d\n",
1229 fname, PE_HEADER_SIZE));
1233 /* This is a HACK! I got tired of trying to sort through the messy
1234 * 'NE' file format. If anyone wants to clean this up please have at
1235 * it, but this works. 'NE' files will eventually fade away. JRR */
1236 while((byte_count = vfs_read_data(fsp, buf, VS_NE_BUF_SIZE)) > 0) {
1237 /* Cover case that should not occur in a well formed 'NE' .dll file */
1238 if (byte_count-VS_VERSION_INFO_SIZE <= 0) break;
1240 for(i=0; i<byte_count; i++) {
1241 /* Fast skip past data that can't possibly match */
1242 if (buf[i] != 'V') continue;
1244 /* Potential match data crosses buf boundry, move it to beginning
1245 * of buf, and fill the buf with as much as it will hold. */
1246 if (i>byte_count-VS_VERSION_INFO_SIZE) {
1249 memcpy(buf, &buf[i], byte_count-i);
1250 if ((bc = vfs_read_data(fsp, &buf[byte_count-i], VS_NE_BUF_SIZE-
1251 (byte_count-i))) < 0) {
1253 DEBUG(0,("get_file_version: NE file [%s] Read error, errno=%d\n",
1258 byte_count = bc + (byte_count - i);
1259 if (byte_count<VS_VERSION_INFO_SIZE) break;
1264 /* Check that the full signature string and the magic number that
1265 * follows exist (not a perfect solution, but the chances that this
1266 * occurs in code is, well, remote. Yes I know I'm comparing the 'V'
1267 * twice, as it is simpler to read the code. */
1268 if (strcmp(&buf[i], VS_SIGNATURE) == 0) {
1269 /* Compute skip alignment to next long address */
1270 int skip = -(SMB_VFS_LSEEK(fsp, 0, SEEK_CUR) - (byte_count - i) +
1271 sizeof(VS_SIGNATURE)) & 3;
1272 if (IVAL(buf,i+sizeof(VS_SIGNATURE)+skip) != 0xfeef04bd) continue;
1274 *major = IVAL(buf,i+sizeof(VS_SIGNATURE)+skip+VS_MAJOR_OFFSET);
1275 *minor = IVAL(buf,i+sizeof(VS_SIGNATURE)+skip+VS_MINOR_OFFSET);
1276 DEBUG(6,("get_file_version: NE file [%s] Version = %08x:%08x (%d.%d.%d.%d)\n",
1277 fname, *major, *minor,
1278 (*major>>16)&0xffff, *major&0xffff,
1279 (*minor>>16)&0xffff, *minor&0xffff));
1286 /* Version info not found, fall back to origin date/time */
1287 DEBUG(0,("get_file_version: NE file [%s] Version info not found\n", fname));
1292 /* Assume this isn't an error... the file just looks sort of like a PE/NE file */
1293 DEBUG(3,("get_file_version: File [%s] unknown file format, signature = 0x%x\n",
1294 fname, IVAL(buf,PE_HEADER_SIGNATURE_OFFSET)));
1305 /****************************************************************************
1306 Drivers for Microsoft systems contain multiple files. Often, multiple drivers
1307 share one or more files. During the MS installation process files are checked
1308 to insure that only a newer version of a shared file is installed over an
1309 older version. There are several possibilities for this comparison. If there
1310 is no previous version, the new one is newer (obviously). If either file is
1311 missing the version info structure, compare the creation date (on Unix use
1312 the modification date). Otherwise chose the numerically larger version number.
1313 ****************************************************************************/
1315 static int file_version_is_newer(connection_struct *conn, fstring new_file, fstring old_file)
1317 bool use_version = true;
1318 char *filepath = NULL;
1322 time_t new_create_time;
1326 time_t old_create_time;
1328 files_struct *fsp = NULL;
1330 SMB_STRUCT_STAT stat_buf;
1334 SET_STAT_INVALID(st);
1335 SET_STAT_INVALID(stat_buf);
1336 new_create_time = (time_t)0;
1337 old_create_time = (time_t)0;
1339 /* Get file version info (if available) for previous file (if it exists) */
1340 filepath = driver_unix_convert(conn,old_file,&stat_buf);
1345 status = SMB_VFS_CREATE_FILE(
1348 0, /* root_dir_fid */
1349 filepath, /* fname */
1350 0, /* create_file_flags */
1351 FILE_GENERIC_READ, /* access_mask */
1352 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
1353 FILE_OPEN, /* create_disposition*/
1354 0, /* create_options */
1355 FILE_ATTRIBUTE_NORMAL, /* file_attributes */
1356 INTERNAL_OPEN_ONLY, /* oplock_request */
1357 0, /* allocation_size */
1362 &stat_buf); /* psbuf */
1364 if (!NT_STATUS_IS_OK(status)) {
1365 /* Old file not found, so by definition new file is in fact newer */
1366 DEBUG(10,("file_version_is_newer: Can't open old file [%s], errno = %d\n",
1371 int ret = get_file_version(fsp, old_file, &old_major, &old_minor);
1377 DEBUG(6,("file_version_is_newer: Version info not found [%s], use mod time\n",
1379 use_version = false;
1380 if (SMB_VFS_FSTAT(fsp, &st) == -1) {
1383 old_create_time = st.st_mtime;
1384 DEBUGADD(6,("file_version_is_newer: mod time = %ld sec\n", old_create_time));
1387 close_file(NULL, fsp, NORMAL_CLOSE);
1390 /* Get file version info (if available) for new file */
1391 filepath = driver_unix_convert(conn,new_file,&stat_buf);
1396 status = SMB_VFS_CREATE_FILE(
1399 0, /* root_dir_fid */
1400 filepath, /* fname */
1401 0, /* create_file_flags */
1402 FILE_GENERIC_READ, /* access_mask */
1403 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
1404 FILE_OPEN, /* create_disposition*/
1405 0, /* create_options */
1406 FILE_ATTRIBUTE_NORMAL, /* file_attributes */
1407 INTERNAL_OPEN_ONLY, /* oplock_request */
1408 0, /* allocation_size */
1413 &stat_buf); /* psbuf */
1415 if (!NT_STATUS_IS_OK(status)) {
1416 /* New file not found, this shouldn't occur if the caller did its job */
1417 DEBUG(3,("file_version_is_newer: Can't open new file [%s], errno = %d\n",
1422 int ret = get_file_version(fsp, new_file, &new_major, &new_minor);
1428 DEBUG(6,("file_version_is_newer: Version info not found [%s], use mod time\n",
1430 use_version = false;
1431 if (SMB_VFS_FSTAT(fsp, &st) == -1) {
1434 new_create_time = st.st_mtime;
1435 DEBUGADD(6,("file_version_is_newer: mod time = %ld sec\n", new_create_time));
1438 close_file(NULL, fsp, NORMAL_CLOSE);
1441 if (use_version && (new_major != old_major || new_minor != old_minor)) {
1442 /* Compare versions and choose the larger version number */
1443 if (new_major > old_major ||
1444 (new_major == old_major && new_minor > old_minor)) {
1446 DEBUG(6,("file_version_is_newer: Replacing [%s] with [%s]\n", old_file, new_file));
1450 DEBUG(6,("file_version_is_newer: Leaving [%s] unchanged\n", old_file));
1455 /* Compare modification time/dates and choose the newest time/date */
1456 if (new_create_time > old_create_time) {
1457 DEBUG(6,("file_version_is_newer: Replacing [%s] with [%s]\n", old_file, new_file));
1461 DEBUG(6,("file_version_is_newer: Leaving [%s] unchanged\n", old_file));
1468 close_file(NULL, fsp, NORMAL_CLOSE);
1472 /****************************************************************************
1473 Determine the correct cVersion associated with an architecture and driver
1474 ****************************************************************************/
1475 static uint32 get_correct_cversion(struct pipes_struct *p,
1476 const char *architecture,
1477 fstring driverpath_in,
1482 char *driverpath = NULL;
1483 files_struct *fsp = NULL;
1485 connection_struct *conn = NULL;
1488 fstring printdollar;
1489 int printdollar_snum;
1491 SET_STAT_INVALID(st);
1493 *perr = WERR_INVALID_PARAM;
1495 /* If architecture is Windows 95/98/ME, the version is always 0. */
1496 if (strcmp(architecture, SPL_ARCH_WIN40) == 0) {
1497 DEBUG(10,("get_correct_cversion: Driver is Win9x, cversion = 0\n"));
1502 /* If architecture is Windows x64, the version is always 3. */
1503 if (strcmp(architecture, SPL_ARCH_X64) == 0) {
1504 DEBUG(10,("get_correct_cversion: Driver is x64, cversion = 3\n"));
1509 fstrcpy(printdollar, "print$");
1511 printdollar_snum = find_service(printdollar);
1512 if (printdollar_snum == -1) {
1513 *perr = WERR_NO_SUCH_SHARE;
1517 nt_status = create_conn_struct(talloc_tos(), &conn, printdollar_snum,
1518 lp_pathname(printdollar_snum),
1519 p->server_info, &oldcwd);
1520 if (!NT_STATUS_IS_OK(nt_status)) {
1521 DEBUG(0,("get_correct_cversion: create_conn_struct "
1522 "returned %s\n", nt_errstr(nt_status)));
1523 *perr = ntstatus_to_werror(nt_status);
1527 /* Open the driver file (Portable Executable format) and determine the
1528 * deriver the cversion. */
1529 driverpath = talloc_asprintf(talloc_tos(),
1538 driverpath = driver_unix_convert(conn,driverpath,&st);
1544 if (!vfs_file_exist(conn, driverpath, &st)) {
1545 *perr = WERR_BADFILE;
1549 status = SMB_VFS_CREATE_FILE(
1552 0, /* root_dir_fid */
1553 driverpath, /* fname */
1554 0, /* create_file_flags */
1555 FILE_GENERIC_READ, /* access_mask */
1556 FILE_SHARE_READ | FILE_SHARE_WRITE, /* share_access */
1557 FILE_OPEN, /* create_disposition*/
1558 0, /* create_options */
1559 FILE_ATTRIBUTE_NORMAL, /* file_attributes */
1560 INTERNAL_OPEN_ONLY, /* oplock_request */
1561 0, /* allocation_size */
1568 if (!NT_STATUS_IS_OK(status)) {
1569 DEBUG(3,("get_correct_cversion: Can't open file [%s], errno = %d\n",
1570 driverpath, errno));
1571 *perr = WERR_ACCESS_DENIED;
1576 int ret = get_file_version(fsp, driverpath, &major, &minor);
1577 if (ret == -1) goto error_exit;
1580 DEBUG(6,("get_correct_cversion: Version info not found [%s]\n", driverpath));
1585 * This is a Microsoft'ism. See references in MSDN to VER_FILEVERSION
1586 * for more details. Version in this case is not just the version of the
1587 * file, but the version in the sense of kernal mode (2) vs. user mode
1588 * (3) drivers. Other bits of the version fields are the version info.
1591 cversion = major & 0x0000ffff;
1593 case 2: /* WinNT drivers */
1594 case 3: /* Win2K drivers */
1598 DEBUG(6,("get_correct_cversion: cversion invalid [%s] cversion = %d\n",
1599 driverpath, cversion));
1603 DEBUG(10,("get_correct_cversion: Version info found [%s] major = 0x%x minor = 0x%x\n",
1604 driverpath, major, minor));
1607 DEBUG(10,("get_correct_cversion: Driver file [%s] cversion = %d\n",
1608 driverpath, cversion));
1616 close_file(NULL, fsp, NORMAL_CLOSE);
1619 vfs_ChDir(conn, oldcwd);
1620 conn_free_internal(conn);
1622 if (cversion != -1) {
1628 /****************************************************************************
1629 ****************************************************************************/
1630 static WERROR clean_up_driver_struct_level_3(struct pipes_struct *rpc_pipe,
1631 NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver)
1633 const char *architecture;
1639 /* clean up the driver name.
1640 * we can get .\driver.dll
1641 * or worse c:\windows\system\driver.dll !
1643 /* using an intermediate string to not have overlaping memcpy()'s */
1644 if ((p = strrchr(driver->driverpath,'\\')) != NULL) {
1645 fstrcpy(new_name, p+1);
1646 fstrcpy(driver->driverpath, new_name);
1649 if ((p = strrchr(driver->datafile,'\\')) != NULL) {
1650 fstrcpy(new_name, p+1);
1651 fstrcpy(driver->datafile, new_name);
1654 if ((p = strrchr(driver->configfile,'\\')) != NULL) {
1655 fstrcpy(new_name, p+1);
1656 fstrcpy(driver->configfile, new_name);
1659 if ((p = strrchr(driver->helpfile,'\\')) != NULL) {
1660 fstrcpy(new_name, p+1);
1661 fstrcpy(driver->helpfile, new_name);
1664 if (driver->dependentfiles) {
1665 for (i=0; *driver->dependentfiles[i]; i++) {
1666 if ((p = strrchr(driver->dependentfiles[i],'\\')) != NULL) {
1667 fstrcpy(new_name, p+1);
1668 fstrcpy(driver->dependentfiles[i], new_name);
1673 architecture = get_short_archi(driver->environment);
1674 if (!architecture) {
1675 return WERR_UNKNOWN_PRINTER_DRIVER;
1678 /* jfm:7/16/2000 the client always sends the cversion=0.
1679 * The server should check which version the driver is by reading
1680 * the PE header of driver->driverpath.
1682 * For Windows 95/98 the version is 0 (so the value sent is correct)
1683 * For Windows NT (the architecture doesn't matter)
1684 * NT 3.1: cversion=0
1685 * NT 3.5/3.51: cversion=1
1689 if ((driver->cversion = get_correct_cversion(rpc_pipe, architecture,
1697 /****************************************************************************
1698 ****************************************************************************/
1699 static WERROR clean_up_driver_struct_level_6(struct pipes_struct *rpc_pipe,
1700 NT_PRINTER_DRIVER_INFO_LEVEL_6 *driver)
1702 const char *architecture;
1708 /* clean up the driver name.
1709 * we can get .\driver.dll
1710 * or worse c:\windows\system\driver.dll !
1712 /* using an intermediate string to not have overlaping memcpy()'s */
1713 if ((p = strrchr(driver->driverpath,'\\')) != NULL) {
1714 fstrcpy(new_name, p+1);
1715 fstrcpy(driver->driverpath, new_name);
1718 if ((p = strrchr(driver->datafile,'\\')) != NULL) {
1719 fstrcpy(new_name, p+1);
1720 fstrcpy(driver->datafile, new_name);
1723 if ((p = strrchr(driver->configfile,'\\')) != NULL) {
1724 fstrcpy(new_name, p+1);
1725 fstrcpy(driver->configfile, new_name);
1728 if ((p = strrchr(driver->helpfile,'\\')) != NULL) {
1729 fstrcpy(new_name, p+1);
1730 fstrcpy(driver->helpfile, new_name);
1733 if (driver->dependentfiles) {
1734 for (i=0; *driver->dependentfiles[i]; i++) {
1735 if ((p = strrchr(driver->dependentfiles[i],'\\')) != NULL) {
1736 fstrcpy(new_name, p+1);
1737 fstrcpy(driver->dependentfiles[i], new_name);
1742 architecture = get_short_archi(driver->environment);
1743 if (!architecture) {
1744 return WERR_UNKNOWN_PRINTER_DRIVER;
1747 /* jfm:7/16/2000 the client always sends the cversion=0.
1748 * The server should check which version the driver is by reading
1749 * the PE header of driver->driverpath.
1751 * For Windows 95/98 the version is 0 (so the value sent is correct)
1752 * For Windows NT (the architecture doesn't matter)
1753 * NT 3.1: cversion=0
1754 * NT 3.5/3.51: cversion=1
1759 if ((driver->version = get_correct_cversion(rpc_pipe, architecture,
1767 /****************************************************************************
1768 ****************************************************************************/
1769 WERROR clean_up_driver_struct(struct pipes_struct *rpc_pipe,
1770 NT_PRINTER_DRIVER_INFO_LEVEL driver_abstract,
1776 NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver;
1777 driver=driver_abstract.info_3;
1778 return clean_up_driver_struct_level_3(rpc_pipe,
1783 NT_PRINTER_DRIVER_INFO_LEVEL_6 *driver;
1784 driver=driver_abstract.info_6;
1785 return clean_up_driver_struct_level_6(rpc_pipe,
1789 return WERR_INVALID_PARAM;
1793 /****************************************************************************
1794 This function sucks and should be replaced. JRA.
1795 ****************************************************************************/
1797 static void convert_level_6_to_level3(NT_PRINTER_DRIVER_INFO_LEVEL_3 *dst, NT_PRINTER_DRIVER_INFO_LEVEL_6 *src)
1799 dst->cversion = src->version;
1801 fstrcpy( dst->name, src->name);
1802 fstrcpy( dst->environment, src->environment);
1803 fstrcpy( dst->driverpath, src->driverpath);
1804 fstrcpy( dst->datafile, src->datafile);
1805 fstrcpy( dst->configfile, src->configfile);
1806 fstrcpy( dst->helpfile, src->helpfile);
1807 fstrcpy( dst->monitorname, src->monitorname);
1808 fstrcpy( dst->defaultdatatype, src->defaultdatatype);
1809 dst->dependentfiles = src->dependentfiles;
1812 #if 0 /* Debugging function */
1814 static char* ffmt(unsigned char *c){
1816 static char ffmt_str[17];
1818 for (i=0; i<16; i++) {
1819 if ((c[i] < ' ') || (c[i] > '~'))
1830 /****************************************************************************
1831 ****************************************************************************/
1832 WERROR move_driver_to_download_area(struct pipes_struct *p,
1833 NT_PRINTER_DRIVER_INFO_LEVEL driver_abstract,
1834 uint32 level, WERROR *perr)
1836 NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver;
1837 NT_PRINTER_DRIVER_INFO_LEVEL_3 converted_driver;
1838 const char *architecture;
1839 char *new_dir = NULL;
1840 char *old_name = NULL;
1841 char *new_name = NULL;
1842 connection_struct *conn = NULL;
1846 TALLOC_CTX *ctx = talloc_tos();
1849 fstring printdollar;
1850 int printdollar_snum;
1855 driver=driver_abstract.info_3;
1856 else if (level==6) {
1857 convert_level_6_to_level3(&converted_driver, driver_abstract.info_6);
1858 driver = &converted_driver;
1860 DEBUG(0,("move_driver_to_download_area: Unknown info level (%u)\n", (unsigned int)level ));
1861 return WERR_UNKNOWN_LEVEL;
1864 architecture = get_short_archi(driver->environment);
1865 if (!architecture) {
1866 return WERR_UNKNOWN_PRINTER_DRIVER;
1869 fstrcpy(printdollar, "print$");
1871 printdollar_snum = find_service(printdollar);
1872 if (printdollar_snum == -1) {
1873 *perr = WERR_NO_SUCH_SHARE;
1874 return WERR_NO_SUCH_SHARE;
1877 nt_status = create_conn_struct(talloc_tos(), &conn, printdollar_snum,
1878 lp_pathname(printdollar_snum),
1879 p->server_info, &oldcwd);
1880 if (!NT_STATUS_IS_OK(nt_status)) {
1881 DEBUG(0,("move_driver_to_download_area: create_conn_struct "
1882 "returned %s\n", nt_errstr(nt_status)));
1883 *perr = ntstatus_to_werror(nt_status);
1887 DEBUG(5,("Creating first directory\n"));
1888 new_dir = talloc_asprintf(ctx,
1896 new_dir = driver_unix_convert(conn,new_dir,&st);
1902 create_directory(conn, NULL, new_dir);
1904 /* For each driver file, archi\filexxx.yyy, if there is a duplicate file
1905 * listed for this driver which has already been moved, skip it (note:
1906 * drivers may list the same file name several times. Then check if the
1907 * file already exists in archi\cversion\, if so, check that the version
1908 * info (or time stamps if version info is unavailable) is newer (or the
1909 * date is later). If it is, move it to archi\cversion\filexxx.yyy.
1910 * Otherwise, delete the file.
1912 * If a file is not moved to archi\cversion\ because of an error, all the
1913 * rest of the 'unmoved' driver files are removed from archi\. If one or
1914 * more of the driver's files was already moved to archi\cversion\, it
1915 * potentially leaves the driver in a partially updated state. Version
1916 * trauma will most likely occur if an client attempts to use any printer
1917 * bound to the driver. Perhaps a rewrite to make sure the moves can be
1918 * done is appropriate... later JRR
1921 DEBUG(5,("Moving files now !\n"));
1923 if (driver->driverpath && strlen(driver->driverpath)) {
1924 new_name = talloc_asprintf(ctx,
1927 driver->driverpath);
1932 old_name = talloc_asprintf(ctx,
1935 driver->driverpath);
1941 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
1942 new_name = driver_unix_convert(conn,new_name,&st);
1947 if ( !NT_STATUS_IS_OK(copy_file(ctx,conn, new_name, old_name, OPENX_FILE_EXISTS_TRUNCATE|
1948 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False))) {
1949 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
1950 new_name, old_name));
1951 *perr = WERR_ACCESS_DENIED;
1957 if (driver->datafile && strlen(driver->datafile)) {
1958 if (!strequal(driver->datafile, driver->driverpath)) {
1959 new_name = talloc_asprintf(ctx,
1967 old_name = talloc_asprintf(ctx,
1975 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
1976 new_name = driver_unix_convert(conn,new_name,&st);
1981 if ( !NT_STATUS_IS_OK(copy_file(ctx,conn, new_name, old_name, OPENX_FILE_EXISTS_TRUNCATE|
1982 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False))) {
1983 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
1984 new_name, old_name));
1985 *perr = WERR_ACCESS_DENIED;
1992 if (driver->configfile && strlen(driver->configfile)) {
1993 if (!strequal(driver->configfile, driver->driverpath) &&
1994 !strequal(driver->configfile, driver->datafile)) {
1995 new_name = talloc_asprintf(ctx,
1998 driver->configfile);
2003 old_name = talloc_asprintf(ctx,
2006 driver->configfile);
2011 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
2012 new_name = driver_unix_convert(conn,new_name,&st);
2017 if ( !NT_STATUS_IS_OK(copy_file(ctx,conn, new_name, old_name, OPENX_FILE_EXISTS_TRUNCATE|
2018 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False))) {
2019 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
2020 new_name, old_name));
2021 *perr = WERR_ACCESS_DENIED;
2028 if (driver->helpfile && strlen(driver->helpfile)) {
2029 if (!strequal(driver->helpfile, driver->driverpath) &&
2030 !strequal(driver->helpfile, driver->datafile) &&
2031 !strequal(driver->helpfile, driver->configfile)) {
2032 new_name = talloc_asprintf(ctx,
2040 old_name = talloc_asprintf(ctx,
2048 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
2049 new_name = driver_unix_convert(conn,new_name,&st);
2054 if ( !NT_STATUS_IS_OK(copy_file(ctx,conn, new_name, old_name, OPENX_FILE_EXISTS_TRUNCATE|
2055 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False))) {
2056 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
2057 new_name, old_name));
2058 *perr = WERR_ACCESS_DENIED;
2065 if (driver->dependentfiles) {
2066 for (i=0; *driver->dependentfiles[i]; i++) {
2067 if (!strequal(driver->dependentfiles[i], driver->driverpath) &&
2068 !strequal(driver->dependentfiles[i], driver->datafile) &&
2069 !strequal(driver->dependentfiles[i], driver->configfile) &&
2070 !strequal(driver->dependentfiles[i], driver->helpfile)) {
2072 for (j=0; j < i; j++) {
2073 if (strequal(driver->dependentfiles[i], driver->dependentfiles[j])) {
2078 new_name = talloc_asprintf(ctx,
2081 driver->dependentfiles[i]);
2086 old_name = talloc_asprintf(ctx,
2089 driver->dependentfiles[i]);
2094 if (ver != -1 && (ver=file_version_is_newer(conn, new_name, old_name)) > 0) {
2095 new_name = driver_unix_convert(conn,new_name,&st);
2100 if ( !NT_STATUS_IS_OK(copy_file(ctx,conn, new_name, old_name,
2101 OPENX_FILE_EXISTS_TRUNCATE|
2102 OPENX_FILE_CREATE_IF_NOT_EXIST, 0, False))) {
2103 DEBUG(0,("move_driver_to_download_area: Unable to rename [%s] to [%s]\n",
2104 new_name, old_name));
2105 *perr = WERR_ACCESS_DENIED;
2117 vfs_ChDir(conn, oldcwd);
2118 conn_free_internal(conn);
2121 if (W_ERROR_EQUAL(*perr, WERR_OK)) {
2125 return WERR_UNKNOWN_PRINTER_DRIVER;
2130 /****************************************************************************
2131 ****************************************************************************/
2133 static uint32 add_a_printer_driver_3(NT_PRINTER_DRIVER_INFO_LEVEL_3 *driver)
2135 TALLOC_CTX *ctx = talloc_tos();
2137 const char *architecture;
2138 char *directory = NULL;
2145 architecture = get_short_archi(driver->environment);
2146 if (!architecture) {
2150 /* The names are relative. We store them in the form: \print$\arch\version\driver.xxx
2151 * \\server is added in the rpc server layer.
2152 * It does make sense to NOT store the server's name in the printer TDB.
2155 directory = talloc_asprintf(ctx, "\\print$\\%s\\%d\\",
2156 architecture, driver->cversion);
2161 /* .inf files do not always list a file for each of the four standard files.
2162 * Don't prepend a path to a null filename, or client claims:
2163 * "The server on which the printer resides does not have a suitable
2164 * <printer driver name> printer driver installed. Click OK if you
2165 * wish to install the driver on your local machine."
2167 if (strlen(driver->driverpath)) {
2168 fstrcpy(temp_name, driver->driverpath);
2169 slprintf(driver->driverpath, sizeof(driver->driverpath)-1, "%s%s", directory, temp_name);
2172 if (strlen(driver->datafile)) {
2173 fstrcpy(temp_name, driver->datafile);
2174 slprintf(driver->datafile, sizeof(driver->datafile)-1, "%s%s", directory, temp_name);
2177 if (strlen(driver->configfile)) {
2178 fstrcpy(temp_name, driver->configfile);
2179 slprintf(driver->configfile, sizeof(driver->configfile)-1, "%s%s", directory, temp_name);
2182 if (strlen(driver->helpfile)) {
2183 fstrcpy(temp_name, driver->helpfile);
2184 slprintf(driver->helpfile, sizeof(driver->helpfile)-1, "%s%s", directory, temp_name);
2187 if (driver->dependentfiles) {
2188 for (i=0; *driver->dependentfiles[i]; i++) {
2189 fstrcpy(temp_name, driver->dependentfiles[i]);
2190 slprintf(driver->dependentfiles[i], sizeof(driver->dependentfiles[i])-1, "%s%s", directory, temp_name);
2194 key = talloc_asprintf(ctx, "%s%s/%d/%s", DRIVERS_PREFIX,
2195 architecture, driver->cversion, driver->name);
2200 DEBUG(5,("add_a_printer_driver_3: Adding driver with key %s\n", key ));
2207 len += tdb_pack(buf+len, buflen-len, "dffffffff",
2210 driver->environment,
2215 driver->monitorname,
2216 driver->defaultdatatype);
2218 if (driver->dependentfiles) {
2219 for (i=0; *driver->dependentfiles[i]; i++) {
2220 len += tdb_pack(buf+len, buflen-len, "f",
2221 driver->dependentfiles[i]);
2225 if (len != buflen) {
2226 buf = (uint8 *)SMB_REALLOC(buf, len);
2228 DEBUG(0,("add_a_printer_driver_3: failed to enlarge buffer\n!"));
2239 ret = tdb_store_bystring(tdb_drivers, key, dbuf, TDB_REPLACE);
2243 DEBUG(0,("add_a_printer_driver_3: Adding driver with key %s failed.\n", key ));
2249 /****************************************************************************
2250 ****************************************************************************/
2251 static uint32 add_a_printer_driver_6(NT_PRINTER_DRIVER_INFO_LEVEL_6 *driver)
2253 NT_PRINTER_DRIVER_INFO_LEVEL_3 info3;
2256 info3.cversion = driver->version;
2257 fstrcpy(info3.name,driver->name);
2258 fstrcpy(info3.environment,driver->environment);
2259 fstrcpy(info3.driverpath,driver->driverpath);
2260 fstrcpy(info3.datafile,driver->datafile);
2261 fstrcpy(info3.configfile,driver->configfile);
2262 fstrcpy(info3.helpfile,driver->helpfile);
2263 fstrcpy(info3.monitorname,driver->monitorname);
2264 fstrcpy(info3.defaultdatatype,driver->defaultdatatype);
2265 info3.dependentfiles = driver->dependentfiles;
2267 return add_a_printer_driver_3(&info3);
2271 /****************************************************************************
2272 ****************************************************************************/
2273 static WERROR get_a_printer_driver_3_default(NT_PRINTER_DRIVER_INFO_LEVEL_3 **info_ptr, const char *driver, const char *arch)
2275 NT_PRINTER_DRIVER_INFO_LEVEL_3 info;
2279 fstrcpy(info.name, driver);
2280 fstrcpy(info.defaultdatatype, "RAW");
2282 fstrcpy(info.driverpath, "");
2283 fstrcpy(info.datafile, "");
2284 fstrcpy(info.configfile, "");
2285 fstrcpy(info.helpfile, "");
2287 if ((info.dependentfiles= SMB_MALLOC_ARRAY(fstring, 2)) == NULL)
2290 memset(info.dependentfiles, '\0', 2*sizeof(fstring));
2291 fstrcpy(info.dependentfiles[0], "");
2293 *info_ptr = (NT_PRINTER_DRIVER_INFO_LEVEL_3 *)memdup(&info, sizeof(info));
2295 SAFE_FREE(info.dependentfiles);
2302 /****************************************************************************
2303 ****************************************************************************/
2304 static WERROR get_a_printer_driver_3(NT_PRINTER_DRIVER_INFO_LEVEL_3 **info_ptr, fstring drivername, const char *arch, uint32 version)
2306 NT_PRINTER_DRIVER_INFO_LEVEL_3 driver;
2308 const char *architecture;
2313 ZERO_STRUCT(driver);
2315 architecture = get_short_archi(arch);
2316 if ( !architecture ) {
2317 return WERR_UNKNOWN_PRINTER_DRIVER;
2320 /* Windows 4.0 (i.e. win9x) should always use a version of 0 */
2322 if ( strcmp( architecture, SPL_ARCH_WIN40 ) == 0 )
2325 DEBUG(8,("get_a_printer_driver_3: [%s%s/%d/%s]\n", DRIVERS_PREFIX, architecture, version, drivername));
2327 if (asprintf(&key, "%s%s/%d/%s", DRIVERS_PREFIX,
2328 architecture, version, drivername) < 0) {
2332 dbuf = tdb_fetch_bystring(tdb_drivers, key);
2335 return WERR_UNKNOWN_PRINTER_DRIVER;
2338 len += tdb_unpack(dbuf.dptr, dbuf.dsize, "dffffffff",
2347 driver.defaultdatatype);
2350 while (len < dbuf.dsize) {
2351 driver.dependentfiles = SMB_REALLOC_ARRAY(driver.dependentfiles, fstring, i+2);
2352 if ( !driver.dependentfiles ) {
2353 DEBUG(0,("get_a_printer_driver_3: failed to enlarge buffer!\n"));
2357 len += tdb_unpack(dbuf.dptr+len, dbuf.dsize-len, "f",
2358 &driver.dependentfiles[i]);
2362 if ( driver.dependentfiles )
2363 fstrcpy( driver.dependentfiles[i], "" );
2365 SAFE_FREE(dbuf.dptr);
2368 if (len != dbuf.dsize) {
2369 SAFE_FREE(driver.dependentfiles);
2371 return get_a_printer_driver_3_default(info_ptr, drivername, arch);
2374 *info_ptr = (NT_PRINTER_DRIVER_INFO_LEVEL_3 *)memdup(&driver, sizeof(driver));
2376 SAFE_FREE(driver.dependentfiles);
2383 /****************************************************************************
2384 Debugging function, dump at level 6 the struct in the logs.
2385 ****************************************************************************/
2387 static uint32 dump_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL driver, uint32 level)
2390 NT_PRINTER_DRIVER_INFO_LEVEL_3 *info3;
2393 DEBUG(20,("Dumping printer driver at level [%d]\n", level));
2399 if (driver.info_3 == NULL)
2402 info3=driver.info_3;
2404 DEBUGADD(20,("version:[%d]\n", info3->cversion));
2405 DEBUGADD(20,("name:[%s]\n", info3->name));
2406 DEBUGADD(20,("environment:[%s]\n", info3->environment));
2407 DEBUGADD(20,("driverpath:[%s]\n", info3->driverpath));
2408 DEBUGADD(20,("datafile:[%s]\n", info3->datafile));
2409 DEBUGADD(20,("configfile:[%s]\n", info3->configfile));
2410 DEBUGADD(20,("helpfile:[%s]\n", info3->helpfile));
2411 DEBUGADD(20,("monitorname:[%s]\n", info3->monitorname));
2412 DEBUGADD(20,("defaultdatatype:[%s]\n", info3->defaultdatatype));
2414 for (i=0; info3->dependentfiles &&
2415 *info3->dependentfiles[i]; i++) {
2416 DEBUGADD(20,("dependentfile:[%s]\n",
2417 info3->dependentfiles[i]));
2424 DEBUGADD(20,("dump_a_printer_driver: Level %u not implemented\n", (unsigned int)level));
2432 /****************************************************************************
2433 ****************************************************************************/
2434 int pack_devicemode(NT_DEVICEMODE *nt_devmode, uint8 *buf, int buflen)
2438 len += tdb_pack(buf+len, buflen-len, "p", nt_devmode);
2443 len += tdb_pack(buf+len, buflen-len, "ffwwwwwwwwwwwwwwwwwwddddddddddddddp",
2444 nt_devmode->devicename,
2445 nt_devmode->formname,
2447 nt_devmode->specversion,
2448 nt_devmode->driverversion,
2450 nt_devmode->driverextra,
2451 nt_devmode->orientation,
2452 nt_devmode->papersize,
2453 nt_devmode->paperlength,
2454 nt_devmode->paperwidth,
2457 nt_devmode->defaultsource,
2458 nt_devmode->printquality,
2461 nt_devmode->yresolution,
2462 nt_devmode->ttoption,
2463 nt_devmode->collate,
2464 nt_devmode->logpixels,
2467 nt_devmode->bitsperpel,
2468 nt_devmode->pelswidth,
2469 nt_devmode->pelsheight,
2470 nt_devmode->displayflags,
2471 nt_devmode->displayfrequency,
2472 nt_devmode->icmmethod,
2473 nt_devmode->icmintent,
2474 nt_devmode->mediatype,
2475 nt_devmode->dithertype,
2476 nt_devmode->reserved1,
2477 nt_devmode->reserved2,
2478 nt_devmode->panningwidth,
2479 nt_devmode->panningheight,
2480 nt_devmode->nt_dev_private);
2482 if (nt_devmode->nt_dev_private) {
2483 len += tdb_pack(buf+len, buflen-len, "B",
2484 nt_devmode->driverextra,
2485 nt_devmode->nt_dev_private);
2488 DEBUG(8,("Packed devicemode [%s]\n", nt_devmode->formname));
2493 /****************************************************************************
2494 Pack all values in all printer keys
2495 ***************************************************************************/
2497 static int pack_values(NT_PRINTER_DATA *data, uint8 *buf, int buflen)
2501 REGISTRY_VALUE *val;
2502 REGVAL_CTR *val_ctr;
2509 /* loop over all keys */
2511 for ( i=0; i<data->num_keys; i++ ) {
2512 val_ctr = data->keys[i].values;
2513 num_values = regval_ctr_numvals( val_ctr );
2515 /* pack the keyname followed by a empty value */
2517 len += tdb_pack(buf+len, buflen-len, "pPdB",
2518 &data->keys[i].name,
2524 /* now loop over all values */
2526 for ( j=0; j<num_values; j++ ) {
2527 /* pathname should be stored as <key>\<value> */
2529 val = regval_ctr_specific_value( val_ctr, j );
2530 if (asprintf(&path, "%s\\%s",
2532 regval_name(val)) < 0) {
2536 len += tdb_pack(buf+len, buflen-len, "pPdB",
2541 regval_data_p(val) );
2543 DEBUG(8,("specific: [%s], len: %d\n", regval_name(val), regval_size(val)));
2551 len += tdb_pack(buf+len, buflen-len, "p", NULL);
2557 /****************************************************************************
2558 Delete a printer - this just deletes the printer info file, any open
2559 handles are not affected.
2560 ****************************************************************************/
2562 uint32 del_a_printer(const char *sharename)
2565 char *printdb_path = NULL;
2566 TALLOC_CTX *ctx = talloc_tos();
2568 kbuf = make_printer_tdbkey(ctx, sharename);
2569 tdb_delete(tdb_printers, kbuf);
2571 kbuf= make_printers_secdesc_tdbkey(ctx, sharename);
2572 tdb_delete(tdb_printers, kbuf);
2574 close_all_print_db();
2576 if (geteuid() == 0) {
2577 if (asprintf(&printdb_path, "%s%s.tdb",
2578 cache_path("printing/"),
2582 unlink(printdb_path);
2583 SAFE_FREE(printdb_path);
2589 /****************************************************************************
2590 ****************************************************************************/
2591 static WERROR update_a_printer_2(NT_PRINTER_INFO_LEVEL_2 *info)
2597 TDB_DATA kbuf, dbuf;
2600 * in addprinter: no servername and the printer is the name
2601 * in setprinter: servername is \\server
2602 * and printer is \\server\\printer
2604 * Samba manages only local printers.
2605 * we currently don't support things like i
2606 * path=\\other_server\printer
2608 * We only store the printername, not \\server\printername
2611 if ( info->servername[0] != '\0' ) {
2612 trim_string(info->printername, info->servername, NULL);
2613 trim_char(info->printername, '\\', '\0');
2614 info->servername[0]='\0';
2618 * JFM: one day I'll forget.
2619 * below that's info->portname because that's the SAMBA sharename
2620 * and I made NT 'thinks' it's the portname
2621 * the info->sharename is the thing you can name when you add a printer
2622 * that's the short-name when you create shared printer for 95/98
2623 * So I've made a limitation in SAMBA: you can only have 1 printer model
2624 * behind a SAMBA share.
2632 len += tdb_pack(buf+len, buflen-len, "dddddddddddfffffPfffff",
2635 info->default_priority,
2652 info->printprocessor,
2656 len += pack_devicemode(info->devmode, buf+len, buflen-len);
2657 retlen = pack_values( info->data, buf+len, buflen-len );
2664 if (buflen != len) {
2665 buf = (uint8 *)SMB_REALLOC(buf, len);
2667 DEBUG(0,("update_a_printer_2: failed to enlarge buffer!\n"));
2675 kbuf = make_printer_tdbkey(talloc_tos(), info->sharename );
2680 ret = (tdb_store(tdb_printers, kbuf, dbuf, TDB_REPLACE) == 0? WERR_OK : WERR_NOMEM);
2683 if (!W_ERROR_IS_OK(ret))
2684 DEBUG(8, ("error updating printer to tdb on disk\n"));
2688 DEBUG(8,("packed printer [%s] with driver [%s] portname=[%s] len=%d\n",
2689 info->sharename, info->drivername, info->portname, len));
2695 /****************************************************************************
2696 Malloc and return an NT devicemode.
2697 ****************************************************************************/
2699 NT_DEVICEMODE *construct_nt_devicemode(const fstring default_devicename)
2702 char adevice[MAXDEVICENAME];
2703 NT_DEVICEMODE *nt_devmode = SMB_MALLOC_P(NT_DEVICEMODE);
2705 if (nt_devmode == NULL) {
2706 DEBUG(0,("construct_nt_devicemode: malloc fail.\n"));
2710 ZERO_STRUCTP(nt_devmode);
2712 slprintf(adevice, sizeof(adevice), "%s", default_devicename);
2713 fstrcpy(nt_devmode->devicename, adevice);
2715 fstrcpy(nt_devmode->formname, "Letter");
2717 nt_devmode->specversion = 0x0401;
2718 nt_devmode->driverversion = 0x0400;
2719 nt_devmode->size = 0x00DC;
2720 nt_devmode->driverextra = 0x0000;
2721 nt_devmode->fields = FORMNAME | TTOPTION | PRINTQUALITY |
2722 DEFAULTSOURCE | COPIES | SCALE |
2723 PAPERSIZE | ORIENTATION;
2724 nt_devmode->orientation = 1;
2725 nt_devmode->papersize = PAPER_LETTER;
2726 nt_devmode->paperlength = 0;
2727 nt_devmode->paperwidth = 0;
2728 nt_devmode->scale = 0x64;
2729 nt_devmode->copies = 1;
2730 nt_devmode->defaultsource = BIN_FORMSOURCE;
2731 nt_devmode->printquality = RES_HIGH; /* 0x0258 */
2732 nt_devmode->color = COLOR_MONOCHROME;
2733 nt_devmode->duplex = DUP_SIMPLEX;
2734 nt_devmode->yresolution = 0;
2735 nt_devmode->ttoption = TT_SUBDEV;
2736 nt_devmode->collate = COLLATE_FALSE;
2737 nt_devmode->icmmethod = 0;
2738 nt_devmode->icmintent = 0;
2739 nt_devmode->mediatype = 0;
2740 nt_devmode->dithertype = 0;
2742 /* non utilisés par un driver d'imprimante */
2743 nt_devmode->logpixels = 0;
2744 nt_devmode->bitsperpel = 0;
2745 nt_devmode->pelswidth = 0;
2746 nt_devmode->pelsheight = 0;
2747 nt_devmode->displayflags = 0;
2748 nt_devmode->displayfrequency = 0;
2749 nt_devmode->reserved1 = 0;
2750 nt_devmode->reserved2 = 0;
2751 nt_devmode->panningwidth = 0;
2752 nt_devmode->panningheight = 0;
2754 nt_devmode->nt_dev_private = NULL;
2758 /****************************************************************************
2759 Deepcopy an NT devicemode.
2760 ****************************************************************************/
2762 NT_DEVICEMODE *dup_nt_devicemode(NT_DEVICEMODE *nt_devicemode)
2764 NT_DEVICEMODE *new_nt_devicemode = NULL;
2766 if ( !nt_devicemode )
2769 if ((new_nt_devicemode = (NT_DEVICEMODE *)memdup(nt_devicemode, sizeof(NT_DEVICEMODE))) == NULL) {
2770 DEBUG(0,("dup_nt_devicemode: malloc fail.\n"));
2774 new_nt_devicemode->nt_dev_private = NULL;
2775 if (nt_devicemode->nt_dev_private != NULL) {
2776 if ((new_nt_devicemode->nt_dev_private = (uint8 *)memdup(nt_devicemode->nt_dev_private, nt_devicemode->driverextra)) == NULL) {
2777 SAFE_FREE(new_nt_devicemode);
2778 DEBUG(0,("dup_nt_devicemode: malloc fail.\n"));
2783 return new_nt_devicemode;
2786 /****************************************************************************
2787 Clean up and deallocate a (maybe partially) allocated NT_DEVICEMODE.
2788 ****************************************************************************/
2790 void free_nt_devicemode(NT_DEVICEMODE **devmode_ptr)
2792 NT_DEVICEMODE *nt_devmode = *devmode_ptr;
2794 if(nt_devmode == NULL)
2797 DEBUG(106,("free_nt_devicemode: deleting DEVMODE\n"));
2799 SAFE_FREE(nt_devmode->nt_dev_private);
2800 SAFE_FREE(*devmode_ptr);
2803 /****************************************************************************
2804 Clean up and deallocate a (maybe partially) allocated NT_PRINTER_INFO_LEVEL_2.
2805 ****************************************************************************/
2807 static void free_nt_printer_info_level_2(NT_PRINTER_INFO_LEVEL_2 **info_ptr)
2809 NT_PRINTER_INFO_LEVEL_2 *info = *info_ptr;
2814 free_nt_devicemode(&info->devmode);
2816 TALLOC_FREE( *info_ptr );
2820 /****************************************************************************
2821 ****************************************************************************/
2822 int unpack_devicemode(NT_DEVICEMODE **nt_devmode, const uint8 *buf, int buflen)
2826 NT_DEVICEMODE devmode;
2828 ZERO_STRUCT(devmode);
2830 len += tdb_unpack(buf+len, buflen-len, "p", nt_devmode);
2832 if (!*nt_devmode) return len;
2834 len += tdb_unpack(buf+len, buflen-len, "ffwwwwwwwwwwwwwwwwwwddddddddddddddp",
2838 &devmode.specversion,
2839 &devmode.driverversion,
2841 &devmode.driverextra,
2842 &devmode.orientation,
2844 &devmode.paperlength,
2845 &devmode.paperwidth,
2848 &devmode.defaultsource,
2849 &devmode.printquality,
2852 &devmode.yresolution,
2858 &devmode.bitsperpel,
2860 &devmode.pelsheight,
2861 &devmode.displayflags,
2862 &devmode.displayfrequency,
2866 &devmode.dithertype,
2869 &devmode.panningwidth,
2870 &devmode.panningheight,
2871 &devmode.nt_dev_private);
2873 if (devmode.nt_dev_private) {
2874 /* the len in tdb_unpack is an int value and
2875 * devmode.driverextra is only a short
2877 len += tdb_unpack(buf+len, buflen-len, "B", &extra_len, &devmode.nt_dev_private);
2878 devmode.driverextra=(uint16)extra_len;
2880 /* check to catch an invalid TDB entry so we don't segfault */
2881 if (devmode.driverextra == 0) {
2882 devmode.nt_dev_private = NULL;
2886 *nt_devmode = (NT_DEVICEMODE *)memdup(&devmode, sizeof(devmode));
2888 SAFE_FREE(devmode.nt_dev_private);
2892 DEBUG(8,("Unpacked devicemode [%s](%s)\n", devmode.devicename, devmode.formname));
2893 if (devmode.nt_dev_private)
2894 DEBUG(8,("with a private section of %d bytes\n", devmode.driverextra));
2899 /****************************************************************************
2900 Allocate and initialize a new slot.
2901 ***************************************************************************/
2903 int add_new_printer_key( NT_PRINTER_DATA *data, const char *name )
2908 if ( !name || !data )
2911 /* allocate another slot in the NT_PRINTER_KEY array */
2913 if ( !(d = TALLOC_REALLOC_ARRAY( data, data->keys, NT_PRINTER_KEY, data->num_keys+1)) ) {
2914 DEBUG(0,("add_new_printer_key: Realloc() failed!\n"));
2920 key_index = data->num_keys;
2922 /* initialze new key */
2924 data->keys[key_index].name = talloc_strdup( data, name );
2926 if ( !(data->keys[key_index].values = TALLOC_ZERO_P( data, REGVAL_CTR )) )
2931 DEBUG(10,("add_new_printer_key: Inserted new data key [%s]\n", name ));
2936 /****************************************************************************
2937 search for a registry key name in the existing printer data
2938 ***************************************************************************/
2940 int delete_printer_key( NT_PRINTER_DATA *data, const char *name )
2944 for ( i=0; i<data->num_keys; i++ ) {
2945 if ( strequal( data->keys[i].name, name ) ) {
2947 /* cleanup memory */
2949 TALLOC_FREE( data->keys[i].name );
2950 TALLOC_FREE( data->keys[i].values );
2952 /* if not the end of the array, move remaining elements down one slot */
2955 if ( data->num_keys && (i < data->num_keys) )
2956 memmove( &data->keys[i], &data->keys[i+1], sizeof(NT_PRINTER_KEY)*(data->num_keys-i) );
2963 return data->num_keys;
2966 /****************************************************************************
2967 search for a registry key name in the existing printer data
2968 ***************************************************************************/
2970 int lookup_printerkey( NT_PRINTER_DATA *data, const char *name )
2975 if ( !data || !name )
2978 DEBUG(12,("lookup_printerkey: Looking for [%s]\n", name));
2980 /* loop over all existing keys */
2982 for ( i=0; i<data->num_keys; i++ ) {
2983 if ( strequal(data->keys[i].name, name) ) {
2984 DEBUG(12,("lookup_printerkey: Found [%s]!\n", name));
2994 /****************************************************************************
2995 ***************************************************************************/
2997 int get_printer_subkeys( NT_PRINTER_DATA *data, const char* key, fstring **subkeys )
3001 int num_subkeys = 0;
3003 fstring *subkeys_ptr = NULL;
3014 /* special case of asking for the top level printer data registry key names */
3016 if ( strlen(key) == 0 ) {
3017 for ( i=0; i<data->num_keys; i++ ) {
3019 /* found a match, so allocate space and copy the name */
3021 if ( !(subkeys_ptr = SMB_REALLOC_ARRAY( subkeys_ptr, fstring, num_subkeys+2)) ) {
3022 DEBUG(0,("get_printer_subkeys: Realloc failed for [%d] entries!\n",
3027 fstrcpy( subkeys_ptr[num_subkeys], data->keys[i].name );
3034 /* asking for the subkeys of some key */
3035 /* subkey paths are stored in the key name using '\' as the delimiter */
3037 for ( i=0; i<data->num_keys; i++ ) {
3038 if ( StrnCaseCmp(data->keys[i].name, key, strlen(key)) == 0 ) {
3040 /* if we found the exact key, then break */
3041 key_len = strlen( key );
3042 if ( strlen(data->keys[i].name) == key_len )
3045 /* get subkey path */
3047 p = data->keys[i].name + key_len;
3050 fstrcpy( subkeyname, p );
3051 if ( (p = strchr( subkeyname, '\\' )) )
3054 /* don't add a key more than once */
3056 for ( j=0; j<num_subkeys; j++ ) {
3057 if ( strequal( subkeys_ptr[j], subkeyname ) )
3061 if ( j != num_subkeys )
3064 /* found a match, so allocate space and copy the name */
3066 if ( !(subkeys_ptr = SMB_REALLOC_ARRAY( subkeys_ptr, fstring, num_subkeys+2)) ) {
3067 DEBUG(0,("get_printer_subkeys: Realloc failed for [%d] entries!\n",
3072 fstrcpy( subkeys_ptr[num_subkeys], subkeyname );
3078 /* return error if the key was not found */
3080 if ( i == data->num_keys ) {
3081 SAFE_FREE(subkeys_ptr);
3086 /* tag off the end */
3089 fstrcpy(subkeys_ptr[num_subkeys], "" );
3091 *subkeys = subkeys_ptr;
3097 static void map_sz_into_ctr(REGVAL_CTR *ctr, const char *val_name,
3100 smb_ucs2_t conv_str[1024];
3103 regval_ctr_delvalue(ctr, val_name);
3104 str_size = push_ucs2(NULL, conv_str, sz, sizeof(conv_str),
3105 STR_TERMINATE | STR_NOALIGN);
3106 regval_ctr_addvalue(ctr, val_name, REG_SZ,
3107 (char *) conv_str, str_size);
3110 static void map_dword_into_ctr(REGVAL_CTR *ctr, const char *val_name,
3113 regval_ctr_delvalue(ctr, val_name);
3114 regval_ctr_addvalue(ctr, val_name, REG_DWORD,
3115 (char *) &dword, sizeof(dword));
3118 static void map_bool_into_ctr(REGVAL_CTR *ctr, const char *val_name,
3121 uint8 bin_bool = (b ? 1 : 0);
3122 regval_ctr_delvalue(ctr, val_name);
3123 regval_ctr_addvalue(ctr, val_name, REG_BINARY,
3124 (char *) &bin_bool, sizeof(bin_bool));
3127 static void map_single_multi_sz_into_ctr(REGVAL_CTR *ctr, const char *val_name,
3128 const char *multi_sz)
3130 smb_ucs2_t *conv_strs = NULL;
3133 /* a multi-sz has to have a null string terminator, i.e., the last
3134 string must be followed by two nulls */
3135 str_size = strlen(multi_sz) + 2;
3136 conv_strs = SMB_CALLOC_ARRAY(smb_ucs2_t, str_size);
3141 /* Change to byte units. */
3142 str_size *= sizeof(smb_ucs2_t);
3143 push_ucs2(NULL, conv_strs, multi_sz, str_size,
3144 STR_TERMINATE | STR_NOALIGN);
3146 regval_ctr_delvalue(ctr, val_name);
3147 regval_ctr_addvalue(ctr, val_name, REG_MULTI_SZ,
3148 (char *) conv_strs, str_size);
3149 SAFE_FREE(conv_strs);
3152 /****************************************************************************
3153 * Map the NT_PRINTER_INFO_LEVEL_2 data into DsSpooler keys for publishing.
3155 * @param info2 NT_PRINTER_INFO_LEVEL_2 describing printer - gets modified
3156 * @return bool indicating success or failure
3157 ***************************************************************************/
3159 static bool map_nt_printer_info2_to_dsspooler(NT_PRINTER_INFO_LEVEL_2 *info2)
3161 REGVAL_CTR *ctr = NULL;
3163 const char *dnssuffix;
3164 char *allocated_string = NULL;
3165 const char *ascii_str;
3168 if ((i = lookup_printerkey(info2->data, SPOOL_DSSPOOLER_KEY)) < 0)
3169 i = add_new_printer_key(info2->data, SPOOL_DSSPOOLER_KEY);
3170 ctr = info2->data->keys[i].values;
3172 map_sz_into_ctr(ctr, SPOOL_REG_PRINTERNAME, info2->sharename);
3173 map_sz_into_ctr(ctr, SPOOL_REG_SHORTSERVERNAME, global_myname());
3175 /* we make the assumption that the netbios name is the same
3176 as the DNS name sinc ethe former will be what we used to
3179 dnssuffix = get_mydnsdomname(talloc_tos());
3180 if (dnssuffix && *dnssuffix) {
3181 fstr_sprintf( longname, "%s.%s", global_myname(), dnssuffix );
3183 fstrcpy( longname, global_myname() );
3186 map_sz_into_ctr(ctr, SPOOL_REG_SERVERNAME, longname);
3188 if (asprintf(&allocated_string, "\\\\%s\\%s", longname, info2->sharename) == -1) {
3191 map_sz_into_ctr(ctr, SPOOL_REG_UNCNAME, allocated_string);
3192 SAFE_FREE(allocated_string);
3194 map_dword_into_ctr(ctr, SPOOL_REG_VERSIONNUMBER, 4);
3195 map_sz_into_ctr(ctr, SPOOL_REG_DRIVERNAME, info2->drivername);
3196 map_sz_into_ctr(ctr, SPOOL_REG_LOCATION, info2->location);
3197 map_sz_into_ctr(ctr, SPOOL_REG_DESCRIPTION, info2->comment);
3198 map_single_multi_sz_into_ctr(ctr, SPOOL_REG_PORTNAME, info2->portname);
3199 map_sz_into_ctr(ctr, SPOOL_REG_PRINTSEPARATORFILE, info2->sepfile);
3200 map_dword_into_ctr(ctr, SPOOL_REG_PRINTSTARTTIME, info2->starttime);
3201 map_dword_into_ctr(ctr, SPOOL_REG_PRINTENDTIME, info2->untiltime);
3202 map_dword_into_ctr(ctr, SPOOL_REG_PRIORITY, info2->priority);
3204 map_bool_into_ctr(ctr, SPOOL_REG_PRINTKEEPPRINTEDJOBS,
3205 (info2->attributes &
3206 PRINTER_ATTRIBUTE_KEEPPRINTEDJOBS));
3208 switch (info2->attributes & 0x3) {
3210 ascii_str = SPOOL_REGVAL_PRINTWHILESPOOLING;
3213 ascii_str = SPOOL_REGVAL_PRINTAFTERSPOOLED;
3216 ascii_str = SPOOL_REGVAL_PRINTDIRECT;
3219 ascii_str = "unknown";
3221 map_sz_into_ctr(ctr, SPOOL_REG_PRINTSPOOLING, ascii_str);
3226 /*****************************************************************
3227 ****************************************************************/
3229 static void store_printer_guid(NT_PRINTER_INFO_LEVEL_2 *info2,
3233 REGVAL_CTR *ctr=NULL;
3234 UNISTR2 unistr_guid;
3236 /* find the DsSpooler key */
3237 if ((i = lookup_printerkey(info2->data, SPOOL_DSSPOOLER_KEY)) < 0)
3238 i = add_new_printer_key(info2->data, SPOOL_DSSPOOLER_KEY);
3239 ctr = info2->data->keys[i].values;
3241 regval_ctr_delvalue(ctr, "objectGUID");
3243 /* We used to store this as a REG_BINARY but that causes
3246 ZERO_STRUCT( unistr_guid );
3248 init_unistr2( &unistr_guid, GUID_string(talloc_tos(), &guid),
3249 UNI_STR_TERMINATE );
3251 regval_ctr_addvalue(ctr, "objectGUID", REG_SZ,
3252 (char *)unistr_guid.buffer,
3253 unistr_guid.uni_max_len*2);
3257 static WERROR nt_printer_publish_ads(ADS_STRUCT *ads,
3258 NT_PRINTER_INFO_LEVEL *printer)
3262 char *prt_dn = NULL, *srv_dn, *srv_cn_0, *srv_cn_escaped, *sharename_escaped;
3263 char *srv_dn_utf8, **srv_cn_utf8;
3266 const char *attrs[] = {"objectGUID", NULL};
3268 WERROR win_rc = WERR_OK;
3269 size_t converted_size;
3272 DEBUG(5, ("publishing printer %s\n", printer->info_2->printername));
3274 /* figure out where to publish */
3275 ads_find_machine_acct(ads, &res, global_myname());
3277 /* We use ldap_get_dn here as we need the answer
3278 * in utf8 to call ldap_explode_dn(). JRA. */
3280 srv_dn_utf8 = ldap_get_dn((LDAP *)ads->ldap.ld, (LDAPMessage *)res);
3282 return WERR_SERVER_UNAVAILABLE;
3284 ads_msgfree(ads, res);
3285 srv_cn_utf8 = ldap_explode_dn(srv_dn_utf8, 1);
3287 ldap_memfree(srv_dn_utf8);
3288 return WERR_SERVER_UNAVAILABLE;
3290 /* Now convert to CH_UNIX. */
3291 if (!pull_utf8_allocate(&srv_dn, srv_dn_utf8, &converted_size)) {
3292 ldap_memfree(srv_dn_utf8);
3293 ldap_memfree(srv_cn_utf8);
3294 return WERR_SERVER_UNAVAILABLE;
3296 if (!pull_utf8_allocate(&srv_cn_0, srv_cn_utf8[0], &converted_size)) {
3297 ldap_memfree(srv_dn_utf8);
3298 ldap_memfree(srv_cn_utf8);
3300 return WERR_SERVER_UNAVAILABLE;
3303 ldap_memfree(srv_dn_utf8);
3304 ldap_memfree(srv_cn_utf8);
3306 srv_cn_escaped = escape_rdn_val_string_alloc(srv_cn_0);
3307 if (!srv_cn_escaped) {
3308 SAFE_FREE(srv_cn_0);
3310 return WERR_SERVER_UNAVAILABLE;
3312 sharename_escaped = escape_rdn_val_string_alloc(printer->info_2->sharename);
3313 if (!sharename_escaped) {
3314 SAFE_FREE(srv_cn_escaped);
3315 SAFE_FREE(srv_cn_0);
3317 return WERR_SERVER_UNAVAILABLE;
3320 ret = asprintf(&prt_dn, "cn=%s-%s,%s", srv_cn_escaped, sharename_escaped, srv_dn);
3323 SAFE_FREE(srv_cn_0);
3324 SAFE_FREE(srv_cn_escaped);
3325 SAFE_FREE(sharename_escaped);
3331 /* build the ads mods */
3332 ctx = talloc_init("nt_printer_publish_ads");
3338 mods = ads_init_mods(ctx);
3342 talloc_destroy(ctx);
3346 get_local_printer_publishing_data(ctx, &mods, printer->info_2->data);
3347 ads_mod_str(ctx, &mods, SPOOL_REG_PRINTERNAME,
3348 printer->info_2->sharename);
3351 ads_rc = ads_mod_printer_entry(ads, prt_dn, ctx, &mods);
3352 if (ads_rc.err.rc == LDAP_NO_SUCH_OBJECT) {
3354 for (i=0; mods[i] != 0; i++)
3356 mods[i] = (LDAPMod *)-1;
3357 ads_rc = ads_add_printer_entry(ads, prt_dn, ctx, &mods);
3360 if (!ADS_ERR_OK(ads_rc))
3361 DEBUG(3, ("error publishing %s: %s\n", printer->info_2->sharename, ads_errstr(ads_rc)));
3363 talloc_destroy(ctx);
3365 /* retreive the guid and store it locally */
3366 if (ADS_ERR_OK(ads_search_dn(ads, &res, prt_dn, attrs))) {
3368 ads_pull_guid(ads, res, &guid);
3369 ads_msgfree(ads, res);
3370 store_printer_guid(printer->info_2, guid);
3371 win_rc = mod_a_printer(printer, 2);
3378 static WERROR nt_printer_unpublish_ads(ADS_STRUCT *ads,
3379 NT_PRINTER_INFO_LEVEL *printer)
3382 LDAPMessage *res = NULL;
3383 char *prt_dn = NULL;
3385 DEBUG(5, ("unpublishing printer %s\n", printer->info_2->printername));
3387 /* remove the printer from the directory */
3388 ads_rc = ads_find_printer_on_server(ads, &res,
3389 printer->info_2->sharename, global_myname());
3391 if (ADS_ERR_OK(ads_rc) && res && ads_count_replies(ads, res)) {
3392 prt_dn = ads_get_dn(ads, res);
3394 ads_msgfree(ads, res);
3397 ads_rc = ads_del_dn(ads, prt_dn);
3398 ads_memfree(ads, prt_dn);
3402 ads_msgfree(ads, res);
3407 /****************************************************************************
3408 * Publish a printer in the directory
3410 * @param snum describing printer service
3411 * @return WERROR indicating status of publishing
3412 ***************************************************************************/
3414 WERROR nt_printer_publish(Printer_entry *print_hnd, int snum, int action)
3417 ADS_STRUCT *ads = NULL;
3418 NT_PRINTER_INFO_LEVEL *printer = NULL;
3421 win_rc = get_a_printer(print_hnd, &printer, 2, lp_servicename(snum));
3422 if (!W_ERROR_IS_OK(win_rc))
3426 case SPOOL_DS_PUBLISH:
3427 case SPOOL_DS_UPDATE:
3428 /* set the DsSpooler info and attributes */
3429 if (!(map_nt_printer_info2_to_dsspooler(printer->info_2))) {
3430 win_rc = WERR_NOMEM;
3434 printer->info_2->attributes |= PRINTER_ATTRIBUTE_PUBLISHED;
3436 case SPOOL_DS_UNPUBLISH:
3437 printer->info_2->attributes ^= PRINTER_ATTRIBUTE_PUBLISHED;
3440 win_rc = WERR_NOT_SUPPORTED;
3444 win_rc = mod_a_printer(printer, 2);
3445 if (!W_ERROR_IS_OK(win_rc)) {
3446 DEBUG(3, ("err %d saving data\n", W_ERROR_V(win_rc)));
3450 ads = ads_init(lp_realm(), lp_workgroup(), NULL);
3452 DEBUG(3, ("ads_init() failed\n"));
3453 win_rc = WERR_SERVER_UNAVAILABLE;
3456 setenv(KRB5_ENV_CCNAME, "MEMORY:prtpub_cache", 1);
3457 SAFE_FREE(ads->auth.password);
3458 ads->auth.password = secrets_fetch_machine_password(lp_workgroup(),
3461 /* ads_connect() will find the DC for us */
3462 ads_rc = ads_connect(ads);
3463 if (!ADS_ERR_OK(ads_rc)) {
3464 DEBUG(3, ("ads_connect failed: %s\n", ads_errstr(ads_rc)));
3465 win_rc = WERR_ACCESS_DENIED;
3470 case SPOOL_DS_PUBLISH:
3471 case SPOOL_DS_UPDATE:
3472 win_rc = nt_printer_publish_ads(ads, printer);
3474 case SPOOL_DS_UNPUBLISH:
3475 win_rc = nt_printer_unpublish_ads(ads, printer);
3480 free_a_printer(&printer, 2);
3485 WERROR check_published_printers(void)
3488 ADS_STRUCT *ads = NULL;
3490 int n_services = lp_numservices();
3491 NT_PRINTER_INFO_LEVEL *printer = NULL;
3493 ads = ads_init(lp_realm(), lp_workgroup(), NULL);
3495 DEBUG(3, ("ads_init() failed\n"));
3496 return WERR_SERVER_UNAVAILABLE;
3498 setenv(KRB5_ENV_CCNAME, "MEMORY:prtpub_cache", 1);
3499 SAFE_FREE(ads->auth.password);
3500 ads->auth.password = secrets_fetch_machine_password(lp_workgroup(),
3503 /* ads_connect() will find the DC for us */
3504 ads_rc = ads_connect(ads);
3505 if (!ADS_ERR_OK(ads_rc)) {
3506 DEBUG(3, ("ads_connect failed: %s\n", ads_errstr(ads_rc)));
3508 ads_kdestroy("MEMORY:prtpub_cache");
3509 return WERR_ACCESS_DENIED;
3512 for (snum = 0; snum < n_services; snum++) {
3513 if (!(lp_snum_ok(snum) && lp_print_ok(snum)))
3516 if (W_ERROR_IS_OK(get_a_printer(NULL, &printer, 2,
3517 lp_servicename(snum))) &&
3518 (printer->info_2->attributes & PRINTER_ATTRIBUTE_PUBLISHED))
3519 nt_printer_publish_ads(ads, printer);
3521 free_a_printer(&printer, 2);
3525 ads_kdestroy("MEMORY:prtpub_cache");
3529 bool is_printer_published(Printer_entry *print_hnd, int snum,
3532 NT_PRINTER_INFO_LEVEL *printer = NULL;
3534 REGISTRY_VALUE *guid_val;
3539 win_rc = get_a_printer(print_hnd, &printer, 2, lp_servicename(snum));
3541 if (!W_ERROR_IS_OK(win_rc) ||
3542 !(printer->info_2->attributes & PRINTER_ATTRIBUTE_PUBLISHED) ||
3543 ((i = lookup_printerkey(printer->info_2->data, SPOOL_DSSPOOLER_KEY)) < 0) ||
3544 !(ctr = printer->info_2->data->keys[i].values) ||
3545 !(guid_val = regval_ctr_getvalue(ctr, "objectGUID")))
3547 free_a_printer(&printer, 2);
3551 /* fetching printer guids really ought to be a separate function. */
3556 /* We used to store the guid as REG_BINARY, then swapped
3557 to REG_SZ for Vista compatibility so check for both */
3559 switch ( regval_type(guid_val) ){
3561 rpcstr_pull( guid_str, regval_data_p(guid_val),
3562 sizeof(guid_str)-1, -1, STR_TERMINATE );
3563 ret = NT_STATUS_IS_OK(GUID_from_string( guid_str, guid ));
3566 if ( regval_size(guid_val) != sizeof(struct GUID) ) {
3570 memcpy(guid, regval_data_p(guid_val), sizeof(struct GUID));
3573 DEBUG(0,("is_printer_published: GUID value stored as "
3574 "invaluid type (%d)\n", regval_type(guid_val) ));
3579 free_a_printer(&printer, 2);
3583 WERROR nt_printer_publish(Printer_entry *print_hnd, int snum, int action)
3588 WERROR check_published_printers(void)
3593 bool is_printer_published(Printer_entry *print_hnd, int snum,
3598 #endif /* HAVE_ADS */
3600 /****************************************************************************
3601 ***************************************************************************/
3603 WERROR delete_all_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key )
3605 NT_PRINTER_DATA *data;
3607 int removed_keys = 0;
3611 empty_slot = data->num_keys;
3614 return WERR_INVALID_PARAM;
3616 /* remove all keys */
3618 if ( !strlen(key) ) {
3620 TALLOC_FREE( data );
3624 DEBUG(8,("delete_all_printer_data: Removed all Printer Data from printer [%s]\n",
3630 /* remove a specific key (and all subkeys) */
3632 for ( i=0; i<data->num_keys; i++ ) {
3633 if ( StrnCaseCmp( data->keys[i].name, key, strlen(key)) == 0 ) {
3634 DEBUG(8,("delete_all_printer_data: Removed all Printer Data from key [%s]\n",
3635 data->keys[i].name));
3637 TALLOC_FREE( data->keys[i].name );
3638 TALLOC_FREE( data->keys[i].values );
3640 /* mark the slot as empty */
3642 ZERO_STRUCTP( &data->keys[i] );
3646 /* find the first empty slot */
3648 for ( i=0; i<data->num_keys; i++ ) {
3649 if ( !data->keys[i].name ) {
3656 if ( i == data->num_keys )
3657 /* nothing was removed */
3658 return WERR_INVALID_PARAM;
3660 /* move everything down */
3662 for ( i=empty_slot+1; i<data->num_keys; i++ ) {
3663 if ( data->keys[i].name ) {
3664 memcpy( &data->keys[empty_slot], &data->keys[i], sizeof(NT_PRINTER_KEY) );
3665 ZERO_STRUCTP( &data->keys[i] );
3673 data->num_keys -= removed_keys;
3675 /* sanity check to see if anything is left */
3677 if ( !data->num_keys ) {
3678 DEBUG(8,("delete_all_printer_data: No keys left for printer [%s]\n", p2->printername ));
3680 SAFE_FREE( data->keys );
3681 ZERO_STRUCTP( data );
3687 /****************************************************************************
3688 ***************************************************************************/
3690 WERROR delete_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key, const char *value )
3692 WERROR result = WERR_OK;
3695 /* we must have names on non-zero length */
3697 if ( !key || !*key|| !value || !*value )
3698 return WERR_INVALID_NAME;
3700 /* find the printer key first */
3702 key_index = lookup_printerkey( p2->data, key );
3703 if ( key_index == -1 )
3706 /* make sure the value exists so we can return the correct error code */
3708 if ( !regval_ctr_getvalue( p2->data->keys[key_index].values, value ) )
3709 return WERR_BADFILE;
3711 regval_ctr_delvalue( p2->data->keys[key_index].values, value );
3713 DEBUG(8,("delete_printer_data: Removed key => [%s], value => [%s]\n",
3719 /****************************************************************************
3720 ***************************************************************************/
3722 WERROR add_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key, const char *value,
3723 uint32 type, uint8 *data, int real_len )
3725 WERROR result = WERR_OK;
3728 /* we must have names on non-zero length */
3730 if ( !key || !*key|| !value || !*value )
3731 return WERR_INVALID_NAME;
3733 /* find the printer key first */
3735 key_index = lookup_printerkey( p2->data, key );
3736 if ( key_index == -1 )
3737 key_index = add_new_printer_key( p2->data, key );
3739 if ( key_index == -1 )
3742 regval_ctr_addvalue( p2->data->keys[key_index].values, value,
3743 type, (const char *)data, real_len );
3745 DEBUG(8,("add_printer_data: Added key => [%s], value => [%s], type=> [%d], size => [%d]\n",
3746 key, value, type, real_len ));
3751 /****************************************************************************
3752 ***************************************************************************/
3754 REGISTRY_VALUE* get_printer_data( NT_PRINTER_INFO_LEVEL_2 *p2, const char *key, const char *value )
3758 if ( (key_index = lookup_printerkey( p2->data, key )) == -1 )
3761 DEBUG(8,("get_printer_data: Attempting to lookup key => [%s], value => [%s]\n",
3764 return regval_ctr_getvalue( p2->data->keys[key_index].values, value );
3767 /****************************************************************************
3768 Unpack a list of registry values frem the TDB
3769 ***************************************************************************/
3771 static int unpack_values(NT_PRINTER_DATA *printer_data, const uint8 *buf, int buflen)
3776 const char *valuename = NULL;
3777 const char *keyname = NULL;
3781 REGISTRY_VALUE *regval_p;
3784 /* add the "PrinterDriverData" key first for performance reasons */
3786 add_new_printer_key( printer_data, SPOOL_PRINTERDATA_KEY );
3788 /* loop and unpack the rest of the registry values */
3792 /* check to see if there are any more registry values */
3795 len += tdb_unpack(buf+len, buflen-len, "p", ®val_p);
3799 /* unpack the next regval */
3801 len += tdb_unpack(buf+len, buflen-len, "fdB",
3807 /* lookup for subkey names which have a type of REG_NONE */
3808 /* there's no data with this entry */
3810 if ( type == REG_NONE ) {
3811 if ( (key_index=lookup_printerkey( printer_data, string)) == -1 )
3812 add_new_printer_key( printer_data, string );
3817 * break of the keyname from the value name.
3818 * Valuenames can have embedded '\'s so be careful.
3819 * only support one level of keys. See the
3820 * "Konica Fiery S300 50C-K v1.1. enu" 2k driver.
3824 str = strchr_m( string, '\\');
3826 /* Put in "PrinterDriverData" is no key specified */
3829 keyname = SPOOL_PRINTERDATA_KEY;
3838 /* see if we need a new key */
3840 if ( (key_index=lookup_printerkey( printer_data, keyname )) == -1 )
3841 key_index = add_new_printer_key( printer_data, keyname );
3843 if ( key_index == -1 ) {
3844 DEBUG(0,("unpack_values: Failed to allocate a new key [%s]!\n",
3849 DEBUG(8,("specific: [%s:%s], len: %d\n", keyname, valuename, size));
3851 /* Vista doesn't like unknown REG_BINARY values in DsSpooler.
3852 Thanks to Martin Zielinski for the hint. */
3854 if ( type == REG_BINARY &&
3855 strequal( keyname, SPOOL_DSSPOOLER_KEY ) &&
3856 strequal( valuename, "objectGUID" ) )
3859 UNISTR2 unistr_guid;
3861 ZERO_STRUCT( unistr_guid );
3863 /* convert the GUID to a UNICODE string */
3865 memcpy( &guid, data_p, sizeof(struct GUID) );
3867 init_unistr2( &unistr_guid,
3868 GUID_string(talloc_tos(), &guid),
3869 UNI_STR_TERMINATE );
3871 regval_ctr_addvalue( printer_data->keys[key_index].values,
3873 (const char *)unistr_guid.buffer,
3874 unistr_guid.uni_str_len*2 );
3879 regval_ctr_addvalue( printer_data->keys[key_index].values,
3880 valuename, type, (const char *)data_p,
3884 SAFE_FREE(data_p); /* 'B' option to tdbpack does a malloc() */
3891 /****************************************************************************
3892 ***************************************************************************/
3894 static char *last_from;
3895 static char *last_to;
3897 static const char *get_last_from(void)
3905 static const char *get_last_to(void)
3913 static bool set_last_from_to(const char *from, const char *to)
3915 char *orig_from = last_from;
3916 char *orig_to = last_to;
3918 last_from = SMB_STRDUP(from);
3919 last_to = SMB_STRDUP(to);
3921 SAFE_FREE(orig_from);
3924 if (!last_from || !last_to) {
3925 SAFE_FREE(last_from);
3932 static void map_to_os2_driver(fstring drivername)
3934 char *mapfile = lp_os2_driver_map();
3935 char **lines = NULL;
3939 if (!strlen(drivername))
3945 if (strequal(drivername,get_last_from())) {
3946 DEBUG(3,("Mapped Windows driver %s to OS/2 driver %s\n",
3947 drivername,get_last_to()));
3948 fstrcpy(drivername,get_last_to());
3952 lines = file_lines_load(mapfile, &numlines,0,NULL);
3953 if (numlines == 0 || lines == NULL) {
3954 DEBUG(0,("No entries in OS/2 driver map %s\n",mapfile));
3959 DEBUG(4,("Scanning OS/2 driver map %s\n",mapfile));
3961 for( i = 0; i < numlines; i++) {
3962 char *nt_name = lines[i];
3963 char *os2_name = strchr(nt_name,'=');
3970 while (isspace(*nt_name))
3973 if (!*nt_name || strchr("#;",*nt_name))
3977 int l = strlen(nt_name);
3978 while (l && isspace(nt_name[l-1])) {
3984 while (isspace(*os2_name))
3988 int l = strlen(os2_name);
3989 while (l && isspace(os2_name[l-1])) {
3995 if (strequal(nt_name,drivername)) {
3996 DEBUG(3,("Mapped windows driver %s to os2 driver%s\n",drivername,os2_name));
3997 set_last_from_to(drivername,os2_name);
3998 fstrcpy(drivername,os2_name);
4007 /****************************************************************************
4008 Get a default printer info 2 struct.
4009 ****************************************************************************/
4011 static WERROR get_a_printer_2_default(NT_PRINTER_INFO_LEVEL_2 *info,
4012 const char *servername,
4013 const char* sharename,
4016 int snum = lp_servicenumber(sharename);
4018 slprintf(info->servername, sizeof(info->servername)-1, "\\\\%s", servername);
4019 slprintf(info->printername, sizeof(info->printername)-1, "\\\\%s\\%s",
4020 servername, sharename);
4021 fstrcpy(info->sharename, sharename);
4022 fstrcpy(info->portname, SAMBA_PRINTER_PORT_NAME);
4024 /* by setting the driver name to an empty string, a local NT admin
4025 can now run the **local** APW to install a local printer driver
4026 for a Samba shared printer in 2.2. Without this, drivers **must** be
4027 installed on the Samba server for NT clients --jerry */
4028 #if 0 /* JERRY --do not uncomment-- */
4029 if (!*info->drivername)
4030 fstrcpy(info->drivername, "NO DRIVER AVAILABLE FOR THIS PRINTER");
4034 DEBUG(10,("get_a_printer_2_default: driver name set to [%s]\n", info->drivername));
4036 strlcpy(info->comment, "", sizeof(info->comment));
4037 fstrcpy(info->printprocessor, "winprint");
4038 fstrcpy(info->datatype, "RAW");
4041 if (get_loc_com && (enum printing_types)lp_printing(snum) == PRINT_CUPS ) {
4042 /* Pull the location and comment strings from cups if we don't
4044 if ( !strlen(info->location) || !strlen(info->comment) )
4045 cups_pull_comment_location( info );
4049 info->attributes = PRINTER_ATTRIBUTE_SAMBA;
4051 info->starttime = 0; /* Minutes since 12:00am GMT */
4052 info->untiltime = 0; /* Minutes since 12:00am GMT */
4054 info->default_priority = 1;
4055 info->setuptime = (uint32)time(NULL);
4058 * I changed this as I think it is better to have a generic
4059 * DEVMODE than to crash Win2k explorer.exe --jerry
4060 * See the HP Deskjet 990c Win2k drivers for an example.
4062 * However the default devmode appears to cause problems
4063 * with the HP CLJ 8500 PCL driver. Hence the addition of
4064 * the "default devmode" parameter --jerry 22/01/2002
4067 if (lp_default_devmode(snum)) {
4068 if ((info->devmode = construct_nt_devicemode(info->printername)) == NULL) {
4072 info->devmode = NULL;
4075 if (!nt_printing_getsec(info, sharename, &info->secdesc_buf)) {
4083 free_nt_devicemode(&info->devmode);
4085 return WERR_ACCESS_DENIED;
4088 /****************************************************************************
4089 ****************************************************************************/
4091 static WERROR get_a_printer_2(NT_PRINTER_INFO_LEVEL_2 *info,
4092 const char *servername,
4093 const char *sharename,
4097 int snum = lp_servicenumber(sharename);
4098 TDB_DATA kbuf, dbuf;
4099 fstring printername;
4100 char adevice[MAXDEVICENAME];
4101 char *comment = NULL;
4103 kbuf = make_printer_tdbkey(talloc_tos(), sharename);
4105 dbuf = tdb_fetch(tdb_printers, kbuf);
4107 return get_a_printer_2_default(info, servername,
4108 sharename, get_loc_com);
4111 len += tdb_unpack(dbuf.dptr+len, dbuf.dsize-len, "dddddddddddfffffPfffff",
4114 &info->default_priority,
4121 &info->c_setprinter,
4131 info->printprocessor,
4136 strlcpy(info->comment, comment, sizeof(info->comment));
4140 /* Samba has to have shared raw drivers. */
4141 info->attributes |= PRINTER_ATTRIBUTE_SAMBA;
4142 info->attributes &= ~PRINTER_ATTRIBUTE_NOT_SAMBA;
4144 /* Restore the stripped strings. */
4145 slprintf(info->servername, sizeof(info->servername)-1, "\\\\%s", servername);
4147 if ( lp_force_printername(snum) ) {
4148 slprintf(printername, sizeof(printername)-1, "\\\\%s\\%s", servername, sharename );
4150 slprintf(printername, sizeof(printername)-1, "\\\\%s\\%s", servername, info->printername);
4153 fstrcpy(info->printername, printername);
4156 if (get_loc_com && (enum printing_types)lp_printing(snum) == PRINT_CUPS ) {
4157 /* Pull the location and comment strings from cups if we don't
4159 if ( !strlen(info->location) || !strlen(info->comment) )
4160 cups_pull_comment_location( info );
4164 len += unpack_devicemode(&info->devmode,dbuf.dptr+len, dbuf.dsize-len);
4167 * Some client drivers freak out if there is a NULL devmode
4168 * (probably the driver is not checking before accessing
4169 * the devmode pointer) --jerry
4171 * See comments in get_a_printer_2_default()
4174 if (lp_default_devmode(snum) && !info->devmode) {
4175 DEBUG(8,("get_a_printer_2: Constructing a default device mode for [%s]\n",
4177 info->devmode = construct_nt_devicemode(printername);
4180 slprintf( adevice, sizeof(adevice), "%s", info->printername );
4181 if (info->devmode) {
4182 fstrcpy(info->devmode->devicename, adevice);
4185 if ( !(info->data = TALLOC_ZERO_P( info, NT_PRINTER_DATA )) ) {
4186 DEBUG(0,("unpack_values: talloc() failed!\n"));
4187 SAFE_FREE(dbuf.dptr);
4190 len += unpack_values( info->data, dbuf.dptr+len, dbuf.dsize-len );
4192 /* This will get the current RPC talloc context, but we should be
4193 passing this as a parameter... fixme... JRA ! */
4195 if (!nt_printing_getsec(info, sharename, &info->secdesc_buf)) {
4196 SAFE_FREE(dbuf.dptr);
4200 /* Fix for OS/2 drivers. */
4202 if (get_remote_arch() == RA_OS2) {
4203 map_to_os2_driver(info->drivername);
4206 SAFE_FREE(dbuf.dptr);
4208 DEBUG(9,("Unpacked printer [%s] name [%s] running driver [%s]\n",
4209 sharename, info->printername, info->drivername));
4214 /****************************************************************************
4215 Debugging function, dump at level 6 the struct in the logs.
4216 ****************************************************************************/
4217 static uint32 dump_a_printer(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
4220 NT_PRINTER_INFO_LEVEL_2 *info2;
4222 DEBUG(106,("Dumping printer at level [%d]\n", level));
4227 if (printer->info_2 == NULL)
4231 info2=printer->info_2;
4233 DEBUGADD(106,("attributes:[%d]\n", info2->attributes));
4234 DEBUGADD(106,("priority:[%d]\n", info2->priority));
4235 DEBUGADD(106,("default_priority:[%d]\n", info2->default_priority));
4236 DEBUGADD(106,("starttime:[%d]\n", info2->starttime));
4237 DEBUGADD(106,("untiltime:[%d]\n", info2->untiltime));
4238 DEBUGADD(106,("status:[%d]\n", info2->status));
4239 DEBUGADD(106,("cjobs:[%d]\n", info2->cjobs));
4240 DEBUGADD(106,("averageppm:[%d]\n", info2->averageppm));
4241 DEBUGADD(106,("changeid:[%d]\n", info2->changeid));
4242 DEBUGADD(106,("c_setprinter:[%d]\n", info2->c_setprinter));
4243 DEBUGADD(106,("setuptime:[%d]\n", info2->setuptime));
4245 DEBUGADD(106,("servername:[%s]\n", info2->servername));
4246 DEBUGADD(106,("printername:[%s]\n", info2->printername));
4247 DEBUGADD(106,("sharename:[%s]\n", info2->sharename));
4248 DEBUGADD(106,("portname:[%s]\n", info2->portname));
4249 DEBUGADD(106,("drivername:[%s]\n", info2->drivername));
4250 DEBUGADD(106,("comment:[%s]\n", info2->comment));
4251 DEBUGADD(106,("location:[%s]\n", info2->location));
4252 DEBUGADD(106,("sepfile:[%s]\n", info2->sepfile));
4253 DEBUGADD(106,("printprocessor:[%s]\n", info2->printprocessor));
4254 DEBUGADD(106,("datatype:[%s]\n", info2->datatype));
4255 DEBUGADD(106,("parameters:[%s]\n", info2->parameters));
4261 DEBUGADD(106,("dump_a_printer: Level %u not implemented\n", (unsigned int)level ));
4269 /****************************************************************************
4270 Update the changeid time.
4271 This is SO NASTY as some drivers need this to change, others need it
4272 static. This value will change every second, and I must hope that this
4273 is enough..... DON'T CHANGE THIS CODE WITHOUT A TEST MATRIX THE SIZE OF
4275 ****************************************************************************/
4277 static uint32 rev_changeid(void)
4281 get_process_uptime(&tv);
4284 /* Return changeid as msec since spooler restart */
4285 return tv.tv_sec * 1000 + tv.tv_usec / 1000;
4288 * This setting seems to work well but is too untested
4289 * to replace the above calculation. Left in for experiementation
4290 * of the reader --jerry (Tue Mar 12 09:15:05 CST 2002)
4292 return tv.tv_sec * 10 + tv.tv_usec / 100000;
4298 * The function below are the high level ones.
4299 * only those ones must be called from the spoolss code.
4303 /****************************************************************************
4304 Modify a printer. This is called from SETPRINTERDATA/DELETEPRINTERDATA.
4305 ****************************************************************************/
4307 WERROR mod_a_printer(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
4311 dump_a_printer(printer, level);
4317 * Update the changestamp. Emperical tests show that the
4318 * ChangeID is always updated,but c_setprinter is
4319 * global spooler variable (not per printer).
4322 /* ChangeID **must** be increasing over the lifetime
4323 of client's spoolss service in order for the
4324 client's cache to show updates */
4326 printer->info_2->changeid = rev_changeid();
4329 * Because one day someone will ask:
4330 * NT->NT An admin connection to a remote
4331 * printer show changes imeediately in
4332 * the properities dialog
4334 * A non-admin connection will only show the
4335 * changes after viewing the properites page
4336 * 2 times. Seems to be related to a
4337 * race condition in the client between the spooler
4338 * updating the local cache and the Explorer.exe GUI
4339 * actually displaying the properties.
4341 * This is fixed in Win2k. admin/non-admin
4342 * connections both display changes immediately.
4347 result=update_a_printer_2(printer->info_2);
4351 result=WERR_UNKNOWN_LEVEL;
4358 /****************************************************************************
4359 Initialize printer devmode & data with previously saved driver init values.
4360 ****************************************************************************/
4362 static bool set_driver_init_2( NT_PRINTER_INFO_LEVEL_2 *info_ptr )
4367 NT_PRINTER_INFO_LEVEL_2 info;
4373 * Delete any printer data 'values' already set. When called for driver
4374 * replace, there will generally be some, but during an add printer, there
4375 * should not be any (if there are delete them).
4378 if ( info_ptr->data )
4379 delete_all_printer_data( info_ptr, "" );
4381 if (asprintf(&key, "%s%s", DRIVER_INIT_PREFIX,
4382 info_ptr->drivername) < 0) {
4386 dbuf = tdb_fetch_bystring(tdb_drivers, key);
4389 * When changing to a driver that has no init info in the tdb, remove
4390 * the previous drivers init info and leave the new on blank.
4392 free_nt_devicemode(&info_ptr->devmode);
4399 * Get the saved DEVMODE..
4402 len += unpack_devicemode(&info.devmode,dbuf.dptr+len, dbuf.dsize-len);
4405 * The saved DEVMODE contains the devicename from the printer used during
4406 * the initialization save. Change it to reflect the new printer.
4409 if ( info.devmode ) {
4410 ZERO_STRUCT(info.devmode->devicename);
4411 fstrcpy(info.devmode->devicename, info_ptr->printername);
4415 * NT/2k does not change out the entire DeviceMode of a printer
4416 * when changing the driver. Only the driverextra, private, &
4417 * driverversion fields. --jerry (Thu Mar 14 08:58:43 CST 2002)
4419 * Later examination revealed that Windows NT/2k does reset the
4420 * the printer's device mode, bit **only** when you change a
4421 * property of the device mode such as the page orientation.
4426 /* Bind the saved DEVMODE to the new the printer */
4428 free_nt_devicemode(&info_ptr->devmode);
4429 info_ptr->devmode = info.devmode;
4431 DEBUG(10,("set_driver_init_2: Set printer [%s] init %s DEVMODE for driver [%s]\n",
4432 info_ptr->printername, info_ptr->devmode?"VALID":"NULL", info_ptr->drivername));
4434 /* Add the printer data 'values' to the new printer */
4436 if ( !(info_ptr->data = TALLOC_ZERO_P( info_ptr, NT_PRINTER_DATA )) ) {
4437 DEBUG(0,("set_driver_init_2: talloc() failed!\n"));
4441 len += unpack_values( info_ptr->data, dbuf.dptr+len, dbuf.dsize-len );
4443 SAFE_FREE(dbuf.dptr);
4448 /****************************************************************************
4449 Initialize printer devmode & data with previously saved driver init values.
4450 When a printer is created using AddPrinter, the drivername bound to the
4451 printer is used to lookup previously saved driver initialization info, which
4452 is bound to the new printer.
4453 ****************************************************************************/
4455 bool set_driver_init(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
4457 bool result = False;
4461 result = set_driver_init_2(printer->info_2);
4465 DEBUG(0,("set_driver_init: Programmer's error! Unknown driver_init level [%d]\n",
4473 /****************************************************************************
4474 Delete driver init data stored for a specified driver
4475 ****************************************************************************/
4477 bool del_driver_init(char *drivername)
4482 if (!drivername || !*drivername) {
4483 DEBUG(3,("del_driver_init: No drivername specified!\n"));
4487 if (asprintf(&key, "%s%s", DRIVER_INIT_PREFIX, drivername) < 0) {
4491 DEBUG(6,("del_driver_init: Removing driver init data for [%s]\n",
4494 ret = (tdb_delete_bystring(tdb_drivers, key) == 0);
4499 /****************************************************************************
4500 Pack up the DEVMODE and values for a printer into a 'driver init' entry
4501 in the tdb. Note: this is different from the driver entry and the printer
4502 entry. There should be a single driver init entry for each driver regardless
4503 of whether it was installed from NT or 2K. Technically, they should be
4504 different, but they work out to the same struct.
4505 ****************************************************************************/
4507 static uint32 update_driver_init_2(NT_PRINTER_INFO_LEVEL_2 *info)
4511 int buflen, len, ret;
4520 len += pack_devicemode(info->devmode, buf+len, buflen-len);
4522 retlen = pack_values( info->data, buf+len, buflen-len );
4530 buf = (uint8 *)SMB_REALLOC(buf, len);
4532 DEBUG(0, ("update_driver_init_2: failed to enlarge buffer!\n"));
4541 if (asprintf(&key, "%s%s", DRIVER_INIT_PREFIX, info->drivername) < 0) {
4549 ret = tdb_store_bystring(tdb_drivers, key, dbuf, TDB_REPLACE);
4553 DEBUG(8, ("update_driver_init_2: error updating printer init to tdb on disk\n"));
4557 DEBUG(10,("update_driver_init_2: Saved printer [%s] init DEVMODE & values for driver [%s]\n",
4558 info->sharename, info->drivername));
4563 /****************************************************************************
4564 Update (i.e. save) the driver init info (DEVMODE and values) for a printer
4565 ****************************************************************************/
4567 static uint32 update_driver_init(NT_PRINTER_INFO_LEVEL *printer, uint32 level)
4571 dump_a_printer(printer, level);
4575 result = update_driver_init_2(printer->info_2);
4585 /****************************************************************************
4586 Convert the printer data value, a REG_BINARY array, into an initialization
4587 DEVMODE. Note: the array must be parsed as if it was a DEVMODE in an rpc...
4588 got to keep the endians happy :).
4589 ****************************************************************************/
4591 static bool convert_driver_init( TALLOC_CTX *ctx, NT_DEVICEMODE *nt_devmode, uint8 *data, uint32 data_len )
4593 bool result = False;
4597 ZERO_STRUCT(devmode);
4599 prs_init_empty(&ps, ctx, UNMARSHALL);
4600 ps.data_p = (char *)data;
4601 ps.buffer_size = data_len;
4603 if (spoolss_io_devmode("phantom DEVMODE", &ps, 0, &devmode))
4604 result = convert_devicemode("", &devmode, &nt_devmode);
4606 DEBUG(10,("convert_driver_init: error parsing DEVMODE\n"));
4611 /****************************************************************************
4612 Set the DRIVER_INIT info in the tdb. Requires Win32 client code that:
4614 1. Use the driver's config DLL to this UNC printername and:
4615 a. Call DrvPrintEvent with PRINTER_EVENT_INITIALIZE
4616 b. Call DrvConvertDevMode with CDM_DRIVER_DEFAULT to get default DEVMODE
4617 2. Call SetPrinterData with the 'magic' key and the DEVMODE as data.
4619 The last step triggers saving the "driver initialization" information for
4620 this printer into the tdb. Later, new printers that use this driver will
4621 have this initialization information bound to them. This simulates the
4622 driver initialization, as if it had run on the Samba server (as it would
4625 The Win32 client side code requirement sucks! But until we can run arbitrary
4626 Win32 printer driver code on any Unix that Samba runs on, we are stuck with it.
4628 It would have been easier to use SetPrinter because all the UNMARSHALLING of
4629 the DEVMODE is done there, but 2K/XP clients do not set the DEVMODE... think
4630 about it and you will realize why. JRR 010720
4631 ****************************************************************************/
4633 static WERROR save_driver_init_2(NT_PRINTER_INFO_LEVEL *printer, uint8 *data, uint32 data_len )
4635 WERROR status = WERR_OK;
4636 TALLOC_CTX *ctx = NULL;
4637 NT_DEVICEMODE *nt_devmode = NULL;
4638 NT_DEVICEMODE *tmp_devmode = printer->info_2->devmode;
4641 * When the DEVMODE is already set on the printer, don't try to unpack it.
4643 DEBUG(8,("save_driver_init_2: Enter...\n"));
4645 if ( !printer->info_2->devmode && data_len ) {
4647 * Set devmode on printer info, so entire printer initialization can be
4651 if ((ctx = talloc_init("save_driver_init_2")) == NULL)
4654 if ((nt_devmode = SMB_MALLOC_P(NT_DEVICEMODE)) == NULL) {
4655 status = WERR_NOMEM;
4659 ZERO_STRUCTP(nt_devmode);
4662 * The DEVMODE is held in the 'data' component of the param in raw binary.
4663 * Convert it to to a devmode structure
4665 if ( !convert_driver_init( ctx, nt_devmode, data, data_len )) {
4666 DEBUG(10,("save_driver_init_2: error converting DEVMODE\n"));
4667 status = WERR_INVALID_PARAM;
4671 printer->info_2->devmode = nt_devmode;
4675 * Pack up and add (or update) the DEVMODE and any current printer data to
4676 * a 'driver init' element in the tdb
4680 if ( update_driver_init(printer, 2) != 0 ) {
4681 DEBUG(10,("save_driver_init_2: error updating DEVMODE\n"));
4682 status = WERR_NOMEM;
4687 * If driver initialization info was successfully saved, set the current
4688 * printer to match it. This allows initialization of the current printer
4689 * as well as the driver.
4691 status = mod_a_printer(printer, 2);
4692 if (!W_ERROR_IS_OK(status)) {
4693 DEBUG(10,("save_driver_init_2: error setting DEVMODE on printer [%s]\n",
4694 printer->info_2->printername));
4698 talloc_destroy(ctx);
4699 free_nt_devicemode( &nt_devmode );
4701 printer->info_2->devmode = tmp_devmode;
4706 /****************************************************************************
4707 Update the driver init info (DEVMODE and specifics) for a printer
4708 ****************************************************************************/
4710 WERROR save_driver_init(NT_PRINTER_INFO_LEVEL *printer, uint32 level, uint8 *data, uint32 data_len)
4712 WERROR status = WERR_OK;
4716 status = save_driver_init_2( printer, data, data_len );
4719 status = WERR_UNKNOWN_LEVEL;
4726 /****************************************************************************
4727 Get a NT_PRINTER_INFO_LEVEL struct. It returns malloced memory.
4729 Previously the code had a memory allocation problem because it always
4730 used the TALLOC_CTX from the Printer_entry*. This context lasts
4731 as a long as the original handle is open. So if the client made a lot
4732 of getprinter[data]() calls, the memory usage would climb. Now we use
4733 a short lived TALLOC_CTX for printer_info_2 objects returned. We
4734 still use the Printer_entry->ctx for maintaining the cache copy though
4735 since that object must live as long as the handle by definition.
4738 ****************************************************************************/
4740 static WERROR get_a_printer_internal( Printer_entry *print_hnd, NT_PRINTER_INFO_LEVEL **pp_printer, uint32 level,
4741 const char *sharename, bool get_loc_com)
4746 DEBUG(10,("get_a_printer: [%s] level %u\n", sharename, (unsigned int)level));
4748 if ( !(*pp_printer = TALLOC_ZERO_P(NULL, NT_PRINTER_INFO_LEVEL)) ) {
4749 DEBUG(0,("get_a_printer: talloc() fail.\n"));
4755 if ( !((*pp_printer)->info_2 = TALLOC_ZERO_P(*pp_printer, NT_PRINTER_INFO_LEVEL_2)) ) {
4756 DEBUG(0,("get_a_printer: talloc() fail.\n"));
4757 TALLOC_FREE( *pp_printer );
4762 fstrcpy( servername, print_hnd->servername );
4764 fstrcpy( servername, "%L" );
4765 standard_sub_basic( "", "", servername,
4766 sizeof(servername)-1 );
4769 result = get_a_printer_2( (*pp_printer)->info_2,
4770 servername, sharename, get_loc_com);
4772 /* we have a new printer now. Save it with this handle */
4774 if ( !W_ERROR_IS_OK(result) ) {
4775 TALLOC_FREE( *pp_printer );
4776 DEBUG(10,("get_a_printer: [%s] level %u returning %s\n",
4777 sharename, (unsigned int)level, win_errstr(result)));
4781 dump_a_printer( *pp_printer, level);
4786 TALLOC_FREE( *pp_printer );
4787 return WERR_UNKNOWN_LEVEL;
4793 WERROR get_a_printer( Printer_entry *print_hnd,
4794 NT_PRINTER_INFO_LEVEL **pp_printer,
4796 const char *sharename)
4798 return get_a_printer_internal(print_hnd, pp_printer, level,
4802 WERROR get_a_printer_search( Printer_entry *print_hnd,
4803 NT_PRINTER_INFO_LEVEL **pp_printer,
4805 const char *sharename)
4807 return get_a_printer_internal(print_hnd, pp_printer, level,
4811 /****************************************************************************
4812 Deletes a NT_PRINTER_INFO_LEVEL struct.
4813 ****************************************************************************/
4815 uint32 free_a_printer(NT_PRINTER_INFO_LEVEL **pp_printer, uint32 level)
4817 NT_PRINTER_INFO_LEVEL *printer = *pp_printer;
4824 if ( printer->info_2 )
4825 free_nt_printer_info_level_2(&printer->info_2);
4829 DEBUG(0,("free_a_printer: unknown level! [%d]\n", level ));
4833 TALLOC_FREE(*pp_printer);
4838 /****************************************************************************
4839 ****************************************************************************/
4840 uint32 add_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL driver, uint32 level)
4843 DEBUG(104,("adding a printer at level [%d]\n", level));
4844 dump_a_printer_driver(driver, level);
4848 result=add_a_printer_driver_3(driver.info_3);
4852 result=add_a_printer_driver_6(driver.info_6);
4862 /****************************************************************************
4863 ****************************************************************************/
4865 WERROR get_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL *driver, uint32 level,
4866 fstring drivername, const char *architecture, uint32 version)
4872 /* Sometime we just want any version of the driver */
4874 if ( version == DRIVER_ANY_VERSION ) {
4875 /* look for Win2k first and then for NT4 */
4876 result = get_a_printer_driver_3(&driver->info_3, drivername,
4879 if ( !W_ERROR_IS_OK(result) ) {
4880 result = get_a_printer_driver_3( &driver->info_3,
4881 drivername, architecture, 2 );
4884 result = get_a_printer_driver_3(&driver->info_3, drivername,
4885 architecture, version);
4894 if (W_ERROR_IS_OK(result))
4895 dump_a_printer_driver(*driver, level);
4900 /****************************************************************************
4901 ****************************************************************************/
4902 uint32 free_a_printer_driver(NT_PRINTER_DRIVER_INFO_LEVEL driver, uint32 level)
4909 NT_PRINTER_DRIVER_INFO_LEVEL_3 *info3;
4910 if (driver.info_3 != NULL)
4912 info3=driver.info_3;
4913 SAFE_FREE(info3->dependentfiles);
4914 ZERO_STRUCTP(info3);
4924 NT_PRINTER_DRIVER_INFO_LEVEL_6 *info6;
4925 if (driver.info_6 != NULL) {
4926 info6=driver.info_6;
4927 SAFE_FREE(info6->dependentfiles);
4928 SAFE_FREE(info6->previousnames);
4929 ZERO_STRUCTP(info6);
4945 /****************************************************************************
4946 Determine whether or not a particular driver is currently assigned
4948 ****************************************************************************/
4950 bool printer_driver_in_use ( NT_PRINTER_DRIVER_INFO_LEVEL_3 *info_3 )
4953 int n_services = lp_numservices();
4954 NT_PRINTER_INFO_LEVEL *printer = NULL;
4955 bool in_use = False;
4960 DEBUG(10,("printer_driver_in_use: Beginning search through ntprinters.tdb...\n"));
4962 /* loop through the printers.tdb and check for the drivername */
4964 for (snum=0; snum<n_services && !in_use; snum++) {
4965 if ( !(lp_snum_ok(snum) && lp_print_ok(snum) ) )
4968 if ( !W_ERROR_IS_OK(get_a_printer(NULL, &printer, 2, lp_servicename(snum))) )
4971 if ( strequal(info_3->name, printer->info_2->drivername) )
4974 free_a_printer( &printer, 2 );
4977 DEBUG(10,("printer_driver_in_use: Completed search through ntprinters.tdb...\n"));
4980 NT_PRINTER_DRIVER_INFO_LEVEL d;
4983 DEBUG(5,("printer_driver_in_use: driver \"%s\" is currently in use\n", info_3->name));
4985 /* we can still remove the driver if there is one of
4986 "Windows NT x86" version 2 or 3 left */
4988 if ( !strequal( "Windows NT x86", info_3->environment ) ) {
4989 werr = get_a_printer_driver( &d, 3, info_3->name, "Windows NT x86", DRIVER_ANY_VERSION );
4992 switch ( info_3->cversion ) {
4994 werr = get_a_printer_driver( &d, 3, info_3->name, "Windows NT x86", 3 );
4997 werr = get_a_printer_driver( &d, 3, info_3->name, "Windows NT x86", 2 );
5000 DEBUG(0,("printer_driver_in_use: ERROR! unknown driver version (%d)\n",
5002 werr = WERR_UNKNOWN_PRINTER_DRIVER;
5007 /* now check the error code */
5009 if ( W_ERROR_IS_OK(werr) ) {
5010 /* it's ok to remove the driver, we have other architctures left */
5012 free_a_printer_driver( d, 3 );
5016 /* report that the driver is not in use by default */
5022 /**********************************************************************
5023 Check to see if a ogiven file is in use by *info
5024 *********************************************************************/
5026 static bool drv_file_in_use( char* file, NT_PRINTER_DRIVER_INFO_LEVEL_3 *info )
5033 /* mz: skip files that are in the list but already deleted */
5034 if (!file || !file[0]) {
5038 if ( strequal(file, info->driverpath) )
5041 if ( strequal(file, info->datafile) )
5044 if ( strequal(file, info->configfile) )
5047 if ( strequal(file, info->helpfile) )
5050 /* see of there are any dependent files to examine */
5052 if ( !info->dependentfiles )
5055 while ( *info->dependentfiles[i] ) {
5056 if ( strequal(file, info->dependentfiles[i]) )
5065 /**********************************************************************
5066 Utility function to remove the dependent file pointed to by the
5067 input parameter from the list
5068 *********************************************************************/
5070 static void trim_dependent_file( fstring files[], int idx )
5073 /* bump everything down a slot */
5075 while( *files[idx+1] ) {
5076 fstrcpy( files[idx], files[idx+1] );
5085 /**********************************************************************
5086 Check if any of the files used by src are also used by drv
5087 *********************************************************************/
5089 static bool trim_overlap_drv_files( NT_PRINTER_DRIVER_INFO_LEVEL_3 *src,
5090 NT_PRINTER_DRIVER_INFO_LEVEL_3 *drv )
5092 bool in_use = False;
5098 /* check each file. Remove it from the src structure if it overlaps */
5100 if ( drv_file_in_use(src->driverpath, drv) ) {
5102 DEBUG(10,("Removing driverfile [%s] from list\n", src->driverpath));
5103 fstrcpy( src->driverpath, "" );
5106 if ( drv_file_in_use(src->datafile, drv) ) {
5108 DEBUG(10,("Removing datafile [%s] from list\n", src->datafile));
5109 fstrcpy( src->datafile, "" );
5112 if ( drv_file_in_use(src->configfile, drv) ) {
5114 DEBUG(10,("Removing configfile [%s] from list\n", src->configfile));
5115 fstrcpy( src->configfile, "" );
5118 if ( drv_file_in_use(src->helpfile, drv) ) {
5120 DEBUG(10,("Removing helpfile [%s] from list\n", src->helpfile));
5121 fstrcpy( src->helpfile, "" );
5124 /* are there any dependentfiles to examine? */
5126 if ( !src->dependentfiles )
5129 while ( *src->dependentfiles[i] ) {
5130 if ( drv_file_in_use(src->dependentfiles[i], drv) ) {
5132 DEBUG(10,("Removing [%s] from dependent file list\n", src->dependentfiles[i]));
5133 trim_dependent_file( src->dependentfiles, i );
5141 /****************************************************************************
5142 Determine whether or not a particular driver files are currently being
5143 used by any other driver.
5145 Return value is True if any files were in use by other drivers
5146 and False otherwise.
5148 Upon return, *info has been modified to only contain the driver files
5149 which are not in use
5153 This needs to check all drivers to ensure that all files in use
5154 have been removed from *info, not just the ones in the first
5156 ****************************************************************************/
5158 bool printer_driver_files_in_use ( NT_PRINTER_DRIVER_INFO_LEVEL_3 *info )
5163 fstring *list = NULL;
5164 NT_PRINTER_DRIVER_INFO_LEVEL driver;
5165 bool in_use = false;
5170 version = info->cversion;
5172 /* loop over all driver versions */
5174 DEBUG(5,("printer_driver_files_in_use: Beginning search through ntdrivers.tdb...\n"));
5176 /* get the list of drivers */
5179 ndrivers = get_ntdrivers(&list, info->environment, version);
5181 DEBUGADD(4,("we have:[%d] drivers in environment [%s] and version [%d]\n",
5182 ndrivers, info->environment, version));
5184 /* check each driver for overlap in files */
5186 for (i=0; i<ndrivers; i++) {
5187 DEBUGADD(5,("\tdriver: [%s]\n", list[i]));
5189 ZERO_STRUCT(driver);
5191 if ( !W_ERROR_IS_OK(get_a_printer_driver(&driver, 3, list[i], info->environment, version)) ) {
5196 /* check if d2 uses any files from d1 */
5197 /* only if this is a different driver than the one being deleted */
5199 if ( !strequal(info->name, driver.info_3->name) ) {
5200 if ( trim_overlap_drv_files(info, driver.info_3) ) {
5201 /* mz: Do not instantly return -
5202 * we need to ensure this file isn't
5203 * also in use by other drivers. */
5208 free_a_printer_driver(driver, 3);
5213 DEBUG(5,("printer_driver_files_in_use: Completed search through ntdrivers.tdb...\n"));
5215 driver.info_3 = info;
5217 if ( DEBUGLEVEL >= 20 )
5218 dump_a_printer_driver( driver, 3 );
5223 /****************************************************************************
5224 Actually delete the driver files. Make sure that
5225 printer_driver_files_in_use() return False before calling
5227 ****************************************************************************/
5229 static bool delete_driver_files(struct pipes_struct *rpc_pipe,
5230 NT_PRINTER_DRIVER_INFO_LEVEL_3 *info_3)
5235 connection_struct *conn;
5239 fstring printdollar;
5240 int printdollar_snum;
5246 DEBUG(6,("delete_driver_files: deleting driver [%s] - version [%d]\n", info_3->name, info_3->cversion));
5248 fstrcpy(printdollar, "print$");
5250 printdollar_snum = find_service(printdollar);
5251 if (printdollar_snum == -1) {
5255 nt_status = create_conn_struct(talloc_tos(), &conn, printdollar_snum,
5256 lp_pathname(printdollar_snum),
5257 rpc_pipe->server_info, &oldcwd);
5258 if (!NT_STATUS_IS_OK(nt_status)) {
5259 DEBUG(0,("delete_driver_files: create_conn_struct "
5260 "returned %s\n", nt_errstr(nt_status)));
5264 if ( !CAN_WRITE(conn) ) {
5265 DEBUG(3,("delete_driver_files: Cannot delete print driver when [print$] is read-only\n"));
5269 /* now delete the files; must strip the '\print$' string from
5272 if ( *info_3->driverpath ) {
5273 if ( (s = strchr( &info_3->driverpath[1], '\\' )) != NULL ) {
5275 driver_unix_convert(conn,file,&st);
5276 DEBUG(10,("deleting driverfile [%s]\n", s));
5277 unlink_internals(conn, NULL, 0, file, False);
5281 if ( *info_3->configfile ) {
5282 if ( (s = strchr( &info_3->configfile[1], '\\' )) != NULL ) {
5284 driver_unix_convert(conn,file,&st);
5285 DEBUG(10,("deleting configfile [%s]\n", s));
5286 unlink_internals(conn, NULL, 0, file, False);
5290 if ( *info_3->datafile ) {
5291 if ( (s = strchr( &info_3->datafile[1], '\\' )) != NULL ) {
5293 driver_unix_convert(conn,file,&st);
5294 DEBUG(10,("deleting datafile [%s]\n", s));
5295 unlink_internals(conn, NULL, 0, file, False);
5299 if ( *info_3->helpfile ) {
5300 if ( (s = strchr( &info_3->helpfile[1], '\\' )) != NULL ) {
5302 driver_unix_convert(conn,file,&st);
5303 DEBUG(10,("deleting helpfile [%s]\n", s));
5304 unlink_internals(conn, NULL, 0, file, False);
5308 /* check if we are done removing files */
5310 if ( info_3->dependentfiles ) {
5311 while ( info_3->dependentfiles[i][0] ) {
5314 /* bypass the "\print$" portion of the path */
5316 if ( (p = strchr( info_3->dependentfiles[i]+1, '\\' )) != NULL ) {
5318 driver_unix_convert(conn,file,&st);
5319 DEBUG(10,("deleting dependent file [%s]\n", file));
5320 unlink_internals(conn, NULL, 0, file, False);
5332 vfs_ChDir(conn, oldcwd);
5333 conn_free_internal(conn);
5338 /****************************************************************************
5339 Remove a printer driver from the TDB. This assumes that the the driver was
5340 previously looked up.
5341 ***************************************************************************/
5343 WERROR delete_printer_driver(struct pipes_struct *rpc_pipe,
5344 NT_PRINTER_DRIVER_INFO_LEVEL_3 *info_3,
5345 uint32 version, bool delete_files )
5350 NT_PRINTER_DRIVER_INFO_LEVEL ctr;
5352 /* delete the tdb data first */
5354 arch = get_short_archi(info_3->environment);
5356 return WERR_UNKNOWN_PRINTER_DRIVER;
5358 if (asprintf(&key, "%s%s/%d/%s", DRIVERS_PREFIX,
5359 arch, version, info_3->name) < 0) {
5363 DEBUG(5,("delete_printer_driver: key = [%s] delete_files = %s\n",
5364 key, delete_files ? "TRUE" : "FALSE" ));
5366 ctr.info_3 = info_3;
5367 dump_a_printer_driver( ctr, 3 );
5369 /* check if the driver actually exists for this environment */
5371 dbuf = tdb_fetch_bystring( tdb_drivers, key );
5373 DEBUG(8,("delete_printer_driver: Driver unknown [%s]\n", key));
5375 return WERR_UNKNOWN_PRINTER_DRIVER;
5378 SAFE_FREE( dbuf.dptr );
5380 /* ok... the driver exists so the delete should return success */
5382 if (tdb_delete_bystring(tdb_drivers, key) == -1) {
5383 DEBUG (0,("delete_printer_driver: fail to delete %s!\n", key));
5385 return WERR_ACCESS_DENIED;
5389 * now delete any associated files if delete_files == True
5390 * even if this part failes, we return succes because the
5391 * driver doesn not exist any more
5395 delete_driver_files(rpc_pipe, info_3);
5397 DEBUG(5,("delete_printer_driver: driver delete successful [%s]\n", key));
5403 /****************************************************************************
5404 Store a security desc for a printer.
5405 ****************************************************************************/
5407 WERROR nt_printing_setsec(const char *sharename, SEC_DESC_BUF *secdesc_ctr)
5409 SEC_DESC_BUF *new_secdesc_ctr = NULL;
5410 SEC_DESC_BUF *old_secdesc_ctr = NULL;
5412 bool prs_init_done = false;
5413 TALLOC_CTX *mem_ctx = NULL;
5417 mem_ctx = talloc_init("nt_printing_setsec");
5418 if (mem_ctx == NULL)
5421 /* The old owner and group sids of the security descriptor are not
5422 present when new ACEs are added or removed by changing printer
5423 permissions through NT. If they are NULL in the new security
5424 descriptor then copy them over from the old one. */
5426 if (!secdesc_ctr->sd->owner_sid || !secdesc_ctr->sd->group_sid) {
5427 DOM_SID *owner_sid, *group_sid;
5428 SEC_ACL *dacl, *sacl;
5429 SEC_DESC *psd = NULL;
5432 if (!nt_printing_getsec(mem_ctx, sharename, &old_secdesc_ctr)) {
5433 status = WERR_NOMEM;
5437 /* Pick out correct owner and group sids */
5439 owner_sid = secdesc_ctr->sd->owner_sid ?
5440 secdesc_ctr->sd->owner_sid :
5441 old_secdesc_ctr->sd->owner_sid;
5443 group_sid = secdesc_ctr->sd->group_sid ?
5444 secdesc_ctr->sd->group_sid :
5445 old_secdesc_ctr->sd->group_sid;
5447 dacl = secdesc_ctr->sd->dacl ?
5448 secdesc_ctr->sd->dacl :
5449 old_secdesc_ctr->sd->dacl;
5451 sacl = secdesc_ctr->sd->sacl ?
5452 secdesc_ctr->sd->sacl :
5453 old_secdesc_ctr->sd->sacl;
5455 /* Make a deep copy of the security descriptor */
5457 psd = make_sec_desc(mem_ctx, secdesc_ctr->sd->revision, secdesc_ctr->sd->type,
5458 owner_sid, group_sid,
5464 status = WERR_NOMEM;
5468 new_secdesc_ctr = make_sec_desc_buf(mem_ctx, size, psd);
5471 if (!new_secdesc_ctr) {
5472 new_secdesc_ctr = secdesc_ctr;
5475 /* Store the security descriptor in a tdb */
5478 (uint32_t)ndr_size_security_descriptor(new_secdesc_ctr->sd,
5480 + sizeof(SEC_DESC_BUF), mem_ctx, MARSHALL) ) {
5481 status = WERR_NOMEM;
5486 prs_init_done = true;
5488 if (!sec_io_desc_buf("nt_printing_setsec", &new_secdesc_ctr,
5490 status = WERR_BADFUNC;
5494 kbuf = make_printers_secdesc_tdbkey(mem_ctx, sharename );
5496 if (tdb_prs_store(tdb_printers, kbuf, &ps)==0) {
5499 DEBUG(1,("Failed to store secdesc for %s\n", sharename));
5500 status = WERR_BADFUNC;
5503 /* Free malloc'ed memory */
5507 if (prs_init_done) {
5511 talloc_destroy(mem_ctx);
5515 /****************************************************************************
5516 Construct a default security descriptor buffer for a printer.
5517 ****************************************************************************/
5519 static SEC_DESC_BUF *construct_default_printer_sdb(TALLOC_CTX *ctx)
5521 SEC_ACE ace[5]; /* max number of ace entries */
5524 SEC_ACL *psa = NULL;
5525 SEC_DESC_BUF *sdb = NULL;
5526 SEC_DESC *psd = NULL;
5530 /* Create an ACE where Everyone is allowed to print */
5532 sa = PRINTER_ACE_PRINT;
5533 init_sec_ace(&ace[i++], &global_sid_World, SEC_ACE_TYPE_ACCESS_ALLOWED,
5534 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5536 /* Add the domain admins group if we are a DC */
5539 DOM_SID domadmins_sid;
5541 sid_copy(&domadmins_sid, get_global_sam_sid());
5542 sid_append_rid(&domadmins_sid, DOMAIN_GROUP_RID_ADMINS);
5544 sa = PRINTER_ACE_FULL_CONTROL;
5545 init_sec_ace(&ace[i++], &domadmins_sid,
5546 SEC_ACE_TYPE_ACCESS_ALLOWED, sa,
5547 SEC_ACE_FLAG_OBJECT_INHERIT | SEC_ACE_FLAG_INHERIT_ONLY);
5548 init_sec_ace(&ace[i++], &domadmins_sid, SEC_ACE_TYPE_ACCESS_ALLOWED,
5549 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5551 else if (secrets_fetch_domain_sid(lp_workgroup(), &adm_sid)) {
5552 sid_append_rid(&adm_sid, DOMAIN_USER_RID_ADMIN);
5554 sa = PRINTER_ACE_FULL_CONTROL;
5555 init_sec_ace(&ace[i++], &adm_sid,
5556 SEC_ACE_TYPE_ACCESS_ALLOWED, sa,
5557 SEC_ACE_FLAG_OBJECT_INHERIT | SEC_ACE_FLAG_INHERIT_ONLY);
5558 init_sec_ace(&ace[i++], &adm_sid, SEC_ACE_TYPE_ACCESS_ALLOWED,
5559 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5562 /* add BUILTIN\Administrators as FULL CONTROL */
5564 sa = PRINTER_ACE_FULL_CONTROL;
5565 init_sec_ace(&ace[i++], &global_sid_Builtin_Administrators,
5566 SEC_ACE_TYPE_ACCESS_ALLOWED, sa,
5567 SEC_ACE_FLAG_OBJECT_INHERIT | SEC_ACE_FLAG_INHERIT_ONLY);
5568 init_sec_ace(&ace[i++], &global_sid_Builtin_Administrators,
5569 SEC_ACE_TYPE_ACCESS_ALLOWED,
5570 sa, SEC_ACE_FLAG_CONTAINER_INHERIT);
5572 /* Make the security descriptor owned by the BUILTIN\Administrators */
5574 /* The ACL revision number in rpc_secdesc.h differs from the one
5575 created by NT when setting ACE entries in printer
5576 descriptors. NT4 complains about the property being edited by a
5579 if ((psa = make_sec_acl(ctx, NT4_ACL_REVISION, i, ace)) != NULL) {
5580 psd = make_sec_desc(ctx, SEC_DESC_REVISION, SEC_DESC_SELF_RELATIVE,
5581 &global_sid_Builtin_Administrators,
5582 &global_sid_Builtin_Administrators,
5583 NULL, psa, &sd_size);
5587 DEBUG(0,("construct_default_printer_sd: Failed to make SEC_DESC.\n"));
5591 sdb = make_sec_desc_buf(ctx, sd_size, psd);
5593 DEBUG(4,("construct_default_printer_sdb: size = %u.\n",
5594 (unsigned int)sd_size));
5599 /****************************************************************************
5600 Get a security desc for a printer.
5601 ****************************************************************************/
5603 bool nt_printing_getsec(TALLOC_CTX *ctx, const char *sharename, SEC_DESC_BUF **secdesc_ctr)
5609 if (strlen(sharename) > 2 && (temp = strchr(sharename + 2, '\\'))) {
5610 sharename = temp + 1;
5615 /* Fetch security descriptor from tdb */
5617 kbuf = make_printers_secdesc_tdbkey(ctx, sharename );
5619 if (tdb_prs_fetch(tdb_printers, kbuf, &ps, ctx)!=0 ||
5620 !sec_io_desc_buf("nt_printing_getsec", secdesc_ctr, &ps, 1)) {
5624 DEBUG(4,("using default secdesc for %s\n", sharename));
5626 if (!(*secdesc_ctr = construct_default_printer_sdb(ctx))) {
5630 /* Save default security descriptor for later */
5632 if (!prs_init(&ps, (uint32_t)ndr_size_security_descriptor((*secdesc_ctr)->sd, NULL, 0) +
5633 sizeof(SEC_DESC_BUF), ctx, MARSHALL))
5636 if (sec_io_desc_buf("nt_printing_getsec", secdesc_ctr, &ps, 1)) {
5637 tdb_prs_store(tdb_printers, kbuf, &ps);
5647 /* If security descriptor is owned by S-1-1-0 and winbindd is up,
5648 this security descriptor has been created when winbindd was
5649 down. Take ownership of security descriptor. */
5651 if (sid_equal((*secdesc_ctr)->sd->owner_sid, &global_sid_World)) {
5654 /* Change sd owner to workgroup administrator */
5656 if (secrets_fetch_domain_sid(lp_workgroup(), &owner_sid)) {
5657 SEC_DESC_BUF *new_secdesc_ctr = NULL;
5658 SEC_DESC *psd = NULL;
5663 sid_append_rid(&owner_sid, DOMAIN_USER_RID_ADMIN);
5665 psd = make_sec_desc(ctx, (*secdesc_ctr)->sd->revision, (*secdesc_ctr)->sd->type,
5667 (*secdesc_ctr)->sd->group_sid,
5668 (*secdesc_ctr)->sd->sacl,
5669 (*secdesc_ctr)->sd->dacl,
5676 new_secdesc_ctr = make_sec_desc_buf(ctx, size, psd);
5677 if (!new_secdesc_ctr) {
5681 /* Swap with other one */
5683 *secdesc_ctr = new_secdesc_ctr;
5687 nt_printing_setsec(sharename, *secdesc_ctr);
5691 if (DEBUGLEVEL >= 10) {
5692 SEC_ACL *the_acl = (*secdesc_ctr)->sd->dacl;
5695 DEBUG(10, ("secdesc_ctr for %s has %d aces:\n",
5696 sharename, the_acl->num_aces));
5698 for (i = 0; i < the_acl->num_aces; i++) {
5699 DEBUG(10, ("%s %d %d 0x%08x\n",
5700 sid_string_dbg(&the_acl->aces[i].trustee),
5701 the_acl->aces[i].type, the_acl->aces[i].flags,
5702 the_acl->aces[i].access_mask));
5711 1: level not implemented
5712 2: file doesn't exist
5713 3: can't allocate memory
5714 4: can't free memory
5715 5: non existant struct
5719 A printer and a printer driver are 2 different things.
5720 NT manages them separatelly, Samba does the same.
5721 Why ? Simply because it's easier and it makes sense !
5723 Now explanation: You have 3 printers behind your samba server,
5724 2 of them are the same make and model (laser A and B). But laser B
5725 has an 3000 sheet feeder and laser A doesn't such an option.
5726 Your third printer is an old dot-matrix model for the accounting :-).
5728 If the /usr/local/samba/lib directory (default dir), you will have
5729 5 files to describe all of this.
5731 3 files for the printers (1 by printer):
5734 NTprinter_accounting
5735 2 files for the drivers (1 for the laser and 1 for the dot matrix)
5736 NTdriver_printer model X
5737 NTdriver_printer model Y
5739 jfm: I should use this comment for the text file to explain
5740 same thing for the forms BTW.
5741 Je devrais mettre mes commentaires en francais, ca serait mieux :-)
5745 /* Convert generic access rights to printer object specific access rights.
5746 It turns out that NT4 security descriptors use generic access rights and
5747 NT5 the object specific ones. */
5749 void map_printer_permissions(SEC_DESC *sd)
5753 for (i = 0; sd->dacl && i < sd->dacl->num_aces; i++) {
5754 se_map_generic(&sd->dacl->aces[i].access_mask,
5755 &printer_generic_mapping);
5759 void map_job_permissions(SEC_DESC *sd)
5763 for (i = 0; sd->dacl && i < sd->dacl->num_aces; i++) {
5764 se_map_generic(&sd->dacl->aces[i].access_mask,
5765 &job_generic_mapping);
5770 /****************************************************************************
5771 Check a user has permissions to perform the given operation. We use the
5772 permission constants defined in include/rpc_spoolss.h to check the various
5773 actions we perform when checking printer access.
5775 PRINTER_ACCESS_ADMINISTER:
5776 print_queue_pause, print_queue_resume, update_printer_sec,
5777 update_printer, spoolss_addprinterex_level_2,
5778 _spoolss_setprinterdata
5783 JOB_ACCESS_ADMINISTER:
5784 print_job_delete, print_job_pause, print_job_resume,
5787 Try access control in the following order (for performance reasons):
5788 1) root ans SE_PRINT_OPERATOR can do anything (easy check)
5789 2) check security descriptor (bit comparisons in memory)
5790 3) "printer admins" (may result in numerous calls to winbind)
5792 ****************************************************************************/
5793 bool print_access_check(struct auth_serversupplied_info *server_info, int snum,
5796 SEC_DESC_BUF *secdesc = NULL;
5797 uint32 access_granted;
5800 TALLOC_CTX *mem_ctx = NULL;
5801 SE_PRIV se_printop = SE_PRINT_OPERATOR;
5803 /* If user is NULL then use the current_user structure */
5805 /* Always allow root or SE_PRINT_OPERATROR to do anything */
5807 if (server_info->utok.uid == 0
5808 || user_has_privileges(server_info->ptok, &se_printop ) ) {
5812 /* Get printer name */
5814 pname = PRINTERNAME(snum);
5816 if (!pname || !*pname) {
5821 /* Get printer security descriptor */
5823 if(!(mem_ctx = talloc_init("print_access_check"))) {
5828 if (!nt_printing_getsec(mem_ctx, pname, &secdesc)) {
5829 talloc_destroy(mem_ctx);
5834 if (access_type == JOB_ACCESS_ADMINISTER) {
5835 SEC_DESC_BUF *parent_secdesc = secdesc;
5837 /* Create a child security descriptor to check permissions
5838 against. This is because print jobs are child objects
5839 objects of a printer. */
5841 status = se_create_child_secdesc_buf(mem_ctx, &secdesc, parent_secdesc->sd, False);
5843 if (!NT_STATUS_IS_OK(status)) {
5844 talloc_destroy(mem_ctx);
5845 errno = map_errno_from_nt_status(status);
5849 map_job_permissions(secdesc->sd);
5851 map_printer_permissions(secdesc->sd);
5855 status = se_access_check(secdesc->sd, server_info->ptok, access_type,
5858 DEBUG(4, ("access check was %s\n", NT_STATUS_IS_OK(status) ? "SUCCESS" : "FAILURE"));
5860 /* see if we need to try the printer admin list */
5862 if ((access_granted == 0) &&
5863 (token_contains_name_in_list(uidtoname(server_info->utok.uid),
5864 NULL, NULL, server_info->ptok,
5865 lp_printer_admin(snum)))) {
5866 talloc_destroy(mem_ctx);
5870 talloc_destroy(mem_ctx);
5872 if (!NT_STATUS_IS_OK(status)) {
5876 return NT_STATUS_IS_OK(status);
5879 /****************************************************************************
5880 Check the time parameters allow a print operation.
5881 *****************************************************************************/
5883 bool print_time_access_check(const char *servicename)
5885 NT_PRINTER_INFO_LEVEL *printer = NULL;
5887 time_t now = time(NULL);
5891 if (!W_ERROR_IS_OK(get_a_printer(NULL, &printer, 2, servicename)))
5894 if (printer->info_2->starttime == 0 && printer->info_2->untiltime == 0)
5898 mins = (uint32)t->tm_hour*60 + (uint32)t->tm_min;
5900 if (mins >= printer->info_2->starttime && mins <= printer->info_2->untiltime)
5903 free_a_printer(&printer, 2);
5911 /****************************************************************************
5912 Fill in the servername sent in the _spoolss_open_printer_ex() call
5913 ****************************************************************************/
5915 char* get_server_name( Printer_entry *printer )
5917 return printer->servername;