diff options
author | Alfonso Eusebio <alfonso_eusebio@yahoo.co.uk> | 2011-02-14 08:16:04 +0000 |
---|---|---|
committer | Kohei Yoshida <kyoshida@novell.com> | 2011-02-14 11:31:20 -0500 |
commit | 8032a423abc2b8b16629e74d5179fa7225611b1d (patch) | |
tree | 454ac5acce872ac43a11cc4caaae75fe4c73f8e7 /sc | |
parent | b0d0898672403f37ea6dde9a5839562eca5ce3ba (diff) |
Remove legacy Addin functions from calc
Removes legacy addin functions - seems to be sample code only.
These functions are available through the newer scaddin module.
Diffstat (limited to 'sc')
-rw-r--r-- | sc/addin/datefunc/dfa.cl | 729 | ||||
-rw-r--r-- | sc/addin/datefunc/dfa.src | 178 | ||||
-rw-r--r-- | sc/addin/datefunc/makefile.mk | 142 | ||||
-rw-r--r-- | sc/addin/inc/addin.h | 150 | ||||
-rw-r--r-- | sc/addin/inc/dfa.hrc | 61 | ||||
-rw-r--r-- | sc/addin/inc/rot13.hrc | 34 | ||||
-rw-r--r-- | sc/addin/makefile.mk | 45 | ||||
-rw-r--r-- | sc/addin/rot13/exports.map | 11 | ||||
-rw-r--r-- | sc/addin/rot13/makefile.mk | 88 | ||||
-rw-r--r-- | sc/addin/rot13/rot13.cl | 158 | ||||
-rw-r--r-- | sc/addin/rot13/rot13.src | 58 | ||||
-rw-r--r-- | sc/addin/util/cl2c.pl | 238 | ||||
-rw-r--r-- | sc/addin/util/makefile.mk | 47 | ||||
-rwxr-xr-x | sc/prj/build.lst | 7 |
14 files changed, 1 insertions, 1945 deletions
diff --git a/sc/addin/datefunc/dfa.cl b/sc/addin/datefunc/dfa.cl deleted file mode 100644 index d45a1b548a0d..000000000000 --- a/sc/addin/datefunc/dfa.cl +++ /dev/null @@ -1,729 +0,0 @@ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ - -/* static char datefunc_Id[]="@(#) StarCalc Datefunc AddIn (c) 1998-2000 Sun Microsystems, Inc."; */ - -#include <string.h> -#include <stdlib.h> -#include <math.h> - -#include <xlang.h> -#include <addin.h> -#include <dfa.hrc> - - -/** - * the current language the Addin is using - */ -static USHORT _nLanguage=LANGUAGE_ENGLISH; - -/** - * StarCalc calls this function to set a new current Language for the Addin - * - * @param *nLanguage - * - */ -void CALLTYPE SetLanguage( USHORT* nLanguage ) -{ - _nLanguage = GetNeutralLanguage( *nLanguage ); -} - - -/** - * Null Date, initialized in GetFunctionCount - * - * StarCalc uses a BaseDate 12/30/1899 - * If not specified otherwise in the Settings for the Spreedsheet Document. - * - * There's no way to get the Spreadsheet settings from whithin a simple addin, - * so this Addin can only be used by documents using the default BaseDate setting. - * - * The functions in this Addin use a BaseDate 01/01/0001 - * The nNullDate Variable is the StarCalc BaseDate converted to - * this internal date representation. - * - * @see #GetFunctionCount - * - */ - -static ULONG nNullDate=0; - -#define NULLDATE_Year 1899 -#define NULLDATE_Month 12 -#define NULLDATE_Day 30 - - -/** - * Array holding values for month length, used in DaysInMonth() function - * - * @see #DaysInMonth - * - */ -static USHORT aDaysInMonth[12] = { 31, 28, 31, 30, 31, 30, - 31, 31, 30, 31, 30, 31 }; - -/** - * Check if a year is a leap year in the Gregorian calendar - * - * @param nYear the year which should be checked - * @return true if the year is a leap year, false otherwise. - * - * @see #DaysInMonth, #IsLeapYear, - * @see #ScDate_DaysInMonth, #ScDate_IsLeapYear, #ScDate_WeeksInYear - * - */ -static BOOL IsLeapYear( USHORT nYear ) -{ - return (BOOL)((((nYear % 4) == 0) && ((nYear % 100) != 0)) || ((nYear % 400) == 0)); -} - - -/** - * Get the number of days in a specified month - * - * @param nMonth the number of the Month - * @param nYear the year - * @return number of days - * - */ -static USHORT DaysInMonth( USHORT nMonth, USHORT nYear ) -{ - if ( nMonth != 2 ) - return aDaysInMonth[nMonth-1]; - else - { - if ( IsLeapYear(nYear) ) - return aDaysInMonth[nMonth-1] + 1; - else - return aDaysInMonth[nMonth-1]; - } -} - - -/** - * Convert a date to a count of days starting from 01/01/0001 - * - * The internal representation of a Date used in this Addin - * is the number of days between 01/01/0001 and the date - * this function converts a Day , Month, Year representation - * to this internal Date value. - * - * @param nDay the day of the Month - * @param nMonth the number of the Month - * @param nYear the Year - * @return count of days from 01/01/0001 to the date specified - * - */ -static long DateToDays( USHORT nDay, USHORT nMonth, USHORT nYear ) -{ - long nDays; - USHORT i; - - nDays = ((ULONG)nYear-1) * 365; - nDays += ((nYear-1) / 4) - ((nYear-1) / 100) + ((nYear-1) / 400); - - for( i = 1; i < nMonth; i++ ) - nDays += DaysInMonth(i,nYear); - nDays += nDay; - - return nDays; -} - - -/** - * Convert a count of days starting from 01/01/0001 to a date - * - * The internal representation of a Date used in this Addin - * is the number of days between 01/01/0001 and the date - * this function converts this internal Date value - * to a Day , Month, Year representation of a Date. - * - * @param nDay count of days from 01/01/0001 - * @param *pDay pointer to a variable for the day of the month - * @param *pMonth pointer to a variable for the month - * @param *pYear pointer to a variable for the year - * - */ -static void DaysToDate( long nDays, - USHORT *pDay, USHORT *pMonth, USHORT *pYear ) -{ - long nTempDays; - long i = 0; - BOOL bCalc; - - do - { - nTempDays = (long)nDays; - *pYear = (USHORT)((nTempDays / 365) - i); - nTempDays -= ((ULONG) *pYear -1) * 365; - nTempDays -= (( *pYear -1) / 4) - (( *pYear -1) / 100) + ((*pYear -1) / 400); - bCalc = FALSE; - if ( nTempDays < 1 ) - { - i++; - bCalc = TRUE; - } - else - { - if ( nTempDays > 365 ) - { - if ( (nTempDays != 366) || !IsLeapYear( *pYear ) ) - { - i--; - bCalc = TRUE; - } - } - } - } - while ( bCalc ); - - *pMonth = 1; - while ( (ULONG)nTempDays > DaysInMonth( *pMonth, *pYear ) ) - { - nTempDays -= DaysInMonth( *pMonth, *pYear ); - (*pMonth)++; - } - *pDay = (USHORT)nTempDays; -} - -/** - * Get week difference between 2 dates - * - * new Weeks(date1,date2,mode) function for StarCalc - * - * Two modes of operation are provided. - * The first is just a simple division by 7 calculation. - * - * The second calculates the diffence by week of year. - * - * The International Standard IS-8601 has decreed that Monday - * shall be the first day of the week. - * - * A week that lies partly in one year and partly in annother - * is assigned a number in the the year in which most of its days lie. - * - * That means that week 1 of any year is the week that contains the 4. January - * - * The internal representation of a Date used in the Addin is the number of days based on 01/01/0001 - * - * A WeekDay can be then calculated by substracting 1 and calculating the rest of - * a division by 7, which gives a 0 - 6 value for Monday - Sunday - * - * Using the 4. January rule explained above the formula - * - * nWeek1= ( nDays1 - nJan4 + ( (nJan4-1) % 7 ) ) / 7 + 1; - * - * calculates a number between 0-53 for each day which is in the same year as nJan4 - * where 0 means that this week belonged to the year before. - * - * If a day in the same or annother year is used in this formula this calculates - * an calendar week offset from a given 4. January - * - * nWeek2 = ( nDays2 - nJan4 + ( (nJan4-1) % 7 ) ) / 7 + 1; - * - * The 4.January of first Date Argument can thus be used to calculate - * the week difference by calendar weeks which is then nWeek = nWeek2 - nWeek1 - * - * which can be optimized to - * - * nWeek = ( (nDays2-nJan4+((nJan4-1)%7))/7 ) - ( (nDays1-nJan4+((nJan4-1)%7))/7 ) - * - * Note: All calculations are operating on the long integer data type - * % is the modulo operator in C which calculates the rest of an Integer division - * - * - * @param *r - return value for the StarCalc function - * @param d1 - date value (in StarCalc representation based 12/30/1899), usually the older date - * @param d2 - date value (in StarCalc representation based 12/30/1899), usually the younger date - * @param dMode - mode of operation - * - * mode 0 is the interval between the dates in month, that is days / 7 - * - * mode 1 is the difference by week of year - * - */ -void CALLTYPE ScDate_GetDiffWeeks(double *r, double *d1, double *d2, double *dMode) -{ - long nDays1=0; - long nDays2=0; - int nMode=0; - - if ( d1 ) nDays1=(long)floor(*d1)+nNullDate; - if ( d2 ) nDays2=(long)floor(*d2)+nNullDate; - - - if ( dMode) nMode=(int)*dMode; - - if ( nMode == 1 ) { - - USHORT nDay,nMonth,nYear; - long nJan4; - - DaysToDate(nDays1,&nDay,&nMonth,&nYear); - nJan4=DateToDays(4,1,nYear); - - *r=(double) ( ( (nDays2-nJan4+((nJan4-1)%7))/7 ) - ( (nDays1-nJan4+((nJan4-1)%7))/7 ) ); - - } else { - - *r= (double) ( (nDays2 - nDays1) / 7 ) ; - } - -} - -/** - * Get month difference between 2 dates - * =Month(start, end, mode) Function for StarCalc - * - * two modes are provided - * - * @param *r - return value for the StarCalc function - * @param d1 - date value, start date - * @param d2 - date value, end date - * @param dMode - mode of operation - * - * mode 0 is the interval between the dates in month - * - * mode 1 is the difference in calendar month - * - */ -void CALLTYPE ScDate_GetDiffMonths(double *r, double *d1, double *d2, double *dMode) -{ - USHORT nDay1,nMonth1,nYear1; - USHORT nDay2,nMonth2,nYear2; - long nDays1=0; - long nDays2=0; - int nMode=0; - - if ( dMode) nMode=(int)*dMode; - - if ( d1 ) nDays1=(long)floor(*d1)+nNullDate; - if ( d2 ) nDays2=(long)floor(*d2)+nNullDate; - - DaysToDate(nDays1,&nDay1,&nMonth1,&nYear1); - DaysToDate(nDays2,&nDay2,&nMonth2,&nYear2); - - *r=(double) ( nMonth2 - nMonth1 + (nYear2 - nYear1) * 12 ); - if ( nMode == 1 || nDays1 == nDays2 ) return; - - if ( nDays1 < nDays2 ) { - if ( nDay1 > nDay2 ) { - *r -= 1; - } - } else { - if ( nDay1 < nDay2 ) { - *r += 1; - } - } - -} - - -/** - * Get Year difference between 2 dates - * - * two modes are provided - * - * @param *r - return value for the StarCalc function - * @param d1 - date value, start date - * @param d2 - date value, end date - * @param dMode - mode of operation - * - * mode 0 is the interval between the dates in years - * - * mode 1 is the difference in calendar years - * - */ -void CALLTYPE ScDate_GetDiffYears(double *r, double *d1, double *d2, double *dMode) -{ - USHORT nDay1,nMonth1,nYear1; - USHORT nDay2,nMonth2,nYear2; - long nDays1=0; - long nDays2=0; - int nMode=0; - - if ( dMode) nMode=(int)*dMode; - - if ( d1 ) nDays1=(long)floor(*d1)+nNullDate; - if ( d2 ) nDays2=(long)floor(*d2)+nNullDate; - - DaysToDate(nDays1,&nDay1,&nMonth1,&nYear1); - DaysToDate(nDays2,&nDay2,&nMonth2,&nYear2); - if ( nMode != 1 ) { - ScDate_GetDiffMonths(r,d1,d2,dMode); - *r= (double) ( ((int) *r) / 12 ); - } else { - *r=(double) ( nYear2 - nYear1 ); - } -} - -/** - * Check if a Date is in a leap year in the Gregorian calendar - * - * @param *r - return value for the StarCalc function - * @param d - date value (in StarCalc representation based 12/30/1899) - * - */ -void CALLTYPE ScDate_IsLeapYear(double *r, double *d) -{ - ULONG nDays; - USHORT nDay, nMonth, nYear; - double v=0.0; - - if ( d ) v=*d; - nDays=(int) v + nNullDate; - - DaysToDate(nDays,&nDay,&nMonth,&nYear); - - *r=(double) ( IsLeapYear(nYear) ); - -} - -/** - * Get the Number of Days in the month for a date - * - * @param *r - return value for the StarCalc function - * @param d - date value (in StarCalc representation based 12/30/1899) - * - */ -void CALLTYPE ScDate_DaysInMonth(double *r, double *d) -{ - ULONG nDays; - USHORT nDay, nMonth, nYear; - double v=0.0; - - if ( d ) v=*d; - nDays=(int) v + nNullDate; - - DaysToDate(nDays,&nDay,&nMonth,&nYear); - *r=(double) ( DaysInMonth( nMonth, nYear) ); - -} - - -/** - * Get number of weeks in the year for a date - * - * Most years have 52 weeks, but years that start on a Thursday - * and leep years that start on a Wednesday have 53 weeks - * - * The International Standard IS-8601 has decreed that Monday - * shall be the first day of the week. - * - * A WeekDay can be calculated by substracting 1 and calculating the rest of - * a division by 7 from the internal date represention - * which gives a 0 - 6 value for Monday - Sunday - * - * @param *r - return value for the StarCalc function - * @param d - date value (in StarCalc represantaion based 30.12.1899) - * - * @see #IsLeapYear #WeekNumber - * - */ -void CALLTYPE ScDate_WeeksInYear(double *r, double *d) -{ - ULONG nDays; - USHORT nDay, nMonth, nYear; - double v=0.0; - long nJan1WeekDay; - - if ( d ) v=*d; - nDays=(int) v + nNullDate; - - DaysToDate(nDays,&nDay,&nMonth,&nYear); - - nJan1WeekDay= ( DateToDays(1,1,nYear) - 1) % 7; - - if ( nJan1WeekDay == 3 ) { /* Thursday */ - *r=(double) 53; - return; - } else if ( nJan1WeekDay == 2 ) { /* Wednesday */ - *r= (double) ( IsLeapYear(nYear) ? 53 : 52 ); - } else { - *r= (double) 52; - } -} - - -/** - * Get number of days in the year of a date specified - * - * @param *r - return value for the StarCalc function - * @param d - date value (in StarCalc represantaion based 30.12.1899) - * - */ -void CALLTYPE ScDate_DaysInYear(double *r, double *d) -{ - ULONG nDays; - USHORT nDay, nMonth, nYear; - double v=0.0; - - if ( d ) v=*d; - nDays=(int) v + nNullDate; - - DaysToDate(nDays,&nDay,&nMonth,&nYear); - *r=(double) ( IsLeapYear(nYear) ? 366 : 365 ); - -} - - -/** - * Tell StarCalc how many new functions this Addin provides. - * - * It's called before any of these new functions is actually - * executed and is also used to initialize the NullDate here. - * - * StarCalc uses a Date Base 12/30/1899 - * If not specified otherwise in the Options for the Spreedsheet Document - * - * - * @param *nCount - returns the number of functions which are exported to StarCalc - * - */ -void CALLTYPE GetFunctionCount( USHORT *nCount ) -{ - - /* initialize nNullDate Value 0 is 12/30/1899 */ - nNullDate=DateToDays(NULLDATE_Day, NULLDATE_Month, NULLDATE_Year); - - *nCount = 7; -} - -/** - * Provides neccessary data for each new function to StarCalc - * - * @param *nNo Input: Function number between 0 and nCount - 1 - * @param *pFuncName Output: Functionname which should be called in the AddIn-DLL - * @param *nParamCount Output: Number of Parameter. Must be greater than 0, because there's always a return-Value. Maximum is 16. - * @param *peType Output: Pointer to arrray with exactly 16 variables of typ Paramtype. nParamCount Entries are set to the type of the corresponding Parameters. - * @param *pInternalName Output: Functionname as seen by the Spreadsheet user - * - * @see #GetFunctionCount, #GetParameterDescription - * - */ -void CALLTYPE GetFunctionData( USHORT * nNo, - char * pFuncName, - USHORT * nParamCount, - ParamType * peType, - char * pInternalName ) -{ - - - switch( *nNo ) { - case 0: - SO_StringCopy( pInternalName, getText(DFA_WEEK_NAME) ); - SO_StringCopy( pFuncName, "ScDate_GetDiffWeeks" ); - peType[0] = PTR_DOUBLE; - peType[1] = PTR_DOUBLE; - peType[2] = PTR_DOUBLE; - peType[3] = PTR_DOUBLE; - *nParamCount=4; - break; - - case 1: - SO_StringCopy( pInternalName, getText(DFA_MONTHS_NAME) ); - SO_StringCopy( pFuncName, "ScDate_GetDiffMonths" ); - peType[0] = PTR_DOUBLE; - peType[1] = PTR_DOUBLE; - peType[2] = PTR_DOUBLE; - peType[3] = PTR_DOUBLE; - *nParamCount=4; - break; - - case 2: - SO_StringCopy( pInternalName, getText(DFA_YEARS_NAME) ); - SO_StringCopy( pFuncName, "ScDate_GetDiffYears" ); - peType[0] = PTR_DOUBLE; - peType[1] = PTR_DOUBLE; - peType[2] = PTR_DOUBLE; - peType[3] = PTR_DOUBLE; - *nParamCount=4; - break; - - case 3: - SO_StringCopy( pInternalName, getText(DFA_ISLEAPYEAR_NAME) ); - SO_StringCopy( pFuncName, "ScDate_IsLeapYear" ); - peType[0] = PTR_DOUBLE; - peType[1] = PTR_DOUBLE; - *nParamCount=2; - break; - - case 4: - SO_StringCopy( pInternalName, getText(DFA_DAYSINMONTH_NAME) ); - SO_StringCopy( pFuncName, "ScDate_DaysInMonth" ); - peType[0] = PTR_DOUBLE; - peType[1] = PTR_DOUBLE; - *nParamCount=2; - break; - - case 5: - SO_StringCopy( pInternalName, getText(DFA_DAYSINYEAR_NAME) ); - SO_StringCopy( pFuncName, "ScDate_DaysInYear" ); - peType[0] = PTR_DOUBLE; - peType[1] = PTR_DOUBLE; - *nParamCount=2; - break; - - case 6: - SO_StringCopy( pInternalName, getText(DFA_WEEKSINYEAR_NAME) ); - SO_StringCopy( pFuncName, "ScDate_WeeksInYear" ); - peType[0] = PTR_DOUBLE; - peType[1] = PTR_DOUBLE; - *nParamCount=2; - break; - - default: - *nParamCount = 0; - *pFuncName = 0; - *pInternalName = 0; - break; - } -} - -/** - * Provides descriptions for each new function to StarCalc - * which are shown is the autopilot - * - * @param *nNo Input Parameter, Function number between 0 and nCount - 1 - * @param *nParam Parameter Number - * @param *pName Output: Name of the parameter - * @param *pDesc Output: Description of the parameter - * - * @see #GetFunctionCount, #GetParameterDescription - */ -void CALLTYPE GetParameterDescription( USHORT* nNo, USHORT* nParam, -char* pName, char* pDesc ) -{ - *pName = 0; - *pDesc = 0; - - switch ( *nNo ) { - case 0: /* Weeks */ - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(DFA_WEEK_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(DFA_PAR_DATE1_NAME)); - SO_StringCopy(pDesc,getText(DFA_WEEK_PAR1_DESC)); - break; - case 2: - SO_StringCopy(pName,getText(DFA_PAR_DATE2_NAME)); - SO_StringCopy(pDesc,getText(DFA_WEEK_PAR2_DESC)); - break; - case 3: - SO_StringCopy(pName,getText(DFA_PAR_MODE_NAME)); - SO_StringCopy(pDesc,getText(DFA_WEEK_PAR3_DESC)); - break; - } - break; - case 1: /* Months */ - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(DFA_MONTHS_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(DFA_PAR_DATE1_NAME)); - SO_StringCopy(pDesc,getText(DFA_MONTHS_PAR1_DESC)); - break; - case 2: - SO_StringCopy(pName,getText(DFA_PAR_DATE2_NAME)); - SO_StringCopy(pDesc,getText(DFA_MONTHS_PAR2_DESC)); - break; - case 3: - SO_StringCopy(pName,getText(DFA_PAR_MODE_NAME)); - SO_StringCopy(pDesc,getText(DFA_MONTHS_PAR3_DESC)); - break; - } - break; - case 2: /* Years */ - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(DFA_YEARS_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(DFA_PAR_DATE1_NAME)); - SO_StringCopy(pDesc,getText(DFA_YEARS_PAR1_DESC)); - break; - case 2: - SO_StringCopy(pName,getText(DFA_PAR_DATE2_NAME)); - SO_StringCopy(pDesc,getText(DFA_YEARS_PAR2_DESC)); - break; - case 3: - SO_StringCopy(pName,getText(DFA_PAR_MODE_NAME)); - SO_StringCopy(pDesc,getText(DFA_YEARS_PAR3_DESC)); - break; - } - break; - case 3: /* IsLeapYear */ - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(DFA_ISLEAPYEAR_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(DFA_PAR_DATE_NAME)); - SO_StringCopy(pDesc,getText(DFA_PAR_DATE_DESC)); /* StarCalc Value */ - break; - } - break; - case 4: /* DaysInMonth */ - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(DFA_DAYSINMONTH_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(DFA_PAR_DATE_NAME)); - SO_StringCopy(pDesc,getText(DFA_PAR_DATE_DESC)); /* StarCalc Value */ - break; - } - break; - case 5: /* DaysInYear */ - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(DFA_DAYSINYEAR_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(DFA_PAR_DATE_NAME)); - SO_StringCopy(pDesc,getText(DFA_PAR_DATE_DESC)); /* StarCalc Value */ - break; - } - break; - - case 6: /* WeeksInYear */ - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(DFA_WEEKSINYEAR_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(DFA_PAR_DATE_NAME)); - SO_StringCopy(pDesc,getText(DFA_PAR_DATE_DESC)); /* StarCalc Value */ - break; - } - break; - } - -} diff --git a/sc/addin/datefunc/dfa.src b/sc/addin/datefunc/dfa.src deleted file mode 100644 index 6a38f3068cc5..000000000000 --- a/sc/addin/datefunc/dfa.src +++ /dev/null @@ -1,178 +0,0 @@ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ -#include "sc.hrc" // Definition RID_XXX in StarCalc -#include "dfa.hrc" - -/* #i54546# The code belonging to this resource file is sample code for the - * legacy AddIn interface. The interface is still supported, but deprecated. - * The strings here were displayed in the function wizard. To prevent - * duplicated and useless translation effort (functions and strings are also - * part of the new scaddin module), the strings here are now layed out as fixed - * untranslatable strings. The entire mechanism with the ../util/cl2c.pl perl - * script merging the raw .cl and the .src during build time didn't work - * anymore anyway, since we switched from MS-LCIDs / telephone area codes to - * ISO codes for resources, and introduced localize.sdf files. Returned was - * always an empty string. Now at least the fixed English string is returned. - * */ - -Resource RID_SC_ADDIN_DFA -{ - String DFA_PAR_DATE1_NAME // Name of Date1 Parameter - { - Text = "Date 1"; - }; - String DFA_PAR_DATE2_NAME // Name of Date2 Parameter - { - Text = "Date 2"; - }; - String DFA_PAR_MODE_NAME // Name of Mode Parameter - { - Text = "Mode"; - }; - - String DFA_PAR_DATE_NAME // Name of Date Parameter - { - Text = "Date"; - }; - - String DFA_PAR_DATE_DESC // Description of Date Parameter - { - Text = "Internal number of the date"; - }; - -/*-=======================================================================*/ - String DFA_WEEK_NAME // Name - { - Text = "Weeks"; - }; - String DFA_WEEK_DESC // Description - { - Text = "Returns the difference in weeks between two dates"; - }; - String DFA_WEEK_PAR1_DESC // Description of Parameter 1 - { - Text = "The end date for calculating the difference in weeks"; - }; - String DFA_WEEK_PAR2_DESC // Description of Parameter 2 - { - Text = "The start date for calculating the difference weeks"; - }; - String DFA_WEEK_PAR3_DESC // Description of Parameter 3 - { - Text = "Type of difference calculation: mode=0 means the interval, mode=1 means calendar weeks"; - }; - -/*-=======================================================================*/ - - String DFA_MONTHS_NAME // Name - { - Text = "Months"; - }; - String DFA_MONTHS_DESC // Description - { - Text = "Determines the number of months between two dates"; - }; - String DFA_MONTHS_PAR1_DESC // Description of Parameter 1 - { - Text = "The end date for calculating the difference in months"; - }; - String DFA_MONTHS_PAR2_DESC // Description of Parameter 2 - { - Text = "The start date for calculating the difference in months"; - }; - String DFA_MONTHS_PAR3_DESC // Description of Parameter 2 - { - Text = "Type of difference calculation: Mode = 0 means interval, mode = 1 means in calendar months"; - }; - -/*-=======================================================================*/ - - String DFA_YEARS_NAME // Name - { - Text = "Years"; - }; - String DFA_YEARS_DESC // Description - { - Text = "Returns the difference in years between two dates"; - }; - String DFA_YEARS_PAR1_DESC // Description of Parameter 1 - { - Text = "The end date for calculating the difference in years"; - }; - String DFA_YEARS_PAR2_DESC // Description of Parameter 2 - { - Text = "The start date for calculating the difference in years"; - }; - String DFA_YEARS_PAR3_DESC // Description of Parameter 2 - { - Text = "Type of difference calculation: Mode=0 means interval, mode=1 means in calendar years."; - }; - -/*-=======================================================================*/ - - String DFA_ISLEAPYEAR_NAME // Name - { - Text = "IsLeapYear"; - }; - String DFA_ISLEAPYEAR_DESC // Description - { - Text = "Returns 1 (TRUE) if a leap year is used, otherwise 0 (FALSE) is returned"; - }; - -/*-=======================================================================*/ - - String DFA_DAYSINMONTH_NAME // Name - { - Text = "DaysInMonth"; - }; - String DFA_DAYSINMONTH_DESC // Description - { - Text = "Returns the number of days in the month in relation to the date entered"; - }; - -/*-=======================================================================*/ - - String DFA_DAYSINYEAR_NAME // Name - { - Text = "DaysInYear"; - }; - String DFA_DAYSINYEAR_DESC // Description - { - Text = "Returns the number of days in a year in relation to the date entered"; - }; - -/*-=======================================================================*/ - - String DFA_WEEKSINYEAR_NAME // Name - { - Text = "WeeksInYear"; - }; - String DFA_WEEKSINYEAR_DESC // Description - { - Text = "Returns the number of weeks in the year in relation to a date"; - }; -}; diff --git a/sc/addin/datefunc/makefile.mk b/sc/addin/datefunc/makefile.mk deleted file mode 100644 index 2b3f446e8c5a..000000000000 --- a/sc/addin/datefunc/makefile.mk +++ /dev/null @@ -1,142 +0,0 @@ -#************************************************************************* -# -# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. -# -# Copyright 2000, 2010 Oracle and/or its affiliates. -# -# OpenOffice.org - a multi-platform office productivity suite -# -# This file is part of OpenOffice.org. -# -# OpenOffice.org is free software: you can redistribute it and/or modify -# it under the terms of the GNU Lesser General Public License version 3 -# only, as published by the Free Software Foundation. -# -# OpenOffice.org is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU Lesser General Public License version 3 for more details -# (a copy is included in the LICENSE file that accompanied this code). -# -# You should have received a copy of the GNU Lesser General Public License -# version 3 along with OpenOffice.org. If not, see -# <http://www.openoffice.org/license.html> -# for a copy of the LGPLv3 License. -# -#************************************************************************* - -PRJ=..$/.. - -PRJNAME=sc -TARGET=dfa -LIBTARGET=NO - -# --- Settings ----------------------------------------------------- - -.INCLUDE: settings.mk - -CL2C=+$(PERL) $(MISC)$/cl2c.pl -CL2CRID=RID_SC_ADDIN_DFA -CL2CSRC=$(TARGET).src - -# --- Files -------------------------------------------------------- - -CFILES= $(MISC)$/x$(TARGET).c - -SLOFILES= \ - $(SLO)$/x$(TARGET).obj - -# ========================================================================== - -SHL1TARGET= $(TARGET)$(DLLPOSTFIX) -SHL1IMPLIB= i$(TARGET) -SHL1OBJS= $(SLO)$/x$(TARGET).obj -SHL1DEF= $(MISC)$/$(SHL1TARGET).def - -.IF "$(GUI)" == "WNT" -SHL1STDLIBS= $(GDI32LIB) $(ADVAPI32LIB) $(COMDLG32LIB) \ - $(UUIDLIB) $(OLE32LIB) $(SHELL32LIB) $(WINSPOOLLIB) -.IF "$(GVER)" == "W40" -SHL1STDLIBS= $(SHL1STDLIBS) $(COMCTL32LIB) -.ENDIF -.ENDIF - -# --- Targets ------------------------------------------------------- - -ALLTAR: $(MISC)$/$(TARGET).lst - - -.INCLUDE: target.mk - -$(MISC)$/x$(TARGET).c: $(TARGET).cl $(CL2CSRC) - $(CL2C) $(TARGET).cl $(MISC)$/x$(TARGET).c $(CL2CSRC) $(CL2CRID) - -# copy file to include in package -$(INCCOM)$/xlang.h : $(SOLARINCDIR)$/i18npool$/lang.h - @$(COPY) $(SOLARINCDIR)$/i18npool$/lang.h $@ - - -$(SLOFILES) : $(INCCOM)$/xlang.h $(CFILES) - -$(MISC)$/$(TARGET).lst : \ - $(MISC)$/x$(TARGET).c \ - $(INCCOM)$/xlang.h \ - ..$/inc$/$(TARGET).hrc \ - ..$/inc$/addin.h - echo $< > $@ - -# --- Def-File --- - -# ------------------------------------------------------------------ -# Windows DEF File -# ------------------------------------------------------------------ - -.IF "$(GUI)"=="WNT" - -$(MISC)$/$(SHL1TARGET).def: makefile.mk - @echo ------------------------------ - @echo Making: $@ - @echo LIBRARY $(SHL1TARGET)>$@ -.IF "$(COM)"!="GCC" - @echo DESCRIPTION 'DateF StarCalc Addin DLL'>>$@ - @echo DATA READ WRITE NONSHARED>>$@ -.ENDIF - @echo EXPORTS>>$@ - @echo GetFunctionCount>>$@ - @echo GetFunctionData>>$@ - @echo GetParameterDescription>>$@ - @echo SetLanguage >>$@ - @echo ScDate_GetDiffWeeks>>$@ - @echo ScDate_GetDiffMonths>>$@ - @echo ScDate_GetDiffYears>>$@ - @echo ScDate_IsLeapYear>>$@ - @echo ScDate_DaysInMonth>>$@ - @echo ScDate_DaysInYear>>$@ - @echo ScDate_WeeksInYear>>$@ - -.ENDIF - -.IF "$(GUI)"=="OS2" - -$(MISC)$/$(SHL1TARGET).def: makefile.mk - @echo ------------------------------ - @echo Making: $@ - @echo LIBRARY $(SHL1TARGET) INITINSTANCE TERMINSTANCE >$@ - @echo DESCRIPTION 'DateF StarCalc Addin DLL'>>$@ - @echo DATA MULTIPLE>>$@ - @echo EXPORTS>>$@ - @echo _GetFunctionCount>>$@ - @echo _GetFunctionData>>$@ - @echo _GetParameterDescription>>$@ - @echo _SetLanguage >>$@ - @echo _ScDate_GetDiffWeeks>>$@ - @echo _ScDate_GetDiffMonths>>$@ - @echo _ScDate_GetDiffYears>>$@ - @echo _ScDate_IsLeapYear>>$@ - @echo _ScDate_DaysInMonth>>$@ - @echo _ScDate_DaysInYear>>$@ - @echo _ScDate_WeeksInYear>>$@ - -.ENDIF - - diff --git a/sc/addin/inc/addin.h b/sc/addin/inc/addin.h deleted file mode 100644 index 63f2ef06d28d..000000000000 --- a/sc/addin/inc/addin.h +++ /dev/null @@ -1,150 +0,0 @@ -/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ - -#ifndef _ADDIN_H -#define _ADDIN_H - -#ifndef _SOLAR_H - -#ifndef TRUE -#define TRUE 1 -#endif -#ifndef FALSE -#define FALSE 0 -#endif - -#undef NULL -#define NULL 0 - -typedef unsigned char BOOL; -typedef unsigned char BYTE; -typedef unsigned short USHORT; -typedef unsigned long ULONG; - -#endif - -#ifndef SUPD -/* enable all new interface features */ -#define SUPD 9999 -#endif - -/* all character string returns are limited to 255+1 chars */ -#define SO_CHARSTRING_MAX 256 -#define SO_StringCopy( dst, src ) \ - (strncpy( dst, src, SO_CHARSTRING_MAX ), dst[SO_CHARSTRING_MAX-1] = '\0') - -typedef enum -{ - PTR_DOUBLE, - PTR_STRING, - PTR_DOUBLE_ARR, - PTR_STRING_ARR, - PTR_CELL_ARR, - NONE -} ParamType; - -#ifndef WIN -#ifdef WNT -#define CALLTYPE __cdecl -#else -#define CALLTYPE -#endif -#else -#define PASCAL _pascal -#define FAR _far -#define CALLTYPE FAR PASCAL -#endif - - -#ifdef __cplusplus - -extern "C" { - -typedef void (CALLTYPE* AdvData)( double& nHandle, void* pData ); - -extern void CALLTYPE GetFunctionCount( USHORT& nCount ); - -extern void CALLTYPE GetFunctionData( USHORT& nNo, - char* pFuncName, - USHORT& nParamCount, - ParamType* peType, - char* pInternalName ); - -extern void CALLTYPE IsAsync( USHORT& nNo, ParamType* peType ); - -extern void CALLTYPE Advice( USHORT& nNo, AdvData& pfCallback ); - -extern void CALLTYPE Unadvice( double& nHandle ); - - -/* new in StarOffice 5.0 */ - -extern void CALLTYPE GetParameterDescription( USHORT& nNo, USHORT& nParam, -char* pName, char* pDesc ); - -/* new in StarOffice 5.1 */ - -extern void CALLTYPE SetLanguage( USHORT& nLanguage ); - - -}; - -#else - -typedef void (CALLTYPE* AdvData)( double* nHandle, void* pData ); - -extern void CALLTYPE GetFunctionCount( USHORT * nCount ); - -extern void CALLTYPE GetFunctionData( USHORT * nNo, - char * pFuncName, - USHORT * nParamCount, - ParamType * peType, - char * pInternalName ); - -extern void CALLTYPE IsAsync( USHORT * nNo, ParamType * peType ); - -extern void CALLTYPE Advice( USHORT * nNo, AdvData * pfCallback ); - -extern void CALLTYPE Unadvice( double * nHandle ); - -/* new in StarOffice 5.0 */ - -extern void CALLTYPE GetParameterDescription( USHORT* nNo, USHORT* nParam, - char* pName, char* pDesc ); - - -/* new in StarOffice 5.1 */ - -extern void CALLTYPE SetLanguage( USHORT* nLanguage ); - - -#endif - -#endif - -/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/sc/addin/inc/dfa.hrc b/sc/addin/inc/dfa.hrc deleted file mode 100644 index 0d2af4f4bffd..000000000000 --- a/sc/addin/inc/dfa.hrc +++ /dev/null @@ -1,61 +0,0 @@ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ -#ifndef SC_ADDIN_DFA_HRC -#define SC_ADDIN_DFA_HRC - -#define DFA_PAR_DATE1_NAME 1 /* Name of Date1 Parameter */ -#define DFA_PAR_DATE2_NAME 2 /* Name of Date2 Parameter */ -#define DFA_PAR_MODE_NAME 3 /* Name of Mode Parameter */ -#define DFA_PAR_DATE_NAME 4 /* Name of Date Parameter */ -#define DFA_PAR_DATE_DESC 5 /* Description of Date Parameter 1 */ - -#define DFA_WEEK_NAME 6 /* Name */ -#define DFA_WEEK_DESC 7 /* Description */ -#define DFA_WEEK_PAR1_DESC 8 /* Description of Parameter 1 */ -#define DFA_WEEK_PAR2_DESC 9 /* Description of Parameter 2 */ -#define DFA_WEEK_PAR3_DESC 10 /* Description of Parameter 3 */ -#define DFA_MONTHS_NAME 11 /* Name */ -#define DFA_MONTHS_DESC 12 /* Description */ -#define DFA_MONTHS_PAR1_DESC 13 /* Description of Parameter 1 */ -#define DFA_MONTHS_PAR2_DESC 14 /* Description of Parameter 2 */ -#define DFA_MONTHS_PAR3_DESC 15 /* Description of Parameter 2 */ -#define DFA_YEARS_NAME 16 /* Name */ -#define DFA_YEARS_DESC 17 /* Description */ -#define DFA_YEARS_PAR1_DESC 18 /* Description of Parameter 1 */ -#define DFA_YEARS_PAR2_DESC 19 /* Description of Parameter 2 */ -#define DFA_YEARS_PAR3_DESC 20 /* Description of Parameter 2 */ -#define DFA_ISLEAPYEAR_NAME 21 /* Name */ -#define DFA_ISLEAPYEAR_DESC 22 /* Description */ -#define DFA_DAYSINMONTH_NAME 23 /* Name */ -#define DFA_DAYSINMONTH_DESC 24 /* Description */ -#define DFA_DAYSINYEAR_NAME 25 /* Name */ -#define DFA_DAYSINYEAR_DESC 26 /* Description */ -#define DFA_WEEKSINYEAR_NAME 27 /* Name */ -#define DFA_WEEKSINYEAR_DESC 28 /* Description */ - -#endif - diff --git a/sc/addin/inc/rot13.hrc b/sc/addin/inc/rot13.hrc deleted file mode 100644 index dba43401537f..000000000000 --- a/sc/addin/inc/rot13.hrc +++ /dev/null @@ -1,34 +0,0 @@ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ -#ifndef SC_ADDIN_ROT13_HRC -#define SC_ADDIN_ROT13_HRC - -#define ROT13_DESC 1 -#define ROT13_PAR1_NAME 2 -#define ROT13_PAR1_DESC 3 - -#endif diff --git a/sc/addin/makefile.mk b/sc/addin/makefile.mk deleted file mode 100644 index e716a8d8477a..000000000000 --- a/sc/addin/makefile.mk +++ /dev/null @@ -1,45 +0,0 @@ -#************************************************************************* -# -# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. -# -# Copyright 2000, 2010 Oracle and/or its affiliates. -# -# OpenOffice.org - a multi-platform office productivity suite -# -# This file is part of OpenOffice.org. -# -# OpenOffice.org is free software: you can redistribute it and/or modify -# it under the terms of the GNU Lesser General Public License version 3 -# only, as published by the Free Software Foundation. -# -# OpenOffice.org is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU Lesser General Public License version 3 for more details -# (a copy is included in the LICENSE file that accompanied this code). -# -# You should have received a copy of the GNU Lesser General Public License -# version 3 along with OpenOffice.org. If not, see -# <http://www.openoffice.org/license.html> -# for a copy of the LGPLv3 License. -# -#************************************************************************* - -PRJ=.. - -PRJNAME=sc -TARGET=addin - -# --- Settings ----------------------------------------------------- - -.INCLUDE: settings.mk - -# --- Targets ------------------------------------------------------- - -.INCLUDE: target.mk - -ALLTAR: $(MISC)$/cl2c.pl - -$(MISC)$/cl2c.pl: util/cl2c.pl - tr -d "\015" < util$/cl2c.pl > $@ - chmod +rw $@ diff --git a/sc/addin/rot13/exports.map b/sc/addin/rot13/exports.map deleted file mode 100644 index c662c9148aba..000000000000 --- a/sc/addin/rot13/exports.map +++ /dev/null @@ -1,11 +0,0 @@ -UDK_3_0_0 { - global: - GetFunctionCount; - GetFunctionData; - GetParameterDescription; - SetLanguage; - Rot13; - - local: - *; -}; diff --git a/sc/addin/rot13/makefile.mk b/sc/addin/rot13/makefile.mk deleted file mode 100644 index a33c50d2a725..000000000000 --- a/sc/addin/rot13/makefile.mk +++ /dev/null @@ -1,88 +0,0 @@ -#************************************************************************* -# -# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. -# -# Copyright 2000, 2010 Oracle and/or its affiliates. -# -# OpenOffice.org - a multi-platform office productivity suite -# -# This file is part of OpenOffice.org. -# -# OpenOffice.org is free software: you can redistribute it and/or modify -# it under the terms of the GNU Lesser General Public License version 3 -# only, as published by the Free Software Foundation. -# -# OpenOffice.org is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU Lesser General Public License version 3 for more details -# (a copy is included in the LICENSE file that accompanied this code). -# -# You should have received a copy of the GNU Lesser General Public License -# version 3 along with OpenOffice.org. If not, see -# <http://www.openoffice.org/license.html> -# for a copy of the LGPLv3 License. -# -#************************************************************************* - -PRJ=..$/.. - -PRJNAME=sc -TARGET=rot -LIBTARGET=NO - - -# --- Settings ----------------------------------------------------- - -.INCLUDE: settings.mk - -CL2C=+$(PERL) $(MISC)$/cl2c.pl -CL2CRID=RID_SC_ADDIN_ROT13 -CL2CSRC=$(TARGET)13.src - -# --- Files -------------------------------------------------------- - -CFILES= $(MISC)$/x$(TARGET).c - -SLOFILES= \ - $(SLO)$/x$(TARGET).obj - -# ========================================================================== - -SHL1TARGET= rot$(DLLPOSTFIX) -SHL1IMPLIB= irot -SHL1OBJS= $(SLO)$/x$(TARGET).obj - -SHL1VERSIONMAP=exports.map -SHL1DEF=$(MISC)$/$(SHL1TARGET).def -DEF1NAME=$(SHL1TARGET) - -.IF "$(GUI)" == "WNT" -SHL1STDLIBS= $(GDI32LIB) $(ADVAPI32LIB) $(COMDLG32LIB) \ - $(UUIDLIB) $(OLE32LIB) $(SHELL32LIB) $(WINSPOOLLIB) -.IF "$(GVER)" == "W40" -SHL1STDLIBS= $(SHL1STDLIBS) $(COMCTL32LIB) -.ENDIF # W40 -.ENDIF # WNT - -# --- Targets ------------------------------------------------------- - -ALLTAR: $(MISC)$/rot.lst - -.INCLUDE: target.mk - -$(MISC)$/x$(TARGET).c: $(TARGET)13.cl $(CL2CSRC) $(MISC)$/cl2c.pl - $(CL2C) $(TARGET)13.cl $(MISC)$/x$(TARGET).c $(CL2CSRC) $(CL2CRID) - -# copy file to include in package -$(INCCOM)$/xlang.h : $(SOLARINCDIR)$/i18npool$/lang.h - @$(COPY) $(SOLARINCDIR)$/i18npool$/lang.h $@ - -$(SLOFILES) : $(INCCOM)$/xlang.h $(CFILES) - -$(MISC)$/rot.lst : \ - $(MISC)$/x$(TARGET).c \ - $(INCCOM)$/xlang.h \ - ..$/inc$/rot13.hrc \ - ..$/inc$/addin.h - @echo $< > $@ diff --git a/sc/addin/rot13/rot13.cl b/sc/addin/rot13/rot13.cl deleted file mode 100644 index 5c7e92ae3d3f..000000000000 --- a/sc/addin/rot13/rot13.cl +++ /dev/null @@ -1,158 +0,0 @@ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ - -/* static char rot13_Id[]="@(#) StarCalc Rot13 AddIn (c) 1998-2000 Sun Microsystems, Inc."; */ - -#include <string.h> -#include <stdio.h> - -#include <xlang.h> -#include <addin.h> -#include <rot13.hrc> - -/** - * the current language the Addin is using - */ -static USHORT _nLanguage=LANGUAGE_ENGLISH; - -/** - * StarCalc calls this function to set a new current Language for the Addin - * - * @param *nLanguage - * - */ -void CALLTYPE SetLanguage( USHORT* nLanguage ) -{ - _nLanguage = GetNeutralLanguage( *nLanguage ); -} - - -/** - * Tell StarCalc how many new functions this Addin provides. - * - * @param *nCount - returns the number of functions which are exported to StarCalc - * - */ -void CALLTYPE GetFunctionCount( USHORT *nCount ) -{ - *nCount = 1; -} - -/** - * Provides neccessary data for each new function to StarCalc - * - * @param *nNo Input: Function number between 0 and nCount - 1 - * @param *pFuncName Output: Functionname which should be called in the AddIn-DLL - * @param *nParamCount Output: Number of Parameter. Must be greater than 0, because there's always a return-Value. Maximum is 16. - * @param *peType Output: Pointer to arrray with exactly 16 variables of typ Paramtype. nParamCount Entries are set to the type of the corresponding Parameters. - * @param *pInternalName Output: Functionname as seen by the Spreadsheet user - * - * @see #GetFunctionCount, #GetParameterDescription - * - */ -void CALLTYPE GetFunctionData( USHORT * nNo, - char * pFuncName, - USHORT * nParamCount, - ParamType * peType, - char * pInternalName ) -{ - - switch( *nNo ) { - case 0: - /* the function name is the same in all languages */ - SO_StringCopy( pInternalName, "Rot13" ); - SO_StringCopy( pFuncName, "Rot13" ); - peType[0] = PTR_STRING; - peType[1] = PTR_STRING; - *nParamCount=2; - break; - default: - *nParamCount = 0; - *pFuncName = 0; - *pInternalName = 0; - break; - } -} - -/** - * Provides descriptions for each new function to StarCalc - * which are shown is the autopilot - * - * @param *nNo Input Parameter, Function number between 0 and nCount - 1 - * @param *nParam Parameter Number - * @param *pName Output: Name of the parameter - * @param *pDesc Output: Description of the parameter - * - * @see #GetFunctionCount, #GetParameterDescription - */ -void CALLTYPE GetParameterDescription( USHORT* nNo, USHORT* nParam, -char* pName, char* pDesc ) -{ - *pName = 0; - *pDesc = 0; - - - switch ( *nNo ) { - case 0: - switch ( *nParam ) { - case 0: - SO_StringCopy(pDesc,getText(ROT13_DESC)); - break; - case 1: - SO_StringCopy(pName,getText(ROT13_PAR1_NAME)); - SO_StringCopy(pDesc,getText(ROT13_PAR1_DESC)); - } - } -} - -/** - * ROT13 Algorithm, each alphabetical character of the text is rotated by 13 in the alphabet - * - * @param *ret - * @param *src - * - * ER: well, my personal favorite algorithm is - * main(_){while(_=~getchar())putchar(~_-1/(~(_|32)/13*2-11)*13);} - * but for clarification we do it somehow different here ;-) - */ -void CALLTYPE Rot13(char *ret, char *src) -{ - if ( ! ret ) return; - if ( ! src ) *ret='\0'; - - for(;src && *src; src++ , ret++) { - *ret=*src; - if (*ret >= 'A' && *ret <= 'Z') { - if ( (*ret +=13) > 'Z' ) *ret-=26; - } else if (*ret >= 'a' && *ret < 'n') { - *ret +=13; - } else if (*ret >= 'n' && *ret <= 'z') { - *ret -=13; - } - } - *ret=*src; -} diff --git a/sc/addin/rot13/rot13.src b/sc/addin/rot13/rot13.src deleted file mode 100644 index 5518ae0aa31f..000000000000 --- a/sc/addin/rot13/rot13.src +++ /dev/null @@ -1,58 +0,0 @@ -/************************************************************************* - * - * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. - * - * Copyright 2000, 2010 Oracle and/or its affiliates. - * - * OpenOffice.org - a multi-platform office productivity suite - * - * This file is part of OpenOffice.org. - * - * OpenOffice.org is free software: you can redistribute it and/or modify - * it under the terms of the GNU Lesser General Public License version 3 - * only, as published by the Free Software Foundation. - * - * OpenOffice.org is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU Lesser General Public License version 3 for more details - * (a copy is included in the LICENSE file that accompanied this code). - * - * You should have received a copy of the GNU Lesser General Public License - * version 3 along with OpenOffice.org. If not, see - * <http://www.openoffice.org/license.html> - * for a copy of the LGPLv3 License. - * - ************************************************************************/ -#include "sc.hrc" // Definition RID_XXX in StarCalc -#include "rot13.hrc" - -/* #i54546# The code belonging to this resource file is sample code for the - * legacy AddIn interface. The interface is still supported, but deprecated. - * The strings here were displayed in the function wizard. To prevent - * duplicated and useless translation effort (functions and strings are also - * part of the new scaddin module), the strings here are now layed out as fixed - * untranslatable strings. The entire mechanism with the ../util/cl2c.pl perl - * script merging the raw .cl and the .src during build time didn't work - * anymore anyway, since we switched from MS-LCIDs / telephone area codes to - * ISO codes for resources, and introduced localize.sdf files. Returned was - * always an empty string. Now at least the fixed English string is returned. - * */ - -Resource RID_SC_ADDIN_ROT13 -{ - String ROT13_DESC // Description - { - Text = "ROT13 Algorithm, each alphabetical character of the text is rotated by 13 in the alphabet"; - }; - - String ROT13_PAR1_NAME // Name of Parameter 1 - { - Text = "Text"; - }; - - String ROT13_PAR1_DESC // Description of Parameter 1 - { - Text = "The text that is to be rotated"; - }; -}; diff --git a/sc/addin/util/cl2c.pl b/sc/addin/util/cl2c.pl deleted file mode 100644 index 6f5d3ee7e0d8..000000000000 --- a/sc/addin/util/cl2c.pl +++ /dev/null @@ -1,238 +0,0 @@ -#!/usr/solar/bin/perl - -########################################################################## -# -# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. -# -# Copyright 2000, 2010 Oracle and/or its affiliates. -# -# OpenOffice.org - a multi-platform office productivity suite -# -# This file is part of OpenOffice.org. -# -# OpenOffice.org is free software: you can redistribute it and/or modify -# it under the terms of the GNU Lesser General Public License version 3 -# only, as published by the Free Software Foundation. -# -# OpenOffice.org is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU Lesser General Public License version 3 for more details -# (a copy is included in the LICENSE file that accompanied this code). -# -# You should have received a copy of the GNU Lesser General Public License -# version 3 along with OpenOffice.org. If not, see -# <http://www.openoffice.org/license.html> -# for a copy of the LGPLv3 License. -# -########################################################################## - -if ( $#ARGV != 3 ) { - print STDERR "usage: cl2c.pl <file.cl> <file.c> <file.src> <resname>\n"; - exit -1; -} - -$CL=$ARGV[0]; -$C=$ARGV[1]; -$SRC=$ARGV[2]; -$RNAME=$ARGV[3]; - -sub sconv -{ - local($s)=@_[0]; - local($o,$c); - $_=""; - foreach $o ( unpack("C*",$s) ) { - $c=chr($o); - if ( $o >= 32 && $o < 127 ) { - $_ .= $c; - } else { - $_ .= sprintf("\\%o", $o); - } - } - return $_; -} - - -sub makeneutral { - - print COUT "\n\n/**\n"; - print COUT " * Get neutral language for specific language.\n"; - print COUT " * This simplifies the getText switch cases and allows to handle\n"; - print COUT " * previously unknown language derivates due to foreign installations.\n"; - print COUT " * If you want to distinguish between some dialects change this function\n"; - print COUT " * to return the desired nLang before doing the bit masking stuff.\n"; - print COUT " * See xlang.h for defined LANGUAGE_*\n"; - print COUT " */\n"; - - # taken from tools/source/intntl/intn.cxx International::GetNeutralLanguage - print COUT "static USHORT GetNeutralLanguage( USHORT nLang )\n"; - print COUT "{\n"; - print COUT "\tUSHORT nPrimLang;\n"; - print COUT "\n"; - print COUT "\t/* ignore LANGUAGE_USER* */\n"; - print COUT "\tif ( (nLang & 0x03FF) >= 0x0200 )\n"; - print COUT "\t return nLang;\n"; - print COUT "\n"; - print COUT "\tnLang &= 0x03FF;\n"; - print COUT "\n"; - print COUT "\tnPrimLang = nLang | 0x0400;\n"; - print COUT "\n"; - print COUT "\tswitch ( nPrimLang )\n"; - print COUT "\t{\n"; - print COUT "\t\tcase LANGUAGE_CHINESE_TRADITIONAL:\n"; - print COUT "\t\t\tnLang = LANGUAGE_CHINESE;\n"; - print COUT "\t\t\tbreak;\n"; - print COUT "\t\tcase LANGUAGE_ENGLISH_US:\n"; - print COUT "\t\t\tnLang = LANGUAGE_ENGLISH;\n"; - print COUT "\t\t\tbreak;\n"; - print COUT "\t\tcase LANGUAGE_NORWEGIAN_BOKMAL:\n"; - print COUT "\t\t\tnLang = LANGUAGE_NORWEGIAN;\n"; - print COUT "\t\t\tbreak;\n"; - print COUT "\t\tcase LANGUAGE_PORTUGUESE_BRAZILIAN:\n"; - print COUT "\t\t\tnLang = LANGUAGE_PORTUGUESE;\n"; - print COUT "\t\t\tbreak;\n"; - print COUT "\n"; - print COUT "\t\tdefault:\n"; - print COUT "\t\t\tnLang = nPrimLang;\n"; - print COUT "\t\t\tbreak;\n"; - print COUT "\t}\n"; - print COUT "\n"; - print COUT "\treturn nLang;\n"; - print COUT "}\n"; - print COUT "\n"; - -} - - -sub maketext { - - print COUT "\n\n/**\n"; - print COUT " * Get text resource for current language.\n"; - print COUT " * Remember that 8-bit characters are shown in\n"; - print COUT " * system dependend code pages!\n"; - print COUT " * To get correct results you will have to distuinguish\n"; - print COUT " * for example between UNIX and WIN and OS2 target systems.\n"; - print COUT " */\n"; - - print COUT "static char* getText( int nResource )\n{\n"; - print COUT "\tswitch( nResource ) {\n"; - - $resflag=0; - $strname=""; - $cnt=0; - $text_english=""; - - while (<SRCIN>) { - $resflag=1 if ( /Resource\s$RNAME/ ); - - if ( /\{/ ) { - if ( ++$cnt == 2 ) { - # start language - $text_english=""; - print COUT "\t\t\tswitch( _nLanguage ) {\n"; - next; - } - } - - if ( /\}/ ) { - if ( --$cnt == 1 ) { - # end language - - if ( $text_english ne "" ) { - print COUT "\t\t\t\tcase LANGUAGE_ENGLISH:\n\t\t\t\tdefault:\n"; - print COUT "\t\t\t\treturn(" . $text_english . ")\;\n"; - } - - print COUT "\t\t\t}\n\t\t\tbreak;\n"; - next; - } elsif ( $cnt == 0 ) { - # end of resource - $resflag=0; - print COUT "\t\tdefault:\n\t\t\tbreak;\n"; - print COUT "\t}\n\treturn(\"\");\n}\n"; - next; - } - - } - - if ( $resflag && $cnt == 1) { - if ( /\sString\s(([A-Z]|\_|[0-9]|[a-z])*)/ ) { - $strname=$1; - print COUT "\t\tcase " . $strname . ":\n"; - } - } - - if ( $cnt == 2 && /^\s*Text/ ) { - $langname="german"; - ($textdef,@textx)=split(/=/); - $text=join("=",@textx); - if ( $textdef =~ /\[\s+(.*)\s+\]/ ) { - $langname=$1; - } - else { - $langname="ENGLISH_US"; # no [...] => not to be translated - } - - $langname="LANGUAGE_" . uc($langname); - - chop($text) while ( $text=~/(\r|\n|\;)$/ ); - $text=sconv($text); - # english_us, not english because it's developer's pigeon - if ( $langname eq "LANGUAGE_ENGLISH_US" ) { - $text_english=$text; - } - # ISO coded, obtain at least the default - elsif ( $langname =~ /^LANGUAGE_EN-US$/ ) { - $text_english=$text; - } - # we don't know about USER languages, ENGLISH will be appended later - elsif ( ! ( $langname =~ /LANGUAGE_USER/ || $langname =~ /^LANGUAGE_ENGLISH$/ ) ) { - # ER 28.04.99: for the moment only German and English are - # exported, because we have a problem with non-existing - # character code tables for systems other than Windoze. - # => Chinese would be definitely mixed up and we don't - # want to insult anybody.. others like Spanish would look - # very ugly, but we'll have to live with bad German Umlauts. - if ( $langname =~ /LANGUAGE_(GERMAN|ENGLISH)/ ) { - print COUT "\t\t\t\tcase " . $langname . ":\n"; - print COUT "\t\t\t\treturn(" . $text . ")\;\n"; - } - } - - } - } - - makeneutral(); - -} - -open(CLIN,"<$CL") || die "can not open $CL\n"; -open(SRCIN,"<$SRC") || die "can not open $CL\n"; -open(COUT,">$C") || die "can not open $CL\n"; - -$ccnt=0; -$incomment=0; -while(<CLIN>) { - if ( /^\/\*--(-*)/ ) { - $incomment=1; - $ccnt++; - } - - print COUT $_ if ( $incomment==0 || $ccnt==1 ); - - &maketext() if ( /^static USHORT _nLanguage=/ ); - - if ( /(-*)--\*\/$/ ) { - $incomment=0; - } - -} - -close(CLIN); -close(SRCIN); -close(COUT); - -exit 0; - - diff --git a/sc/addin/util/makefile.mk b/sc/addin/util/makefile.mk deleted file mode 100644 index 2bd75148f80a..000000000000 --- a/sc/addin/util/makefile.mk +++ /dev/null @@ -1,47 +0,0 @@ -#************************************************************************* -# -# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. -# -# Copyright 2000, 2010 Oracle and/or its affiliates. -# -# OpenOffice.org - a multi-platform office productivity suite -# -# This file is part of OpenOffice.org. -# -# OpenOffice.org is free software: you can redistribute it and/or modify -# it under the terms of the GNU Lesser General Public License version 3 -# only, as published by the Free Software Foundation. -# -# OpenOffice.org is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU Lesser General Public License version 3 for more details -# (a copy is included in the LICENSE file that accompanied this code). -# -# You should have received a copy of the GNU Lesser General Public License -# version 3 along with OpenOffice.org. If not, see -# <http://www.openoffice.org/license.html> -# for a copy of the LGPLv3 License. -# -#************************************************************************* -PRJ=..$/.. - -PRJNAME=sc -TARGET=autil - - -# --- Settings ----------------------------------------------------- - -.INCLUDE: settings.mk - -$(BIN)$/addin.zip : \ - $(MISC)$/rot.lst \ - $(MISC)$/dfa.lst - $(TYPE) $(MISC)$/rot.lst | tr -s " " "\n" | zip -@ -u -j -ll $(BIN)$/addin.zip $(CHECKZIPRESULT) - $(TYPE) $(MISC)$/dfa.lst | tr -s " " "\n" | zip -@ -u -j -ll $(BIN)$/addin.zip $(CHECKZIPRESULT) - chmod +rw $(BIN)$/addin.zip - -.INCLUDE: target.mk - -ALLTAR: $(BIN)$/addin.zip - diff --git a/sc/prj/build.lst b/sc/prj/build.lst index a78f523cd295..1a641a67f461 100755 --- a/sc/prj/build.lst +++ b/sc/prj/build.lst @@ -9,7 +9,6 @@ sc sc\res\imglst\apptbx get - all sc_resap NULL sc sc\source\core\inc get - all sc_coinc NULL sc sc\source\ui\inc get - all sc_uiinc NULL sc sc\source\filter\inc get - all sc_fiinc NULL -sc sc\addin\inc get - all sc_adinc NULL sc sc\sdi nmake - all sc_sdi sc_inc NULL sc sc\source\core\data nmake - all sc_data sc_sdi sc_inc NULL sc sc\source\core\src nmake - all sc_cosrc sc_sdi sc_inc NULL @@ -43,9 +42,5 @@ sc sc\source\filter\rtf nmake - all sc_rtf sc_sdi sc_inc NULL sc sc\source\filter\html nmake - all sc_html sc_sdi sc_inc NULL sc sc\source\filter\xml nmake - all sc_xml sc_sdi sc_inc NULL sc sc\source\filter\xcl97 nmake - all sc_xcl97 sc_sdi sc_inc NULL -sc sc\addin nmake - all sc_add sc_sdi sc_inc NULL -sc sc\addin\datefunc nmake - all sc_addfu sc_add sc_sdi sc_inc NULL -sc sc\addin\rot13 nmake - all sc_adrot sc_add sc_sdi sc_inc NULL -sc sc\addin\util nmake - all sc_adutil sc_addfu sc_adrot sc_sdi sc_inc NULL -sc sc\util nmake - all sc_util sc_addfu sc_adrot sc_adutil sc_app sc_attr sc_cctrl sc_cosrc sc_data sc_dbgui sc_dif sc_docsh sc_drfnc sc_excel sc_form sc_html sc_lotus sc_qpro sc_misc sc_name sc_nvipi sc_opt sc_page sc_rtf sc_scalc sc_style sc_tool sc_uisrc sc_undo sc_unobj sc_view sc_xcl97 sc_xml sc_acc sc_ftools sc_inc sc_vba NULL +sc sc\util nmake - all sc_util sc_app sc_attr sc_cctrl sc_cosrc sc_data sc_dbgui sc_dif sc_docsh sc_drfnc sc_excel sc_form sc_html sc_lotus sc_qpro sc_misc sc_name sc_nvipi sc_opt sc_page sc_rtf sc_scalc sc_style sc_tool sc_uisrc sc_undo sc_unobj sc_view sc_xcl97 sc_xml sc_acc sc_ftools sc_inc sc_vba NULL sc sc\qa\unit nmake - all sc_qa_cppunit sc_util NULL |