/[dehs]/trunk/dehs_pg.php
ViewVC logotype

Diff of /trunk/dehs_pg.php

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 42 by evaso-guest, Sat Oct 28 21:09:52 2006 UTC revision 43 by evaso-guest, Wed Mar 28 23:54:07 2007 UTC
# Line 168  pg_exec($db, "CREATE UNIQUE INDEX idxbis Line 168  pg_exec($db, "CREATE UNIQUE INDEX idxbis
168          # 1 Pacchetto - 2 versione - 3 np - 4 Directory - 5 md5          # 1 Pacchetto - 2 versione - 3 np - 4 Directory - 5 md5
169                  $regexp="/Package:\s($initial.*)[^a]Binary:\s(.+)[^a]Version:\s(\d+:)?(.+)[^a]Priority.+Maintainer:.+<([^>]+)>[^a].+Directory:\s(.+)[^a]Files:.+\s(\S+)\s(\d+)\s" . '\1\S+' . "\.diff\.gz[^a](Uploaders:\s(.+)[^a])?/Ssi";                  $regexp="/Package:\s($initial.*)[^a]Binary:\s(.+)[^a]Version:\s(\d+:)?(.+)[^a]Priority.+Maintainer:.+<([^>]+)>[^a].+Directory:\s(.+)[^a]Files:.+\s(\S+)\s(\d+)\s" . '\1\S+' . "\.diff\.gz[^a](Uploaders:\s(.+)[^a])?/Ssi";
170                  $zp = gzopen($filename, "r") or die("Could not open $filename");                  $zp = gzopen($filename, "r") or die("Could not open $filename");
171                          $extracted=tempnam("/tmp", "$dist_$section_Sources");                          $extracted=tempnam("/tmp/", "$dist_$section_Sources");
172                          exec("gzip -c -d $filename > $extracted");                          exec("gzip -c -d $filename > $extracted");
173                          $sourcesize=filesize($extracted);                          $sourcesize=filesize($extracted);
174                          unlink($extracted);                          unlink($extracted);
# Line 467  function keep_remote ($localfile,$remote Line 467  function keep_remote ($localfile,$remote
467                  return false;                  return false;
468                  }                  }
469          $lfp = fopen ($localfile, "w");          $lfp = fopen ($localfile, "w");
470          ini_set ( "memory_limit", "100M");  #       ini_set ( "memory_limit", "100M");
471          while ($data = fread($rfp, 1024*8)) {          while (!feof($rfp)) {
472          $bytes+=1024*8;                  $data = fread($rfp, 1024);
473          #print "Downlaoding $remotefile: $bytes\r";                  $bytes+=1024;
474          fwrite($lfp, $data);                  #print "Downlaoding $remotefile: $bytes\r";
475                    fwrite($lfp, $data);
476          }          }
477          ini_set ( "memory_limit", "15M");  #       ini_set ( "memory_limit", "15M");
478          fclose($lfp);          fclose($lfp);
479          fclose($rfp);          fclose($rfp);
480    
# Line 486  function up_changes($src_name='%') { Line 487  function up_changes($src_name='%') {
487      $rsql=pg_exec($db, "SELECT id,up_url FROM pkgs WHERE up_url!=''  AND keep_changes='t' AND name LIKE '$src_name%'");      $rsql=pg_exec($db, "SELECT id,up_url FROM pkgs WHERE up_url!=''  AND keep_changes='t' AND name LIKE '$src_name%'");
488          $tot=pg_numrows($rsql);          $tot=pg_numrows($rsql);
489          while ($res_array=pg_fetch_array($rsql)) {          while ($res_array=pg_fetch_array($rsql)) {
490                      $localfile=tempnam("/tmp", "dehs-" . $res_array[id] . ".tar.gz");                      $localfile=tempnam("/tmp/", "dehs-" . $res_array[id] . ".tar.gz");
491                          #print "I'm downloading $res_array[up_url]\r";                          #print "I'm downloading $res_array[up_url]\r";
492                          $res=keep_remote($localfile,$res_array['up_url']);                          $res=keep_remote($localfile,$res_array['up_url']);
493                          #print "UPDATE pkgs SET up_changes='', keep_changes='f' WHERE id=$res_array[id]";                          #print "UPDATE pkgs SET up_changes='', keep_changes='f' WHERE id=$res_array[id]";
# Line 526  function up_changes($src_name='%') { Line 527  function up_changes($src_name='%') {
527  }  }
528  function uscan_foo($name,$version,$watch){  function uscan_foo($name,$version,$watch){
529      global $base;      global $base;
530      $tmpnam=tempnam('/tmp', $name.'_watch');      $tmpnam=tempnam('/tmp/', $name.'_watch');
531      $fw=fopen($tmpnam,"w");      $fw=fopen($tmpnam,"w");
532    
533          fwrite($fw,$watch);          fwrite($fw,$watch);
534          fclose($fw);          fclose($fw);
535      $uscan_res=shell_exec($base . "uscan --dehs --package $name --upstream-version " . vers_conv($version) . " --watchfile $tempnam 2>/dev/null 2>&1");      $uscan_res=shell_exec($base . "uscan --dehs --package $name --upstream-version " . vers_conv($version) . " --watchfile $tmpnam 2>/dev/null 2>&1");
536      unlink($tempnam);      unlink($tmpnam);
537          $p = xml_parser_create();          $p = xml_parser_create();
538          xml_parse_into_struct($p, $uscan_res, $vals, $index);          xml_parse_into_struct($p, $uscan_res, $vals, $index);
539          xml_parser_free($p);          xml_parser_free($p);
# Line 590  function watch_fill($src_name='%'){ Line 591  function watch_fill($src_name='%'){
591          while ($res_array=pg_fetch_array($rsql)) {          while ($res_array=pg_fetch_array($rsql)) {
592                  if (substr($res_array["name"],0,3)=='lib') $initial=substr($res_array["name"],0,4);                  if (substr($res_array["name"],0,3)=='lib') $initial=substr($res_array["name"],0,4);
593                  else $initial=substr($res_array["name"],0,1);                  else $initial=substr($res_array["name"],0,1);
594                  $url="http://packages.debian.net/changelogs/pool/" .                  $url="http://packages.debian.org/changelogs/pool/" .
595                  $res_array["section"] . "/" .                  $res_array["section"] . "/" .
596                  $initial . "/" .                  $initial . "/" .
597                  $res_array["name"] ."/" .                  $res_array["name"] ."/" .
# Line 599  function watch_fill($src_name='%'){ Line 600  function watch_fill($src_name='%'){
600                  $contents=@file_get_contents($url) or '';                  $contents=@file_get_contents($url) or '';
601                  $space='';                  $space='';
602                  if (!$contents) {                  if (!$contents) {
603                          $url="http://packages.debian.net/changelogs/pool/" .                          $url="http://packages.debian.org/changelogs/pool/" .
604                          $res_array["section"] . "/" .                          $res_array["section"] . "/" .
605                          $initial . "/" .                          $initial . "/" .
606                          $res_array["name"] ."/" .                          $res_array["name"] ."/" .
# Line 778  db_add(); Line 779  db_add();
779  keep_popcon();  keep_popcon();
780  db_popcon();  db_popcon();
781  keep_diff();  keep_diff();
782  db_up_error();  #db_up_error();
783  db_upstream();  db_upstream();
784  watch_fill();  watch_fill();
785  up_changes();  up_changes();
Legend:
Removed from v.42  
changed lines
  Added in v.43
  ViewVC Help
Powered by ViewVC 1.1.5