App-SocialCalc-Multiplayer
view release on metacpan or search on metacpan
Makefile.PL
MANIFEST This list of files
META.yml
Multiplayer.pm
README
socialcalc-multiplayer.pl
socialcalc/app.psgi
socialcalc/Changes.txt
socialcalc/docs/hopscotch-yapctiny.txt
socialcalc/formatnumber2.js
socialcalc/formula1.js
socialcalc/images/sc-1x1.gif
socialcalc/images/sc-aligncenter.gif
socialcalc/images/sc-alignleft.gif
socialcalc/images/sc-alignright.gif
socialcalc/images/sc-bordersoff.gif
socialcalc/images/sc-borderson.gif
socialcalc/images/sc-chooserarrow.gif
socialcalc/images/sc-commentbg.gif
socialcalc/images/sc-copy.gif
socialcalc/images/sc-cursorinsertleft.gif
socialcalc/images/sc-delete.gif
socialcalc/images/sc-deletecol.gif
socialcalc/images/sc-deleterow.gif
socialcalc/images/sc-divider1.gif
socialcalc/images/sc-drag-handles.gif
socialcalc/images/sc-drag-handles.png
socialcalc/images/sc-endcap-h.gif
socialcalc/images/sc-endcap-v.gif
socialcalc/images/sc-filldown.gif
socialcalc/images/sc-fillright.gif
socialcalc/images/sc-formuladialog.gif
socialcalc/images/sc-insertcol.gif
socialcalc/images/sc-insertrow.gif
socialcalc/images/sc-less-hd.gif
socialcalc/images/sc-less-hh.gif
socialcalc/images/sc-less-hn.gif
socialcalc/images/sc-less-vd.gif
socialcalc/images/sc-less-vh.gif
socialcalc/images/sc-less-vn.gif
socialcalc/images/sc-linkdialog.gif
socialcalc/images/sc-linkout.gif
socialcalc/Changes.txt view on Meta::CPAN
Fixed bug with clicking on cell below stuff not rendered yet.
2008-01-11:
Added more set commands
2008-01-14:
Moved to SocialCalcJSv2 hierarchy for revision control
Changed programs to use new hierarchy, e.g., image/ and data/
2008-01-15,16,17,18:
Created formula1.js to parse and execute formulas.
Added start of RecalcSheet to socialcalc-2.js.
2008-01-21:
Implemented function scaffolding.
Added range support to formulas.
Implemented series functions, including SUM, etc.
Fixed OLPC Fn key bug.
2008-01-23:
SocialCalc2Demo command/slist control.
Better keyboard focus handling when document window loses focus (passThru).
Added Home key to MoveECellWithKey.
Added multi-line to ExecuteSheetCommand, Parse class.
2008-01-24:
socialcalc/Changes.txt view on Meta::CPAN
2008-02-02:
Made clipboard global to SocialCalc object.
Updated simpleedit8.pl to have command list of socialcalc2demo1
2008-02-05:
Added merge and unmerge commands.
Added insertcol/row commands.
2008-02-06:
Added deletecol/row commands.
Added special values to formula parsing, like #REF!.
2008-02-07:
Added licensing information, breaking out socialcalctableeditor.js.
Released as version 0.6.
2008-02-08:
Changed URLs to be specific for About details and Attribution.
Bumped to 0.6.1
2008-02-09:
Removed substr(-numbers), which are not handled correctly by IE, in formula1.js, formatnumber2.js.
Fixed a bug with "+coord" - changed "sheetdata" to "sheet".
2008-02-10:
Made UI Sugar-like with more tabs, grayscale scrollbars.
2008-02-11:
Added ConvertSaveToOtherFormat and ConvertOtherFormatToSave to give multiple clipboard views
2008-02-13:
Added sort command.
socialcalc/Changes.txt view on Meta::CPAN
2008-03-10:
Replaced cursor use of editor.ReplaceCell with editor.UpdateCellCSS for speedup.
2008-03-12:
Made 702 maximum number of columns (ZZ) for number to characters.
2008-03-14:
First implementation of socialcalcspeadsheetcontrol.js.
2008-03-20:
Fixed up name support in formulas, including getting names defined by formulas working.
2008-03-24:
Added SocialCalc.Formula.loadsheet for inter-sheet references.
2008-03-25:
Added comment value to cells.
Finished other places that were waiting for names or sheet references.
2008-03-27:
Added SaveEditorSettings and LoadEditorSettings.
2008-04-01:
Added tabs and views lists to SpreadsheetControl.
Tried rudimentary "audit" tab.
2008-04-03:
Finished audit tab and comment tab.
2008-04-04:
Changed formula parsing to allow "." inside alpha and made "_" alpha.
Added name commands to socialcalc-3.js.
Started and Names tab.
2008-04-05:
Finished Names tab.
2008-04-07:
Added SpreadsheetControlCreateSpreadsheetSave and DecodeSpreadsheetSave,
along with multipart-mime save format.
Fixed SocialCalc.SizeSSDiv: this.requestedHeight/Width => spreadsheet.requested...
socialcalc/Changes.txt view on Meta::CPAN
2008-04-14:
Changed rowneedsrefresh in scroll up/down one row to be object instead of array for Prototype compatibility.
Added SocialCalc.SpreadsheetControlCreateCellHTML and SocialCalc.SpreadsheetControlCreateCellHTMLSave.
2008-04-16:
Fixed SocialCalc.Formula.OperandAsSheetName not handling coords and names to get sheet name.
2008-04-17:
Keyboard handing: Fixed initial "[" being ignored, backspace passing through to browser at top level (now treated as delete).
Fixed sheetname!range_name not working and numerous other sheetname! bugs.
Fixed handling of space after coord in formula.
If SocialCalc.Formula.SheetCache.loadsheet returns null, an error is displayed in addition to #REF!.
2008-04-18:
Added dorecalc argument to SocialCalc.ConvertSaveToOtherFormat.
2008-04-21:
Added editor.SettingsCallbacks.
Added named ranges to Sort.
2008-04-23:
socialcalc/Changes.txt view on Meta::CPAN
Added more SocialCalc.Constants.
Added optional IDs on table control elements.
Fixed double-click outside grid bug.
2008-05-04:
Added optional styles for table control elements.
Moved table control repeat settings to constants.
Made thumbstatus settings skinnable with constants.
2008-05-05:
More constants: The rest of socialcalctableeditor.js, formatnumber2.js, and some of formula1.js.
2008-05-06:
More constants: The rest of formula1.js and HighlightTypes for cursor and range.
Fixed recent bug with unable to click inside of input box.
Fixed -1 1/2 => -0.5 bug.
2008-05-09:
Mostly finished InputBox/InputEcho stuff.
Fixed SocialCalc.intFunc bug which led to 2/3/08 (all Feb) being wrong.
2008-05-11:
Fixes some "event" references that should have been "e" in socialcalctableeditor.js.
Made InputEcho draggable.
Added SocialCalc.ResizeTableEditor.
2008-05-12:
Finish up InputBox stuff, handling no change, clicking during partialexpr, etc.
Added editor.DisplayCellContents() to be used to keep formula bar up to date
Fixed some bugs with reporting errors in formulas detected during parsing
2008-05-13:
Fixed a focus outside the table editor bug with the input box.
Added ID to inputEcho.
2008-05-20:
Continued work on SettingsControls objects, including adding the ColorDropdown and CustomDropdown.
Fixed some bugs with sizing of the non-main views.
2008-05-21,22:
socialcalc/Changes.txt view on Meta::CPAN
2008-11-26:
Updated simpleedit14.pl
Fixed some IE bugs with SocialCalc.SpreadsheetControlDecodeSpreadsheetSave with ^$
2008-11-29:
Fixed row hide setting load bug (typo).
2008-12-01:
Made simpleedit14.pl do server-side wikitext expansion differently than client-side.
Fixed bug with formula bar not being updated after commands (and at load).
Fixed bug with commands being executed during cell edit.
2008-12-04:
Made General format round to a maximum precision to lessen floating point artifacts.
2008-12-09:
Added editor.ctrlkeyFunction, including Ctrl-V handling.
Added embedded newline support to csv and tab format conversion.
2008-12-10:
socialcalc/Changes.txt view on Meta::CPAN
Continued fixing bugs in socialcalcpopup.js and adding features.
2009-02-25:
Moved spreadsheetcontrol button and tab styles to SocialCalc.Constants to make skinning easier.
2009-03-10:
Made socialcalc2demo10.
Made socialcalcserver.pl use all filenames and have settings file.
2009-03-19:
Added function arg_def, func_def, and func_class to formula1.js and socialcalcconstants.js.
Added definitions to all functions.
Added function information routines FillFunctionInfo and FunctionArgString.
Added prompt to InputEcho to show function argument prompts.
Added function list dialog to ssctrltest1.html.
Added SocialCalc.EditorAddToInput for pasting function starts, etc.
2009-03-23:
Added formula bar buttons to socialcalcspreadsheetcontrol.js.
Moved function list as a formula bar button in socialcalcspreadsheetcontrol.js.
Added Multi-line input box dialog and support.
2009-03-24:
Tuned multi-line input to handle disabling inputbox when editing and when multi-line cell content.
Added SocialCalc.Formula.FreshnessInfo to help determine if calculations are out of date.
2009-04-01:
Fixed bug with maxUndo that messed up audit. Now have maxRedo, too.
2009-04-15:
socialcalc/Changes.txt view on Meta::CPAN
Fixed maxUndo/maxRedo to have maxRedo be the max size of stack and maxUndo is max undoable, and various undo bugs.
Fixed bugs with queuing up commands.
Set default maxUndo to 50.
Fixed bug that made some typeahead be lost.
Changed statusline total to use formatNumberWithFormat with [,]General format to clean up rounding, and add commas.
2009-05-17:
Changed Ctrl-V to do just a Paste Formulas, not Paste All.
2009-05-18:
Added Ctrl-X to be like Ctrl-C with Cut formulas instead of copy, made Ctrl-C use EditorScheduleSheetCommands.
2009-05-19:
Hide ssctrl1.html extra buttons, added sample minimal Sum and Sum2 Button code.
Updated EditorAddToInput to erase any pointing partial expressions.
2009-05-21:
Changed ctrl-v to paste in upper left if has range.
2009-05-22:
Changed dragging vertical thumb to display part of each proposed new top row. New constants, etc.
2009-05-28:
Wrote CreateCSV routine in Perl in socialcalcserverX.pl.
2009-05-31:
Moved sum button into socialcalcspreadsheetcontrol.js as additional formula bar button.
2009-06-01:
Made OLPC version's graphing more modular, and save.
Fixed bug in sort settings save.
Added SocialCalc.Callbacks.NormalizeSheetName to socialcalc-3.js and formula1.js.
Moved CreateCSV into SocialCalcServersideUtilities.pm.
2009-06-09:
Fixed Safari bug with detecting partial formulas for prompt.
Fixed bugs with conditionals in formats. Issues converting from Perl...
Merged SocialCalcServersideFormatting.pm back into ServersideUtilities.pm.
Fixed bug in js and Perl with missing "=" comparison in conditional custom formats.
Added temporary Ctrl-S for setting custom numeric formats.
2009-06-11:
Added "cmd:" prefix option to Ctrl-S for manually issuing commands.
Fixed bug in VLOOKUP argument prompt.
2009-06-14:
socialcalc/Changes.txt view on Meta::CPAN
2009-09-09:
Added sampleWidth, sampleHeight, backgroundImage, backgroundImageDefault, and backgroundImageDisabled to color chooser attribs.
2009-09-23:
Added ensureWithin to socialcalcpopup.js.
Changed cursor position detection a bit in color chooser.
Made border color chooser moveable.
Fixed "-", ".", "e1" and other things being considered a number on input.
2009-10-21:
Added text subtype "tr" (text rich) to formula1.js TypeLookupTable and to socialcalc3.js format_text_for_display
2009-11-02:
Minor change to SocialCalc.special_chars to clean up regex. Not a bug, but a minor performance thing.
2009-11-03:
Added text format Wikitext to SCFormatTextFormats in socialcalcconstants.js
2009-12-02:
Added missing // to socialcalcspreadsheetcontrol.js setting of tabBackground.
Set minOK to 0 just in case in formatnumber2.js.
2010-01-14:
Changed socialcalctableeditor.js to do auto-repeat in drag select.
Made formula editing reset position of InputEcho after pointing in case cell position has changed.
Added beginning of SocialCalc.CellHandles to socialcalctableeditor.js. Had test code, but now just returns.
2010-02-09:
Fixed bug where undo stack didn't always set changedrendervalues so moves/pastes/etc of merged cells messed up display
2010-03-23:
Finished changes to add editor.noEdit to socialcalctableeditor.js, including
fixing thumb dragging to better handle mouse out of window, handling no socialcalcspreadsheetcontrol.js,
etc.
socialcalc/Changes.txt view on Meta::CPAN
Handle bad settings
Make sure insert/delete row/col and move handle name coord changing undo, especially wrt #REF!.
Need some way to abort recalc -- like pressing Esc?
Limit undo size?
1 row scroll of high cells doesn't update row height values or something -
scroll in Merges and Scrolling when 2 panes -- may be dragging when scrolled
doesn't know trying to set too far: check test
Bug in SocialCalc.pm: adjust_formula_coords refs to deleted cells -- doesn't handle multiple
Bug in Sheet.pm: test_criteria tests "value" instead of "type" for left error
Check SheetFunctions.pm: Dseries with criteria of "0" -- checks for blank as !criteria, not length
Also, see double testcol setting.
INDEX function (and range return from evaluate polish) does not handle other sheets.
Make DecodeRangeParts get that stuff to make it easy?
Bug in SheetFunctions.pm: StringFunctions error doesn't return right away
RIGHT has -1 args?
InterestFunctions: should be -3 args?
IRR check for values?
Bug in Sheet.pm: evaluate_parsed_formula return of range doesn't swap sheetname!coord
Sheet.ResetSheet doesn't seem to work well -- it does not recalc or redisplay well afterward
socialcalc/SocialCalcServersideUtilities.pm view on Meta::CPAN
# SHEET DATA FORMAT
#
# When parsed, the sheet is stored in a sheet data structure.
# The structure is a hash with a format as follows:
#
# Cells:
#
# The sheet's cell data is stored as the value of the "cells" key.
# The $sheet{cells} value is a hash with cell coordinates as keys
# and a hash with the cell attributes as the value. For example,
# $sheet{cells}{A1}{formula} might have a value of "SUM(A1:A10)".
#
# Not all cells need an entry nor a data structure. If they are blank and use
# default values for their attributes, then they need not be present.
#
# Cell data is stored in a hash with the following "key: value" pairs:
#
# coord: the column/row as a string, e.g., "A1"
# datavalue: the value to be used for computation and formatting for display,
# string or numeric (tolerant of numbers stored as strings)
# datatype: if present, v=numeric value, t=text value, f=formula,
# or c=constant that is not a simple number (like "$1.20")
# formula: if present, the formula (without leading "=") for computation or the constant
# valuetype: first char is main type, the following are sub-types.
# Main types are b=blank cell, n=numeric, t=text, e=error
# Examples of using sub-types would be "nt" for a numeric time value, "n$" for currency, "nl" for logical
#
# The following optional values, if present, are mainly used in rendering, overriding defaults:
#
# bt, br, bb, bl: number of border's definition
# layout: layout (vertical alignment, padding) definition number
# font: font definition number
# color: text color definition number
socialcalc/SocialCalcServersideUtilities.pm view on Meta::CPAN
# defaulttextformat:format# - cell format number (alignment) for sheet default for text values
# defaultnontextformat:format# - cell format number for sheet default for non-text values (i.e., numbers)
# defaultlayout:layout# - default cell layout number in cell layout list
# defaultfont:font# - default font number in sheet font list
# defaultnontextvalueformat:valueformat# - default non-text (number) value format number in sheet valueformat list
# defaulttextvalueformat:valueformat# - default text value format number in sheet valueformat list
# defaultcolor:color# - default number for text color in sheet color list
# defaultbgcolor:color# - default number for background color in sheet color list
# circularreferencecell:coord - cell coord with a circular reference
# recalc:value - on/off (on is default). If not "off", appropriate changes to the sheet cause a recalc
# needsrecalc:value - yes/no (no is default). If "yes", formula values are not up to date
#
# The Column attributes:
# Column attributes are stored in $sheet{colattribs}.
# $sheet{colattribs}{width}{col-letter(s)}: width or blank for column
# $sheet{colattribs}{hide}{col-letter(s)}: yes/no (default is no)
#
# The Row attributes:
# Row attributes are stored in $sheet{rowattribs}.
# $sheet{rowattribs}{hide}{rownumber}: yes/no (default is no)
#
socialcalc/SocialCalcServersideUtilities.pm view on Meta::CPAN
sub ParseSheetSave {
my ($sheet, $str) = @_;
my $maxcol = 1;
my $maxrow = 1;
$sheet->{attribs}{lastcol} = 0;
$sheet->{attribs}{lastrow} = 0;
my ($linetype, $value, $coord, $type, $rest, $cell, $cr, $style, $valuetype,
$formula, $attrib, $num, $name, $desc);
while ($str =~ /([^\r\n]+)/g) {
($linetype, $rest) = split(/:/, $1, 2);
if ($linetype eq "cell") {
($coord, $type, $rest) = split(/:/, $rest, 3);
$coord =~ tr/a-z/A-Z/; # in-place; cheaper than calling uc()
$sheet->{cells}{$coord} = $cell = {
coord => $coord,
_cache_key => (
socialcalc/SocialCalcServersideUtilities.pm view on Meta::CPAN
$cell->{datavalue} = ($value =~ /\\[cnb]/) ? DecodeFromSave($value) : $value;
if (substr($valuetype,0,1) eq "n") {
$cell->{datatype} = "v";
}
else {
$cell->{datatype} = "t";
}
$cell->{valuetype} = $valuetype;
}
elsif ($style eq "vtf") {
($valuetype, $value, $formula, $type, $rest) = split(/:/, $rest, 5);
$cell->{datavalue} = ($value =~ /\\[cnb]/) ? DecodeFromSave($value) : $value;
$cell->{formula} = ($value =~ /\\[cnb]/) ? DecodeFromSave($formula) : $formula;
$cell->{datatype} = "f";
$cell->{valuetype} = $valuetype;
}
elsif ($style eq "vtc") {
($valuetype, $value, $formula, $type, $rest) = split(/:/, $rest, 5);
$cell->{datavalue} = ($value =~ /\\[cnb]/) ? DecodeFromSave($value) : $value;
$cell->{formula} = ($value =~ /\\[cnb]/) ? DecodeFromSave($formula) : $formula;
$cell->{datatype} = "c";
$cell->{valuetype} = $valuetype
}
elsif ($style eq "b") {
my ($t, $r, $b, $l);
($t, $r, $b, $l, $type, $rest) = split(/:/, $rest, 6);
$cell->{bt} = $t;
$cell->{br} = $r;
$cell->{bb} = $b;
$cell->{bl} = $l;
socialcalc/SocialCalcServersideUtilities.pm view on Meta::CPAN
}
elsif ($cell->{datatype} eq "t") {
if ($cell->{valuetype} eq "t") { # !!! should be Constants.textdatadefaulttype
$str .= ":t:$value";
}
else {
$str .= ":vt:$cell->{valuetype}:$value";
}
}
else {
my $formula = EncodeForSave($cell->{formula});
if ($cell->{datatype} eq "f") {
$str .= ":vtf:$cell->{valuetype}:$value:$formula";
}
elsif ($cell->{datatype} eq "c") {
$str .= ":vtc:$cell->{valuetype}:$value:$formula";
}
}
if ($cell->{errors}) {
$str .= ":e:" . EncodeForSave($cell->{errors});
}
my $t = $cell->{bt} || "";
my $r = $cell->{br} || "";
my $b = $cell->{bb} || "";
my $l = $cell->{bl} || "";
if ($t || $r || $b || $l) {
socialcalc/SocialCalcServersideUtilities.pm view on Meta::CPAN
$valuesubtype = substr($valuetype,1);
$valuetype = substr($valuetype,0,1);
if ($cell->{errors} || $valuetype eq "e") {
$displayvalue = ExpandMarkup($cell->{errors}, $sheet, $options) || $valuesubtype || "Error in cell";
return $displayvalue;
}
if ($valuetype eq "t") {
$valueformat = $sheet->{valueformats}->[($cell->{textvalueformat} || $sheetattribs->{defaulttextvalueformat})] || "";
if ($valueformat eq "formula") {
if ($cell->{datatype} eq "f") {
$displayvalue = SpecialChars("=$cell->{formula}") || " ";
}
elsif ($cell->{datatype} eq "c") {
$displayvalue = SpecialChars("'$cell->{formula}") || " ";
}
else {
$displayvalue = SpecialChars("'$displayvalue") || " ";
}
return $displayvalue;
}
$displayvalue = format_text_for_display($displayvalue, $cell->{valuetype}, $valueformat, $sheet, $options);
}
elsif ($valuetype eq "n") {
$valueformat = $cell->{nontextvalueformat};
if (length($valueformat) == 0) { # "0" is a legal value format
$valueformat = $sheetattribs->{defaultnontextvalueformat};
}
$valueformat = $sheet->{valueformats}->[$valueformat];
if (length($valueformat) == 0) {
$valueformat = "";
}
$valueformat = "" if $valueformat eq "none";
if ($valueformat eq "formula") {
if ($cell->{datatype} eq "f") {
$displayvalue = SpecialChars("=$cell->{formula}") || " ";
}
elsif ($cell->{datatype} eq "c") {
$displayvalue = SpecialChars("'$cell->{formula}") || " ";
}
else {
$displayvalue = SpecialChars("'$displayvalue") || " ";
}
return $displayvalue;
}
elsif ($valueformat eq "forcetext") {
if ($cell->{datatype} eq "f") {
$displayvalue = SpecialChars("=$cell->{formula}") || " ";
}
elsif ($cell->{datatype} eq "c") {
$displayvalue = SpecialChars($cell->{formula}) || " ";
}
else {
$displayvalue = SpecialChars($displayvalue) || " ";
}
return $displayvalue;
}
$displayvalue = format_number_for_display($displayvalue, $cell->{valuetype}, $valueformat);
}
else { # unknown type - probably blank
$displayvalue = " ";
socialcalc/TODO view on Meta::CPAN
02:28 < au> so in case of playing x,Y
02:28 < danb> That's the way to do it. The unwind would be done on the client.
02:28 < au> X1 -> Y1 -> X2
02:28 < au> but X says X1/X2 first because of latency
02:28 < au> then got Y1, then it needs to unwind X2 then reapply
02:28 < au> yeah, server can do that already; I'll check in client code to do that.
02:28 < au> danb++
02:29 < au> and it needs to ensure that unwind doesn't affect the undo stack, so each player's undo
stack remai nthe same
02:29 < danb> The case I though of was start edit, put in formula referring to cell. Other person
deletes row. Save edit. There are probably variations that would not fix up the
reference correctly.
02:29 < danb> Yes.
02:29 < au> (critical for Ctrl-Z to propagate correctly)
socialcalc/formula1.js view on Meta::CPAN
},
oneargnumeric: { 'n*': '|n*:n|', 'e*': '|e*:1|', 't*': '|t*:e#VALUE!|', 'b': '|b:n|'},
twoargnumeric: { 'n*': '|n*:n|t*:e#VALUE!|e*:2|', 'e*': '|e*:1|n*:1|t*:1|', 't*': '|t*:e#VALUE!|n*:e#VALUE!|e*:2|'},
propagateerror: { 'n*': '|n*:2|e*:2|', 'e*': '|e*:2|', 't*': '|t*:2|e*:2|', 'b': '|b:2|e*:2|'}
};
/* *******************
parseinfo = SocialCalc.Formula.ParseFormulaIntoTokens(line)
Parses a text string as if it was a spreadsheet formula
This uses a simple state machine run on each character in turn.
States remember whether a number is being gathered, etc.
The result is parseinfo which is an array with one entry for each token:
parseinfo[i] = {
text: "the characters making up the parsed token",
type: the type of the token (a number),
opcode: a single character version of an operator suitable for use in the
precedence table and distinguishing between unary and binary + and -.
socialcalc/formula1.js view on Meta::CPAN
}
SocialCalc.Formula.ParsePushToken = function(parseinfo, ttext, ttype, topcode) {
parseinfo.push({text: ttext, type: ttype, opcode: topcode});
}
/* *******************
result = SocialCalc.Formula.evaluate_parsed_formula(parseinfo, sheet, allowrangereturn)
Does the calculation expressed in a parsed formula, returning a value, its type, and error info
returns: {value: value, type: valuetype, error: errortext}.
If allowrangereturn is present and true, can return a range (e.g., "A1:A10" - translated from "A1|A10|")
************************* */
SocialCalc.Formula.evaluate_parsed_formula = function(parseinfo, sheet, allowrangereturn) {
var result;
var scf = SocialCalc.Formula;
var tokentype = scf.TokenType;
var revpolish;
var parsestack = [];
var errortext = "";
socialcalc/formula1.js view on Meta::CPAN
}
revpolish.push(parsestack.pop());
}
parsestack.push(i);
}
else if (ttype == tokentype.error) {
errortext = ttext;
break;
}
else {
errortext = "Internal error while processing parsed formula. ";
break;
}
}
while (parsestack.length>0) {
if (parseinfo[parsestack[parsestack.length-1]].text == '(') {
errortext = scc.s_parseerrmissingcloseparen;
break;
}
revpolish.push(parsestack.pop());
}
socialcalc/formula1.js view on Meta::CPAN
}
return revpolish;
}
//
// result = SocialCalc.Formula.EvaluatePolish(parseinfo, revpolish, sheet, allowrangereturn)
//
// Execute reverse polish representation of formula
//
// Operand values are objects in the operand array with a "type" and an optional "value".
// Type can have these values (many are type and sub-type as two or more letters):
// "tw", "th", "t", "n", "nt", "coord", "range", "start", "eErrorType", "b" (blank)
// The value of a coord is in the form A57 or A57!sheetname
// The value of a range is coord|coord|number where number starts at 0 and is
// the offset of the next item to fetch if you are going through the range one by one
// The number starts as a null string ("A1|B3|")
//
socialcalc/formula1.js view on Meta::CPAN
value1 = operand_value_and_type(sheet, operand);
value = value1.value;
tostype = value1.type;
if (tostype == "b") {
tostype = "n";
value = 0;
}
}
if (operand.length > 1 && !errortext) { // something left - error
errortext += scc.s_parseerrerrorinformula;
}
// set return type
valuetype = tostype;
if (tostype.charAt(0) == "e") { // error value
errortext = errortext || tostype.substring(1) || scc.s_calcerrerrorvalueinformula;
}
else if (tostype == "range") {
vmatch = value.match(/^(.*)\|(.*)\|/);
smatch = vmatch[1].indexOf("!");
if (smatch>=0) { // swap sheetname
vmatch[1] = vmatch[1].substring(smatch+1) + "!" + vmatch[1].substring(0, smatch).toUpperCase();
}
else {
vmatch[1] = vmatch[1].toUpperCase();
}
value = vmatch[1] + ":" + vmatch[2].toUpperCase();
if (!allowrangereturn) {
errortext = scc.s_formularangeresult+" "+value;
}
}
if (errortext && valuetype.charAt(0) != "e") {
value = errortext;
valuetype = "e";
}
// look for overflow
socialcalc/formula1.js view on Meta::CPAN
return result;
}
}
//
// value = SocialCalc.Formula.LookupName(sheet, name)
//
// Returns value and type of a named value
// Names are case insensitive
// Names may have a definition which is a coord (A1), a range (A1:B7), or a formula (=OFFSET(A1,0,0,5,1))
// Note: The range must not have sheet names ("!") in them.
//
SocialCalc.Formula.LookupName = function(sheet, name) {
var pos, specialc, parseinfo;
var names = sheet.names;
var value = {};
var startedwalk = false;
if (names[name.toUpperCase()]) { // is name defined?
value.value = names[name.toUpperCase()].definition; // yes
if (value.value.charAt(0) == "=") { // formula
if (!sheet.checknamecirc) { // are we possibly walking the name tree?
sheet.checknamecirc = {}; // not yet
startedwalk = true; // remember we are the reference that started it
}
else {
if (sheet.checknamecirc[name]) { // circular reference
value.type = "e#NAME?";
value.error = SocialCalc.Constants.s_circularnameref+' "' + name + '".';
return value;
}
}
sheet.checknamecirc[name] = true;
parseinfo = SocialCalc.Formula.ParseFormulaIntoTokens(value.value.substring(1));
value = SocialCalc.Formula.evaluate_parsed_formula(parseinfo, sheet, 1); // parse formula, allowing range return
delete sheet.checknamecirc[name]; // done with us
if (startedwalk) {
delete sheet.checknamecirc; // done with walk
}
if (value.type != "range") {
return value;
}
}
socialcalc/formula1.js view on Meta::CPAN
SocialCalc.Formula.FunctionList["SYD"] = [SocialCalc.Formula.SYDFunction, 4, "cslp", "", "financial"];
/*
#
# FV(rate, n, payment, [pv, [paytype]])
# NPER(rate, payment, pv, [fv, [paytype]])
# PMT(rate, n, pv, [fv, [paytype]])
# PV(rate, n, payment, [fv, [paytype]])
# RATE(n, payment, pv, [fv, [paytype, [guess]]])
#
# Following the Open Document Format formula specification:
#
# PV = - Fv - (Payment * Nper) [if rate equals 0]
# Pv*(1+Rate)^Nper + Payment * (1 + Rate*PaymentType) * ( (1+Rate)^nper -1)/Rate + Fv = 0
#
# For each function, the formulas are solved for the appropriate value (transformed using
# basic algebra).
#
*/
SocialCalc.Formula.InterestFunctions = function(fname, operand, foperand, sheet) {
var resulttype, result, dval, eval, fval;
var pv, fv, rate, n, payment, paytype, guess, part1, part2, part3, part4, part5;
var olddelta, maxloop, tries, deltaepsilon, rate, oldrate, m;
socialcalc/index.mt view on Meta::CPAN
<html>
<head>
<title>SocialCalc Demo</title>
<script type="text/javascript" src="socialcalcconstants.js"></script>
<script type="text/javascript" src="socialcalc-3.js"></script>
<script type="text/javascript" src="socialcalctableeditor.js"></script>
<script type="text/javascript" src="formatnumber2.js"></script>
<script type="text/javascript" src="formula1.js"></script>
<script type="text/javascript" src="socialcalcpopup.js"></script>
<script type="text/javascript" src="socialcalcspreadsheetcontrol.js"></script>
<script type="text/javascript" src="third-party/class-js/lib/Class.js"></script>
<script type="text/javascript" src="third-party/wikiwyg/lib/Document/Emitter.js"></script>
<script type="text/javascript" src="third-party/wikiwyg/lib/Document/Emitter/HTML.js"></script>
<script type="text/javascript" src="third-party/wikiwyg/lib/Document/Parser.js"></script>
<script type="text/javascript" src="third-party/wikiwyg/lib/Document/Parser/Wikitext.js"></script>
<script src="third-party/Socket.IO-node/example/json.js"></script>
<script src="socket.io/socket.io.js"></script>
<script src="player.js"></script>
socialcalc/index.mt view on Meta::CPAN
var cmd, cell, row, col, sel, cr, foundvalue;
var spreadsheet = SocialCalc.GetSpreadsheetControlObject();
var editor = spreadsheet.editor;
var sheet = editor.context.sheetobj;
if (editor.range.hasrange) {
sel = SocialCalc.crToCoord(editor.range.left, editor.range.top)+
":"+SocialCalc.crToCoord(editor.range.right, editor.range.bottom);
cmd = "set "+SocialCalc.crToCoord(editor.range.right, editor.range.bottom+1)+
" formula sum("+sel+")";
}
else {
row = editor.ecell.row - 1;
col = editor.ecell.col;
if (row<=1) {
cmd = "set "+editor.ecell.coord+" constant e#REF! 0 #REF!";
}
else {
foundvalue = false;
while (row>0) {
socialcalc/index.mt view on Meta::CPAN
if (foundvalue) {
row++;
break;
}
}
else {
foundvalue = true;
}
row--;
}
cmd = "set "+editor.ecell.coord+" formula sum("+
SocialCalc.crToCoord(col,row)+":"+SocialCalc.crToCoord(col, editor.ecell.row-1)+")";
}
}
editor.EditorScheduleSheetCommands(cmd);
}
function dosum2() {
socialcalc/simpleedit14.pl view on Meta::CPAN
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
"http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>Simple Page Editor With Spreadsheets $versionstr</title>
<script type="text/javascript" src="${jsdir}socialcalcconstants.js"></script>
<script type="text/javascript" src="${jsdir}socialcalc-3.js"></script>
<script type="text/javascript" src="${jsdir}socialcalctableeditor.js"></script>
<script type="text/javascript" src="${jsdir}formatnumber2.js"></script>
<script type="text/javascript" src="${jsdir}formula1.js"></script>
<script type="text/javascript" src="${jsdir}drawlib3.js"></script>
<script>
function show_datatable(sheetname) {
var sheet = new SocialCalc.Sheet();
sheet.ParseSheetSave(document.getElementById("sheetdata-"+sheetname).value);
var context=new SocialCalc.RenderContext(sheet);
context.CalculateCellSkipData();
context.CalculateColWidthData();
context.showGrid=true;
socialcalc/simpleedit14.pl view on Meta::CPAN
$response = <<"EOF"; # output page with edit JS code
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>Simple Page Editor With Spreadsheets $versionstr</title>
<script type="text/javascript" src="${jsdir}socialcalcconstants.js"></script>
<script type="text/javascript" src="${jsdir}socialcalc-3.js"></script>
<script type="text/javascript" src="${jsdir}socialcalctableeditor.js"></script>
<script type="text/javascript" src="${jsdir}formatnumber2.js"></script>
<script type="text/javascript" src="${jsdir}formula1.js"></script>
<script type="text/javascript" src="${jsdir}socialcalcspreadsheetcontrol.js"></script>
<style>
body, td, input, texarea
{font-family:verdana,helvetica,sans-serif;font-size:small;}
</style>
</head>
<body>
<form name="f0" action="" method="POST">
<div style="padding:6px;background-color:#80A9F3;">
<div style="font-weight:bold;color:white;">SIMPLE SYSTEM FOR EDITING PAGES WITH SPREADSHEETS AND MORE</div>
socialcalc/simpleedit15.pl view on Meta::CPAN
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
"http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>Simple Page Editor With Spreadsheets $versionstr</title>
<script type="text/javascript" src="${jsdir}socialcalcconstants.js"></script>
<script type="text/javascript" src="${jsdir}socialcalc-3.js"></script>
<script type="text/javascript" src="${jsdir}socialcalctableeditor.js"></script>
<script type="text/javascript" src="${jsdir}formatnumber2.js"></script>
<script type="text/javascript" src="${jsdir}formula1.js"></script>
<script type="text/javascript" src="${jsdir}drawlib3.js"></script>
<script>
function show_datatable(sheetname) {
var sheet = new SocialCalc.Sheet();
sheet.ParseSheetSave(document.getElementById("sheetdata-"+sheetname).value);
var context=new SocialCalc.RenderContext(sheet);
context.CalculateCellSkipData();
context.CalculateColWidthData();
context.showGrid=true;
socialcalc/simpleedit15.pl view on Meta::CPAN
$response = <<"EOF"; # output page with edit JS code
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>Simple Page Editor With Spreadsheets $versionstr</title>
<script type="text/javascript" src="${jsdir}socialcalcconstants.js"></script>
<script type="text/javascript" src="${jsdir}socialcalc-3.js"></script>
<script type="text/javascript" src="${jsdir}socialcalctableeditor.js"></script>
<script type="text/javascript" src="${jsdir}formatnumber2.js"></script>
<script type="text/javascript" src="${jsdir}formula1.js"></script>
<script type="text/javascript" src="${jsdir}socialcalcpopup.js"></script>
<script type="text/javascript" src="${jsdir}socialcalcspreadsheetcontrol.js"></script>
<style>
body, td, input, texarea
{font-family:verdana,helvetica,sans-serif;font-size:small;}
</style>
</head>
<body>
<form name="f0" action="" method="POST">
<div style="padding:6px;background-color:#80A9F3;">
socialcalc/simpleedit15.pl view on Meta::CPAN
result = "?&workspace=" + encodeURI(workspace) + "&pagename=" + encodeURI(pagename);
}
else {
result = "?&pagename=" + encodeURI(pagename);
}
return result;
}
// Additional formula functions
var funccache = {};
var functimer = null;
var funcquery = "";
SocialCalc.Formula.SocialtextFunction = function(fname, operand, foperand, sheet) {
var value1, t;
var scf = SocialCalc.Formula;
socialcalc/socialcalc-3.js view on Meta::CPAN
//
// Class SocialCalc.Cell
//
// Usage: var s = new SocialCalc.Cell(coord);
//
// Cell attributes include:
//
// coord: the column/row as a string, e.g., "A1"
// datavalue: the value to be used for computation and formatting for display,
// string or numeric (tolerant of numbers stored as strings)
// datatype: if present, v=numeric value, t=text value, f=formula,
// or c=constant that is not a simple number (like "$1.20")
// formula: if present, the formula (without leading "=") for computation or the constant
// valuetype: first char is main type, the following are sub-types.
// Main types are b=blank cell, n=numeric, t=text, e=error
// Examples of using sub-types would be "nt" for a numeric time value, "n$" for currency, "nl" for logical
// displayvalue: if present, rendered version of datavalue with formatting attributes applied
// parseinfo: if present, cached parsed version of formula
//
// The following optional values, if present, are mainly used in rendering, overriding defaults:
//
// bt, br, bb, bl: number of border's definition
// layout: layout (vertical alignment, padding) definition number
// font: font definition number
// color: text color definition number
// bgcolor: background color definition number
// cellformat: cell format (horizontal alignment) definition number
// nontextvalueformat: custom format definition number for non-text values, e.g., numbers
socialcalc/socialcalc-3.js view on Meta::CPAN
// csss: custom css style definition
// mod: modification allowed flag "y" if present
// comment: cell comment string
//
SocialCalc.Cell = function(coord) {
this.coord = coord;
this.datavalue = "";
this.datatype = null;
this.formula = "";
this.valuetype = "b";
}
// The types of cell properties
//
// Type 1: Base, Type 2: Attribute, Type 3: Special (e.g., displaystring, parseinfo)
SocialCalc.CellProperties = {
coord: 1, datavalue: 1, datatype: 1, formula: 1, valuetype: 1, errors: 1, comment: 1,
bt: 2, br: 2, bb: 2, bl: 2, layout: 2, font: 2, color: 2, bgcolor: 2,
cellformat: 2, nontextvalueformat: 2, textvalueformat: 2, colspan: 2, rowspan: 2,
cssc: 2, csss: 2, mod: 2,
displaystring: 3, // used to cache rendered HTML of cell contents
parseinfo: 3, // used to cache parsed formulas
hcolspan: 3, hrowspan: 3 // spans taking hidden cols/rows into account (!!! NOT YET !!!)
};
SocialCalc.CellPropertiesTable = {
bt: "borderstyle", br: "borderstyle", bb: "borderstyle", bl: "borderstyle",
layout: "layout", font: "font", color: "color", bgcolor: "color",
cellformat: "cellformat", nontextvalueformat: "valueformat", textvalueformat: "valueformat"
};
// *************************************
socialcalc/socialcalc-3.js view on Meta::CPAN
sheet.rowattribs =
{
hide: {}, // access by row number
height: {}
};
sheet.colattribs =
{
width: {}, // access by col name
hide: {}
};
sheet.names={}; // Each is: {desc: "optional description", definition: "B5, A1:B7, or =formula"}
sheet.layouts=[];
sheet.layouthash={};
sheet.fonts=[];
sheet.fonthash={};
sheet.colors=[];
sheet.colorhash={};
sheet.borderstyles=[];
sheet.borderstylehash={};
sheet.cellformats=[];
sheet.cellformathash={};
socialcalc/socialcalc-3.js view on Meta::CPAN
//
// Linetypes are:
//
// version:versionname - version of this format. Currently 1.4.
//
// cell:coord:type:value...:type:value... - Types are as follows:
//
// v:value - straight numeric value
// t:value - straight text/wiki-text in cell, encoded to handle \, :, newlines
// vt:fulltype:value - value with value type/subtype
// vtf:fulltype:value:formulatext - formula resulting in value with value type/subtype, value and text encoded
// vtc:fulltype:value:valuetext - formatted text constant resulting in value with value type/subtype, value and text encoded
// vf:fvalue:formulatext - formula resulting in value, value and text encoded (obsolete: only pre format version 1.1)
// fvalue - first char is "N" for numeric value, "T" for text value, "H" for HTML value, rest is the value
// e:errortext - Error text. Non-blank means formula parsing/calculation results in error.
// b:topborder#:rightborder#:bottomborder#:leftborder# - border# in sheet border list or blank if none
// l:layout# - number in cell layout list
// f:font# - number in sheet fonts list
// c:color# - sheet color list index for text
// bg:color# - sheet color list index for background color
// cf:format# - sheet cell format number for explicit format (align:left, etc.)
// cvf:valueformat# - sheet cell value format number (obsolete: only pre format v1.2)
// tvf:valueformat# - sheet cell text value format number
// ntvf:valueformat# - sheet cell non-text value format number
// colspan:numcols - number of columns spanned in merged cell
socialcalc/socialcalc-3.js view on Meta::CPAN
// ntf:format# - cell format number for sheet default for non-text values (i.e., numbers)
// layout:layout# - default cell layout number in cell layout list
// font:font# - default font number in sheet font list
// vf:valueformat# - default number value format number in sheet valueformat list (obsolete: only pre format version 1.2)
// ntvf:valueformat# - default non-text (number) value format number in sheet valueformat list
// tvf:valueformat# - default text value format number in sheet valueformat list
// color:color# - default number for text color in sheet color list
// bgcolor:color# - default number for background color in sheet color list
// circularreferencecell:coord - cell coord with a circular reference
// recalc:value - on/off (on is default). If not "off", appropriate changes to the sheet cause a recalc
// needsrecalc:value - yes/no (no is default). If "yes", formula values are not up to date
//
// name:name:description:value - name definition, name in uppercase, with value being "B5", "A1:B7", or "=formula";
// description and value are encoded.
// font:fontnum:value - text of font definition (style weight size family) for font fontnum
// "*" for "style weight", size, or family, means use default (first look to sheet, then builtin)
// color:colornum:rgbvalue - text of color definition (e.g., rgb(255,255,255)) for color colornum
// border:bordernum:value - text of border definition (thickness style color) for border bordernum
// layout:layoutnum:value - text of vertical alignment and padding style for cell layout layoutnum (* for default):
// vertical-alignment:vavalue;padding:topval rightval bottomval leftval;
// cellformat:cformatnum:value - text of cell alignment (left/center/right) for cellformat cformatnum
// valueformat:vformatnum:value - text of number format (see FormatValueForDisplay) for valueformat vformatnum (changed in v1.2)
// clipboardrange:upperleftcoord:bottomrightcoord - ignored -- from wikiCalc
socialcalc/socialcalc-3.js view on Meta::CPAN
break;
case "vtf":
v=parts[j++];
cell.valuetype=v;
if (v.charAt(0)=="n") {
cell.datavalue=SocialCalc.decodeFromSave(parts[j++])-0;
}
else {
cell.datavalue=SocialCalc.decodeFromSave(parts[j++]);
}
cell.formula=SocialCalc.decodeFromSave(parts[j++]);
cell.datatype="f";
break;
case "vtc":
v=parts[j++];
cell.valuetype=v;
if (v.charAt(0)=="n") {
cell.datavalue=SocialCalc.decodeFromSave(parts[j++])-0;
}
else {
cell.datavalue=SocialCalc.decodeFromSave(parts[j++]);
}
cell.formula=SocialCalc.decodeFromSave(parts[j++]);
cell.datatype="c";
break;
case "e":
cell.errors=SocialCalc.decodeFromSave(parts[j++]);
break;
case "b":
cell.bt=parts[j++]-0;
cell.br=parts[j++]-0;
cell.bb=parts[j++]-0;
cell.bl=parts[j++]-0;
socialcalc/socialcalc-3.js view on Meta::CPAN
//
// sheetstr = SocialCalc.CreateSheetSave(sheetobj, range, canonicalize)
//
// Creates a text representation of the sheetobj data.
// If the range is present then only those cells are saved
// (as clipboard data with "copiedfrom" set).
//
SocialCalc.CreateSheetSave = function(sheetobj, range, canonicalize) {
var cell, cr1, cr2, row, col, coord, attrib, line, value, formula, i, t, r, b, l, name, blanklen;
var result=[];
var prange;
sheetobj.CanonicalizeSheet(canonicalize || SocialCalc.Constants.doCanonicalizeSheet);
var xlt = sheetobj.xlt;
if (range) {
prange = SocialCalc.ParseRange(range);
}
socialcalc/socialcalc-3.js view on Meta::CPAN
return result.join("\n");
}
//
// line = SocialCalc.CellToString(sheet, cell)
//
SocialCalc.CellToString = function(sheet, cell) {
var cell, line, value, formula, t, r, b, l, xlt;
line = "";
if (!cell) return line;
value = SocialCalc.encodeForSave(cell.datavalue);
if (cell.datatype=="v") {
if (cell.valuetype=="n") line += ":v:"+value;
else line += ":vt:"+cell.valuetype+":"+value;
}
else if (cell.datatype=="t") {
if (cell.valuetype==SocialCalc.Constants.textdatadefaulttype)
line += ":t:"+value;
else line += ":vt:"+cell.valuetype+":"+value;
}
else {
formula = SocialCalc.encodeForSave(cell.formula);
if (cell.datatype=="f") {
line += ":vtf:"+cell.valuetype+":"+value+":"+formula;
}
else if (cell.datatype=="c") {
line += ":vtc:"+cell.valuetype+":"+value+":"+formula;
}
}
if (cell.errors) {
line += ":e:"+SocialCalc.encodeForSave(cell.errors);
}
t = cell.bt || "";
r = cell.br || "";
b = cell.bb || "";
l = cell.bl || "";
socialcalc/socialcalc-3.js view on Meta::CPAN
// Note that because of this, in "set A1 text ..." and "set A1 comment ..." text is
// treated as encoded (newline => \n, \ => \b, : => \c).
//
// The commands are in the forms:
//
// set sheet attributename value (plus lastcol and lastrow)
// set 22 attributename value
// set B attributename value
// set A1 attributename value1 value2... (see each attribute in code for details)
// set A1:B5 attributename value1 value2...
// erase/copy/cut/paste/fillright/filldown A1:B5 all/formulas/format
// loadclipboard save-encoded-clipboard-data
// clearclipboard
// merge C3:F3
// unmerge C3
// insertcol/insertrow C5
// deletecol/deleterow C5:E7
// movepaste/moveinsert A1:B5 A8 all/formulas/format (if insert, destination must be in same rows or columns or else paste done)
// sort cr1:cr2 col1 up/down col2 up/down col3 up/down
// name define NAME definition
// name desc NAME description
// name delete NAME
// recalc
// redisplay
// changedrendervalues
// startcmdextension extension rest-of-command
//
// If saveundo is true, then undo information is saved in sheet.changes.
//
SocialCalc.ExecuteSheetCommand = function(sheet, cmd, saveundo) {
var cmdstr, cmd1, rest, what, attrib, num, pos, pos2, errortext, undostart, val;
var cr1, cr2, col, row, cr, cell, newcell;
var fillright, rowstart, colstart, crbase, rowoffset, coloffset, basecell;
var clipsheet, cliprange, numcols, numrows, attribtable;
var colend, rowend, newcolstart, newrowstart, newcolend, newrowend, rownext, colnext, colthis, cellnext;
var lastrow, lastcol, rowbefore, colbefore, oldformula, oldcr;
var cols, dirs, lastsortcol, i, sortlist, sortcells, sortvalues, sorttypes;
var sortfunction, slen, valtype, originalrow, sortedcr;
var name, v1, v2;
var cmdextension;
var attribs = sheet.attribs;
var changes = sheet.changes;
var cellProperties = SocialCalc.CellProperties;
var scc = SocialCalc.Constants;
socialcalc/socialcalc-3.js view on Meta::CPAN
else if (attrib=="text") { // set coord text type text-value
pos = rest.indexOf(" ");
cell.datavalue = SocialCalc.decodeFromSave(rest.substring(pos+1));
delete cell.errors;
cell.datatype = "t";
cell.valuetype = rest.substring(0,pos);
delete cell.displaystring;
delete cell.parseinfo;
attribs.needsrecalc = "yes";
}
else if (attrib=="formula") { // set coord formula formula-body-less-initial-=
cell.datavalue = 0; // until recalc
delete cell.errors;
cell.datatype = "f";
cell.valuetype = "e#N/A"; // until recalc
cell.formula = rest;
delete cell.displaystring;
delete cell.parseinfo;
attribs.needsrecalc = "yes";
}
else if (attrib=="constant") { // set coord constant type numeric-value source-text
pos = rest.indexOf(" ");
pos2 = rest.substring(pos+1).indexOf(" ");
cell.datavalue = rest.substring(pos+1,pos+1+pos2)-0;
cell.valuetype = rest.substring(0,pos);
if (cell.valuetype.charAt(0)=="e") { // error
cell.errors = cell.valuetype.substring(1);
}
else {
delete cell.errors;
}
cell.datatype = "c";
cell.formula = rest.substring(pos+pos2+2);
delete cell.displaystring;
delete cell.parseinfo;
attribs.needsrecalc = "yes";
}
else if (attrib=="empty") { // erase value
cell.datavalue = "";
delete cell.errors;
cell.datatype = null;
cell.formula = "";
cell.valuetype = "b";
delete cell.displaystring;
delete cell.parseinfo;
attribs.needsrecalc = "yes";
}
else if (attrib=="all") { // set coord all :this:val1:that:val2...
if (rest.length>0) {
cell = new SocialCalc.Cell(cr);
sheet.CellFromStringParts(cell, rest.split(":"), 1);
sheet.cells[cr] = cell;
socialcalc/socialcalc-3.js view on Meta::CPAN
}
for (row = cr1.row; row <= cr2.row; row++) {
for (col = cr1.col; col <= cr2.col; col++) {
cr = SocialCalc.crToCoord(col, row);
cell=sheet.GetAssuredCell(cr);
if (saveundo) changes.AddUndo("set "+cr+" all", sheet.CellToString(cell));
if (rest=="all") {
delete sheet.cells[cr];
}
else if (rest == "formulas") {
cell.datavalue = "";
cell.datatype = null;
cell.formula = "";
cell.valuetype = "b";
delete cell.errors;
delete cell.displaystring;
delete cell.parseinfo;
if (cell.comment) { // comments are considered content for erasing
delete cell.comment;
}
}
else if (rest == "formats") {
newcell = new SocialCalc.Cell(cr); // create a new cell without attributes
newcell.datavalue = cell.datavalue; // copy existing values
newcell.datatype = cell.datatype;
newcell.formula = cell.formula;
newcell.valuetype = cell.valuetype;
if (cell.comment) {
newcell.comment = cell.comment;
}
sheet.cells[cr] = newcell; // replace
}
}
}
attribs.needsrecalc = "yes";
break;
socialcalc/socialcalc-3.js view on Meta::CPAN
for (attrib in cellProperties) {
if (cellProperties[attrib] == 1) continue; // copy only format attributes
if (typeof basecell[attrib] === undefined || cellProperties[attrib] == 3) {
delete cell[attrib];
}
else {
cell[attrib] = basecell[attrib];
}
}
}
if (rest == "all" || rest == "formulas") {
cell.datavalue = basecell.datavalue;
cell.datatype = basecell.datatype;
cell.valuetype = basecell.valuetype;
if (cell.datatype == "f") { // offset relative coords, even in sheet references
cell.formula = SocialCalc.OffsetFormulaCoords(basecell.formula, coloffset, rowoffset);
}
else {
cell.formula = basecell.formula;
}
delete cell.parseinfo;
cell.errors = basecell.errors;
}
delete cell.displaystring;
}
}
attribs.needsrecalc = "yes";
break;
socialcalc/socialcalc-3.js view on Meta::CPAN
attribtable = SocialCalc.CellPropertiesTable[attrib];
if (attribtable && basecell[attrib]) { // table indexes to expand to strings since other sheet may have diff indexes
cell[attrib] = sheet.GetStyleNum(attribtable, clipsheet.GetStyleString(attribtable, basecell[attrib]));
}
else { // these are not table indexes
cell[attrib] = basecell[attrib];
}
}
}
}
if (rest == "all" || rest == "formulas") {
cell.datavalue = basecell.datavalue;
cell.datatype = basecell.datatype;
cell.valuetype = basecell.valuetype;
if (cell.datatype == "f") { // offset relative coords, even in sheet references
cell.formula = SocialCalc.OffsetFormulaCoords(basecell.formula, coloffset, rowoffset);
}
else {
cell.formula = basecell.formula;
}
delete cell.parseinfo;
cell.errors = basecell.errors;
if (basecell.comment) { // comments are pasted as part of content, though not filled, etc.
cell.comment = basecell.comment;
}
else if (cell.comment) {
delete cell.comment;
}
}
socialcalc/socialcalc-3.js view on Meta::CPAN
for (row = cr1.row; row <= cr2.row; row++) { // copy original rows into sorted positions
originalrow = sortlist[row-cr1.row]; // relative position where it was in original
for (col = cr1.col; col <= cr2.col; col++) {
cr = SocialCalc.crToCoord(col, row);
sortedcr = SocialCalc.crToCoord(col, originalrow+cr1.row); // original cell to be put in new place
if (sortcells[sortedcr]) {
cell = new SocialCalc.Cell(cr);
sheet.CellFromStringParts(cell, sortcells[sortedcr].split(":"), 1);
if (cell.datatype == "f") { // offset coord refs, even to ***relative*** coords in other sheets
cell.formula = SocialCalc.OffsetFormulaCoords(cell.formula, 0, (row-cr1.row)-originalrow);
}
sheet.cells[cr] = cell;
}
else {
delete sheet.cells[cr];
}
}
}
attribs.needsrecalc = "yes";
socialcalc/socialcalc-3.js view on Meta::CPAN
crbase = SocialCalc.crToCoord(col-coloffset, row-rowoffset); // copy attribs of the one before (0 gives you A or 1)
basecell = sheet.GetAssuredCell(crbase);
for (attrib in cellProperties) {
if (cellProperties[attrib] == 2) { // copy only format attributes
cell[attrib] = basecell[attrib];
}
}
}
}
for (cr in sheet.cells) { // update cell references to moved cells in calculated formulas
cell = sheet.cells[cr];
if (cell && cell.datatype == "f") {
cell.formula = SocialCalc.AdjustFormulaCoords(cell.formula, cr1.col, coloffset, cr1.row, rowoffset);
}
if (cell) {
delete cell.parseinfo;
}
}
for (name in sheet.names) { // update cell references to moved cells in names
if (sheet.names[name]) { // works with "A1", "A1:A20", and "=formula" forms
v1 = sheet.names[name].definition;
v2 = "";
if (v1.charAt(0) == "=") {
v2 = "=";
v1 = v1.substring(1);
}
sheet.names[name].definition = v2 +
SocialCalc.AdjustFormulaCoords(v1, cr1.col, coloffset, cr1.row, rowoffset);
}
}
socialcalc/socialcalc-3.js view on Meta::CPAN
delete sheet.cells[cr]; // delete anything that may have been there
}
else { // overwrite existing cell with moved contents
sheet.cells[cr] = cell;
}
}
}
//!!! multiple deletes isn't setting #REF!; need to fix up #REF!'s on undo but only those!
for (cr in sheet.cells) { // update cell references to moved cells in calculated formulas
cell = sheet.cells[cr];
if (cell) {
if (cell.datatype == "f") {
oldformula = cell.formula;
cell.formula = SocialCalc.AdjustFormulaCoords(oldformula, cr1.col, coloffset, cr1.row, rowoffset);
if (cell.formula != oldformula) {
delete cell.parseinfo;
if (saveundo && cell.formula.indexOf("#REF!")!=-1) { // save old version only if removed coord
oldcr = SocialCalc.coordToCr(cr);
changes.AddUndo("set "+SocialCalc.rcColname(oldcr.col-coloffset)+(oldcr.row-rowoffset)+
" formula "+oldformula);
}
}
}
else {
delete cell.parseinfo;
}
}
}
for (name in sheet.names) { // update cell references to moved cells in names
if (sheet.names[name]) { // works with "A1", "A1:A20", and "=formula" forms
v1 = sheet.names[name].definition;
v2 = "";
if (v1.charAt(0) == "=") {
v2 = "=";
v1 = v1.substring(1);
}
sheet.names[name].definition = v2 +
SocialCalc.AdjustFormulaCoords(v1, cr1.col, coloffset, cr1.row, rowoffset);
}
}
socialcalc/socialcalc-3.js view on Meta::CPAN
case "movepaste":
case "moveinsert":
var movingcells, dest, destcr, inserthoriz, insertvert, pushamount, movedto;
sheet.renderneeded = true;
sheet.changedrendervalues = true;
if (saveundo) changes.AddUndo("changedrendervalues"); // to take care of undone pasted spans
what = cmd.NextToken();
dest = cmd.NextToken();
rest = cmd.RestOfString(); // rest is all/formulas/formats
if (rest=="") rest = "all";
ParseRange();
destcr = SocialCalc.coordToCr(dest);
coloffset = destcr.col - cr1.col;
rowoffset = destcr.row - cr1.row;
numcols = cr2.col - cr1.col + 1;
numrows = cr2.row - cr1.row + 1;
socialcalc/socialcalc-3.js view on Meta::CPAN
for (attrib in cellProperties) { // go through each property
if (typeof cell[attrib] === undefined) { // don't copy undefined things and no need to delete
continue;
}
else {
movingcells[cr][attrib] = cell[attrib]; // copy for potential moving
}
if (rest == "all") {
delete cell[attrib];
}
if (rest == "formulas") {
if (cellProperties[attrib] == 1 || cellProperties[attrib] == 3) {
delete cell[attrib];
}
}
if (rest == "formats") {
if (cellProperties[attrib] == 2) {
delete cell[attrib];
}
}
}
if (rest == "formulas") { // leave pristene deleted cell
cell.datavalue = "";
cell.datatype = null;
cell.formula = "";
cell.valuetype = "b";
}
if (rest == "all") { // leave nothing for move all
delete sheet.cells[cr];
}
}
}
// if moveinsert, check destination OK, and calculate pushing parameters
socialcalc/socialcalc-3.js view on Meta::CPAN
for (attrib in cellProperties) {
if (cellProperties[attrib] == 1) continue; // copy only format attributes
if (typeof basecell[attrib] === undefined || cellProperties[attrib] == 3) {
delete cell[attrib];
}
else {
cell[attrib] = basecell[attrib];
}
}
}
if (rest == "all" || rest == "formulas") {
cell.datavalue = basecell.datavalue;
cell.datatype = basecell.datatype;
cell.valuetype = basecell.valuetype;
cell.formula = basecell.formula;
delete cell.parseinfo;
cell.errors = basecell.errors;
}
delete cell.displaystring;
movedto[crbase] = cr; // old crbase is now at cr
}
}
}
if (inserthoriz) {
socialcalc/socialcalc-3.js view on Meta::CPAN
for (attrib in cellProperties) {
if (cellProperties[attrib] == 1) continue; // copy only format attributes
if (typeof basecell[attrib] === undefined || cellProperties[attrib] == 3) {
delete cell[attrib];
}
else {
cell[attrib] = basecell[attrib];
}
}
}
if (rest == "all" || rest == "formulas") {
cell.datavalue = basecell.datavalue;
cell.datatype = basecell.datatype;
cell.valuetype = basecell.valuetype;
cell.formula = basecell.formula;
delete cell.parseinfo;
cell.errors = basecell.errors;
}
delete cell.displaystring;
movedto[crbase] = cr; // old crbase is now at cr
}
}
}
socialcalc/socialcalc-3.js view on Meta::CPAN
for (attrib in cellProperties) {
if (cellProperties[attrib] == 1) continue; // copy only format attributes
if (typeof basecell[attrib] === undefined || cellProperties[attrib] == 3) {
delete cell[attrib];
}
else {
cell[attrib] = basecell[attrib];
}
}
}
if (rest == "all" || rest == "formulas") {
cell.datavalue = basecell.datavalue;
cell.datatype = basecell.datatype;
cell.valuetype = basecell.valuetype;
cell.formula = basecell.formula;
delete cell.parseinfo;
cell.errors = basecell.errors;
if (basecell.comment) { // comments are pasted as part of content, though not filled, etc.
cell.comment = basecell.comment;
}
else if (cell.comment) {
delete cell.comment;
}
}
delete cell.displaystring;
}
}
// do fixups
for (cr in sheet.cells) { // update cell references to moved cells in calculated formulas
cell = sheet.cells[cr];
if (cell) {
if (cell.datatype == "f") {
oldformula = cell.formula;
cell.formula = SocialCalc.ReplaceFormulaCoords(oldformula, movedto);
if (cell.formula != oldformula) {
delete cell.parseinfo;
if (saveundo && !movedto[cr]) { // moved cells are already saved for undo
changes.AddUndo("set "+cr+" formula "+oldformula);
}
}
}
else {
delete cell.parseinfo;
}
}
}
for (name in sheet.names) { // update cell references to moved cells in names
if (sheet.names[name]) { // works with "A1", "A1:A20", and "=formula" forms
v1 = sheet.names[name].definition;
oldformula = v1;
v2 = "";
if (v1.charAt(0) == "=") {
v2 = "=";
v1 = v1.substring(1);
}
sheet.names[name].definition = v2 +
SocialCalc.ReplaceFormulaCoords(v1, movedto);
if (saveundo && sheet.names[name].definition != oldformula) { // save changes
changes.AddUndo("name define "+name+" "+oldformula);
}
}
}
attribs.needsrecalc = "yes";
break;
case "name":
what = cmd.NextToken();
name = cmd.NextToken();
socialcalc/socialcalc-3.js view on Meta::CPAN
SocialCalc.GetStyleString = function(sheet, atype, num) {
if (!num) return null; // zero, null, and undefined return null
return sheet[atype+"s"][num];
}
//
// updatedformula = SocialCalc.OffsetFormulaCoords(formula, coloffset, rowoffset)
//
// Change relative cell references by offsets (even those to other worksheets so fill, paste, sort work as expected).
// If not what you want, use absolute references.
//
SocialCalc.OffsetFormulaCoords = function(formula, coloffset, rowoffset) {
var parseinfo, ttext, ttype, i, cr, newcr;
var updatedformula = "";
var scf = SocialCalc.Formula;
if (!scf) {
return "Need SocialCalc.Formula";
}
var tokentype = scf.TokenType;
var token_op = tokentype.op;
var token_string = tokentype.string;
var token_coord = tokentype.coord;
var tokenOpExpansion = scf.TokenOpExpansion;
parseinfo = scf.ParseFormulaIntoTokens(formula);
for (i=0; i<parseinfo.length; i++) {
ttype = parseinfo[i].type;
ttext = parseinfo[i].text;
if (ttype == token_coord) {
newcr = "";
cr = SocialCalc.coordToCr(ttext);
if (ttext.charAt(0)!="$") { // add col offset unless absolute column
cr.col += coloffset;
}
socialcalc/socialcalc-3.js view on Meta::CPAN
if (ttext.indexOf("$", 1)==-1) { // add row offset unless absolute row
cr.row += rowoffset;
}
else {
newcr += "$";
}
newcr += cr.row;
if (cr.row < 1 || cr.col < 1) {
newcr = "#REF!";
}
updatedformula += newcr;
}
else if (ttype == token_string) {
if (ttext.indexOf('"') >= 0) { // quotes to double
updatedformula += '"' + ttext.replace(/"/, '""') + '"';
}
else updatedformula += '"' + ttext + '"';
}
else if (ttype == token_op) {
updatedformula += tokenOpExpansion[ttext] || ttext; // make sure short tokens (e.g., "G") go back full (">=")
}
else { // leave everything else alone
updatedformula += ttext;
}
}
return updatedformula;
}
//
// updatedformula = SocialCalc.AdjustFormulaCoords(formula, col, coloffset, row, rowoffset)
//
// Change all cell references to cells starting with col/row by offsets
//
SocialCalc.AdjustFormulaCoords = function(formula, col, coloffset, row, rowoffset) {
var ttype, ttext, i, newcr;
var updatedformula = "";
var sheetref = false;
var scf = SocialCalc.Formula;
if (!scf) {
return "Need SocialCalc.Formula";
}
var tokentype = scf.TokenType;
var token_op = tokentype.op;
var token_string = tokentype.string;
var token_coord = tokentype.coord;
var tokenOpExpansion = scf.TokenOpExpansion;
parseinfo = SocialCalc.Formula.ParseFormulaIntoTokens(formula);
for (i=0; i<parseinfo.length; i++) {
ttype = parseinfo[i].type;
ttext = parseinfo[i].text;
if (ttype == token_op) { // references with sheet specifier are not offset
if (ttext == "!") {
sheetref = true; // found a sheet reference
}
else if (ttext != ":") { // for everything but a range, reset
sheetref = false;
socialcalc/socialcalc-3.js view on Meta::CPAN
newcr = "#REF!";
}
ttext = newcr;
}
else if (ttype == token_string) {
if (ttext.indexOf('"') >= 0) { // quotes to double
ttext = '"' + ttext.replace(/"/, '""') + '"';
}
else ttext = '"' + ttext + '"';
}
updatedformula += ttext;
}
return updatedformula;
}
//
// updatedformula = SocialCalc.ReplaceFormulaCoords(formula, movedto)
//
// Change all cell references to cells that are keys in moveto to be to moveto[coord].
// Don't change references to other sheets.
// Handle range extents specially.
//
SocialCalc.ReplaceFormulaCoords = function(formula, movedto) {
var ttype, ttext, i, newcr, coord;
var updatedformula = "";
var sheetref = false;
var scf = SocialCalc.Formula;
if (!scf) {
return "Need SocialCalc.Formula";
}
var tokentype = scf.TokenType;
var token_op = tokentype.op;
var token_string = tokentype.string;
var token_coord = tokentype.coord;
var tokenOpExpansion = scf.TokenOpExpansion;
parseinfo = SocialCalc.Formula.ParseFormulaIntoTokens(formula);
for (i=0; i<parseinfo.length; i++) {
ttype = parseinfo[i].type;
ttext = parseinfo[i].text;
if (ttype == token_op) { // references with sheet specifier are not change
if (ttext == "!") {
sheetref = true; // found a sheet reference
}
else if (ttext != ":") { // for everything but a range, reset
sheetref = false;
socialcalc/socialcalc-3.js view on Meta::CPAN
}
ttext = newcr;
}
}
else if (ttype == token_string) {
if (ttext.indexOf('"') >= 0) { // quotes to double
ttext = '"' + ttext.replace(/"/, '""') + '"';
}
else ttext = '"' + ttext + '"';
}
updatedformula += ttext;
}
return updatedformula;
}
// ************************
//
// Recalc Loop Code
//
// ************************
socialcalc/socialcalc-3.js view on Meta::CPAN
// otherwise should be scri.state.calc
if (scri.currentState != scri.state.calc) {
alert("Recalc state error: "+scri.currentState+". Error in SocialCalc code.");
}
coord = sheet.recalcdata.nextcalc;
while (coord) {
cell = sheet.cells[coord];
eresult = scf.evaluate_parsed_formula(cell.parseinfo, sheet, false);
if (scf.SheetCache.waitingForLoading) { // wait until restarted
recalcdata.nextcalc = coord; // start with this cell again
recalcdata.count += count;
do_statuscallback("calcloading", {sheetname: scf.SheetCache.waitingForLoading});
scri.currentState = scri.state.start_wait; // start load on next timer call
SocialCalc.RecalcSetTimeout();
return;
}
if (scf.RemoteFunctionInfo.waitingForServer) { // wait until restarted
socialcalc/socialcalc-3.js view on Meta::CPAN
recalcdata.nextcalc = coord; // start with next cell on chain
recalcdata.count += count;
do_statuscallback("calcstep", {coord: coord, total: recalcdata.calclistlength, count: recalcdata.count});
SocialCalc.RecalcSetTimeout();
return;
}
}
recalcdata.inrecalc = false;
delete sheet.recalcdata; // save memory and clear out for name lookup formula evaluation
delete sheet.attribs.needsrecalc; // remember recalc done
scri.sheet = sheet.previousrecalcsheet || null; // chain back if doing recalc of loaded sheets
if (scri.sheet) {
scri.currentState = scri.state.calc; // start where we left off
SocialCalc.RecalcSetTimeout();
return;
}
socialcalc/socialcalc-3.js view on Meta::CPAN
do_statuscallback("calcfinished", (new Date()) - scri.starttime);
}
//
// circref = SocialCalc.RecalcCheckCell(sheet, coord)
//
// Checks cell to put on calclist, looking at parsed tokens.
// Also checks cells this cell is dependent upon
// if it contains a formula with cell references.
// If circular reference, returns non-null.
//
SocialCalc.RecalcCheckCell = function(sheet, startcoord) {
var parseinfo, ttext, ttype, i, rangecoord, circref, value, pos, pos2, cell, coordvals;
var scf = SocialCalc.Formula;
if (!scf) {
return "Need SocialCalc.Formula";
}
var tokentype = scf.TokenType;
var token_op = tokentype.op;
var token_name = tokentype.name;
var token_coord = tokentype.coord;
var recalcdata = sheet.recalcdata;
var checkinfo = recalcdata.checkinfo;
var sheetref = false; // if true, a sheet reference is in effect, so don't check that
var oldcoord = null; // coord of formula that referred to this one when checking down the tree
var coord = startcoord; // the coord of the cell we are checking
// Start with requested cell, and then continue down or up the dependency tree
// oldcoord (and checkinfo[coord].oldcoord) maintains the reference stack during the tree walk
// checkinfo[coord] maintains the stack of checking looping values, e.g., token number being checked
mainloop:
while (coord) {
cell = sheet.cells[coord];
coordvals = checkinfo[coord];
if (!cell || cell.datatype != "f" || // Don't calculate if not a formula
(coordvals && typeof coordvals != "object")) { // Don't calc if already calculated
coord = oldcoord; // go back up dependency tree to coord that referred to us
if (checkinfo[coord]) oldcoord = checkinfo[coord].oldcoord;
continue;
}
if (!coordvals) { // do we have checking information about this cell?
coordvals = new SocialCalc.RecalcCheckInfo(); // no - make a place to hold it
checkinfo[coord] = coordvals;
}
if (cell.errors) { // delete errors from previous recalcs
delete cell.errors;
}
if (!cell.parseinfo) { // cache parsed formula
cell.parseinfo = scf.ParseFormulaIntoTokens(cell.formula);
}
parseinfo = cell.parseinfo;
for (i=coordvals.parsepos; i<parseinfo.length; i++) { // go through each token in formula
if (coordvals.inrange) { // processing a range of coords
if (coordvals.inrangestart) { // first time - fill in other values
if (coordvals.cr1.col > coordvals.cr2.col) { coordvals.c1 = coordvals.cr2.col; coordvals.c2 = coordvals.cr1.col; }
else { coordvals.c1 = coordvals.cr1.col; coordvals.c2 = coordvals.cr2.col; }
coordvals.c = coordvals.c1 - 1; // start one before
if (coordvals.cr1.row > coordvals.cr2.row) { coordvals.r1 = coordvals.cr2.row; coordvals.r2 = coordvals.cr1.row; }
else { coordvals.r1 = coordvals.cr1.row; coordvals.r2 = coordvals.cr2.row; }
coordvals.r = coordvals.r1; // start on this row
socialcalc/socialcalc-3.js view on Meta::CPAN
checkinfo[coord] = true; // this one is finished
if (!recalcdata.firstcalc) { // add to calclist
recalcdata.firstcalc = coord;
}
else {
recalcdata.calclist[recalcdata.lastcalc] = coord;
}
recalcdata.lastcalc = coord;
recalcdata.calclistlength++; // count number on list
coord = oldcoord; // go back to the formula that referred to us and continue
oldcoord = checkinfo[coord] ? checkinfo[coord].oldcoord : null;
}
return "";
}
// *************************************
socialcalc/socialcalc-3.js view on Meta::CPAN
if (obj.idPrefix) { // Object must have a non-empty idPrefix attribute
element.id = obj.idPrefix + id;
}
}
//
// SocialCalc.GetCellContents(sheetobj, coord)
//
// Returns the contents (value, formula, constant, etc.) of a cell
// with appropriate prefix ("'", "=", etc.)
//
SocialCalc.GetCellContents = function(sheetobj, coord) {
var result = "";
var cellobj = sheetobj.cells[coord];
if (cellobj) {
switch (cellobj.datatype) {
case "v":
result = cellobj.datavalue+"";
break;
case "t":
result = "'"+cellobj.datavalue;
break;
case "f":
result = "="+cellobj.formula;
break;
case "c":
result = cellobj.formula;
break;
default:
break;
}
}
return result;
}
socialcalc/socialcalc-3.js view on Meta::CPAN
valuesubtype = valuetype.substring(1);
valuetype = valuetype.charAt(0);
if (cell.errors || valuetype=="e") {
displayvalue = cell.errors || valuesubtype || "Error in cell";
return displayvalue;
}
if (valuetype=="t") {
valueformat = sheetobj.valueformats[cell.textvalueformat-0] || sheetobj.valueformats[sheetattribs.defaulttextvalueformat-0] || "";
if (valueformat=="formula") {
if (cell.datatype=="f") {
displayvalue = SocialCalc.special_chars("="+cell.formula) || " ";
}
else if (cell.datatype=="c") {
displayvalue = SocialCalc.special_chars("'"+cell.formula) || " ";
}
else {
displayvalue = SocialCalc.special_chars("'"+displayvalue) || " ";
}
return displayvalue;
}
displayvalue = SocialCalc.format_text_for_display(displayvalue, cell.valuetype, valueformat, sheetobj, linkstyle);
}
else if (valuetype=="n") {
valueformat = cell.nontextvalueformat;
if (valueformat==null || valueformat=="") { //
valueformat = sheetattribs.defaultnontextvalueformat;
}
valueformat = sheetobj.valueformats[valueformat-0];
if (valueformat==null || valueformat=="none") {
valueformat = "";
}
if (valueformat=="formula") {
if (cell.datatype=="f") {
displayvalue = SocialCalc.special_chars("="+cell.formula) || " ";
}
else if (cell.datatype=="c") {
displayvalue = SocialCalc.special_chars("'"+cell.formula) || " ";
}
else {
displayvalue = SocialCalc.special_chars("'"+displayvalue) || " ";
}
return displayvalue;
}
else if (valueformat=="forcetext") {
if (cell.datatype=="f") {
displayvalue = SocialCalc.special_chars("="+cell.formula) || " ";
}
else if (cell.datatype=="c") {
displayvalue = SocialCalc.special_chars(cell.formula) || " ";
}
else {
displayvalue = SocialCalc.special_chars(displayvalue) || " ";
}
return displayvalue;
}
displayvalue = SocialCalc.format_number_for_display(displayvalue, cell.valuetype, valueformat);
}
socialcalc/socialcalc-3.js view on Meta::CPAN
}
else if (value.type.charAt(0) == 't') { // text of some sort but left unchanged
cell.datatype = "t";
cell.valuetype = value.type;
cell.datavalue = value.value;
}
else { // special number types
cell.datatype = "c";
cell.valuetype = value.type;
cell.datavalue = value.value;
cell.formula = rawvalue;
}
}
socialcalc/socialcalc2demo-0-8-1.html view on Meta::CPAN
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>SocialCalc 0.8.1</title>
<script type="text/javascript" src="socialcalcconstants.js"></script>
<script type="text/javascript" src="socialcalc-3.js"></script>
<script type="text/javascript" src="socialcalctableeditor.js"></script>
<script type="text/javascript" src="formatnumber2.js"></script>
<script type="text/javascript" src="formula1.js"></script>
<script type="text/javascript" src="socialcalcpopup.js"></script>
<script type="text/javascript" src="socialcalcspreadsheetcontrol.js"></script>
<style>
body, td, input, texarea {font-family:verdana,helvetica,sans-serif;font-size:small;}
.smaller {font-size:smaller;}
</style>
</head>
<body style="background-color:#FFF;" onresize="spreadsheet.DoOnResize();">
<div style="margin:8px 0px 10px 0px;">
<div id="tableeditor" style="margin:8px 0px 10px 0px;">editor goes here</div>
socialcalc/socialcalc2demo-0-8-1.html view on Meta::CPAN
'The scrollbars should work in a normal manner. '+
'Because this is a spreadsheet, you can scroll any amount without needing to create new rows or columns. '+
'Dragging the thumb to the end of a scrollbar attempts to go to the last row or column where there is/was data. '+
'The mousewheel is also supported. '+
'<br><br> '+
'In addition to the scrollbars there are two pane sliders (that start out at the beginning of the scrollbars) '+
'that let you "lock" the upper rows or columns to facilitate keeping column and row headers visible when scrolling. '+
'<br><br> '+
'You can type values in cells. '+
'Press Enter, use an arrow key, or click on a cell to finish. '+
'If you are in a partial formula (e.g., "=1+" or "=SUM(") an arrow key or cell click will '+
'insert the name of the newly selected cell into the formula, similar to a traditional spreadsheet. '+
'Cell ranges are separated by typing a ":", or you can use the drag or shift-click range selection methods. '+
'<br><br> '+
'The program supports many forms of data, such as numbers, text (preceded by a "\'" if necessary '+
'to distinguish it from numbers), dates (e.g., "1/2/3"), dollars ("$1,234.50"), time ("3:45"), '+
'numbers with fractions ("1 1/2"), and "true", "false", and "#N/A". '+
'A value\'s type determines its displayed format if there is no explicit numeric format set for a cell. '+
'The program supports a wide variety of formats (including other currencies) through its custom format functionality '+
'available on the Format tab. '+
'<br><br> '+
'Use the Esc key to cancel during edits. '+
'The Del key deletes the values of the selected cell(s). '+
'<br><br> '+
'The 109 formula functions that the June 2007 Open Document Format "Open Formula" specification '+
'calls the "small group" are available. '+
'(<b><i>A simple reference to all of the functions is provided when you click the "f()" button on the formula bar.</i></b>) '+
'The specification says that: "This group includes approximately 100 functions, '+
'and includes the basic functions that are very widely implemented in spreadsheet applications, '+
'even in resource-constrained environments."<br><br> '+
'The definitions of the functions follow common conventions, '+
'with common syntax similar to many other spreadsheets. '+
'You can, for example, have a function like IF(B10=B3, "Yes", "No"), where B10 and B3 may contain text values '+
'(comparisons are not case-sensitive). '+
'<br><br> '+
'This release has an HTML version of an editing interface. Most buttons on the toolbar display tooltips when you point to them with the mouse pointer. '+
'<br><br> '+
socialcalc/socialcalc2demo-0-8-1.html view on Meta::CPAN
'While the cell settings are only displayed for the current cell, on "Save" the same changes are applied to all cells '+
'in the currently highlighted range of cells. '+
'The Sheet settings let you set the default size of columns. To change the width of an individual column click and '+
'drag in the column header. '+
'<br><br> '+
'The <b>Sort</b> tab lets you select a range of cells (which is remembered) to sort, as well as to set which columns '+
'are used to determine the order and the direction. '+
'<br><br> '+
'There is a <b>Comment</b> tab for accessing the optional comment text for the currently selected cell.'+
'<br><br> '+
'The <b>Name</b> tab lets you set named ranges that may be used in formulas.'+
'<br><br> '+
'The <b>Graph</b> tab displays a graph representation of selected cells. It has its own Help button. '+
'<br><br> '+
'The <b>Plain</b> tab shows the sheet rendered without the grid or editing controls. '+
'<br><br> '+
'The <b>Clipboard</b> tab lets you view the SocialCalc clipboard in tab-delimited format, and optionally reload it with new data. '+
'Tab-delimited format is what some browsers and Excel put on the clipboard when you select and then copy cells in a table. '+
'The Clipboard tab also supports CSV format and the SocialCalc Save format (useful for copying from one sheet to another). '+
'Reloading from the SocialCalc Save format must be in correct format -- errors can cause SocialCalc to behave badly.<br><br>'+
'Pressing Ctrl-V when on the Edit tab and not editing a cell assumes that Tab-delimited data is on the regular '+
'clipboard, loads it into the SocialCalc clipboard, and then "pastes" it starting at the current cell. '+
'This is an easy way to copy data from a web page into a spreadsheet. '+
'Similarly, Ctrl-C loads the SocialCalc clipboard and the system clipboard. '+
'Ctrl-V differs from the Paste button in that it only pastes values and formulas, and not formats. '+
'<br><br> '+
'Right now this code is mainly being developed to run under control of a native Python '+
'application running on the OLPC XO. '+
'This version, though, can also be run directly in a browser. '+
'<br><br> '+
'When the program encounters an error, it may display a message at the bottom of the screen. '+
'You can click on the message to erase it. '+
'<br><br> '+
'Comments can be sent to "socialcalc" at "softwaregarden.com". '+
'<br><br> '+
'<hr> '+
'<b>FUNCTION HELP</b> '+
'<br><br> '+
'The following functions are currently supported in formulas (case is ignored in function names): '+
'<style> '+
'.helplist dt {font-weight:bold;} '+
'.helplist dd {padding-bottom:6pt;} '+
'</style> '+
'<div style="padding:6pt 0px 0px 1em;" class="helplist"> '+
'<dl> '+
'<dt>ABS(value)<dd>Absolute value function. '+
'<dt>ACOS(value)<dd>Trigonometric arccosine function. '+
'<dt>AND(value1, value2, ...)<dd>True if all arguments are true. '+
'<dt>ASIN(value)<dd>Trigonometric arcsine function. '+
socialcalc/socialcalc2demo10.html view on Meta::CPAN
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>SocialCalc 0.7.10</title>
<script type="text/javascript" src="socialcalcconstants.js"></script>
<script type="text/javascript" src="socialcalc-3.js"></script>
<script type="text/javascript" src="socialcalctableeditor.js"></script>
<script type="text/javascript" src="formatnumber2.js"></script>
<script type="text/javascript" src="formula1.js"></script>
<script type="text/javascript" src="socialcalcpopup.js"></script>
<script type="text/javascript" src="socialcalcspreadsheetcontrol.js"></script>
<style>
body, td, input, texarea {font-family:verdana,helvetica,sans-serif;font-size:small;}
.smaller {font-size:smaller;}
</style>
</head>
<body style="background-color:#FFF;" onresize="spreadsheet.DoOnResize();">
<div style="margin:8px 0px 10px 0px;">
<div id="tableeditor" style="margin:8px 0px 10px 0px;">editor goes here</div>
socialcalc/socialcalc2demo10.html view on Meta::CPAN
'Because this is a spreadsheet, you can scroll any amount without needing to create new rows or columns. '+
'Dragging the thumb to the end of a scrollbar attempts to go to the last row or column where there is/was data. '+
'The mousewheel is also supported. '+
'<br><br> '+
'In addition to the scrollbars there are two pane sliders (that start out at the beginning of the scrollbars) '+
'that let you "lock" the upper rows or columns to facilitate keeping column and row headers visible when scrolling. '+
'<br><br> '+
'You can type values in cells. '+
'An input box will pop up. It may be moved by dragging the top of the box. '+
'Press Enter, use an arrow key, or click on a cell to finish. '+
'If you are in a partial formula (e.g., "=1+" or "=SUM(") an arrow key or cell click will '+
'insert the name of the newly selected cell into the formula, similar to a traditional spreadsheet. '+
'Cell ranges are separated by typing a ":", or you can use the drag or shift-click range selection methods. '+
'<br><br> '+
'The program supports many forms of data, such as numbers, text (preceded by a "\'" if necessary '+
'to distinguish it from numbers), dates (e.g., "1/2/3"), dollars ("$1,234.50"), time ("3:45"), '+
'numbers with fractions ("1 1/2"), and "true", "false", and "#N/A". '+
'A value\'s type determines its displayed format if there is no explicit numeric format set for a cell. '+
'The program supports a wide variety of formats (including other currencies) through its custom format functionality, '+
'but this early release only has several that are hardcoded in for you to select from the UI. '+
'<br><br> '+
'Use the Esc key to cancel during edits. '+
'The Del key deletes the values of the selected cell(s). '+
'<br><br> '+
'The 109 formula functions that the June 2007 Open Document Format "Open Formula" specification '+
'calls the "small group" are available. '+
'(<b><i>A simple reference to all of the functions is provided below.</i></b>) '+
'The specification says that: "This group includes approximately 100 functions, '+
'and includes the basic functions that are very widely implemented in spreadsheet applications, '+
'even in resource-constrained environments."<br><br> '+
'The definitions of the functions follow common conventions, '+
'with common syntax similar to many other spreadsheets. '+
'You can, for example, have a function like IF(B10=B3, "Yes", "No"), where B10 and B3 may contain text values '+
'(comparisons are not case-sensitive). '+
'<br><br> '+
socialcalc/socialcalc2demo10.html view on Meta::CPAN
'While the cell settings are only displayed for the current cell, on "Save" the same changes are applied to all cells '+
'in the currently highlighted range of cells. '+
'The Sheet settings let you set the default size of columns. To change the width of an individual column click and '+
'drag in the column header. '+
'<br><br> '+
'The <b>Sort</b> tab lets you select a range of cells (which is remembered) to sort, as well as to set which columns '+
'are used to determine the order and the direction. '+
'<br><br> '+
'There is a <b>Comment</b> tab for accessing the optional comment text for the currently selected cell.'+
'<br><br> '+
'The <b>Name</b> tab lets you set named ranges that may be used in formulas.'+
'<br><br> '+
'The <b>Graph</b> tab displays a very simple bar graph representation of the cells currently selected as a range '+
'(either in a single row across or column down). '+
'If the range is a single row or column, and if the row above (or column to the left) has values, those values are used as labels. '+
'Otherwise the cell coordinates are used (e.g., B5). '+
'This is a very early, minimal implementation. '+
'<br><br> '+
'The <b>Plain</b> tab shows the sheet rendered without the grid or editing controls. '+
'<br><br> '+
'The <b>Clipboard</b> tab lets you view the SocialCalc clipboard in tab-delimited format, and optionally reload it with new data. '+
socialcalc/socialcalc2demo10.html view on Meta::CPAN
'This version, though, can also be run directly in a browser. '+
'<br><br> '+
'When the program encounters an error, it may display a message at the bottom of the screen. '+
'You can click on the message to erase it. '+
'<br><br> '+
'Comments can be sent to "socialcalc" at "softwaregarden.com". '+
'<br><br> '+
'<hr> '+
'<b>FUNCTION HELP</b> '+
'<br><br> '+
'The following functions are currently supported in formulas (case is ignored in function names): '+
'<style> '+
'.helplist dt {font-weight:bold;} '+
'.helplist dd {padding-bottom:6pt;} '+
'</style> '+
'<div style="padding:6pt 0px 0px 1em;" class="helplist"> '+
'<dl> '+
'<dt>ABS(value)<dd>Absolute value function. '+
'<dt>ACOS(value)<dd>Trigonometric arccosine function. '+
'<dt>AND(value1, value2, ...)<dd>True if all arguments are true. '+
'<dt>ASIN(value)<dd>Trigonometric arcsine function. '+
socialcalc/socialcalcconstants.js view on Meta::CPAN
//** SocialCalc.InputEchoText
ietUnknownFunction: "Unknown function ", // displayed when typing "=unknown("
//** SocialCalc.CellHandles
CH_radius1: 29.0, // extent of inner circle within 90px image
CH_radius2: 41.0, // extent of outer circle within 90px image
s_CHfillAllTooltip: "Fill Contents and Formats Down/Right", // tooltip for fill all handle
s_CHfillContentsTooltip: "Fill Contents Only Down/Right", // tooltip for fill formulas handle
s_CHmovePasteAllTooltip: "Move Contents and Formats", // etc.
s_CHmovePasteContentsTooltip: "Move Contents Only",
s_CHmoveInsertAllTooltip: "Slide Contents and Formats within Row/Col",
s_CHmoveInsertContentsTooltip: "Slide Contents within Row/Col",
s_CHindicatorOperationLookup: {"Fill": "Fill", "FillC": "Fill Contents",
"Move": "Move", "MoveI": "Slide",
"MoveC": "Move Contents", "MoveIC": "Slide Contents"}, // short form of operation to follow drag
s_CHindicatorDirectionLookup: {"Down": " Down", "Right": " Right",
"Horizontal": " Horizontal", "Vertical": " Vertical"}, // direction that modifies operation during drag
socialcalc/socialcalcconstants.js view on Meta::CPAN
// Constants for default Format tab (settings)
//
// *** EVEN THOUGH THESE DON'T START WITH s_: ***
//
// These should be carefully checked for localization. Make sure you understand what they do and how they work!
// The first part of "first:second|first:second|..." is what is displayed and the second is the value to be used.
// The value is normally not translated -- only the displayed part. The [cancel], [break], etc., are not translated --
// they are commands to SocialCalc.SettingsControls.PopupListInitialize
SCFormatNumberFormats: "[cancel]:|[break]:|%loc!Default!:|[custom]:|%loc!Automatic!:general|%loc!Auto w/ commas!:[,]General|[break]:|"+
"00:00|000:000|0000:0000|00000:00000|[break]:|%loc!Formula!:formula|%loc!Hidden!:hidden|[newcol]:"+
"1234:0|1,234:#,##0|1,234.5:#,##0.0|1,234.56:#,##0.00|1,234.567:#,##0.000|1,234.5678:#,##0.0000|"+
"[break]:|1,234%:#,##0%|1,234.5%:#,##0.0%|1,234.56%:#,##0.00%|"+
"[newcol]:|$1,234:$#,##0|$1,234.5:$#,##0.0|$1,234.56:$#,##0.00|[break]:|"+
"(1,234):#,##0_);(#,##0)|(1,234.5):#,##0.0_);(#,##0.0)|(1,234.56):#,##0.00_);(#,##0.00)|[break]:|"+
"($1,234):#,##0_);($#,##0)|($1,234.5):$#,##0.0_);($#,##0.0)|($1,234.56):$#,##0.00_);($#,##0.00)|"+
"[newcol]:|1/4/06:m/d/yy|01/04/2006:mm/dd/yyyy|2006-01-04:yyyy-mm-dd|4-Jan-06:d-mmm-yy|04-Jan-2006:dd-mmm-yyyy|January 4, 2006:mmmm d, yyyy|"+
"[break]:|1\\c23:h:mm|1\\c23 PM:h:mm AM/PM|1\\c23\\c45:h:mm:ss|01\\c23\\c45:hh:mm:ss|26\\c23 (h\\cm):[hh]:mm|69\\c45 (m\\cs):[mm]:ss|69 (s):[ss]|"+
"[newcol]:|2006-01-04 01\\c23\\c45:yyyy-mm-dd hh:mm:ss|January 4, 2006:mmmm d, yyyy hh:mm:ss|Wed:ddd|Wednesday:dddd|",
SCFormatTextFormats: "[cancel]:|[break]:|%loc!Default!:|[custom]:|%loc!Automatic!:general|%loc!Plain Text!:text-plain|"+
"HTML:text-html|%loc!Wikitext!:text-wiki|%loc!Link!:text-link|%loc!Formula!:formula|%loc!Hidden!:hidden|",
SCFormatPadsizes: "[cancel]:|[break]:|%loc!Default!:|[custom]:|%loc!No padding!:0px|"+
"[newcol]:|1 pixel:1px|2 pixels:2px|3 pixels:3px|4 pixels:4px|5 pixels:5px|"+
"6 pixels:6px|7 pixels:7px|8 pixels:8px|[newcol]:|9 pixels:9px|10 pixels:10px|11 pixels:11px|"+
"12 pixels:12px|13 pixels:13px|14 pixels:14px|16 pixels:16px|"+
"18 pixels:18px|[newcol]:|20 pixels:20px|22 pixels:22px|24 pixels:24px|28 pixels:28px|36 pixels:36px|",
SCFormatFontsizes: "[cancel]:|[break]:|%loc!Default!:|[custom]:|X-Small:x-small|Small:small|Medium:medium|Large:large|X-Large:x-large|"+
"[newcol]:|6pt:6pt|7pt:7pt|8pt:8pt|9pt:9pt|10pt:10pt|11pt:11pt|12pt:12pt|14pt:14pt|16pt:16pt|"+
"[newcol]:|18pt:18pt|20pt:20pt|22pt:22pt|24pt:24pt|28pt:28pt|36pt:36pt|48pt:48pt|72pt:72pt|"+
"[newcol]:|8 pixels:8px|9 pixels:9px|10 pixels:10px|11 pixels:11px|"+
"12 pixels:12px|13 pixels:13px|14 pixels:14px|[newcol]:|16 pixels:16px|"+
socialcalc/socialcalcconstants.js view on Meta::CPAN
s_loc_description: "Description",
s_loc_display_clipboard_in: "Display Clipboard in",
s_loc_down: "Down",
s_loc_edit: "Edit",
s_loc_existing_names: "Existing Names",
s_loc_family: "Family",
s_loc_fill_down: "Fill Down",
s_loc_fill_right: "Fill Right",
s_loc_font: "Font",
s_loc_format: "Format",
s_loc_formula: "Formula",
s_loc_function_list: "Function List",
s_loc_functions: "Functions",
s_loc_grid: "Grid",
s_loc_hidden: "Hidden",
s_loc_horizontal: "Horizontal",
s_loc_insert_column: "Insert Column",
s_loc_insert_row: "Insert Row",
s_loc_italic: "Italic",
s_loc_last_sort: "Last Sort",
s_loc_left: "Left",
socialcalc/socialcalcconstants.js view on Meta::CPAN
s_FormatNumber_daynames3: ["Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"],
s_FormatNumber_monthnames: ["January", "February", "March", "April", "May", "June", "July", "August", "September",
"October", "November", "December"],
s_FormatNumber_monthnames3: ["Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"],
s_FormatNumber_am: "AM",
s_FormatNumber_am1: "A",
s_FormatNumber_pm: "PM",
s_FormatNumber_pm1: "P",
//
// SocialCalc Spreadsheet Formula module, formula1.js:
//
s_parseerrexponent: "Improperly formed number exponent",
s_parseerrchar: "Unexpected character in formula",
s_parseerrstring: "Improperly formed string",
s_parseerrspecialvalue: "Improperly formed special value",
s_parseerrtwoops: "Error in formula (two operators inappropriately in a row)",
s_parseerrmissingopenparen: "Missing open parenthesis in list with comma(s). ",
s_parseerrcloseparennoopen: "Closing parenthesis without open parenthesis. ",
s_parseerrmissingcloseparen: "Missing close parenthesis. ",
s_parseerrmissingoperand: "Missing operand. ",
s_parseerrerrorinformula: "Error in formula.",
s_calcerrerrorvalueinformula: "Error value in formula",
s_parseerrerrorinformulabadval: "Error in formula resulting in bad value",
s_formularangeresult: "Formula results in range value:",
s_calcerrnumericnan: "Formula results in an bad numeric value",
s_calcerrnumericoverflow: "Numeric overflow",
s_sheetunavailable: "Sheet unavailable:", // when FindSheetInCache returns null
s_calcerrcellrefmissing: "Cell reference missing when expected.",
s_calcerrsheetnamemissing: "Sheet name missing when expected.",
s_circularnameref: "Circular name reference to name",
s_calcerrunknownname: "Unknown name",
s_calcerrincorrectargstofunction: "Incorrect arguments to function",
s_sheetfuncunknownfunction: "Unknown function",
s_sheetfunclnarg: "LN argument must be greater than 0",
socialcalc/socialcalcserver.pl view on Meta::CPAN
$response = <<"EOF"; # output page with edit JS code
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>$titlestr - $pagename</title>
<script type="text/javascript" src="${jsdir}socialcalcconstants.js"></script>
<script type="text/javascript" src="${jsdir}socialcalc-3.js"></script>
<script type="text/javascript" src="${jsdir}socialcalctableeditor.js"></script>
<script type="text/javascript" src="${jsdir}formatnumber2.js"></script>
<script type="text/javascript" src="${jsdir}formula1.js"></script>
<script type="text/javascript" src="${jsdir}socialcalcpopup.js"></script>
<script type="text/javascript" src="${jsdir}socialcalcspreadsheetcontrol.js"></script>
<style>
body, td, input, texarea
{font-family:verdana,helvetica,sans-serif;font-size:small;}
.smaller {font-size:smaller;}
</style>
</head>
<body>
<form name="f0" action="" method="POST">
socialcalc/socialcalcserver.pl view on Meta::CPAN
$response = <<"EOF"; # output page with JS code to render
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>$titlestr - $pagename</title>
<script type="text/javascript" src="${jsdir}socialcalcconstants.js"></script>
<script type="text/javascript" src="${jsdir}socialcalc-3.js"></script>
<script type="text/javascript" src="${jsdir}socialcalctableeditor.js"></script>
<script type="text/javascript" src="${jsdir}formatnumber2.js"></script>
<script type="text/javascript" src="${jsdir}formula1.js"></script>
<script type="text/javascript" src="${jsdir}socialcalcpopup.js"></script>
<script type="text/javascript" src="${jsdir}socialcalcspreadsheetcontrol.js"></script>
<style>
body, td, input, texarea
{font-family:verdana,helvetica,sans-serif;font-size:small;}
.smaller {font-size:smaller;}
</style>
</head>
<body>
EOF
socialcalc/socialcalcspreadsheetcontrol.js view on Meta::CPAN
this.idPrefix = "SocialCalc-"; // prefix added to element ids used here, should end in "-"
this.multipartBoundary = "SocialCalcSpreadsheetControlSave"; // boundary used by SpreadsheetControlCreateSpreadsheetSave
this.imagePrefix = scc.defaultImagePrefix; // prefix added to img src
this.toolbarbackground = scc.SCToolbarbackground;
this.tabbackground = scc.SCTabbackground; // "background-color:#CCC;";
this.tabselectedCSS = scc.SCTabselectedCSS;
this.tabplainCSS = scc.SCTabplainCSS;
this.toolbartext = scc.SCToolbartext;
this.formulabarheight = scc.SCFormulabarheight; // in pixels, will contain a text input box
this.statuslineheight = scc.SCStatuslineheight; // in pixels
this.statuslineCSS = scc.SCStatuslineCSS;
// Callbacks:
this.ExportCallback = null; // a function called for Clipboard Export button: this.ExportCallback(spreadsheet_control_object)
// Initialization Code:
socialcalc/socialcalcspreadsheetcontrol.js view on Meta::CPAN
if (editor.range2.hasrange && !editor.cellhandles.noCursorSuffix) {
if (editor.ecell.row==editor.range2.top && (editor.ecell.col<editor.range2.left || editor.ecell.col>editor.range2.right+1)) {
spreadsheet.context.cursorsuffix = "insertleft";
}
if (editor.ecell.col==editor.range2.left && (editor.ecell.row<editor.range2.top || editor.ecell.row>editor.range2.bottom+1)) {
spreadsheet.context.cursorsuffix = "insertup";
}
}
};
// formula bar buttons
this.formulabuttons = {
formulafunctions: {image: "formuladialog.gif", tooltip: "Functions", // tooltips are localized when set below
command: SocialCalc.SpreadsheetControl.DoFunctionList},
multilineinput: {image: "multilinedialog.gif", tooltip: "Multi-line Input Box",
command: SocialCalc.SpreadsheetControl.DoMultiline},
link: {image: "linkdialog.gif", tooltip: "Link Input Box",
command: SocialCalc.SpreadsheetControl.DoLink},
sum: {image: "sumdialog.gif", tooltip: "Auto Sum",
command: SocialCalc.SpreadsheetControl.DoSum}
}
// Default tabs:
socialcalc/socialcalcspreadsheetcontrol.js view on Meta::CPAN
if (!bele) {alert("Button "+(spreadsheet.idPrefix+button)+" missing"); continue;}
bele.style.border = "1px solid "+scc.ISCButtonBorderNormal;
SocialCalc.TooltipRegister(bele, SCLoc(spreadsheet.Buttons[button].tooltip), {});
SocialCalc.ButtonRegister(bele,
{normalstyle: "border:1px solid "+scc.ISCButtonBorderNormal+";backgroundColor:"+scc.ISCButtonBorderNormal+";",
hoverstyle: "border:1px solid "+scc.ISCButtonBorderHover+";backgroundColor:"+scc.ISCButtonBorderNormal+";",
downstyle: "border:1px solid "+scc.ISCButtonBorderDown+";backgroundColor:"+scc.ISCButtonDownBackground+";"},
{MouseDown: SocialCalc.DoButtonCmd, command: spreadsheet.Buttons[button].command});
}
// create formula bar
spreadsheet.formulabarDiv = document.createElement("div");
spreadsheet.formulabarDiv.style.height = spreadsheet.formulabarheight + "px";
spreadsheet.formulabarDiv.innerHTML = '<input type="text" size="60" value=""> '; //'<textarea rows="4" cols="60" style="z-index:5;background-color:white;position:relative;"></textarea> ';
spreadsheet.spreadsheetDiv.appendChild(spreadsheet.formulabarDiv);
var inputbox = new SocialCalc.InputBox(spreadsheet.formulabarDiv.firstChild, spreadsheet.editor);
for (button in spreadsheet.formulabuttons) {
bele = document.createElement("img");
bele.id = spreadsheet.idPrefix+button;
bele.src = spreadsheet.imagePrefix+spreadsheet.formulabuttons[button].image;
bele.style.verticalAlign = "middle";
bele.style.border = "1px solid #FFF";
bele.style.marginLeft = "4px";
SocialCalc.TooltipRegister(bele, SCLoc(spreadsheet.formulabuttons[button].tooltip), {});
SocialCalc.ButtonRegister(bele,
{normalstyle: "border:1px solid #FFF;backgroundColor:#FFF;",
hoverstyle: "border:1px solid #CCC;backgroundColor:#FFF;",
downstyle: "border:1px solid #000;backgroundColor:#FFF;"},
{MouseDown: spreadsheet.formulabuttons[button].command});
spreadsheet.formulabarDiv.appendChild(bele);
}
// initialize tabs that need it
for (i=0; i<tabs.length; i++) { // execute any tab-specific initialization code
if (tabs[i].oncreate) {
tabs[i].oncreate(spreadsheet, tabs[i].name);
}
}
socialcalc/socialcalcspreadsheetcontrol.js view on Meta::CPAN
if (obj && obj.blur) obj.blur();
SocialCalc.KeyboardFocus();
}
SocialCalc.SpreadsheetCmdLookup = {
'copy': 'copy %C all',
'cut': 'cut %C all',
'paste': 'paste %C all',
'pasteformats': 'paste %C formats',
'delete': 'erase %C formulas',
'filldown': 'filldown %C all',
'fillright': 'fillright %C all',
'erase': 'erase %C all',
'borderon': 'set %C bt %S%Nset %C br %S%Nset %C bb %S%Nset %C bl %S',
'borderoff': 'set %C bt %S%Nset %C br %S%Nset %C bb %S%Nset %C bl %S',
'merge': 'merge %C',
'unmerge': 'unmerge %C',
'align-left': 'set %C cellformat left',
'align-center': 'set %C cellformat center',
'align-right': 'set %C cellformat right',
socialcalc/socialcalcspreadsheetcontrol.js view on Meta::CPAN
"tvf": [
{t:"Default", s:""},
{t:"Automatic", s:"general"},
{t:"Plain Text", s:"text-plain"},
{t:"HTML", s:"text-html"},
{t:"Wiki", s:"text-wiki"},
{t:"Hidden", s:"hidden"}
],
"ffal": [ // Formulas, Formats, All
{t:"All", s:"all"},
{t:"Contents", s:"formulas"},
{t:"Formats", s:"formats"}
],
"all": [ // All
{t:"All", s:"all"}
],
"rowcol": [
{t:"Row", s:"row"},
{t:"Column", s:"col"}
],
"sortcol": [
socialcalc/socialcalcspreadsheetcontrol.js view on Meta::CPAN
var cmd, cell, row, col, sel, cr, foundvalue;
var spreadsheet = SocialCalc.GetSpreadsheetControlObject();
var editor = spreadsheet.editor;
var sheet = editor.context.sheetobj;
if (editor.range.hasrange) {
sel = SocialCalc.crToCoord(editor.range.left, editor.range.top)+
":"+SocialCalc.crToCoord(editor.range.right, editor.range.bottom);
cmd = "set "+SocialCalc.crToCoord(editor.range.right, editor.range.bottom+1)+
" formula sum("+sel+")";
}
else {
row = editor.ecell.row - 1;
col = editor.ecell.col;
if (row<=1) {
cmd = "set "+editor.ecell.coord+" constant e#REF! 0 #REF!";
}
else {
foundvalue = false;
while (row>0) {
socialcalc/socialcalcspreadsheetcontrol.js view on Meta::CPAN
if (foundvalue) {
row++;
break;
}
}
else {
foundvalue = true;
}
row--;
}
cmd = "set "+editor.ecell.coord+" formula sum("+
SocialCalc.crToCoord(col,row)+":"+SocialCalc.crToCoord(col, editor.ecell.row-1)+")";
}
}
editor.EditorScheduleSheetCommands(cmd, true, false);
}
//
socialcalc/socialcalctableeditor.js view on Meta::CPAN
":"+SocialCalc.crToCoord(editor.range.right, editor.range.bottom);
}
else {
sel = editor.ecell.coord;
}
// get what to copy to clipboard
cliptext = SocialCalc.ConvertSaveToOtherFormat(SocialCalc.CreateSheetSave(editor.context.sheetobj, sel), "tab");
if (charname == "[ctrl-c]" || editor.noEdit) { // if copy or cut but in no edit
cmd = "copy "+sel+" formulas";
}
else { // [ctrl-x]
cmd = "cut "+sel+" formulas";
}
editor.EditorScheduleSheetCommands(cmd, true, false); // queue up command to put on SocialCalc clipboard
/* Copy as HTML: This fails rather badly as it won't paste into Notepad as tab-delimited text. Oh well.
ha = editor.pasteHTMLarea;
if (editor.range.hasrange) {
cell = SocialCalc.GetEditorCellElement(editor, editor.range.top, editor.range.left);
}
else {
socialcalc/socialcalctableeditor.js view on Meta::CPAN
cmd = "loadclipboard "+
SocialCalc.encodeForSave(SocialCalc.ConvertOtherFormatToSave(value, "tab")) + "\n";
}
var cr;
if (editor.range.hasrange) {
cr = SocialCalc.crToCoord(editor.range.left, editor.range.top);
}
else {
cr = editor.ecell.coord;
}
cmd += "paste "+cr+" formulas";
editor.EditorScheduleSheetCommands(cmd, true, false);
SocialCalc.KeyboardFocus();
}, 200);
return true;
case "[ctrl-z]":
editor.EditorScheduleSheetCommands("undo", true, false);
return false;
case "[ctrl-s]": // !!!! temporary hack
socialcalc/socialcalctableeditor.js view on Meta::CPAN
type = "text t";
value = typeof text == "string" ? text : editor.inputBox.GetText(); // either explicit or from input box
oldvalue = SocialCalc.GetCellContents(sheetobj, wval.ecoord)+"";
if (value == oldvalue) { // no change
return;
}
fch = value.charAt(0);
if (fch=="=" && value.indexOf("\n")==-1) {
type = "formula";
value = value.substring(1);
}
else if (fch=="'") {
type = "text t";
value = value.substring(1);
}
else if (value.length==0) {
type = "empty";
}
else {
socialcalc/socialcalctableeditor.js view on Meta::CPAN
// *************************************
//
// InputBox class:
//
// This class deals with the text box for editing cell contents.
// It mainly controls a user input box for typed content and is used to interact with
// the keyboard code, etc.
//
// You can use this inside a formula bar control of some sort.
// You create this after you have created a table editor object (but not necessarily
// done the CreateTableEditor method).
//
// When the user starts typing text, or double-clicks on a cell, this object
// comes into play.
//
// The element given when this is first constructed should be an input HTMLElement or
// something that acts like one. Check the code here to see what is done to it.
//
// *************************************
socialcalc/socialcalctableeditor.js view on Meta::CPAN
if (!element) return; // invoked without enough data to work
this.element = element; // the input element associated with this InputBox
this.editor = editor; // the TableEditor this belongs to
this.inputEcho = null;
editor.inputBox = this;
element.onmousedown = SocialCalc.InputBoxOnMouseDown;
editor.MoveECellCallback.formulabar = function(e){
if (e.state!="start") return; // if not in normal keyboard mode don't replace formula bar
editor.inputBox.DisplayCellContents(e.ecell.coord);
};
}
// Methods:
SocialCalc.InputBox.prototype.DisplayCellContents = function(coord) {SocialCalc.InputBoxDisplayCellContents(this, coord);};
SocialCalc.InputBox.prototype.ShowInputBox = function(show) {this.editor.inputEcho.ShowInputEcho(show);};
SocialCalc.InputBox.prototype.GetText = function() {return this.element.value;};
socialcalc/socialcalctableeditor.js view on Meta::CPAN
switch (cellhandles.dragtype) {
case "Fill":
case "Move":
case "MoveI":
cmdtype2 = " all";
break;
case "FillC":
case "MoveC":
case "MoveIC":
cmdtype2 = " formulas";
break;
}
if (!cellhandles.movedmouse) { // didn't move: just leave one cell selected
cellhandles.dragtype = "Nothing";
}
switch (cellhandles.dragtype) {
case "Nothing":
editor.Range2Remove();
socialcalc/ssctrltest1.html view on Meta::CPAN
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>SS Ctrl Test 1</title>
<script type="text/javascript" src="socialcalcconstants.js"></script>
<script type="text/javascript" src="socialcalc-3.js"></script>
<script type="text/javascript" src="socialcalctableeditor.js"></script>
<script type="text/javascript" src="formatnumber2.js"></script>
<script type="text/javascript" src="formula1.js"></script>
<script type="text/javascript" src="socialcalcpopup.js"></script>
<script type="text/javascript" src="socialcalcspreadsheetcontrol.js"></script>
<link rel="stylesheet" type="text/css" href="socialcalc.css">
<style>
body
{font-family:verdana,helvetica,sans-serif;font-size:small;}
.testclass {border:2px dotted red;}
.testclass2 {background-image:url(images/sc-logo.gif);}
.smaller {font-size:smaller;}
.hide {display:none;}
socialcalc/ssctrltest1.html view on Meta::CPAN
var cmd, cell, row, col, sel, cr, foundvalue;
var spreadsheet = SocialCalc.GetSpreadsheetControlObject();
var editor = spreadsheet.editor;
var sheet = editor.context.sheetobj;
if (editor.range.hasrange) {
sel = SocialCalc.crToCoord(editor.range.left, editor.range.top)+
":"+SocialCalc.crToCoord(editor.range.right, editor.range.bottom);
cmd = "set "+SocialCalc.crToCoord(editor.range.right, editor.range.bottom+1)+
" formula sum("+sel+")";
}
else {
row = editor.ecell.row - 1;
col = editor.ecell.col;
if (row<=1) {
cmd = "set "+editor.ecell.coord+" constant e#REF! 0 #REF!";
}
else {
foundvalue = false;
while (row>0) {
socialcalc/ssctrltest1.html view on Meta::CPAN
if (foundvalue) {
row++;
break;
}
}
else {
foundvalue = true;
}
row--;
}
cmd = "set "+editor.ecell.coord+" formula sum("+
SocialCalc.crToCoord(col,row)+":"+SocialCalc.crToCoord(col, editor.ecell.row-1)+")";
}
}
editor.EditorScheduleSheetCommands(cmd);
}
function dosum2() {
( run in 0.373 second using v1.01-cache-2.11-cpan-3cd7ad12f66 )