forked from GNUsocial/gnu-social
		
	Another huge change, for PEAR code standards compliance. Function headers have to be in K&R style (opening brace on its own line), instead of having the opening brace on the same line as the function and parameters. So, a little perl magic found all the function definitions and move the opening brace to the next line (properly indented... usually). darcs-hash:20081223193323-84dde-a28e36ecc66672c783c2842d12fc11043c13ab28.gz
		
			
				
	
	
		
			58 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			58 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php
 | |
| /**
 | |
|  * Table Definition for queue_item
 | |
|  */
 | |
| require_once INSTALLDIR.'/classes/Memcached_DataObject.php';
 | |
| 
 | |
| class Queue_item extends Memcached_DataObject 
 | |
| {
 | |
|     ###START_AUTOCODE
 | |
|     /* the code below is auto generated do not remove the above tag */
 | |
| 
 | |
|     public $__table = 'queue_item';                      // table name
 | |
|     public $notice_id;                       // int(4)  primary_key not_null
 | |
|     public $transport;                       // varchar(8)  primary_key not_null
 | |
|     public $created;                         // datetime()   not_null
 | |
|     public $claimed;                         // datetime()  
 | |
| 
 | |
|     /* Static get */
 | |
|     function staticGet($k,$v=null)
 | |
|     { return Memcached_DataObject::staticGet('Queue_item',$k,$v); }
 | |
| 
 | |
|     /* the code above is auto generated do not remove the tag below */
 | |
|     ###END_AUTOCODE
 | |
| 
 | |
|     function sequenceKey()
 | |
|     { return array(false, false); }
 | |
|     
 | |
|     static function top($transport) {
 | |
| 
 | |
|         $qi = new Queue_item();
 | |
|         $qi->transport = $transport;
 | |
|         $qi->orderBy('created');
 | |
|         $qi->whereAdd('claimed is null');
 | |
| 
 | |
|         $qi->limit(1);
 | |
| 
 | |
|         $cnt = $qi->find(TRUE);
 | |
| 
 | |
|         if ($cnt) {
 | |
|             # XXX: potential race condition
 | |
|             # can we force it to only update if claimed is still null
 | |
|             # (or old)?
 | |
|             common_log(LOG_INFO, 'claiming queue item = ' . $qi->notice_id . ' for transport ' . $transport);
 | |
|             $orig = clone($qi);
 | |
|             $qi->claimed = common_sql_now();
 | |
|             $result = $qi->update($orig);
 | |
|             if ($result) {
 | |
|                 common_log(LOG_INFO, 'claim succeeded.');
 | |
|                 return $qi;
 | |
|             } else {
 | |
|                 common_log(LOG_INFO, 'claim failed.');
 | |
|             }
 | |
|         }
 | |
|         $qi = null;
 | |
|         return null;
 | |
|     }
 | |
| }
 |