<?php
/**
 * Generic Backup Script.
 * 
 * To configure this script for your purposes, just edit the parameters below.
 * Once you have the parameters set properly, when the script executes, it will
 * create an archive file, gzip it, and e-mail it to the address specified.  It
 * can be executed through cron with the command
 * 
 * php -q [name of script]
 * 
 * You are free to use this, modify it, copy it, etc.  However, neither DJS
 * Consulting nor Daniel J. Summers assume any responsibility for good or bad
 * things that happen when modifications of this script are run.
 * 
 * @author Daniel J. Summers <daniel@djs-consulting.com>
 */
 
// --- SCRIPT PARAMETERS ---
 
/*  -- File Name --
	This is the name of the file that you're backing up, and should contain no
	slashes.  For example, if you're backing up a database, this might look
	something like...
$sFilename = "backup-my_database_name-" . date("Y-m-d") . ".sql"; */
$sFilename = "backup-[whatever-it-is]-" . date("Y-m-d") . ".[extension]";
 
/*  -- E-mail Address --
	This is the e-mail address to which the message will be sent. */
$sEmailAddress = "[your e-mail address]";
 
/*  -- E-mail Subject --
	This is the subject that will be on the e-mail you receive. */
$sEmailSubject = "[something meaningful]";
 
/*  -- E-mail Message --
	This is the text of the message that will be sent. */
$sMessage = "Compressed database backup file $sFilename.gz attached.";
 
/*  -- Backup Command --
	This is the command that does the work.
 
	A note on the database commands - your setup likely requires a password
	for these commands, and they each allow you to pass a password on the
	command line.  However, this is very insecure, as anyone who runs "ps" can
	see your password!  For MySQL, you can create a ~/.my.cnf file - it is
	detailed at http://dev.mysql.com/doc/refman/4.1/en/password-security.html .
	For PostgreSQL, the file is ~/.pgpass, and it is detailed at
	http://www.postgresql.org/docs/8.0/interactive/libpq-pgpass.html .  Both of
	these files should be chmod-ded to 600, so that they can only be viewed by
	you, the creator.
 
	That being said, some common commands are...
 
- Backing Up a MySQL Database
$sBackupCommand = "mysqldump -u [user_name] [db_name] > $sFilename";
 
- Backing Up a PostgreSQL Database
$sBackupCommand = "pg_dump [db_name] -h localhost -U [user_name] -d -O > $sFilename";
 
- Backing Up a set of files (tar and gzip)
$sBackupCommand = "tar cvf $sFilename [directory]/*";
 
Whatever command you use, this script appends .gz to the filename after the command is executed.  */
$sBackupCommand = "[a backup command]";
 
// --- END OF SCRIPT PARAMETERS ---
//
// Edit below at your own risk.  :)
 
// Do the backup.
$sResult = passthru($sBackupCommand . "; gzip $sFilename");
$sFilename .= ".gz";
 
// Create the message.
$sMessage = "Compressed database backup file $sFilename attached.";
$sMimeBoundary = "<<<:" . md5(time());
$sData = chunk_split(base64_encode(implode("", file($sFilename))));
 
$sHeaders = "From: $sEmailAddress\r\n"
		. "MIME-Version: 1.0\r\n"
		. "Content-type: multipart/mixed;\r\n"
		. " boundary=\"$sMimeBoundary\"\r\n";
 
$sContent = "This is a multi-part message in MIME format.\r\n\r\n"
		. "--$sMimeBoundary\r\n"
		. "Content-Type: text/plain; charset=\"iso-8859-1\"\r\n"
		. "Content-Transfer-Encoding: 7bit\r\n\r\n"
		. $sMessage."\r\n"
		. "--$sMimeBoundary\r\n"
		. "Content-Disposition: attachment;\r\n"
		. "Content-Type: Application/Octet-Stream; name=\"$sFilename\"\r\n"
		. "Content-Transfer-Encoding: base64\r\n\r\n"
		. $sData."\r\n"
		. "--$sMimeBoundary\r\n";
 
// Send the message.
mail($sEmailAddress, $sEmailSubject, $sContent, $sHeaders);
 
// Delete the file - we don't need it any more.
unlink($sFilename);
?>

CREATE TABLE volunteer (
    vol_id  integer  NOT NULL,
    vol_last_name  varchar(50)  NOT NULL,
    ...etc...
  PRIMARY KEY (vol_id)
);
 
CREATE TABLE r_volunteer_area (
    rva_id  integer  NOT NULL,
    rva_description  varchar(255)  NOT NULL,
  PRIMARY KEY (rva_id)
);
 
CREATE TABLE volunteer_area (
    va_volunteer_id  integer  NOT NULL,
    va_area_id  integer  NOT NULL,
  PRIMARY KEY (va_volunteer_id, va_area_id),
  FOREIGN KEY (va_volunteer_id) REFERENCES volunteer (vol_id),
  FOREIGN KEY (va_area_id) REFERENCES r_volunteer_area (rva_id)
);

<input type="checkbox" name="area[]" id="chkArea1" value="1" />
<label for="chkArea1">Do Something</label><br />
<input type="checkbox" name="area[]" id="chkArea7" value="7" />
<label for="chkArea7">Do Something Else</label>

