]> git.decadent.org.uk Git - dak.git/blob - dak/generate_packages_sources2.py
e44d9ceeca424c2148904c6e660916d03046260d
[dak.git] / dak / generate_packages_sources2.py
1 #!/usr/bin/python
2
3 """
4 Generate Packages/Sources files
5
6 @contact: Debian FTP Master <ftpmaster@debian.org>
7 @copyright: 2011  Ansgar Burchardt <ansgar@debian.org>
8 @copyright: Based on daklib/lists.py and dak/generate_filelist.py:
9             2009-2011  Torsten Werner <twerner@debian.org>
10 @copyright: Based on dak/generate_packages_sources.py:
11             2000, 2001, 2002, 2006  James Troup <james@nocrew.org>
12             2009  Mark Hymers <mhy@debian.org>
13             2010  Joerg Jaspert <joerg@debian.org>
14 @license: GNU General Public License version 2 or later
15 """
16
17 # This program is free software; you can redistribute it and/or modify
18 # it under the terms of the GNU General Public License as published by
19 # the Free Software Foundation; either version 2 of the License, or
20 # (at your option) any later version.
21
22 # This program is distributed in the hope that it will be useful,
23 # but WITHOUT ANY WARRANTY; without even the implied warranty of
24 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
25 # GNU General Public License for more details.
26
27 # You should have received a copy of the GNU General Public License
28 # along with this program; if not, write to the Free Software
29 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
30
31 import apt_pkg, sys
32
33 def usage():
34     print """Usage: dak generate-packages-sources2 [OPTIONS]
35 Generate the Packages/Sources files
36
37   -a, --archive=ARCHIVE        process suites in ARCHIVE
38   -s, --suite=SUITE            process this suite
39                                Default: All suites not marked 'untouchable'
40   -f, --force                  Allow processing of untouchable suites
41                                CAREFUL: Only to be used at point release time!
42   -h, --help                   show this help and exit
43
44 SUITE can be a space seperated list, e.g.
45    --suite=unstable testing
46 """
47     sys.exit()
48
49 #############################################################################
50
51 # Here be dragons.
52 _sources_query = R"""
53 SELECT
54
55   (SELECT
56      STRING_AGG(
57        CASE
58          WHEN key = 'Source' THEN E'Package\: '
59          WHEN key = 'Files' AND sui.checksums && array['md5sum'] THEN E'Files\:\n ' || f.md5sum || ' ' || f.size || ' ' || SUBSTRING(f.filename FROM E'/([^/]*)\\Z')
60          WHEN key = 'Files' THEN NULL
61          WHEN key = 'Checksums-Sha1' AND sui.checksums && array['sha1'] THEN E'Checksums-Sha1\:\n ' || f.sha1sum || ' ' || f.size || ' ' || SUBSTRING(f.filename FROM E'/([^/]*)\\Z')
62          WHEN key = 'Checksums-Sha1' THEN NULL
63          WHEN key = 'Checksums-Sha256' AND sui.checksums && array['sha256'] THEN E'Checksums-Sha256\:\n ' || f.sha256sum || ' ' || f.size || ' ' || SUBSTRING(f.filename FROM E'/([^/]*)\\Z')
64          WHEN key = 'Checksums-Sha256' THEN NULL
65          ELSE key || E'\: '
66        END || value, E'\n' ORDER BY mk.ordering, mk.key)
67    FROM
68      source_metadata sm
69      JOIN metadata_keys mk ON mk.key_id = sm.key_id
70    WHERE s.id=sm.src_id
71   )
72   ||
73   CASE
74     WHEN src_associations_full.extra_source THEN E'\nExtra-Source-Only\: yes'
75     ELSE ''
76   END
77   ||
78   E'\nDirectory\: pool/' || :component_name || '/' || SUBSTRING(f.filename FROM E'\\A(.*)/[^/]*\\Z')
79   ||
80   E'\nPriority\: ' || COALESCE(pri.priority, 'extra')
81   ||
82   E'\nSection\: ' || COALESCE(sec.section, 'misc')
83
84 FROM
85
86 source s
87 JOIN src_associations_full ON src_associations_full.suite = :suite AND s.id = src_associations_full.source
88 JOIN files f ON s.file=f.id
89 JOIN files_archive_map fam
90   ON fam.file_id = f.id
91      AND fam.archive_id = (SELECT archive_id FROM suite WHERE id = :suite)
92      AND fam.component_id = :component
93 LEFT JOIN override o ON o.package = s.source
94                      AND o.suite = :overridesuite
95                      AND o.component = :component
96                      AND o.type = :dsc_type
97 LEFT JOIN section sec ON o.section = sec.id
98 LEFT JOIN priority pri ON o.priority = pri.id
99 LEFT JOIN suite sui on sui.id = :suite
100
101 ORDER BY
102 s.source, s.version
103 """
104
105 def generate_sources(suite_id, component_id):
106     global _sources_query
107     from daklib.filewriter import SourcesFileWriter
108     from daklib.dbconn import Component, DBConn, OverrideType, Suite
109     from daklib.dakmultiprocessing import PROC_STATUS_SUCCESS
110
111     session = DBConn().session()
112     dsc_type = session.query(OverrideType).filter_by(overridetype='dsc').one().overridetype_id
113
114     suite = session.query(Suite).get(suite_id)
115     component = session.query(Component).get(component_id)
116
117     overridesuite_id = suite.get_overridesuite().suite_id
118
119     writer_args = {
120             'archive': suite.archive.path,
121             'suite': suite.suite_name,
122             'component': component.component_name
123     }
124     if suite.indices_compression is not None:
125         writer_args['compression'] = suite.indices_compression
126     writer = SourcesFileWriter(**writer_args)
127     output = writer.open()
128
129     # run query and write Sources
130     r = session.execute(_sources_query, {"suite": suite_id, "component": component_id, "component_name": component.component_name, "dsc_type": dsc_type, "overridesuite": overridesuite_id})
131     for (stanza,) in r:
132         print >>output, stanza
133         print >>output, ""
134
135     writer.close()
136
137     message = ["generate sources", suite.suite_name, component.component_name]
138     session.rollback()
139     return (PROC_STATUS_SUCCESS, message)
140
141 #############################################################################
142
143 # Here be large dragons.
144 _packages_query = R"""
145 WITH
146
147   tmp AS (
148     SELECT
149       b.id AS binary_id,
150       b.package AS package,
151       b.version AS version,
152       b.architecture AS architecture,
153       b.source AS source_id,
154       s.source AS source,
155       f.filename AS filename,
156       f.size AS size,
157       f.md5sum AS md5sum,
158       f.sha1sum AS sha1sum,
159       f.sha256sum AS sha256sum,
160       (SELECT value FROM binaries_metadata
161         WHERE bin_id = b.id
162           AND key_id = (SELECT key_id FROM metadata_keys WHERE key = 'Priority'))
163        AS fallback_priority,
164       (SELECT value FROM binaries_metadata
165         WHERE bin_id = b.id
166           AND key_id = (SELECT key_id FROM metadata_keys WHERE key = 'Section'))
167        AS fallback_section
168     FROM
169       binaries b
170       JOIN bin_associations ba ON b.id = ba.bin
171       JOIN files f ON f.id = b.file
172       JOIN files_archive_map fam ON f.id = fam.file_id AND fam.archive_id = :archive_id
173       JOIN source s ON b.source = s.id
174     WHERE
175       (b.architecture = :arch_all OR b.architecture = :arch) AND b.type = :type_name
176       AND ba.suite = :suite
177       AND fam.component_id = :component
178   )
179
180 SELECT
181   (SELECT
182      STRING_AGG(key || E'\: ' || value, E'\n' ORDER BY ordering, key)
183    FROM
184      (SELECT key, ordering,
185         CASE WHEN :include_long_description = 'false' AND key = 'Description'
186           THEN SUBSTRING(value FROM E'\\A[^\n]*')
187           ELSE value
188         END AS value
189       FROM
190         binaries_metadata bm
191         JOIN metadata_keys mk ON mk.key_id = bm.key_id
192       WHERE
193         bm.bin_id = tmp.binary_id
194         AND key != ALL (:metadata_skip)
195      ) AS metadata
196   )
197   || COALESCE(E'\n' || (SELECT
198      STRING_AGG(key || E'\: ' || value, E'\n' ORDER BY key)
199    FROM external_overrides eo
200    WHERE
201      eo.package = tmp.package
202      AND eo.suite = :overridesuite AND eo.component = :component
203   ), '')
204   || E'\nSection\: ' || COALESCE(sec.section, tmp.fallback_section)
205   || E'\nPriority\: ' || COALESCE(pri.priority, tmp.fallback_priority)
206   || E'\nFilename\: pool/' || :component_name || '/' || tmp.filename
207   || E'\nSize\: ' || tmp.size
208   || E'\nMD5sum\: ' || tmp.md5sum
209   || E'\nSHA1\: ' || tmp.sha1sum
210   || E'\nSHA256\: ' || tmp.sha256sum
211
212 FROM
213   tmp
214   LEFT JOIN override o ON o.package = tmp.package
215                       AND o.type = :type_id
216                       AND o.suite = :overridesuite
217                       AND o.component = :component
218   LEFT JOIN section sec ON sec.id = o.section
219   LEFT JOIN priority pri ON pri.id = o.priority
220
221 WHERE
222   (
223       architecture <> :arch_all
224     OR
225       (architecture = :arch_all AND source_id IN (SELECT source_id FROM tmp WHERE architecture <> :arch_all))
226     OR
227       (architecture = :arch_all AND source NOT IN (SELECT DISTINCT source FROM tmp WHERE architecture <> :arch_all))
228   )
229
230 ORDER BY tmp.source, tmp.package, tmp.version
231 """
232
233 def generate_packages(suite_id, component_id, architecture_id, type_name):
234     global _packages_query
235     from daklib.filewriter import PackagesFileWriter
236     from daklib.dbconn import Architecture, Component, DBConn, OverrideType, Suite
237     from daklib.dakmultiprocessing import PROC_STATUS_SUCCESS
238
239     session = DBConn().session()
240     arch_all_id = session.query(Architecture).filter_by(arch_string='all').one().arch_id
241     type_id = session.query(OverrideType).filter_by(overridetype=type_name).one().overridetype_id
242
243     suite = session.query(Suite).get(suite_id)
244     component = session.query(Component).get(component_id)
245     architecture = session.query(Architecture).get(architecture_id)
246
247     overridesuite_id = suite.get_overridesuite().suite_id
248     include_long_description = suite.include_long_description
249
250     # We currently filter out the "Tag" line. They are set by external
251     # overrides and NOT by the maintainer. And actually having it set by
252     # maintainer means we output it twice at the moment -> which breaks
253     # dselect.
254     metadata_skip = ["Section", "Priority", "Tag"]
255     if include_long_description:
256         metadata_skip.append("Description-md5")
257
258     writer_args = {
259             'archive': suite.archive.path,
260             'suite': suite.suite_name,
261             'component': component.component_name,
262             'architecture': architecture.arch_string,
263             'debtype': type_name
264     }
265     if suite.indices_compression is not None:
266         writer_args['compression'] = suite.indices_compression
267     writer = PackagesFileWriter(**writer_args)
268     output = writer.open()
269
270     r = session.execute(_packages_query, {"archive_id": suite.archive.archive_id,
271         "suite": suite_id, "component": component_id, 'component_name': component.component_name,
272         "arch": architecture_id, "type_id": type_id, "type_name": type_name, "arch_all": arch_all_id,
273         "overridesuite": overridesuite_id, "metadata_skip": metadata_skip,
274         "include_long_description": 'true' if include_long_description else 'false'})
275     for (stanza,) in r:
276         print >>output, stanza
277         print >>output, ""
278
279     writer.close()
280
281     message = ["generate-packages", suite.suite_name, component.component_name, architecture.arch_string]
282     session.rollback()
283     return (PROC_STATUS_SUCCESS, message)
284
285 #############################################################################
286
287 _translations_query = """
288 WITH
289   override_suite AS
290     (SELECT
291       s.id AS id,
292       COALESCE(os.id, s.id) AS overridesuite_id
293       FROM suite AS s LEFT JOIN suite AS os ON s.overridesuite = os.suite_name)
294
295 SELECT
296      E'Package\: ' || b.package
297   || E'\nDescription-md5\: ' || bm_description_md5.value
298   || E'\nDescription-en\: ' || bm_description.value
299   || E'\n'
300 FROM binaries b
301   -- join tables for suite and component
302   JOIN bin_associations ba ON b.id = ba.bin
303   JOIN override_suite os ON os.id = ba.suite
304   JOIN override o ON b.package = o.package AND o.suite = os.overridesuite_id AND o.type = (SELECT id FROM override_type WHERE type = 'deb')
305
306   -- join tables for Description and Description-md5
307   JOIN binaries_metadata bm_description ON b.id = bm_description.bin_id AND bm_description.key_id = (SELECT key_id FROM metadata_keys WHERE key = 'Description')
308   JOIN binaries_metadata bm_description_md5 ON b.id = bm_description_md5.bin_id AND bm_description_md5.key_id = (SELECT key_id FROM metadata_keys WHERE key = 'Description-md5')
309
310   -- we want to sort by source name
311   JOIN source s ON b.source = s.id
312
313 WHERE ba.suite = :suite AND o.component = :component
314 GROUP BY b.package, bm_description_md5.value, bm_description.value
315 ORDER BY MIN(s.source), b.package, bm_description_md5.value
316 """
317
318 def generate_translations(suite_id, component_id):
319     global _translations_query
320     from daklib.filewriter import TranslationFileWriter
321     from daklib.dbconn import DBConn, Suite, Component
322     from daklib.dakmultiprocessing import PROC_STATUS_SUCCESS
323
324     session = DBConn().session()
325     suite = session.query(Suite).get(suite_id)
326     component = session.query(Component).get(component_id)
327
328     writer_args = {
329             'archive': suite.archive.path,
330             'suite': suite.suite_name,
331             'component': component.component_name,
332             'language': 'en',
333     }
334     if suite.i18n_compression is not None:
335         writer_args['compression'] = suite.i18n_compression
336     writer = TranslationFileWriter(**writer_args)
337     output = writer.open()
338
339     r = session.execute(_translations_query, {"suite": suite_id, "component": component_id})
340     for (stanza,) in r:
341         print >>output, stanza
342
343     writer.close()
344
345     message = ["generate-translations", suite.suite_name, component.component_name]
346     session.rollback()
347     return (PROC_STATUS_SUCCESS, message)
348
349 #############################################################################
350
351 def main():
352     from daklib.config import Config
353     from daklib import daklog
354
355     cnf = Config()
356
357     Arguments = [('h',"help","Generate-Packages-Sources::Options::Help"),
358                  ('a','archive','Generate-Packages-Sources::Options::Archive','HasArg'),
359                  ('s',"suite","Generate-Packages-Sources::Options::Suite"),
360                  ('f',"force","Generate-Packages-Sources::Options::Force"),
361                  ('o','option','','ArbItem')]
362
363     suite_names = apt_pkg.parse_commandline(cnf.Cnf, Arguments, sys.argv)
364     try:
365         Options = cnf.subtree("Generate-Packages-Sources::Options")
366     except KeyError:
367         Options = {}
368
369     if Options.has_key("Help"):
370         usage()
371
372     from daklib.dakmultiprocessing import DakProcessPool, PROC_STATUS_SUCCESS, PROC_STATUS_SIGNALRAISED
373     pool = DakProcessPool()
374
375     logger = daklog.Logger('generate-packages-sources2')
376
377     from daklib.dbconn import Component, DBConn, get_suite, Suite, Archive
378     session = DBConn().session()
379     session.execute("SELECT add_missing_description_md5()")
380     session.commit()
381
382     if Options.has_key("Suite"):
383         suites = []
384         for s in suite_names:
385             suite = get_suite(s.lower(), session)
386             if suite:
387                 suites.append(suite)
388             else:
389                 print "I: Cannot find suite %s" % s
390                 logger.log(['Cannot find suite %s' % s])
391     else:
392         query = session.query(Suite).filter(Suite.untouchable == False)
393         if 'Archive' in Options:
394             query = query.join(Suite.archive).filter(Archive.archive_name==Options['Archive'])
395         suites = query.all()
396
397     force = Options.has_key("Force") and Options["Force"]
398
399
400     def parse_results(message):
401         # Split out into (code, msg)
402         code, msg = message
403         if code == PROC_STATUS_SUCCESS:
404             logger.log([msg])
405         elif code == PROC_STATUS_SIGNALRAISED:
406             logger.log(['E: Subprocess recieved signal ', msg])
407         else:
408             logger.log(['E: ', msg])
409
410     # Lock tables so that nobody can change things underneath us
411     session.execute("LOCK TABLE src_associations IN SHARE MODE")
412     session.execute("LOCK TABLE bin_associations IN SHARE MODE")
413
414     for s in suites:
415         component_ids = [ c.component_id for c in s.components ]
416         if s.untouchable and not force:
417             import daklib.utils
418             daklib.utils.fubar("Refusing to touch %s (untouchable and not forced)" % s.suite_name)
419         for c in component_ids:
420             pool.apply_async(generate_sources, [s.suite_id, c], callback=parse_results)
421             if not s.include_long_description:
422                 pool.apply_async(generate_translations, [s.suite_id, c], callback=parse_results)
423             for a in s.architectures:
424                 if a == 'source':
425                     continue
426                 pool.apply_async(generate_packages, [s.suite_id, c, a.arch_id, 'deb'], callback=parse_results)
427                 pool.apply_async(generate_packages, [s.suite_id, c, a.arch_id, 'udeb'], callback=parse_results)
428
429     pool.close()
430     pool.join()
431
432     # this script doesn't change the database
433     session.close()
434
435     logger.close()
436
437     sys.exit(pool.overall_status())
438
439 if __name__ == '__main__':
440     main()