Roxen.git/ server/ base_server/ roxen.pike

2011-11-29

2011-11-29 17:33:49 by Anders Johansson <anders@roxen.com>

• 5171b162e2b83a52bbbf823f251a4fb9c60d76d9 (32 lines) (+25/-7) ^{[ Show | Annotate ]}
  Branch: 5.2

Altered index on image cache to speed up flush select query.
Also added IMG_CACHE_DEBUG flag for printing info without DEBUG.

Rev: server/base_server/roxen.pike:1.1093

6:   // Per Hedbor, Henrik Grubbström, Pontus Hagland, David Hedbor and others.   // ABS and suicide systems contributed freely by Francesco Chemolli    - constant cvs_version="$Id: roxen.pike,v 1.1092 2011/11/23 10:12:46 grubba Exp $"; + constant cvs_version="$Id: roxen.pike,v 1.1093 2011/11/29 17:33:49 anders Exp $";      //! @appears roxen   //!
4035:    //! that time are flushed.    {    int num; - #ifdef DEBUG + #if defined(DEBUG) || defined(IMG_CACHE_DEBUG)    int t = gethrtime();    report_debug("Cleaning "+name+" image cache ... ");   #endif
4044:    rst_cache = ([]);    if( !age )    { - #ifdef DEBUG + #if defined(DEBUG) || defined(IMG_CACHE_DEBUG)    report_debug("cleared\n");   #endif    QUERY( "DELETE FROM "+name );
4061:    while(q<sizeof(ids)) {    string list = map(ids[q..q+99], get_db()->quote) * "','";    q+=100; -  QUERY( "DELETE FROM "+name+" WHERE id in ('"+list+"')" ); +  QUERY( "DELETE LOW_PRIORITY FROM "+name+" WHERE id in ('"+list+"')" );    }      #if 0
4076: Inside #if 0
   // Old versions of Mysql lacks OPTIMIZE. Not that we support    // them, really, but it might be nice not to throw an error, at    // least. - #ifdef DEBUG + #if defined(DEBUG) || defined(IMG_CACHE_DEBUG)    report_debug("Optimizing database ... ", name);   #endif    QUERY( "OPTIMIZE TABLE "+name );    };   #endif    - #ifdef DEBUG + #if defined(DEBUG) || defined(IMG_CACHE_DEBUG)    report_debug("%s removed (%dms)\n",    (num==-1?"all":num?(string)num:"none"),    (gethrtime()-t)/1000);
4402:    "atime INT UNSIGNED NOT NULL DEFAULT 0,"    "meta MEDIUMBLOB NOT NULL DEFAULT '',"    "data MEDIUMBLOB NOT NULL DEFAULT ''," -  "INDEX atime (atime)" +  "INDEX atime_id (atime, id)"    ")" );    } -  +  +  // Create index in old databases. Index is used when flushing old +  // entries. Column 'id' is included in index in order to avoid +  // reading data file. +  array(mapping(string:mixed)) res = QUERY("SHOW INDEX FROM " + name); +  if(search(res->Key_name, "atime_id") < 0) { +  report_debug("Updating " + name + " image cache: " +  "Adding index atime_id on %s... ", name); +  int start_time = gethrtime(); +  QUERY("CREATE INDEX atime_id ON " + name + " (atime, id)"); +  report_debug("complete. [%f s]\n", (gethrtime() - start_time)/1000000.0); +  report_debug("Updating " + name + " image cache: " +  "Dropping index atime on %s... ", name); +  start_time = gethrtime(); +  QUERY("DROP INDEX atime ON " + name); +  report_debug("complete. [%f s]\n", (gethrtime() - start_time)/1000000.0);    } -  +  }       Sql.Sql get_db()    {