/**
 * STEP 1
 *    Create a comma-delimited list of IDs.
 */
 
// Quote will return the string as '2,3,4' - since we're using this
// as an IN clause of integers, we'll strip the quotes off.
$sAreas = $pdo->quote(join(",", $_POST["area"]));
$sAreas = substr($sAreas, 1, strlen($sAreas) - 1);
 
// Quote the volunteer ID.
$iVol = $pdo->quote($_POST["vol"], PDO::PARAM_INT);
 
/**
 * STEP 2
 *    Delete the IDs that are no longer in the list.
 */
$dbService->executeCommand(
    "DELETE FROM volunteer_area
    WHERE   va_volunteer_id = ?
        AND va_area_id NOT IN ($sAreas)",
    array($iVol);
 
/**
 * STEP 3
 *    Insert the IDs that are not yet in the list.
 */
$dbService->executeCommand(
    "INSERT INTO volunteer_area
        SELECT $iVol, rva_id
        FROM r_volunteer_area
        WHERE   rva_id IN ($sAreas)
            AND rva_id NOT IN
            (SELECT va_area_id
            FROM volunteer_area
            WHERE va_volunteer_id = ?)",
    array($iVol));

// Assume this returns an associative array of IDs.
$aUpdates = $dbService->performSelect(
    "SELECT va_area_id
    FROM volunteer_area
    WHERE   va_volunteer_id = ?
        AND va_area_id IN ($sAreas)",
    array($iVol));
 
foreach($_POST["area"] as $iArea) {
    if (in_array($iArea, $aUpdates)) {
        // Update the table
        ...etc...
    }
    else {
        // Insert into the table
        ...etc...
    }
}

CREATE TABLE clob_xfer_area
(
  cxa_pk      NUMBER(12),
  cxa_number  NUMBER(12),
  cxa_text    VARCHAR2(4000 byte)
);
ALTER TABLE clob_xfer_area add
(
  constraint pk_cxa_id
    primary key (cxa_pk, cxa_number)
);

SET serveroutput ON size 1000000
SET lines 1000
SET pages 0
SET tab off
SET feedback ON
 
CREATE OR REPLACE
PROCEDURE break_clobs_apart
IS
 
  v_line_number   NUMBER(3);
  v_text_piece    VARCHAR2(4000);
  v_total_length  NUMBER(12);
 
  CURSOR clob_cur IS
    SELECT twc_pk, twc_clob_field
    FROM   table_with_clob;
 
BEGIN /* { */
 
  FOR clob_rec IN clob_cur LOOP /* { */
 
    v_total_length := 1;
    v_line_number  := 0;
 
    WHILE (v_total_length <=
           DBMS_LOB.GETLENGTH(clob_rec.twc_clob_field)) LOOP /* { */
 
      v_line_number := v_line_number + 1;
      v_text_piece := DBMS_LOB.SUBSTR(clob_rec.twc_clob_field,
        3999, v_total_length);
      v_total_length := v_total_length + 3999;
 
      INSERT INTO clob_xfer_area (
        cxa_pk,
        cxa_number,
        cxa_text
      )
        VALUES (
          clob_rec.twc_pk, -- cxa_pk
          v_line_number,   -- cxa_number
          v_text_piece     -- cxa_text
        );
 
    END LOOP; /* } of while */
 
  END LOOP; /* } of clob_cur */
 
END; /* } of procedure break_clobs_apart */

SET serveroutput ON size 1000000
SET lines 1000
SET pages 0
SET feedback ON
SET tab off
 
CREATE OR REPLACE
PROCEDURE put_clobs_together
IS
  v_new_clob   clob;
 
  CURSOR pk_cur IS
    SELECT DISTINCT cxa_pk
    FROM   clob_xfer_area;
 
  CURSOR piece_cur(p_cxa_pk NUMBER) IS
    SELECT cxa_text
    FROM   clob_xfer_area
    WHERE  cxa_pk = p_cxa_pk
    ORDER BY cxa_number;
 
BEGIN /* { */
 
  FOR pk_rec IN pk_cur LOOP /* { */
 
    DBMS_LOB.CREATETEMPORARY(v_new_clob, TRUE);
    DBMS_LOB.OPEN(v_new_clob, DBMS_LOB.LOB_READWRITE);
 
    FOR piece_rec IN piece_cur(pk_rec.cxa_pk) LOOP /* { */
 
      DBMS_LOB.WRITEAPPEND(v_new_clob, LENGTH(piece_rec.cxa_text),
        piece_rec.cxa_text);
 
    END LOOP;  /* } of piece_cur */
 
    DBMS_LOB.CLOSE(v_new_clob);
 
    UPDATE dest_table_with_clob
      SET  migrated_clob = v_new_clob
      WHERE dtwc_pk = pk_rec.cxa_pk;
 
  END LOOP; /* } of pk_cur */
 
  DELETE FROM clob_xfer_area;
 
END; /* } of procedure put_clobs_together */

SET lines 1000
SET pages 0
SET feedback ON
SET tab off
 
CREATE OR REPLACE
PROCEDURE xfer_clobs
IS
 
BEGIN /* { */
 
  break_clobs_apart@source;
  put_clobs_together;
 
END; /* } */